//===== Hercules Script =======================================
//= Buwaya Dungeon
//===== By: ==================================================
//= Masao
//===== Current Version: =====================================
//= 1.0
//===== Compatible With: =====================================
//= Hercules
//===== Description: =========================================
//= Entrance to the Buwaya Dungeon.
//===== Additional Comments: =================================
//= 1.0 First Version.
//============================================================
ma_fild02,312,317,5 script Guard#mal 570,{
if (BaseLevel < 130) {
mes "[Guard]";
mes "Persons ^ff0000under level 130^000000";
mes "cannot enter this place.";
mes "This place is dangerous. Please go back.";
close;
}
set .@ins_party,getcharid(1);
set .@ins_mas,getpartyleader(.@ins_party,2);
set .@buwaya_timer,checkquest(4229,PLAYTIME);
set .@p_name$,getpartyname(.@party_id);
set .@md_name$, "Buwaya Cave";
set .@instance, instance_create(.@md_name$, .@ins_party);
if (.@ins_party > 0) {
if (.@ins_mas == getcharid(0)) {
mes "[Guard]";
mes "This place is dangerous. Please go back.";
mes "If you dont have any business here, please go back.";
next;
switch (select("Why is it so dangerous?:I'm here to hunt down Buwaya:End conversation")) {
case 1:
mes "[Guard]";
mes "Recently, there has been a case";
mes "where villagers have disappeared.";
mes "After investigating the tracks, ";
mes "we found out the giant monster Buwaya";
mes "was responsible.";
next;
mes "[Guard]";
mes "Soldiers and mercenaries have been dispatched to ";
mes "hunt down Buwaya, but were never";
mes "completely successful.";
next;
mes "[Guard]";
mes "Buwaya is still kidnapping";
mes "the villagers to this day.";
mes "Please gather some people to get rid of Buwaya.";
close;
case 2:
if (.@buwaya_timer == 0) {
if (.@instance == 0) {
mes "Guard]";
mes "Party name is..." + .@p_name$ + "";
mes "Party leader is..." + strcharinfo(0) + "";
mes "^0000ff" + .@md_name$ + "^000000 cannot be opened now.";
mes "Please try a moment later.";
close;
}
mes "[Guard]";
mes "^0000ff" + .@md_name$ + "^000000 I will open up the tunnel for a while.";
mes "I wish you good luck.";
close;
} else if (.@buwaya_timer == 1) {
mes "[Guard]";
mes "Buwaya is still hiding.";
mes "Even if you enter now, Buwaya will not come out. ";
mes "Please come back later.";
close;
}
erasequest 4229;
if (.@instance == 0) {
mes "Guard]";
mes "Party name is..." + .@p_name$ + "";
mes "Party leader is..." + strcharinfo(0) + "";
mes "^0000ff" + .@md_name$ + "^000000 can not be opened now.";
mes "Please try a moment later.";
close;
}
mes "[Guard]";
mes "^0000ff" + .@md_name$ + "^000000 I will open up the tunnel for a while.";
mes "I wish you good luck.";
close;
case 3:
mes "[Guard]";
mes "This place is dangerous, you cannot enter.";
close;
}
}
mes "[Guard]";
mes "Let me talk with the party leader.";
mes "Please call forth the leader.";
close;
}
mes "[Guard]";
mes "Buwaya is dangerous,";
mes "please come back after you form a";
mes "team with other people.";
close;
}
ma_fild02,315,323,0 script Cave Entrance 45,2,2,{
end;
OnTouch:
if (BaseLevel < 130) {
mes "[Guard]";
mes "Person ^underff0000130level^000000";
mes "cannot enter this place.";
mes "This place is dangerous. Please go back.";
close;
}
set .@ins_party,getcharid(1);
set .@p_name$,getpartyname(.@party_id);
set .@md_name$, "Buwaya Cave";
set .@instance, instance_create(.@md_name$, .@ins_party);
set .@buwaya_timer,checkquest(4229,PLAYTIME);
if (.@buwaya_timer == 0) {
switch (select("Enter.:Turn back.")) {
case 1:
if (.@instance == 3) {
mes "[Guard]";
mes "Oh, now is not a good time.";
mes "Please try again a moment later.";
close;
} else if (.@instance == 2) {
mes "[Guard]";
mes "This place is dangerous. Please do not enter.";
close;
} else if (.@instance == 1) {
mes "[Guard]";
mes "This place is dangerous. Please do not enter.";
close;
} else if (.@instance == 0) {
mapannounce "ma_fild02","" + .@p_name$ + "of party" + strcharinfo(0) + "party member" + .@md_name$ + "Begin hunting Buwaya at",bc_map,"0x00ff99"; //FW_NORMAL 12 0 0
setquest 4229;
close;
}
mes "- Could not enter due to an unidentified force. -";
close;
case 2:
mes "[Guard]";
mes "You must value your life,";
mes "it is better to think carefully before you act.";
close;
}
}else if (.@buwaya_timer == 1) {
mes "[Guard]";
mes "Buwaya is still hiding.";
mes "Even if you enter now, Buwaya will not come out. ";
mes "Please come back later.";
close;
}
erasequest 4229;
switch (select("Enter.:Turn back.")) {
case 1:
if (.@instance == 3) {
mes "[Guard]";
mes "Oh, now is not a good time.";
mes "Please try again a moment later.";
close;
} else if (.@instance == 2) {
mes "[Guard]";
mes "This place is dangerous. Please do not enter.";
close;
} else if (.@instance == 1) {
mes "[Guard]";
mes "This place is dangerous. Please do not enter.";
close;
} else if (.@instance == 0) {
mapannounce "ma_fild02","" + .@p_name$ + "of party" + strcharinfo(0) + "party member" + .@md_name$ + "Begin hunting Buwaya at",bc_map,"0x00ff99"; //FW_NORMAL 12 0 0
setquest 4229;
close;
}
mes "- Could not enter due to an unidentified force. -";
close;
case 2:
mes "[Guard]";
mes "You must value your life,";
mes "it is better to think carefully before you act.";
close;
}
}