diff options
Diffstat (limited to 'npc/other')
28 files changed, 15458 insertions, 15458 deletions
diff --git a/npc/other/Global_Functions.txt b/npc/other/Global_Functions.txt index 4c45a1db5..b9cb96183 100644 --- a/npc/other/Global_Functions.txt +++ b/npc/other/Global_Functions.txt @@ -1,80 +1,80 @@ -//===== eAthena Script =======================================
-//= Global Functions
-//===== By: ==================================================
-//= Lupus, kobra_k88
-//===== Current Version: =====================================
-//= 1.1
-//===== Compatible With: =====================================
-//= eAthena 1.0
-//===== Description: =========================================
-//= <Description>
-//===== Additional Comments: =================================
-//= Added F_ClearJobVar - on getting a new job it clears all Job Quest variables
-//= Removed individual job check functions as they were redundant [kobra_k88]
-//============================================================
-
-
-//=========================================
-// Function that clears job quest variables
-//=========================================
-function script F_ClearJobVar {
- // Misc ---------------------------------
- set JBLVL,0;
- // First Class Jobs ---------------------
- set job_acolyte_q,0; set job_acolyte_q2,0;
- set job_archer_q,0;
- set job_magician_q,0;
- set job_merchant_q,0; set job_merchant_q2,0; set job_merchant_q3,0;
- set job_sword_q,0; set job_sword_q2,0;
- set job_thief_q,0;
- // 2-1 Jobs ------------------------------
- set ASSIN_Q,0; set ASSIN_Q2,0;
- set BSMITH_Q,0; set BSMITH_Q2,0;
- set HNTR_Q,0; set HNTR_Q2,0;
- set KNIGHT_Q,0; set KNIGHT_Q2,0;
- set PRIEST_Q,0; set PRIEST_Q2,0; set PRIEST_Q3,0;
- set WIZ_Q,0; set WIZ_Q2,0;
- // 2-2 Jobs ------------------------------
- set ROGUE_Q,0; set ROGUE_Q2,0;
- set ALCH_Q,0; set ALCH_Q2,0;
- return;
-}
-
-//=====================================================
-// Functions used to check a players job class
-//----------------------------------------------------
-// HOW TO USE:
-// i.e. We need all holy classes but monks
-// if ( callfunc("Is_Holy_Class") && callfunc("Is_Monk")==0 ) goto L_Start;
-//=======================================================
-
-//------------------------------------------------------
-//returns 1 if the player is either Aco,Monk or Priest, 0 otherwise
-function script Is_Holy_Class {
- return ( Class==Job_Acolyte || Class==Job_Priest || Class==Job_Monk || Class==4005 || Class==4009 || Class==4016 );
-}
-//------------------------------------------------------
-//returns 1 if the player is either Archer,Hunter,Bard,Dancer, 0 otherwise
-function script Is_Bow_Class {
- return ( Class==Job_Archer || Class==Job_Hunter || Class==Job_Bard || Class==Job_Dancer || Class==4004 || Class==4012 || Class==4020 || Class==4021);
-}
-//------------------------------------------------------
-//returns 1 if the player is either Mage,Wizard,Sage, 0 otherwise
-function script Is_Magic_Class {
- return ( Class==Job_Mage || Class==Job_Wizard || Class==Job_Sage || Class==4003 || Class==4010 || Class==4017 );
-}
-//----------------------------------------------------
-//returns 1 if the player is either Merchant,Blacksmith,Alchemist, 0 otherwise
-function script Is_Merc_Class {
- return ( Class==Job_Merchant || Class==Job_Blacksmith || Class==Job_Alchem || Class==4006 || Class==4011 || Class==4019 );
-}
-//------------------------------------------------------
-//returns 1 if the player is either Thief,Assassin,Rogue, 0 otherwise
-function script Is_Thief_Class {
- return ( Class==Job_Thief || Class==Job_Assassin || Class==Job_Rogue || Class==4007 || Class==4013 || Class==4018 );
-}
-//-----------------------------------------------------
-//returns 1 if the player is either Swordsman,Knight,Crusader, 0 otherwise
-function script Is_Sword_Class {
- return ( Class==Job_Swordman || Class==Job_Knight || Class==Job_Knight2 || Class==Job_Crusader || Class==Job_Crusader2 || Class==4002 || Class==4008 || Class==4014 || Class==4015 || Class==4022 );
-}
+//===== eAthena Script ======================================= +//= Global Functions +//===== By: ================================================== +//= Lupus, kobra_k88 +//===== Current Version: ===================================== +//= 1.1 +//===== Compatible With: ===================================== +//= eAthena 1.0 +//===== Description: ========================================= +//= <Description> +//===== Additional Comments: ================================= +//= Added F_ClearJobVar - on getting a new job it clears all Job Quest variables +//= Removed individual job check functions as they were redundant [kobra_k88] +//============================================================ + + +//========================================= +// Function that clears job quest variables +//========================================= +function script F_ClearJobVar { + // Misc --------------------------------- + set JBLVL,0; + // First Class Jobs --------------------- + set job_acolyte_q,0; set job_acolyte_q2,0; + set job_archer_q,0; + set job_magician_q,0; + set job_merchant_q,0; set job_merchant_q2,0; set job_merchant_q3,0; + set job_sword_q,0; set job_sword_q2,0; + set job_thief_q,0; + // 2-1 Jobs ------------------------------ + set ASSIN_Q,0; set ASSIN_Q2,0; + set BSMITH_Q,0; set BSMITH_Q2,0; + set HNTR_Q,0; set HNTR_Q2,0; + set KNIGHT_Q,0; set KNIGHT_Q2,0; + set PRIEST_Q,0; set PRIEST_Q2,0; set PRIEST_Q3,0; + set WIZ_Q,0; set WIZ_Q2,0; + // 2-2 Jobs ------------------------------ + set ROGUE_Q,0; set ROGUE_Q2,0; + set ALCH_Q,0; set ALCH_Q2,0; + return; +} + +//===================================================== +// Functions used to check a players job class +//---------------------------------------------------- +// HOW TO USE: +// i.e. We need all holy classes but monks +// if ( callfunc("Is_Holy_Class") && callfunc("Is_Monk")==0 ) goto L_Start; +//======================================================= + +//------------------------------------------------------ +//returns 1 if the player is either Aco,Monk or Priest, 0 otherwise +function script Is_Holy_Class { + return ( Class==Job_Acolyte || Class==Job_Priest || Class==Job_Monk || Class==4005 || Class==4009 || Class==4016 ); +} +//------------------------------------------------------ +//returns 1 if the player is either Archer,Hunter,Bard,Dancer, 0 otherwise +function script Is_Bow_Class { + return ( Class==Job_Archer || Class==Job_Hunter || Class==Job_Bard || Class==Job_Dancer || Class==4004 || Class==4012 || Class==4020 || Class==4021); +} +//------------------------------------------------------ +//returns 1 if the player is either Mage,Wizard,Sage, 0 otherwise +function script Is_Magic_Class { + return ( Class==Job_Mage || Class==Job_Wizard || Class==Job_Sage || Class==4003 || Class==4010 || Class==4017 ); +} +//---------------------------------------------------- +//returns 1 if the player is either Merchant,Blacksmith,Alchemist, 0 otherwise +function script Is_Merc_Class { + return ( Class==Job_Merchant || Class==Job_Blacksmith || Class==Job_Alchem || Class==4006 || Class==4011 || Class==4019 ); +} +//------------------------------------------------------ +//returns 1 if the player is either Thief,Assassin,Rogue, 0 otherwise +function script Is_Thief_Class { + return ( Class==Job_Thief || Class==Job_Assassin || Class==Job_Rogue || Class==4007 || Class==4013 || Class==4018 ); +} +//----------------------------------------------------- +//returns 1 if the player is either Swordsman,Knight,Crusader, 0 otherwise +function script Is_Sword_Class { + return ( Class==Job_Swordman || Class==Job_Knight || Class==Job_Knight2 || Class==Job_Crusader || Class==Job_Crusader2 || Class==4002 || Class==4008 || Class==4014 || Class==4015 || Class==4022 ); +} diff --git a/npc/other/IceCream.txt b/npc/other/IceCream.txt index fd35caf54..dcac8f6e0 100644 --- a/npc/other/IceCream.txt +++ b/npc/other/IceCream.txt @@ -1,64 +1,64 @@ -// $Id: IceCream.txt,v 1.1.1.1 2004/09/10 17:26:42 MagicalTux Exp $
-//===== eAthena Script =======================================
-//= Ice Cream Maker
-//===== By: ==================================================
-//= KOOK SWU
-//===== Current Version: =====================================
-//= 1.1
-//===== Compatible With: =====================================
-//= eAthena 1.0
-//===== Description: =========================================
-//= A man makes you ice-cream
-//===== Additional Comments: =================================
-//= 1.1 Optimized, changed overlapping coords in Alberta [Lupus]
-//============================================================
-
-//ALBERTA
-alberta.gat,120,45,2 script Ice Cream Maker::IceCreamer 85,{
- mes "[Ice Cream Maker]";
- mes "Fresh Ice Cream made with snow from Lutie!";
- mes "Enjoy it now, it won't be on sale for long!";
- mes "^0000FF100 Zeny^000000 Ice Cream,";
- mes "Ice Cream!";
- next;
- menu "Gimme Ice Cream!",-,"Cancel Trade",L_End;
-
- mes "[Ice Cream Maker]";
- mes "Fresh Ice Cream made with snow from Lutie!";
- mes "Everyone wants our delicious ice cream, but we have limited amount,";
- mes "so you can only purchase 5 at a time!!";
- next;
- input @input;
- if(@input<1) goto L_inpC;
- if(@input>5) goto L_inpM;
- if(Zeny< @input*100) goto L_NoZ;
- getitem 536,@input;
- set Zeny,Zeny-100*@input;
- mes "[Ice Cream Maker]";
- mes "Here you go " +@input+ " Ice Cream for you.";
- close;
-
- L_inpC:
- mes "[Ice Cream Maker]";
- mes "Deal is canceled.";
- close;
- L_inpM:
- mes "[Ice Cream Maker]";
- mes "Sorry, but you can only buy 5 at a time.";
- close;
- L_NoZ:
- mes "[Ice Cream Maker]";
- mes "Sorry, but you need more money.";
- close;
- L_End:
- mes "[Ice Cream Maker]";
- mes "Are you sure you don't want any?";
- mes "I won't be selling it for long, and once I run out, there won't be anymore!!!";
- close;
-}
-
-//MORROC FIELD
-moc_fild16.gat,88,304,4 duplicate(IceCreamer) Ice Cream Maker#2 85
-
-//MORROC
-morocc.gat,160,144,4 duplicate(IceCreamer) Ice Cream Maker#3 85
+// $Id: IceCream.txt,v 1.1.1.1 2004/09/10 17:26:42 MagicalTux Exp $ +//===== eAthena Script ======================================= +//= Ice Cream Maker +//===== By: ================================================== +//= KOOK SWU +//===== Current Version: ===================================== +//= 1.1 +//===== Compatible With: ===================================== +//= eAthena 1.0 +//===== Description: ========================================= +//= A man makes you ice-cream +//===== Additional Comments: ================================= +//= 1.1 Optimized, changed overlapping coords in Alberta [Lupus] +//============================================================ + +//ALBERTA +alberta.gat,120,45,2 script Ice Cream Maker::IceCreamer 85,{ + mes "[Ice Cream Maker]"; + mes "Fresh Ice Cream made with snow from Lutie!"; + mes "Enjoy it now, it won't be on sale for long!"; + mes "^0000FF100 Zeny^000000 Ice Cream,"; + mes "Ice Cream!"; + next; + menu "Gimme Ice Cream!",-,"Cancel Trade",L_End; + + mes "[Ice Cream Maker]"; + mes "Fresh Ice Cream made with snow from Lutie!"; + mes "Everyone wants our delicious ice cream, but we have limited amount,"; + mes "so you can only purchase 5 at a time!!"; + next; + input @input; + if(@input<1) goto L_inpC; + if(@input>5) goto L_inpM; + if(Zeny< @input*100) goto L_NoZ; + getitem 536,@input; + set Zeny,Zeny-100*@input; + mes "[Ice Cream Maker]"; + mes "Here you go " +@input+ " Ice Cream for you."; + close; + + L_inpC: + mes "[Ice Cream Maker]"; + mes "Deal is canceled."; + close; + L_inpM: + mes "[Ice Cream Maker]"; + mes "Sorry, but you can only buy 5 at a time."; + close; + L_NoZ: + mes "[Ice Cream Maker]"; + mes "Sorry, but you need more money."; + close; + L_End: + mes "[Ice Cream Maker]"; + mes "Are you sure you don't want any?"; + mes "I won't be selling it for long, and once I run out, there won't be anymore!!!"; + close; +} + +//MORROC FIELD +moc_fild16.gat,88,304,4 duplicate(IceCreamer) Ice Cream Maker#2 85 + +//MORROC +morocc.gat,160,144,4 duplicate(IceCreamer) Ice Cream Maker#3 85 diff --git a/npc/other/Valkyrie.txt b/npc/other/Valkyrie.txt index 82a52a5db..810c75e75 100644 --- a/npc/other/Valkyrie.txt +++ b/npc/other/Valkyrie.txt @@ -1,50 +1,50 @@ -//1.1 label fixed [Lupus]
-
-yuno_in02.gat,93,207,0 script Heaven's Door 111,{
- if (Class < 7) goto L_Can;
- mes "[The writing on the paper]";
- mes "You have found the entrance to the temple.";
- mes "This path is only open to those who are born again.";
- mes "Only heroes can open new paths.";
- next;
- mes "[The writing on the paper]";
- mes "The area for heroes has been completed,";
- mes "You cannot be immortal, but in this land...";
- mes "Heroes are able to.";
- next;
- mes "[The writing on the paper]";
- mes "The area for heroes has been completed,";
- mes "You cannot be immortal, but in this land...";
- mes "Heroes are able to.";
- next;
- menu "Continue reading",-,"Stop reading",L_Can;
- mes "[The writing on the paper]";
- mes "Heaven and the closest palce,";
- mes "In the Valkyrie's temple you shall find the path";
- mes "A normal mortal cannot live for ever.";
- next;
- warp "valkyrie",48,8;
- close;
-L_Can:
- mes "[The writing on the paper]";
- mes "....................";
- close;
-
-}
-
-valkyrie.gat,48,86,6 script Valkyrie 811,{
- if (class > 7) goto L_Rest;
- mes "[Valkyrie]";
- mes "Welcome to Valhalla.";
- mes "But, you have not been invited yet.";
- mes "Leave here without leaving a trace.";
- mes "Glory to the Swordsmans!";
- warp "yuno_in02",93,205;
- close;
-L_Rest:
- mes "[Valkyrie]";
- mes "Welcome to Valhalla.";
- mes "Take plenty of rest while you are here.";
- mes "Honor and glory to the Swordsmans";
- close;
+//1.1 label fixed [Lupus] + +yuno_in02.gat,93,207,0 script Heaven's Door 111,{ + if (Class < 7) goto L_Can; + mes "[The writing on the paper]"; + mes "You have found the entrance to the temple."; + mes "This path is only open to those who are born again."; + mes "Only heroes can open new paths."; + next; + mes "[The writing on the paper]"; + mes "The area for heroes has been completed,"; + mes "You cannot be immortal, but in this land..."; + mes "Heroes are able to."; + next; + mes "[The writing on the paper]"; + mes "The area for heroes has been completed,"; + mes "You cannot be immortal, but in this land..."; + mes "Heroes are able to."; + next; + menu "Continue reading",-,"Stop reading",L_Can; + mes "[The writing on the paper]"; + mes "Heaven and the closest palce,"; + mes "In the Valkyrie's temple you shall find the path"; + mes "A normal mortal cannot live for ever."; + next; + warp "valkyrie",48,8; + close; +L_Can: + mes "[The writing on the paper]"; + mes "...................."; + close; + +} + +valkyrie.gat,48,86,6 script Valkyrie 811,{ + if (class > 7) goto L_Rest; + mes "[Valkyrie]"; + mes "Welcome to Valhalla."; + mes "But, you have not been invited yet."; + mes "Leave here without leaving a trace."; + mes "Glory to the Swordsmans!"; + warp "yuno_in02",93,205; + close; +L_Rest: + mes "[Valkyrie]"; + mes "Welcome to Valhalla."; + mes "Take plenty of rest while you are here."; + mes "Honor and glory to the Swordsmans"; + close; }
\ No newline at end of file diff --git a/npc/other/arena.txt b/npc/other/arena.txt index 38436d8ba..fb5414406 100644 --- a/npc/other/arena.txt +++ b/npc/other/arena.txt @@ -1,568 +1,568 @@ -// ------------------------------------------------------------------
-// Setup Of Arena
-// ------------------------------------------------------------------
-
-// The following maps are used
-//map: prontera.gat
-//map: prt_are_in.gat
-//map: force_1-1.gat
-
-// Disallow Teleport, etc.
-force_1-1.gat mapflag pvp dummy
-force_1-2.gat mapflag pvp dummy
-force_1-3.gat mapflag pvp dummy
-force_2-1.gat mapflag pvp dummy
-force_2-2.gat mapflag pvp dummy
-force_2-3.gat mapflag pvp dummy
-force_3-1.gat mapflag pvp dummy
-force_3-2.gat mapflag pvp dummy
-force_3-3.gat mapflag pvp dummy
-prt_are_in.gat mapflag nomemo dummy
-prt_are_in.gat mapflag noteleport dummy
-prt_are_in.gat mapflag nosave prontera.gat,156,191
-force_1-1.gat mapflag nomemo dummy
-force_1-1.gat mapflag noteleport dummy
-force_1-1.gat mapflag nosave prontera.gat,156,191
-
-// An entrance is placed in Prontera.
-prontera.gat,160,185,3 script Arena Entrance 116,{
- mes "Want to go to the arena?";
- next;
- menu "Let's go!",L_GOARENA,"Nah..",L_YAME;
-L_GOARENA:
- warp "prt_are_in.gat",31,82;
- close;
-L_YAME:
- close;
-}
-
-// Teleport from waiting room to ready room
-prt_are_in.gat,29,79,0 script Time Attack 116,{
- if( getmapusers("force_1-1.gat")>0 ) goto L_WAIT;
-
- mes "This is the Time Attack selection.";
- mes "Please choose your challenge.";
- menu "Level 1 - 5 Porings, 30 secs!",L_GOLV1,"Level 2 - 7 Roda Frogs, 60 secs!",L_GOLV2,"Level 3 - 9 PecoPecos, 100 secs!",L_GOLV3,"Never mind.",L_YAME;
-L_GOLV1:
- if( getmapusers("force_1-1.gat")>0 ) goto L_WAIT;
- disablenpc "fc103-1";
- disablenpc "fc105";
- disablenpc "fc107";
- addtimer 5000,"arenalv1st";
- warp "force_1-1.gat",99,12;
- break;
-L_GOLV2:
- if( getmapusers("force_1-1.gat")>0 ) goto L_WAIT;
- disablenpc "fc103-1";
- disablenpc "fc105";
- disablenpc "fc107";
- addtimer 5000,"arenalv2st";
- warp "force_1-1.gat",99,12;
- break;
-L_GOLV3:
- if( getmapusers("force_1-1.gat")>0 ) goto L_WAIT;
- disablenpc "fc103-1";
- disablenpc "fc105";
- disablenpc "fc107";
- addtimer 5000,"arenalv3st";
- warp "force_1-1.gat",99,12;
- break;
-L_WAIT:
- mes "Since the arena is in use,";
- mes "please wait for a while.";
-L_YAME:
- close;
-}
-
-
-// Ready room (10-second preparation)
-force_1-1.gat,99,12,0 script arenalv1st -1,{
- announce "It will begin in 10 seconds!",3;
- addtimer 10000,"arenalv1fgt";
-}
-force_1-1.gat,99,12,0 script arenalv2st -1,{
- announce "It will begin in 10 seconds!",3;
- addtimer 10000,"arenalv2fgt";
-}
-force_1-1.gat,99,12,0 script arenalv3st -1,{
- announce "It will begin in 10 seconds!",3;
- addtimer 10000,"arenalv3fgt";
-}
-
-
-// Transmission to the room, and mob organization
-//Time Attack Level 1
-force_1-1.gat,99,12,0 script arenalv1fgt -1,{
- killmonster "force_1-1.gat","arenalv1mon";
- killmonster "force_1-1.gat","arenalv2mon";
- killmonster "force_1-1.gat","arenalv3mon";
- monster "force_1-1.gat",25,25,"Arena Enemy",1002,1,"arenalv1mon";
- monster "force_1-1.gat",20,25,"Arena Enemy",1002,1,"arenalv1mon";
- monster "force_1-1.gat",25,20,"Arena Enemy",1002,1,"arenalv1mon";
- monster "force_1-1.gat",30,25,"Arena Enemy",1002,1,"arenalv1mon";
- monster "force_1-1.gat",25,30,"Arena Enemy",1002,1,"arenalv1mon";
- set $arena00,5;
- disablenpc "fc101";
- disablenpc "fc103";
- warp "force_1-1.gat",25,26;
- enablenpc "fc103-1";
- enablenpc "fc105";
- enablenpc "fc107";
- announce "Do it within 30 seconds!",19;
- addtimer 30000,"arenalv1fail";
- addtimer 20000,"tensecsleft";
-}
-
-//Time Attack Level 2
-force_1-1.gat,99,12,0 script arenalv2fgt -1,{
- killmonster "force_1-1.gat","arenalv1mon";
- killmonster "force_1-1.gat","arenalv2mon";
- killmonster "force_1-1.gat","arenalv3mon";
- monster "force_1-1.gat",20,20,"Arena Enemy",1012,1,"arenalv2mon";
- monster "force_1-1.gat",20,25,"Arena Enemy",1012,1,"arenalv2mon";
- monster "force_1-1.gat",20,30,"Arena Enemy",1012,1,"arenalv2mon";
- monster "force_1-1.gat",30,20,"Arena Enemy",1012,1,"arenalv2mon";
- monster "force_1-1.gat",30,25,"Arena Enemy",1012,1,"arenalv2mon";
- monster "force_1-1.gat",30,30,"Arena Enemy",1012,1,"arenalv2mon";
- monster "force_1-1.gat",25,30,"Arena Enemy",1012,1,"arenalv2mon";
- monster "force_1-1.gat",25,20,"Arena Enemy",1012,1,"arenalv2mon";
- set $arena00,7;
- disablenpc "fc101";
- disablenpc "fc103";
- warp "force_1-1.gat",25,26;
- enablenpc "fc103-1";
- enablenpc "fc105";
- enablenpc "fc107";
- announce "You have 60 seconds to destroy all seven!",19;
- addtimer 60000,"arenalv2fail";
- addtimer 50000,"tensecsleft";
-}
-
-//Time Attack Level 3
-force_1-1.gat,99,12,0 script arenalv3fgt -1,{
- killmonster "force_1-1.gat","arenalv1mon";
- killmonster "force_1-1.gat","arenalv2mon";
- killmonster "force_1-1.gat","arenalv3mon";
- monster "force_1-1.gat",20,20,"Arena Enemy",1019,1,"arenalv3mon";
- monster "force_1-1.gat",20,25,"Arena Enemy",1019,1,"arenalv3mon";
- monster "force_1-1.gat",20,30,"Arena Enemy",1019,1,"arenalv3mon";
- monster "force_1-1.gat",30,20,"Arena Enemy",1019,1,"arenalv3mon";
- monster "force_1-1.gat",30,25,"Arena Enemy",1019,1,"arenalv3mon";
- monster "force_1-1.gat",30,30,"Arena Enemy",1019,1,"arenalv3mon";
- monster "force_1-1.gat",25,30,"Arena Enemy",1019,1,"arenalv3mon";
- monster "force_1-1.gat",25,25,"Arena Enemy",1019,1,"arenalv3mon";
- monster "force_1-1.gat",25,20,"Arena Enemy",1019,1,"arenalv3mon";
- monster "force_1-1.gat",20,35,"Arena Enemy",1019,1,"arenalv3mon";
- set $arena00,9;
- disablenpc "fc101";
- disablenpc "fc103";
- warp "force_1-1.gat",25,26;
- enablenpc "fc103-1";
- enablenpc "fc105";
- enablenpc "fc107";
- announce "You have 90 seconds to destroy all nine!",19;
- addtimer 90000,"arenalv3fail";
- addtimer 80000,"tensecsleft";
-}
-
-// Pushed-down Processing
-//Time Attack Level 1
-force_1-1.gat,25,26,0 script arenalv1mon -1,{
- set $arena00, $arena00 - 1;
- if( $arena00 > 0 ) goto L_CONT;
- deltimer "arenaev8000";
- announce "Crash!!",3;
- enablenpc "fc101";
- enablenpc "fc103";
- areaannounce "force_1-1.gat",0,0,350,350,
- "You cleared Time Attack Level 1.",0;
- areaannounce "prt_are_in.gat",0,0,350,350,
- strcharinfo(0) + " cleared Time Attack Level 1.",0;
- areaannounce "prontera.gat",0,0,350,350,
- strcharinfo(0) + " cleared Time Attack Level 1.",0;
- areaannounce "morocc.gat",0,0,350,350,
- strcharinfo(0) + " cleared Time Attack Level 1.",0;
- areaannounce "geffen.gat",0,0,350,350,
- strcharinfo(0) + " cleared Time Attack Level 1.",0;
- areaannounce "payon.gat",0,0,350,350,
- strcharinfo(0) + " cleared Time Attack Level 1.",0;
- areaannounce "alberta.gat",0,0,350,350,
- strcharinfo(0) + " cleared Time Attack Level 1.",0;
- areaannounce "izlude.gat",0,0,350,350,
- strcharinfo(0) + " cleared Time Attack Level 1.",0;
- areaannounce "aldebaran.gat",0,0,350,350,
- strcharinfo(0) + " cleared Time Attack Level 1.",0;
- areaannounce "prt_are_in.gat",0,0,350,350,
- strcharinfo(0) + " cleared Time Attack Level 1.",0;
- areaannounce "xmas.gat",0,0,350,350,
- strcharinfo(0) + " cleared Time Attack Level 1.",0;
- areaannounce "comodo.gat",0,0,350,350,
- strcharinfo(0) + " cleared Time Attack Level 1.",0;
- areaannounce "prt_gld.gat",0,0,350,350,
- strcharinfo(0) + " cleared Time Attack Level 1.",0;
- areaannounce "prtg_cas01.gat",0,0,350,350,
- strcharinfo(0) + " cleared Time Attack Level 1.",0;
- areaannounce "prtg_cas02.gat",0,0,350,350,
- strcharinfo(0) + " cleared Time Attack Level 1.",0;
- areaannounce "prtg_cas03.gat",0,0,350,350,
- strcharinfo(0) + " cleared Time Attack Level 1.",0;
- areaannounce "prtg_cas04.gat",0,0,350,350,
- strcharinfo(0) + " cleared Time Attack Level 1.",0;
- areaannounce "prtg_cas05.gat",0,0,350,350,
- strcharinfo(0) + " cleared Time Attack Level 1.",0;
- areaannounce "pay_gld.gat",0,0,350,350,
- strcharinfo(0) + " cleared Time Attack Level 1.",0;
- areaannounce "payg_cas01.gat",0,0,350,350,
- strcharinfo(0) + " cleared Time Attack Level 1.",0;
- areaannounce "payg_cas02.gat",0,0,350,350,
- strcharinfo(0) + " cleared Time Attack Level 1.",0;
- areaannounce "payg_cas03.gat",0,0,350,350,
- strcharinfo(0) + " cleared Time Attack Level 1.",0;
- areaannounce "payg_cas04.gat",0,0,350,350,
- strcharinfo(0) + " cleared Time Attack Level 1.",0;
- areaannounce "payg_cas05.gat",0,0,350,350,
- strcharinfo(0) + " cleared Time Attack Level 1.",0;
- areaannounce "yuno.gat",0,0,350,350,
- strcharinfo(0) + " cleared Time Attack Level 1.",0;
- areaannounce "amatsu.gat",0,0,350,350,
- strcharinfo(0) + " cleared Time Attack Level 1.",0;
- areaannounce "gonryun.gat",0,0,350,350,
- strcharinfo(0) + " cleared Time Attack Level 1.",0;
- addtimer 5000,"arenareturn";
-L_CONT:
- break;
-}
-
-force_1-1.gat,25,26,0 script arenalv2mon -1,{
- set $arena00, $arena00 - 1;
- if( $arena00 > 0 ) goto L_CONT;
- deltimer "arenaev8000";
- announce "Crash!!",3;
- enablenpc "fc101";
- enablenpc "fc103";
- areaannounce "force_1-1.gat",0,0,350,350,
- "You cleared Time Attack Level 2.",0;
- areaannounce "prt_are_in.gat",0,0,350,350,
- strcharinfo(0) + " cleared Time Attack Level 2.",0;
- areaannounce "prontera.gat",0,0,350,350,
- strcharinfo(0) + " cleared Time Attack Level 2.",0;
- areaannounce "morocc.gat",0,0,350,350,
- strcharinfo(0) + " cleared Time Attack Level 2.",0;
- areaannounce "geffen.gat",0,0,350,350,
- strcharinfo(0) + " cleared Time Attack Level 2.",0;
- areaannounce "payon.gat",0,0,350,350,
- strcharinfo(0) + " cleared Time Attack Level 2.",0;
- areaannounce "alberta.gat",0,0,350,350,
- strcharinfo(0) + " cleared Time Attack Level 2.",0;
- areaannounce "izlude.gat",0,0,350,350,
- strcharinfo(0) + " cleared Time Attack Level 2.",0;
- areaannounce "aldebaran.gat",0,0,350,350,
- strcharinfo(0) + " cleared Time Attack Level 2.",0;
- areaannounce "prt_are_in.gat",0,0,350,350,
- strcharinfo(0) + " cleared Time Attack Level 2.",0;
- areaannounce "xmas.gat",0,0,350,350,
- strcharinfo(0) + " cleared Time Attack Level 2.",0;
- areaannounce "comodo.gat",0,0,350,350,
- strcharinfo(0) + " cleared Time Attack Level 2.",0;
- areaannounce "prt_gld.gat",0,0,350,350,
- strcharinfo(0) + " cleared Time Attack Level 2.",0;
- areaannounce "prtg_cas01.gat",0,0,350,350,
- strcharinfo(0) + " cleared Time Attack Level 2.",0;
- areaannounce "prtg_cas02.gat",0,0,350,350,
- strcharinfo(0) + " cleared Time Attack Level 2.",0;
- areaannounce "prtg_cas03.gat",0,0,350,350,
- strcharinfo(0) + " cleared Time Attack Level 2.",0;
- areaannounce "prtg_cas04.gat",0,0,350,350,
- strcharinfo(0) + " cleared Time Attack Level 2.",0;
- areaannounce "prtg_cas05.gat",0,0,350,350,
- strcharinfo(0) + " cleared Time Attack Level 2.",0;
- areaannounce "pay_gld.gat",0,0,350,350,
- strcharinfo(0) + " cleared Time Attack Level 2.",0;
- areaannounce "payg_cas01.gat",0,0,350,350,
- strcharinfo(0) + " cleared Time Attack Level 2.",0;
- areaannounce "payg_cas02.gat",0,0,350,350,
- strcharinfo(0) + " cleared Time Attack Level 2.",0;
- areaannounce "payg_cas03.gat",0,0,350,350,
- strcharinfo(0) + " cleared Time Attack Level 2.",0;
- areaannounce "payg_cas04.gat",0,0,350,350,
- strcharinfo(0) + " cleared Time Attack Level 2.",0;
- areaannounce "payg_cas05.gat",0,0,350,350,
- strcharinfo(0) + " cleared Time Attack Level 2.",0;
- areaannounce "yuno.gat",0,0,350,350,
- strcharinfo(0) + " cleared Time Attack Level 2.",0;
- areaannounce "amatsu.gat",0,0,350,350,
- strcharinfo(0) + " cleared Time Attack Level 2.",0;
- areaannounce "gonryun.gat",0,0,350,350,
- strcharinfo(0) + " cleared Time Attack Level 2.",0;
- addtimer 5000,"arenareturn";
-L_CONT:
- break;
-}
-
-
-force_1-1.gat,25,26,0 script arenalv3mon -1,{
- set $arena00, $arena00 - 1;
- if( $arena00 > 0 ) goto L_CONT;
- deltimer "arenaev8000";
- announce "Crash!!",3;
- enablenpc "fc101";
- enablenpc "fc103";
- areaannounce "force_1-1.gat",0,0,350,350,
- "You cleared Time Attack Level 3.",0;
- areaannounce "prt_are_in.gat",0,0,350,350,
- strcharinfo(0) + " cleared Time Attack Level 3.",0;
- areaannounce "prontera.gat",0,0,350,350,
- strcharinfo(0) + " cleared Time Attack Level 3.",0;
- areaannounce "morocc.gat",0,0,350,350,
- strcharinfo(0) + " cleared Time Attack Level 3.",0;
- areaannounce "geffen.gat",0,0,350,350,
- strcharinfo(0) + " cleared Time Attack Level 3.",0;
- areaannounce "payon.gat",0,0,350,350,
- strcharinfo(0) + " cleared Time Attack Level 3.",0;
- areaannounce "alberta.gat",0,0,350,350,
- strcharinfo(0) + " cleared Time Attack Level 3.",0;
- areaannounce "izlude.gat",0,0,350,350,
- strcharinfo(0) + " cleared Time Attack Level 3.",0;
- areaannounce "aldebaran.gat",0,0,350,350,
- strcharinfo(0) + " cleared Time Attack Level 3.",0;
- areaannounce "prt_are_in.gat",0,0,350,350,
- strcharinfo(0) + " cleared Time Attack Level 3.",0;
- areaannounce "xmas.gat",0,0,350,350,
- strcharinfo(0) + " cleared Time Attack Level 3.",0;
- areaannounce "comodo.gat",0,0,350,350,
- strcharinfo(0) + " cleared Time Attack Level 3.",0;
- areaannounce "prt_gld.gat",0,0,350,350,
- strcharinfo(0) + " cleared Time Attack Level 3.",0;
- areaannounce "prtg_cas01.gat",0,0,350,350,
- strcharinfo(0) + " cleared Time Attack Level 3.",0;
- areaannounce "prtg_cas02.gat",0,0,350,350,
- strcharinfo(0) + " cleared Time Attack Level 3.",0;
- areaannounce "prtg_cas03.gat",0,0,350,350,
- strcharinfo(0) + " cleared Time Attack Level 3.",0;
- areaannounce "prtg_cas04.gat",0,0,350,350,
- strcharinfo(0) + " cleared Time Attack Level 3.",0;
- areaannounce "prtg_cas05.gat",0,0,350,350,
- strcharinfo(0) + " cleared Time Attack Level 3.",0;
- areaannounce "pay_gld.gat",0,0,350,350,
- strcharinfo(0) + " cleared Time Attack Level 3.",0;
- areaannounce "payg_cas01.gat",0,0,350,350,
- strcharinfo(0) + " cleared Time Attack Level 3.",0;
- areaannounce "payg_cas02.gat",0,0,350,350,
- strcharinfo(0) + " cleared Time Attack Level 3.",0;
- areaannounce "payg_cas03.gat",0,0,350,350,
- strcharinfo(0) + " cleared Time Attack Level 3.",0;
- areaannounce "payg_cas04.gat",0,0,350,350,
- strcharinfo(0) + " cleared Time Attack Level 3.",0;
- areaannounce "payg_cas05.gat",0,0,350,350,
- strcharinfo(0) + " cleared Time Attack Level 3.",0;
- areaannounce "yuno.gat",0,0,350,350,
- strcharinfo(0) + " cleared Time Attack Level 3.",0;
- areaannounce "amatsu.gat",0,0,350,350,
- strcharinfo(0) + " cleared Time Attack Level 3.",0;
- areaannounce "gonryun.gat",0,0,350,350,
- strcharinfo(0) + " cleared Time Attack Level 3.",0;
- addtimer 5000,"arenareturn";
-L_CONT:
- break;
-}
-
-// Timeout
-force_1-1.gat,25,26,0 script arenalv1fail -1,{
- set $arena00,99;
- killmonster "force_1-1.gat","arenalv1mon";
- killmonster "force_1-1.gat","arenalv2mon";
- killmonster "force_1-1.gat","arenalv3mon";
- announce "Time Over!!",3;
- areaannounce "force_1-1.gat",0,0,350,350,
- "You failed Time Attack Level 1.",0;
- areaannounce "prt_are_in.gat",0,0,350,350,
- strcharinfo(0) + " failed Time Attack Level 1.",0;
- areaannounce "prontera.gat",0,0,350,350,
- strcharinfo(0) + " failed Time Attack Level 1.",0;
- areaannounce "morocc.gat",0,0,350,350,
- strcharinfo(0) + " failed Time Attack Level 1.",0;
- areaannounce "geffen.gat",0,0,350,350,
- strcharinfo(0) + " failed Time Attack Level 1.",0;
- areaannounce "payon.gat",0,0,350,350,
- strcharinfo(0) + " failed Time Attack Level 1.",0;
- areaannounce "alberta.gat",0,0,350,350,
- strcharinfo(0) + " failed Time Attack Level 1.",0;
- areaannounce "izlude.gat",0,0,350,350,
- strcharinfo(0) + " failed Time Attack Level 1.",0;
- areaannounce "aldebaran.gat",0,0,350,350,
- strcharinfo(0) + " failed Time Attack Level 1.",0;
- areaannounce "prt_are_in.gat",0,0,350,350,
- strcharinfo(0) + " failed Time Attack Level 1.",0;
- areaannounce "xmas.gat",0,0,350,350,
- strcharinfo(0) + " failed Time Attack Level 1.",0;
- areaannounce "comodo.gat",0,0,350,350,
- strcharinfo(0) + " failed Time Attack Level 1.",0;
- areaannounce "prt_gld.gat",0,0,350,350,
- strcharinfo(0) + " failed Time Attack Level 1.",0;
- areaannounce "prtg_cas01.gat",0,0,350,350,
- strcharinfo(0) + " failed Time Attack Level 1.",0;
- areaannounce "prtg_cas02.gat",0,0,350,350,
- strcharinfo(0) + " failed Time Attack Level 1.",0;
- areaannounce "prtg_cas03.gat",0,0,350,350,
- strcharinfo(0) + " failed Time Attack Level 1.",0;
- areaannounce "prtg_cas04.gat",0,0,350,350,
- strcharinfo(0) + " failed Time Attack Level 1.",0;
- areaannounce "prtg_cas05.gat",0,0,350,350,
- strcharinfo(0) + " failed Time Attack Level 1.",0;
- areaannounce "pay_gld.gat",0,0,350,350,
- strcharinfo(0) + " failed Time Attack Level 1.",0;
- areaannounce "payg_cas01.gat",0,0,350,350,
- strcharinfo(0) + " failed Time Attack Level 1.",0;
- areaannounce "payg_cas02.gat",0,0,350,350,
- strcharinfo(0) + " failed Time Attack Level 1.",0;
- areaannounce "payg_cas03.gat",0,0,350,350,
- strcharinfo(0) + " failed Time Attack Level 1.",0;
- areaannounce "payg_cas04.gat",0,0,350,350,
- strcharinfo(0) + " failed Time Attack Level 1.",0;
- areaannounce "payg_cas05.gat",0,0,350,350,
- strcharinfo(0) + " failed Time Attack Level 1.",0;
- areaannounce "yuno.gat",0,0,350,350,
- strcharinfo(0) + " failed Time Attack Level 1.",0;
- areaannounce "amatsu.gat",0,0,350,350,
- strcharinfo(0) + " failed Time Attack Level 1.",0;
- areaannounce "gonryun",0,0,350,350,
- strcharinfo(0) + " failed Time Attack Level 1.",0;
- addtimer 5000,"arenareturn";
-}
-
-force_1-1.gat,25,26,0 script arenalv2fail -1,{
- set $arena00,99;
- killmonster "force_1-1.gat","arenalv1mon";
- killmonster "force_1-1.gat","arenalv2mon";
- killmonster "force_1-1.gat","arenalv3mon";
- announce "Time Over!!",3;
- areaannounce "force_1-1.gat",0,0,350,350,
- "You failed Time Attack Level 2.",0;
- areaannounce "prt_are_in.gat",0,0,350,350,
- strcharinfo(0) + " failed Time Attack Level 2.",0;
- areaannounce "prontera.gat",0,0,350,350,
- strcharinfo(0) + " failed Time Attack Level 2.",0;
- areaannounce "morocc.gat",0,0,350,350,
- strcharinfo(0) + " failed Time Attack Level 2.",0;
- areaannounce "geffen.gat",0,0,350,350,
- strcharinfo(0) + " failed Time Attack Level 2.",0;
- areaannounce "payon.gat",0,0,350,350,
- strcharinfo(0) + " failed Time Attack Level 2.",0;
- areaannounce "alberta.gat",0,0,350,350,
- strcharinfo(0) + " failed Time Attack Level 2.",0;
- areaannounce "izlude.gat",0,0,350,350,
- strcharinfo(0) + " failed Time Attack Level 2.",0;
- areaannounce "aldebaran.gat",0,0,350,350,
- strcharinfo(0) + " failed Time Attack Level 2.",0;
- areaannounce "prt_are_in.gat",0,0,350,350,
- strcharinfo(0) + " failed Time Attack Level 2.",0;
- areaannounce "xmas.gat",0,0,350,350,
- strcharinfo(0) + " failed Time Attack Level 2.",0;
- areaannounce "comodo.gat",0,0,350,350,
- strcharinfo(0) + " failed Time Attack Level 2.",0;
- areaannounce "prt_gld.gat",0,0,350,350,
- strcharinfo(0) + " failed Time Attack Level 2.",0;
- areaannounce "prtg_cas01.gat",0,0,350,350,
- strcharinfo(0) + " failed Time Attack Level 2.",0;
- areaannounce "prtg_cas02.gat",0,0,350,350,
- strcharinfo(0) + " failed Time Attack Level 2.",0;
- areaannounce "prtg_cas03.gat",0,0,350,350,
- strcharinfo(0) + " failed Time Attack Level 2.",0;
- areaannounce "prtg_cas04.gat",0,0,350,350,
- strcharinfo(0) + " failed Time Attack Level 2.",0;
- areaannounce "prtg_cas05.gat",0,0,350,350,
- strcharinfo(0) + " failed Time Attack Level 2.",0;
- areaannounce "pay_gld.gat",0,0,350,350,
- strcharinfo(0) + " failed Time Attack Level 2.",0;
- areaannounce "payg_cas01.gat",0,0,350,350,
- strcharinfo(0) + " failed Time Attack Level 2.",0;
- areaannounce "payg_cas02.gat",0,0,350,350,
- strcharinfo(0) + " failed Time Attack Level 2.",0;
- areaannounce "payg_cas03.gat",0,0,350,350,
- strcharinfo(0) + " failed Time Attack Level 2.",0;
- areaannounce "payg_cas04.gat",0,0,350,350,
- strcharinfo(0) + " failed Time Attack Level 2.",0;
- areaannounce "payg_cas05.gat",0,0,350,350,
- strcharinfo(0) + " failed Time Attack Level 2.",0;
- areaannounce "yuno.gat",0,0,350,350,
- strcharinfo(0) + " failed Time Attack Level 2.",0;
- areaannounce "amatsu.gat",0,0,350,350,
- strcharinfo(0) + " failed Time Attack Level 2.",0;
- areaannounce "gonryun",0,0,350,350,
- strcharinfo(0) + " failed Time Attack Level 2.",0;
- addtimer 5000,"arenareturn";
-}
-
-force_1-1.gat,25,26,0 script arenalv3fail -1,{
- set $arena00,99;
- killmonster "force_1-1.gat","arenalv1mon";
- killmonster "force_1-1.gat","arenalv2mon";
- killmonster "force_1-1.gat","arenalv3mon";
- announce "Time Over!!",3;
- areaannounce "force_1-1.gat",0,0,350,350,
- "You failed Time Attack Level 2.",0;
- areaannounce "prt_are_in.gat",0,0,350,350,
- strcharinfo(0) + " failed Time Attack Level 3.",0;
- areaannounce "prontera.gat",0,0,350,350,
- strcharinfo(0) + " failed Time Attack Level 3.",0;
- areaannounce "morocc.gat",0,0,350,350,
- strcharinfo(0) + " failed Time Attack Level 3.",0;
- areaannounce "geffen.gat",0,0,350,350,
- strcharinfo(0) + " failed Time Attack Level 3.",0;
- areaannounce "payon.gat",0,0,350,350,
- strcharinfo(0) + " failed Time Attack Level 3.",0;
- areaannounce "alberta.gat",0,0,350,350,
- strcharinfo(0) + " failed Time Attack Level 3.",0;
- areaannounce "izlude.gat",0,0,350,350,
- strcharinfo(0) + " failed Time Attack Level 3.",0;
- areaannounce "aldebaran.gat",0,0,350,350,
- strcharinfo(0) + " failed Time Attack Level 3.",0;
- areaannounce "prt_are_in.gat",0,0,350,350,
- strcharinfo(0) + " failed Time Attack Level 3.",0;
- areaannounce "xmas.gat",0,0,350,350,
- strcharinfo(0) + " failed Time Attack Level 3.",0;
- areaannounce "comodo.gat",0,0,350,350,
- strcharinfo(0) + " failed Time Attack Level 3.",0;
- areaannounce "prt_gld.gat",0,0,350,350,
- strcharinfo(0) + " failed Time Attack Level 3.",0;
- areaannounce "prtg_cas01.gat",0,0,350,350,
- strcharinfo(0) + " failed Time Attack Level 3.",0;
- areaannounce "prtg_cas02.gat",0,0,350,350,
- strcharinfo(0) + " failed Time Attack Level 3.",0;
- areaannounce "prtg_cas03.gat",0,0,350,350,
- strcharinfo(0) + " failed Time Attack Level 3.",0;
- areaannounce "prtg_cas04.gat",0,0,350,350,
- strcharinfo(0) + " failed Time Attack Level 3.",0;
- areaannounce "prtg_cas05.gat",0,0,350,350,
- strcharinfo(0) + " failed Time Attack Level 3.",0;
- areaannounce "pay_gld.gat",0,0,350,350,
- strcharinfo(0) + " failed Time Attack Level 3.",0;
- areaannounce "payg_cas01.gat",0,0,350,350,
- strcharinfo(0) + " failed Time Attack Level 3.",0;
- areaannounce "payg_cas02.gat",0,0,350,350,
- strcharinfo(0) + " failed Time Attack Level 3.",0;
- areaannounce "payg_cas03.gat",0,0,350,350,
- strcharinfo(0) + " failed Time Attack Level 3.",0;
- areaannounce "payg_cas04.gat",0,0,350,350,
- strcharinfo(0) + " failed Time Attack Level 3.",0;
- areaannounce "payg_cas05.gat",0,0,350,350,
- strcharinfo(0) + " failed Time Attack Level 3.",0;
- areaannounce "yuno.gat",0,0,350,350,
- strcharinfo(0) + " failed Time Attack Level 3.",0;
- areaannounce "amatsu.gat",0,0,350,350,
- strcharinfo(0) + " failed Time Attack Level 3.",0;
- areaannounce "gonryun",0,0,350,350,
- strcharinfo(0) + " failed Time Attack Level 3.",0;
- addtimer 5000,"arenareturn";
-}
-
-// Reminding the player of time constraints.
-force_1-1.gat,25,26,0 script tensecsleft -1,{
- announce "Ten seconds remaining!",3;
-}
-
-
-// Return to Prontera
-force_1-1.gat,25,26,0 script arenareturn -1,{
- warp "prontera.gat",156,191;
+// ------------------------------------------------------------------ +// Setup Of Arena +// ------------------------------------------------------------------ + +// The following maps are used +//map: prontera.gat +//map: prt_are_in.gat +//map: force_1-1.gat + +// Disallow Teleport, etc. +force_1-1.gat mapflag pvp dummy +force_1-2.gat mapflag pvp dummy +force_1-3.gat mapflag pvp dummy +force_2-1.gat mapflag pvp dummy +force_2-2.gat mapflag pvp dummy +force_2-3.gat mapflag pvp dummy +force_3-1.gat mapflag pvp dummy +force_3-2.gat mapflag pvp dummy +force_3-3.gat mapflag pvp dummy +prt_are_in.gat mapflag nomemo dummy +prt_are_in.gat mapflag noteleport dummy +prt_are_in.gat mapflag nosave prontera.gat,156,191 +force_1-1.gat mapflag nomemo dummy +force_1-1.gat mapflag noteleport dummy +force_1-1.gat mapflag nosave prontera.gat,156,191 + +// An entrance is placed in Prontera. +prontera.gat,160,185,3 script Arena Entrance 116,{ + mes "Want to go to the arena?"; + next; + menu "Let's go!",L_GOARENA,"Nah..",L_YAME; +L_GOARENA: + warp "prt_are_in.gat",31,82; + close; +L_YAME: + close; +} + +// Teleport from waiting room to ready room +prt_are_in.gat,29,79,0 script Time Attack 116,{ + if( getmapusers("force_1-1.gat")>0 ) goto L_WAIT; + + mes "This is the Time Attack selection."; + mes "Please choose your challenge."; + menu "Level 1 - 5 Porings, 30 secs!",L_GOLV1,"Level 2 - 7 Roda Frogs, 60 secs!",L_GOLV2,"Level 3 - 9 PecoPecos, 100 secs!",L_GOLV3,"Never mind.",L_YAME; +L_GOLV1: + if( getmapusers("force_1-1.gat")>0 ) goto L_WAIT; + disablenpc "fc103-1"; + disablenpc "fc105"; + disablenpc "fc107"; + addtimer 5000,"arenalv1st"; + warp "force_1-1.gat",99,12; + break; +L_GOLV2: + if( getmapusers("force_1-1.gat")>0 ) goto L_WAIT; + disablenpc "fc103-1"; + disablenpc "fc105"; + disablenpc "fc107"; + addtimer 5000,"arenalv2st"; + warp "force_1-1.gat",99,12; + break; +L_GOLV3: + if( getmapusers("force_1-1.gat")>0 ) goto L_WAIT; + disablenpc "fc103-1"; + disablenpc "fc105"; + disablenpc "fc107"; + addtimer 5000,"arenalv3st"; + warp "force_1-1.gat",99,12; + break; +L_WAIT: + mes "Since the arena is in use,"; + mes "please wait for a while."; +L_YAME: + close; +} + + +// Ready room (10-second preparation) +force_1-1.gat,99,12,0 script arenalv1st -1,{ + announce "It will begin in 10 seconds!",3; + addtimer 10000,"arenalv1fgt"; +} +force_1-1.gat,99,12,0 script arenalv2st -1,{ + announce "It will begin in 10 seconds!",3; + addtimer 10000,"arenalv2fgt"; +} +force_1-1.gat,99,12,0 script arenalv3st -1,{ + announce "It will begin in 10 seconds!",3; + addtimer 10000,"arenalv3fgt"; +} + + +// Transmission to the room, and mob organization +//Time Attack Level 1 +force_1-1.gat,99,12,0 script arenalv1fgt -1,{ + killmonster "force_1-1.gat","arenalv1mon"; + killmonster "force_1-1.gat","arenalv2mon"; + killmonster "force_1-1.gat","arenalv3mon"; + monster "force_1-1.gat",25,25,"Arena Enemy",1002,1,"arenalv1mon"; + monster "force_1-1.gat",20,25,"Arena Enemy",1002,1,"arenalv1mon"; + monster "force_1-1.gat",25,20,"Arena Enemy",1002,1,"arenalv1mon"; + monster "force_1-1.gat",30,25,"Arena Enemy",1002,1,"arenalv1mon"; + monster "force_1-1.gat",25,30,"Arena Enemy",1002,1,"arenalv1mon"; + set $arena00,5; + disablenpc "fc101"; + disablenpc "fc103"; + warp "force_1-1.gat",25,26; + enablenpc "fc103-1"; + enablenpc "fc105"; + enablenpc "fc107"; + announce "Do it within 30 seconds!",19; + addtimer 30000,"arenalv1fail"; + addtimer 20000,"tensecsleft"; +} + +//Time Attack Level 2 +force_1-1.gat,99,12,0 script arenalv2fgt -1,{ + killmonster "force_1-1.gat","arenalv1mon"; + killmonster "force_1-1.gat","arenalv2mon"; + killmonster "force_1-1.gat","arenalv3mon"; + monster "force_1-1.gat",20,20,"Arena Enemy",1012,1,"arenalv2mon"; + monster "force_1-1.gat",20,25,"Arena Enemy",1012,1,"arenalv2mon"; + monster "force_1-1.gat",20,30,"Arena Enemy",1012,1,"arenalv2mon"; + monster "force_1-1.gat",30,20,"Arena Enemy",1012,1,"arenalv2mon"; + monster "force_1-1.gat",30,25,"Arena Enemy",1012,1,"arenalv2mon"; + monster "force_1-1.gat",30,30,"Arena Enemy",1012,1,"arenalv2mon"; + monster "force_1-1.gat",25,30,"Arena Enemy",1012,1,"arenalv2mon"; + monster "force_1-1.gat",25,20,"Arena Enemy",1012,1,"arenalv2mon"; + set $arena00,7; + disablenpc "fc101"; + disablenpc "fc103"; + warp "force_1-1.gat",25,26; + enablenpc "fc103-1"; + enablenpc "fc105"; + enablenpc "fc107"; + announce "You have 60 seconds to destroy all seven!",19; + addtimer 60000,"arenalv2fail"; + addtimer 50000,"tensecsleft"; +} + +//Time Attack Level 3 +force_1-1.gat,99,12,0 script arenalv3fgt -1,{ + killmonster "force_1-1.gat","arenalv1mon"; + killmonster "force_1-1.gat","arenalv2mon"; + killmonster "force_1-1.gat","arenalv3mon"; + monster "force_1-1.gat",20,20,"Arena Enemy",1019,1,"arenalv3mon"; + monster "force_1-1.gat",20,25,"Arena Enemy",1019,1,"arenalv3mon"; + monster "force_1-1.gat",20,30,"Arena Enemy",1019,1,"arenalv3mon"; + monster "force_1-1.gat",30,20,"Arena Enemy",1019,1,"arenalv3mon"; + monster "force_1-1.gat",30,25,"Arena Enemy",1019,1,"arenalv3mon"; + monster "force_1-1.gat",30,30,"Arena Enemy",1019,1,"arenalv3mon"; + monster "force_1-1.gat",25,30,"Arena Enemy",1019,1,"arenalv3mon"; + monster "force_1-1.gat",25,25,"Arena Enemy",1019,1,"arenalv3mon"; + monster "force_1-1.gat",25,20,"Arena Enemy",1019,1,"arenalv3mon"; + monster "force_1-1.gat",20,35,"Arena Enemy",1019,1,"arenalv3mon"; + set $arena00,9; + disablenpc "fc101"; + disablenpc "fc103"; + warp "force_1-1.gat",25,26; + enablenpc "fc103-1"; + enablenpc "fc105"; + enablenpc "fc107"; + announce "You have 90 seconds to destroy all nine!",19; + addtimer 90000,"arenalv3fail"; + addtimer 80000,"tensecsleft"; +} + +// Pushed-down Processing +//Time Attack Level 1 +force_1-1.gat,25,26,0 script arenalv1mon -1,{ + set $arena00, $arena00 - 1; + if( $arena00 > 0 ) goto L_CONT; + deltimer "arenaev8000"; + announce "Crash!!",3; + enablenpc "fc101"; + enablenpc "fc103"; + areaannounce "force_1-1.gat",0,0,350,350, + "You cleared Time Attack Level 1.",0; + areaannounce "prt_are_in.gat",0,0,350,350, + strcharinfo(0) + " cleared Time Attack Level 1.",0; + areaannounce "prontera.gat",0,0,350,350, + strcharinfo(0) + " cleared Time Attack Level 1.",0; + areaannounce "morocc.gat",0,0,350,350, + strcharinfo(0) + " cleared Time Attack Level 1.",0; + areaannounce "geffen.gat",0,0,350,350, + strcharinfo(0) + " cleared Time Attack Level 1.",0; + areaannounce "payon.gat",0,0,350,350, + strcharinfo(0) + " cleared Time Attack Level 1.",0; + areaannounce "alberta.gat",0,0,350,350, + strcharinfo(0) + " cleared Time Attack Level 1.",0; + areaannounce "izlude.gat",0,0,350,350, + strcharinfo(0) + " cleared Time Attack Level 1.",0; + areaannounce "aldebaran.gat",0,0,350,350, + strcharinfo(0) + " cleared Time Attack Level 1.",0; + areaannounce "prt_are_in.gat",0,0,350,350, + strcharinfo(0) + " cleared Time Attack Level 1.",0; + areaannounce "xmas.gat",0,0,350,350, + strcharinfo(0) + " cleared Time Attack Level 1.",0; + areaannounce "comodo.gat",0,0,350,350, + strcharinfo(0) + " cleared Time Attack Level 1.",0; + areaannounce "prt_gld.gat",0,0,350,350, + strcharinfo(0) + " cleared Time Attack Level 1.",0; + areaannounce "prtg_cas01.gat",0,0,350,350, + strcharinfo(0) + " cleared Time Attack Level 1.",0; + areaannounce "prtg_cas02.gat",0,0,350,350, + strcharinfo(0) + " cleared Time Attack Level 1.",0; + areaannounce "prtg_cas03.gat",0,0,350,350, + strcharinfo(0) + " cleared Time Attack Level 1.",0; + areaannounce "prtg_cas04.gat",0,0,350,350, + strcharinfo(0) + " cleared Time Attack Level 1.",0; + areaannounce "prtg_cas05.gat",0,0,350,350, + strcharinfo(0) + " cleared Time Attack Level 1.",0; + areaannounce "pay_gld.gat",0,0,350,350, + strcharinfo(0) + " cleared Time Attack Level 1.",0; + areaannounce "payg_cas01.gat",0,0,350,350, + strcharinfo(0) + " cleared Time Attack Level 1.",0; + areaannounce "payg_cas02.gat",0,0,350,350, + strcharinfo(0) + " cleared Time Attack Level 1.",0; + areaannounce "payg_cas03.gat",0,0,350,350, + strcharinfo(0) + " cleared Time Attack Level 1.",0; + areaannounce "payg_cas04.gat",0,0,350,350, + strcharinfo(0) + " cleared Time Attack Level 1.",0; + areaannounce "payg_cas05.gat",0,0,350,350, + strcharinfo(0) + " cleared Time Attack Level 1.",0; + areaannounce "yuno.gat",0,0,350,350, + strcharinfo(0) + " cleared Time Attack Level 1.",0; + areaannounce "amatsu.gat",0,0,350,350, + strcharinfo(0) + " cleared Time Attack Level 1.",0; + areaannounce "gonryun.gat",0,0,350,350, + strcharinfo(0) + " cleared Time Attack Level 1.",0; + addtimer 5000,"arenareturn"; +L_CONT: + break; +} + +force_1-1.gat,25,26,0 script arenalv2mon -1,{ + set $arena00, $arena00 - 1; + if( $arena00 > 0 ) goto L_CONT; + deltimer "arenaev8000"; + announce "Crash!!",3; + enablenpc "fc101"; + enablenpc "fc103"; + areaannounce "force_1-1.gat",0,0,350,350, + "You cleared Time Attack Level 2.",0; + areaannounce "prt_are_in.gat",0,0,350,350, + strcharinfo(0) + " cleared Time Attack Level 2.",0; + areaannounce "prontera.gat",0,0,350,350, + strcharinfo(0) + " cleared Time Attack Level 2.",0; + areaannounce "morocc.gat",0,0,350,350, + strcharinfo(0) + " cleared Time Attack Level 2.",0; + areaannounce "geffen.gat",0,0,350,350, + strcharinfo(0) + " cleared Time Attack Level 2.",0; + areaannounce "payon.gat",0,0,350,350, + strcharinfo(0) + " cleared Time Attack Level 2.",0; + areaannounce "alberta.gat",0,0,350,350, + strcharinfo(0) + " cleared Time Attack Level 2.",0; + areaannounce "izlude.gat",0,0,350,350, + strcharinfo(0) + " cleared Time Attack Level 2.",0; + areaannounce "aldebaran.gat",0,0,350,350, + strcharinfo(0) + " cleared Time Attack Level 2.",0; + areaannounce "prt_are_in.gat",0,0,350,350, + strcharinfo(0) + " cleared Time Attack Level 2.",0; + areaannounce "xmas.gat",0,0,350,350, + strcharinfo(0) + " cleared Time Attack Level 2.",0; + areaannounce "comodo.gat",0,0,350,350, + strcharinfo(0) + " cleared Time Attack Level 2.",0; + areaannounce "prt_gld.gat",0,0,350,350, + strcharinfo(0) + " cleared Time Attack Level 2.",0; + areaannounce "prtg_cas01.gat",0,0,350,350, + strcharinfo(0) + " cleared Time Attack Level 2.",0; + areaannounce "prtg_cas02.gat",0,0,350,350, + strcharinfo(0) + " cleared Time Attack Level 2.",0; + areaannounce "prtg_cas03.gat",0,0,350,350, + strcharinfo(0) + " cleared Time Attack Level 2.",0; + areaannounce "prtg_cas04.gat",0,0,350,350, + strcharinfo(0) + " cleared Time Attack Level 2.",0; + areaannounce "prtg_cas05.gat",0,0,350,350, + strcharinfo(0) + " cleared Time Attack Level 2.",0; + areaannounce "pay_gld.gat",0,0,350,350, + strcharinfo(0) + " cleared Time Attack Level 2.",0; + areaannounce "payg_cas01.gat",0,0,350,350, + strcharinfo(0) + " cleared Time Attack Level 2.",0; + areaannounce "payg_cas02.gat",0,0,350,350, + strcharinfo(0) + " cleared Time Attack Level 2.",0; + areaannounce "payg_cas03.gat",0,0,350,350, + strcharinfo(0) + " cleared Time Attack Level 2.",0; + areaannounce "payg_cas04.gat",0,0,350,350, + strcharinfo(0) + " cleared Time Attack Level 2.",0; + areaannounce "payg_cas05.gat",0,0,350,350, + strcharinfo(0) + " cleared Time Attack Level 2.",0; + areaannounce "yuno.gat",0,0,350,350, + strcharinfo(0) + " cleared Time Attack Level 2.",0; + areaannounce "amatsu.gat",0,0,350,350, + strcharinfo(0) + " cleared Time Attack Level 2.",0; + areaannounce "gonryun.gat",0,0,350,350, + strcharinfo(0) + " cleared Time Attack Level 2.",0; + addtimer 5000,"arenareturn"; +L_CONT: + break; +} + + +force_1-1.gat,25,26,0 script arenalv3mon -1,{ + set $arena00, $arena00 - 1; + if( $arena00 > 0 ) goto L_CONT; + deltimer "arenaev8000"; + announce "Crash!!",3; + enablenpc "fc101"; + enablenpc "fc103"; + areaannounce "force_1-1.gat",0,0,350,350, + "You cleared Time Attack Level 3.",0; + areaannounce "prt_are_in.gat",0,0,350,350, + strcharinfo(0) + " cleared Time Attack Level 3.",0; + areaannounce "prontera.gat",0,0,350,350, + strcharinfo(0) + " cleared Time Attack Level 3.",0; + areaannounce "morocc.gat",0,0,350,350, + strcharinfo(0) + " cleared Time Attack Level 3.",0; + areaannounce "geffen.gat",0,0,350,350, + strcharinfo(0) + " cleared Time Attack Level 3.",0; + areaannounce "payon.gat",0,0,350,350, + strcharinfo(0) + " cleared Time Attack Level 3.",0; + areaannounce "alberta.gat",0,0,350,350, + strcharinfo(0) + " cleared Time Attack Level 3.",0; + areaannounce "izlude.gat",0,0,350,350, + strcharinfo(0) + " cleared Time Attack Level 3.",0; + areaannounce "aldebaran.gat",0,0,350,350, + strcharinfo(0) + " cleared Time Attack Level 3.",0; + areaannounce "prt_are_in.gat",0,0,350,350, + strcharinfo(0) + " cleared Time Attack Level 3.",0; + areaannounce "xmas.gat",0,0,350,350, + strcharinfo(0) + " cleared Time Attack Level 3.",0; + areaannounce "comodo.gat",0,0,350,350, + strcharinfo(0) + " cleared Time Attack Level 3.",0; + areaannounce "prt_gld.gat",0,0,350,350, + strcharinfo(0) + " cleared Time Attack Level 3.",0; + areaannounce "prtg_cas01.gat",0,0,350,350, + strcharinfo(0) + " cleared Time Attack Level 3.",0; + areaannounce "prtg_cas02.gat",0,0,350,350, + strcharinfo(0) + " cleared Time Attack Level 3.",0; + areaannounce "prtg_cas03.gat",0,0,350,350, + strcharinfo(0) + " cleared Time Attack Level 3.",0; + areaannounce "prtg_cas04.gat",0,0,350,350, + strcharinfo(0) + " cleared Time Attack Level 3.",0; + areaannounce "prtg_cas05.gat",0,0,350,350, + strcharinfo(0) + " cleared Time Attack Level 3.",0; + areaannounce "pay_gld.gat",0,0,350,350, + strcharinfo(0) + " cleared Time Attack Level 3.",0; + areaannounce "payg_cas01.gat",0,0,350,350, + strcharinfo(0) + " cleared Time Attack Level 3.",0; + areaannounce "payg_cas02.gat",0,0,350,350, + strcharinfo(0) + " cleared Time Attack Level 3.",0; + areaannounce "payg_cas03.gat",0,0,350,350, + strcharinfo(0) + " cleared Time Attack Level 3.",0; + areaannounce "payg_cas04.gat",0,0,350,350, + strcharinfo(0) + " cleared Time Attack Level 3.",0; + areaannounce "payg_cas05.gat",0,0,350,350, + strcharinfo(0) + " cleared Time Attack Level 3.",0; + areaannounce "yuno.gat",0,0,350,350, + strcharinfo(0) + " cleared Time Attack Level 3.",0; + areaannounce "amatsu.gat",0,0,350,350, + strcharinfo(0) + " cleared Time Attack Level 3.",0; + areaannounce "gonryun.gat",0,0,350,350, + strcharinfo(0) + " cleared Time Attack Level 3.",0; + addtimer 5000,"arenareturn"; +L_CONT: + break; +} + +// Timeout +force_1-1.gat,25,26,0 script arenalv1fail -1,{ + set $arena00,99; + killmonster "force_1-1.gat","arenalv1mon"; + killmonster "force_1-1.gat","arenalv2mon"; + killmonster "force_1-1.gat","arenalv3mon"; + announce "Time Over!!",3; + areaannounce "force_1-1.gat",0,0,350,350, + "You failed Time Attack Level 1.",0; + areaannounce "prt_are_in.gat",0,0,350,350, + strcharinfo(0) + " failed Time Attack Level 1.",0; + areaannounce "prontera.gat",0,0,350,350, + strcharinfo(0) + " failed Time Attack Level 1.",0; + areaannounce "morocc.gat",0,0,350,350, + strcharinfo(0) + " failed Time Attack Level 1.",0; + areaannounce "geffen.gat",0,0,350,350, + strcharinfo(0) + " failed Time Attack Level 1.",0; + areaannounce "payon.gat",0,0,350,350, + strcharinfo(0) + " failed Time Attack Level 1.",0; + areaannounce "alberta.gat",0,0,350,350, + strcharinfo(0) + " failed Time Attack Level 1.",0; + areaannounce "izlude.gat",0,0,350,350, + strcharinfo(0) + " failed Time Attack Level 1.",0; + areaannounce "aldebaran.gat",0,0,350,350, + strcharinfo(0) + " failed Time Attack Level 1.",0; + areaannounce "prt_are_in.gat",0,0,350,350, + strcharinfo(0) + " failed Time Attack Level 1.",0; + areaannounce "xmas.gat",0,0,350,350, + strcharinfo(0) + " failed Time Attack Level 1.",0; + areaannounce "comodo.gat",0,0,350,350, + strcharinfo(0) + " failed Time Attack Level 1.",0; + areaannounce "prt_gld.gat",0,0,350,350, + strcharinfo(0) + " failed Time Attack Level 1.",0; + areaannounce "prtg_cas01.gat",0,0,350,350, + strcharinfo(0) + " failed Time Attack Level 1.",0; + areaannounce "prtg_cas02.gat",0,0,350,350, + strcharinfo(0) + " failed Time Attack Level 1.",0; + areaannounce "prtg_cas03.gat",0,0,350,350, + strcharinfo(0) + " failed Time Attack Level 1.",0; + areaannounce "prtg_cas04.gat",0,0,350,350, + strcharinfo(0) + " failed Time Attack Level 1.",0; + areaannounce "prtg_cas05.gat",0,0,350,350, + strcharinfo(0) + " failed Time Attack Level 1.",0; + areaannounce "pay_gld.gat",0,0,350,350, + strcharinfo(0) + " failed Time Attack Level 1.",0; + areaannounce "payg_cas01.gat",0,0,350,350, + strcharinfo(0) + " failed Time Attack Level 1.",0; + areaannounce "payg_cas02.gat",0,0,350,350, + strcharinfo(0) + " failed Time Attack Level 1.",0; + areaannounce "payg_cas03.gat",0,0,350,350, + strcharinfo(0) + " failed Time Attack Level 1.",0; + areaannounce "payg_cas04.gat",0,0,350,350, + strcharinfo(0) + " failed Time Attack Level 1.",0; + areaannounce "payg_cas05.gat",0,0,350,350, + strcharinfo(0) + " failed Time Attack Level 1.",0; + areaannounce "yuno.gat",0,0,350,350, + strcharinfo(0) + " failed Time Attack Level 1.",0; + areaannounce "amatsu.gat",0,0,350,350, + strcharinfo(0) + " failed Time Attack Level 1.",0; + areaannounce "gonryun",0,0,350,350, + strcharinfo(0) + " failed Time Attack Level 1.",0; + addtimer 5000,"arenareturn"; +} + +force_1-1.gat,25,26,0 script arenalv2fail -1,{ + set $arena00,99; + killmonster "force_1-1.gat","arenalv1mon"; + killmonster "force_1-1.gat","arenalv2mon"; + killmonster "force_1-1.gat","arenalv3mon"; + announce "Time Over!!",3; + areaannounce "force_1-1.gat",0,0,350,350, + "You failed Time Attack Level 2.",0; + areaannounce "prt_are_in.gat",0,0,350,350, + strcharinfo(0) + " failed Time Attack Level 2.",0; + areaannounce "prontera.gat",0,0,350,350, + strcharinfo(0) + " failed Time Attack Level 2.",0; + areaannounce "morocc.gat",0,0,350,350, + strcharinfo(0) + " failed Time Attack Level 2.",0; + areaannounce "geffen.gat",0,0,350,350, + strcharinfo(0) + " failed Time Attack Level 2.",0; + areaannounce "payon.gat",0,0,350,350, + strcharinfo(0) + " failed Time Attack Level 2.",0; + areaannounce "alberta.gat",0,0,350,350, + strcharinfo(0) + " failed Time Attack Level 2.",0; + areaannounce "izlude.gat",0,0,350,350, + strcharinfo(0) + " failed Time Attack Level 2.",0; + areaannounce "aldebaran.gat",0,0,350,350, + strcharinfo(0) + " failed Time Attack Level 2.",0; + areaannounce "prt_are_in.gat",0,0,350,350, + strcharinfo(0) + " failed Time Attack Level 2.",0; + areaannounce "xmas.gat",0,0,350,350, + strcharinfo(0) + " failed Time Attack Level 2.",0; + areaannounce "comodo.gat",0,0,350,350, + strcharinfo(0) + " failed Time Attack Level 2.",0; + areaannounce "prt_gld.gat",0,0,350,350, + strcharinfo(0) + " failed Time Attack Level 2.",0; + areaannounce "prtg_cas01.gat",0,0,350,350, + strcharinfo(0) + " failed Time Attack Level 2.",0; + areaannounce "prtg_cas02.gat",0,0,350,350, + strcharinfo(0) + " failed Time Attack Level 2.",0; + areaannounce "prtg_cas03.gat",0,0,350,350, + strcharinfo(0) + " failed Time Attack Level 2.",0; + areaannounce "prtg_cas04.gat",0,0,350,350, + strcharinfo(0) + " failed Time Attack Level 2.",0; + areaannounce "prtg_cas05.gat",0,0,350,350, + strcharinfo(0) + " failed Time Attack Level 2.",0; + areaannounce "pay_gld.gat",0,0,350,350, + strcharinfo(0) + " failed Time Attack Level 2.",0; + areaannounce "payg_cas01.gat",0,0,350,350, + strcharinfo(0) + " failed Time Attack Level 2.",0; + areaannounce "payg_cas02.gat",0,0,350,350, + strcharinfo(0) + " failed Time Attack Level 2.",0; + areaannounce "payg_cas03.gat",0,0,350,350, + strcharinfo(0) + " failed Time Attack Level 2.",0; + areaannounce "payg_cas04.gat",0,0,350,350, + strcharinfo(0) + " failed Time Attack Level 2.",0; + areaannounce "payg_cas05.gat",0,0,350,350, + strcharinfo(0) + " failed Time Attack Level 2.",0; + areaannounce "yuno.gat",0,0,350,350, + strcharinfo(0) + " failed Time Attack Level 2.",0; + areaannounce "amatsu.gat",0,0,350,350, + strcharinfo(0) + " failed Time Attack Level 2.",0; + areaannounce "gonryun",0,0,350,350, + strcharinfo(0) + " failed Time Attack Level 2.",0; + addtimer 5000,"arenareturn"; +} + +force_1-1.gat,25,26,0 script arenalv3fail -1,{ + set $arena00,99; + killmonster "force_1-1.gat","arenalv1mon"; + killmonster "force_1-1.gat","arenalv2mon"; + killmonster "force_1-1.gat","arenalv3mon"; + announce "Time Over!!",3; + areaannounce "force_1-1.gat",0,0,350,350, + "You failed Time Attack Level 2.",0; + areaannounce "prt_are_in.gat",0,0,350,350, + strcharinfo(0) + " failed Time Attack Level 3.",0; + areaannounce "prontera.gat",0,0,350,350, + strcharinfo(0) + " failed Time Attack Level 3.",0; + areaannounce "morocc.gat",0,0,350,350, + strcharinfo(0) + " failed Time Attack Level 3.",0; + areaannounce "geffen.gat",0,0,350,350, + strcharinfo(0) + " failed Time Attack Level 3.",0; + areaannounce "payon.gat",0,0,350,350, + strcharinfo(0) + " failed Time Attack Level 3.",0; + areaannounce "alberta.gat",0,0,350,350, + strcharinfo(0) + " failed Time Attack Level 3.",0; + areaannounce "izlude.gat",0,0,350,350, + strcharinfo(0) + " failed Time Attack Level 3.",0; + areaannounce "aldebaran.gat",0,0,350,350, + strcharinfo(0) + " failed Time Attack Level 3.",0; + areaannounce "prt_are_in.gat",0,0,350,350, + strcharinfo(0) + " failed Time Attack Level 3.",0; + areaannounce "xmas.gat",0,0,350,350, + strcharinfo(0) + " failed Time Attack Level 3.",0; + areaannounce "comodo.gat",0,0,350,350, + strcharinfo(0) + " failed Time Attack Level 3.",0; + areaannounce "prt_gld.gat",0,0,350,350, + strcharinfo(0) + " failed Time Attack Level 3.",0; + areaannounce "prtg_cas01.gat",0,0,350,350, + strcharinfo(0) + " failed Time Attack Level 3.",0; + areaannounce "prtg_cas02.gat",0,0,350,350, + strcharinfo(0) + " failed Time Attack Level 3.",0; + areaannounce "prtg_cas03.gat",0,0,350,350, + strcharinfo(0) + " failed Time Attack Level 3.",0; + areaannounce "prtg_cas04.gat",0,0,350,350, + strcharinfo(0) + " failed Time Attack Level 3.",0; + areaannounce "prtg_cas05.gat",0,0,350,350, + strcharinfo(0) + " failed Time Attack Level 3.",0; + areaannounce "pay_gld.gat",0,0,350,350, + strcharinfo(0) + " failed Time Attack Level 3.",0; + areaannounce "payg_cas01.gat",0,0,350,350, + strcharinfo(0) + " failed Time Attack Level 3.",0; + areaannounce "payg_cas02.gat",0,0,350,350, + strcharinfo(0) + " failed Time Attack Level 3.",0; + areaannounce "payg_cas03.gat",0,0,350,350, + strcharinfo(0) + " failed Time Attack Level 3.",0; + areaannounce "payg_cas04.gat",0,0,350,350, + strcharinfo(0) + " failed Time Attack Level 3.",0; + areaannounce "payg_cas05.gat",0,0,350,350, + strcharinfo(0) + " failed Time Attack Level 3.",0; + areaannounce "yuno.gat",0,0,350,350, + strcharinfo(0) + " failed Time Attack Level 3.",0; + areaannounce "amatsu.gat",0,0,350,350, + strcharinfo(0) + " failed Time Attack Level 3.",0; + areaannounce "gonryun",0,0,350,350, + strcharinfo(0) + " failed Time Attack Level 3.",0; + addtimer 5000,"arenareturn"; +} + +// Reminding the player of time constraints. +force_1-1.gat,25,26,0 script tensecsleft -1,{ + announce "Ten seconds remaining!",3; +} + + +// Return to Prontera +force_1-1.gat,25,26,0 script arenareturn -1,{ + warp "prontera.gat",156,191; }
\ No newline at end of file diff --git a/npc/other/arena_mvp.txt b/npc/other/arena_mvp.txt index 8253e1aa1..19c59f311 100644 --- a/npc/other/arena_mvp.txt +++ b/npc/other/arena_mvp.txt @@ -1,1105 +1,1105 @@ -// ---- MVP ARENA!!!!!! By Darkchild with 16 diff MVP's inside
-// --- NPC in prontera
-prontera.gat,154,197,3 script MVP Warper 768,{
-mes "[ ^0065DFMVP Warper^000000 ]";
-mes "Would you like to go to the MVP Arena ?...";
-menu "Yes!",L_MVP,"No thanks.",L_No;
-
-L_MVP:
-warp "quiz_00",44,24;
-close;
-L_No:
-close;
-}
-// --- Inside the Arena
-// --- NPC's That explains thigns
-quiz_00.gat,49,31,4 script MVP Arena Guide 778,{
-menu "Intro",L_Intro,"I want to go back",L_Leave,"Heal me please",L_Heal,"Cancel",L_Cancel;
-
-L_Intro:
-mes "[ ^0065DFMVP Arena Guide^000000 ]";
-mes "Welcome and behold this sacred place, Here you will find out if you truly have what it takes to call yourself a warrior, and a Team mate.";
-next;
-mes "Here in [ ^0065DFSvRO^000000 ] we like to be a family, and as a family you learn you must help and assist one-another, so if you want to survive you should learn to Co-operate.";
-next;
-mes "There are Plenty of rooms with MVP's in them so don't all fight over the one room just cause you think it's the only one, just move to the next one.";
-next;
-mes "If you can't get along, and there is too much complaining about people stealing MVP kills and items... then this place will be removed.";
-next;
-mes "Now the npc's are in groups of monsters, there are 4 different mvps per each npc, i wont tell you which it's a surprise hehe.";
-next;
-mes "Good luck, Live long and Prosper!.";
-close;
-
-L_Leave:
-warp "prontera",156,179;
-close;
-
-L_Heal:
-Heal 32500,32500;
-close;
-
-L_Cancel:
-close;
-}
-
-// --- The first Alpha-MVP warper
-quiz_00.gat,56,31,4 script Alpha MVP 770,{
-mes "[ ^0065DFAlpha MVP^000000 ]";
-mes "I am the first Keeper, are you ready?.";
-menu "Yes!",L_Yes,"Urrr No.",L_No;
-
-L_Yes:
-mes "[ ^0065DFAlpha MVP^000000 ]";
-mes "Which Arena you want to go to??";
- menu "Arena 1 [" + getmapusers("pvp_n_1-2.gat") + " / 50]",Larena1,
- "Arena 2 [" + getmapusers("pvp_n_2-2.gat") + " / 50]",Larena2,
- "Arena 3 [" + getmapusers("pvp_n_3-2.gat") + " / 15]",Larena3,
- "Arena 4 [" + getmapusers("pvp_n_4-2.gat") + " / 15]",Larena4,
- "Arena 5 [" + getmapusers("pvp_n_5-2.gat") + " / 15]",Larena5,
- "Arena 6 [" + getmapusers("pvp_n_2-2.gat") + " / 15]",Larena6,
- "Arena 7 [" + getmapusers("pvp_n_3-2.gat") + " / 15]",Larena7,
- "Arena 8 [" + getmapusers("pvp_n_4-2.gat") + " / 15]",Larena8,
- "Quit",Lcancel;
-
-L_No:
-close;
-
-Larena1:
-if (getmapusers("pvp_n_1-2.gat") > 49) goto Lsorry;
-mes "[ ^0065DFAlpha MVP^000000 ]";
-mes "Here you go!";
-warp "pvp_n_1-2",102,102;
-close;
-
-Larena2:
-if (getmapusers("pvp_n_2-2.gat") > 49) goto Lsorry;
-mes "[ ^0065DFAlpha MVP^000000 ]";
-mes "Here you go!";
-warp "pvp_n_2-2",102,102;
-close;
-
-Larena3:
-if (getmapusers("pvp_n_3-2.gat") > 14) goto Lsorry;
-mes "[ ^0065DFAlpha MVP^000000 ]";
-mes "Here you go!";
-warp "pvp_n_3-2",102,102;
-close;
-
-Larena4:
-if (getmapusers("pvp_n_4-2.gat") > 14) goto Lsorry;
-mes "[ ^0065DFAlpha MVP^000000 ]";
-mes "Here you go!";
-warp "pvp_n_4-2",102,102;
-close;
-
-Larena5:
-if (getmapusers("pvp_n_5-2.gat") > 14) goto Lsorry;
-mes "[ ^0065DFAlpha MVP^000000 ]";
-mes "Here you go!";
-warp "pvp_n_5-2",102,102;
-close;
-
-Larena6:
-if (getmapusers("pvp_n_6-2.gat") > 14) goto Lsorry;
-mes "[ ^0065DFAlpha MVP^000000 ]";
-mes "Here you go!";
-warp "pvp_n_6-2",102,102;
-close;
-
-Larena7:
-if (getmapusers("pvp_n_7-2.gat") > 14) goto Lsorry;
-mes "[ ^0065DFAlpha MVP^000000 ]";
-mes "Here you go!";
-warp "pvp_n_7-2",102,102;
-close;
-
-Larena8:
-if (getmapusers("pvp_n_8-2.gat") > 14) goto Lsorry;
-mes "[ ^0065DFAlpha MVP^000000 ]";
-mes "Here you go!";
-warp "pvp_n_8-2",102,102;
-close;
-
-Lsorry:
-mes "[ ^0065DFAlpha MVP^000000 ]";
-mes "Sorry but this Arena is already full, maybe you can try another one!";
-close;
-}
-
-// --- The first Beta-MVP warper
-quiz_00.gat,58,31,4 script Beta MVP 773,{
-mes "[ ^0065DFAlpha MVP^000000 ]";
-mes "I am the first Keeper, are you ready?.";
-menu "Yes!",L_Yes,"Urrr No.",L_No;
-
-L_Yes:
-mes "[ ^0065DFBeta MVP^000000 ]";
-mes "Which Arena you want to go to??";
- menu "Arena 1 [" + getmapusers("pvp_n_1-3.gat") + " / 50]",Larena1,
- "Arena 2 [" + getmapusers("pvp_n_2-3.gat") + " / 15]",Larena2,
- "Arena 3 [" + getmapusers("pvp_n_3-3.gat") + " / 15]",Larena3,
- "Arena 4 [" + getmapusers("pvp_n_4-3.gat") + " / 15]",Larena4,
- "Arena 5 [" + getmapusers("pvp_n_5-3.gat") + " / 15]",Larena5,
- "Arena 6 [" + getmapusers("pvp_n_2-3.gat") + " / 15]",Larena6,
- "Arena 7 [" + getmapusers("pvp_n_3-3.gat") + " / 15]",Larena7,
- "Arena 8 [" + getmapusers("pvp_n_4-3.gat") + " / 15]",Larena8,
- "Quit",Lcancel;
-
-L_No:
-close;
-
-Larena1:
-if (getmapusers("pvp_n_1-3.gat") > 49) goto Lsorry;
-mes "[ ^0065DFBeta MVP^000000 ]";
-mes "Here you go!";
-warp "pvp_n_1-3",102,102;
-close;
-
-Larena2:
-if (getmapusers("pvp_n_2-3.gat") > 14) goto Lsorry;
-mes "[ ^0065DFBeta MVP^000000 ]";
-mes "Here you go!";
-warp "pvp_n_2-3",102,102;
-close;
-
-Larena3:
-if (getmapusers("pvp_n_3-3.gat") > 14) goto Lsorry;
-mes "[ ^0065DFBeta MVP^000000 ]";
-mes "Here you go!";
-warp "pvp_n_3-3",102,102;
-close;
-
-Larena4:
-if (getmapusers("pvp_n_4-3.gat") > 14) goto Lsorry;
-mes "[ ^0065DFBeta MVP^000000 ]";
-mes "Here you go!";
-warp "pvp_n_4-3.gat",102,102;
-close;
-
-Larena5:
-if (getmapusers("pvp_n_5-3.gat") > 14) goto Lsorry;
-mes "[ ^0065DFBeta MVP^000000 ]";
-mes "Here you go!";
-warp "pvp_n_5-3.gat",102,102;
-close;
-
-Larena6:
-if (getmapusers("pvp_n_6-3.gat") > 14) goto Lsorry;
-mes "[ ^0065DFBeta MVP^000000 ]";
-mes "Here you go!";
-warp "pvp_n_6-3.gat",102,102;
-close;
-
-Larena7:
-if (getmapusers("pvp_n_7-3.gat") > 14) goto Lsorry;
-mes "[ ^0065DFBeta MVP^000000 ]";
-mes "Here you go!";
-warp "pvp_n_7-3.gat",102,102;
-close;
-
-Larena8:
-if (getmapusers("pvp_n_8-3.gat") > 14) goto Lsorry;
-mes "[ ^0065DFBeta MVP^000000 ]";
-mes "Here you go!";
-warp "pvp_n_8-3.gat",102,102;
-close;
-
-Lsorry:
-mes "[ ^0065DFBeta MVP^000000 ]";
-mes "Sorry but this Arena is already full, maybe you can try another one!";
-close;
-}
-
-
-// --- The first Theta-MVP warper
-quiz_00.gat,60,31,4 script Theta MVP 774,{
-mes "[ ^0065DFTheta MVP^000000 ]";
-mes "I am the first Keeper, are you ready?.";
-menu "Yes!",L_Yes,"Urrr No.",L_No;
-
-L_Yes:
-mes "[ ^0065DFTheta MVP^000000 ]";
-mes "Which Arena you want to go to??";
- menu "Arena 1 [" + getmapusers("pvp_n_1-4.gat") + " / 50]",Larena1,
- "Arena 2 [" + getmapusers("pvp_n_2-4.gat") + " / 15]",Larena2,
- "Arena 3 [" + getmapusers("pvp_n_3-4.gat") + " / 15]",Larena3,
- "Arena 4 [" + getmapusers("pvp_n_4-4.gat") + " / 15]",Larena4,
- "Arena 5 [" + getmapusers("pvp_n_5-4.gat") + " / 15]",Larena5,
- "Arena 6 [" + getmapusers("pvp_n_2-4.gat") + " / 15]",Larena6,
- "Arena 7 [" + getmapusers("pvp_n_3-4.gat") + " / 15]",Larena7,
- "Arena 8 [" + getmapusers("pvp_n_4-4.gat") + " / 15]",Larena8,
- "Quit",Lcancel;
-
-L_No:
-close;
-
-Larena1:
-if (getmapusers("pvp_n_1-4.gat") > 49) goto Lsorry;
-mes "[ ^0065DFTheta MVP^000000 ]";
-mes "Here you go!";
-warp "pvp_n_1-4.gat",102,102;
-close;
-
-Larena2:
-if (getmapusers("pvp_n_2-4.gat") > 14) goto Lsorry;
-mes "[ ^0065DFTheta MVP^000000 ]";
-mes "Here you go!";
-warp "pvp_n_2-4.gat",102,102;
-close;
-
-Larena3:
-if (getmapusers("pvp_n_3-4.gat") > 14) goto Lsorry;
-mes "[ ^0065DFTheta MVP^000000 ]";
-mes "Here you go!";
-warp "pvp_n_3-4.gat",102,102;
-close;
-
-Larena4:
-if (getmapusers("pvp_n_4-4.gat") > 14) goto Lsorry;
-mes "[ ^0065DFTheta MVP^000000 ]";
-mes "Here you go!";
-warp "pvp_n_4-4.gat",102,102;
-close;
-
-Larena5:
-if (getmapusers("pvp_n_5-4.gat") > 14) goto Lsorry;
-mes "[ ^0065DFTheta MVP^000000 ]";
-mes "Here you go!";
-warp "pvp_n_5-4.gat",102,102;
-close;
-
-Larena6:
-if (getmapusers("pvp_n_6-4.gat") > 14) goto Lsorry;
-mes "[ ^0065DFTheta MVP^000000 ]";
-mes "Here you go!";
-warp "pvp_n_6-4.gat",102,102;
-close;
-
-Larena7:
-if (getmapusers("pvp_n_7-4.gat") > 14) goto Lsorry;
-mes "[ ^0065DFTheta MVP^000000 ]";
-mes "Here you go!";
-warp "pvp_n_7-4.gat",102,102;
-close;
-
-Larena8:
-if (getmapusers("pvp_n_8-4.gat") > 14) goto Lsorry;
-mes "[ ^0065DFTheta MVP^000000 ]";
-mes "Here you go!";
-warp "pvp_n_8-4.gat",102,102;
-close;
-
-Lsorry:
-mes "[ ^0065DFTheta MVP^000000 ]";
-mes "Sorry but this Arena is already full, maybe you can try another one!";
-close;
-}
-
-
-// --- The first Epsilon-MVP warper
-quiz_00.gat,62,31,4 script Epsilon MVP 776,{
-mes "[ ^0065DFEpsilon MVP^000000 ]";
-mes "I am the first Keeper, are you ready?.";
-menu "Yes!",L_Yes,"Urrr No.",L_No;
-
-L_Yes:
-mes "[ ^0065DFEpsilon MVP^000000 ]";
-mes "Which Arena you want to go to??";
- menu "Arena 1 [" + getmapusers("pvp_n_1-5.gat") + " / 50]",Larena1,
- "Arena 2 [" + getmapusers("pvp_n_2-5.gat") + " / 15]",Larena2,
- "Arena 3 [" + getmapusers("pvp_n_3-5.gat") + " / 15]",Larena3,
- "Arena 4 [" + getmapusers("pvp_n_4-5.gat") + " / 15]",Larena4,
- "Arena 5 [" + getmapusers("pvp_n_5-5.gat") + " / 15]",Larena5,
- "Arena 6 [" + getmapusers("pvp_n_2-5.gat") + " / 15]",Larena6,
- "Arena 7 [" + getmapusers("pvp_n_3-5.gat") + " / 15]",Larena7,
- "Arena 8 [" + getmapusers("pvp_n_4-5.gat") + " / 15]",Larena8,
- "Quit",Lcancel;
-
-L_No:
-close;
-
-Larena1:
-if (getmapusers("pvp_n_1-5.gat") > 49) goto Lsorry;
-mes "[ ^0065DFEpsilon MVP^000000 ]";
-mes "Here you go!";
-warp "pvp_n_1-5.gat",102,102;
-close;
-
-Larena2:
-if (getmapusers("pvp_n_2-5.gat") > 14) goto Lsorry;
-mes "[ ^0065DFEpsilon MVP^000000 ]";
-mes "Here you go!";
-warp "pvp_n_2-5.gat",102,102;
-close;
-
-Larena3:
-if (getmapusers("pvp_n_3-5.gat") > 14) goto Lsorry;
-mes "[ ^0065DFEpsilon MVP^000000 ]";
-mes "Here you go!";
-warp "pvp_n_3-5.gat",102,102;
-close;
-
-Larena4:
-if (getmapusers("pvp_n_4-5.gat") > 14) goto Lsorry;
-mes "[ ^0065DFEpsilon MVP^000000 ]";
-mes "Here you go!";
-warp "pvp_n_4-5.gat",102,102;
-close;
-
-Larena5:
-if (getmapusers("pvp_n_5-5.gat") > 14) goto Lsorry;
-mes "[ ^0065DFEpsilon MVP^000000 ]";
-mes "Here you go!";
-warp "pvp_n_5-5.gat",102,102;
-close;
-
-Larena6:
-if (getmapusers("pvp_n_6-5.gat") > 14) goto Lsorry;
-mes "[ ^0065DFEpsilon MVP^000000 ]";
-mes "Here you go!";
-warp "pvp_n_6-5.gat",102,102;
-close;
-
-Larena7:
-if (getmapusers("pvp_n_7-5.gat") > 14) goto Lsorry;
-mes "[ ^0065DFEpsilon MVP^000000 ]";
-mes "Here you go!";
-warp "pvp_n_7-5.gat",102,102;
-close;
-
-Larena8:
-if (getmapusers("pvp_n_8-5.gat") > 14) goto Lsorry;
-mes "[ ^0065DFEpsilon MVP^000000 ]";
-mes "Here you go!";
-warp "pvp_n_8-5.gat",102,102;
-close;
-
-Lsorry:
-mes "[ ^0065DFEpsilon MVP^000000 ]";
-mes "Sorry but this Arena is already full, maybe you can try another one!";
-close;
-}
-
-
-// ---- Inside MVP-Arena NPC's
-// --- Alpha-MVP #1
-pvp_n_1-2.gat,100,100,4 script MVP-Protector 727,{
- mes "[ ^0065DFMVP-Protector^000000 ]";
- mes "How do you need help?.";
- menu "Harder Monsters",L_Next,"Heal Please",L_Heal,"Leave",L_Leave;
-
- L_Next:
- warp "pvp_n_2-2",102,102;
- close;
-
- L_Heal:
- Heal 32500,32500;
- close;
-
- L_Leave:
- warp "prontera",156,179;
- close;
-}
-
-// --- Alpha-MVP #2
-pvp_n_2-2.gat,100,100,4 script MVP-Protector 727,{
- mes "[ ^0065DFMVP-Protector^000000 ]";
- mes "How do you need help?.";
- menu "Harder Monsters",L_Next,"Heal Please",L_Heal,"Leave",L_Leave;
-
- L_Next:
- warp "pvp_n_3-2",102,102;
- close;
-
- L_Heal:
- Heal 32500,32500;
- close;
-
- L_Leave:
- warp "prontera",156,179;
- close;
-}
-// --- Alpha-MVP #3
-pvp_n_3-2.gat,100,100,4 script MVP-Protector 727,{
- mes "[ ^0065DFMVP-Protector^000000 ]";
- mes "How do you need help?.";
- menu "Harder Monsters",L_Next,"Heal Please",L_Heal,"Leave",L_Leave;
-
- L_Next:
- warp "pvp_n_4-2.gat",102,102;
- close;
-
- L_Heal:
- Heal 32500,32500;
- close;
-
- L_Leave:
- warp "prontera.gat",156,179;
- close;
-}
-// --- Alpha-MVP #4
-pvp_n_4-2.gat,100,100,4 script MVP-Protector 727,{
- mes "[ ^0065DFMVP-Protector^000000 ]";
- mes "How do you need help?.";
- menu "Harder Monsters",L_Next,"Heal Please",L_Heal,"Leave",L_Leave;
-
- L_Next:
- warp "pvp_n_5-2.gat",102,102;
- close;
-
- L_Heal:
- Heal 32500,32500;
- close;
-
- L_Leave:
- warp "prontera.gat",156,179;
- close;
-}
-// --- Alpha-MVP #5
-pvp_n_5-2.gat,100,100,4 script MVP-Protector 727,{
- mes "[ ^0065DFMVP-Protector^000000 ]";
- mes "How do you need help?.";
- menu "Harder Monsters",L_Next,"Heal Please",L_Heal,"Leave",L_Leave;
-
- L_Next:
- warp "pvp_n_6-2.gat",102,102;
- close;
-
- L_Heal:
- Heal 32500,32500;
- close;
-
- L_Leave:
- warp "prontera.gat",156,179;
- close;
-}
-// --- Alpha-MVP #6
-pvp_n_6-2.gat,100,100,4 script MVP-Protector 727,{
- mes "[ ^0065DFMVP-Protector^000000 ]";
- mes "How do you need help?.";
- menu "Harder Monsters",L_Next,"Heal Please",L_Heal,"Leave",L_Leave;
-
- L_Next:
- warp "pvp_n_7-2.gat",102,102;
- close;
-
- L_Heal:
- Heal 32500,32500;
- close;
-
- L_Leave:
- warp "prontera.gat",156,179;
- close;
-}
-// --- Alpha-MVP #7
-pvp_n_7-2.gat,100,100,4 script MVP-Protector 727,{
- mes "[ ^0065DFMVP-Protector^000000 ]";
- mes "How do you need help?.";
- menu "Harder Monsters",L_Next,"Heal Please",L_Heal,"Leave",L_Leave;
-
- L_Next:
- warp "pvp_n_8-2.gat",102,102;
- close;
-
- L_Heal:
- Heal 32500,32500;
- close;
-
- L_Leave:
- warp "prontera.gat",156,179;
- close;
-}
-// --- Alpha-MVP #8
-pvp_n_8-2.gat,100,100,4 script MVP-Protector 727,{
- mes "[ ^0065DFMVP-Protector^000000 ]";
- mes "How do you need help?.";
- menu "Heal Please",L_Heal,"Leave",L_Leave;
-
- L_Heal:
- Heal 32500,32500;
- close;
-
- L_Leave:
- warp "prontera.gat",156,179;
- close;
-}
-// --- Beta-MVP #1
-pvp_n_1-3.gat,100,100,4 script MVP-Protector 727,{
- mes "[ ^0065DFMVP-Protector^000000 ]";
- mes "How do you need help?.";
- menu "Harder Monsters",L_Next,"Heal Please",L_Heal,"Leave",L_Leave;
-
- L_Next:
- warp "pvp_n_2-3.gat",102,102;
- close;
-
- L_Heal:
- Heal 32500,32500;
- close;
-
- L_Leave:
- warp "prontera.gat",156,179;
- close;
-}
-
-// --- Beta-MVP #2
-pvp_n_2-3.gat,100,100,4 script MVP-Protector 727,{
- mes "[ ^0065DFMVP-Protector^000000 ]";
- mes "How do you need help?.";
- menu "Harder Monsters",L_Next,"Heal Please",L_Heal,"Leave",L_Leave;
-
- L_Next:
- warp "pvp_n_3-3.gat",102,102;
- close;
-
- L_Heal:
- Heal 32500,32500;
- close;
-
- L_Leave:
- warp "prontera.gat",156,179;
- close;
-}
-// --- Beta-MVP #3
-pvp_n_3-3.gat,100,100,4 script MVP-Protector 727,{
- mes "[ ^0065DFMVP-Protector^000000 ]";
- mes "How do you need help?.";
- menu "Harder Monsters",L_Next,"Heal Please",L_Heal,"Leave",L_Leave;
-
- L_Next:
- warp "pvp_n_4-3.gat",102,102;
- close;
-
- L_Heal:
- Heal 32500,32500;
- close;
-
- L_Leave:
- warp "prontera.gat",156,179;
- close;
-}
-// --- Beta-MVP #4
-pvp_n_4-3.gat,100,100,4 script MVP-Protector 727,{
- mes "[ ^0065DFMVP-Protector^000000 ]";
- mes "How do you need help?.";
- menu "Harder Monsters",L_Next,"Heal Please",L_Heal,"Leave",L_Leave;
-
- L_Next:
- warp "pvp_n_5-3.gat",102,102;
- close;
-
- L_Heal:
- Heal 32500,32500;
- close;
-
- L_Leave:
- warp "prontera.gat",156,179;
- close;
-}
-// --- Beta-MVP #5
-pvp_n_5-3.gat,100,100,4 script MVP-Protector 727,{
- mes "[ ^0065DFMVP-Protector^000000 ]";
- mes "How do you need help?.";
- menu "Harder Monsters",L_Next,"Heal Please",L_Heal,"Leave",L_Leave;
-
- L_Next:
- warp "pvp_n_6-3.gat",102,102;
- close;
-
- L_Heal:
- Heal 32500,32500;
- close;
-
- L_Leave:
- warp "prontera.gat",156,179;
- close;
-}
-// --- Beta-MVP #6
-pvp_n_6-3.gat,100,100,4 script MVP-Protector 727,{
- mes "[ ^0065DFMVP-Protector^000000 ]";
- mes "How do you need help?.";
- menu "Harder Monsters",L_Next,"Heal Please",L_Heal,"Leave",L_Leave;
-
- L_Next:
- warp "pvp_n_7-3.gat",102,102;
- close;
-
- L_Heal:
- Heal 32500,32500;
- close;
-
- L_Leave:
- warp "prontera.gat",156,179;
- close;
-}
-// --- Beta-MVP #7
-pvp_n_7-3.gat,100,100,4 script MVP-Protector 727,{
- mes "[ ^0065DFMVP-Protector^000000 ]";
- mes "How do you need help?.";
- menu "Harder Monsters",L_Next,"Heal Please",L_Heal,"Leave",L_Leave;
-
- L_Next:
- warp "pvp_n_8-3.gat",102,102;
- close;
-
- L_Heal:
- Heal 32500,32500;
- close;
-
- L_Leave:
- warp "prontera.gat",156,179;
- close;
-}
-// --- Beta-MVP #8
-pvp_n_8-3.gat,100,100,4 script MVP-Protector 727,{
- mes "[ ^0065DFMVP-Protector^000000 ]";
- mes "How do you need help?.";
- menu "Heal Please",L_Heal,"Leave",L_Leave;
-
- L_Heal:
- Heal 32500,32500;
- close;
-
- L_Leave:
- warp "prontera.gat",156,179;
- close;
-}
-// --- Theta-MVP #1
-pvp_n_1-4.gat,100,100,4 script MVP-Protector 727,{
- mes "[ ^0065DFMVP-Protector^000000 ]";
- mes "How do you need help?.";
- menu "Harder Monsters",L_Next,"Heal Please",L_Heal,"Leave",L_Leave;
-
- L_Next:
- warp "pvp_n_2-4.gat",102,102;
- close;
-
- L_Heal:
- Heal 32500,32500;
- close;
-
- L_Leave:
- warp "prontera.gat",156,179;
- close;
-}
-
-// --- Theta-MVP #2
-pvp_n_2-4.gat,100,100,4 script MVP-Protector 727,{
- mes "[ ^0065DFMVP-Protector^000000 ]";
- mes "How do you need help?.";
- menu "Harder Monsters",L_Next,"Heal Please",L_Heal,"Leave",L_Leave;
-
- L_Next:
- warp "pvp_n_3-4.gat",102,102;
- close;
-
- L_Heal:
- Heal 32500,32500;
- close;
-
- L_Leave:
- warp "prontera.gat",156,179;
- close;
-}
-// --- Theta-MVP #3
-pvp_n_3-4.gat,100,100,4 script MVP-Protector 727,{
- mes "[ ^0065DFMVP-Protector^000000 ]";
- mes "How do you need help?.";
- menu "Harder Monsters",L_Next,"Heal Please",L_Heal,"Leave",L_Leave;
-
- L_Next:
- warp "pvp_n_4-4.gat",102,102;
- close;
-
- L_Heal:
- Heal 32500,32500;
- close;
-
- L_Leave:
- warp "prontera.gat",156,179;
- close;
-}
-// --- Theta-MVP #4
-pvp_n_4-4.gat,100,100,4 script MVP-Protector 727,{
- mes "[ ^0065DFMVP-Protector^000000 ]";
- mes "How do you need help?.";
- menu "Harder Monsters",L_Next,"Heal Please",L_Heal,"Leave",L_Leave;
-
- L_Next:
- warp "pvp_n_5-4.gat",102,102;
- close;
-
- L_Heal:
- Heal 32500,32500;
- close;
-
- L_Leave:
- warp "prontera.gat",156,179;
- close;
-}
-// --- Theta-MVP #5
-pvp_n_5-4.gat,100,100,4 script MVP-Protector 727,{
- mes "[ ^0065DFMVP-Protector^000000 ]";
- mes "How do you need help?.";
- menu "Harder Monsters",L_Next,"Heal Please",L_Heal,"Leave",L_Leave;
-
- L_Next:
- warp "pvp_n_6-4.gat",102,102;
- close;
-
- L_Heal:
- Heal 32500,32500;
- close;
-
- L_Leave:
- warp "prontera.gat",156,179;
- close;
-}
-// --- Theta-MVP #6
-pvp_n_6-4.gat,100,100,4 script MVP-Protector 727,{
- mes "[ ^0065DFMVP-Protector^000000 ]";
- mes "How do you need help?.";
- menu "Harder Monsters",L_Next,"Heal Please",L_Heal,"Leave",L_Leave;
-
- L_Next:
- warp "pvp_n_7-4.gat",102,102;
- close;
-
- L_Heal:
- Heal 32500,32500;
- close;
-
- L_Leave:
- warp "prontera.gat",156,179;
- close;
-}
-// --- Theta-MVP #7
-pvp_n_7-4.gat,100,100,4 script MVP-Protector 727,{
- mes "[ ^0065DFMVP-Protector^000000 ]";
- mes "How do you need help?.";
- menu "Harder Monsters",L_Next,"Heal Please",L_Heal,"Leave",L_Leave;
-
- L_Next:
- warp "pvp_n_8-4.gat",102,102;
- close;
-
- L_Heal:
- Heal 32500,32500;
- close;
-
- L_Leave:
- warp "prontera.gat",156,179;
- close;
-}
-// --- Theta-MVP #8
-pvp_n_8-4.gat,100,100,4 script MVP-Protector 727,{
- mes "[ ^0065DFMVP-Protector^000000 ]";
- mes "How do you need help?.";
- menu "Heal Please",L_Heal,"Leave",L_Leave;
-
- L_Heal:
- Heal 32500,32500;
- close;
-
- L_Leave:
- warp "prontera.gat",156,179;
- close;
-}
-// --- Epsilon-MVP #1
-pvp_n_1-5.gat,100,100,4 script MVP-Protector 727,{
- mes "[ ^0065DFMVP-Protector^000000 ]";
- mes "How do you need help?.";
- menu "Harder Monsters",L_Next,"Heal Please",L_Heal,"Leave",L_Leave;
-
- L_Next:
- warp "pvp_n_2-5.gat",102,102;
- close;
-
- L_Heal:
- Heal 32500,32500;
- close;
-
- L_Leave:
- warp "prontera.gat",156,179;
- close;
-}
-
-// --- Epsilon-MVP #2
-pvp_n_2-5.gat,100,100,4 script MVP-Protector 727,{
- mes "[ ^0065DFMVP-Protector^000000 ]";
- mes "How do you need help?.";
- menu "Harder Monsters",L_Next,"Heal Please",L_Heal,"Leave",L_Leave;
-
- L_Next:
- warp "pvp_n_3-5.gat",102,102;
- close;
-
- L_Heal:
- Heal 32500,32500;
- close;
-
- L_Leave:
- warp "prontera.gat",156,179;
- close;
-}
-// --- Epsilon-MVP #3
-pvp_n_3-5.gat,100,100,4 script MVP-Protector 727,{
- mes "[ ^0065DFMVP-Protector^000000 ]";
- mes "How do you need help?.";
- menu "Harder Monsters",L_Next,"Heal Please",L_Heal,"Leave",L_Leave;
-
- L_Next:
- warp "pvp_n_4-5.gat",102,102;
- close;
-
- L_Heal:
- Heal 32500,32500;
- close;
-
- L_Leave:
- warp "prontera.gat",156,179;
- close;
-}
-// --- Epsilon-MVP #4
-pvp_n_4-5.gat,100,100,4 script MVP-Protector 727,{
- mes "[ ^0065DFMVP-Protector^000000 ]";
- mes "How do you need help?.";
- menu "Harder Monsters",L_Next,"Heal Please",L_Heal,"Leave",L_Leave;
-
- L_Next:
- warp "pvp_n_5-5.gat",102,102;
- close;
-
- L_Heal:
- Heal 32500,32500;
- close;
-
- L_Leave:
- warp "prontera.gat",156,179;
- close;
-}
-// --- Epsilon-MVP #5
-pvp_n_5-5.gat,100,100,4 script MVP-Protector 727,{
- mes "[ ^0065DFMVP-Protector^000000 ]";
- mes "How do you need help?.";
- menu "Harder Monsters",L_Next,"Heal Please",L_Heal,"Leave",L_Leave;
-
- L_Next:
- warp "pvp_n_6-5.gat",102,102;
- close;
-
- L_Heal:
- Heal 32500,32500;
- close;
-
- L_Leave:
- warp "prontera.gat",156,179;
- close;
-}
-// --- Epsilon-MVP #6
-pvp_n_6-5.gat,100,100,4 script MVP-Protector 727,{
- mes "[ ^0065DFMVP-Protector^000000 ]";
- mes "How do you need help?.";
- menu "Harder Monsters",L_Next,"Heal Please",L_Heal,"Leave",L_Leave;
-
- L_Next:
- warp "pvp_n_7-5.gat",102,102;
- close;
-
- L_Heal:
- Heal 32500,32500;
- close;
-
- L_Leave:
- warp "prontera.gat",156,179;
- close;
-}
-// --- Epsilon-MVP #7
-pvp_n_7-5.gat,100,100,4 script MVP-Protector 727,{
- mes "[ ^0065DFMVP-Protector^000000 ]";
- mes "How do you need help?.";
- menu "Harder Monsters",L_Next,"Heal Please",L_Heal,"Leave",L_Leave;
-
- L_Next:
- warp "pvp_n_8-5.gat",102,102;
- close;
-
- L_Heal:
- Heal 32500,32500;
- close;
-
- L_Leave:
- warp "prontera.gat",156,179;
- close;
-}
-// --- Epsilon-MVP #8
-pvp_n_8-5.gat,100,100,4 script MVP-Protector 727,{
- mes "[ ^0065DFMVP-Protector^000000 ]";
- mes "How do you need help?.";
- menu "Heal Please",L_Heal,"Leave",L_Leave;
-
- L_Heal:
- Heal 32500,32500;
- close;
-
- L_Leave:
- warp "prontera.gat",156,179;
- close;
-}
-
-// ---- Monsters for the MVP-Arena
-
-// --- Alpha-MVP Maps
-// --- First Alpha-MVP area
-pvp_n_1-2.gat,0,0,0,0 monster Eddga 1115,3,60000,66000
-pvp_n_1-2.gat,0,0,0,0 monster Mistress 1059,1,60000,66000
-// --- Second Alpha-MVP area
-pvp_n_2-2.gat,0,0,0,0 monster Mistress 1059,3,60000,66000
-pvp_n_2-2.gat,0,0,0,0 monster Moonlight 1150,1,60000,66000
-// --- Third Alpha-MVP area
-pvp_n_3-2.gat,0,0,0,0 monster Mistress 1059,1,60000,66000
-pvp_n_3-2.gat,0,0,0,0 monster Moonlight 1150,2,60000,66000
-pvp_n_3-2.gat,0,0,0,0 monster Maya 1147,1,60000,66000
-// --- Fourth Alpha-MVP area
-pvp_n_4-2.gat,0,0,0,0 monster Eddga 1115,1,60000,66000
-pvp_n_4-2.gat,0,0,0,0 monster Mistress 1059,1,60000,66000
-pvp_n_4-2.gat,0,0,0,0 monster Moonlight 1150,1,60000,66000
-pvp_n_4-2.gat,0,0,0,0 monster Maya 1147,1,60000,66000
-// --- Fifth Alpha-MVP area
-pvp_n_5-2.gat,0,0,0,0 monster Eddga 1115,1,60000,66000
-pvp_n_5-2.gat,0,0,0,0 monster Mistress 1059,2,60000,66000
-pvp_n_5-2.gat,0,0,0,0 monster Moonlight 1150,1,60000,66000
-pvp_n_5-2.gat,0,0,0,0 monster Maya 1147,2,60000,66000
-// --- Sixth Alpha-MVP area
-pvp_n_6-2.gat,0,0,0,0 monster Eddga 1115,2,60000,66000
-pvp_n_6-2.gat,0,0,0,0 monster Mistress 1059,3,60000,66000
-pvp_n_6-2.gat,0,0,0,0 monster Moonlight 1150,1,60000,66000
-pvp_n_6-2.gat,0,0,0,0 monster Maya 1147,2,60000,66000
-// --- Seventh Alpha-MVP area
-pvp_n_7-2.gat,0,0,0,0 monster Eddga 1115,3,60000,66000
-pvp_n_7-2.gat,0,0,0,0 monster Mistress 1059,3,60000,66000
-pvp_n_7-2.gat,0,0,0,0 monster Moonlight 1150,2,60000,66000
-pvp_n_7-2.gat,0,0,0,0 monster Maya 1147,2,60000,66000
-// --- Eighth Alpha-MVP area
-pvp_n_8-2.gat,0,0,0,0 monster Eddga 1115,3,60000,66000
-pvp_n_8-2.gat,0,0,0,0 monster Mistress 1059,3,60000,66000
-pvp_n_8-2.gat,0,0,0,0 monster Moonlight 1150,3,60000,66000
-pvp_n_8-2.gat,0,0,0,0 monster Maya 1147,3,60000,66000
-
-// --- Beta-MVP Maps
-// --- First Beta-MVP area
-pvp_n_1-3.gat,0,0,0,0 monster Phreeoni 1159,3,60000,66000
-pvp_n_1-3.gat,0,0,0,0 monster Turtle General 1312,1,60000,66000
-// --- Second Beta-MVP area
-pvp_n_2-3.gat,0,0,0,0 monster Phreeoni 1159,2,60000,66000
-pvp_n_3-3.gat,0,0,0,0 monster Turtle General 1312,1,60000,66000
-pvp_n_2-3.gat,0,0,0,0 monster Orc Hero 1087,1,60000,66000
-// --- Third Beta-MVP area
-pvp_n_3-3.gat,0,0,0,0 monster Phreeoni 1159,1,60000,66000
-pvp_n_3-3.gat,0,0,0,0 monster Turtle General 1312,1,60000,66000
-pvp_n_3-3.gat,0,0,0,0 monster Orc Hero 1087,1,60000,66000
-pvp_n_3-3.gat,0,0,0,0 monster Orc Lord 1190,1,60000,66000
-// --- Fourth Beta-MVP area
-pvp_n_4-3.gat,0,0,0,0 monster Phreeoni 1159,2,60000,66000
-pvp_n_4-3.gat,0,0,0,0 monster Turtle General 1312,1,60000,66000
-pvp_n_4-3.gat,0,0,0,0 monster Orc Hero 1087,1,60000,66000
-pvp_n_4-3.gat,0,0,0,0 monster Orc Lord 1190,1,60000,66000
-// --- Fifth Beta-MVP area
-pvp_n_5-3.gat,0,0,0,0 monster Phreeoni 1159,1,60000,66000
-pvp_n_5-3.gat,0,0,0,0 monster Turtle General 1312,2,60000,66000
-pvp_n_5-3.gat,0,0,0,0 monster Orc Hero 1087,2,60000,66000
-pvp_n_5-3.gat,0,0,0,0 monster Orc Lord 1190,1,60000,66000
-// --- Sixth Beta-MVP area
-pvp_n_6-3.gat,0,0,0,0 monster Phreeoni 1159,2,60000,66000
-pvp_n_6-3.gat,0,0,0,0 monster Turtle General 1312,1,60000,66000
-pvp_n_6-3.gat,0,0,0,0 monster Orc Hero 1087,2,60000,66000
-pvp_n_6-3.gat,0,0,0,0 monster Orc Lord 1190,2,60000,66000
-// --- Seventh Beta-MVP area
-pvp_n_7-3.gat,0,0,0,0 monster Phreeoni 1159,3,60000,66000
-pvp_n_7-3.gat,0,0,0,0 monster Turtle General 1312,1,60000,66000
-pvp_n_7-3.gat,0,0,0,0 monster Orc Hero 1087,2,60000,66000
-pvp_n_7-3.gat,0,0,0,0 monster Orc Lord 1190,3,60000,66000
-// --- Eighth Beta-MVP area
-pvp_n_8-3.gat,0,0,0,0 monster Phreeoni 1159,3,60000,66000
-pvp_n_8-3.gat,0,0,0,0 monster Turtle General 1312,3,60000,66000
-pvp_n_8-3.gat,0,0,0,0 monster Orc Hero 1087,3,60000,66000
-pvp_n_8-3.gat,0,0,0,0 monster Orc Lord 1190,3,60000,66000
-
-// --- Theta-MVP Maps
-// --- First Theta-MVP area
-pvp_n_1-4.gat,0,0,0,0 monster Drake 1112,3,60000,66000
-pvp_n_1-4.gat,0,0,0,0 monster Osiris 1038,1,60000,66000
-// --- Second Theta-MVP area
-pvp_n_2-4.gat,0,0,0,0 monster Drake 1112,2,60000,66000
-pvp_n_2-4.gat,0,0,0,0 monster Osiris 1038,1,60000,66000
-pvp_n_2-4.gat,0,0,0,0 monster Doppelganger 1046,1,60000,66000
-// --- Third Theta-MVP area
-pvp_n_3-4.gat,0,0,0,0 monster Drake 1112,1,60000,66000
-pvp_n_3-4.gat,0,0,0,0 monster Osiris 1038,1,60000,66000
-pvp_n_3-4.gat,0,0,0,0 monster Doppelganger 1046,1,60000,66000
-pvp_n_3-4.gat,0,0,0,0 monster Lord of Death 1373,1,60000,66000
-// --- Fourth Theta-MVP area
-pvp_n_4-4.gat,0,0,0,0 monster Drake 1112,2,60000,66000
-pvp_n_4-4.gat,0,0,0,0 monster Osiris 1038,1,60000,66000
-pvp_n_4-4.gat,0,0,0,0 monster Doppelganger 1046,2,60000,66000
-pvp_n_4-4.gat,0,0,0,0 monster Lord of Death 1373,1,60000,66000
-// --- Fifth Theta-MVP area
-pvp_n_5-4.gat,0,0,0,0 monster Drake 1112,3,60000,66000
-pvp_n_5-4.gat,0,0,0,0 monster Osiris 1038,2,60000,66000
-pvp_n_5-4.gat,0,0,0,0 monster Doppelganger 1046,2,60000,66000
-pvp_n_5-4.gat,0,0,0,0 monster Lord of Death 1373,1,60000,66000
-// --- Sixth Theta-MVP area
-pvp_n_6-4.gat,0,0,0,0 monster Drake 1112,3,60000,66000
-pvp_n_6-4.gat,0,0,0,0 monster Osiris 1038,2,60000,66000
-pvp_n_6-4.gat,0,0,0,0 monster Doppelganger 1046,2,60000,66000
-pvp_n_6-4.gat,0,0,0,0 monster Lord of Death 1373,2,60000,66000
-// --- Seventh Theta-MVP area
-pvp_n_7-4.gat,0,0,0,0 monster Drake 1112,3,60000,66000
-pvp_n_7-4.gat,0,0,0,0 monster Osiris 1038,2,60000,66000
-pvp_n_7-4.gat,0,0,0,0 monster Doppelganger 1046,3,60000,66000
-pvp_n_7-4.gat,0,0,0,0 monster Lord of Death 1373,2,60000,66000
-// --- Eighth Theta-MVP area
-pvp_n_8-4.gat,0,0,0,0 monster Drake 1112,3,60000,66000
-pvp_n_8-4.gat,0,0,0,0 monster Osiris 1038,3,60000,66000
-pvp_n_8-4.gat,0,0,0,0 monster Doppelganger 1046,3,60000,66000
-pvp_n_8-4.gat,0,0,0,0 monster Lord of Death 1373,3,60000,66000
-
-// --- Epsilon-MVP Maps
-// --- First Epsilon-MVP area
-pvp_n_1-5.gat,0,0,0,0 monster Incantation Samurai 1492,3,60000,66000
-pvp_n_1-5.gat,0,0,0,0 monster Pharoh 1157,1,60000,66000
-// --- First Epsilon-MVP area
-pvp_n_2-5.gat,0,0,0,0 monster Incantation Samurai 1492,2,60000,66000
-pvp_n_2-5.gat,0,0,0,0 monster Pharoh 1157,1,60000,66000
-pvp_n_2-5.gat,0,0,0,0 monster Dark Lord 1272,1,60000,66000
-// --- First Epsilon-MVP area
-pvp_n_3-5.gat,0,0,0,0 monster Incantation Samurai 1492,1,60000,66000
-pvp_n_3-5.gat,0,0,0,0 monster Pharoh 1157,1,60000,66000
-pvp_n_3-5.gat,0,0,0,0 monster Dark Lord 1272,1,60000,66000
-pvp_n_3-5.gat,0,0,0,0 monster Baphomet 1039,1,60000,66000
-// --- First Epsilon-MVP area
-pvp_n_4-5.gat,0,0,0,0 monster Incantation Samurai 1492,3,60000,66000
-pvp_n_4-5.gat,0,0,0,0 monster Pharoh 1157,1,60000,66000
-pvp_n_4-5.gat,0,0,0,0 monster Dark Lord 1272,1,60000,66000
-pvp_n_4-5.gat,0,0,0,0 monster Baphomet 1039,1,60000,66000
-// --- First Epsilon-MVP area
-pvp_n_5-5.gat,0,0,0,0 monster Incantation Samurai 1492,2,60000,66000
-pvp_n_5-5.gat,0,0,0,0 monster Pharoh 1157,2,60000,66000
-pvp_n_5-5.gat,0,0,0,0 monster Dark Lord 1272,2,60000,66000
-pvp_n_5-5.gat,0,0,0,0 monster Baphomet 1039,1,60000,66000
-// --- First Epsilon-MVP area
-pvp_n_6-5.gat,0,0,0,0 monster Incantation Samurai 1492,2,60000,66000
-pvp_n_6-5.gat,0,0,0,0 monster Pharoh 1157,2,60000,66000
-pvp_n_6-5.gat,0,0,0,0 monster Dark Lord 1272,2,60000,66000
-pvp_n_6-5.gat,0,0,0,0 monster Baphomet 1039,1,60000,66000
-// --- First Epsilon-MVP area
-pvp_n_7-5.gat,0,0,0,0 monster Incantation Samurai 1492,2,60000,66000
-pvp_n_7-5.gat,0,0,0,0 monster Pharoh 1157,2,60000,66000
-pvp_n_7-5.gat,0,0,0,0 monster Dark Lord 1272,2,60000,66000
-pvp_n_7-5.gat,0,0,0,0 monster Baphomet 1039,2,60000,66000
-// --- First Epsilon-MVP area
-pvp_n_8-5.gat,0,0,0,0 monster Incantation Samurai 1492,3,60000,66000
-pvp_n_8-5.gat,0,0,0,0 monster Pharoh 1157,2,60000,66000
-pvp_n_8-5.gat,0,0,0,0 monster Dark Lord 1272,2,60000,66000
-pvp_n_8-5.gat,0,0,0,0 monster Baphomet 1039,2,60000,66000
+// ---- MVP ARENA!!!!!! By Darkchild with 16 diff MVP's inside +// --- NPC in prontera +prontera.gat,154,197,3 script MVP Warper 768,{ +mes "[ ^0065DFMVP Warper^000000 ]"; +mes "Would you like to go to the MVP Arena ?..."; +menu "Yes!",L_MVP,"No thanks.",L_No; + +L_MVP: +warp "quiz_00",44,24; +close; +L_No: +close; +} +// --- Inside the Arena +// --- NPC's That explains thigns +quiz_00.gat,49,31,4 script MVP Arena Guide 778,{ +menu "Intro",L_Intro,"I want to go back",L_Leave,"Heal me please",L_Heal,"Cancel",L_Cancel; + +L_Intro: +mes "[ ^0065DFMVP Arena Guide^000000 ]"; +mes "Welcome and behold this sacred place, Here you will find out if you truly have what it takes to call yourself a warrior, and a Team mate."; +next; +mes "Here in [ ^0065DFSvRO^000000 ] we like to be a family, and as a family you learn you must help and assist one-another, so if you want to survive you should learn to Co-operate."; +next; +mes "There are Plenty of rooms with MVP's in them so don't all fight over the one room just cause you think it's the only one, just move to the next one."; +next; +mes "If you can't get along, and there is too much complaining about people stealing MVP kills and items... then this place will be removed."; +next; +mes "Now the npc's are in groups of monsters, there are 4 different mvps per each npc, i wont tell you which it's a surprise hehe."; +next; +mes "Good luck, Live long and Prosper!."; +close; + +L_Leave: +warp "prontera",156,179; +close; + +L_Heal: +Heal 32500,32500; +close; + +L_Cancel: +close; +} + +// --- The first Alpha-MVP warper +quiz_00.gat,56,31,4 script Alpha MVP 770,{ +mes "[ ^0065DFAlpha MVP^000000 ]"; +mes "I am the first Keeper, are you ready?."; +menu "Yes!",L_Yes,"Urrr No.",L_No; + +L_Yes: +mes "[ ^0065DFAlpha MVP^000000 ]"; +mes "Which Arena you want to go to??"; + menu "Arena 1 [" + getmapusers("pvp_n_1-2.gat") + " / 50]",Larena1, + "Arena 2 [" + getmapusers("pvp_n_2-2.gat") + " / 50]",Larena2, + "Arena 3 [" + getmapusers("pvp_n_3-2.gat") + " / 15]",Larena3, + "Arena 4 [" + getmapusers("pvp_n_4-2.gat") + " / 15]",Larena4, + "Arena 5 [" + getmapusers("pvp_n_5-2.gat") + " / 15]",Larena5, + "Arena 6 [" + getmapusers("pvp_n_2-2.gat") + " / 15]",Larena6, + "Arena 7 [" + getmapusers("pvp_n_3-2.gat") + " / 15]",Larena7, + "Arena 8 [" + getmapusers("pvp_n_4-2.gat") + " / 15]",Larena8, + "Quit",Lcancel; + +L_No: +close; + +Larena1: +if (getmapusers("pvp_n_1-2.gat") > 49) goto Lsorry; +mes "[ ^0065DFAlpha MVP^000000 ]"; +mes "Here you go!"; +warp "pvp_n_1-2",102,102; +close; + +Larena2: +if (getmapusers("pvp_n_2-2.gat") > 49) goto Lsorry; +mes "[ ^0065DFAlpha MVP^000000 ]"; +mes "Here you go!"; +warp "pvp_n_2-2",102,102; +close; + +Larena3: +if (getmapusers("pvp_n_3-2.gat") > 14) goto Lsorry; +mes "[ ^0065DFAlpha MVP^000000 ]"; +mes "Here you go!"; +warp "pvp_n_3-2",102,102; +close; + +Larena4: +if (getmapusers("pvp_n_4-2.gat") > 14) goto Lsorry; +mes "[ ^0065DFAlpha MVP^000000 ]"; +mes "Here you go!"; +warp "pvp_n_4-2",102,102; +close; + +Larena5: +if (getmapusers("pvp_n_5-2.gat") > 14) goto Lsorry; +mes "[ ^0065DFAlpha MVP^000000 ]"; +mes "Here you go!"; +warp "pvp_n_5-2",102,102; +close; + +Larena6: +if (getmapusers("pvp_n_6-2.gat") > 14) goto Lsorry; +mes "[ ^0065DFAlpha MVP^000000 ]"; +mes "Here you go!"; +warp "pvp_n_6-2",102,102; +close; + +Larena7: +if (getmapusers("pvp_n_7-2.gat") > 14) goto Lsorry; +mes "[ ^0065DFAlpha MVP^000000 ]"; +mes "Here you go!"; +warp "pvp_n_7-2",102,102; +close; + +Larena8: +if (getmapusers("pvp_n_8-2.gat") > 14) goto Lsorry; +mes "[ ^0065DFAlpha MVP^000000 ]"; +mes "Here you go!"; +warp "pvp_n_8-2",102,102; +close; + +Lsorry: +mes "[ ^0065DFAlpha MVP^000000 ]"; +mes "Sorry but this Arena is already full, maybe you can try another one!"; +close; +} + +// --- The first Beta-MVP warper +quiz_00.gat,58,31,4 script Beta MVP 773,{ +mes "[ ^0065DFAlpha MVP^000000 ]"; +mes "I am the first Keeper, are you ready?."; +menu "Yes!",L_Yes,"Urrr No.",L_No; + +L_Yes: +mes "[ ^0065DFBeta MVP^000000 ]"; +mes "Which Arena you want to go to??"; + menu "Arena 1 [" + getmapusers("pvp_n_1-3.gat") + " / 50]",Larena1, + "Arena 2 [" + getmapusers("pvp_n_2-3.gat") + " / 15]",Larena2, + "Arena 3 [" + getmapusers("pvp_n_3-3.gat") + " / 15]",Larena3, + "Arena 4 [" + getmapusers("pvp_n_4-3.gat") + " / 15]",Larena4, + "Arena 5 [" + getmapusers("pvp_n_5-3.gat") + " / 15]",Larena5, + "Arena 6 [" + getmapusers("pvp_n_2-3.gat") + " / 15]",Larena6, + "Arena 7 [" + getmapusers("pvp_n_3-3.gat") + " / 15]",Larena7, + "Arena 8 [" + getmapusers("pvp_n_4-3.gat") + " / 15]",Larena8, + "Quit",Lcancel; + +L_No: +close; + +Larena1: +if (getmapusers("pvp_n_1-3.gat") > 49) goto Lsorry; +mes "[ ^0065DFBeta MVP^000000 ]"; +mes "Here you go!"; +warp "pvp_n_1-3",102,102; +close; + +Larena2: +if (getmapusers("pvp_n_2-3.gat") > 14) goto Lsorry; +mes "[ ^0065DFBeta MVP^000000 ]"; +mes "Here you go!"; +warp "pvp_n_2-3",102,102; +close; + +Larena3: +if (getmapusers("pvp_n_3-3.gat") > 14) goto Lsorry; +mes "[ ^0065DFBeta MVP^000000 ]"; +mes "Here you go!"; +warp "pvp_n_3-3",102,102; +close; + +Larena4: +if (getmapusers("pvp_n_4-3.gat") > 14) goto Lsorry; +mes "[ ^0065DFBeta MVP^000000 ]"; +mes "Here you go!"; +warp "pvp_n_4-3.gat",102,102; +close; + +Larena5: +if (getmapusers("pvp_n_5-3.gat") > 14) goto Lsorry; +mes "[ ^0065DFBeta MVP^000000 ]"; +mes "Here you go!"; +warp "pvp_n_5-3.gat",102,102; +close; + +Larena6: +if (getmapusers("pvp_n_6-3.gat") > 14) goto Lsorry; +mes "[ ^0065DFBeta MVP^000000 ]"; +mes "Here you go!"; +warp "pvp_n_6-3.gat",102,102; +close; + +Larena7: +if (getmapusers("pvp_n_7-3.gat") > 14) goto Lsorry; +mes "[ ^0065DFBeta MVP^000000 ]"; +mes "Here you go!"; +warp "pvp_n_7-3.gat",102,102; +close; + +Larena8: +if (getmapusers("pvp_n_8-3.gat") > 14) goto Lsorry; +mes "[ ^0065DFBeta MVP^000000 ]"; +mes "Here you go!"; +warp "pvp_n_8-3.gat",102,102; +close; + +Lsorry: +mes "[ ^0065DFBeta MVP^000000 ]"; +mes "Sorry but this Arena is already full, maybe you can try another one!"; +close; +} + + +// --- The first Theta-MVP warper +quiz_00.gat,60,31,4 script Theta MVP 774,{ +mes "[ ^0065DFTheta MVP^000000 ]"; +mes "I am the first Keeper, are you ready?."; +menu "Yes!",L_Yes,"Urrr No.",L_No; + +L_Yes: +mes "[ ^0065DFTheta MVP^000000 ]"; +mes "Which Arena you want to go to??"; + menu "Arena 1 [" + getmapusers("pvp_n_1-4.gat") + " / 50]",Larena1, + "Arena 2 [" + getmapusers("pvp_n_2-4.gat") + " / 15]",Larena2, + "Arena 3 [" + getmapusers("pvp_n_3-4.gat") + " / 15]",Larena3, + "Arena 4 [" + getmapusers("pvp_n_4-4.gat") + " / 15]",Larena4, + "Arena 5 [" + getmapusers("pvp_n_5-4.gat") + " / 15]",Larena5, + "Arena 6 [" + getmapusers("pvp_n_2-4.gat") + " / 15]",Larena6, + "Arena 7 [" + getmapusers("pvp_n_3-4.gat") + " / 15]",Larena7, + "Arena 8 [" + getmapusers("pvp_n_4-4.gat") + " / 15]",Larena8, + "Quit",Lcancel; + +L_No: +close; + +Larena1: +if (getmapusers("pvp_n_1-4.gat") > 49) goto Lsorry; +mes "[ ^0065DFTheta MVP^000000 ]"; +mes "Here you go!"; +warp "pvp_n_1-4.gat",102,102; +close; + +Larena2: +if (getmapusers("pvp_n_2-4.gat") > 14) goto Lsorry; +mes "[ ^0065DFTheta MVP^000000 ]"; +mes "Here you go!"; +warp "pvp_n_2-4.gat",102,102; +close; + +Larena3: +if (getmapusers("pvp_n_3-4.gat") > 14) goto Lsorry; +mes "[ ^0065DFTheta MVP^000000 ]"; +mes "Here you go!"; +warp "pvp_n_3-4.gat",102,102; +close; + +Larena4: +if (getmapusers("pvp_n_4-4.gat") > 14) goto Lsorry; +mes "[ ^0065DFTheta MVP^000000 ]"; +mes "Here you go!"; +warp "pvp_n_4-4.gat",102,102; +close; + +Larena5: +if (getmapusers("pvp_n_5-4.gat") > 14) goto Lsorry; +mes "[ ^0065DFTheta MVP^000000 ]"; +mes "Here you go!"; +warp "pvp_n_5-4.gat",102,102; +close; + +Larena6: +if (getmapusers("pvp_n_6-4.gat") > 14) goto Lsorry; +mes "[ ^0065DFTheta MVP^000000 ]"; +mes "Here you go!"; +warp "pvp_n_6-4.gat",102,102; +close; + +Larena7: +if (getmapusers("pvp_n_7-4.gat") > 14) goto Lsorry; +mes "[ ^0065DFTheta MVP^000000 ]"; +mes "Here you go!"; +warp "pvp_n_7-4.gat",102,102; +close; + +Larena8: +if (getmapusers("pvp_n_8-4.gat") > 14) goto Lsorry; +mes "[ ^0065DFTheta MVP^000000 ]"; +mes "Here you go!"; +warp "pvp_n_8-4.gat",102,102; +close; + +Lsorry: +mes "[ ^0065DFTheta MVP^000000 ]"; +mes "Sorry but this Arena is already full, maybe you can try another one!"; +close; +} + + +// --- The first Epsilon-MVP warper +quiz_00.gat,62,31,4 script Epsilon MVP 776,{ +mes "[ ^0065DFEpsilon MVP^000000 ]"; +mes "I am the first Keeper, are you ready?."; +menu "Yes!",L_Yes,"Urrr No.",L_No; + +L_Yes: +mes "[ ^0065DFEpsilon MVP^000000 ]"; +mes "Which Arena you want to go to??"; + menu "Arena 1 [" + getmapusers("pvp_n_1-5.gat") + " / 50]",Larena1, + "Arena 2 [" + getmapusers("pvp_n_2-5.gat") + " / 15]",Larena2, + "Arena 3 [" + getmapusers("pvp_n_3-5.gat") + " / 15]",Larena3, + "Arena 4 [" + getmapusers("pvp_n_4-5.gat") + " / 15]",Larena4, + "Arena 5 [" + getmapusers("pvp_n_5-5.gat") + " / 15]",Larena5, + "Arena 6 [" + getmapusers("pvp_n_2-5.gat") + " / 15]",Larena6, + "Arena 7 [" + getmapusers("pvp_n_3-5.gat") + " / 15]",Larena7, + "Arena 8 [" + getmapusers("pvp_n_4-5.gat") + " / 15]",Larena8, + "Quit",Lcancel; + +L_No: +close; + +Larena1: +if (getmapusers("pvp_n_1-5.gat") > 49) goto Lsorry; +mes "[ ^0065DFEpsilon MVP^000000 ]"; +mes "Here you go!"; +warp "pvp_n_1-5.gat",102,102; +close; + +Larena2: +if (getmapusers("pvp_n_2-5.gat") > 14) goto Lsorry; +mes "[ ^0065DFEpsilon MVP^000000 ]"; +mes "Here you go!"; +warp "pvp_n_2-5.gat",102,102; +close; + +Larena3: +if (getmapusers("pvp_n_3-5.gat") > 14) goto Lsorry; +mes "[ ^0065DFEpsilon MVP^000000 ]"; +mes "Here you go!"; +warp "pvp_n_3-5.gat",102,102; +close; + +Larena4: +if (getmapusers("pvp_n_4-5.gat") > 14) goto Lsorry; +mes "[ ^0065DFEpsilon MVP^000000 ]"; +mes "Here you go!"; +warp "pvp_n_4-5.gat",102,102; +close; + +Larena5: +if (getmapusers("pvp_n_5-5.gat") > 14) goto Lsorry; +mes "[ ^0065DFEpsilon MVP^000000 ]"; +mes "Here you go!"; +warp "pvp_n_5-5.gat",102,102; +close; + +Larena6: +if (getmapusers("pvp_n_6-5.gat") > 14) goto Lsorry; +mes "[ ^0065DFEpsilon MVP^000000 ]"; +mes "Here you go!"; +warp "pvp_n_6-5.gat",102,102; +close; + +Larena7: +if (getmapusers("pvp_n_7-5.gat") > 14) goto Lsorry; +mes "[ ^0065DFEpsilon MVP^000000 ]"; +mes "Here you go!"; +warp "pvp_n_7-5.gat",102,102; +close; + +Larena8: +if (getmapusers("pvp_n_8-5.gat") > 14) goto Lsorry; +mes "[ ^0065DFEpsilon MVP^000000 ]"; +mes "Here you go!"; +warp "pvp_n_8-5.gat",102,102; +close; + +Lsorry: +mes "[ ^0065DFEpsilon MVP^000000 ]"; +mes "Sorry but this Arena is already full, maybe you can try another one!"; +close; +} + + +// ---- Inside MVP-Arena NPC's +// --- Alpha-MVP #1 +pvp_n_1-2.gat,100,100,4 script MVP-Protector 727,{ + mes "[ ^0065DFMVP-Protector^000000 ]"; + mes "How do you need help?."; + menu "Harder Monsters",L_Next,"Heal Please",L_Heal,"Leave",L_Leave; + + L_Next: + warp "pvp_n_2-2",102,102; + close; + + L_Heal: + Heal 32500,32500; + close; + + L_Leave: + warp "prontera",156,179; + close; +} + +// --- Alpha-MVP #2 +pvp_n_2-2.gat,100,100,4 script MVP-Protector 727,{ + mes "[ ^0065DFMVP-Protector^000000 ]"; + mes "How do you need help?."; + menu "Harder Monsters",L_Next,"Heal Please",L_Heal,"Leave",L_Leave; + + L_Next: + warp "pvp_n_3-2",102,102; + close; + + L_Heal: + Heal 32500,32500; + close; + + L_Leave: + warp "prontera",156,179; + close; +} +// --- Alpha-MVP #3 +pvp_n_3-2.gat,100,100,4 script MVP-Protector 727,{ + mes "[ ^0065DFMVP-Protector^000000 ]"; + mes "How do you need help?."; + menu "Harder Monsters",L_Next,"Heal Please",L_Heal,"Leave",L_Leave; + + L_Next: + warp "pvp_n_4-2.gat",102,102; + close; + + L_Heal: + Heal 32500,32500; + close; + + L_Leave: + warp "prontera.gat",156,179; + close; +} +// --- Alpha-MVP #4 +pvp_n_4-2.gat,100,100,4 script MVP-Protector 727,{ + mes "[ ^0065DFMVP-Protector^000000 ]"; + mes "How do you need help?."; + menu "Harder Monsters",L_Next,"Heal Please",L_Heal,"Leave",L_Leave; + + L_Next: + warp "pvp_n_5-2.gat",102,102; + close; + + L_Heal: + Heal 32500,32500; + close; + + L_Leave: + warp "prontera.gat",156,179; + close; +} +// --- Alpha-MVP #5 +pvp_n_5-2.gat,100,100,4 script MVP-Protector 727,{ + mes "[ ^0065DFMVP-Protector^000000 ]"; + mes "How do you need help?."; + menu "Harder Monsters",L_Next,"Heal Please",L_Heal,"Leave",L_Leave; + + L_Next: + warp "pvp_n_6-2.gat",102,102; + close; + + L_Heal: + Heal 32500,32500; + close; + + L_Leave: + warp "prontera.gat",156,179; + close; +} +// --- Alpha-MVP #6 +pvp_n_6-2.gat,100,100,4 script MVP-Protector 727,{ + mes "[ ^0065DFMVP-Protector^000000 ]"; + mes "How do you need help?."; + menu "Harder Monsters",L_Next,"Heal Please",L_Heal,"Leave",L_Leave; + + L_Next: + warp "pvp_n_7-2.gat",102,102; + close; + + L_Heal: + Heal 32500,32500; + close; + + L_Leave: + warp "prontera.gat",156,179; + close; +} +// --- Alpha-MVP #7 +pvp_n_7-2.gat,100,100,4 script MVP-Protector 727,{ + mes "[ ^0065DFMVP-Protector^000000 ]"; + mes "How do you need help?."; + menu "Harder Monsters",L_Next,"Heal Please",L_Heal,"Leave",L_Leave; + + L_Next: + warp "pvp_n_8-2.gat",102,102; + close; + + L_Heal: + Heal 32500,32500; + close; + + L_Leave: + warp "prontera.gat",156,179; + close; +} +// --- Alpha-MVP #8 +pvp_n_8-2.gat,100,100,4 script MVP-Protector 727,{ + mes "[ ^0065DFMVP-Protector^000000 ]"; + mes "How do you need help?."; + menu "Heal Please",L_Heal,"Leave",L_Leave; + + L_Heal: + Heal 32500,32500; + close; + + L_Leave: + warp "prontera.gat",156,179; + close; +} +// --- Beta-MVP #1 +pvp_n_1-3.gat,100,100,4 script MVP-Protector 727,{ + mes "[ ^0065DFMVP-Protector^000000 ]"; + mes "How do you need help?."; + menu "Harder Monsters",L_Next,"Heal Please",L_Heal,"Leave",L_Leave; + + L_Next: + warp "pvp_n_2-3.gat",102,102; + close; + + L_Heal: + Heal 32500,32500; + close; + + L_Leave: + warp "prontera.gat",156,179; + close; +} + +// --- Beta-MVP #2 +pvp_n_2-3.gat,100,100,4 script MVP-Protector 727,{ + mes "[ ^0065DFMVP-Protector^000000 ]"; + mes "How do you need help?."; + menu "Harder Monsters",L_Next,"Heal Please",L_Heal,"Leave",L_Leave; + + L_Next: + warp "pvp_n_3-3.gat",102,102; + close; + + L_Heal: + Heal 32500,32500; + close; + + L_Leave: + warp "prontera.gat",156,179; + close; +} +// --- Beta-MVP #3 +pvp_n_3-3.gat,100,100,4 script MVP-Protector 727,{ + mes "[ ^0065DFMVP-Protector^000000 ]"; + mes "How do you need help?."; + menu "Harder Monsters",L_Next,"Heal Please",L_Heal,"Leave",L_Leave; + + L_Next: + warp "pvp_n_4-3.gat",102,102; + close; + + L_Heal: + Heal 32500,32500; + close; + + L_Leave: + warp "prontera.gat",156,179; + close; +} +// --- Beta-MVP #4 +pvp_n_4-3.gat,100,100,4 script MVP-Protector 727,{ + mes "[ ^0065DFMVP-Protector^000000 ]"; + mes "How do you need help?."; + menu "Harder Monsters",L_Next,"Heal Please",L_Heal,"Leave",L_Leave; + + L_Next: + warp "pvp_n_5-3.gat",102,102; + close; + + L_Heal: + Heal 32500,32500; + close; + + L_Leave: + warp "prontera.gat",156,179; + close; +} +// --- Beta-MVP #5 +pvp_n_5-3.gat,100,100,4 script MVP-Protector 727,{ + mes "[ ^0065DFMVP-Protector^000000 ]"; + mes "How do you need help?."; + menu "Harder Monsters",L_Next,"Heal Please",L_Heal,"Leave",L_Leave; + + L_Next: + warp "pvp_n_6-3.gat",102,102; + close; + + L_Heal: + Heal 32500,32500; + close; + + L_Leave: + warp "prontera.gat",156,179; + close; +} +// --- Beta-MVP #6 +pvp_n_6-3.gat,100,100,4 script MVP-Protector 727,{ + mes "[ ^0065DFMVP-Protector^000000 ]"; + mes "How do you need help?."; + menu "Harder Monsters",L_Next,"Heal Please",L_Heal,"Leave",L_Leave; + + L_Next: + warp "pvp_n_7-3.gat",102,102; + close; + + L_Heal: + Heal 32500,32500; + close; + + L_Leave: + warp "prontera.gat",156,179; + close; +} +// --- Beta-MVP #7 +pvp_n_7-3.gat,100,100,4 script MVP-Protector 727,{ + mes "[ ^0065DFMVP-Protector^000000 ]"; + mes "How do you need help?."; + menu "Harder Monsters",L_Next,"Heal Please",L_Heal,"Leave",L_Leave; + + L_Next: + warp "pvp_n_8-3.gat",102,102; + close; + + L_Heal: + Heal 32500,32500; + close; + + L_Leave: + warp "prontera.gat",156,179; + close; +} +// --- Beta-MVP #8 +pvp_n_8-3.gat,100,100,4 script MVP-Protector 727,{ + mes "[ ^0065DFMVP-Protector^000000 ]"; + mes "How do you need help?."; + menu "Heal Please",L_Heal,"Leave",L_Leave; + + L_Heal: + Heal 32500,32500; + close; + + L_Leave: + warp "prontera.gat",156,179; + close; +} +// --- Theta-MVP #1 +pvp_n_1-4.gat,100,100,4 script MVP-Protector 727,{ + mes "[ ^0065DFMVP-Protector^000000 ]"; + mes "How do you need help?."; + menu "Harder Monsters",L_Next,"Heal Please",L_Heal,"Leave",L_Leave; + + L_Next: + warp "pvp_n_2-4.gat",102,102; + close; + + L_Heal: + Heal 32500,32500; + close; + + L_Leave: + warp "prontera.gat",156,179; + close; +} + +// --- Theta-MVP #2 +pvp_n_2-4.gat,100,100,4 script MVP-Protector 727,{ + mes "[ ^0065DFMVP-Protector^000000 ]"; + mes "How do you need help?."; + menu "Harder Monsters",L_Next,"Heal Please",L_Heal,"Leave",L_Leave; + + L_Next: + warp "pvp_n_3-4.gat",102,102; + close; + + L_Heal: + Heal 32500,32500; + close; + + L_Leave: + warp "prontera.gat",156,179; + close; +} +// --- Theta-MVP #3 +pvp_n_3-4.gat,100,100,4 script MVP-Protector 727,{ + mes "[ ^0065DFMVP-Protector^000000 ]"; + mes "How do you need help?."; + menu "Harder Monsters",L_Next,"Heal Please",L_Heal,"Leave",L_Leave; + + L_Next: + warp "pvp_n_4-4.gat",102,102; + close; + + L_Heal: + Heal 32500,32500; + close; + + L_Leave: + warp "prontera.gat",156,179; + close; +} +// --- Theta-MVP #4 +pvp_n_4-4.gat,100,100,4 script MVP-Protector 727,{ + mes "[ ^0065DFMVP-Protector^000000 ]"; + mes "How do you need help?."; + menu "Harder Monsters",L_Next,"Heal Please",L_Heal,"Leave",L_Leave; + + L_Next: + warp "pvp_n_5-4.gat",102,102; + close; + + L_Heal: + Heal 32500,32500; + close; + + L_Leave: + warp "prontera.gat",156,179; + close; +} +// --- Theta-MVP #5 +pvp_n_5-4.gat,100,100,4 script MVP-Protector 727,{ + mes "[ ^0065DFMVP-Protector^000000 ]"; + mes "How do you need help?."; + menu "Harder Monsters",L_Next,"Heal Please",L_Heal,"Leave",L_Leave; + + L_Next: + warp "pvp_n_6-4.gat",102,102; + close; + + L_Heal: + Heal 32500,32500; + close; + + L_Leave: + warp "prontera.gat",156,179; + close; +} +// --- Theta-MVP #6 +pvp_n_6-4.gat,100,100,4 script MVP-Protector 727,{ + mes "[ ^0065DFMVP-Protector^000000 ]"; + mes "How do you need help?."; + menu "Harder Monsters",L_Next,"Heal Please",L_Heal,"Leave",L_Leave; + + L_Next: + warp "pvp_n_7-4.gat",102,102; + close; + + L_Heal: + Heal 32500,32500; + close; + + L_Leave: + warp "prontera.gat",156,179; + close; +} +// --- Theta-MVP #7 +pvp_n_7-4.gat,100,100,4 script MVP-Protector 727,{ + mes "[ ^0065DFMVP-Protector^000000 ]"; + mes "How do you need help?."; + menu "Harder Monsters",L_Next,"Heal Please",L_Heal,"Leave",L_Leave; + + L_Next: + warp "pvp_n_8-4.gat",102,102; + close; + + L_Heal: + Heal 32500,32500; + close; + + L_Leave: + warp "prontera.gat",156,179; + close; +} +// --- Theta-MVP #8 +pvp_n_8-4.gat,100,100,4 script MVP-Protector 727,{ + mes "[ ^0065DFMVP-Protector^000000 ]"; + mes "How do you need help?."; + menu "Heal Please",L_Heal,"Leave",L_Leave; + + L_Heal: + Heal 32500,32500; + close; + + L_Leave: + warp "prontera.gat",156,179; + close; +} +// --- Epsilon-MVP #1 +pvp_n_1-5.gat,100,100,4 script MVP-Protector 727,{ + mes "[ ^0065DFMVP-Protector^000000 ]"; + mes "How do you need help?."; + menu "Harder Monsters",L_Next,"Heal Please",L_Heal,"Leave",L_Leave; + + L_Next: + warp "pvp_n_2-5.gat",102,102; + close; + + L_Heal: + Heal 32500,32500; + close; + + L_Leave: + warp "prontera.gat",156,179; + close; +} + +// --- Epsilon-MVP #2 +pvp_n_2-5.gat,100,100,4 script MVP-Protector 727,{ + mes "[ ^0065DFMVP-Protector^000000 ]"; + mes "How do you need help?."; + menu "Harder Monsters",L_Next,"Heal Please",L_Heal,"Leave",L_Leave; + + L_Next: + warp "pvp_n_3-5.gat",102,102; + close; + + L_Heal: + Heal 32500,32500; + close; + + L_Leave: + warp "prontera.gat",156,179; + close; +} +// --- Epsilon-MVP #3 +pvp_n_3-5.gat,100,100,4 script MVP-Protector 727,{ + mes "[ ^0065DFMVP-Protector^000000 ]"; + mes "How do you need help?."; + menu "Harder Monsters",L_Next,"Heal Please",L_Heal,"Leave",L_Leave; + + L_Next: + warp "pvp_n_4-5.gat",102,102; + close; + + L_Heal: + Heal 32500,32500; + close; + + L_Leave: + warp "prontera.gat",156,179; + close; +} +// --- Epsilon-MVP #4 +pvp_n_4-5.gat,100,100,4 script MVP-Protector 727,{ + mes "[ ^0065DFMVP-Protector^000000 ]"; + mes "How do you need help?."; + menu "Harder Monsters",L_Next,"Heal Please",L_Heal,"Leave",L_Leave; + + L_Next: + warp "pvp_n_5-5.gat",102,102; + close; + + L_Heal: + Heal 32500,32500; + close; + + L_Leave: + warp "prontera.gat",156,179; + close; +} +// --- Epsilon-MVP #5 +pvp_n_5-5.gat,100,100,4 script MVP-Protector 727,{ + mes "[ ^0065DFMVP-Protector^000000 ]"; + mes "How do you need help?."; + menu "Harder Monsters",L_Next,"Heal Please",L_Heal,"Leave",L_Leave; + + L_Next: + warp "pvp_n_6-5.gat",102,102; + close; + + L_Heal: + Heal 32500,32500; + close; + + L_Leave: + warp "prontera.gat",156,179; + close; +} +// --- Epsilon-MVP #6 +pvp_n_6-5.gat,100,100,4 script MVP-Protector 727,{ + mes "[ ^0065DFMVP-Protector^000000 ]"; + mes "How do you need help?."; + menu "Harder Monsters",L_Next,"Heal Please",L_Heal,"Leave",L_Leave; + + L_Next: + warp "pvp_n_7-5.gat",102,102; + close; + + L_Heal: + Heal 32500,32500; + close; + + L_Leave: + warp "prontera.gat",156,179; + close; +} +// --- Epsilon-MVP #7 +pvp_n_7-5.gat,100,100,4 script MVP-Protector 727,{ + mes "[ ^0065DFMVP-Protector^000000 ]"; + mes "How do you need help?."; + menu "Harder Monsters",L_Next,"Heal Please",L_Heal,"Leave",L_Leave; + + L_Next: + warp "pvp_n_8-5.gat",102,102; + close; + + L_Heal: + Heal 32500,32500; + close; + + L_Leave: + warp "prontera.gat",156,179; + close; +} +// --- Epsilon-MVP #8 +pvp_n_8-5.gat,100,100,4 script MVP-Protector 727,{ + mes "[ ^0065DFMVP-Protector^000000 ]"; + mes "How do you need help?."; + menu "Heal Please",L_Heal,"Leave",L_Leave; + + L_Heal: + Heal 32500,32500; + close; + + L_Leave: + warp "prontera.gat",156,179; + close; +} + +// ---- Monsters for the MVP-Arena + +// --- Alpha-MVP Maps +// --- First Alpha-MVP area +pvp_n_1-2.gat,0,0,0,0 monster Eddga 1115,3,60000,66000 +pvp_n_1-2.gat,0,0,0,0 monster Mistress 1059,1,60000,66000 +// --- Second Alpha-MVP area +pvp_n_2-2.gat,0,0,0,0 monster Mistress 1059,3,60000,66000 +pvp_n_2-2.gat,0,0,0,0 monster Moonlight 1150,1,60000,66000 +// --- Third Alpha-MVP area +pvp_n_3-2.gat,0,0,0,0 monster Mistress 1059,1,60000,66000 +pvp_n_3-2.gat,0,0,0,0 monster Moonlight 1150,2,60000,66000 +pvp_n_3-2.gat,0,0,0,0 monster Maya 1147,1,60000,66000 +// --- Fourth Alpha-MVP area +pvp_n_4-2.gat,0,0,0,0 monster Eddga 1115,1,60000,66000 +pvp_n_4-2.gat,0,0,0,0 monster Mistress 1059,1,60000,66000 +pvp_n_4-2.gat,0,0,0,0 monster Moonlight 1150,1,60000,66000 +pvp_n_4-2.gat,0,0,0,0 monster Maya 1147,1,60000,66000 +// --- Fifth Alpha-MVP area +pvp_n_5-2.gat,0,0,0,0 monster Eddga 1115,1,60000,66000 +pvp_n_5-2.gat,0,0,0,0 monster Mistress 1059,2,60000,66000 +pvp_n_5-2.gat,0,0,0,0 monster Moonlight 1150,1,60000,66000 +pvp_n_5-2.gat,0,0,0,0 monster Maya 1147,2,60000,66000 +// --- Sixth Alpha-MVP area +pvp_n_6-2.gat,0,0,0,0 monster Eddga 1115,2,60000,66000 +pvp_n_6-2.gat,0,0,0,0 monster Mistress 1059,3,60000,66000 +pvp_n_6-2.gat,0,0,0,0 monster Moonlight 1150,1,60000,66000 +pvp_n_6-2.gat,0,0,0,0 monster Maya 1147,2,60000,66000 +// --- Seventh Alpha-MVP area +pvp_n_7-2.gat,0,0,0,0 monster Eddga 1115,3,60000,66000 +pvp_n_7-2.gat,0,0,0,0 monster Mistress 1059,3,60000,66000 +pvp_n_7-2.gat,0,0,0,0 monster Moonlight 1150,2,60000,66000 +pvp_n_7-2.gat,0,0,0,0 monster Maya 1147,2,60000,66000 +// --- Eighth Alpha-MVP area +pvp_n_8-2.gat,0,0,0,0 monster Eddga 1115,3,60000,66000 +pvp_n_8-2.gat,0,0,0,0 monster Mistress 1059,3,60000,66000 +pvp_n_8-2.gat,0,0,0,0 monster Moonlight 1150,3,60000,66000 +pvp_n_8-2.gat,0,0,0,0 monster Maya 1147,3,60000,66000 + +// --- Beta-MVP Maps +// --- First Beta-MVP area +pvp_n_1-3.gat,0,0,0,0 monster Phreeoni 1159,3,60000,66000 +pvp_n_1-3.gat,0,0,0,0 monster Turtle General 1312,1,60000,66000 +// --- Second Beta-MVP area +pvp_n_2-3.gat,0,0,0,0 monster Phreeoni 1159,2,60000,66000 +pvp_n_3-3.gat,0,0,0,0 monster Turtle General 1312,1,60000,66000 +pvp_n_2-3.gat,0,0,0,0 monster Orc Hero 1087,1,60000,66000 +// --- Third Beta-MVP area +pvp_n_3-3.gat,0,0,0,0 monster Phreeoni 1159,1,60000,66000 +pvp_n_3-3.gat,0,0,0,0 monster Turtle General 1312,1,60000,66000 +pvp_n_3-3.gat,0,0,0,0 monster Orc Hero 1087,1,60000,66000 +pvp_n_3-3.gat,0,0,0,0 monster Orc Lord 1190,1,60000,66000 +// --- Fourth Beta-MVP area +pvp_n_4-3.gat,0,0,0,0 monster Phreeoni 1159,2,60000,66000 +pvp_n_4-3.gat,0,0,0,0 monster Turtle General 1312,1,60000,66000 +pvp_n_4-3.gat,0,0,0,0 monster Orc Hero 1087,1,60000,66000 +pvp_n_4-3.gat,0,0,0,0 monster Orc Lord 1190,1,60000,66000 +// --- Fifth Beta-MVP area +pvp_n_5-3.gat,0,0,0,0 monster Phreeoni 1159,1,60000,66000 +pvp_n_5-3.gat,0,0,0,0 monster Turtle General 1312,2,60000,66000 +pvp_n_5-3.gat,0,0,0,0 monster Orc Hero 1087,2,60000,66000 +pvp_n_5-3.gat,0,0,0,0 monster Orc Lord 1190,1,60000,66000 +// --- Sixth Beta-MVP area +pvp_n_6-3.gat,0,0,0,0 monster Phreeoni 1159,2,60000,66000 +pvp_n_6-3.gat,0,0,0,0 monster Turtle General 1312,1,60000,66000 +pvp_n_6-3.gat,0,0,0,0 monster Orc Hero 1087,2,60000,66000 +pvp_n_6-3.gat,0,0,0,0 monster Orc Lord 1190,2,60000,66000 +// --- Seventh Beta-MVP area +pvp_n_7-3.gat,0,0,0,0 monster Phreeoni 1159,3,60000,66000 +pvp_n_7-3.gat,0,0,0,0 monster Turtle General 1312,1,60000,66000 +pvp_n_7-3.gat,0,0,0,0 monster Orc Hero 1087,2,60000,66000 +pvp_n_7-3.gat,0,0,0,0 monster Orc Lord 1190,3,60000,66000 +// --- Eighth Beta-MVP area +pvp_n_8-3.gat,0,0,0,0 monster Phreeoni 1159,3,60000,66000 +pvp_n_8-3.gat,0,0,0,0 monster Turtle General 1312,3,60000,66000 +pvp_n_8-3.gat,0,0,0,0 monster Orc Hero 1087,3,60000,66000 +pvp_n_8-3.gat,0,0,0,0 monster Orc Lord 1190,3,60000,66000 + +// --- Theta-MVP Maps +// --- First Theta-MVP area +pvp_n_1-4.gat,0,0,0,0 monster Drake 1112,3,60000,66000 +pvp_n_1-4.gat,0,0,0,0 monster Osiris 1038,1,60000,66000 +// --- Second Theta-MVP area +pvp_n_2-4.gat,0,0,0,0 monster Drake 1112,2,60000,66000 +pvp_n_2-4.gat,0,0,0,0 monster Osiris 1038,1,60000,66000 +pvp_n_2-4.gat,0,0,0,0 monster Doppelganger 1046,1,60000,66000 +// --- Third Theta-MVP area +pvp_n_3-4.gat,0,0,0,0 monster Drake 1112,1,60000,66000 +pvp_n_3-4.gat,0,0,0,0 monster Osiris 1038,1,60000,66000 +pvp_n_3-4.gat,0,0,0,0 monster Doppelganger 1046,1,60000,66000 +pvp_n_3-4.gat,0,0,0,0 monster Lord of Death 1373,1,60000,66000 +// --- Fourth Theta-MVP area +pvp_n_4-4.gat,0,0,0,0 monster Drake 1112,2,60000,66000 +pvp_n_4-4.gat,0,0,0,0 monster Osiris 1038,1,60000,66000 +pvp_n_4-4.gat,0,0,0,0 monster Doppelganger 1046,2,60000,66000 +pvp_n_4-4.gat,0,0,0,0 monster Lord of Death 1373,1,60000,66000 +// --- Fifth Theta-MVP area +pvp_n_5-4.gat,0,0,0,0 monster Drake 1112,3,60000,66000 +pvp_n_5-4.gat,0,0,0,0 monster Osiris 1038,2,60000,66000 +pvp_n_5-4.gat,0,0,0,0 monster Doppelganger 1046,2,60000,66000 +pvp_n_5-4.gat,0,0,0,0 monster Lord of Death 1373,1,60000,66000 +// --- Sixth Theta-MVP area +pvp_n_6-4.gat,0,0,0,0 monster Drake 1112,3,60000,66000 +pvp_n_6-4.gat,0,0,0,0 monster Osiris 1038,2,60000,66000 +pvp_n_6-4.gat,0,0,0,0 monster Doppelganger 1046,2,60000,66000 +pvp_n_6-4.gat,0,0,0,0 monster Lord of Death 1373,2,60000,66000 +// --- Seventh Theta-MVP area +pvp_n_7-4.gat,0,0,0,0 monster Drake 1112,3,60000,66000 +pvp_n_7-4.gat,0,0,0,0 monster Osiris 1038,2,60000,66000 +pvp_n_7-4.gat,0,0,0,0 monster Doppelganger 1046,3,60000,66000 +pvp_n_7-4.gat,0,0,0,0 monster Lord of Death 1373,2,60000,66000 +// --- Eighth Theta-MVP area +pvp_n_8-4.gat,0,0,0,0 monster Drake 1112,3,60000,66000 +pvp_n_8-4.gat,0,0,0,0 monster Osiris 1038,3,60000,66000 +pvp_n_8-4.gat,0,0,0,0 monster Doppelganger 1046,3,60000,66000 +pvp_n_8-4.gat,0,0,0,0 monster Lord of Death 1373,3,60000,66000 + +// --- Epsilon-MVP Maps +// --- First Epsilon-MVP area +pvp_n_1-5.gat,0,0,0,0 monster Incantation Samurai 1492,3,60000,66000 +pvp_n_1-5.gat,0,0,0,0 monster Pharoh 1157,1,60000,66000 +// --- First Epsilon-MVP area +pvp_n_2-5.gat,0,0,0,0 monster Incantation Samurai 1492,2,60000,66000 +pvp_n_2-5.gat,0,0,0,0 monster Pharoh 1157,1,60000,66000 +pvp_n_2-5.gat,0,0,0,0 monster Dark Lord 1272,1,60000,66000 +// --- First Epsilon-MVP area +pvp_n_3-5.gat,0,0,0,0 monster Incantation Samurai 1492,1,60000,66000 +pvp_n_3-5.gat,0,0,0,0 monster Pharoh 1157,1,60000,66000 +pvp_n_3-5.gat,0,0,0,0 monster Dark Lord 1272,1,60000,66000 +pvp_n_3-5.gat,0,0,0,0 monster Baphomet 1039,1,60000,66000 +// --- First Epsilon-MVP area +pvp_n_4-5.gat,0,0,0,0 monster Incantation Samurai 1492,3,60000,66000 +pvp_n_4-5.gat,0,0,0,0 monster Pharoh 1157,1,60000,66000 +pvp_n_4-5.gat,0,0,0,0 monster Dark Lord 1272,1,60000,66000 +pvp_n_4-5.gat,0,0,0,0 monster Baphomet 1039,1,60000,66000 +// --- First Epsilon-MVP area +pvp_n_5-5.gat,0,0,0,0 monster Incantation Samurai 1492,2,60000,66000 +pvp_n_5-5.gat,0,0,0,0 monster Pharoh 1157,2,60000,66000 +pvp_n_5-5.gat,0,0,0,0 monster Dark Lord 1272,2,60000,66000 +pvp_n_5-5.gat,0,0,0,0 monster Baphomet 1039,1,60000,66000 +// --- First Epsilon-MVP area +pvp_n_6-5.gat,0,0,0,0 monster Incantation Samurai 1492,2,60000,66000 +pvp_n_6-5.gat,0,0,0,0 monster Pharoh 1157,2,60000,66000 +pvp_n_6-5.gat,0,0,0,0 monster Dark Lord 1272,2,60000,66000 +pvp_n_6-5.gat,0,0,0,0 monster Baphomet 1039,1,60000,66000 +// --- First Epsilon-MVP area +pvp_n_7-5.gat,0,0,0,0 monster Incantation Samurai 1492,2,60000,66000 +pvp_n_7-5.gat,0,0,0,0 monster Pharoh 1157,2,60000,66000 +pvp_n_7-5.gat,0,0,0,0 monster Dark Lord 1272,2,60000,66000 +pvp_n_7-5.gat,0,0,0,0 monster Baphomet 1039,2,60000,66000 +// --- First Epsilon-MVP area +pvp_n_8-5.gat,0,0,0,0 monster Incantation Samurai 1492,3,60000,66000 +pvp_n_8-5.gat,0,0,0,0 monster Pharoh 1157,2,60000,66000 +pvp_n_8-5.gat,0,0,0,0 monster Dark Lord 1272,2,60000,66000 +pvp_n_8-5.gat,0,0,0,0 monster Baphomet 1039,2,60000,66000 diff --git a/npc/other/bank.txt b/npc/other/bank.txt index ae8ce7829..a02412e3c 100644 --- a/npc/other/bank.txt +++ b/npc/other/bank.txt @@ -1,126 +1,126 @@ -//===== eAthena Script =======================================
-//= Banker Script
-//===== By: ==================================================
-//= Syrus22 (1.0)
-//===== Current Version: =====================================
-//= 1.0
-//===== Compatible With: =====================================
-//= Any eAthena version with Account variables.
-//===== Description: =========================================
-//= An account wide Banker to store Zeny
-//===== Additional Comments: =================================
-//= Syrus22 - There's an optional transaction fee at the top of
-//= the script. To use it simply change the first set command
-//= to set the cost variable to whatever you want the fee to be.
-//============================================================
-prontera.gat,132,217,5 script Banker 109,{
-set @cost,0;
-mes "[Banker]";
-mes "Welcome to the First Bank of Prontera. How can I help you today?";
-next;
-menu "I'd like to make a deposit.",Ldeposit,"I'd like to make a withdrawl.",Lwithdrawl,"What's my current balance?",Lbalance,"Cancel",Lcancel;
-
-Ldeposit:
- mes "[Banker]";
- mes "Very well... How much would you like to deposit? The maximum you can deposit at once is 999,999 Zeny.";
- next;
- if (@cost > 0) goto Ldepocost;
- goto Ldepocont;
-
- Ldepocost:
- mes "[Banker]";
- mes "Oh and don't forget there is a " + @cost + " Zeny charge on all transactions.";
- next;
- goto Ldepocont;
-
-Ldepocont:
- input @deposit;
- if (@deposit < 1) goto Lrealamount;
- if (@deposit > Zeny) goto Lneedzeny;
- if (@deposit > (Zeny - @cost)) goto Lneedzeny2;
- set Zeny,Zeny - @deposit;
- set Zeny,Zeny - @cost;
- set #bankstorage,#bankstorage + @deposit;
- mes "[Banker]";
- mes "Thank you very much... Your zeny is in good hands.";
- close;
-
-Lwithdrawl:
- mes "[Banker]";
- mes "Very well... How much would you like to withdraw? The maximum you can withdraw at one time is 999,999 Zeny";
- next;
- if (@cost > 0) goto Lwithcost;
- goto Lwithcont;
-
- Lwithcost:
- mes "[Banker]";
- mes "Oh and don't forget there is a " + @cost + " Zeny charge on all transactions.";
- next;
- goto Lwithcont;
-
-Lwithcont:
- input @withdrawl;
- if (@withdrawl < 1) goto Lrealamount;
- if (@withdrawl > #bankstorage) goto Lneedzeny3;
- if ((@cost > Zeny) && ((Zeny + @withdrawl) > @cost)) goto Lcostask;
- if (@cost > Zeny) goto Lneedzeny2;
- goto Lwithcont2;
-
- Lcostask:
- mes "[Banker]";
- mes "You don't have the Zeny for the transaction fee right now. Would you like me to take the fee directly from your withdrawl?";
- next;
- menu "Yes please.",Lwithtake,"No thank you.",Lcancel;
-
- Lwithtake:
- mes "[Banker]";
- mes "Ok then.";
- set @withdrawl,@withdrawl - @cost;
- set #bankstorage,#bankstorage - @cost;
- set @cost,0;
- next;
- goto Lwithcont2;
-
-Lwithcont2:
- set Zeny,Zeny - @cost;
- set Zeny,Zeny + @withdrawl;
- set #bankstorage,#bankstorage - @withdrawl;
- mes "[Banker]";
- mes "There's your Zeny. Have a good day.";
- close;
-
-Lbalance:
- mes "[Banker]";
- mes "Hmmmm lemme check the paper work.";
- next;
- mes "*Rustle, Rustle*";
- next;
- mes "[Banker]";
- mes "You currently have " + #bankstorage + " Zeny in your account.";
- close;
-
-Lrealamount:
- mes "[Banker]";
- mes "Don't play jokes with me please. Next time ask for a real amount.";
- close;
-
-Lneedzeny:
- mes "[Banker]";
- mes "You don't have enough Zeny to make that deposit.";
- close;
-
-Lneedzeny2:
- mes "[Banker]";
- mes "You don't have enough Zeny to cover the transaction fee.";
- close;
-
-Lneedzeny3:
- mes "[Banker]";
- mes "You don't have enough Zeny in your account.";
- close;
-
-Lcancel:
- mes "[Banker]";
- mes "Very well... come again soon.";
- close;
+//===== eAthena Script ======================================= +//= Banker Script +//===== By: ================================================== +//= Syrus22 (1.0) +//===== Current Version: ===================================== +//= 1.0 +//===== Compatible With: ===================================== +//= Any eAthena version with Account variables. +//===== Description: ========================================= +//= An account wide Banker to store Zeny +//===== Additional Comments: ================================= +//= Syrus22 - There's an optional transaction fee at the top of +//= the script. To use it simply change the first set command +//= to set the cost variable to whatever you want the fee to be. +//============================================================ +prontera.gat,132,217,5 script Banker 109,{ +set @cost,0; +mes "[Banker]"; +mes "Welcome to the First Bank of Prontera. How can I help you today?"; +next; +menu "I'd like to make a deposit.",Ldeposit,"I'd like to make a withdrawl.",Lwithdrawl,"What's my current balance?",Lbalance,"Cancel",Lcancel; + +Ldeposit: + mes "[Banker]"; + mes "Very well... How much would you like to deposit? The maximum you can deposit at once is 999,999 Zeny."; + next; + if (@cost > 0) goto Ldepocost; + goto Ldepocont; + + Ldepocost: + mes "[Banker]"; + mes "Oh and don't forget there is a " + @cost + " Zeny charge on all transactions."; + next; + goto Ldepocont; + +Ldepocont: + input @deposit; + if (@deposit < 1) goto Lrealamount; + if (@deposit > Zeny) goto Lneedzeny; + if (@deposit > (Zeny - @cost)) goto Lneedzeny2; + set Zeny,Zeny - @deposit; + set Zeny,Zeny - @cost; + set #bankstorage,#bankstorage + @deposit; + mes "[Banker]"; + mes "Thank you very much... Your zeny is in good hands."; + close; + +Lwithdrawl: + mes "[Banker]"; + mes "Very well... How much would you like to withdraw? The maximum you can withdraw at one time is 999,999 Zeny"; + next; + if (@cost > 0) goto Lwithcost; + goto Lwithcont; + + Lwithcost: + mes "[Banker]"; + mes "Oh and don't forget there is a " + @cost + " Zeny charge on all transactions."; + next; + goto Lwithcont; + +Lwithcont: + input @withdrawl; + if (@withdrawl < 1) goto Lrealamount; + if (@withdrawl > #bankstorage) goto Lneedzeny3; + if ((@cost > Zeny) && ((Zeny + @withdrawl) > @cost)) goto Lcostask; + if (@cost > Zeny) goto Lneedzeny2; + goto Lwithcont2; + + Lcostask: + mes "[Banker]"; + mes "You don't have the Zeny for the transaction fee right now. Would you like me to take the fee directly from your withdrawl?"; + next; + menu "Yes please.",Lwithtake,"No thank you.",Lcancel; + + Lwithtake: + mes "[Banker]"; + mes "Ok then."; + set @withdrawl,@withdrawl - @cost; + set #bankstorage,#bankstorage - @cost; + set @cost,0; + next; + goto Lwithcont2; + +Lwithcont2: + set Zeny,Zeny - @cost; + set Zeny,Zeny + @withdrawl; + set #bankstorage,#bankstorage - @withdrawl; + mes "[Banker]"; + mes "There's your Zeny. Have a good day."; + close; + +Lbalance: + mes "[Banker]"; + mes "Hmmmm lemme check the paper work."; + next; + mes "*Rustle, Rustle*"; + next; + mes "[Banker]"; + mes "You currently have " + #bankstorage + " Zeny in your account."; + close; + +Lrealamount: + mes "[Banker]"; + mes "Don't play jokes with me please. Next time ask for a real amount."; + close; + +Lneedzeny: + mes "[Banker]"; + mes "You don't have enough Zeny to make that deposit."; + close; + +Lneedzeny2: + mes "[Banker]"; + mes "You don't have enough Zeny to cover the transaction fee."; + close; + +Lneedzeny3: + mes "[Banker]"; + mes "You don't have enough Zeny in your account."; + close; + +Lcancel: + mes "[Banker]"; + mes "Very well... come again soon."; + close; }
\ No newline at end of file diff --git a/npc/other/blackjack.txt b/npc/other/blackjack.txt index 0f8aa4e2a..c3429b5ec 100644 --- a/npc/other/blackjack.txt +++ b/npc/other/blackjack.txt @@ -1,349 +1,349 @@ -//===== eAthena Script =======================================
-//= Black Jack
-//===== By: ==================================================
-//= kobra_k88
-//===== Current Version: =====================================
-//= 1.0
-//===== Compatible With: =====================================
-//=
-//===== Description: =========================================
-//= Black Jack card game. Gameplay based off standard casino
-//= black jack rules. Dealer must have at least 17 to stay and will
-//= automatically stay at 17 and up. Player must have at least
-//= 13 to stay. Aces counted as 11 or 1. Option to "Double Down".
-//= Currently does not allow for "insurance", or "splitting"
-//= of pairs.
-//===== Additional Comments: =================================
-//=
-//============================================================
-
-
-cmd_in02.gat,188,89,1 script Black Jack Dealer 57,{
-
- mes "[Dealer]";
- mes "Hello there! Would you like to play a game of Black Jack?";
- M_Menu:
- next;
- menu "What are the rules?",M_0, "I want to play.",L_Play, "No thanks.",M_End;
-
- M_0:
- mes "[Dealer]";
- mes "What would you like to know?";
- sM_Menu0:
- next;
- menu "The basics.",sM_0a, "Winning and loosing.",sM_0b, "'Double Down'.",sM_0c,
- "Ace value.",sM_0d, "Nothing.",M_Menu;
-
- sM_0a:
- mes "[Dealer]";
- mes "Black Jack is a card game in which the goal is to get 21, or as";
- mes "close to 21 points as possible, without going over 21.";
- next;
- mes "[Dealer]";
- mes "Before the game starts, the player must make a bet. Once the bet";
- mes "has been made, both the dealer and the player are dealt 2 cards";
- mes "each. Depending on what cards you have, you can choose to ^5533FF'stay'^000000,";
- mes "or you can choose to ^5533FF'pull'^000000.";
- next;
- mes "[Dealer]";
- mes "When you choose to 'stay', you are telling the dealer that you don't";
- mes "need anymore cards. This allows the dealer to pull if he/she";
- mes "wants to. In order to stay, you must have ^FF3355at least 13 points^000000. The";
- mes "dealer can only stay when he/she has^FF3355 17 points or more^000000.";
- next;
- mes "[Dealer]";
- mes "When you choose to 'pull', you are telling the dealer that you want";
- mes "another card. By pulling more cards you can increase your point";
- mes "total. As long has you have ^FF3355less than 21^000000 points you can pull a";
- mes "card from the deck.";
- goto sM_Menu0;
- sM_0b:
- mes "[Dealer]";
- mes "There are 3 ways to win and loose at Black Jack.";
- next;
- mes "[Dealer]";
- mes "1.) At the end of a Black Jack round, if you have more points";
- mes "than the dealer you will win the round. Conversely if you have";
- mes "less points than the dealer you will loose.";
- next;
- mes "[Dealer]";
- mes "2.) If you pull a card that makes your point total go over 21 you";
- mes "will automatically loose the round. This is called a ^5533FF'bust'^000000. If";
- mes "the dealer busts then you will win the round.";
- next;
- mes "[Dealer]";
- mes "3.) If you have a point total of 21 with the first 2 cards, you";
- mes "will automatically win the round. This is called a ^5533FF'Black Jack'^000000";
- mes "and happens when you get an 'Ace' and a '10 valued' card. If the";
- mes "dealer gets a Black Jack he/she will automatically win the round.";
- next;
- mes "[Dealer]";
- mes "4.) Besides winning and loosing, you can tie with the dealer. If";
- mes "both you and the dealer have the same point total at the end of a";
- mes "round, this will result in a tie with no winner and no loss or gain";
- mes "in money.";
- next;
- mes "[Dealer]";
- mes "This is called a ^5533FF'push'^000000 with the dealer. This also";
- mes "applies to both you and the dealer having Black Jack at the same";
- mes "time.";
- goto sM_Menu0;
- sM_0c:
- mes "[Dealer]";
- mes "The 'Double Down' option allows you to double your current bet,";
- mes "but with the drawback that you will only be able to pull one";
- mes "additional card. This option is only available at the beggining of";
- mes "each round.";
- next;
- mes "[Dealer]";
- mes "An example of when doubling down is usefull, is when";
- mes "your first 2 cards give you a point total of 11. You have a good";
- mes "chance of getting 21 or 20 with the next card that you draw. This";
- mes "would be a good hand to double down on.";
- goto sM_Menu0;
- sM_0d:
- mes "[Dealer]";
- mes "The 'Ace' card is a unique card in the game of Black Jack because";
- mes "it can have 2 values. An Ace can be counted as either 11 points,";
- mes "or just 1 point. For example if you had an Ace and a 4, that would";
- mes "give you either 15 or 5 points.";
- next;
- mes "[Dealer]";
- mes "If you decided to stay, the Ace would automatically be counted as";
- mes "11 points to give you 15 points total.";
- next;
- mes "[Dealer]";
- mes "If you had decided to pull and recieved a 9, the ace would";
- mes "automatically be counted as 1 point to give you a total of 14";
- mes "points. If the Ace was counted as 11 points, you would have a";
- mes "point total over 21 and would have lost.";
- next;
- mes "[Dealer]";
- mes "It is because of the flexibilty you have with the 'Ace' that makes";
- mes "it the most powerfull card in the game.";
- goto sM_Menu0;
- M_End:
- mes "[Dealer]";
- mes "Feel free to come back anytime";
- close;
-
-//================
-L_Play:
- mes "[Dealer]";
- mes "Please place your bets...";
- next;
- menu "2z",M_1a, "10z",M_1b, "20z",M_1c, "100z",M_1d, "Too rich for my blood....",M_End;
-
- M_1a:
- if(Zeny < 2) goto sL_NotEnuf;
- set @bet, 2;
- goto L_Cont0;
- M_1b:
- if(Zeny < 10) goto sL_NotEnuf;
- set @bet, 10;
- goto L_Cont0;
- M_1c:
- if(Zeny < 20) goto sL_NotEnuf;
- set @bet, 20;
- goto L_Cont0;
- M_1d:
- if(Zeny < 100) goto sL_NotEnuf;
- set @bet, 100;
- goto L_Cont0;
-
- sL_NotEnuf:
- mes "[Dealer]";
- mes "I'm sorry but you don't have enough zeny to make that bet.";
- close;
-
- L_Cont0:
- mes "(the cards are being dealt)";
- next;
- deletearray $@card[0],13;
- set @dealerTurn, 0;
- set @numP, 0;
- set @numD, 0;
- set @pAce, 0;
- set @dAce, 0;
- callsub sF_GetCards, @numP, @playCard[@numP], @playCard$[@numP], @pAce;
- callsub sF_GetCards, @numP, @playCard[@numP], @playCard$[@numP], @pAce;
- callsub sF_GetCards, @numD, @dealCard[@numD], @dealCard$[@numD], @dAce;
- callsub sF_GetCards, @numD, @dealCard[@numD], @dealCard$[@numD], @dAce;
-
-//==============
-L_Start:
- callsub sF_GetTot;
-
- mes "- Here are the ^FF5533DEALER'S^000000 cards:";
- if (@numD==2) callsub sF_D2cards;
- if (@numD==3) callsub sF_D3cards;
- if (@numD==4) callsub sF_D4cards;
- if (@numD==5) callsub sF_D5cards;
- mes " The DEALER has: ^FF5533"+@dealTot+"^000000";
- mes " ";
- mes "- Here are ^5533FFYOUR^000000 cards:";
- if (@numP==2) callsub sF_P2cards;
- if (@numP==3) callsub sF_P3cards;
- if (@numP==4) callsub sF_P4cards;
- if (@numP==5) callsub sF_P5cards;
- if(@pAce != 1 || @playTot == 21) mes " YOU have: ^5533FF" +@playTot+ "^000000";
- if(@pAce == 1 && @playTot != 21) mes " You have: ^5533FF" +@playTot+ "^000000, or ^5533FF" +(@playTot-10)+ "^000000";
- next;
- if(@playTot==21 && @dealTot==21) goto sL_Push;
- if(@numP==2 && @playTot == 21) goto sL_Win;
- if(@numD==2 && @dealTot == 21) goto sL_Lose;
- if(@playTot > 21) goto sL_Lose;
- if(@dealTot > 21) goto sL_Win;
- if(@numP==2 && @dealerTurn==0) menu "Hit me(pull)",M_Hit, "Stay",M_Stay, "Double Down",M_Double;
- if(@dealerTurn == 0) menu "Hit me(pull)",M_Hit, "Stay",M_Stay;
-
- M_Stay:
- mes "[Dealer]";
- if(@playTot < 13) goto sL_PlayToLow;
- if(@dealTot > 16) mes "The Dealer stays.";
- if(@dealTot > 16 || @numD == 5) goto L_Check;
- mes "The Dealer is going to pull";
- next;
- callsub sF_GetCards, @numD, @dealCard[@numD], @dealCard$[@numD], @dAce;
- set @dealerTurn, 1;
- goto L_Start;
-
- sL_PlayToLow:
- mes "I'm sorry but you do not have a high enough total to stay. You must pull.";
- next;
- goto M_Hit;
-
- M_Hit:
- if(@numP == 5) goto M_Stay;
- callsub sF_GetCards, @numP, @playCard[@numP], @playCard$[@numP], @pAce;
- goto L_Start;
- M_Double:
- mes "[Dealer]";
- mes "Player has chosen to Double Down. You're current bet will be";
- mes "doubled, and you will only be able to pull 1 extra card.";
- next;
- set @dealerTurn, 1;
- set @bet, @bet*2;
- callsub sF_GetCards, @numP, @playCard[@numP], @playCard$[@numP], @pAce;
- goto L_Start;
-
-//=============
-L_Check:
- next;
- if(@playTot < @dealTot) goto sL_Lose;
- if(@playTot == @dealTot) goto sL_Push;
-
- sL_Win:
- mes "[Dealer]";
- mes "Congratulations, you've won!";
- next;
- set Zeny, Zeny + @bet;
- goto L_Play;
- sL_Lose:
- mes "[Dealer]";
- mes "I'm sorry but you've lost.";
- set Zeny, Zeny - @bet;
- next;
- goto L_Play;
- sL_Push:
- mes "[Dealer]";
- mes "Its a push. You tied with the Dealer.";
- next;
- goto L_Play;
-
-
-//==================================
-// Sub function for dealing/pulling the cards
-sF_GetCards:
- set @rnd, rand(1,13);
- if($@card[@rnd] == 4) goto sF_GetCards;
- set $@card[@rnd], $@card[@rnd] + 1;
- set getarg(1), @rnd;
- if(getarg(1) > 10) set getarg(1), 10;
- if(getarg(1) == 1 && getarg(3) < 1) set getarg(1), 11;
- if(getarg(1) == 11) set getarg(3), 1;
- set getarg(2), " " + getarg(1) + " ";
- if(@rnd == 10) set getarg(2), getarg(1);
- if(@rnd == 1) set getarg(2), " A ";
- if(@rnd == 11) set getarg(2), " J ";
- if(@rnd == 12) set getarg(2), " Q ";
- if(@rnd == 13) set getarg(2), " K ";
- set getarg(0), getarg(0) + 1;
- return;
-
-//==================================
-// Sub function for getting the total score for each hand
-sF_GetTot:
- set @i, 0;
- set @dealTot, 0;
- set @playTot, 0;
-
- GetDealTot:
- set @dealTot, @dealTot + @dealCard[@i];
- set @i, @i + 1;
- if(@i < @numD) goto GetDealTot;
- if(@dAce == 1 && @dealTot > 21) set @dealTot, @dealTot - 10;
- set @i, 0;
- GetPlayTot:
- set @playTot, @playTot + @playCard[@i];
- set @i, @i + 1;
- if(@i < @numP) goto GetPlayTot;
- if(@pAce == 1 && @playTot > 21) set @pAce, 2;
- if(@pAce > 0 && @playTot > 21) set @playTot, @playTot - 10;
- return;
-
-//=======================================
-// Sub function for displaying the Cards
-sF_D2cards:
- mes " .-----. .-----. ";
- mes " | "+@dealCard$[0]+" | | "+@dealCard$[1]+" | ";
- mes " '-----' '-----' ";
- return;
-sF_P2cards:
- mes " .-----. .-----. ";
- mes " | "+@playCard$[0]+" | | "+@playCard$[1]+" | ";
- mes " '-----' '-----' ";
- return;
-sF_D3cards:
- mes " .-----. .-----. .-----. ";
- mes " | "+@dealCard$[0]+" | | "+@dealCard$[1]+" | | "+@dealCard$[2]+" | ";
- mes " '-----' '-----' '-----' ";
- return;
-sF_P3cards:
- mes " .-----. .-----. .-----. ";
- mes " | "+@playCard$[0]+" | | "+@playCard$[1]+" | | "+@playCard$[2]+" | ";
- mes " '-----' '-----' '-----' ";
- return;
-sF_D4cards:
- mes " .-----. .-----. .-----. ";
- mes " | "+@dealCard$[0]+" | | "+@dealCard$[1]+" | | "+@dealCard$[2]+" | ";
- mes " '-----' '-----' '-----' ";
- mes " .-----. ";
- mes " | "+@dealCard$[3]+" |";
- mes " '-----' ";
- return;
-sF_P4cards:
- mes " .-----. .-----. .-----. ";
- mes " | "+@playCard$[0]+" | | "+@playCard$[1]+" | | "+@playCard$[2]+" |";
- mes " '-----' '-----' '-----' ";
- mes " .-----. ";
- mes " | "+@playCard$[3]+" |";
- mes " '-----' ";
- return;
-sF_D5cards:
- mes " .-----. .-----. .-----. ";
- mes " | "+@dealCard$[0]+" | | "+@dealCard$[1]+" | | "+@dealCard$[2]+" | ";
- mes " '-----' '-----' '-----' ";
- mes " .-----. .-----. ";
- mes " | "+@dealCard$[3]+" | | "+@dealCard$[4]+" | ";
- mes " '-----' '-----' ";
- return;
-sF_P5cards:
- mes " .-----. .-----. .-----. ";
- mes " | "+@playCard$[0]+" | | "+@playCard$[1]+" | | "+@playCard$[2]+" | ";
- mes " '-----' '-----' '-----' ";
- mes " .-----. .-----. ";
- mes " | "+@playCard$[3]+" | | "+@playCard$[4]+" | ";
- mes " '-----' '-----' ";
- return;
-}
+//===== eAthena Script ======================================= +//= Black Jack +//===== By: ================================================== +//= kobra_k88 +//===== Current Version: ===================================== +//= 1.0 +//===== Compatible With: ===================================== +//= +//===== Description: ========================================= +//= Black Jack card game. Gameplay based off standard casino +//= black jack rules. Dealer must have at least 17 to stay and will +//= automatically stay at 17 and up. Player must have at least +//= 13 to stay. Aces counted as 11 or 1. Option to "Double Down". +//= Currently does not allow for "insurance", or "splitting" +//= of pairs. +//===== Additional Comments: ================================= +//= +//============================================================ + + +cmd_in02.gat,188,89,1 script Black Jack Dealer 57,{ + + mes "[Dealer]"; + mes "Hello there! Would you like to play a game of Black Jack?"; + M_Menu: + next; + menu "What are the rules?",M_0, "I want to play.",L_Play, "No thanks.",M_End; + + M_0: + mes "[Dealer]"; + mes "What would you like to know?"; + sM_Menu0: + next; + menu "The basics.",sM_0a, "Winning and loosing.",sM_0b, "'Double Down'.",sM_0c, + "Ace value.",sM_0d, "Nothing.",M_Menu; + + sM_0a: + mes "[Dealer]"; + mes "Black Jack is a card game in which the goal is to get 21, or as"; + mes "close to 21 points as possible, without going over 21."; + next; + mes "[Dealer]"; + mes "Before the game starts, the player must make a bet. Once the bet"; + mes "has been made, both the dealer and the player are dealt 2 cards"; + mes "each. Depending on what cards you have, you can choose to ^5533FF'stay'^000000,"; + mes "or you can choose to ^5533FF'pull'^000000."; + next; + mes "[Dealer]"; + mes "When you choose to 'stay', you are telling the dealer that you don't"; + mes "need anymore cards. This allows the dealer to pull if he/she"; + mes "wants to. In order to stay, you must have ^FF3355at least 13 points^000000. The"; + mes "dealer can only stay when he/she has^FF3355 17 points or more^000000."; + next; + mes "[Dealer]"; + mes "When you choose to 'pull', you are telling the dealer that you want"; + mes "another card. By pulling more cards you can increase your point"; + mes "total. As long has you have ^FF3355less than 21^000000 points you can pull a"; + mes "card from the deck."; + goto sM_Menu0; + sM_0b: + mes "[Dealer]"; + mes "There are 3 ways to win and loose at Black Jack."; + next; + mes "[Dealer]"; + mes "1.) At the end of a Black Jack round, if you have more points"; + mes "than the dealer you will win the round. Conversely if you have"; + mes "less points than the dealer you will loose."; + next; + mes "[Dealer]"; + mes "2.) If you pull a card that makes your point total go over 21 you"; + mes "will automatically loose the round. This is called a ^5533FF'bust'^000000. If"; + mes "the dealer busts then you will win the round."; + next; + mes "[Dealer]"; + mes "3.) If you have a point total of 21 with the first 2 cards, you"; + mes "will automatically win the round. This is called a ^5533FF'Black Jack'^000000"; + mes "and happens when you get an 'Ace' and a '10 valued' card. If the"; + mes "dealer gets a Black Jack he/she will automatically win the round."; + next; + mes "[Dealer]"; + mes "4.) Besides winning and loosing, you can tie with the dealer. If"; + mes "both you and the dealer have the same point total at the end of a"; + mes "round, this will result in a tie with no winner and no loss or gain"; + mes "in money."; + next; + mes "[Dealer]"; + mes "This is called a ^5533FF'push'^000000 with the dealer. This also"; + mes "applies to both you and the dealer having Black Jack at the same"; + mes "time."; + goto sM_Menu0; + sM_0c: + mes "[Dealer]"; + mes "The 'Double Down' option allows you to double your current bet,"; + mes "but with the drawback that you will only be able to pull one"; + mes "additional card. This option is only available at the beggining of"; + mes "each round."; + next; + mes "[Dealer]"; + mes "An example of when doubling down is usefull, is when"; + mes "your first 2 cards give you a point total of 11. You have a good"; + mes "chance of getting 21 or 20 with the next card that you draw. This"; + mes "would be a good hand to double down on."; + goto sM_Menu0; + sM_0d: + mes "[Dealer]"; + mes "The 'Ace' card is a unique card in the game of Black Jack because"; + mes "it can have 2 values. An Ace can be counted as either 11 points,"; + mes "or just 1 point. For example if you had an Ace and a 4, that would"; + mes "give you either 15 or 5 points."; + next; + mes "[Dealer]"; + mes "If you decided to stay, the Ace would automatically be counted as"; + mes "11 points to give you 15 points total."; + next; + mes "[Dealer]"; + mes "If you had decided to pull and recieved a 9, the ace would"; + mes "automatically be counted as 1 point to give you a total of 14"; + mes "points. If the Ace was counted as 11 points, you would have a"; + mes "point total over 21 and would have lost."; + next; + mes "[Dealer]"; + mes "It is because of the flexibilty you have with the 'Ace' that makes"; + mes "it the most powerfull card in the game."; + goto sM_Menu0; + M_End: + mes "[Dealer]"; + mes "Feel free to come back anytime"; + close; + +//================ +L_Play: + mes "[Dealer]"; + mes "Please place your bets..."; + next; + menu "2z",M_1a, "10z",M_1b, "20z",M_1c, "100z",M_1d, "Too rich for my blood....",M_End; + + M_1a: + if(Zeny < 2) goto sL_NotEnuf; + set @bet, 2; + goto L_Cont0; + M_1b: + if(Zeny < 10) goto sL_NotEnuf; + set @bet, 10; + goto L_Cont0; + M_1c: + if(Zeny < 20) goto sL_NotEnuf; + set @bet, 20; + goto L_Cont0; + M_1d: + if(Zeny < 100) goto sL_NotEnuf; + set @bet, 100; + goto L_Cont0; + + sL_NotEnuf: + mes "[Dealer]"; + mes "I'm sorry but you don't have enough zeny to make that bet."; + close; + + L_Cont0: + mes "(the cards are being dealt)"; + next; + deletearray $@card[0],13; + set @dealerTurn, 0; + set @numP, 0; + set @numD, 0; + set @pAce, 0; + set @dAce, 0; + callsub sF_GetCards, @numP, @playCard[@numP], @playCard$[@numP], @pAce; + callsub sF_GetCards, @numP, @playCard[@numP], @playCard$[@numP], @pAce; + callsub sF_GetCards, @numD, @dealCard[@numD], @dealCard$[@numD], @dAce; + callsub sF_GetCards, @numD, @dealCard[@numD], @dealCard$[@numD], @dAce; + +//============== +L_Start: + callsub sF_GetTot; + + mes "- Here are the ^FF5533DEALER'S^000000 cards:"; + if (@numD==2) callsub sF_D2cards; + if (@numD==3) callsub sF_D3cards; + if (@numD==4) callsub sF_D4cards; + if (@numD==5) callsub sF_D5cards; + mes " The DEALER has: ^FF5533"+@dealTot+"^000000"; + mes " "; + mes "- Here are ^5533FFYOUR^000000 cards:"; + if (@numP==2) callsub sF_P2cards; + if (@numP==3) callsub sF_P3cards; + if (@numP==4) callsub sF_P4cards; + if (@numP==5) callsub sF_P5cards; + if(@pAce != 1 || @playTot == 21) mes " YOU have: ^5533FF" +@playTot+ "^000000"; + if(@pAce == 1 && @playTot != 21) mes " You have: ^5533FF" +@playTot+ "^000000, or ^5533FF" +(@playTot-10)+ "^000000"; + next; + if(@playTot==21 && @dealTot==21) goto sL_Push; + if(@numP==2 && @playTot == 21) goto sL_Win; + if(@numD==2 && @dealTot == 21) goto sL_Lose; + if(@playTot > 21) goto sL_Lose; + if(@dealTot > 21) goto sL_Win; + if(@numP==2 && @dealerTurn==0) menu "Hit me(pull)",M_Hit, "Stay",M_Stay, "Double Down",M_Double; + if(@dealerTurn == 0) menu "Hit me(pull)",M_Hit, "Stay",M_Stay; + + M_Stay: + mes "[Dealer]"; + if(@playTot < 13) goto sL_PlayToLow; + if(@dealTot > 16) mes "The Dealer stays."; + if(@dealTot > 16 || @numD == 5) goto L_Check; + mes "The Dealer is going to pull"; + next; + callsub sF_GetCards, @numD, @dealCard[@numD], @dealCard$[@numD], @dAce; + set @dealerTurn, 1; + goto L_Start; + + sL_PlayToLow: + mes "I'm sorry but you do not have a high enough total to stay. You must pull."; + next; + goto M_Hit; + + M_Hit: + if(@numP == 5) goto M_Stay; + callsub sF_GetCards, @numP, @playCard[@numP], @playCard$[@numP], @pAce; + goto L_Start; + M_Double: + mes "[Dealer]"; + mes "Player has chosen to Double Down. You're current bet will be"; + mes "doubled, and you will only be able to pull 1 extra card."; + next; + set @dealerTurn, 1; + set @bet, @bet*2; + callsub sF_GetCards, @numP, @playCard[@numP], @playCard$[@numP], @pAce; + goto L_Start; + +//============= +L_Check: + next; + if(@playTot < @dealTot) goto sL_Lose; + if(@playTot == @dealTot) goto sL_Push; + + sL_Win: + mes "[Dealer]"; + mes "Congratulations, you've won!"; + next; + set Zeny, Zeny + @bet; + goto L_Play; + sL_Lose: + mes "[Dealer]"; + mes "I'm sorry but you've lost."; + set Zeny, Zeny - @bet; + next; + goto L_Play; + sL_Push: + mes "[Dealer]"; + mes "Its a push. You tied with the Dealer."; + next; + goto L_Play; + + +//================================== +// Sub function for dealing/pulling the cards +sF_GetCards: + set @rnd, rand(1,13); + if($@card[@rnd] == 4) goto sF_GetCards; + set $@card[@rnd], $@card[@rnd] + 1; + set getarg(1), @rnd; + if(getarg(1) > 10) set getarg(1), 10; + if(getarg(1) == 1 && getarg(3) < 1) set getarg(1), 11; + if(getarg(1) == 11) set getarg(3), 1; + set getarg(2), " " + getarg(1) + " "; + if(@rnd == 10) set getarg(2), getarg(1); + if(@rnd == 1) set getarg(2), " A "; + if(@rnd == 11) set getarg(2), " J "; + if(@rnd == 12) set getarg(2), " Q "; + if(@rnd == 13) set getarg(2), " K "; + set getarg(0), getarg(0) + 1; + return; + +//================================== +// Sub function for getting the total score for each hand +sF_GetTot: + set @i, 0; + set @dealTot, 0; + set @playTot, 0; + + GetDealTot: + set @dealTot, @dealTot + @dealCard[@i]; + set @i, @i + 1; + if(@i < @numD) goto GetDealTot; + if(@dAce == 1 && @dealTot > 21) set @dealTot, @dealTot - 10; + set @i, 0; + GetPlayTot: + set @playTot, @playTot + @playCard[@i]; + set @i, @i + 1; + if(@i < @numP) goto GetPlayTot; + if(@pAce == 1 && @playTot > 21) set @pAce, 2; + if(@pAce > 0 && @playTot > 21) set @playTot, @playTot - 10; + return; + +//======================================= +// Sub function for displaying the Cards +sF_D2cards: + mes " .-----. .-----. "; + mes " | "+@dealCard$[0]+" | | "+@dealCard$[1]+" | "; + mes " '-----' '-----' "; + return; +sF_P2cards: + mes " .-----. .-----. "; + mes " | "+@playCard$[0]+" | | "+@playCard$[1]+" | "; + mes " '-----' '-----' "; + return; +sF_D3cards: + mes " .-----. .-----. .-----. "; + mes " | "+@dealCard$[0]+" | | "+@dealCard$[1]+" | | "+@dealCard$[2]+" | "; + mes " '-----' '-----' '-----' "; + return; +sF_P3cards: + mes " .-----. .-----. .-----. "; + mes " | "+@playCard$[0]+" | | "+@playCard$[1]+" | | "+@playCard$[2]+" | "; + mes " '-----' '-----' '-----' "; + return; +sF_D4cards: + mes " .-----. .-----. .-----. "; + mes " | "+@dealCard$[0]+" | | "+@dealCard$[1]+" | | "+@dealCard$[2]+" | "; + mes " '-----' '-----' '-----' "; + mes " .-----. "; + mes " | "+@dealCard$[3]+" |"; + mes " '-----' "; + return; +sF_P4cards: + mes " .-----. .-----. .-----. "; + mes " | "+@playCard$[0]+" | | "+@playCard$[1]+" | | "+@playCard$[2]+" |"; + mes " '-----' '-----' '-----' "; + mes " .-----. "; + mes " | "+@playCard$[3]+" |"; + mes " '-----' "; + return; +sF_D5cards: + mes " .-----. .-----. .-----. "; + mes " | "+@dealCard$[0]+" | | "+@dealCard$[1]+" | | "+@dealCard$[2]+" | "; + mes " '-----' '-----' '-----' "; + mes " .-----. .-----. "; + mes " | "+@dealCard$[3]+" | | "+@dealCard$[4]+" | "; + mes " '-----' '-----' "; + return; +sF_P5cards: + mes " .-----. .-----. .-----. "; + mes " | "+@playCard$[0]+" | | "+@playCard$[1]+" | | "+@playCard$[2]+" | "; + mes " '-----' '-----' '-----' "; + mes " .-----. .-----. "; + mes " | "+@playCard$[3]+" | | "+@playCard$[4]+" | "; + mes " '-----' '-----' "; + return; +} diff --git a/npc/other/books.txt b/npc/other/books.txt index ece0e4d63..23e24a61b 100644 --- a/npc/other/books.txt +++ b/npc/other/books.txt @@ -1,2291 +1,2291 @@ -// $Id: books.txt,v 1.1.1.1 2004/09/10 17:26:42 MagicalTux Exp $
-// Changed Mage Guild Book to the correct one (now located in mage.txt)
-//<--------------- NPCs BOOKS [Update: July. 27, 2004] --------------->\\
-
-//<=========== Library - Begin ==========>\\
-prt_in.gat,159,56,4 script Monster Encyclopedia 111,{
- mes "^FF0000[Monster Encyclopedia]^000000";
- mes "This is a Monster Encyclopedia including information of Earth,Fire,Neutral Monsters!";
- next;
- menu "Monsters of Earth Property",MonEarPro,"Monsters of Fire Property",MonFirPro,"Monsters of Neutral Property",MonNeuPro,"Cancel",Cancel;
-
- MonEarPro:
- menu "Small Size Monster",SmaMonEarPro,"Medium Size Monster",MedMonEarPro,"Great Size Monster",GrMonEarPro,"Cancel",EndMonEarPro;
-
- SmaMonEarPro:
- mes "^FF0000[Earth,Small Monster Encyclopedia]^000000";
- mes "1.Fabre";
- mes "Larva of Creamy. It is cute when it wiggles,even though it is a weak and small monster,";
- mes "People often tend to slay Fabres,only for the reason they can get `Feather's,one of required items for `Bunny Band'.";
- mes "^0099FFFound Items^000000: Feather.Fluff .Green Herb.Clover";
- next;
- mes "^FF0000[Earth,Small Monster Encyclopedia]^000000";
- mes "2.Pupa";
- mes "Monster on the Fabre's pupal stage. It deosn't attack at all, so easy to kill for Novice people.";
- mes "^0099FFFound Items^000000: Chrysalis,Sticky Muscus";
- next;
- mes "^FF0000[Earth,Small Monster Encyclopedia]^000000";
- mes "3.Martin";
- mes "Funny looking Mole wearing a Safety Helmet on the head,which is always busy to walk around.";
- mes "^0099FFFound Items^000000: Mole Whiskers,Mole Claw";
- next;
- mes "^FF0000[Earth,Small Monster Encyclopedia]^000000";
- mes "3.Savage Bebe";
- mes "Tiny Pink baby of Savage.Unlike its small size, It is running about fields making annoying noise.";
- mes "^0099FFFound Items^000000: Leather,Meat,Arrow,Feather";
- next;
- mes "^FF0000[Earth,Small Monster Encyclopedia]^000000";
- mes "4.Andre";
- mes "A kind of Worker Ants,they are very diligent in their work.They gather everything to save a sufficient stock and are well-cooperative,you need to be careful.";
- mes "^0099FFFound Items^000000: Worm Peeling,Garlet,Sticky Muscus,Shell";
- next;
- mes "^FF0000[Earth,Small Monster Encyclopedia]^000000";
- mes "5.Coco";
- mes "Little but fierce-looking eyed Creature carrying an Acorn on both hands. It is very unpleasant when it gives a dirty look,let's give it a lesson.";
- mes "^0099FFFound Items^000000: Acorn,Fluff,Leather,Sweet Potato";
- next;
- mes "^FF0000[Earth,Small Monster Encyclopedia]^000000";
- mes "6.Piere";
- mes "A kind of Work Ants,seems to be very diligent.Its appearance is similar with other Ants,but you can easily distinguish them from others as they only gather in a same kind.";
- mes "^0099FFFound Items^000000: Worm Peeling,Garlet,Sticky Muscus,Shell";
- next;
- mes "^FF0000[Earth,Small Monster Encyclopedia]^000000";
- mes "7.Smokie";
- mes "It's working out all the time.Often tries to shapeshift with Raccon Leaves,but always failed. Back then, it tended to gather stuffs diligently, now it seems to give up.";
- mes "^0099FFFound Items^000000: Raccon Leaf,Leather,Sweet Potato";
- next;
- mes "^FF0000[Earth,Small Monster Encyclopedia]^000000";
- mes "8.Deniro";
- mes "A kind of Work Ants, tend to group in a same kind as well as other ants.";
- mes "^0099FFFound Items^000000: Worm Peeling,Garlet,Sticky Muscus,Shell";
- next;
- mes "^FF0000[Earth,Small Monster Encyclopedia]^000000";
- mes "9.Yoyo";
- mes "Pink coloured Monkey.Not only they pick up every stuff dropped on the gound outrageously, but they are nimble and cooperative, you must be cautious of being attacked by a group.";
- mes "^0099FFFound Items^000000: Yoyo Tail,Banana,Yellow Herb,Leather";
- next;
- mes "^FF0000[Earth,Small Monster Encyclopedia]^000000";
- mes "10.Vitata";
- mes "Work Ants in charge of storing honey inside the body for emergency.It is a little pathetic to see their chubby tummy filled with Honey.";
- mes "^0099FFFound Items^000000: Worm Peeling,Scell,Honey";
- next;
- mes "^FF0000[Earth,Small Monster Encyclopedia]^000000";
- mes "11.Caramel";
- mes "Cute porcupine with tiny spiky quills.But don't ever touch it without intention,it will get mad immeduately.";
- mes "^0099FFFound Items^000000: Porcupine Quill,Leather";
- next;
- mes "^FF0000[Earth,Small Monster Encyclopedia]^000000";
- mes "12.Giearth";
- mes "Little Grampa Pixie. Usually lives in Caves to gather Ores.Even though he is short, but actually an adult.Show your manners.";
- mes "^0099FFFound Items^000000: Old Pixie's Moustache";
- next;
- goto MonEarPro;
- close;
- MedMonEarPro:
- mes "^FF0000[Earth,Medium Monster Encyclopedia]^000000";
- mes "1.Willow";
- mes "Creature reborn from a Gigantic Old Tree.Everything like the feagure or the sound to related it is eerie.";
- mes "^0099FFFound Items^000000: Tree Root,Trunk,Red Herb,Sweet Potato";
- next;
- mes "^FF0000[Earth,Medium Monster Encyclopedia]^000000";
- mes "2.Rocker";
- mes "Lazy Grasshpper which loves playing Violin.";
- mes "^0099FFFound Items^000000: Grasshopper's Leg,Jellopy";
- next;
- mes "^FF0000[Earth,Medium Monster Encyclopedia]^000000";
- mes "3.Madragora";
- mes "Stays the same but attacks passengers using Stalks under the ground. Look so Horrible,also attacks Very annoyingly.";
- mes "^0099FFFound Items^000000: Stem,Green Herb,Shoot";
- next;
- mes "^FF0000[Earth,Medium Monster Encyclopedia]^000000";
- mes "4.Wolf";
- mes "Wanderers having Blue Manes.They are cooperative,so attack in a group when one got attacked.Let's just let them mind their business and watch.";
- mes "^0099FFFound Items^000000: Wolf Claw,Meat,Monster's Feed,Leather";
- next;
- mes "^FF0000[Earth,Medium Monster Encyclopedia]^000000";
- mes "5.Snake";
- mes "Green Cloloured Snake living in the Forest or Desert.Not poisonous but be careful.";
- mes "^0099FFFound Items^000000: Snake Scale,Red Herb";
- next;
- mes "^FF0000[Earth,Medium Monster Encyclopedia]^000000";
- mes "6.Horn";
- mes "Compliant Insect unlike its offensive appearance.It's wandering about the field making some crunching sound.";
- mes "^0099FFFound Items^000000: Horn,Shell,Solid Shell";
- next;
- mes "^FF0000[Earth,Medium Monster Encyclopedia]^000000";
- mes "7.Orc Warrior";
- mes "Self-Confident Warrior of the Orc Tribe.";
- mes "^0099FFFound Items^000000:Orcish Voucher";
- next;
- mes "^FF0000[Earth,Medium Monster Encyclopedia]^000000";
- mes "8.Hode";
- mes "Huge earthworm without any more description.Huge earthworm!Usually conceals itself under the ground,commonly found in the Desert.";
- mes "^0099FFFound Items^000000: Earthworm Peeling,Sticky Muscus";
- next;
- mes "^FF0000[Earth,Medium Monster Encyclopedia]^000000";
- mes "9.Mantis";
- mes "It wanders about the field waving a tiny fan.";
- mes "^0099FFFound Items^000000: Mantis Scythe,Scell,Solid Shell,Red Potion";
- next;
- mes "^FF0000[Earth,Medium Monster Encyclopedia]^000000";
- mes "10.Savage";
- mes "Wild Boar always walking around restlessly,making some noise. It has Big fangs and looks different from the young one.";
- mes "^0099FFFound Items^000000: Mane,Leather";
- next;
- mes "^FF0000[Earth,Medium Monster Encyclopedia]^000000";
- mes "11.Petite";
- mes "Tiny little Walking Dragon.It seems like there exists 2 different kinds of Petite, flying one and walking one and this is the 2nd one.";
- mes "^0099FFFound Items^000000: Dragon Canine,Dragon Tail,Zargon";
- next;
- goto MonEarPro;
- close;
- GrMonEarPro:
- mes "^FF0000[Earth,Great Monster Encyclopedia]^000000";
- mes "1.Worm Tail";
- mes "Tiny little creature of light green which has a spiky,thin and long stick on the back.Usually it is very gentle but attacks using the stick on the back when got attacked,so be careful!";
- mes "^0099FFFound Items^000000: Pointed Scale,Yellow Herb";
- next;
- mes "^FF0000[Earth,Great Monster Encyclopedia]^000000";
- mes "2.Muka";
- mes "Cute Cactus commonly found in the Desert.It tries to threaten passengers with some funny sound but always failed.";
- mes "^0099FFFound Items^000000: Cactus Needle,Empty Bottle,Green Herb,Red Herb";
- next;
- mes "^FF0000[Earth,Great Monster Encyclopedia]^000000";
- mes "3.Big Foot";
- mes "Dull-Looking Bear with a huge build.Although it looks dumb but you will realise how it can be fast after you provoke it.";
- mes "^0099FFFound Items^000000: Bear's Foot Skin,Leather,Sweet Potato";
- next;
- mes "^FF0000[Earth,Great Monster Encyclopedia]^000000";
- mes "4.Flora";
- mes "Maneater with a big mouth.It pretends just a simple plant but anybody coming near,it rushes into him fiercely.";
- mes "^0099FFFound Items^000000: Maneater Blossom,Stem";
- next;
- goto MonEarPro;
- close;
- EndMonEarPro:
- close;
- close;
- MonFirPro:
- menu "Small Size Monster",SmaMonFirPro,"Medium Size Monster",MedMonFirPro,"Great Size Monster",GrMonFirPro,"Cancel",EndMonFirPro;
-
- SmaMonFirPro:
- mes "^FF0000[Fire,Small Monster Encyclopedia]^000000";
- mes "1.Picky";
- mes "Cute little chick before Peco Peco. It can't be realised that this little creature grows into a Peco Peco the big,strong bird.";
- mes "Sometimes you can find a picky with an egg shell which is a bit stronger than a normal picky.";
- mes "^0099FFFound Items^000000: Feather of Birds.Feather.Red Herb.Milk.";
- next;
- mes "^FF0000[Fire,Small Monster Encyclopedia]^000000";
- mes "2.Baby Desert Wolf";
- mes "Baby of Desert Wolf,trying to threaten passengers with a big bay.";
- mes "If you want to pat one of them,because you think it is pretty,don't do that before taking a look around enough.Not babies come to rush you but their parents will assault you at the same time.Parents don't want thier babies being harmed.";
- mes "^0099FFFound Items^000000: Leather,Meat";
- next;
- mes "^FF0000[Fire,Small Monster Encyclopedia]^000000";
- mes "3.Horong";
- mes "Eerie-looking fireball of violet colour.Recognises the living when gets near.";
- mes "^0099FFFound Items^000000: Stone Heart,Zargon,Fire Arrow";
- next;
- goto MonFirPro;
- close;
- MedMonFirPro:
- mes "^FF0000[Fire,Medium Monster Encyclopedia]^000000";
- mes "1.Drops";
- mes "A kind of Poring,but commonly found in the Desert and colors in Pale Orange.It eats everything just like Poring does.";
- mes "However it seems to be a bit stronger than Poring anyway.";
- mes "^0099FFFound Items^000000: Jellopy,Sticky Muscus,Apple,Empty Bottle,Red Herb";
- next;
- mes "^FF0000[Fire,Medium Monster Encyclopedia]^000000";
- mes "2.Elder Willow";
- mes "A kind of Willow but it looks older and colors in red. Frightening as much as Willow.";
-
- mes "^0099FFFound Items^000000: Resin,Trunk,Sweet Potato";
- next;
- mes "^FF0000[Fire,Medium Monster Encyclopedia]^000000";
- mes "3.Metaller";
- mes "Evolved one of Rocker.It is dim brown and lives in the Desert.Lazy equally to Rocker,but it steals stuffs on the ground.";
- mes "^0099FFFound Items^000000: Red Blood,Grasshopper's Leg,Scell,Shell";
- next;
- mes "^FF0000[Fire,Medium Monster Encyclopedia]^000000";
- mes "4.Zerom";
- mes "Undead Slave who had been extremely abused before he died.He is wandering in the Sphinx,carrying a big box on the back..";
- mes "^0099FFFound Items^000000: Panties";
- next;
- mes "^FF0000[Fire,Medium Monster Encyclopedia]^000000";
- mes "5.Scorpion";
- mes "Scorpion spreaded over the Desert.It is dangerous as much as its beautiful colour.Watch out its sharp tail.";
- mes "^0099FFFound Items^000000: Scorpion Tail,Green Herb,Yellow Herb";
- next;
- mes "^FF0000[Fire,Medium Monster Encyclopedia]^000000";
- mes "6.Desert Wolf";
- mes "Wolf commonly found in the desert,which is stronger than a Forest one.Take a look around before doing attacks,because Wolf tends to be cooperative each other!";
- mes "^0099FFFound Items^000000: Leather,Mink Coat,Meat,Wolf Claw";
- next;
- mes "^FF0000[Fire,Medium Monster Encyclopedia]^000000";
- mes "7.Frilldora";
- mes "Lizard which has a Unique neck.Looks a bit funny but is very Strong unlike its appearance.";
- mes "^0099FFFound Items^000000: Frill,Reptile Tongue,Red Potion,Zargon";
- next;
- mes "^FF0000[Fire,Medium Monster Encyclopedia]^000000";
- mes "8.Cobold the 3rd";
- mes "Small monster looks like a Wolf but it is smart enough to handle several tools. It is hostile and strong unlike its appearance. All Cobolds seem to be brothers.";
- mes "^0099FFFound Items^000000: Blue Hair,Zargon,Orange Potion";
- next;
- mes "^FF0000[Fire,Medium Monster Encyclopedia]^000000";
- mes "9.Jakk";
- mes "Quite Odd monster in a nice suit,but with a pumpkin head.It looks funny but changes the attitude fiercely when attacks someone.";
- mes "^0099FFFound Items^000000: Jack'o'Pumpkin,Zargon";
- next;
- goto MonFirPro;
- close;
- GrMonFirPro:
- mes "^FF0000[Fire,Great Monster Encyclopedia]^000000";
- mes "1.Peco Peco";
- mes "Nowadays peco peco is popular as vehicle for knights. They lives in the Desert or Forest and also cooperative.";
- mes "^0099FFFound Items^000000: Bill of Birds,Yellow Herb,Red Herb";
- next;
- mes "^FF0000[Fire,Great Monster Encyclopedia]^000000";
- mes "2.Marduk";
- mes "Unknown monster wearing Catholic uniform and looking serious.";
- mes "^0099FFFound Items^000000: Flame Heart";
- next;
- goto MonFirPro;
- close;
- EndMonFirPro:
- close;
- close;
- MonNeuPro:
- menu "Small Size Monster",SmaMonNeuPro,"Medium Size Monster",MedMonNeuPro,"Great Size Monster",GrMonNeuPro,"Cancel",EndMonNeuPro;
-
- SmaMonNeuPro:
- mes "^FF0000[Neutral,Small Monster Encyclopedia]^000000";
- mes "1.Lunatic";
- mes "Plump and shaggy monster shaped in Rabbit.However it won't give you a `Bunny Band'.";
- mes "^0099FFFound Items^000000: Clover,Feather,Carrot,Red Herb";
- next;
- mes "^FF0000[Neutral,Small Monster Encyclopedia]^000000";
- mes "2.Peco Peco Egg";
- mes "Egg of Peco Peco.It is so tiny that doesn't look like an egg of Big Bird.Novice people love to Crack it because it doesn't attack at all.";
- mes "^0099FFFound Items^000000: Shell,Red Potion,Empty Bottle";
- next;
- mes "^FF0000[Neutral,Small Monster Encyclopedia]^000000";
- mes "3.Ant Egg";
- mes "Simple Ant Egg.";
- mes "^0099FFFound Items^000000: Shell,Jellopy,Sticky Muscus,Empty Bottle";
- next;
- mes "^FF0000[Neutral,Small Monster Encyclopedia]^000000";
- mes "2.Baby Thief Bug";
- mes "Dirty and filthy Creatures having a strong solidarity with the same kind, eat everything on the ground as well.They are sorted into 3 kinds by the Size and Colour.";
- mes "^0099FFFound Items^000000: Worm Peeling,Red Herb,Jellopy";
- next;
- goto MonNeuPro;
- close;
- MedMonNeuPro:
- mes "^FF0000[Neutral,Medium Monster Encyclopedia]^000000";
- mes "Unfortunately there is no medium monster of Neutral property which has been discovered so far.";
- next;
- goto MonNeuPro;
- close;
- GrMonNeuPro:
- mes "^FF0000[Neutral,Great Monster Encyclopedia]^000000";
- mes "1.Golem";
- mes "Living Stone wich has spell-bound by Black Magic.Its gigantic body makes its moving slow.Recognises Magic Spell Casting.";
- mes "^0099FFFound Items^000000: Scell";
- next;
- goto MonNeuPro;
- close;
- EndMonNeuPro:
- close;
- close;
- Cancel:
- close;
-}
-
-prt_in.gat,161,50,4 script Monster Encyclopedia 111,{
- mes "^FF0000[Monster Encyclopedia]^000000";
- mes "This is a Monster Encyclopedia including Monsters of Dark,Poison and Undead Property!";
- next;
- menu "Monster of Dark Property",MonDrkPro,"Monster of Poison Property",MonPsoPro,"Monster of Undead Property",MonUndPro,"Cancel",Cancel;
-
- MonDrkPro:
- menu "Small Size Monster",SmaMonDrkPro,"Medium Size Monster",MedMonDrkPro,"Great Size Monster",GrMonDrkPro,"Cancel",EndMonDrkPro;
-
- SmaMonDrkPro:
- mes "^FF0000[Dark,Small Monster Encyclopedia]^000000";
- mes "1.Thief Bug Egg";
- mes "Egg of Filthy Bug.Let's cut off the evil at its root.";
- mes "^0099FFFound Items^000000: Chrysalis,Sticky Muscus";
- next;
- mes "^FF0000[Dark,Small Monster Encyclopedia]^000000";
- mes "2.Familiar";
- mes "Bat of Violet Colour.Not that strong but really annoying because it attacks very fast and outregeously when somebody gets near it.";
- mes "^0099FFFound Items^000000: Tooth of Bat,Fly Wing,Grape,Red Herb";
- next;
- mes "^FF0000[Dark,Small Monster Encyclopedia]^000000";
- mes "3.Tarou";
- mes "Little mouse of white colour. It is squicking very loudly in the Dead Pit or the Prontera Culvert.";
- mes "^0099FFFound Items^000000: Rat Tail,Leather,Feather,Monster's Feed";
- next;
- mes "^FF0000[Dark,Small Monster Encyclopedia]^000000";
- mes "4.Drainliar";
- mes "Freaking Bloody bat with a might.";
- mes "^0099FFFound Items^000000: Tooth of Bat,Red Herb";
- next;
- mes "^FF0000[Dark,Small Monster Encyclopedia]^000000";
- mes "5.Dokkaebi";
- mes "Korean Traditional Ghost with Dark Skin. It looks so cute and has a small horn on the head.";
- mes "^0099FFFound Items^000000: Dokkaebi Horn";
- next;
- mes "^FF0000[Dark,Small Monster Encyclopedia]^000000";
- mes "6.Deviruchi";
- mes "Little evil creature,which carries a cute fork with.";
- mes "^0099FFFound Items^000000: Little Evil Horn,Little Evil Wing,Zargon";
- next;
- goto MonDrkPro;
- close;
- MedMonDrkPro:
- mes "^FF0000[Dark,Medium Monster Encyclopedia]^000000";
- mes "1.Female Thief Bug";
- mes "Dirty and filthy Creatures having a strong solidarity with the same kind, eat everything on the ground as well.They are sorted into 3 kinds by the Size and Colour.";
- mes "^0099FFFound Items^000000: Worm Peeling,Red Herb,Jellopy,Garlet.Insect Feeler";
- next;
- mes "^FF0000[Dark,Medium Monster Encyclopedia]^000000";
- mes "2.Male Thief Bug";
- mes "Dirty and filthy Creatures having a strong solidarity with the same kind, eat everything on the ground as well.They are sorted into 3 kinds by the Size and Colour.";
- mes "^0099FFFound Items^000000: Worm Peeling,Red Herb,Jellopy,Garlet.Insect Feeler,Yellow Herb";
- next;
- mes "^FF0000[Dark,Medium Monster Encyclopedia]^000000";
- mes "3.Matyr";
- mes "Creature shaped in Black Dog.";
- mes "^0099FFFound Items^000000: Monster's Feed,Leather";
- next;
- mes "^FF0000[Dark,Medium Monster Encyclopedia]^000000";
- mes "4.Zenorc";
- mes "Mutent Orc with a small and short build.It moves around using both hands and feet. It owns High AGI stat,so that it passes off almost every attack.";
- mes "^0099FFFound Items^000000: Znorc's Fang,Sticky Muscus,Yellow Potion";
- next;
- mes "^FF0000[Dark,Medium Monster Encyclopedia]^000000";
- mes "5.Requiem";
- mes "It seems like an Ancient Slave,carrying a heavy Coffin on the back.";
- mes "^0099FFFound Items^000000: Mystic Blue Box";
- next;
- mes "^FF0000[Dark,Medium Monster Encyclopedia]^000000";
- mes "6.Bathory";
- mes "Witch with a big wen on the nose.She rides on her magic broom flying around in the air.";
- mes "^0099FFFound Items^000000: Witched Starsand";
- next;
- goto MonDrkPro;
- close;
- GrMonDrkPro:
- mes "^FF0000[Dark,Great Monster Encyclopedia]^000000";
- mes "1.Isis.";
- mes "Creature having the head and upper body of a woman and the tail of a snake.Her nail is quite a menace.";
- mes "^0099FFFound Items^000000: Scale Skin,Shining Scale";
- next;
- mes "^FF0000[Dark,Great Monster Encyclopedia]^000000";
- mes "3.Raydric";
- mes "Ghost Knight of misfortune.";
- mes "^0099FFFound Items^000000: Elunium,Chivarly Emblem";
- next;
- goto MonDrkPro;
- close;
- EndMonDrkPro:
- close;
- close;
- MonPsoPro:
- menu "Small Size Monster",SmaMonPsoPro,"Medium Size Monster",MedMonPsoPro,"Great Size Monster",GrMonPsoPro,"Cancel",EndMonPsoPro;
-
- SmaMonPsoPro:
- mes "^FF0000[Poison,Small Monster Encyclopedia]^000000";
- mes "Unfortunately there is no small monster of Poison Property which has been discovered so far.";
- next;
- goto MonPsoPro;
- close;
- MedMonPsoPro:
- mes "^FF0000[Poison,Medium Monster Encyclopedia]^000000";
- mes "1.Poporing";
- mes "Poisonous Poring in light green.Every character is the same as poring,but much more stronger.";
- mes "^0099FFFound Items^000000: Sticky Muscus,Garlet,Green Herb";
- next;
- mes "^FF0000[Poison,Medium Monster Encyclopedia]^000000";
- mes "2.Poison Spore";
- mes "Poisonous Spore in Violet.Besides,it tends to attack haphazardly if anybody gets near.";
- mes "^0099FFFound Items^000000: Spore,Green Herb";
- next;
- mes "^FF0000[Poison,Medium Monster Encyclopedia]^000000";
- mes "3.Cobold the 2nd";
- mes "Small monster looks like a Wolf but it is smart enough to handle several tools. It is hostile and strong unlike its appearance. All Cobolds seem to be brothers.";
- mes "^0099FFFound Items^000000: Blue Hair,Zargon,Orange Potion";
- next;
- mes "^FF0000[Poison,Medium Monster Encyclopedia]^000000";
- mes "4.Side Winder";
- mes "Horrendous Snake of Dark colour.";
- mes "^0099FFFound Items^000000: Shining Scale,Zargon,Poisonous Canine,Snake Scale";
- next;
- goto MonPsoPro;
- close;
- GrMonPsoPro:
- mes "^FF0000[Poison,Great Monster Encyclopedia]^000000";
- mes "1.Argos";
- mes "Big Spider of Dark colour.It often invades passangers who intend to go over Mt.Mjornir. Be cautious of Argos,if you are the one of those passangers.";
- mes "^0099FFFound Items^000000: Cobweb,Scell,Bug Leg,Green Herb,Yellow Herb";
- next;
- mes "^FF0000[Poison,Great Monster Encyclopedia]^000000";
- mes "2.Argiope";
- mes "Monster crawling around with several articular legs.";
- mes "^0099FFFound Items^000000: Bug Leg,Zargon,Green Herb";
- next;
- mes "^FF0000[Poison,Great Monster Encyclopedia]^000000";
- mes "4.Myst";
- mes "Mist-like Monster.";
- mes "^0099FFFound Items^000000: Trunk.Gas Mask";
- next;
- goto MonPsoPro;
- close;
- EndMonPsoPro:
- close;
- close;
- MonUndPro:
- menu "Small Size Monster",SmaMonUndPro,"Medium Size Monster",MedMonUndPro,"Great Size Monster",GrMonUndPro,"Cancel",EndMonUndPro;
-
- SmaMonUndPro:
- mes "^FF0000[Undead,Small Monster Encyclopedia]^000000";
- mes "Unfortunately there is no small monster of Undead Property which has been discovered so far.";
- next;
- goto MonUndPro;
- close;
- MedMonUndPro:
- mes "^FF0000[Undead,Medium Monster Encyclopedia]^000000";
- mes "1.Zombie";
- mes "Bad Case of the Dead which has been reborn as a Walking Corpse by Back magic.Let's lead it to Nirvana.";
- mes "^0099FFFound Items^000000: Decayed Nail,Sticky Muscus,Horrendous Mouth";
- next;
- mes "^FF0000[Undead,Medium Monster Encyclopedia]^000000";
- mes "2.Megalodon";
- mes "Skeleton Fish having spooky empty eye-holes.";
- mes "^0099FFFound Items^000000: Stinky Scale,Skel-Bone";
- next;
- mes "^FF0000[Undead,Medium Monster Encyclopedia]^000000";
- mes "3.Orc Zombie";
- mes "Corpes of the Orc which has been given a new life by Black magic.";
- mes "^0099FFFound Items^000000: Orc Claw,Sticky Muscus";
- next;
- mes "^FF0000[Undead,Medium Monster Encyclopedia]^000000";
- mes "4.Pirate Skel";
- mes "Walking Corpse of a Pirate which had ordered all over the Sea.";
- mes "^0099FFFound Items^000000: Skel-Bone";
- next;
- mes "^FF0000[Undead,Medium Monster Encyclopedia]^000000";
- mes "5.Orc Skeleton";
- mes "Ancient Living Skeleton of the Orc which had been buried for a long time.It has Great Power as well as the period of being buried.";
- mes "^0099FFFound Items^000000: Orc's Fang,Green Potion";
- next;
- mes "^FF0000[Undead,Medium Monster Encyclopedia]^000000";
- mes "6.Soldier Skeleton";
- mes "Skeleton holding 2 swords on both grips,attacks fast.One of the dangerous monsters in the Cave.";
- mes "^0099FFFound Items^000000: Skel-Bone,Red Potion";
- next;
- mes "^FF0000[Undead,Medium Monster Encyclopedia]^000000";
- mes "7.Munak";
- mes "Pretty-looking Female corpse which had been frozen for a long time.She looks like holding a long story deep inside, the story people want to know about.Anyway Don't give her a break,she'll give strong damages on you.";
- mes "^0099FFFound Items^000000: Daenggie ,Munak Turban";
- next;
- mes "^FF0000[Undead,Medium Monster Encyclopedia]^000000";
- mes "8.Skel Worker";
- mes "Walking Skeletion which was dead in a mine.";
- mes "^0099FFFound Items^000000: Iron,Lantern";
- next;
- mes "^FF0000[Undead,Medium Monster Encyclopedia]^000000";
- mes "9.Archer Skeleton";
- mes "It seems to be an expert of bow when it was alive.It'll come to attack in no time when somebody gets inside of its range.";
- mes "^0099FFFound Items^000000: Skel-Bone,Fire Arrow,Red Potion";
- next;
- mes "^FF0000[Undead,Medium Monster Encyclopedia]^000000";
- mes "10.Mummy";
- mes "Walking Corpse with a bandage all around the body.It smells so bad because its body is still on the decomposed stage.";
- mes "^0099FFFound Items^000000: Rotten Bandage";
- next;
- mes "^FF0000[Undead,Medium Monster Encyclopedia]^000000";
- mes "11.Verit";
- mes "Dog with a bandage all around the body which was dead once before.It tends to eat everything dropped on the ground.";
- mes "^0099FFFound Items^000000: Immortal Heart,Zargon,Rotten Bandage";
- next;
- mes "^FF0000[Undead,Medium Monster Encyclopedia]^000000";
- mes "12.Ghoul";
- mes "Similar as Zombie but much more stronger. Yet very slow, you'd better run for your life when happen to meet this thing.";
- mes "^0099FFFound Items^000000: Horrendous Mouth";
- next;
- goto MonUndPro;
- close;
- GrMonUndPro:
- mes "^FF0000[Undead,Great Monster Encyclopedia]^000000";
- mes "3.Evil Druid";
- mes "You'll shudder even once looking at it.";
- mes "^0099FFFound Items^000000: Amulet,White Herb";
- next;
- goto MonUndPro;
- close;
- EndMonUndPro:
- close;
- close;
- Cancel:
- close;
-}
-
-prt_in.gat,162,68,4 script `Merchant Guideline' for Dummies 111,{
- mes "^FF0000[`Merchant Guideline' for Dummies]^000000";
- mes "Please go over the next page if you want to check `Vending'.";
- next;
- menu "Go over the next page",NextPage,"Close the book",CloseB;
-
- NextPage:
- mes "^FF0000[Vending Guide for Dummies]^000000";
- mes "To Vend a Shop,first you must equip a ^0099FFCart^000000.";
- mes "You can rent a cart from Kafra.When equipped once,it won't be disappeared as long as you don't take off.";
- next;
- mes "^FF0000[Vending Guide for Dummies]^000000";
- mes "However,this cart diminishes moving speed.You can recover moving speed after learning `Push Cart' the skill.";
- next;
- mes "^FF0000[Vending Guide for Dummies]^000000";
- mes "When learn `Push Cart' over 3 points,it will allow you to learn `Vending'.You can display 3 kinds of item on your shop with Vending at first.";
- mes "As Vending skill goes higher, it will allow you to display more items.";
- next;
- mes "^FF0000[Vending Guide for Dummies]^000000";
- mes "Let's store things you want to sell in the Cart.";
- mes "To open Cart Window,Use ^0099FFalt+W^000000 as hotkey.Or it will be open when you click `Item' icon on equipment(alt+Q) window.";
- next;
- mes "^FF0000[Vending Guide for Dummies]^000000";
- mes "Now Use `Vending' skill.2 kinds of Window-`Item Shop' and `Item you want to sell'- will pop up.";
- next;
- mes "^FF0000[Vending Guide for Dummies]^000000";
- mes "On `Item Shop' window,name your shop.Then Drag items onto `Item you want to sell' window and Fix the price.";
- next;
- mes "^FF0000[Vending Guide for Dummies]^000000";
- mes "When close `My Shop' window,your shop will be closed.You can check each price of items with a mouse on the items. Meanwhile it keeps being recorded on Chat window how many items or which kind have been sold.";
- next;
- mes "^FF0000[Vending Guide for Dummies]^000000";
- mes "When everything's sold out,the shop will be closed automatically.";
- close;
- CloseB:
- close;
-}
-
-prt_in.gat,164,96,4 script Monster Encyclopedia 111,{
- mes "^FF0000[Dungeon Monster Encyclopedia]^000000";
- mes "This is an Encyclopedia describing Monsters living in Dungeons.";
- next;
- next;
- menu "Orc Dungeon",OrcDung,"Byalan Cave near Izlude",ByaCave,"Prontera Culvert",PrtCul;
-
- OrcDung:
- menu "F1",OrcDungF1,"F2",OrcDungF2,"Cancel",EndOrcDung;
-
- OrcDungF1:
- mes "^FF0000[Orc Dungeon 1F Monster Encyclopedia]^000000";
- mes "1.Chonchon";
- mes "Flying monsters, they are not strong but make as annoying noises as Roda Frog. Make sure to eliminate them whenever you see.";
- mes "^0099FFFound Items^000000: Shell,Jellopy,Fly Wing";
- next;
- mes "^FF0000[Orc Dungeon 1F Monster Encyclopedia]^000000";
- mes "2.Familiar";
- mes "Bat of Violet Colour.Not that strong but really annoying because it attacks very fast and outregeously when somebody gets near it.";
- mes "^0099FFFound Items^000000: Tooth of Bat,Fly Wing,Grape,Red Herb";
- next;
- mes "^FF0000[Orc Dungeon 1F Monster Encyclopedia]^000000";
- mes "3.Orc Zombie";
- mes "Corpes of the Orc which has been given a new life by Black magic.";
- mes "^0099FFFound Items^000000: Orc Claw,Sticky Muscus";
- next;
- mes "^FF0000[Orc Dungeon 1F Monster Encyclopedia]^000000";
- mes "4.Orc Skeleton";
- mes "Ancient Living Skeleton of the Orc which had been buried for a long time.It has Great Power as well as the period of being buried.";
- mes "^0099FFFound Items^000000: Orc's Fang,Green Potion";
- next;
- goto OrcDung;
- close;
- OrcDungF2:
- mes "^FF0000[Orc Dungeon 2F Monster Encyclopedia]^000000";
- mes "1.Chonchon";
- mes "Flying monsters, they are not strong but make as annoying noises as Roda Frog. Make sure to eliminate them whenever you see.";
- mes "^0099FFFound Items^000000: Shell,Jellopy,Fly Wing";
- next;
- mes "^FF0000[Orc Dungeon 2F Monster Encyclopedia]^000000";
- mes "2.Familiar";
- mes "Bat of Violet Colour.Not that strong but really annoying because it attacks very fast and outregeously when somebody gets near it.";
- mes "^0099FFFound Items^000000: Tooth of Bat,Fly Wing,Grape,Red Herb";
- next;
- mes "^FF0000[Orc Dungeon 2F Monster Encyclopedia]^000000";
- mes "3.Orc Skeleton";
- mes "Ancient Living Skeleton of the Orc which had been buried for a long time.It has Great Power as well as the period of being buried.";
- mes "^0099FFFound Items^000000: Orc's Fang,Green Potion";
- next;
- mes "^FF0000[Orc Dungeon 2F Monster Encyclopedia]^000000";
- mes "4.Zenorc";
- mes "Mutent Orc with a small and short build.It moves around using both hands and feet. It owns High AGI stat,so that it passes off almost every attack.";
- mes "^0099FFFound Items^000000: Znorc's Fang,Sticky Muscus,Yellow Potion";
- next;
- goto OrcDung;
- close;
- EndOrcDung:
- close;
- close;
- ByaCave:
- menu "1F",ByaCaveF1,"2F",ByaCaveF2,"3F",ByaCaveF3,"4F",ByaCaveF4,"5F",ByaCaveF5,"Cancel",EndByaCave;
-
- ByaCaveF1:
- mes "^FF0000[Byalan Cave 1F Monster Encyclopedia]^000000";
- mes "1.Plankton";
- mes "Even though looks like trifle creatures, they fly into a rage when stepped on. They are light, drifting on the water and attack with several projections.";
- mes "^0099FFFound Items^000000: Single Cell.Garlet.Sticky Muscus.Empty Bottle";
- next;
- mes "^FF0000[Byalan Cave 1F Monster Encyclopedia]^000000";
- mes "2.Kukre";
- mes "Look better than Thief Bugs but basically do the same thing. But luckily they don't attack players in a group.";
- mes "^0099FFFound Items^000000: Worm Peeling.Garlet.Monster's Feed.Red Herb.Insect Feeler";
- next;
- mes "^FF0000[Byalan Cave 1F Monster Encyclopedia]^000000";
- mes "3.Hydra";
- mes "Veggie Monsters which live near water or in the deep sea. Attack using tentacles. When run into them in a group, it will be the pain in the ass. It will be effective to kill one by one before they gather.";
- mes "^0099FFFound Items^000000: Tentacle.Sticky Muscus.Meat";
- next;
- mes "^FF0000[Byalan Cave 1F Monster Encyclopedia]^000000";
- mes "4.Vadon";
- mes "They wear thick shells all around the body and walk around tinkling nippers. Also their red color looks so tempting an appetite.Be careful anyway.";
- mes "^0099FFFound Items^000000: Nipper.Garlet.Solid Shell.Shell";
- next;
- mes "^FF0000[Byalan Cave 1F Monster Encyclopedia]^000000";
- mes "5.Marina";
- mes "Jelly Fishes of transparent white color. Do flexible attacks stretching its body as long as they can. They live in cool places near water.";
- mes "^0099FFFound Items^000000: Single Cell.Sticky Muscus";
- next;
- goto ByaCave;
- close;
- ByaCaveF2:
- mes "^FF0000[Byalan Cave 2F Monster Encyclopedia]^000000";
- mes "1.Plankton";
- mes "Even though looks like trifle creatures, they fly into a rage when stepped on. They are light, drifting on the water and attack with several projections.";
- mes "^0099FFFound Items^000000: Single Cell.Garlet.Sticky Muscus.Empty Bottle";
- next;
- mes "^FF0000[Byalan Cave 2F Monster Encyclopedia]^000000";
- mes "2.Kukre";
- mes "Look better than Thief Bugs but basically do the same thing. But luckily they don't attack players in a group.";
- mes "^0099FFFound Items^000000: Worm Peeling.Garlet.Monster's Feed.Red Herb.Insect Feeler";
- next;
- mes "^FF0000[Byalan Cave 2F Monster Encyclopedia]^000000";
- mes "3.Hydra";
- mes "Veggie Monsters which live near water or in the deep sea. Attack using tentacles. When run into them in a group, it will be the pain in the ass. It will be effective to kill one by one before they gather.";
- mes "^0099FFFound Items^000000: Tentacle.Sticky Muscus.Meat";
- next;
- mes "^FF0000[Byalan Cave 2F Monster Encyclopedia]^000000";
- mes "4.Vadon";
- mes "They wear thick shells all around the body and walk around tinkling nippers. Also their red color looks so tempting an appetite.Be careful anyway.";
- mes "^0099FFFound Items^000000: Nipper.Garlet.Solid Shell.Shell";
- next;
- mes "^FF0000[Byalan Cave 2F Monster Encyclopedia]^000000";
- mes "5.Marina";
- mes "Jelly Fishes of transparent white color. Do flexible attacks stretching its body as long as they can. They live in cool places near water.";
- mes "^0099FFFound Items^000000: Single Cell.Sticky Muscus";
- next;
- mes "^FF0000[Byalan Cave 2F Monster Encyclopedia]^000000";
- mes "6.Thara Frog";
- mes "Frogs of red color, surely stronger than Roda Frogs. However there is obvious one thing in common about them, annoying croaking noise.";
- mes "^0099FFFound Items^000000: Spawn,Scell,Sticky Webfoot";
- next;
- goto ByaCave;
- close;
- ByaCaveF3:
- mes "^FF0000[Byalan Cave 3F Monster Encyclopedia]^000000";
- mes "1.Hydra";
- mes "Veggie Monsters which live near water or in the deep sea. Attack using tentacles. When run into them in a group, it will be the pain in the ass. It will be effective to kill one by one before they gather.";
- mes "^0099FFFound Items^000000: Tentacle.Sticky Muscus.Meat";
- next;
- mes "^FF0000[Byalan Cave 3F Monster Encyclopedia]^000000";
- mes "2.Thara Frog";
- mes "Frogs of red color, surely stronger than Roda Frogs. However there is obvious one thing in common about them, annoying croaking noise.";
- mes "^0099FFFound Items^000000: Spawn,Scell,Sticky Webfoot";
- next;
- mes "^FF0000[Byalan Cave 3F Monster Encyclopedia]^000000";
- mes "3.Cornutus";
- mes "Some buddies concealing themselves within hard turban shells and try to lead a quiet life.";
- mes "^0099FFFound Items^000000: Conch.Scell.Solid Shell";
- next;
- mes "^FF0000[Byalan Cave 3F Monster Encyclopedia]^000000";
- mes "4.Mars";
- mes "Have many legs, flapping under the water. Do not rush to it because of its tempting look.";
- mes "^0099FFFound Items^000000: Squid Ink,Tentacle";
- next;
- mes "^FF0000[Byalan Cave 3F Monster Encyclopedia]^000000";
- mes "5.Obeaune";
- mes "Female Mermaid. Attacks using long hair, with a grim face.";
- mes "^0099FFFound Items^000000: Heart of Mermaid,Fin";
- next;
- goto ByaCave;
- close;
- ByaCaveF4:
- mes "^FF0000[Byalan Cave 4F Monster Encyclopedia]^000000";
- mes "1.Hydra";
- mes "Veggie Monsters which live near water or in the deep sea. Attack using tentacles. When run into them in a group, it will be the pain in the ass. It will be effective to kill one by one before they gather.";
- mes "^0099FFFound Items^000000: Tentacle.Sticky Muscus.Meat";
- next;
- mes "^FF0000[Byalan Cave 4F Monster Encyclopedia]^000000";
- mes "2.Mars";
- mes "Have many legs, flapping under the water. Do not rush to it because of its tempting look.";
- mes "^0099FFFound Items^000000: Squid Ink,Tentacle";
- next;
- mes "^FF0000[Byalan Cave 4F Monster Encyclopedia]^000000";
- mes "3.Obeaune";
- mes "Female Mermaid. Attacks using long hair, with a grim face.";
- mes "^0099FFFound Items^000000: Heart of Mermaid,Fin";
- next;
- mes "^FF0000[Byalan Cave 4F Monster Encyclopedia]^000000";
- mes "4.Marine Sphere";
- mes "Strange, round-shaped monsters beating so fast that they seem like they will burst.";
- mes "^0099FFFound Items^000000: Tendon.Detonator";
- next;
- mes "^FF0000[Byalan Cave 4F Monster Encyclopedia]^000000";
- mes "5.Phen";
- mes "Fish of blue color which is kicking and definitely alive.";
- mes "^0099FFFound Items^000000: Fish Tail,Sharp Scale,Meat,Fin";
- next;
- mes "^FF0000[Byalan Cave 4F Monster Encyclopedia]^000000";
- mes "6.Sword Fish";
- mes "Fish Monster with a sharp, thin, and long nose. Goggle eyes are funny but it belongs to one of those dangerous monsters.";
- mes "^0099FFFound Items^000000: Sharp Scale,Gill";
- next;
- goto ByaCave;
- close;
- ByaCaveF5:
- mes "^FF0000[Byalan Cave 5F Monster Encyclopedia]^000000";
- mes "1.Marine Sphere";
- mes "Strange, round-shaped monsters beating so fast that they seem like they will burst.";
- mes "^0099FFFound Items^000000: Tendon.Detonator";
- next;
- mes "^FF0000[Byalan Cave 5F Monster Encyclopedia]^000000";
- mes "2.Sword Fish";
- mes "Fish Monster with a sharp, thin, and long nose. Goggle eyes are funny but it belongs to one of those dangerous monsters.";
- mes "^0099FFFound Items^000000: Sharp Scale,Gill";
- next;
- mes "^FF0000[Byalan Cave 5F Monster Encyclopedia]^000000";
- mes "3.Mars";
- mes "Have many legs, flapping under the water. Do not rush to it because of its tempting look.";
- mes "^0099FFFound Items^000000: Squid Ink,Tentacle";
- next;
- mes "^FF0000[Byalan Cave 5F Monster Encyclopedia]^000000";
- mes "4.Obeaune";
- mes "Female Mermaid. Attacks using long hair, with a grim face.";
- mes "^0099FFFound Items^000000: Heart of Mermaid,Fin";
- next;
- mes "^FF0000[Byalan Cave 5F Monster Encyclopedia]^000000";
- mes "5.Marc";
- mes "Sea Horse. Don't ever think about riding a Sea Horse!";
- mes "^0099FFFound Items^000000: Gill,Fin";
- next;
- mes "^FF0000[Byalan Cave 5F Monster Encyclopedia]^000000";
- mes "6.Strouf";
- mes "Fish rarely seen under the deep sea.";
- mes "^0099FFFound Items^000000: Fin,Feather,Gill";
- next;
- goto ByaCave;
- close;
- EndByaCave:
- close;
- close;
- PrtCul:
- menu "1F",PrtCulF1,"2F",PrtCulF2,"3F",PrtCulF3,"4F",PrtCulF4,"Cancel",EndPrtCul;
-
- PrtCulF1:
- mes "^FF0000[Prontera Culvert 1F Monster Encyclopedia]^000000";
- mes "1.Thief Bug Egg";
- mes "Egg of Filthy Bug.Let's cut off the evil at its root.";
- mes "^0099FFFound Items^000000: Chrysalis,Sticky Muscus";
- next;
- mes "^FF0000[Prontera Culvert 1F Monster Encyclopedia]^000000";
- mes "2.Thief Bug Baby";
- mes "Dirty and filthy Creatures having a strong solidarity with the same kind, eat everything on the ground as well.They are sorted into 3 kinds by the Size and Colour.";
- mes "^0099FFFound Items^000000: Worm Peeling,Red Herb,Jellopy";
- next;
- mes "^FF0000[Prontera Culvert 1F Monster Encyclopedia]^000000";
- mes "3.Familiar";
- mes "Bat of Violet Colour.Not that strong but really annoying because it attacks very fast and outregeously when somebody gets near it.";
- mes "^0099FFFound Items^000000: Tooth of Bat,Fly Wing,Grape,Red Herb";
- next;
- mes "^FF0000[Prontera Culvert 1F Monster Encyclopedia]^000000";
- mes "4.Spore";
- mes "Mushroom-like monsters. Usually live in the Forest or Dungeons. By the way Don't try to eat it!";
- mes "^0099FFFound Items^000000: Spore,Red Herb,Blue Herb";
- next;
- mes "^FF0000[Prontera Culvert 1F Monster Encyclopedia]^000000";
- mes "5.Tarou";
- mes "Little mouse of white colour. It is squicking very loudly in the Dead Pit or the Prontera Culvert.";
- mes "^0099FFFound Items^000000: Rat Tail,Leather,Feather,Monster's Feed";
- next;
- goto PrtCul;
- close;
- PrtCulF2:
- mes "^FF0000[Prontera Culvert 2F Monster Encyclopedia]^000000";
- mes "1.Thief Bug Egg";
- mes "Egg of Filthy Bug.Let's cut off the evil at its root.";
- mes "^0099FFFound Items^000000: Chrysalis,Sticky Muscus";
- next;
- mes "^FF0000[Prontera Culvert 2F Monster Encyclopedia]^000000";
- mes "2.Thief Bug Baby";
- mes "Dirty and filthy Creatures having a strong solidarity with the same kind, eat everything on the ground as well.They are sorted into 3 kinds by the Size and Colour.";
- mes "^0099FFFound Items^000000: Worm Peeling,Red Herb,Jellopy";
- next;
- mes "^FF0000[Prontera Culvert 2F Monster Encyclopedia]^000000";
- mes "3.Familiar";
- mes "Bat of Violet Colour.Not that strong but really annoying because it attacks very fast and outregeously when somebody gets near it.";
- mes "^0099FFFound Items^000000: Tooth of Bat,Fly Wing,Grape,Red Herb";
- next;
- mes "^FF0000[Prontera Culvert 2F Monster Encyclopedia]^000000";
- mes "4.Spore";
- mes "Mushroom-like monsters. Usually live in the Forest or Dungeons. By the way Don't try to eat it!";
- mes "^0099FFFound Items^000000: Spore,Red Herb,Blue Herb";
- next;
- mes "^FF0000[Prontera Culvert 2F Monster Encyclopedia]^000000";
- mes "5.Tarou";
- mes "Little mouse of white colour. It is squicking very loudly in the Dead Pit or the Prontera Culvert..";
- mes "^0099FFFound Items^000000: Rat Tail,Leather,Feather,Monster's Feed";
- next;
- mes "^FF0000[Prontera Culvert 2F Monster Encyclopedia]^000000";
- mes "6.Plankton";
- mes "Even though looks like trifle creatures, they fly into a rage when stepped on. They are light, drifting on the water and attack with several projections.";
- mes "^0099FFFound Items^000000: Single Cell.Garlet.Sticky Muscus.Empty Bottle";
- next;
- mes "^FF0000[Prontera Culvert 2F Monster Encyclopedia]^000000";
- mes "7.Hydra";
- mes "Veggie Monsters which live near water or in the deep sea. Attack using tentacles. When run into them in a group, it will be the pain in the ass. It will be effective to kill one by one before they gather.";
- mes "^0099FFFound Items^000000: Tentacle.Sticky Muscus.Meat";
- next;
- mes "^FF0000[Prontera Culvert 2F Monster Encyclopedia]^000000";
- mes "8.Female Thief Bug";
- mes "Dirty and filthy Creatures having a strong solidarity with the same kind, eat everything on the ground as well.They are sorted into 3 kinds by the Size and Colour.";
- mes "^0099FFFound Items^000000: Worm Peeling,Red Herb,Jellopy,Garlet.Insect Feeler";
- next;
- goto PrtCul;
- close;
- PrtCulF3:
- mes "^FF0000[Prontera Culvert 3F Monster Encyclopedia]^000000";
- mes "1.Thief Bug Egg";
- mes "Egg of Filthy Bug.Let's cut off the evil at its root.";
- mes "^0099FFFound Items^000000: Chrysalis,Sticky Muscus";
- next;
- mes "^FF0000[Prontera Culvert 3F Monster Encyclopedia]^000000";
- mes "2.Thief Bug Baby";
- mes "Dirty and filthy Creatures having a strong solidarity with the same kind, eat everything on the ground as well.They are sorted into 3 kinds by the Size and Colour.";
- mes "^0099FFFound Items^000000: Worm Peeling,Red Herb,Jellopy";
- next;
- mes "^FF0000[Prontera Culvert 3F Monster Encyclopedia]^000000";
- mes "3.Female Thief Bug";
- mes "Dirty and filthy Creatures having a strong solidarity with the same kind, eat everything on the ground as well.They are sorted into 3 kinds by the Size and Colour.";
- mes "^0099FFFound Items^000000: Worm Peeling,Red Herb,Jellopy,Garlet.Insect Feeler";
- next;
- mes "^FF0000[Prontera Culvert 3F Monster Encyclopedia]^000000";
- mes "4.Tarou";
- mes "Little mouse of white colour. It is squicking very loudly in the Dead Pit or the Prontera Culvert..";
- mes "^0099FFFound Items^000000: Rat Tail,Leather,Feather,Monster's Feed";
- next;
- mes "^FF0000[Prontera Culvert 3F Monster Encyclopedia]^000000";
- mes "5.Familiar";
- mes "Bat of Violet Colour.Not that strong but really annoying because it attacks very fast and outregeously when somebody gets near it.";
- mes "^0099FFFound Items^000000: Tooth of Bat,Fly Wing,Grape,Red Herb";
- next;
- mes "^FF0000[Prontera Culvert 3F Monster Encyclopedia]^000000";
- mes "6.Poporing";
- mes "Poisonous Poring in light green.Every character is the same as poring,but much more stronger.";
- mes "^0099FFFound Items^000000: Sticky Muscus,Garlet,Green Herb";
- next;
- goto PrtCul;
- close;
- PrtCulF4:
- mes "^FF0000[Prontera Culvert 4F Monster Encyclopedia]^000000";
- mes "1.Thief Bug Egg";
- mes "Egg of Filthy Bug.Let's cut off the evil at its root.";
- mes "^0099FFFound Items^000000: Chrysalis,Sticky Muscus";
- next;
- mes "^FF0000[Prontera Culvert 4F Monster Encyclopedia]^000000";
- mes "2.Thief Bug Baby";
- mes "Dirty and filthy Creatures having a strong solidarity with the same kind, eat everything on the ground as well.They are sorted into 3 kinds by the Size and Colour.";
- mes "^0099FFFound Items^000000: Worm Peeling,Red Herb,Jellopy";
- next;
- mes "^FF0000[Prontera Culvert 4F Monster Encyclopedia]^000000";
- mes "3.Female Thief Bug";
- mes "Dirty and filthy Creatures having a strong solidarity with the same kind, eat everything on the ground as well.They are sorted into 3 kinds by the Size and Colour.";
- mes "^0099FFFound Items^000000: Worm Peeling,Red Herb,Jellopy,Garlet.Insect Feeler";
- next;
- mes "^FF0000[Prontera Culvert 4F Monster Encyclopedia]^000000";
- mes "4.Male Thief Bug";
- mes "Dirty and filthy Creatures having a strong solidarity with the same kind, eat everything on the ground as well.They are sorted into 3 kinds by the Size and Colour.";
- mes "^0099FFFound Items^000000: Worm Peeling,Red Herb,Jellopy,Garlet.Insect Feeler,Yellow Herb";
- next;
- mes "^FF0000[Prontera Culvert 4F Monster Encyclopedia]^000000";
- mes "5.Golden Thief Bug";
- mes "Impertinent Thief Bug of Golden Colour,wearing a solid shell all around the body.It's rarely seen by human's eye.";
- mes "^0099FFFound Items^000000: Blue Herb,Gold,Ora Ora,Insect Feeler";
- next;
- goto PrtCul;
- close;
- EndPrtCul:
- close;
- close;
- Cancel:
- close;
-}
-
-prt_in.gat,164,102,4 script Monster Encyclopedia 111,{
- mes "^FF0000[Dungeon Monster Encyclopedia]^000000";
- mes "The is an Encyclopedia describing Monsters living in Dungeons.";
- next;
- menu "Sunken ship near Alberta",SunkShip,"Prontera Maze",PrtMaze;
-
- SunkShip:
- menu "F1",SunkShipF1,"F2",SunkShipF2,"Cancel",EndSunkShip;
-
- SunkShipF1:
- mes "^FF0000[Sunken Ship 1F Monster Encyclopedia]^000000";
- mes "1. Plankton";
- mes "Even though looks like trifle creatures, they fly into a rage when stepped on. They are light, drifting on the water and attack with serveral projections.";
- mes "^0099FFFound Items:^000000 Single Cell. Garlet. Sticky Mocus. Empty Bottle";
- next;
- mes "^FF0000[Sunken Ship 1F Monster Encyclopedia]^000000";
- mes "2. Kukre";
- mes "Look better than Thief Bugs but basically do the same thing. But luckily they don't attack players in a group.";
- mes "^0099FFFound Items:^000000 Worm Peeling. Garlet. Monster's Feed. Red Herb. Insect Feeler";
- next;
- mes "^FF0000[Sunken Ship 1F Monster Encyclopedia]^000000";
- mes "3. Hydra";
- mes "Veggie Monsters which live near water or in the deep sea. Attack using tentacles. When run into them in a group, it will be in the ass. It will be effective to kill one by one before they gather.";
- mes "^0099FFFound Items:^000000 Tentacles. Sticky Mocus. Meat";
- next;
- mes "^FF0000[Sunken Ship 1F Monster Encyclopedia]^000000";
- mes "4. Poporing";
- mes "Poisonous Poring in light green. Every character is the same as poring, but much more stronger.";
- mes "^0099FFFound Items:^000000 Skicky Mocus. Garlet. Green Herb";
- next;
- mes "^FF0000[Sunken Ship 1F Monster Encyclopedia]^000000";
- mes "5. Poison Spore";
- mes "Poisonous Spore in Violet. Besides, it tends to attack haphazardly if anybody gets near.";
- mes "^0099FFFound Items:^000000 Spore. Green Herb";
- next;
- mes "^FF0000[Sunken Ship 1F Monster Encyclopedia]^000000";
- mes "6. Pirate Skel";
- mes "Walking Corpse of a Pirate which had ordered all over the Sea.";
- mes "^0099FFFound Items:^000000 Skel-Bone";
- next;
- goto SunkShip;
- close;
- SunkShipF2:
- mes "^FF0000[Sunken Ship 2F Monster Encyclopedia]^000000";
- mes "1. Kukre";
- mes "Look better than Thief Bugs but basically do the same thing. But luckily they don't attack players in a group.";
- mes "^0099FFFound Items:^000000 Worm Peeling. Garlet. Monster's Feed. Red Herb. Insect Feeler";
- next;
- mes "^FF0000[Sunken Ship 2F Monster Encyclopedia]^000000";
- mes "2. Hydra";
- mes "Veggie Monsters which live near water or in the deep sea. Attack using tentacles. When run into them in a group, it will be in the ass. It will be effective to kill one by one before they gather.";
- mes "^0099FFFound Items:^000000 Tentacles. Sticky Mocus. Meat";
- next;
- mes "^FF0000[Sunken Ship 2F Monster Encyclopedia]^000000";
- mes "3. Poporing";
- mes "Poisonous Poring in light green. Every character is the same as poring, but much more stronger.";
- mes "^0099FFFound Items:^000000 Skicky Mocus. Garlet. Green Herb";
- next;
- mes "^FF0000[Sunken Ship 2F Monster Encyclopedia]^000000";
- mes "4. Thara Frogs";
- mes "Frogs of red color, surely stonger than Roda Frogs. However there is obvious one thing in common about them, annoying croaking noise.";
- mes "^0099FFFound Items:^000000 Spawn. Scell. Skicky Webfoot";
- next;
- mes "^FF0000[Sunken Ship 2F Monster Encyclopedia]^000000";
- mes "5. Whisper";
- mes "Living Fabric, which gives spooking feeling.";
- mes "^0099FFFound Items:^000000 Fabric";
- next;
- mes "^FF0000[Sunken Ship 2F Monster Encyclopedia]^000000";
- mes "6. Megalodon";
- mes "Skeleton Fish having spooky empty eye-holes.";
- mes "^0099FFFound Items:^000000 Skinky Scale. Skel-Bone";
- next;
- mes "^FF0000[Sunken Ship 2F Monster Encyclopedia]^000000";
- mes "7. Pirate Skel";
- mes "Walking Corpse of a Pirate which had ordered all over the Sea.";
- mes "^0099FFFound Items:^000000 Skel-Bone";
- next;
- mes "^FF0000[Sunken Ship 2F Monster Encyclopedia]^000000";
- mes "8. Marionette";
- mes "Monster reborn from bewitched Doll, bound to strings on Wooden Sticks.";
- mes "^0099FFFound Items:^000000 Skinky Golden Hair, Trunk";
- next;
- mes "9. Drake";
- mes "Awfully Strong Monster which looks like the Captain of this Sunken Ship.";
- mes "^0099FFFound Items:^000000 Skel-Bone. White";
- next;
- goto SunkShip;
- close;
- EndSunkShip:
- close;
- PrtMaze:
- menu "F1",PrtMazeF1,"F3",PrtMazeF3,"Cancel",EndPrtMaze;
-
- PrtMazeF1:
- mes "^FF0000[Prontera Maze 1F Monster Encyclopedia]^000000";
- mes "1. Poring";
- mes "Small and circular monsters of transparent pink color. Swallow anything on the ground with sparkling eyes, without any hesitations. No matter what kind of things dropped.";
- mes "They tend to eat first. So be cautious when you put down drop something on the ground. But don't worry. They are not strong, and you will get your back once you kill the monster, which eat your stuff.";
- mes "^0099FFFound Items:^000000 Jellopy. Skicky Mocus. Apple. Empty Bottle. Red Herb";
- next;
- mes "^FF0000[Prontera Maze 1F Monster Encyclopedia]^000000";
- mes "2. Lunatic";
- mes "Plump and shaggy monster shaped in Rabbit. However it won't give you `Bunny Band'.";
- mes "^0099FFFound Items:^000000 Clover. Feather. Carrot. Red Herb";
- next;
- mes "^FF0000[Prontera Maze 1F Monster Encyclopedia]^000000";
- mes "3. Fabre";
- mes "Larva of Creamy. It is cute when it wiggles, even though it is a weak and small monster,";
- mes "People often tends to slay Fabres, only for the reason they can get `Feather's', one of required items for `Bunny Band'.";
- mes "^0099FFFound Items:^000000 Fluff. Feather. Green Herb. Clover";
- next;
- mes "^FF0000[Prontera Maze 1F Monster Encyclopedia]^000000";
- mes "4. Creamy";
- mes "Monster with Beautiful Wings. `Hah~ it's just a buttefly!'. Careless thinking like this will make you bleeding~! It is much stronger then you expect. Be careful!";
- mes "^0099FFFound Items:^000000 Powder of Butterfly. Honey. Butterfly Wing. Flower";
- next;
- mes "^FF0000[Prontera Maze 1F Monster Encyclopedia]^000000";
- mes "5. Pupa";
- mes "Monster on the Fabre's pupal stage. It doesn't attack at all, so easy to kill for Novice people.";
- mes "^0099FFFound Items:^000000 Chrysalis. Sticky Mocus";
- next;
- mes "^FF0000[Prontera Maze 1F Monster Encyclopedia]^000000";
- mes "6. Poporing";
- mes "Poisonous Poring in light green. Every character is the same as poring, but much more stronger.";
- mes "^0099FFFound Items:^000000 Skicky Mocus. Garlet. Green Herb";
- next;
- mes "^FF0000[Prontera Maze 1F Monster Encyclopedia]^000000";
- mes "7. Rocker";
- mes "Lazy Grasshopper which loves playing Violin.";
- mes "^0099FFFound Items:^000000 Grasshopper's Leg. Jellopy";
- next;
- mes "^FF0000[Prontera Maze 1F Monster Encyclopedia]^000000";
- mes "8. Big Foot";
- mes "Dull-Looking Bear with a huge build. Although it looks dumb but you will realise how it can be fast after you provoke it.";
- mes "^0099FFFound Items:^000000 Bear's Foot Skin. Leather. Sweet Potato";
- next;
- mes "^FF0000[Prontera Maze 1F Monster Encyclopedia]^000000";
- mes "9. Smokie";
- mes "It's working out all the time. Often tries to shapeshift with Raccon Leaves, but always failed. Back then, it tended to gather stuffs diligently, now it seems to give up.";
- mes "^0099FFFound Items:^000000 Raccon Leaf. Leather. Sweet Potato";
- next;
- mes "10. Snake";
- mes "Green Coloured Snake living in the Forest or Desert. Not poisonous but be careful.";
- mes "^0099FFFound Items:^000000 Snake Scale. Red Herb";
- next;
- mes "^FF0000[Prontera Maze 1F Monster Encyclopedia]^000000";
- mes "11.Wolf";
- mes "Wanderers having Blue Manes.They are cooperative,so attack in a group when one got attacked.Let's just let them mind their business and watch.";
- mes "^0099FFFound Items^000000: Wolf Claw,Meat,Monster's Feed,Leather";
- next;
- mes "^FF0000[Prontera Maze 1F Monster Encyclopedia]^000000";
- mes "12.Argiope";
- mes "Monster crawling around with several articular legs.";
- mes "^0099FFFound Items^000000: Bug Leg,Zargon,Green Herb";
- next;
- mes "^FF0000[Prontera Maze 1F Monster Encyclopedia]^000000";
- mes "13.Argos";
- mes "Big Spider of Dark colour.It often invades people lost in the Maze.";
- mes "^0099FFFound Items^000000: Cobweb,Scell,Bug Leg,Green Herb,Yellow Herb";
- next;
- mes "^FF0000[Prontera Maze 1F Monster Encyclopedia]^000000";
- mes "14.Chonchon";
- mes "Flying monsters, they are not strong but make as annoying noises as Roda Frog. Make sure to eliminate them whenever you see.";
- mes "^0099FFFound Items^000000: Shell,Jellopy,Fly Wing";
- next;
- mes "^FF0000[Prontera Maze 1F Monster Encyclopedia]^000000";
- mes "15.Horn";
- mes "Compliant Insect unlike its offensive appearance.It's wandering about the field making some crunching sound.";
- mes "^0099FFFound Items^000000: Horn,Shell,Solid Shell";
- next;
- mes "^FF0000[Prontera Maze 1F Monster Encyclopedia]^000000";
- mes "16.Hunter Fly";
- mes "Winged insect of Blood. It is Strong meanwhile very annoying. Be advised, you'd better flee away if you can.";
- mes "^0099FFFound Items^000000: Solid Shell,Zargon";
- next;
- mes "^FF0000[Prontera Maze 1F Monster Encyclopedia]^000000";
- mes "17.Mantis";
- mes "It wanders about the field waving a tiny fan.";
- mes "^0099FFFound Items^000000: Mantis Scythe,Scell,Solid Shell,Red Potion";
- next;
- mes "^FF0000[Prontera Maze 1F Monster Encyclopedia]^000000";
- mes "18.Steiner";
- mes "Tiny little insect with a Splendid shell. Don't ever look down upon it. It is stronger than you expect. Besides it recognizes Magical Spell Casting.";
- mes "^0099FFFound Items^000000: Rainbow Shell,Garlet,Shell,Solid Shell";
- next;
- mes "^FF0000[Prontera Maze 1F Monster Encyclopedia]^000000";
- mes "19.Side Winder";
- mes "Horrendous Snake of Dark colour.";
- mes "^0099FFFound Items^000000: Shining Scale,Zargon,Poisonous Canine,Snake Scale";
- next;
- mes "^FF0000[Prontera Maze 1F Monster Encyclopedia]^000000";
- mes "20.Yoyo";
- mes "Pink coloured Monkey.Not only they pick up every stuff dropped on the gound outrageously, but they are nimble and cooperative,you must be cautious of being attacked by a group.";
- mes "^0099FFFound Items^000000: Yoyo Tail,Banana,Yellow Herb,Leather";
- next;
- mes "^FF0000[Prontera Maze 1F Monster Encyclopedia]^000000";
- mes "^FF0000[Earth,Small Monster Encyclopedia]^000000";
- mes "21.Caramel";
- mes "Cute porcupine with tiny spiky quills.But don't ever touch it without intention,it will get mad immeduately.";
- mes "^0099FFFound Items^000000: Porcupine Quill,Leather";
- next;
- mes "^FF0000[Prontera Maze 1F Monster Encyclopedia]^000000";
- mes "22.Steel Chonchon";
- mes "This is similar as Chonchon, but in yellow and green. Picks up every stuff on the ground. It is strong and well-cooperative with its fellows, so don't forget to get items before it picks up.";
- mes "^0099FFFound Items^000000: Garlet,Shell,Solid Shell";
- next;
- mes "^FF0000[Prontera Maze 1F Monster Encyclopedia]^000000";
- mes "23.Coco";
- mes "Little but fierce-looking eyed Creature carrying an Acorn on both hands. It is very unpleasant when it gives a dirty look,let's give it a lesson.";
- mes "^0099FFFound Items^000000: Acorn,Fluff,Leather,Sweet Potato";
- next;
- mes "^FF0000[Prontera Maze 1F Monster Encyclopedia]^000000";
- mes "24.Dustiness";
- mes "This monster owns high dodge rate because it is flying. Need to be attentive if you want to attack.";
- mes "^0099FFFound Items^000000: Moth Dust,Moth Wing,Insect Feeler,Red Herb";
- next;
- mes "^FF0000[Prontera Maze 1F Monster Encyclopedia]^000000";
- mes "25.Martin";
- mes "Funny looking Mole wearing a Safety Helmet on the head,which is always busy to walk around.";
- mes "^0099FFFound Items^000000: Mole Whiskers,Mole Claw";
- next;
- mes "^FF0000[Prontera Maze 1F Monster Encyclopedia]^000000";
- mes "26.Savage";
- mes "Wild Boar always walking around restlessly,making some noise. It has Big fangs and looks different from the young one.";
- mes "^0099FFFound Items^000000: Mane,Leather";
- next;
- goto PrtMaze;
- close;
- PrtMazeF3:
- mes "^FF0000[Prontera Maze 3F Monster Encyclopedia]^000000";
- mes "1.Poring";
- mes "Small and circular monsters of transparent pink color. Swallow anything on the ground with sparkling eyes, without any hesitations. No matter what kind of things dropped,";
- mes "They tend to eat first. So be cautious when you put down drop something on the ground. But don't worry. They are not strong, and you will get yours back once you kill the monster, which eat your stuff.";
- mes "^0099FFFound Items^000000: Jellopy.Sticky Muscus.Apple.Empty Bottle.Red Herb";
- next;
- mes "^FF0000[Prontera Maze 3F Monster Encyclopedia]^000000";
- mes "2.Lunatic";
- mes "Plump and shaggy monster shaped in Rabbit.However it won't give you a `Bunny Band'.";
- mes "^0099FFFound Items^000000: Clover,Feather,Carrot,Red Herb";
- next;
- mes "^FF0000[Prontera Maze 3F Monster Encyclopedia]^000000";
- mes "3.Fabre";
- mes "Larva of Creamy. It is cute when it wiggles,even though it is a weak and small monster,";
- mes "People often tend to slay Fabres,only for the reason they can get `Feather's,one of required items for `Bunny Band'.";
- mes "^0099FFFound Items^000000: Fluff.Feather.Green Herb.Clover";
- next;
- mes "^FF0000[Prontera Maze 3F Monster Encyclopedia]^000000";
- mes "4.Creamy";
- mes "Monster with Beautiful Wings. `Hah~ it's just a butterfly!'. Careless thinking like this will make you bleeding~! It is much stronger than you expect. Be careful!";
- mes "^0099FFFound Items^000000: Powder of Butterfly,Honey,Butterfly Wing,Flower";
- next;
- mes "^FF0000[Prontera Maze 3F Monster Encyclopedia]^000000";
- mes "5.Pupa";
- mes "Monster on the Fabre's pupal stage. It deosn't attack at all, so easy to kill for Novice people.";
- mes "^0099FFFound Items^000000: Chrysalis,Sticky Muscus";
- next;
- mes "^FF0000[Prontera Maze 3F Monster Encyclopedia]^000000";
- mes "6.Poporing";
- mes "Poisonous Poring in light green.Every character is the same as poring,but much more stronger.";
- mes "^0099FFFound Items^000000: Sticky Muscus,Garlet,Green Herb";
- next;
- mes "^FF0000[Prontera Maze 3F Monster Encyclopedia]^000000";
- mes "7.Rocker";
- mes "Lazy Grasshpper which loves playing Violin.";
- mes "^0099FFFound Items^000000: Grasshopper's Leg,Jellopy";
- next;
- mes "^FF0000[Prontera Maze 3F Monster Encyclopedia]^000000";
- mes "8.Big Foot";
- mes "Dull-Looking Bear with a huge build.Although it looks dumb but you will realise how it can be fast after you provoke it.";
- mes "^0099FFFound Items^000000: Bear's Foot Skin,Leather,Sweet Potato";
- next;
- mes "^FF0000[Prontera Maze 3F Monster Encyclopedia]^000000";
- mes "9.Smokie";
- mes "It's working out all the time.Often tries to shapeshift with Raccon Leaves,but always failed. Back then, it tended to gather stuffs diligently, now it seems to give up.";
- mes "^0099FFFound Items^000000: Raccon Leaf,Leather,Sweet Potato";
- next;
- mes "^FF0000[Prontera Maze 3F Monster Encyclopedia]^000000";
- mes "10.Snake";
- mes "Green Cloloured Snake living in the Forest or Desert.Not poisonous but be careful.";
- mes "^0099FFFound Items^000000: Snake Scale,Red Herb";
- next;
- mes "^FF0000[Prontera Maze 3F Monster Encyclopedia]^000000";
- mes "11.Wolf";
- mes "Wanderers having Blue Manes.They are cooperative,so attack in a group when one got attacked.Let's just let them mind their business and watch.";
- mes "^0099FFFound Items^000000: Wolf Claw,Meat,Monster's Feed,Leather";
- next;
- mes "^FF0000[Prontera Maze 3F Monster Encyclopedia]^000000";
- mes "12.Argiope";
- mes "Monster crawling around with several articular legs.";
- mes "^0099FFFound Items^000000: Bug Leg,Zargon,Green Herb";
- next;
- mes "^FF0000[Prontera Maze 3F Monster Encyclopedia]^000000";
- mes "13.Argos";
- mes "Big Spider of Dark colour.It often invades passangers.";
- mes "^0099FFFound Items^000000: Cobweb,Scell,Bug Leg,Green Herb,Yellow Herb";
- next;
- mes "^FF0000[Prontera Maze 3F Monster Encyclopedia]^000000";
- mes "14.Horn";
- mes "Compliant Insect unlike its offensive appearance.It's wandering about the field making some crunching sound.";
- mes "^0099FFFound Items^000000: Horn,Shell,Solid Shell";
- next;
- mes "^FF0000[Prontera Maze 3F Monster Encyclopedia]^000000";
- mes "15.Hunter Fly";
- mes "Winged insect of Blood. It is Strong meanwhile very annoying. Be advised, you'd better flee away if you can.";
- mes "^0099FFFound Items^000000: Solid Shell,Zargon";
- next;
- mes "^FF0000[Prontera Maze 3F Monster Encyclopedia]^000000";
- mes "16.Mantis";
- mes "It wanders about the field waving a tiny fan.";
- mes "^0099FFFound Items^000000: Mantis Scythe,Scell,Solid Shell,Red Potion";
- next;
- mes "^FF0000[Prontera Maze 3F Monster Encyclopedia]^000000";
- mes "17.Steiner";
- mes "Tiny little insect with a Splendid shell. Don't ever look down upon it. It is stronger than you expect. Besides it recognizes Magical Spell Casting.";
- mes "^0099FFFound Items^000000: Rainbow Shell,Garlet,Shell,Solid Shell";
- next;
- mes "^FF0000[Prontera Maze 3F Monster Encyclopedia]^000000";
- mes "18.Side Winder";
- mes "Horrendous Snake of Dark colour.";
- mes "^0099FFFound Items^000000: Shining Scale,Zargon,Poisonous Canine,Snake Scale";
- next;
- mes "^FF0000[Prontera Maze 3F Monster Encyclopedia]^000000";
- mes "19.Yoyo";
- mes "Pink coloured Monkey.Not only they pick up every stuff dropped on the gound outrageously, but they are nimble and cooperative,you must be cautious of being attacked by a group.";
- mes "^0099FFFound Items^000000: Yoyo Tail,Banana,Yellow Herb,Leather";
- next;
- mes "^FF0000[Prontera Maze 3F Monster Encyclopedia]^000000";
- mes "20.Caramel";
- mes "Cute porcupine with tiny spiky quills.But don't ever touch it without intention,it will get mad immeduately.";
- mes "^0099FFFound Items^000000: Porcupine Quill,Leather";
- next;
- mes "^FF0000[Prontera Maze 3F Monster Encyclopedia]^000000";
- mes "21.Steel Chonchon";
- mes "This is similar as Chonchon, but in yellow and green. Picks up every stuff on the ground. It is strong and well-cooperative with its fellows, so don't forget to get items before it picks up.";
- mes "^0099FFFound Items^000000: Garlet,Shell,Solid Shell";
- next;
- mes "^FF0000[Prontera Maze 3F Monster Encyclopedia]^000000";
- mes "22.Coco";
- mes "Little but fierce-looking eyed Creature carrying an Acorn on both hands. It is very unpleasant when it gives a dirty look,let's give it a lesson.";
- mes "^0099FFFound Items^000000: Acorn,Fluff,Leather,Sweet Potato";
- next;
- mes "^FF0000[Prontera Maze 3F Monster Encyclopedia]^000000";
- mes "23.Dustiness";
- mes "This monster owns high dodge rate because it is flying. Need to be attentive if you want to attack.";
- mes "^0099FFFound Items^000000: Moth Dust,Moth Wing,Insect Feeler,Red Herb";
- next;
- mes "^FF0000[Prontera Maze 3F Monster Encyclopedia]^000000";
- mes "24.Martin";
- mes "Funny looking Mole wearing a Safety Helmet on the head,which is always busy to walk around.";
- mes "^0099FFFound Items^000000: Mole Whiskers,Mole Claw";
- next;
- mes "^FF0000[Prontera Maze 3F Monster Encyclopedia]^000000";
- mes "25.Savage";
- mes "Wild Boar always walking around restlessly,making some noise. It has Big fangs and looks different from the young one.";
- mes "^0099FFFound Items^000000: Mane,Leather";
- next;
- mes "^FF0000[Prontera Maze 3F Monster Encyclopedia]^000000";
- mes "26.Savage Bebe";
- mes "Tiny Pink baby of Savage.Unlike its small size, It is running about fields making annoying noise";
- mes "^0099FFFound Items^000000: Leather,Meat,Arrow,Feather";
- next;
- mes "^FF0000[Prontera Maze 3F Monster Encyclopedia]^000000";
- mes "27.Mastering";
- mes "Giant Poring rarely seen in the Morroc Desert,Mt.Mjornir or the Prontera Maze.It might be the leader of Porings.Surely stronger than normal Porings but, still it can't be more than a Poring anyway.";
- mes "^0099FFFound Items^000000: Apple,Apple Juice";
- next;
- mes "^FF0000[Prontera Maze 3F Monster Encyclopedia]^000000";
- mes "28.Eclipse";
- mes "Giant Lunatic which might be the Boss among Lunatics!It does weak attacks but is highly defensive at the same time.";
- mes "^0099FFFound Items^000000: Carrot,Glass Bead,Milk,Carrot Juice";
- next;
- mes "^FF0000[Prontera Maze 3F Monster Encyclopedia]^000000";
- mes "29.Baphomet";
- mes "Dreadful Monster having huge horns on the head.It uses a Gargantuan Scythe to slay foes,often attacks with bare hands.";
- mes "^0099FFFound Items^000000: Evil Horn,Yggdrasilberry,Leather,Oridecon";
- next;
- EndPrtMaze:
- close;
-}
-
-prt_in.gat,168,56,4 script Monster Encyclopedia 111,{
- mes "^FF0000[Monster Encyclopedia]^000000";
- mes "I am a Monster Encyclopedia, you can check several types of Monster with me.";
- next;
- menu "Monsters of Water Property",MonWatPro,"Monsters of Wind Property",MonWinPro,"Monsters of Spiritual Property",MonSpiPro,"Cancel",Cancel;
-
- MonWatPro:
- menu "Small Size Monster",SmaMonWatPro,"Medium Size Monster",MidMonWatPro,"Great Size Monster",GrMonWatPro,"Cancel",EndWatPro;
-
- SmaMonWatPro:
- mes "^FF0000[Water, Small Monster Encyclopedia]^000000";
- mes "1.Plankton";
- mes "Even though looks like trifle creatures, they fly into a rage when stepped on. They are light, drifting on the water and attack with several projections.";
- mes "^0099FFFound Items^000000: Single Cell. Garlet. Sticky Muscus. Empty Bottle";
- next;
- mes "^FF0000[Water, Small Monster Encyclopedia]^000000";
- mes "2.Kukre";
- mes "Look better than Thief Bugs but basically do the same thing. But luckily they don't attack players in a group.";
- mes "^0099FFFound Items^000000: Worm Peeling. Garlet. Monster's Feed. Red Herb. Insect Feeler";
- next;
- mes "^FF0000[Water, Small Monster Encyclopedia]^000000";
- mes "3.Hydra";
- mes "Veggie Monsters which live near water or in the deep sea. Attack using tentacles. When run into them in a group, it will be the pain in the ass.";
- mes "It will be effective to kill one by one before they gather.";
- mes "^0099FFFound Items^000000: Tentacle. Sticky Muscus. Meat";
- next;
- mes "^FF0000[Water, Small Monster Encyclopedia]^000000";
- mes "4.Vadon";
- mes "They wear thick shells all around the body and walk around tinkling nippers. Also their red color looks so tempting an appetite. Be careful anyway.";
- mes "^0099FFFound Items^000000: Nipper.Garlet.Solid Shell.Shell";
- next;
- mes "^FF0000[Water, Small Monster Encyclopedia]^000000";
- mes "5.Marina";
- mes "Jelly Fishes of transparent white color. Do flexible attacks stretching its body as long as they can. They live in cool places near water.";
- mes "^0099FFFound Items^000000: Single Cell.Sticky Muscus";
- next;
- mes "^FF0000[Water, Small Monster Encyclopedia]^000000";
- mes "6.Cornutus";
- mes "Some buddies concealing themselves within hard turban shells and try to lead a quiet life.";
- mes "^0099FFFound Items^000000: Conch. Scell. Solid Shell";
- next;
- mes "^FF0000[Water, Small Monster Encyclopedia]^000000";
- mes "7.Magnolia";
- mes "Creatures shaped in Big Egg Frying Fans. They spank attackers with the Frying Fans without mercy.";
- mes "Don't let your guard down just because they look cute. You will suffer if you do so.";
- mes "^0099FFFound Items^000000: Jellopy. Garlet. Scell";
- next;
- mes "^FF0000[Water, Small Monster Encyclopedia]^000000";
- mes "8.Marine Sphere";
- mes "Strange, round-shaped monsters beating so fast that they seem like they will burst.";
- mes "^0099FFFound Items^000000: Tendon.Detonator";
- next;
- goto MonWatPro;
- close;
- MidMonWatPro:
- mes "^FF0000[Water,Medium Monster Encyclopedia]^000000";
- mes "1.Poring";
- mes "Small and circular monsters of transparent pink color. Swallow anything on the ground with sparkling eyes, without any hesitations. No matter what kind of things dropped,";
- mes "They tend to eat first. So be cautious when you put down drop something on the ground. But don't worry.";
- mes "They are not strong, and you will get yours back once you kill the monster, which eat your stuff.";
- mes "^0099FFFound Items^000000: Jellopy.Sticky Muscus.Apple.Empty Bottle.Red Herb";
- next;
- mes "^FF0000[Water,Medium Monster Encyclopedia]^000000";
- mes "2.Roda Frog";
- mes "Usually they are hopping around, croaking very annoyingly. Let's stomp on them when found.";
- mes "^0099FFFound Items^000000: Sticky Webfoot,Spawn,Green Herb,Empty Bottle";
- next;
- mes "^FF0000[Water,Medium Monster Encyclopedia]^000000";
- mes "3.Spore";
- mes "Mushroom-like monsters. Usually live in the Forest or Dungeons. By the way Don't try to eat it!";
- mes "^0099FFFound Items^000000: Spore,Red Herb,Blue Herb";
- next;
- mes "^FF0000[Water,Medium Monster Encyclopedia]^000000";
- mes "4.Goblin";
- mes "They are small and attack passengers using different kinds of mace. They always wear Masques, which frighten people more because we can't see what they might look like.";
- mes "There are all 5 different types, and they seem to be brothers.";
- mes "^0099FFFound Items^000000: Yellow Herb,Red Potion";
- next;
- mes "^FF0000[Water,Medium Monster Encyclopedia]^000000";
- mes "5.Thara Frog";
- mes "Frogs of red color, surely stronger than Roda Frogs. However there is obvious one thing in common about them, annoying croaking noise.";
- mes "^0099FFFound Items^000000: Spawn,Scell,Sticky Webfoot";
- next;
- mes "^FF0000[Water,Medium Monster Encyclopedia]^000000";
- mes "6.Phen";
- mes "Fish of blue color which is kicking and definitely alive.";
- mes "^0099FFFound Items^000000: Fish Tail,Sharp Scale,Meat,Fin";
- next;
- mes "^FF0000[Water,Medium Monster Encyclopedia]^000000";
- mes "7.Mars";
- mes "Have many legs, flapping under the water. Do not rush to it because of its tempting look.";
- mes "^0099FFFound Items^000000: Squid Ink,Tentacle";
- next;
- mes "^FF0000[Water,Medium Monster Encyclopedia]^000000";
- mes "8.Obeaune";
- mes "Female Mermaid. Attacks using long hair, with a grim face.";
- mes "^0099FFFound Items^000000: Heart of Mermaid,Fin";
- next;
- mes "^FF0000[Water,Medium Monster Encyclopedia]^000000";
- mes "9. Sohee";
- mes "Female Ghost which holds grudge deep inside. She is always crying as waving long hair. But when running into the living, she suddenly changes her attitude fiercely.";
- mes "^0099FFFound Items^000000: Black Hair,Red Potion";
- next;
- mes "^FF0000[Water,Medium Monster Encyclopedia]^000000";
- mes "10.Marc";
- mes "Sea Horse. Don't ever think about riding a Sea Horse!";
- mes "^0099FFFound Items^000000: Gill,Fin";
- next;
- mes "^FF0000[Water,Medium Monster Encyclopedia]^000000";
- mes "11.Deviace";
- mes "Fish monster with a big mouth possibly carrying something within. Small but Strong.";
- mes "^0099FFFound Items^000000: Ancient Tooth,Ancient Lips";
- next;
- goto MonWatPro;
- close;
- GrMonWatPro:
- mes "^FF0000[Water,Great Monster Encyclopedia]^000000";
- mes "1.Ambernite";
- mes "Snail shaped monster, it is highly strong and defensive at the same time. Don't you worry though. It is too slow to catch you so that you can run away at ease any time.";
- mes "^0099FFFound Items^000000: Snail's Shell,Garlet,Shell,Solid Shell";
- next;
- mes "^FF0000[Water,Great Monster Encyclopedia]^000000";
- mes "2.Sword Fish";
- mes "Fish Monster with a sharp, thin, and long nose. Goggle eyes are funny but it belongs to one of those dangerous monsters.";
- mes "^0099FFFound Items^000000: Sharp Scale,Gill";
- next;
- goto MonWatPro;
- close;
- EndMonWatPro:
- close;
- close;
- MonWinPro:
- menu "Small Size Monster",SmaMonWinPro,"Medium Size Monster",MedMonWinPro,"Great Size Monster",GrMonWinPro,"Cancel",EndMonWinPro;
-
- SmaMonWinPro:
- mes "^FF0000[Wind,Small Monster Encyclopedia]^000000";
- mes "1.Chonchon";
- mes "Flying monsters, they are not strong but make as annoying noises as Roda Frog. Make sure to eliminate them whenever you see.";
- mes "^0099FFFound Items^000000: Shell,Jellopy,Fly Wing";
- next;
- mes "^FF0000[Wind,Small Monster Encyclopedia]^000000";
- mes "2.Hornet";
- mes "Usually they are doing their duty but when get harmed, they will group themselves to attack the enemy without mercy!";
- mes "^0099FFFound Items^000000: Bee Sting,Jellopy,Green Herb";
- next;
- mes "^FF0000[Wind,Small Monster Encyclopedia]^000000";
- mes "3.Creamy";
- mes "Monster with Beautiful Wings. `Hah~ it's just a butterfly!'. Careless thinking like this will make you bleeding~! It is much stronger than you expect. Be careful!";
- mes "^0099FFFound Items^000000: Powder of Butterfly,Honey,Butterfly Wing,Flower";
- next;
- mes "^FF0000[Wind,Small Monster Encyclopedia]^000000";
- mes "4.Steiner";
- mes "Tiny little insect with a Splendid shell. Don't ever look down upon it. It is stronger than you expect. Besides it recognizes Magical Spell Casting.";
- mes "^0099FFFound Items^000000: Rainbow Shell,Garlet,Shell,Solid Shell";
- next;
- mes "^FF0000[Wind,Small Monster Encyclopedia]^000000";
- mes "5.Steel Chonchon";
- mes "This is similar as Chonchon, but in yellow and green. Picks up every stuff on the ground. It is strong and well-cooperative with its fellows, so don't forget to get items before it picks up.";
- mes "^0099FFFound Items^000000: Garlet,Shell,Solid Shell";
- next;
- mes "^FF0000[Wind,Small Monster Encyclopedia]^000000";
- mes "6.Dustiness";
- mes "This monster owns high dodge rate because it is flying. Need to be attentive if you want to attack.";
- mes "^0099FFFound Items^000000: Moth Dust,Moth Wing,Insect Feeler,Red Herb";
- next;
- mes "^FF0000[Wind,Small Monster Encyclopedia]^000000";
- mes "7.Hunter Fly";
- mes "Winged insect of Blood. It is Strong meanwhile very annoying. Be advised, you'd better flee away if you can.";
- mes "^0099FFFound Items^000000: Solid Shell,Zargon";
- next;
- goto MonWinPro;
- close;
- MedMonWinPro:
- mes "^FF0000[Wind,Medium Monster Encyclopedia]^000000";
- mes "1.Condor";
- mes "Bald head eagle in funny feature. They tends to be gathered when one gets attacked. So don't look down upon them and think of `I will caress you!'";
- mes "^0099FFFound Items^000000: Talon,Arrow,Meat,Feather of Birds";
- next;
- mes "^FF0000[Wind,Medium Monster Encyclopedia]^000000";
- mes "2.Cobold the 1st";
- mes "Small monster looks like a Wolf but it is smart enough to handle several tools. It is hostile and strong unlike its appearance. All Cobolds seem to be brothers.";
- mes "^0099FFFound Items^000000: Blue Hair,Zargon,Orange Potion";
- next;
- mes "^FF0000[Wind,Medium Monster Encyclopedia]^000000";
- mes "3.Petite";
- mes "Tiny Cute flying Dragon. It seems like there exists 2 different kinds of Petite, flying one and walking one and this is the 1st one.";
- mes "^0099FFFound Items^000000: Dragon Canine,Dragon Tail,Zargon";
- next;
- goto MonWinPro;
- close;
- GrMonWinPro:
- mes "^FF0000[Wind,Great Monster Encyclopedia]^000000";
- mes "4.Joker";
- mes "A big Poker Card with Ugly looking girl printed on both side assaults you.";
- mes "^0099FFFound Items^000000: High Heels";
- next;
- goto MonWinPro;
- close;
- EndMonWinPro:
- close;
- close;
- MonSpiPro:
- menu "Small Size Monster",SmaMonSpiPro,"Medium Size Monster",MedMonSpiPro,"Great Size Monster",GrMonSpiPro,"Cancel",EndMonSpiPro;
-
- SmaMonSpiPro:
- mes "^FF0000[Spiritual,Small Monster Encyclopedia]^000000";
- mes "1.Whisper";
- mes "Living Fabric, which gives spooky feeling.";
- mes "^0099FFFound Items^000000: Fabric";
- next;
- mes "^FF0000[Spiritual,Small Monster Encyclopedia]^000000";
- mes "2.Marionette";
- mes "Monster reborn from a bewitched Doll, bound to strings on Wooden Sticks.";
- mes "^0099FFFound Items^000000: Golden Hair,Trunk";
- next;
- goto MonSpiPro;
- close;
- MedMonSpiPro:
- mes "^FF0000[Spiritual,Medium Monster Encyclopedia]^000000";
- mes "1.Eggyra";
- mes "Hovering here and there, while making a clattering sound. Tough-Looking Face scares people but it is not as strong as it looks.";
- mes "^0099FFFound Items^000000: Scell,Sticky Muscus,Red Herb";
- next;
- goto MonSpiPro;
- close;
- GrMonSpiPro:
- mes "^FF0000[Spiritual,Great Monster Encyclopedia]^000000";
- mes "1.Nightmare";
- mes "Ghost Horse radiating an Aura of Violet all over the body.";
- mes "^0099FFFound Items^000000: Horseshoe,Blue Herb";
- next;
- mes "^FF0000[Spiritual,Great Monster Encyclopedia]^000000";
- mes "3.Medusa";
- mes "Each of her hairs is a snake. It has rumored to turn people into stone when their eyes happen to meet.";
- mes "^0099FFFound Items^000000: Dead Medusa,Horrendous Hair,White Potion";
- next;
- goto MonSpiPro;
- close;
- EndMonSpiPro:
- close;
- close;
- Cancel:
- close;
-}
-
-prt_in.gat,168,68,4 script `Merchant Guideline' for Dummies 111,{
- mes "^FF0000[Blacksmith Guide for Dummies]^000000";
- mes "You can get the information about how to refine Ores and about Weapon Craft Skills.";
- next;
- menu "Ore Refining.",OreRef,"Weapon Craft.",WeaCra,"Cancel.",Cancel;
-
- OreRef:
- mes "^FF0000[Ore Refining for Dummies]^000000";
- mes "Please go over the next page if you want to know how to refine Ores.";
- next;
- menu "Ok",OreRefOk,"Cancel",EndOreRef;
-
- OreRefOk:
- mes "^FF0000[Ore Refining for Dummies]^000000";
- mes "Rough Ores like Iron Ore or Raw Materials for Enchanted Stones can be polished into High Quality Ones.For that, ^0099FFFurnace^000000 is needed.";
- mes "One High Quality Ore needs several Rough Ones to be refined.";
- next;
- mes "^FF0000[Ore Refining for Dummies]^000000";
- mes "When enough items are gathered,Double Click `Furnace'.You can use a Furnace only one time for refining.";
- next;
- mes "^FF0000[Ore Refining for Dummies]^000000";
- mes "Possible ores you can refine will pop up on a new window.You can make Ore with a click the name of Ore you need.";
- next;
- mes "^FF0000[Ore Refining for Dummies]^000000";
- mes "However it has a possiblity to be failed.";
- close;
- EndOreRef:
- close;
- close;
- WeaCra:
- mes "^FF0000[Weapon Craft for Dummies]^000000";
- mes "Please go over the next page if you want to learn how to Smith Weapons.";
- next;
- menu "Ok",WeaCraOk,"Cancel",EndWeaCra;
-
- WeaCraOk:
- mes "^FF0000[Weapon Craft for Dummies]^000000";
- mes "Learn a Skill from `Smith Sword,Two-Handed Sword,Spear,Mace,Brassknuckle' which allows you to make the pertinent weapon.";
- next;
- mes "^FF0000[Weapon Craft for Dummies]^000000";
- mes "Every Weapon needs ^0099FFSteel^000000 and ^0099FFHammer^000000.You can use a Hammer one time and it will be disapeared whenever used.";
- next;
- mes "^FF0000[Weapon Craft for Dummies]^000000";
- mes "When Double Click on a Hammer,a new window which lists of items you can make will pop up.";
- mes "Clicking a Weapon on that list will show the required items and their numbers.But they will be exhausted automatically,so just know this.";
- next;
- mes "^FF0000[Weapon Craft for Dummies]^000000";
- mes "On that list window,there are 3 sockets which enable you to input some special items like Enchanted Stone or Star Crumb.These items amplify the weapon ability";
- next;
- mes "^FF0000[Weapon Craft for Dummies]^000000";
- mes "And they have different possibility of Success by their characters.";
- close;
- EndWeaCra:
- close;
- close;
- Cancel:
- close;
-}
-
-prt_in.gat,172,96,4 script Monster Encyclopedia 111,{
- mes "^FF0000[Dungeon Monster Encyclopedia]^000000";
- mes "This is an Encyclopedia describing monsters living in Dungeons.";
- next;
- menu "Ant Hell",AntHell,"Geffen Dungeon",GefDung,"Sphinx",Sphinx,"Cancel",Cancel;
-
- AntHell:
- menu "1F",AntHellF1,"2F",AntHellF2,"Cancel",EndAntHell;
-
- AntHellF1:
- mes "^FF0000[Ant Hell 1F Monster Encyclopedia]^000000";
- mes "1.Ant Egg";
- mes "Simple Ant Egg.";
- mes "^0099FFFound Items^000000: Shell,Jellopy,Sticky Muscus,Empty Bottle";
- next;
- mes "^FF0000[Ant Hell 1F Monster Encyclopedia]^000000";
- mes "2.Andre";
- mes "A kind of Worker Ants,they are very diligent in their work.They gather everything to save a sufficient stock and are well-cooperative,you need to be careful.";
- mes "^0099FFFound Items^000000: Worm Peeling,Garlet,Sticky Muscus,Shell";
- next;
- mes "^FF0000[Ant Hell 1F Monster Encyclopedia]^000000";
- mes "3.Piere";
- mes "A kind of Work Ants,seems to be very diligent.Its appearance is similar with other Ants,but you can easily distinguish them from others as they only gather in a same kind.";
- mes "^0099FFFound Items^000000: Worm Peeling,Garlet,Sticky Muscus,Shell";
- next;
- mes "^FF0000[Ant Hell 1F Monster Encyclopedia]^000000";
- mes "4.Deniro";
- mes "A kind of Work Ants, tend to group in a same kind as well as other ants.";
- mes "^0099FFFound Items^000000: Worm Peeling,Garlet,Sticky Muscus,Shell";
- next;
- mes "^FF0000[Ant Hell 1F Monster Encyclopedia]^000000";
- mes "5.Vitata";
- mes "Work Ants in charge of storing honey inside the body for emergency.It is a little pathetic to see their chubby tummy filled with Honey.";
- mes "^0099FFFound Items^000000: Worm Peeling,Scell,Honey";
- next;
- mes "^FF0000[Ant Hell 1F Monster Encyclopedia]^000000";
- mes "6.Giearth";
- mes "Little Grampa Pixie. Usually lives in Caves to gather Ores.Even though he is short, but actually an adult.Show your manners.";
- mes "^0099FFFound Items^000000: Old Pixie's Moustache";
- next;
- goto AntHell;
- close;
- AntHellF2:
- mes "^FF0000[Ant Hell 2F Monster Encyclopedia]^000000";
- mes "1.Ant Egg";
- mes "Simple Ant Egg.";
- mes "^0099FFFound Items^000000: Shell,Jellopy,Sticky Muscus,Empty Bottle";
- next;
- mes "^FF0000[Ant Hell 2F Monster Encyclopedia]^000000";
- mes "2.Andre";
- mes "A kind of Worker Ants,they are very diligent in their work.They gather everything to save a sufficient stock and are well-cooperative,you need to be careful.";
- mes "^0099FFFound Items^000000: Worm Peeling,Garlet,Sticky Muscus,Shell";
- next;
- mes "^FF0000[Ant Hell 2F Monster Encyclopedia]^000000";
- mes "3.Piere";
- mes "A kind of Work Ants,seems to be very diligent.Its appearance is similar with other Ants,but you can easily distinguish them from others as they only gather in a same kind.";
- mes "^0099FFFound Items^000000: Worm Peeling,Garlet,Sticky Muscus,Shell";
- next;
- mes "^FF0000[Ant Hell 2F Monster Encyclopedia]^000000";
- mes "4.Deniro";
- mes "A kind of Work Ants, tend to group in a same kind as well as other ants";
- mes "^0099FFFound Items^000000: Worm Peeling,Garlet,Sticky Muscus,Shell";
-
- next;
- mes "^FF0000[Ant Hell 2F Monster Encyclopedia]^000000";
- mes "5.Vitata";
- mes "Work Ants in charge of storing honey inside the body for emergency.It is a little pathetic to see their chubby tummy filled with Honey.";
- mes "^0099FFFound Items^000000: Worm Peeling,Scell,Honey";
- next;
- mes "^FF0000[Ant Hell 2F Monster Encyclopedia]^000000";
- mes "6.Giearth";
- mes "Little Grampa Pixie. Usually lives in Caves to gather Ores.Even though he is short, but actually an adult.Show your manners.";
- mes "^0099FFFound Items^000000: Old Pixie's Moustache";
- next;
- mes "^FF0000[Ant Hell 2F Monster Encyclopedia]^000000";
- mes "7.Phreeoni";
- mes "Some bastard with a huge creepy tongue.Extremely strong Monster rarely seen around.";
- mes "^0099FFFound Items^000000: Tongue,Ant Jaw";
- next;
- goto AntHell;
- close;
- EndAntHell:
- close;
- close;
- GefDung:
- menu "1F",GefDungF1,"2F",GefDungF2,"3F",GefDungF3,"4F",GefDungF4,"Cancel",EndGefDung;
-
- GefDungF1:
- mes "^FF0000[Geffen Dungeon 1F Monster Encyclopedia]^000000";
- mes "1.Familiar";
- mes "Bat of Violet Colour.Not that strong but really annoying because it attacks very fast and outregeously when somebody gets near it.";
- mes "^0099FFFound Items^000000: Tooth of Bat,Fly Wing,Grape,Red Herb";
- next;
- mes "^FF0000[Geffen Dungeon 1F Monster Encyclopedia]^000000";
- mes "2.Poporing";
- mes "Poisonous Poring in light green.Every character is the same as poring,but much more stronger.";
- mes "^0099FFFound Items^000000: Sticky Muscus,Garlet,Green Herb";
- next;
- mes "^FF0000[Geffen Dungeon 1F Monster Encyclopedia]^000000";
- mes "3.Dustiness";
- mes "This monster owns high dodge rate because it is flying. Need to be attentive if you want to attack.";
- mes "^0099FFFound Items^000000: Moth Dust,Moth Wing,Insect Feeler,Red Herb";
- next;
- mes "^FF0000[Geffen Dungeon 1F Monster Encyclopedia]^000000";
- mes "4.Poison Spore";
- mes "Poisonous Spore in Violet.Besides,it tends to attack haphazardly if anybody gets near.";
- mes "^0099FFFound Items^000000: Spore,Green Herb";
- next;
- goto GefDung;
- close;
- GefDungF2:
- mes "^FF0000[Geffen Dungeon 2F Monster Encyclopedia]^000000";
- mes "1.Familiar";
- mes "Bat of Violet Colour.Not that strong but really annoying because it attacks very fast and outregeously when somebody gets near it.";
- mes "^0099FFFound Items^000000: Tooth of Bat,Fly Wing,Grape,Red Herb";
- next;
- mes "^FF0000[Geffen Dungeon 2F Monster Encyclopedia]^000000";
- mes "2.Dustiness";
- mes "This monster owns high dodge rate because it is flying. Need to be attentive if you want to attack.";
- mes "^0099FFFound Items^000000: Moth Dust,Moth Wing,Insect Feeler,Red Herb";
- next;
- mes "^FF0000[Geffen Dungeon 2F Monster Encyclopedia]^000000";
- mes "3.Poison Spore";
- mes "Poisonous Spore in Violet.Besides,it tends to attack haphazardly if anybody gets near.";
- mes "^0099FFFound Items^000000: Spore,Green Herb";
- next;
- mes "^FF0000[Geffen Dungeon 2F Monster Encyclopedia]^000000";
- mes "4.Argos";
- mes "Big Spider of Dark colour.It often invades passangers.";
- mes "^0099FFFound Items^000000: Cobweb,Scell,Bug Leg,Green Herb,Yellow Herb";
- next;
- mes "^FF0000[Geffen Dungeon 2F Monster Encyclopedia]^000000";
- mes "5.Whisper";
- mes "Living Fabric, which gives spooky feeling.";
- mes "^0099FFFound Items^000000: Fabric";
- next;
- mes "^FF0000[Geffen Dungeon 2F Monster Encyclopedia]^000000";
- mes "6.Jakk";
- mes "Quite Odd monster in a nice suit,but with a pumpkin head.It looks funny but changes the attitude fiercely when attacks someone.";
- mes "^0099FFFound Items^000000: Jack'o'Pumpkin,Zargon";
- next;
- goto GefDung;
- close;
- GefDungF3:
- mes "^FF0000[Geffen Dungeon 3F Monster Encyclopedia]^000000";
- mes "1.Argos";
- mes "Big Spider of Dark colour.It often invades passangers.";
- mes "^0099FFFound Items^000000: Cobweb,Scell,Bug Leg,Green Herb,Yellow Herb";
- next;
- mes "^FF0000[Geffen Dungeon 3F Monster Encyclopedia]^000000";
- mes "2.Whisper";
- mes "Living Fabric, which gives spooky feeling.";
- mes "^0099FFFound Items^000000: Fabric";
- next;
- mes "^FF0000[Geffen Dungeon 3F Monster Encyclopedia]^000000";
- mes "3.Jakk";
- mes "Quite Odd monster in a nice suit,but with a pumpkin head.It looks funny but changes the attitude fiercely when attacks someone.";
- mes "^0099FFFound Items^000000: Jack'o'Pumpkin,Zargon";
- next;
- mes "^FF0000[Geffen Dungeon 3F Monster Encyclopedia]^000000";
- mes "4.Myst";
- mes "Mist-like Monster.";
- mes "^0099FFFound Items^000000: Trunk.Gas Mask";
- next;
- mes "^FF0000[Geffen Dungeon 3F Monster Encyclopedia]^000000";
- mes "5.Marionette";
- mes "Monster reborn from a bewitched Doll, bound to strings on Wooden Sticks.";
- mes "^0099FFFound Items^000000: Golden Hair,Trunk";
- next;
- mes "^FF0000[Geffen Dungeon 3F Monster Encyclopedia]^000000";
- mes "6.Bathory";
- mes "Witch with a big wen on the nose.She rides on her magic broom flying around in the air..";
- mes "^0099FFFound Items^000000: Witched Starsand";
- next;
- mes "^FF0000[Geffen Dungeon 3F Monster Encyclopedia]^000000";
- mes "7.Nightmare";
- mes "Ghost Horse radiating an Aura of Violet all over the body.";
- mes "^0099FFFound Items^000000: Horseshoe,Blue Herb";
- next;
- goto GefDung;
- close;
- GefDungF4:
- mes "^FF0000[Geffen Dungeon 4F Monster Encyclopedia]^000000";
- mes "1.Myst";
- mes "Mist-like Monster.";
- mes "^0099FFFound Items^000000: Trunk.Gas Mask";
- next;
- mes "^FF0000[Geffen Dungeon 4F Monster Encyclopedia]^000000";
- mes "2.Deviruchi";
- mes "Little evil creature,which carries a cute fork with.";
- mes "^0099FFFound Items^000000: Little Evil Horn,Little Evil Wing,Zargon";
- next;
- mes "^FF0000[Geffen Dungeon 4F Monster Encyclopedia]^000000";
- mes "3.Raydric";
- mes "Ghost Knight of misfortune.";
- mes "^0099FFFound Items^000000: Elunium,Chivarly Emblem";
- next;
- mes "^FF0000[Geffen Dungeon 4F Monster Encyclopedia]^000000";
- mes "4.Joker";
- mes "A big Poker Card with Ugly looking girl printed on both side assaults you.";
- mes "^0099FFFound Items^000000: High Heels";
- next;
- mes "^FF0000[Geffen Dungeon 4F Monster Encyclopedia]^000000";
- mes "5.Doppelganger";
- mes "A ghostly double of a swordman,Spooky and Powerful.";
- mes "^0099FFFound Items^000000: Spiky Band,Blue Potion,Cursed Ruby,Ruby";
- next;
- goto GefDung;
- close;
- EndGefDung:
- close;
- close;
- Sphinx:
- menu "1F",SphinxF1,"2F",SphinxF2,"3F",SphinxF3,"4F",SphinxF4,"5F",SphinxF5,"Cancel",EndSphinx;
-
- SphinxF1:
- mes "^FF0000[Sphinx 1F Monster Encyclopedia]^000000";
- mes "1.Familiar";
- mes "Bat of Violet Colour.Not that strong but really annoying because it attacks very fast and outregeously when somebody gets near it.";
- mes "^0099FFFound Items^000000: Tooth of Bat,Fly Wing,Grape,Red Herb";
- next;
- mes "^FF0000[Sphinx 1F Monster Encyclopedia]^000000";
- mes "2.Snake";
- mes "Green Cloloured Snake living in the Forest or Desert.Not poisonous but be careful.";
- mes "^0099FFFound Items^000000: Snake Scale,Red Herb";
- next;
- mes "^FF0000[Sphinx 1F Monster Encyclopedia]^000000";
- mes "3.Zerom";
- mes "Undead Slave who had been extremely abused before he died.He is wandering in the Sphinx,carrying a big box on the back..";
- mes "^0099FFFound Items^000000: Panties";
- next;
- mes "^FF0000[Sphinx 1F Monster Encyclopedia]^000000";
- mes "4.Matyr";
- mes "Creature shaped in Black Dog.";
- mes "^0099FFFound Items^000000: Monster's Feed,Leather";
- next;
- mes "^FF0000[Sphinx 1F Monster Encyclopedia]^000000";
- mes "5.Requiem";
- mes "It seems like an Ancient Slave,carrying a heavy Coffin on the back.";
- mes "^0099FFFound Items^000000: Mystic Blue Box";
- next;
- goto Sphinx;
- close;
- SphinxF2:
- mes "^FF0000[Sphinx 2F Monster Encyclopedia]^000000";
- mes "1.Familiar";
- mes "Bat of Violet Colour.Not that strong but really annoying because it attacks very fast and outregeously when somebody gets near it.";
- mes "^0099FFFound Items^000000: Tooth of Bat,Fly Wing,Grape,Red Herb";
- next;
- mes "^FF0000[Sphinx 2F Monster Encyclopedia]^000000";
- mes "2.Matyr";
- mes "Creature shaped in Black Dog.";
- mes "^0099FFFound Items^000000: Monster's Feed,Leather";
- next;
- mes "^FF0000[Sphinx 2F Monster Encyclopedia]^000000";
- mes "3.Requiem";
- mes "It seems like an Ancient Slave,carrying a heavy Coffin on the back.";
- mes "^0099FFFound Items^000000: Mystic Blue Box";
- next;
- mes "^FF0000[Sphinx 2F Monster Encyclopedia]^000000";
- mes "4.Whisper";
- mes "Living Fabric, which gives spooky feeling.";
- mes "^0099FFFound Items^000000: Fabric";
- next;
- goto Sphinx;
- close;
- SphinxF3:
- mes "^FF0000[Sphinx 3F Monster Encyclopedia]^000000";
- mes "1.Matyr";
- mes "Creature shaped in Black Dog.";
- mes "^0099FFFound Items^000000: Monster's Feed,Leather";
- next;
- mes "^FF0000[Sphinx 3F Monster Encyclopedia]^000000";
- mes "2.Whisper";
- mes "Living Fabric, which gives spooky feeling.";
- mes "^0099FFFound Items^000000: Fabric";
- next;
- mes "^FF0000[Sphinx 3F Monster Encyclopedia]^000000";
- mes "3.Marduk";
- mes "Unknown monster wearing Catholic uniform and looking serious.";
- mes "^0099FFFound Items^000000: Flame Heart";
- next;
- goto Sphinx;
- SphinxF4:
- mes "^FF0000[Sphinx 4F Monster Encyclopedia]^000000";
- mes "1.Whisper";
- mes "Living Fabric, which gives spooky feeling.";
- mes "^0099FFFound Items^000000: Fabric";
- next;
- mes "^FF0000[Sphinx 4F Monster Encyclopedia]^000000";
- mes "2.Marduk";
- mes "Unknown monster wearing Catholic uniform and looking serious.";
- mes "^0099FFFound Items^000000: Flame Heart";
- next;
- mes "^FF0000[Sphinx 4F Monster Encyclopedia]^000000";
- mes "3.Medusa";
- mes "Each of her hairs is a snake. It has rumored to turn people into stone when their eyes happen to meet.";
- mes "^0099FFFound Items^000000: Dead Medusa,Horrendous Snake,White Potion";
- next;
- goto Sphinx;
- close;
- SphinxF5:
- mes "^FF0000[Sphinx 5F Monster Encyclopedia]^000000";
- mes "1.Whisper";
- mes "Living Fabric, which gives spooky feeling.";
- mes "^0099FFFound Items^000000: Fabric";
- next;
- mes "^FF0000[Sphinx 5F Monster Encyclopedia]^000000";
- mes "2.Marduk";
- mes "Unknown monster wearing Catholic uniform and looking serious.";
- mes "^0099FFFound Items^000000: Flame Heart";
- next;
- mes "^FF0000[Sphinx 5F Monster Encyclopedia]^000000";
- mes "3.Medusa";
- mes "Each of her hairs is a snake. It has rumored to turn people into stone when their eyes happen to meet.";
- mes "^0099FFFound Items^000000: Dead Medusa,Horrendous Snake,White Potion";
- next;
- goto Sphinx;
- close;
- EndSphinx:
- close;
- close;
- Cancel:
- close;
-}
-
-prt_in.gat,172,102,4 script Monster Encyclopedia 111,{
- mes "^FF0000[Dungeon Monster Encyclopedia]^000000";
- mes "The is an Encyclopedia describing Monsters living in Dungeons.";
- next;
- menu "Mjornir Dead Pit",MjrDeadPit,"Payon Cave",PayCave,"Pyramid",Pyramid;
-
- MjrDeadPit:
- menu "F1",MjrDeadPitF1,"F2",MjrDeadPitF2,"F3",MjrDeadPitF3,"Cancel",EndMjrDeadPit;
-
- MjrDeadPitF1:
- mes "^FF0000[Dead Pit 1F Monster Encyclopedia]^000000";
- mes "1.Familiar";
- mes "Bat of Violet Colour.Not that strong but really annoying because it attacks very fast and outregeously when somebody gets near it.";
- mes "^0099FFFound Items^000000: Tooth of Bat,Fly Wing,Grape,Red Herb";
- next;
- mes "^FF0000[Dead Pit 1F Monster Encyclopedia]^000000";
- mes "2.Tarou";
- mes "Little mouse of white colour. It is squicking very loudly in the Dead Pit or the Prontera Culvert..";
- mes "^0099FFFound Items^000000: Rat Tail,Leather,Feather,Monster's Feed";
- next;
- mes "^FF0000[Dead Pit 1F Monster Encyclopedia]^000000";
- mes "3.Martin";
- mes "Funny looking Mole wearing a Safety Helmet on the head,which is always busy to walk around.";
- mes "^0099FFFound Items^000000: Mole Whiskers,Mole Claw";
- next;
- mes "^FF0000[Dead Pit 1F Monster Encyclopedia]^000000";
- mes "4.Drainliar";
- mes "Freaking Bloody bat with a might.";
- mes "^0099FFFound Items^000000: Tooth of Bat,Red Herb";
- next;
- goto MjrDeadPit;
- close;
- MjrDeadPitF2:
- mes "^FF0000[Dead Pit 2F Monster Encyclopedia]^000000";
- mes "1.Martin";
- mes "Funny looking Mole wearing a Safety Helmet on the head,which is always busy to walk around.";
- mes "^0099FFFound Items^000000: Mole Whiskers,Mole Claw";
- next;
- mes "^FF0000[Dead Pit 2F Monster Encyclopedia]^000000";
- mes "2.Drainliar";
- mes "Freaking Bloody bat with a might.";
- mes "^0099FFFound Items^000000: Tooth of Bat,Red Herb";
- next;
- mes "^FF0000[Dead Pit 2F Monster Encyclopedia]^000000";
- mes "3.Skel Worker";
- mes "Walking Skeletion which was dead in a mine.";
- mes "^0099FFFound Items^000000: Iron,Lantern";
- next;
- mes "^FF0000[Dead Pit 2F Monster Encyclopedia]^000000";
- mes "4.Myst";
- mes "Mist-like Monster.";
- mes "^0099FFFound Items^000000: Trunk.Gas Mask";
- next;
- goto MjrDeadPit;
- close;
- MjrDeadPitF3:
- mes "^FF0000[Dead Pit 3F Monster Encyclopedia]^000000";
- mes "1.Skel Worker";
- mes "Walking Skeletion which was dead in a mine.";
- mes "^0099FFFound Items^000000: Iron,Lantern";
- next;
- mes "^FF0000[Dead Pit 3F Monster Encyclopedia]^000000";
- mes "2.Myst";
- mes "Mist-like Monster.";
- mes "^0099FFFound Items^000000: Trunk.Gas Mask";
- next;
- mes "^FF0000[Dead Pit 3F Monster Encyclopedia]^000000";
- mes "3.Evil Druid";
- mes "You'll shudder even once looking at it.";
- mes "^0099FFFound Items^000000: Amulet,White Herb";
- next;
- goto MjrDeadPit;
- close;
- EndMjrDeadPit:
- close;
- close;
- PayCave:
- menu "1F",PayCaveF1,"2F",PayCaveF2,"3F",PayCaveF3,"4F",PayCaveF4,"5F",PayCaveF5,"Cancel",EndPayCave;
-
- PayCaveF1:
- mes "^FF0000[Payon Cave 1F Monster Encyclopedia]^000000";
- mes "1.Familiar";
- mes "Bat of Violet Colour.Not that strong but really annoying because it attacks very fast and outregeously when somebody gets near it.";
- mes "^0099FFFound Items^000000: Tooth of Bat,Fly Wing,Grape,Red Herb";
- next;
- mes "^FF0000[Payon Cave 1F Monster Encyclopedia]^000000";
- mes "2.Spore";
- mes "Mushroom-like monsters. Usually live in the Forest or Dungeons. By the way Don't try to eat it!";
- mes "^0099FFFound Items^000000: Spore,Red Herb,Blue Herb";
- next;
- mes "^FF0000[Payon Cave 1F Monster Encyclopedia]^000000";
- mes "3.Zombie";
- mes "Bad Case of the Dead which has been reborn as a Walking Corpse by Back magic.Let's lead it to Nirvana.";
- mes "^0099FFFound Items^000000: Decayed Nail,Sticky Muscus,Horrendous Mouth";
- next;
- goto PayCave;
- close;
- PayCaveF2:
- mes "^FF0000[Payon Cave 2F Monster Encyclopedia]^000000";
- mes "1.Familiar";
- mes "Bat of Violet Colour.Not that strong but really annoying because it attacks very fast and outregeously when somebody gets near it.";
- mes "^0099FFFound Items^000000: Tooth of Bat,Fly Wing,Grape,Red Herb";
- next;
- mes "^FF0000[Payon Cave 2F Monster Encyclopedia]^000000";
- mes "2.Eggyra";
- mes "Hovering here and there, while making a clattering sound. Tough-Looking Face scares people but it is not as strong as it looks.";
- mes "^0099FFFound Items^000000: Scell,Sticky Muscus,Red Herb";
- next;
- mes "^FF0000[Payon Cave 2F Monster Encyclopedia]^000000";
- mes "3.Magnolia";
- mes "Creatures shaped in Big Egg Frying Fans. They spank attackers with the Frying Fans without mercy. Don't let your guard down just because they look cute. You will suffer if you do so.";
- mes "^0099FFFound Items^000000: Jellopy.Garlet.Scell";
- next;
- mes "^FF0000[Payon Cave 2F Monster Encyclopedia]^000000";
- mes "4.Soldier Skeleton";
- mes "Skeleton holding 2 swords on both grips,attacks fast.One of the dangerous monsters in the Cave.";
- mes "^0099FFFound Items^000000: Skel-Bone,Red Potion";
- next;
- goto PayCave;
- close;
- PayCaveF3:
- mes "^FF0000[Payon Cave 3F Monster Encyclopedia]^000000";
- mes "1.Familiar";
- mes "Bat of Violet Colour.Not that strong but really annoying because it attacks very fast and outregeously when somebody gets near it.";
- mes "^0099FFFound Items^000000: Tooth of Bat,Fly Wing,Grape,Red Herb";
- next;
- mes "^FF0000[Payon Cave 3F Monster Encyclopedia]^000000";
- mes "2.Soldier Skeleton";
- mes "Skeleton holding 2 swords on both grips,attacks fast.One of the dangerous monsters in the Cave.";
- mes "^0099FFFound Items^000000: Skel-Bone,Red Potion";
- next;
- mes "^FF0000[Payon Cave 3F Monster Encyclopedia]^000000";
- mes "3.Munak";
- mes "Pretty-looking Female corpse which had been frozen for a long time.She looks like holding a long story deep inside, the story people want to know about.Anyway Don't give her a break,she'll give strong damages on you.";
- mes "^0099FFFound Items^000000: Daenggie ,Munak Turban";
- next;
- mes "^FF0000[Payon Cave 3F Monster Encyclopedia]^000000";
- mes "4.Archer Skeleton";
- mes "It seems to be an expert of bow when it was alive.It'll come to attack in no time when somebody gets inside of its range.";
- mes "^0099FFFound Items^000000: Skel-Bone,Fire Arrow,Red Potion";
- next;
- goto PayCave;
- close;
- PayCaveF4:
- mes "^FF0000[Payon Cave 4F Monster Encyclopedia]^000000";
- mes "1.Soldier Skeleton";
- mes "Skeleton holding 2 swords on both grips,attacks fast.One of the dangerous monsters in the Cave.";
- mes "^0099FFFound Items^000000: Skel-Bone,Red Potion";
- next;
- mes "^FF0000[Payon Cave 4F Monster Encyclopedia]^000000";
- mes "2.Archer Skeleton";
- mes "It seems to be an expert of bow when it was alive.It'll come to attack in no time when somebody gets inside of its range.";
- mes "^0099FFFound Items^000000: Skel-Bone,Fire Arrow,Red Potion";
- next;
- mes "^FF0000[Payon Cave 4F Monster Encyclopedia]^000000";
- mes "3.Sohee";
- mes "Female Ghost which holds grudge deep inside. She is always crying as waving long hair. But when running into the living, she suddenly changes her attitude fiercely.";
- mes "^0099FFFound Items^000000: Black Hair,Red Potion";
- next;
- mes "^FF0000[Payon Cave 4F Monster Encyclopedia]^000000";
- mes "4.Horong";
- mes "Eerie-looking fireball of violet colour.Recognises the living when gets near.";
- mes "^0099FFFound Items^000000: Stone Heart,Zargon,Fire Arrow";
- next;
- goto PayCave;
- close;
- PayCaveF5:
- mes "^FF0000[Payon Cave 5F Monster Encyclopedia]^000000";
- mes "1.Soldier Skeleton";
- mes "Skeleton holding 2 swords on both grips,attacks fast.One of the dangerous monsters in the Cave.";
- mes "^0099FFFound Items^000000: Skel-Bone,Red Potion";
- next;
- mes "^FF0000[Payon Cave 5F Monster Encyclopedia]^000000";
- mes "2.Archer Skeleton";
- mes "It seems to be an expert of bow when it was alive.It'll come to attack in no time when somebody gets inside of its range.";
- mes "^0099FFFound Items^000000: Skel-Bone,Fire Arrow,Red Potion";
- next;
- mes "^FF0000[Payon Cave 5F Monster Encyclopedia]^000000";
- mes "3.Sohee";
- mes "Female Ghost which holds grudge deep inside. She is always crying as waving long hair. But when running into the living, she suddenly changes her attitude fiercely.";
- mes "^0099FFFound Items^000000: Black Hair,Red Potion";
- next;
- mes "^FF0000[Payon Cave 5F Monster Encyclopedia]^000000";
- mes "4.Horong";
- mes "Eerie-looking fireball of violet colour.Recognises the living when gets near.";
- mes "^0099FFFound Items^000000: Stone Heart,Zargon,Fire Arrow";
- next;
- mes "^FF0000[Payon Cave 5F Monster Encyclopedia]^000000";
- mes "5.Moonlight";
- mes "Wild Girl having 9 tails of a Fox, and with a Big Bell on the back.";
- mes "^0099FFFound Items^000000: 9 Tails,White Potion,Topaz,Elunium";
- next;
- goto PayCave;
- close;
- EndPayCave:
- close;
- close;
- Pyramid:
- menu "1F",PyramidF1,"2F",PyramidF2,"3F",PyramidF3,"4F",PyramidF4,"5F",PyramidF5,"6F",PyramidF6,"Cancel",EndPyramid;
-
- PyramidF1:
- mes "^FF0000[Pyramid 1F Monster Encyclopedia]^000000";
- mes "1.Familiar";
- mes "Bat of Violet Colour.Not that strong but really annoying because it attacks very fast and outregeously when somebody gets near it.";
- mes "^0099FFFound Items^000000: Tooth of Bat,Fly Wing,Grape,Red Herb";
- next;
- mes "^FF0000[Pyramid 1F Monster Encyclopedia]^000000";
- mes "2.Spore";
- mes "Mushroom-like monsters. Usually live in the Forest or Dungeons. By the way Don't try to eat it!";
- mes "^0099FFFound Items^000000: Spore,Red Herb,Blue Herb";
- next;
- mes "^FF0000[Pyramid 1F Monster Encyclopedia]^000000";
- mes "3.Poporing";
- mes "Poisonous Poring in light green.Every character is the same as poring,but much more stronger.";
- mes "^0099FFFound Items^000000: Sticky Muscus,Garlet,Green Herb";
- next;
- goto Pyramid;
- close;
- PyramidF2:
- mes "^FF0000[Pyramid 2F Monster Encyclopedia]^000000";
- mes "1.Poporing";
- mes "Poisonous Poring in light green.Every character is the same as poring,but much more stronger.";
- mes "^0099FFFound Items^000000: Sticky Muscus,Garlet,Green Herb";
- next;
- mes "^FF0000[Pyramid 2F Monster Encyclopedia]^000000";
- mes "2.Drainliar";
- mes "Freaking Bloody bat with a might.";
- mes "^0099FFFound Items^000000: Tooth of Bat,Red Herb";
-
- next;
- mes "^FF0000[Pyramid 2F Monster Encyclopedia]^000000";
- mes "3.Soldier Skeleton";
- mes "Skeleton holding 2 swords on both grips,attacks fast.One of the dangerous monsters in the Cave.";
- mes "^0099FFFound Items^000000: Skel-Bone,Red Potion";
- next;
- mes "^FF0000[Pyramid 2F Monster Encyclopedia]^000000";
- mes "4.Archer Skeleton";
- mes "It seems to be an expert of bow when it was alive.It'll come to attack in no time when somebody gets inside of its range.";
- mes "^0099FFFound Items^000000: Skel-Bone,Fire Arrow,Red Potion";
- next;
- goto Pyramid;
- close;
- PyramidF3:
- mes "^FF0000[Pyramid 3F Monster Encyclopedia]^000000";
- mes "1.Drainliar";
- mes "Freaking Bloody bat with a might.";
- mes "^0099FFFound Items^000000: Tooth of Bat,Red Herb";
- next;
- mes "^FF0000[Pyramid 3F Monster Encyclopedia]^000000";
- mes "2.Soldier Skeleton";
- mes "Skeleton holding 2 swords on both grips,attacks fast.One of the dangerous monsters in the Cave.";
- mes "^0099FFFound Items^000000: Skel-Bone,Red Potion";
- next;
- mes "^FF0000[Pyramid 3F Monster Encyclopedia]^000000";
- mes "3.Archer Skeleton";
- mes "It seems to be an expert of bow when it was alive.It'll come to attack in no time when somebody gets inside of its range.";
- mes "^0099FFFound Items^000000: Skel-Bone,Fire Arrow,Red Potion";
- next;
- mes "^FF0000[Pyramid 3F Monster Encyclopedia]^000000";
- mes "4.Mummy";
- mes "Walking Corpse with a bandage all around the body.It smells so bad because its body is still on the decomposed stage.";
- mes "^0099FFFound Items^000000: Rotten Bandage";
- next;
- mes "^FF0000[Pyramid 3F Monster Encyclopedia]^000000";
- mes "5.Verit";
- mes "Dog with a bandage all around the body which was dead once before.It tends to eat everything dropped on the ground.";
- mes "^0099FFFound Items^000000: Immortal Heart,Zargon,Rotten Bandage";
- next;
- goto Pyramid;
- close;
- PyramidF4:
- mes "^FF0000[Pyramid 4F Monster Encyclopedia]^000000";
- mes "1.Mummy";
- mes "Walking Corpse with a bandage all around the body.It smells so bad because its body is still on the decomposed stage.";
- mes "^0099FFFound Items^000000: Rotten Bandage";
- next;
- mes "^FF0000[Pyramid 4F Monster Encyclopedia]^000000";
- mes "2.Verit";
- mes "Dog with a bandage all around the body which was dead once before.It tends to eat everything dropped on the ground.";
- mes "^0099FFFound Items^000000: Immortal Heart,Zargon,Rotten Bandage";
- next;
- mes "^FF0000[Pyramid 4F Monster Encyclopedia]^000000";
- mes "3.Ghoul";
- mes "Similar as Zombie but much more stronger. Yet very slow, you'd better run for your life when happen to meet this thing.";
- mes "^0099FFFound Items^000000: Horrendous Mouth";
- next;
- mes "^FF0000[Pyramid 4F Monster Encyclopedia]^000000";
- mes "4.Isis";
- mes "Creature having the head and upper body of a woman and the tail of a snake.Her nail is quite a menace.";
- mes "^0099FFFound Items^000000: Scale Skin,Shining Scale";
- next;
- goto Pyramid;
- close;
- PyramidF5:
- mes "^FF0000[Pyramid 5F Monster Encyclopedia]^000000";
- mes "1.Mummy";
- mes "Walking Corpse with a bandage all around the body.It smells so bad because its body is still on the decomposed stage.";
- mes "^0099FFFound Items^000000: Rotten Bandage";
- next;
- mes "^FF0000[Pyramid 5F Monster Encyclopedia]^000000";
- mes "2.Ghoul";
- mes "Similar as Zombie but much more stronger. Yet very slow, you'd better run for your life when happen to meet this thing.";
- mes "^0099FFFound Items^000000: Horrendous Mouth";
- next;
- mes "^FF0000[Pyramid 5F Monster Encyclopedia]^000000";
- mes "3.Isis";
- mes "Creature having the head and upper body of a woman and the tail of a snake.Her nail is quite a menace.";
- mes "^0099FFFound Items^000000: Scale Skin,Shining Scale";
- next;
- goto Pyramid;
- close;
- PyramidF6:
- mes "^FF0000[Pyramid 6F Monster Encyclopedia]^000000";
- mes "1.Mummy";
- mes "Walking Corpse with a bandage all around the body.It smells so bad because its body is still on the decomposed stage.";
- mes "^0099FFFound Items^000000: Rotten Bandage";
- next;
- mes "^FF0000[Pyramid 6F Monster Encyclopedia]^000000";
- mes "2.Verit";
- mes "Dog with a bandage all around the body which was dead once before.It tends to eat everything dropped on the ground.";
- mes "^0099FFFound Items^000000: Immortal Heart,Zargon,Rotten Bandage";
- next;
- mes "^FF0000[Pyramid 6F Monster Encyclopedia]^000000";
- mes "3.Ghoul";
- mes "Similar as Zombie but much more stronger. Yet very slow, you'd better run for your life when happen to meet this thing.";
- mes "^0099FFFound Items^000000: Horrendous Mouth";
- next;
- mes "^FF0000[Pyramid 6F Monster Encyclopedia]^000000";
- mes "4.Isis";
- mes "Creature having the head and upper body of a woman and the tail of a snake.Her nail is quite a menace.";
- mes "^0099FFFound Items^000000: Scale Skin,Shining Scale";
- next;
- mes "^FF0000[Pyramid 6F Monster Encyclopedia]^000000";
- mes "5.Osiris";
- mes "Mummy King with a rotten bandage all over the body, wearing a Crown on the head.He threatens Adventurers with an incredible might.";
- mes "^0099FFFound Items^000000: Memento,Rotten Bandage,Hand of God,Elunium";
- next;
- goto Pyramid;
- close;
- EndPyramid:
- close;
- close;
- Cancel:
- close;
-}
-//<=========== Library - End ==========>\\
+// $Id: books.txt,v 1.1.1.1 2004/09/10 17:26:42 MagicalTux Exp $ +// Changed Mage Guild Book to the correct one (now located in mage.txt) +//<--------------- NPCs BOOKS [Update: July. 27, 2004] --------------->\\ + +//<=========== Library - Begin ==========>\\ +prt_in.gat,159,56,4 script Monster Encyclopedia 111,{ + mes "^FF0000[Monster Encyclopedia]^000000"; + mes "This is a Monster Encyclopedia including information of Earth,Fire,Neutral Monsters!"; + next; + menu "Monsters of Earth Property",MonEarPro,"Monsters of Fire Property",MonFirPro,"Monsters of Neutral Property",MonNeuPro,"Cancel",Cancel; + + MonEarPro: + menu "Small Size Monster",SmaMonEarPro,"Medium Size Monster",MedMonEarPro,"Great Size Monster",GrMonEarPro,"Cancel",EndMonEarPro; + + SmaMonEarPro: + mes "^FF0000[Earth,Small Monster Encyclopedia]^000000"; + mes "1.Fabre"; + mes "Larva of Creamy. It is cute when it wiggles,even though it is a weak and small monster,"; + mes "People often tend to slay Fabres,only for the reason they can get `Feather's,one of required items for `Bunny Band'."; + mes "^0099FFFound Items^000000: Feather.Fluff .Green Herb.Clover"; + next; + mes "^FF0000[Earth,Small Monster Encyclopedia]^000000"; + mes "2.Pupa"; + mes "Monster on the Fabre's pupal stage. It deosn't attack at all, so easy to kill for Novice people."; + mes "^0099FFFound Items^000000: Chrysalis,Sticky Muscus"; + next; + mes "^FF0000[Earth,Small Monster Encyclopedia]^000000"; + mes "3.Martin"; + mes "Funny looking Mole wearing a Safety Helmet on the head,which is always busy to walk around."; + mes "^0099FFFound Items^000000: Mole Whiskers,Mole Claw"; + next; + mes "^FF0000[Earth,Small Monster Encyclopedia]^000000"; + mes "3.Savage Bebe"; + mes "Tiny Pink baby of Savage.Unlike its small size, It is running about fields making annoying noise."; + mes "^0099FFFound Items^000000: Leather,Meat,Arrow,Feather"; + next; + mes "^FF0000[Earth,Small Monster Encyclopedia]^000000"; + mes "4.Andre"; + mes "A kind of Worker Ants,they are very diligent in their work.They gather everything to save a sufficient stock and are well-cooperative,you need to be careful."; + mes "^0099FFFound Items^000000: Worm Peeling,Garlet,Sticky Muscus,Shell"; + next; + mes "^FF0000[Earth,Small Monster Encyclopedia]^000000"; + mes "5.Coco"; + mes "Little but fierce-looking eyed Creature carrying an Acorn on both hands. It is very unpleasant when it gives a dirty look,let's give it a lesson."; + mes "^0099FFFound Items^000000: Acorn,Fluff,Leather,Sweet Potato"; + next; + mes "^FF0000[Earth,Small Monster Encyclopedia]^000000"; + mes "6.Piere"; + mes "A kind of Work Ants,seems to be very diligent.Its appearance is similar with other Ants,but you can easily distinguish them from others as they only gather in a same kind."; + mes "^0099FFFound Items^000000: Worm Peeling,Garlet,Sticky Muscus,Shell"; + next; + mes "^FF0000[Earth,Small Monster Encyclopedia]^000000"; + mes "7.Smokie"; + mes "It's working out all the time.Often tries to shapeshift with Raccon Leaves,but always failed. Back then, it tended to gather stuffs diligently, now it seems to give up."; + mes "^0099FFFound Items^000000: Raccon Leaf,Leather,Sweet Potato"; + next; + mes "^FF0000[Earth,Small Monster Encyclopedia]^000000"; + mes "8.Deniro"; + mes "A kind of Work Ants, tend to group in a same kind as well as other ants."; + mes "^0099FFFound Items^000000: Worm Peeling,Garlet,Sticky Muscus,Shell"; + next; + mes "^FF0000[Earth,Small Monster Encyclopedia]^000000"; + mes "9.Yoyo"; + mes "Pink coloured Monkey.Not only they pick up every stuff dropped on the gound outrageously, but they are nimble and cooperative, you must be cautious of being attacked by a group."; + mes "^0099FFFound Items^000000: Yoyo Tail,Banana,Yellow Herb,Leather"; + next; + mes "^FF0000[Earth,Small Monster Encyclopedia]^000000"; + mes "10.Vitata"; + mes "Work Ants in charge of storing honey inside the body for emergency.It is a little pathetic to see their chubby tummy filled with Honey."; + mes "^0099FFFound Items^000000: Worm Peeling,Scell,Honey"; + next; + mes "^FF0000[Earth,Small Monster Encyclopedia]^000000"; + mes "11.Caramel"; + mes "Cute porcupine with tiny spiky quills.But don't ever touch it without intention,it will get mad immeduately."; + mes "^0099FFFound Items^000000: Porcupine Quill,Leather"; + next; + mes "^FF0000[Earth,Small Monster Encyclopedia]^000000"; + mes "12.Giearth"; + mes "Little Grampa Pixie. Usually lives in Caves to gather Ores.Even though he is short, but actually an adult.Show your manners."; + mes "^0099FFFound Items^000000: Old Pixie's Moustache"; + next; + goto MonEarPro; + close; + MedMonEarPro: + mes "^FF0000[Earth,Medium Monster Encyclopedia]^000000"; + mes "1.Willow"; + mes "Creature reborn from a Gigantic Old Tree.Everything like the feagure or the sound to related it is eerie."; + mes "^0099FFFound Items^000000: Tree Root,Trunk,Red Herb,Sweet Potato"; + next; + mes "^FF0000[Earth,Medium Monster Encyclopedia]^000000"; + mes "2.Rocker"; + mes "Lazy Grasshpper which loves playing Violin."; + mes "^0099FFFound Items^000000: Grasshopper's Leg,Jellopy"; + next; + mes "^FF0000[Earth,Medium Monster Encyclopedia]^000000"; + mes "3.Madragora"; + mes "Stays the same but attacks passengers using Stalks under the ground. Look so Horrible,also attacks Very annoyingly."; + mes "^0099FFFound Items^000000: Stem,Green Herb,Shoot"; + next; + mes "^FF0000[Earth,Medium Monster Encyclopedia]^000000"; + mes "4.Wolf"; + mes "Wanderers having Blue Manes.They are cooperative,so attack in a group when one got attacked.Let's just let them mind their business and watch."; + mes "^0099FFFound Items^000000: Wolf Claw,Meat,Monster's Feed,Leather"; + next; + mes "^FF0000[Earth,Medium Monster Encyclopedia]^000000"; + mes "5.Snake"; + mes "Green Cloloured Snake living in the Forest or Desert.Not poisonous but be careful."; + mes "^0099FFFound Items^000000: Snake Scale,Red Herb"; + next; + mes "^FF0000[Earth,Medium Monster Encyclopedia]^000000"; + mes "6.Horn"; + mes "Compliant Insect unlike its offensive appearance.It's wandering about the field making some crunching sound."; + mes "^0099FFFound Items^000000: Horn,Shell,Solid Shell"; + next; + mes "^FF0000[Earth,Medium Monster Encyclopedia]^000000"; + mes "7.Orc Warrior"; + mes "Self-Confident Warrior of the Orc Tribe."; + mes "^0099FFFound Items^000000:Orcish Voucher"; + next; + mes "^FF0000[Earth,Medium Monster Encyclopedia]^000000"; + mes "8.Hode"; + mes "Huge earthworm without any more description.Huge earthworm!Usually conceals itself under the ground,commonly found in the Desert."; + mes "^0099FFFound Items^000000: Earthworm Peeling,Sticky Muscus"; + next; + mes "^FF0000[Earth,Medium Monster Encyclopedia]^000000"; + mes "9.Mantis"; + mes "It wanders about the field waving a tiny fan."; + mes "^0099FFFound Items^000000: Mantis Scythe,Scell,Solid Shell,Red Potion"; + next; + mes "^FF0000[Earth,Medium Monster Encyclopedia]^000000"; + mes "10.Savage"; + mes "Wild Boar always walking around restlessly,making some noise. It has Big fangs and looks different from the young one."; + mes "^0099FFFound Items^000000: Mane,Leather"; + next; + mes "^FF0000[Earth,Medium Monster Encyclopedia]^000000"; + mes "11.Petite"; + mes "Tiny little Walking Dragon.It seems like there exists 2 different kinds of Petite, flying one and walking one and this is the 2nd one."; + mes "^0099FFFound Items^000000: Dragon Canine,Dragon Tail,Zargon"; + next; + goto MonEarPro; + close; + GrMonEarPro: + mes "^FF0000[Earth,Great Monster Encyclopedia]^000000"; + mes "1.Worm Tail"; + mes "Tiny little creature of light green which has a spiky,thin and long stick on the back.Usually it is very gentle but attacks using the stick on the back when got attacked,so be careful!"; + mes "^0099FFFound Items^000000: Pointed Scale,Yellow Herb"; + next; + mes "^FF0000[Earth,Great Monster Encyclopedia]^000000"; + mes "2.Muka"; + mes "Cute Cactus commonly found in the Desert.It tries to threaten passengers with some funny sound but always failed."; + mes "^0099FFFound Items^000000: Cactus Needle,Empty Bottle,Green Herb,Red Herb"; + next; + mes "^FF0000[Earth,Great Monster Encyclopedia]^000000"; + mes "3.Big Foot"; + mes "Dull-Looking Bear with a huge build.Although it looks dumb but you will realise how it can be fast after you provoke it."; + mes "^0099FFFound Items^000000: Bear's Foot Skin,Leather,Sweet Potato"; + next; + mes "^FF0000[Earth,Great Monster Encyclopedia]^000000"; + mes "4.Flora"; + mes "Maneater with a big mouth.It pretends just a simple plant but anybody coming near,it rushes into him fiercely."; + mes "^0099FFFound Items^000000: Maneater Blossom,Stem"; + next; + goto MonEarPro; + close; + EndMonEarPro: + close; + close; + MonFirPro: + menu "Small Size Monster",SmaMonFirPro,"Medium Size Monster",MedMonFirPro,"Great Size Monster",GrMonFirPro,"Cancel",EndMonFirPro; + + SmaMonFirPro: + mes "^FF0000[Fire,Small Monster Encyclopedia]^000000"; + mes "1.Picky"; + mes "Cute little chick before Peco Peco. It can't be realised that this little creature grows into a Peco Peco the big,strong bird."; + mes "Sometimes you can find a picky with an egg shell which is a bit stronger than a normal picky."; + mes "^0099FFFound Items^000000: Feather of Birds.Feather.Red Herb.Milk."; + next; + mes "^FF0000[Fire,Small Monster Encyclopedia]^000000"; + mes "2.Baby Desert Wolf"; + mes "Baby of Desert Wolf,trying to threaten passengers with a big bay."; + mes "If you want to pat one of them,because you think it is pretty,don't do that before taking a look around enough.Not babies come to rush you but their parents will assault you at the same time.Parents don't want thier babies being harmed."; + mes "^0099FFFound Items^000000: Leather,Meat"; + next; + mes "^FF0000[Fire,Small Monster Encyclopedia]^000000"; + mes "3.Horong"; + mes "Eerie-looking fireball of violet colour.Recognises the living when gets near."; + mes "^0099FFFound Items^000000: Stone Heart,Zargon,Fire Arrow"; + next; + goto MonFirPro; + close; + MedMonFirPro: + mes "^FF0000[Fire,Medium Monster Encyclopedia]^000000"; + mes "1.Drops"; + mes "A kind of Poring,but commonly found in the Desert and colors in Pale Orange.It eats everything just like Poring does."; + mes "However it seems to be a bit stronger than Poring anyway."; + mes "^0099FFFound Items^000000: Jellopy,Sticky Muscus,Apple,Empty Bottle,Red Herb"; + next; + mes "^FF0000[Fire,Medium Monster Encyclopedia]^000000"; + mes "2.Elder Willow"; + mes "A kind of Willow but it looks older and colors in red. Frightening as much as Willow."; + + mes "^0099FFFound Items^000000: Resin,Trunk,Sweet Potato"; + next; + mes "^FF0000[Fire,Medium Monster Encyclopedia]^000000"; + mes "3.Metaller"; + mes "Evolved one of Rocker.It is dim brown and lives in the Desert.Lazy equally to Rocker,but it steals stuffs on the ground."; + mes "^0099FFFound Items^000000: Red Blood,Grasshopper's Leg,Scell,Shell"; + next; + mes "^FF0000[Fire,Medium Monster Encyclopedia]^000000"; + mes "4.Zerom"; + mes "Undead Slave who had been extremely abused before he died.He is wandering in the Sphinx,carrying a big box on the back.."; + mes "^0099FFFound Items^000000: Panties"; + next; + mes "^FF0000[Fire,Medium Monster Encyclopedia]^000000"; + mes "5.Scorpion"; + mes "Scorpion spreaded over the Desert.It is dangerous as much as its beautiful colour.Watch out its sharp tail."; + mes "^0099FFFound Items^000000: Scorpion Tail,Green Herb,Yellow Herb"; + next; + mes "^FF0000[Fire,Medium Monster Encyclopedia]^000000"; + mes "6.Desert Wolf"; + mes "Wolf commonly found in the desert,which is stronger than a Forest one.Take a look around before doing attacks,because Wolf tends to be cooperative each other!"; + mes "^0099FFFound Items^000000: Leather,Mink Coat,Meat,Wolf Claw"; + next; + mes "^FF0000[Fire,Medium Monster Encyclopedia]^000000"; + mes "7.Frilldora"; + mes "Lizard which has a Unique neck.Looks a bit funny but is very Strong unlike its appearance."; + mes "^0099FFFound Items^000000: Frill,Reptile Tongue,Red Potion,Zargon"; + next; + mes "^FF0000[Fire,Medium Monster Encyclopedia]^000000"; + mes "8.Cobold the 3rd"; + mes "Small monster looks like a Wolf but it is smart enough to handle several tools. It is hostile and strong unlike its appearance. All Cobolds seem to be brothers."; + mes "^0099FFFound Items^000000: Blue Hair,Zargon,Orange Potion"; + next; + mes "^FF0000[Fire,Medium Monster Encyclopedia]^000000"; + mes "9.Jakk"; + mes "Quite Odd monster in a nice suit,but with a pumpkin head.It looks funny but changes the attitude fiercely when attacks someone."; + mes "^0099FFFound Items^000000: Jack'o'Pumpkin,Zargon"; + next; + goto MonFirPro; + close; + GrMonFirPro: + mes "^FF0000[Fire,Great Monster Encyclopedia]^000000"; + mes "1.Peco Peco"; + mes "Nowadays peco peco is popular as vehicle for knights. They lives in the Desert or Forest and also cooperative."; + mes "^0099FFFound Items^000000: Bill of Birds,Yellow Herb,Red Herb"; + next; + mes "^FF0000[Fire,Great Monster Encyclopedia]^000000"; + mes "2.Marduk"; + mes "Unknown monster wearing Catholic uniform and looking serious."; + mes "^0099FFFound Items^000000: Flame Heart"; + next; + goto MonFirPro; + close; + EndMonFirPro: + close; + close; + MonNeuPro: + menu "Small Size Monster",SmaMonNeuPro,"Medium Size Monster",MedMonNeuPro,"Great Size Monster",GrMonNeuPro,"Cancel",EndMonNeuPro; + + SmaMonNeuPro: + mes "^FF0000[Neutral,Small Monster Encyclopedia]^000000"; + mes "1.Lunatic"; + mes "Plump and shaggy monster shaped in Rabbit.However it won't give you a `Bunny Band'."; + mes "^0099FFFound Items^000000: Clover,Feather,Carrot,Red Herb"; + next; + mes "^FF0000[Neutral,Small Monster Encyclopedia]^000000"; + mes "2.Peco Peco Egg"; + mes "Egg of Peco Peco.It is so tiny that doesn't look like an egg of Big Bird.Novice people love to Crack it because it doesn't attack at all."; + mes "^0099FFFound Items^000000: Shell,Red Potion,Empty Bottle"; + next; + mes "^FF0000[Neutral,Small Monster Encyclopedia]^000000"; + mes "3.Ant Egg"; + mes "Simple Ant Egg."; + mes "^0099FFFound Items^000000: Shell,Jellopy,Sticky Muscus,Empty Bottle"; + next; + mes "^FF0000[Neutral,Small Monster Encyclopedia]^000000"; + mes "2.Baby Thief Bug"; + mes "Dirty and filthy Creatures having a strong solidarity with the same kind, eat everything on the ground as well.They are sorted into 3 kinds by the Size and Colour."; + mes "^0099FFFound Items^000000: Worm Peeling,Red Herb,Jellopy"; + next; + goto MonNeuPro; + close; + MedMonNeuPro: + mes "^FF0000[Neutral,Medium Monster Encyclopedia]^000000"; + mes "Unfortunately there is no medium monster of Neutral property which has been discovered so far."; + next; + goto MonNeuPro; + close; + GrMonNeuPro: + mes "^FF0000[Neutral,Great Monster Encyclopedia]^000000"; + mes "1.Golem"; + mes "Living Stone wich has spell-bound by Black Magic.Its gigantic body makes its moving slow.Recognises Magic Spell Casting."; + mes "^0099FFFound Items^000000: Scell"; + next; + goto MonNeuPro; + close; + EndMonNeuPro: + close; + close; + Cancel: + close; +} + +prt_in.gat,161,50,4 script Monster Encyclopedia 111,{ + mes "^FF0000[Monster Encyclopedia]^000000"; + mes "This is a Monster Encyclopedia including Monsters of Dark,Poison and Undead Property!"; + next; + menu "Monster of Dark Property",MonDrkPro,"Monster of Poison Property",MonPsoPro,"Monster of Undead Property",MonUndPro,"Cancel",Cancel; + + MonDrkPro: + menu "Small Size Monster",SmaMonDrkPro,"Medium Size Monster",MedMonDrkPro,"Great Size Monster",GrMonDrkPro,"Cancel",EndMonDrkPro; + + SmaMonDrkPro: + mes "^FF0000[Dark,Small Monster Encyclopedia]^000000"; + mes "1.Thief Bug Egg"; + mes "Egg of Filthy Bug.Let's cut off the evil at its root."; + mes "^0099FFFound Items^000000: Chrysalis,Sticky Muscus"; + next; + mes "^FF0000[Dark,Small Monster Encyclopedia]^000000"; + mes "2.Familiar"; + mes "Bat of Violet Colour.Not that strong but really annoying because it attacks very fast and outregeously when somebody gets near it."; + mes "^0099FFFound Items^000000: Tooth of Bat,Fly Wing,Grape,Red Herb"; + next; + mes "^FF0000[Dark,Small Monster Encyclopedia]^000000"; + mes "3.Tarou"; + mes "Little mouse of white colour. It is squicking very loudly in the Dead Pit or the Prontera Culvert."; + mes "^0099FFFound Items^000000: Rat Tail,Leather,Feather,Monster's Feed"; + next; + mes "^FF0000[Dark,Small Monster Encyclopedia]^000000"; + mes "4.Drainliar"; + mes "Freaking Bloody bat with a might."; + mes "^0099FFFound Items^000000: Tooth of Bat,Red Herb"; + next; + mes "^FF0000[Dark,Small Monster Encyclopedia]^000000"; + mes "5.Dokkaebi"; + mes "Korean Traditional Ghost with Dark Skin. It looks so cute and has a small horn on the head."; + mes "^0099FFFound Items^000000: Dokkaebi Horn"; + next; + mes "^FF0000[Dark,Small Monster Encyclopedia]^000000"; + mes "6.Deviruchi"; + mes "Little evil creature,which carries a cute fork with."; + mes "^0099FFFound Items^000000: Little Evil Horn,Little Evil Wing,Zargon"; + next; + goto MonDrkPro; + close; + MedMonDrkPro: + mes "^FF0000[Dark,Medium Monster Encyclopedia]^000000"; + mes "1.Female Thief Bug"; + mes "Dirty and filthy Creatures having a strong solidarity with the same kind, eat everything on the ground as well.They are sorted into 3 kinds by the Size and Colour."; + mes "^0099FFFound Items^000000: Worm Peeling,Red Herb,Jellopy,Garlet.Insect Feeler"; + next; + mes "^FF0000[Dark,Medium Monster Encyclopedia]^000000"; + mes "2.Male Thief Bug"; + mes "Dirty and filthy Creatures having a strong solidarity with the same kind, eat everything on the ground as well.They are sorted into 3 kinds by the Size and Colour."; + mes "^0099FFFound Items^000000: Worm Peeling,Red Herb,Jellopy,Garlet.Insect Feeler,Yellow Herb"; + next; + mes "^FF0000[Dark,Medium Monster Encyclopedia]^000000"; + mes "3.Matyr"; + mes "Creature shaped in Black Dog."; + mes "^0099FFFound Items^000000: Monster's Feed,Leather"; + next; + mes "^FF0000[Dark,Medium Monster Encyclopedia]^000000"; + mes "4.Zenorc"; + mes "Mutent Orc with a small and short build.It moves around using both hands and feet. It owns High AGI stat,so that it passes off almost every attack."; + mes "^0099FFFound Items^000000: Znorc's Fang,Sticky Muscus,Yellow Potion"; + next; + mes "^FF0000[Dark,Medium Monster Encyclopedia]^000000"; + mes "5.Requiem"; + mes "It seems like an Ancient Slave,carrying a heavy Coffin on the back."; + mes "^0099FFFound Items^000000: Mystic Blue Box"; + next; + mes "^FF0000[Dark,Medium Monster Encyclopedia]^000000"; + mes "6.Bathory"; + mes "Witch with a big wen on the nose.She rides on her magic broom flying around in the air."; + mes "^0099FFFound Items^000000: Witched Starsand"; + next; + goto MonDrkPro; + close; + GrMonDrkPro: + mes "^FF0000[Dark,Great Monster Encyclopedia]^000000"; + mes "1.Isis."; + mes "Creature having the head and upper body of a woman and the tail of a snake.Her nail is quite a menace."; + mes "^0099FFFound Items^000000: Scale Skin,Shining Scale"; + next; + mes "^FF0000[Dark,Great Monster Encyclopedia]^000000"; + mes "3.Raydric"; + mes "Ghost Knight of misfortune."; + mes "^0099FFFound Items^000000: Elunium,Chivarly Emblem"; + next; + goto MonDrkPro; + close; + EndMonDrkPro: + close; + close; + MonPsoPro: + menu "Small Size Monster",SmaMonPsoPro,"Medium Size Monster",MedMonPsoPro,"Great Size Monster",GrMonPsoPro,"Cancel",EndMonPsoPro; + + SmaMonPsoPro: + mes "^FF0000[Poison,Small Monster Encyclopedia]^000000"; + mes "Unfortunately there is no small monster of Poison Property which has been discovered so far."; + next; + goto MonPsoPro; + close; + MedMonPsoPro: + mes "^FF0000[Poison,Medium Monster Encyclopedia]^000000"; + mes "1.Poporing"; + mes "Poisonous Poring in light green.Every character is the same as poring,but much more stronger."; + mes "^0099FFFound Items^000000: Sticky Muscus,Garlet,Green Herb"; + next; + mes "^FF0000[Poison,Medium Monster Encyclopedia]^000000"; + mes "2.Poison Spore"; + mes "Poisonous Spore in Violet.Besides,it tends to attack haphazardly if anybody gets near."; + mes "^0099FFFound Items^000000: Spore,Green Herb"; + next; + mes "^FF0000[Poison,Medium Monster Encyclopedia]^000000"; + mes "3.Cobold the 2nd"; + mes "Small monster looks like a Wolf but it is smart enough to handle several tools. It is hostile and strong unlike its appearance. All Cobolds seem to be brothers."; + mes "^0099FFFound Items^000000: Blue Hair,Zargon,Orange Potion"; + next; + mes "^FF0000[Poison,Medium Monster Encyclopedia]^000000"; + mes "4.Side Winder"; + mes "Horrendous Snake of Dark colour."; + mes "^0099FFFound Items^000000: Shining Scale,Zargon,Poisonous Canine,Snake Scale"; + next; + goto MonPsoPro; + close; + GrMonPsoPro: + mes "^FF0000[Poison,Great Monster Encyclopedia]^000000"; + mes "1.Argos"; + mes "Big Spider of Dark colour.It often invades passangers who intend to go over Mt.Mjornir. Be cautious of Argos,if you are the one of those passangers."; + mes "^0099FFFound Items^000000: Cobweb,Scell,Bug Leg,Green Herb,Yellow Herb"; + next; + mes "^FF0000[Poison,Great Monster Encyclopedia]^000000"; + mes "2.Argiope"; + mes "Monster crawling around with several articular legs."; + mes "^0099FFFound Items^000000: Bug Leg,Zargon,Green Herb"; + next; + mes "^FF0000[Poison,Great Monster Encyclopedia]^000000"; + mes "4.Myst"; + mes "Mist-like Monster."; + mes "^0099FFFound Items^000000: Trunk.Gas Mask"; + next; + goto MonPsoPro; + close; + EndMonPsoPro: + close; + close; + MonUndPro: + menu "Small Size Monster",SmaMonUndPro,"Medium Size Monster",MedMonUndPro,"Great Size Monster",GrMonUndPro,"Cancel",EndMonUndPro; + + SmaMonUndPro: + mes "^FF0000[Undead,Small Monster Encyclopedia]^000000"; + mes "Unfortunately there is no small monster of Undead Property which has been discovered so far."; + next; + goto MonUndPro; + close; + MedMonUndPro: + mes "^FF0000[Undead,Medium Monster Encyclopedia]^000000"; + mes "1.Zombie"; + mes "Bad Case of the Dead which has been reborn as a Walking Corpse by Back magic.Let's lead it to Nirvana."; + mes "^0099FFFound Items^000000: Decayed Nail,Sticky Muscus,Horrendous Mouth"; + next; + mes "^FF0000[Undead,Medium Monster Encyclopedia]^000000"; + mes "2.Megalodon"; + mes "Skeleton Fish having spooky empty eye-holes."; + mes "^0099FFFound Items^000000: Stinky Scale,Skel-Bone"; + next; + mes "^FF0000[Undead,Medium Monster Encyclopedia]^000000"; + mes "3.Orc Zombie"; + mes "Corpes of the Orc which has been given a new life by Black magic."; + mes "^0099FFFound Items^000000: Orc Claw,Sticky Muscus"; + next; + mes "^FF0000[Undead,Medium Monster Encyclopedia]^000000"; + mes "4.Pirate Skel"; + mes "Walking Corpse of a Pirate which had ordered all over the Sea."; + mes "^0099FFFound Items^000000: Skel-Bone"; + next; + mes "^FF0000[Undead,Medium Monster Encyclopedia]^000000"; + mes "5.Orc Skeleton"; + mes "Ancient Living Skeleton of the Orc which had been buried for a long time.It has Great Power as well as the period of being buried."; + mes "^0099FFFound Items^000000: Orc's Fang,Green Potion"; + next; + mes "^FF0000[Undead,Medium Monster Encyclopedia]^000000"; + mes "6.Soldier Skeleton"; + mes "Skeleton holding 2 swords on both grips,attacks fast.One of the dangerous monsters in the Cave."; + mes "^0099FFFound Items^000000: Skel-Bone,Red Potion"; + next; + mes "^FF0000[Undead,Medium Monster Encyclopedia]^000000"; + mes "7.Munak"; + mes "Pretty-looking Female corpse which had been frozen for a long time.She looks like holding a long story deep inside, the story people want to know about.Anyway Don't give her a break,she'll give strong damages on you."; + mes "^0099FFFound Items^000000: Daenggie ,Munak Turban"; + next; + mes "^FF0000[Undead,Medium Monster Encyclopedia]^000000"; + mes "8.Skel Worker"; + mes "Walking Skeletion which was dead in a mine."; + mes "^0099FFFound Items^000000: Iron,Lantern"; + next; + mes "^FF0000[Undead,Medium Monster Encyclopedia]^000000"; + mes "9.Archer Skeleton"; + mes "It seems to be an expert of bow when it was alive.It'll come to attack in no time when somebody gets inside of its range."; + mes "^0099FFFound Items^000000: Skel-Bone,Fire Arrow,Red Potion"; + next; + mes "^FF0000[Undead,Medium Monster Encyclopedia]^000000"; + mes "10.Mummy"; + mes "Walking Corpse with a bandage all around the body.It smells so bad because its body is still on the decomposed stage."; + mes "^0099FFFound Items^000000: Rotten Bandage"; + next; + mes "^FF0000[Undead,Medium Monster Encyclopedia]^000000"; + mes "11.Verit"; + mes "Dog with a bandage all around the body which was dead once before.It tends to eat everything dropped on the ground."; + mes "^0099FFFound Items^000000: Immortal Heart,Zargon,Rotten Bandage"; + next; + mes "^FF0000[Undead,Medium Monster Encyclopedia]^000000"; + mes "12.Ghoul"; + mes "Similar as Zombie but much more stronger. Yet very slow, you'd better run for your life when happen to meet this thing."; + mes "^0099FFFound Items^000000: Horrendous Mouth"; + next; + goto MonUndPro; + close; + GrMonUndPro: + mes "^FF0000[Undead,Great Monster Encyclopedia]^000000"; + mes "3.Evil Druid"; + mes "You'll shudder even once looking at it."; + mes "^0099FFFound Items^000000: Amulet,White Herb"; + next; + goto MonUndPro; + close; + EndMonUndPro: + close; + close; + Cancel: + close; +} + +prt_in.gat,162,68,4 script `Merchant Guideline' for Dummies 111,{ + mes "^FF0000[`Merchant Guideline' for Dummies]^000000"; + mes "Please go over the next page if you want to check `Vending'."; + next; + menu "Go over the next page",NextPage,"Close the book",CloseB; + + NextPage: + mes "^FF0000[Vending Guide for Dummies]^000000"; + mes "To Vend a Shop,first you must equip a ^0099FFCart^000000."; + mes "You can rent a cart from Kafra.When equipped once,it won't be disappeared as long as you don't take off."; + next; + mes "^FF0000[Vending Guide for Dummies]^000000"; + mes "However,this cart diminishes moving speed.You can recover moving speed after learning `Push Cart' the skill."; + next; + mes "^FF0000[Vending Guide for Dummies]^000000"; + mes "When learn `Push Cart' over 3 points,it will allow you to learn `Vending'.You can display 3 kinds of item on your shop with Vending at first."; + mes "As Vending skill goes higher, it will allow you to display more items."; + next; + mes "^FF0000[Vending Guide for Dummies]^000000"; + mes "Let's store things you want to sell in the Cart."; + mes "To open Cart Window,Use ^0099FFalt+W^000000 as hotkey.Or it will be open when you click `Item' icon on equipment(alt+Q) window."; + next; + mes "^FF0000[Vending Guide for Dummies]^000000"; + mes "Now Use `Vending' skill.2 kinds of Window-`Item Shop' and `Item you want to sell'- will pop up."; + next; + mes "^FF0000[Vending Guide for Dummies]^000000"; + mes "On `Item Shop' window,name your shop.Then Drag items onto `Item you want to sell' window and Fix the price."; + next; + mes "^FF0000[Vending Guide for Dummies]^000000"; + mes "When close `My Shop' window,your shop will be closed.You can check each price of items with a mouse on the items. Meanwhile it keeps being recorded on Chat window how many items or which kind have been sold."; + next; + mes "^FF0000[Vending Guide for Dummies]^000000"; + mes "When everything's sold out,the shop will be closed automatically."; + close; + CloseB: + close; +} + +prt_in.gat,164,96,4 script Monster Encyclopedia 111,{ + mes "^FF0000[Dungeon Monster Encyclopedia]^000000"; + mes "This is an Encyclopedia describing Monsters living in Dungeons."; + next; + next; + menu "Orc Dungeon",OrcDung,"Byalan Cave near Izlude",ByaCave,"Prontera Culvert",PrtCul; + + OrcDung: + menu "F1",OrcDungF1,"F2",OrcDungF2,"Cancel",EndOrcDung; + + OrcDungF1: + mes "^FF0000[Orc Dungeon 1F Monster Encyclopedia]^000000"; + mes "1.Chonchon"; + mes "Flying monsters, they are not strong but make as annoying noises as Roda Frog. Make sure to eliminate them whenever you see."; + mes "^0099FFFound Items^000000: Shell,Jellopy,Fly Wing"; + next; + mes "^FF0000[Orc Dungeon 1F Monster Encyclopedia]^000000"; + mes "2.Familiar"; + mes "Bat of Violet Colour.Not that strong but really annoying because it attacks very fast and outregeously when somebody gets near it."; + mes "^0099FFFound Items^000000: Tooth of Bat,Fly Wing,Grape,Red Herb"; + next; + mes "^FF0000[Orc Dungeon 1F Monster Encyclopedia]^000000"; + mes "3.Orc Zombie"; + mes "Corpes of the Orc which has been given a new life by Black magic."; + mes "^0099FFFound Items^000000: Orc Claw,Sticky Muscus"; + next; + mes "^FF0000[Orc Dungeon 1F Monster Encyclopedia]^000000"; + mes "4.Orc Skeleton"; + mes "Ancient Living Skeleton of the Orc which had been buried for a long time.It has Great Power as well as the period of being buried."; + mes "^0099FFFound Items^000000: Orc's Fang,Green Potion"; + next; + goto OrcDung; + close; + OrcDungF2: + mes "^FF0000[Orc Dungeon 2F Monster Encyclopedia]^000000"; + mes "1.Chonchon"; + mes "Flying monsters, they are not strong but make as annoying noises as Roda Frog. Make sure to eliminate them whenever you see."; + mes "^0099FFFound Items^000000: Shell,Jellopy,Fly Wing"; + next; + mes "^FF0000[Orc Dungeon 2F Monster Encyclopedia]^000000"; + mes "2.Familiar"; + mes "Bat of Violet Colour.Not that strong but really annoying because it attacks very fast and outregeously when somebody gets near it."; + mes "^0099FFFound Items^000000: Tooth of Bat,Fly Wing,Grape,Red Herb"; + next; + mes "^FF0000[Orc Dungeon 2F Monster Encyclopedia]^000000"; + mes "3.Orc Skeleton"; + mes "Ancient Living Skeleton of the Orc which had been buried for a long time.It has Great Power as well as the period of being buried."; + mes "^0099FFFound Items^000000: Orc's Fang,Green Potion"; + next; + mes "^FF0000[Orc Dungeon 2F Monster Encyclopedia]^000000"; + mes "4.Zenorc"; + mes "Mutent Orc with a small and short build.It moves around using both hands and feet. It owns High AGI stat,so that it passes off almost every attack."; + mes "^0099FFFound Items^000000: Znorc's Fang,Sticky Muscus,Yellow Potion"; + next; + goto OrcDung; + close; + EndOrcDung: + close; + close; + ByaCave: + menu "1F",ByaCaveF1,"2F",ByaCaveF2,"3F",ByaCaveF3,"4F",ByaCaveF4,"5F",ByaCaveF5,"Cancel",EndByaCave; + + ByaCaveF1: + mes "^FF0000[Byalan Cave 1F Monster Encyclopedia]^000000"; + mes "1.Plankton"; + mes "Even though looks like trifle creatures, they fly into a rage when stepped on. They are light, drifting on the water and attack with several projections."; + mes "^0099FFFound Items^000000: Single Cell.Garlet.Sticky Muscus.Empty Bottle"; + next; + mes "^FF0000[Byalan Cave 1F Monster Encyclopedia]^000000"; + mes "2.Kukre"; + mes "Look better than Thief Bugs but basically do the same thing. But luckily they don't attack players in a group."; + mes "^0099FFFound Items^000000: Worm Peeling.Garlet.Monster's Feed.Red Herb.Insect Feeler"; + next; + mes "^FF0000[Byalan Cave 1F Monster Encyclopedia]^000000"; + mes "3.Hydra"; + mes "Veggie Monsters which live near water or in the deep sea. Attack using tentacles. When run into them in a group, it will be the pain in the ass. It will be effective to kill one by one before they gather."; + mes "^0099FFFound Items^000000: Tentacle.Sticky Muscus.Meat"; + next; + mes "^FF0000[Byalan Cave 1F Monster Encyclopedia]^000000"; + mes "4.Vadon"; + mes "They wear thick shells all around the body and walk around tinkling nippers. Also their red color looks so tempting an appetite.Be careful anyway."; + mes "^0099FFFound Items^000000: Nipper.Garlet.Solid Shell.Shell"; + next; + mes "^FF0000[Byalan Cave 1F Monster Encyclopedia]^000000"; + mes "5.Marina"; + mes "Jelly Fishes of transparent white color. Do flexible attacks stretching its body as long as they can. They live in cool places near water."; + mes "^0099FFFound Items^000000: Single Cell.Sticky Muscus"; + next; + goto ByaCave; + close; + ByaCaveF2: + mes "^FF0000[Byalan Cave 2F Monster Encyclopedia]^000000"; + mes "1.Plankton"; + mes "Even though looks like trifle creatures, they fly into a rage when stepped on. They are light, drifting on the water and attack with several projections."; + mes "^0099FFFound Items^000000: Single Cell.Garlet.Sticky Muscus.Empty Bottle"; + next; + mes "^FF0000[Byalan Cave 2F Monster Encyclopedia]^000000"; + mes "2.Kukre"; + mes "Look better than Thief Bugs but basically do the same thing. But luckily they don't attack players in a group."; + mes "^0099FFFound Items^000000: Worm Peeling.Garlet.Monster's Feed.Red Herb.Insect Feeler"; + next; + mes "^FF0000[Byalan Cave 2F Monster Encyclopedia]^000000"; + mes "3.Hydra"; + mes "Veggie Monsters which live near water or in the deep sea. Attack using tentacles. When run into them in a group, it will be the pain in the ass. It will be effective to kill one by one before they gather."; + mes "^0099FFFound Items^000000: Tentacle.Sticky Muscus.Meat"; + next; + mes "^FF0000[Byalan Cave 2F Monster Encyclopedia]^000000"; + mes "4.Vadon"; + mes "They wear thick shells all around the body and walk around tinkling nippers. Also their red color looks so tempting an appetite.Be careful anyway."; + mes "^0099FFFound Items^000000: Nipper.Garlet.Solid Shell.Shell"; + next; + mes "^FF0000[Byalan Cave 2F Monster Encyclopedia]^000000"; + mes "5.Marina"; + mes "Jelly Fishes of transparent white color. Do flexible attacks stretching its body as long as they can. They live in cool places near water."; + mes "^0099FFFound Items^000000: Single Cell.Sticky Muscus"; + next; + mes "^FF0000[Byalan Cave 2F Monster Encyclopedia]^000000"; + mes "6.Thara Frog"; + mes "Frogs of red color, surely stronger than Roda Frogs. However there is obvious one thing in common about them, annoying croaking noise."; + mes "^0099FFFound Items^000000: Spawn,Scell,Sticky Webfoot"; + next; + goto ByaCave; + close; + ByaCaveF3: + mes "^FF0000[Byalan Cave 3F Monster Encyclopedia]^000000"; + mes "1.Hydra"; + mes "Veggie Monsters which live near water or in the deep sea. Attack using tentacles. When run into them in a group, it will be the pain in the ass. It will be effective to kill one by one before they gather."; + mes "^0099FFFound Items^000000: Tentacle.Sticky Muscus.Meat"; + next; + mes "^FF0000[Byalan Cave 3F Monster Encyclopedia]^000000"; + mes "2.Thara Frog"; + mes "Frogs of red color, surely stronger than Roda Frogs. However there is obvious one thing in common about them, annoying croaking noise."; + mes "^0099FFFound Items^000000: Spawn,Scell,Sticky Webfoot"; + next; + mes "^FF0000[Byalan Cave 3F Monster Encyclopedia]^000000"; + mes "3.Cornutus"; + mes "Some buddies concealing themselves within hard turban shells and try to lead a quiet life."; + mes "^0099FFFound Items^000000: Conch.Scell.Solid Shell"; + next; + mes "^FF0000[Byalan Cave 3F Monster Encyclopedia]^000000"; + mes "4.Mars"; + mes "Have many legs, flapping under the water. Do not rush to it because of its tempting look."; + mes "^0099FFFound Items^000000: Squid Ink,Tentacle"; + next; + mes "^FF0000[Byalan Cave 3F Monster Encyclopedia]^000000"; + mes "5.Obeaune"; + mes "Female Mermaid. Attacks using long hair, with a grim face."; + mes "^0099FFFound Items^000000: Heart of Mermaid,Fin"; + next; + goto ByaCave; + close; + ByaCaveF4: + mes "^FF0000[Byalan Cave 4F Monster Encyclopedia]^000000"; + mes "1.Hydra"; + mes "Veggie Monsters which live near water or in the deep sea. Attack using tentacles. When run into them in a group, it will be the pain in the ass. It will be effective to kill one by one before they gather."; + mes "^0099FFFound Items^000000: Tentacle.Sticky Muscus.Meat"; + next; + mes "^FF0000[Byalan Cave 4F Monster Encyclopedia]^000000"; + mes "2.Mars"; + mes "Have many legs, flapping under the water. Do not rush to it because of its tempting look."; + mes "^0099FFFound Items^000000: Squid Ink,Tentacle"; + next; + mes "^FF0000[Byalan Cave 4F Monster Encyclopedia]^000000"; + mes "3.Obeaune"; + mes "Female Mermaid. Attacks using long hair, with a grim face."; + mes "^0099FFFound Items^000000: Heart of Mermaid,Fin"; + next; + mes "^FF0000[Byalan Cave 4F Monster Encyclopedia]^000000"; + mes "4.Marine Sphere"; + mes "Strange, round-shaped monsters beating so fast that they seem like they will burst."; + mes "^0099FFFound Items^000000: Tendon.Detonator"; + next; + mes "^FF0000[Byalan Cave 4F Monster Encyclopedia]^000000"; + mes "5.Phen"; + mes "Fish of blue color which is kicking and definitely alive."; + mes "^0099FFFound Items^000000: Fish Tail,Sharp Scale,Meat,Fin"; + next; + mes "^FF0000[Byalan Cave 4F Monster Encyclopedia]^000000"; + mes "6.Sword Fish"; + mes "Fish Monster with a sharp, thin, and long nose. Goggle eyes are funny but it belongs to one of those dangerous monsters."; + mes "^0099FFFound Items^000000: Sharp Scale,Gill"; + next; + goto ByaCave; + close; + ByaCaveF5: + mes "^FF0000[Byalan Cave 5F Monster Encyclopedia]^000000"; + mes "1.Marine Sphere"; + mes "Strange, round-shaped monsters beating so fast that they seem like they will burst."; + mes "^0099FFFound Items^000000: Tendon.Detonator"; + next; + mes "^FF0000[Byalan Cave 5F Monster Encyclopedia]^000000"; + mes "2.Sword Fish"; + mes "Fish Monster with a sharp, thin, and long nose. Goggle eyes are funny but it belongs to one of those dangerous monsters."; + mes "^0099FFFound Items^000000: Sharp Scale,Gill"; + next; + mes "^FF0000[Byalan Cave 5F Monster Encyclopedia]^000000"; + mes "3.Mars"; + mes "Have many legs, flapping under the water. Do not rush to it because of its tempting look."; + mes "^0099FFFound Items^000000: Squid Ink,Tentacle"; + next; + mes "^FF0000[Byalan Cave 5F Monster Encyclopedia]^000000"; + mes "4.Obeaune"; + mes "Female Mermaid. Attacks using long hair, with a grim face."; + mes "^0099FFFound Items^000000: Heart of Mermaid,Fin"; + next; + mes "^FF0000[Byalan Cave 5F Monster Encyclopedia]^000000"; + mes "5.Marc"; + mes "Sea Horse. Don't ever think about riding a Sea Horse!"; + mes "^0099FFFound Items^000000: Gill,Fin"; + next; + mes "^FF0000[Byalan Cave 5F Monster Encyclopedia]^000000"; + mes "6.Strouf"; + mes "Fish rarely seen under the deep sea."; + mes "^0099FFFound Items^000000: Fin,Feather,Gill"; + next; + goto ByaCave; + close; + EndByaCave: + close; + close; + PrtCul: + menu "1F",PrtCulF1,"2F",PrtCulF2,"3F",PrtCulF3,"4F",PrtCulF4,"Cancel",EndPrtCul; + + PrtCulF1: + mes "^FF0000[Prontera Culvert 1F Monster Encyclopedia]^000000"; + mes "1.Thief Bug Egg"; + mes "Egg of Filthy Bug.Let's cut off the evil at its root."; + mes "^0099FFFound Items^000000: Chrysalis,Sticky Muscus"; + next; + mes "^FF0000[Prontera Culvert 1F Monster Encyclopedia]^000000"; + mes "2.Thief Bug Baby"; + mes "Dirty and filthy Creatures having a strong solidarity with the same kind, eat everything on the ground as well.They are sorted into 3 kinds by the Size and Colour."; + mes "^0099FFFound Items^000000: Worm Peeling,Red Herb,Jellopy"; + next; + mes "^FF0000[Prontera Culvert 1F Monster Encyclopedia]^000000"; + mes "3.Familiar"; + mes "Bat of Violet Colour.Not that strong but really annoying because it attacks very fast and outregeously when somebody gets near it."; + mes "^0099FFFound Items^000000: Tooth of Bat,Fly Wing,Grape,Red Herb"; + next; + mes "^FF0000[Prontera Culvert 1F Monster Encyclopedia]^000000"; + mes "4.Spore"; + mes "Mushroom-like monsters. Usually live in the Forest or Dungeons. By the way Don't try to eat it!"; + mes "^0099FFFound Items^000000: Spore,Red Herb,Blue Herb"; + next; + mes "^FF0000[Prontera Culvert 1F Monster Encyclopedia]^000000"; + mes "5.Tarou"; + mes "Little mouse of white colour. It is squicking very loudly in the Dead Pit or the Prontera Culvert."; + mes "^0099FFFound Items^000000: Rat Tail,Leather,Feather,Monster's Feed"; + next; + goto PrtCul; + close; + PrtCulF2: + mes "^FF0000[Prontera Culvert 2F Monster Encyclopedia]^000000"; + mes "1.Thief Bug Egg"; + mes "Egg of Filthy Bug.Let's cut off the evil at its root."; + mes "^0099FFFound Items^000000: Chrysalis,Sticky Muscus"; + next; + mes "^FF0000[Prontera Culvert 2F Monster Encyclopedia]^000000"; + mes "2.Thief Bug Baby"; + mes "Dirty and filthy Creatures having a strong solidarity with the same kind, eat everything on the ground as well.They are sorted into 3 kinds by the Size and Colour."; + mes "^0099FFFound Items^000000: Worm Peeling,Red Herb,Jellopy"; + next; + mes "^FF0000[Prontera Culvert 2F Monster Encyclopedia]^000000"; + mes "3.Familiar"; + mes "Bat of Violet Colour.Not that strong but really annoying because it attacks very fast and outregeously when somebody gets near it."; + mes "^0099FFFound Items^000000: Tooth of Bat,Fly Wing,Grape,Red Herb"; + next; + mes "^FF0000[Prontera Culvert 2F Monster Encyclopedia]^000000"; + mes "4.Spore"; + mes "Mushroom-like monsters. Usually live in the Forest or Dungeons. By the way Don't try to eat it!"; + mes "^0099FFFound Items^000000: Spore,Red Herb,Blue Herb"; + next; + mes "^FF0000[Prontera Culvert 2F Monster Encyclopedia]^000000"; + mes "5.Tarou"; + mes "Little mouse of white colour. It is squicking very loudly in the Dead Pit or the Prontera Culvert.."; + mes "^0099FFFound Items^000000: Rat Tail,Leather,Feather,Monster's Feed"; + next; + mes "^FF0000[Prontera Culvert 2F Monster Encyclopedia]^000000"; + mes "6.Plankton"; + mes "Even though looks like trifle creatures, they fly into a rage when stepped on. They are light, drifting on the water and attack with several projections."; + mes "^0099FFFound Items^000000: Single Cell.Garlet.Sticky Muscus.Empty Bottle"; + next; + mes "^FF0000[Prontera Culvert 2F Monster Encyclopedia]^000000"; + mes "7.Hydra"; + mes "Veggie Monsters which live near water or in the deep sea. Attack using tentacles. When run into them in a group, it will be the pain in the ass. It will be effective to kill one by one before they gather."; + mes "^0099FFFound Items^000000: Tentacle.Sticky Muscus.Meat"; + next; + mes "^FF0000[Prontera Culvert 2F Monster Encyclopedia]^000000"; + mes "8.Female Thief Bug"; + mes "Dirty and filthy Creatures having a strong solidarity with the same kind, eat everything on the ground as well.They are sorted into 3 kinds by the Size and Colour."; + mes "^0099FFFound Items^000000: Worm Peeling,Red Herb,Jellopy,Garlet.Insect Feeler"; + next; + goto PrtCul; + close; + PrtCulF3: + mes "^FF0000[Prontera Culvert 3F Monster Encyclopedia]^000000"; + mes "1.Thief Bug Egg"; + mes "Egg of Filthy Bug.Let's cut off the evil at its root."; + mes "^0099FFFound Items^000000: Chrysalis,Sticky Muscus"; + next; + mes "^FF0000[Prontera Culvert 3F Monster Encyclopedia]^000000"; + mes "2.Thief Bug Baby"; + mes "Dirty and filthy Creatures having a strong solidarity with the same kind, eat everything on the ground as well.They are sorted into 3 kinds by the Size and Colour."; + mes "^0099FFFound Items^000000: Worm Peeling,Red Herb,Jellopy"; + next; + mes "^FF0000[Prontera Culvert 3F Monster Encyclopedia]^000000"; + mes "3.Female Thief Bug"; + mes "Dirty and filthy Creatures having a strong solidarity with the same kind, eat everything on the ground as well.They are sorted into 3 kinds by the Size and Colour."; + mes "^0099FFFound Items^000000: Worm Peeling,Red Herb,Jellopy,Garlet.Insect Feeler"; + next; + mes "^FF0000[Prontera Culvert 3F Monster Encyclopedia]^000000"; + mes "4.Tarou"; + mes "Little mouse of white colour. It is squicking very loudly in the Dead Pit or the Prontera Culvert.."; + mes "^0099FFFound Items^000000: Rat Tail,Leather,Feather,Monster's Feed"; + next; + mes "^FF0000[Prontera Culvert 3F Monster Encyclopedia]^000000"; + mes "5.Familiar"; + mes "Bat of Violet Colour.Not that strong but really annoying because it attacks very fast and outregeously when somebody gets near it."; + mes "^0099FFFound Items^000000: Tooth of Bat,Fly Wing,Grape,Red Herb"; + next; + mes "^FF0000[Prontera Culvert 3F Monster Encyclopedia]^000000"; + mes "6.Poporing"; + mes "Poisonous Poring in light green.Every character is the same as poring,but much more stronger."; + mes "^0099FFFound Items^000000: Sticky Muscus,Garlet,Green Herb"; + next; + goto PrtCul; + close; + PrtCulF4: + mes "^FF0000[Prontera Culvert 4F Monster Encyclopedia]^000000"; + mes "1.Thief Bug Egg"; + mes "Egg of Filthy Bug.Let's cut off the evil at its root."; + mes "^0099FFFound Items^000000: Chrysalis,Sticky Muscus"; + next; + mes "^FF0000[Prontera Culvert 4F Monster Encyclopedia]^000000"; + mes "2.Thief Bug Baby"; + mes "Dirty and filthy Creatures having a strong solidarity with the same kind, eat everything on the ground as well.They are sorted into 3 kinds by the Size and Colour."; + mes "^0099FFFound Items^000000: Worm Peeling,Red Herb,Jellopy"; + next; + mes "^FF0000[Prontera Culvert 4F Monster Encyclopedia]^000000"; + mes "3.Female Thief Bug"; + mes "Dirty and filthy Creatures having a strong solidarity with the same kind, eat everything on the ground as well.They are sorted into 3 kinds by the Size and Colour."; + mes "^0099FFFound Items^000000: Worm Peeling,Red Herb,Jellopy,Garlet.Insect Feeler"; + next; + mes "^FF0000[Prontera Culvert 4F Monster Encyclopedia]^000000"; + mes "4.Male Thief Bug"; + mes "Dirty and filthy Creatures having a strong solidarity with the same kind, eat everything on the ground as well.They are sorted into 3 kinds by the Size and Colour."; + mes "^0099FFFound Items^000000: Worm Peeling,Red Herb,Jellopy,Garlet.Insect Feeler,Yellow Herb"; + next; + mes "^FF0000[Prontera Culvert 4F Monster Encyclopedia]^000000"; + mes "5.Golden Thief Bug"; + mes "Impertinent Thief Bug of Golden Colour,wearing a solid shell all around the body.It's rarely seen by human's eye."; + mes "^0099FFFound Items^000000: Blue Herb,Gold,Ora Ora,Insect Feeler"; + next; + goto PrtCul; + close; + EndPrtCul: + close; + close; + Cancel: + close; +} + +prt_in.gat,164,102,4 script Monster Encyclopedia 111,{ + mes "^FF0000[Dungeon Monster Encyclopedia]^000000"; + mes "The is an Encyclopedia describing Monsters living in Dungeons."; + next; + menu "Sunken ship near Alberta",SunkShip,"Prontera Maze",PrtMaze; + + SunkShip: + menu "F1",SunkShipF1,"F2",SunkShipF2,"Cancel",EndSunkShip; + + SunkShipF1: + mes "^FF0000[Sunken Ship 1F Monster Encyclopedia]^000000"; + mes "1. Plankton"; + mes "Even though looks like trifle creatures, they fly into a rage when stepped on. They are light, drifting on the water and attack with serveral projections."; + mes "^0099FFFound Items:^000000 Single Cell. Garlet. Sticky Mocus. Empty Bottle"; + next; + mes "^FF0000[Sunken Ship 1F Monster Encyclopedia]^000000"; + mes "2. Kukre"; + mes "Look better than Thief Bugs but basically do the same thing. But luckily they don't attack players in a group."; + mes "^0099FFFound Items:^000000 Worm Peeling. Garlet. Monster's Feed. Red Herb. Insect Feeler"; + next; + mes "^FF0000[Sunken Ship 1F Monster Encyclopedia]^000000"; + mes "3. Hydra"; + mes "Veggie Monsters which live near water or in the deep sea. Attack using tentacles. When run into them in a group, it will be in the ass. It will be effective to kill one by one before they gather."; + mes "^0099FFFound Items:^000000 Tentacles. Sticky Mocus. Meat"; + next; + mes "^FF0000[Sunken Ship 1F Monster Encyclopedia]^000000"; + mes "4. Poporing"; + mes "Poisonous Poring in light green. Every character is the same as poring, but much more stronger."; + mes "^0099FFFound Items:^000000 Skicky Mocus. Garlet. Green Herb"; + next; + mes "^FF0000[Sunken Ship 1F Monster Encyclopedia]^000000"; + mes "5. Poison Spore"; + mes "Poisonous Spore in Violet. Besides, it tends to attack haphazardly if anybody gets near."; + mes "^0099FFFound Items:^000000 Spore. Green Herb"; + next; + mes "^FF0000[Sunken Ship 1F Monster Encyclopedia]^000000"; + mes "6. Pirate Skel"; + mes "Walking Corpse of a Pirate which had ordered all over the Sea."; + mes "^0099FFFound Items:^000000 Skel-Bone"; + next; + goto SunkShip; + close; + SunkShipF2: + mes "^FF0000[Sunken Ship 2F Monster Encyclopedia]^000000"; + mes "1. Kukre"; + mes "Look better than Thief Bugs but basically do the same thing. But luckily they don't attack players in a group."; + mes "^0099FFFound Items:^000000 Worm Peeling. Garlet. Monster's Feed. Red Herb. Insect Feeler"; + next; + mes "^FF0000[Sunken Ship 2F Monster Encyclopedia]^000000"; + mes "2. Hydra"; + mes "Veggie Monsters which live near water or in the deep sea. Attack using tentacles. When run into them in a group, it will be in the ass. It will be effective to kill one by one before they gather."; + mes "^0099FFFound Items:^000000 Tentacles. Sticky Mocus. Meat"; + next; + mes "^FF0000[Sunken Ship 2F Monster Encyclopedia]^000000"; + mes "3. Poporing"; + mes "Poisonous Poring in light green. Every character is the same as poring, but much more stronger."; + mes "^0099FFFound Items:^000000 Skicky Mocus. Garlet. Green Herb"; + next; + mes "^FF0000[Sunken Ship 2F Monster Encyclopedia]^000000"; + mes "4. Thara Frogs"; + mes "Frogs of red color, surely stonger than Roda Frogs. However there is obvious one thing in common about them, annoying croaking noise."; + mes "^0099FFFound Items:^000000 Spawn. Scell. Skicky Webfoot"; + next; + mes "^FF0000[Sunken Ship 2F Monster Encyclopedia]^000000"; + mes "5. Whisper"; + mes "Living Fabric, which gives spooking feeling."; + mes "^0099FFFound Items:^000000 Fabric"; + next; + mes "^FF0000[Sunken Ship 2F Monster Encyclopedia]^000000"; + mes "6. Megalodon"; + mes "Skeleton Fish having spooky empty eye-holes."; + mes "^0099FFFound Items:^000000 Skinky Scale. Skel-Bone"; + next; + mes "^FF0000[Sunken Ship 2F Monster Encyclopedia]^000000"; + mes "7. Pirate Skel"; + mes "Walking Corpse of a Pirate which had ordered all over the Sea."; + mes "^0099FFFound Items:^000000 Skel-Bone"; + next; + mes "^FF0000[Sunken Ship 2F Monster Encyclopedia]^000000"; + mes "8. Marionette"; + mes "Monster reborn from bewitched Doll, bound to strings on Wooden Sticks."; + mes "^0099FFFound Items:^000000 Skinky Golden Hair, Trunk"; + next; + mes "9. Drake"; + mes "Awfully Strong Monster which looks like the Captain of this Sunken Ship."; + mes "^0099FFFound Items:^000000 Skel-Bone. White"; + next; + goto SunkShip; + close; + EndSunkShip: + close; + PrtMaze: + menu "F1",PrtMazeF1,"F3",PrtMazeF3,"Cancel",EndPrtMaze; + + PrtMazeF1: + mes "^FF0000[Prontera Maze 1F Monster Encyclopedia]^000000"; + mes "1. Poring"; + mes "Small and circular monsters of transparent pink color. Swallow anything on the ground with sparkling eyes, without any hesitations. No matter what kind of things dropped."; + mes "They tend to eat first. So be cautious when you put down drop something on the ground. But don't worry. They are not strong, and you will get your back once you kill the monster, which eat your stuff."; + mes "^0099FFFound Items:^000000 Jellopy. Skicky Mocus. Apple. Empty Bottle. Red Herb"; + next; + mes "^FF0000[Prontera Maze 1F Monster Encyclopedia]^000000"; + mes "2. Lunatic"; + mes "Plump and shaggy monster shaped in Rabbit. However it won't give you `Bunny Band'."; + mes "^0099FFFound Items:^000000 Clover. Feather. Carrot. Red Herb"; + next; + mes "^FF0000[Prontera Maze 1F Monster Encyclopedia]^000000"; + mes "3. Fabre"; + mes "Larva of Creamy. It is cute when it wiggles, even though it is a weak and small monster,"; + mes "People often tends to slay Fabres, only for the reason they can get `Feather's', one of required items for `Bunny Band'."; + mes "^0099FFFound Items:^000000 Fluff. Feather. Green Herb. Clover"; + next; + mes "^FF0000[Prontera Maze 1F Monster Encyclopedia]^000000"; + mes "4. Creamy"; + mes "Monster with Beautiful Wings. `Hah~ it's just a buttefly!'. Careless thinking like this will make you bleeding~! It is much stronger then you expect. Be careful!"; + mes "^0099FFFound Items:^000000 Powder of Butterfly. Honey. Butterfly Wing. Flower"; + next; + mes "^FF0000[Prontera Maze 1F Monster Encyclopedia]^000000"; + mes "5. Pupa"; + mes "Monster on the Fabre's pupal stage. It doesn't attack at all, so easy to kill for Novice people."; + mes "^0099FFFound Items:^000000 Chrysalis. Sticky Mocus"; + next; + mes "^FF0000[Prontera Maze 1F Monster Encyclopedia]^000000"; + mes "6. Poporing"; + mes "Poisonous Poring in light green. Every character is the same as poring, but much more stronger."; + mes "^0099FFFound Items:^000000 Skicky Mocus. Garlet. Green Herb"; + next; + mes "^FF0000[Prontera Maze 1F Monster Encyclopedia]^000000"; + mes "7. Rocker"; + mes "Lazy Grasshopper which loves playing Violin."; + mes "^0099FFFound Items:^000000 Grasshopper's Leg. Jellopy"; + next; + mes "^FF0000[Prontera Maze 1F Monster Encyclopedia]^000000"; + mes "8. Big Foot"; + mes "Dull-Looking Bear with a huge build. Although it looks dumb but you will realise how it can be fast after you provoke it."; + mes "^0099FFFound Items:^000000 Bear's Foot Skin. Leather. Sweet Potato"; + next; + mes "^FF0000[Prontera Maze 1F Monster Encyclopedia]^000000"; + mes "9. Smokie"; + mes "It's working out all the time. Often tries to shapeshift with Raccon Leaves, but always failed. Back then, it tended to gather stuffs diligently, now it seems to give up."; + mes "^0099FFFound Items:^000000 Raccon Leaf. Leather. Sweet Potato"; + next; + mes "10. Snake"; + mes "Green Coloured Snake living in the Forest or Desert. Not poisonous but be careful."; + mes "^0099FFFound Items:^000000 Snake Scale. Red Herb"; + next; + mes "^FF0000[Prontera Maze 1F Monster Encyclopedia]^000000"; + mes "11.Wolf"; + mes "Wanderers having Blue Manes.They are cooperative,so attack in a group when one got attacked.Let's just let them mind their business and watch."; + mes "^0099FFFound Items^000000: Wolf Claw,Meat,Monster's Feed,Leather"; + next; + mes "^FF0000[Prontera Maze 1F Monster Encyclopedia]^000000"; + mes "12.Argiope"; + mes "Monster crawling around with several articular legs."; + mes "^0099FFFound Items^000000: Bug Leg,Zargon,Green Herb"; + next; + mes "^FF0000[Prontera Maze 1F Monster Encyclopedia]^000000"; + mes "13.Argos"; + mes "Big Spider of Dark colour.It often invades people lost in the Maze."; + mes "^0099FFFound Items^000000: Cobweb,Scell,Bug Leg,Green Herb,Yellow Herb"; + next; + mes "^FF0000[Prontera Maze 1F Monster Encyclopedia]^000000"; + mes "14.Chonchon"; + mes "Flying monsters, they are not strong but make as annoying noises as Roda Frog. Make sure to eliminate them whenever you see."; + mes "^0099FFFound Items^000000: Shell,Jellopy,Fly Wing"; + next; + mes "^FF0000[Prontera Maze 1F Monster Encyclopedia]^000000"; + mes "15.Horn"; + mes "Compliant Insect unlike its offensive appearance.It's wandering about the field making some crunching sound."; + mes "^0099FFFound Items^000000: Horn,Shell,Solid Shell"; + next; + mes "^FF0000[Prontera Maze 1F Monster Encyclopedia]^000000"; + mes "16.Hunter Fly"; + mes "Winged insect of Blood. It is Strong meanwhile very annoying. Be advised, you'd better flee away if you can."; + mes "^0099FFFound Items^000000: Solid Shell,Zargon"; + next; + mes "^FF0000[Prontera Maze 1F Monster Encyclopedia]^000000"; + mes "17.Mantis"; + mes "It wanders about the field waving a tiny fan."; + mes "^0099FFFound Items^000000: Mantis Scythe,Scell,Solid Shell,Red Potion"; + next; + mes "^FF0000[Prontera Maze 1F Monster Encyclopedia]^000000"; + mes "18.Steiner"; + mes "Tiny little insect with a Splendid shell. Don't ever look down upon it. It is stronger than you expect. Besides it recognizes Magical Spell Casting."; + mes "^0099FFFound Items^000000: Rainbow Shell,Garlet,Shell,Solid Shell"; + next; + mes "^FF0000[Prontera Maze 1F Monster Encyclopedia]^000000"; + mes "19.Side Winder"; + mes "Horrendous Snake of Dark colour."; + mes "^0099FFFound Items^000000: Shining Scale,Zargon,Poisonous Canine,Snake Scale"; + next; + mes "^FF0000[Prontera Maze 1F Monster Encyclopedia]^000000"; + mes "20.Yoyo"; + mes "Pink coloured Monkey.Not only they pick up every stuff dropped on the gound outrageously, but they are nimble and cooperative,you must be cautious of being attacked by a group."; + mes "^0099FFFound Items^000000: Yoyo Tail,Banana,Yellow Herb,Leather"; + next; + mes "^FF0000[Prontera Maze 1F Monster Encyclopedia]^000000"; + mes "^FF0000[Earth,Small Monster Encyclopedia]^000000"; + mes "21.Caramel"; + mes "Cute porcupine with tiny spiky quills.But don't ever touch it without intention,it will get mad immeduately."; + mes "^0099FFFound Items^000000: Porcupine Quill,Leather"; + next; + mes "^FF0000[Prontera Maze 1F Monster Encyclopedia]^000000"; + mes "22.Steel Chonchon"; + mes "This is similar as Chonchon, but in yellow and green. Picks up every stuff on the ground. It is strong and well-cooperative with its fellows, so don't forget to get items before it picks up."; + mes "^0099FFFound Items^000000: Garlet,Shell,Solid Shell"; + next; + mes "^FF0000[Prontera Maze 1F Monster Encyclopedia]^000000"; + mes "23.Coco"; + mes "Little but fierce-looking eyed Creature carrying an Acorn on both hands. It is very unpleasant when it gives a dirty look,let's give it a lesson."; + mes "^0099FFFound Items^000000: Acorn,Fluff,Leather,Sweet Potato"; + next; + mes "^FF0000[Prontera Maze 1F Monster Encyclopedia]^000000"; + mes "24.Dustiness"; + mes "This monster owns high dodge rate because it is flying. Need to be attentive if you want to attack."; + mes "^0099FFFound Items^000000: Moth Dust,Moth Wing,Insect Feeler,Red Herb"; + next; + mes "^FF0000[Prontera Maze 1F Monster Encyclopedia]^000000"; + mes "25.Martin"; + mes "Funny looking Mole wearing a Safety Helmet on the head,which is always busy to walk around."; + mes "^0099FFFound Items^000000: Mole Whiskers,Mole Claw"; + next; + mes "^FF0000[Prontera Maze 1F Monster Encyclopedia]^000000"; + mes "26.Savage"; + mes "Wild Boar always walking around restlessly,making some noise. It has Big fangs and looks different from the young one."; + mes "^0099FFFound Items^000000: Mane,Leather"; + next; + goto PrtMaze; + close; + PrtMazeF3: + mes "^FF0000[Prontera Maze 3F Monster Encyclopedia]^000000"; + mes "1.Poring"; + mes "Small and circular monsters of transparent pink color. Swallow anything on the ground with sparkling eyes, without any hesitations. No matter what kind of things dropped,"; + mes "They tend to eat first. So be cautious when you put down drop something on the ground. But don't worry. They are not strong, and you will get yours back once you kill the monster, which eat your stuff."; + mes "^0099FFFound Items^000000: Jellopy.Sticky Muscus.Apple.Empty Bottle.Red Herb"; + next; + mes "^FF0000[Prontera Maze 3F Monster Encyclopedia]^000000"; + mes "2.Lunatic"; + mes "Plump and shaggy monster shaped in Rabbit.However it won't give you a `Bunny Band'."; + mes "^0099FFFound Items^000000: Clover,Feather,Carrot,Red Herb"; + next; + mes "^FF0000[Prontera Maze 3F Monster Encyclopedia]^000000"; + mes "3.Fabre"; + mes "Larva of Creamy. It is cute when it wiggles,even though it is a weak and small monster,"; + mes "People often tend to slay Fabres,only for the reason they can get `Feather's,one of required items for `Bunny Band'."; + mes "^0099FFFound Items^000000: Fluff.Feather.Green Herb.Clover"; + next; + mes "^FF0000[Prontera Maze 3F Monster Encyclopedia]^000000"; + mes "4.Creamy"; + mes "Monster with Beautiful Wings. `Hah~ it's just a butterfly!'. Careless thinking like this will make you bleeding~! It is much stronger than you expect. Be careful!"; + mes "^0099FFFound Items^000000: Powder of Butterfly,Honey,Butterfly Wing,Flower"; + next; + mes "^FF0000[Prontera Maze 3F Monster Encyclopedia]^000000"; + mes "5.Pupa"; + mes "Monster on the Fabre's pupal stage. It deosn't attack at all, so easy to kill for Novice people."; + mes "^0099FFFound Items^000000: Chrysalis,Sticky Muscus"; + next; + mes "^FF0000[Prontera Maze 3F Monster Encyclopedia]^000000"; + mes "6.Poporing"; + mes "Poisonous Poring in light green.Every character is the same as poring,but much more stronger."; + mes "^0099FFFound Items^000000: Sticky Muscus,Garlet,Green Herb"; + next; + mes "^FF0000[Prontera Maze 3F Monster Encyclopedia]^000000"; + mes "7.Rocker"; + mes "Lazy Grasshpper which loves playing Violin."; + mes "^0099FFFound Items^000000: Grasshopper's Leg,Jellopy"; + next; + mes "^FF0000[Prontera Maze 3F Monster Encyclopedia]^000000"; + mes "8.Big Foot"; + mes "Dull-Looking Bear with a huge build.Although it looks dumb but you will realise how it can be fast after you provoke it."; + mes "^0099FFFound Items^000000: Bear's Foot Skin,Leather,Sweet Potato"; + next; + mes "^FF0000[Prontera Maze 3F Monster Encyclopedia]^000000"; + mes "9.Smokie"; + mes "It's working out all the time.Often tries to shapeshift with Raccon Leaves,but always failed. Back then, it tended to gather stuffs diligently, now it seems to give up."; + mes "^0099FFFound Items^000000: Raccon Leaf,Leather,Sweet Potato"; + next; + mes "^FF0000[Prontera Maze 3F Monster Encyclopedia]^000000"; + mes "10.Snake"; + mes "Green Cloloured Snake living in the Forest or Desert.Not poisonous but be careful."; + mes "^0099FFFound Items^000000: Snake Scale,Red Herb"; + next; + mes "^FF0000[Prontera Maze 3F Monster Encyclopedia]^000000"; + mes "11.Wolf"; + mes "Wanderers having Blue Manes.They are cooperative,so attack in a group when one got attacked.Let's just let them mind their business and watch."; + mes "^0099FFFound Items^000000: Wolf Claw,Meat,Monster's Feed,Leather"; + next; + mes "^FF0000[Prontera Maze 3F Monster Encyclopedia]^000000"; + mes "12.Argiope"; + mes "Monster crawling around with several articular legs."; + mes "^0099FFFound Items^000000: Bug Leg,Zargon,Green Herb"; + next; + mes "^FF0000[Prontera Maze 3F Monster Encyclopedia]^000000"; + mes "13.Argos"; + mes "Big Spider of Dark colour.It often invades passangers."; + mes "^0099FFFound Items^000000: Cobweb,Scell,Bug Leg,Green Herb,Yellow Herb"; + next; + mes "^FF0000[Prontera Maze 3F Monster Encyclopedia]^000000"; + mes "14.Horn"; + mes "Compliant Insect unlike its offensive appearance.It's wandering about the field making some crunching sound."; + mes "^0099FFFound Items^000000: Horn,Shell,Solid Shell"; + next; + mes "^FF0000[Prontera Maze 3F Monster Encyclopedia]^000000"; + mes "15.Hunter Fly"; + mes "Winged insect of Blood. It is Strong meanwhile very annoying. Be advised, you'd better flee away if you can."; + mes "^0099FFFound Items^000000: Solid Shell,Zargon"; + next; + mes "^FF0000[Prontera Maze 3F Monster Encyclopedia]^000000"; + mes "16.Mantis"; + mes "It wanders about the field waving a tiny fan."; + mes "^0099FFFound Items^000000: Mantis Scythe,Scell,Solid Shell,Red Potion"; + next; + mes "^FF0000[Prontera Maze 3F Monster Encyclopedia]^000000"; + mes "17.Steiner"; + mes "Tiny little insect with a Splendid shell. Don't ever look down upon it. It is stronger than you expect. Besides it recognizes Magical Spell Casting."; + mes "^0099FFFound Items^000000: Rainbow Shell,Garlet,Shell,Solid Shell"; + next; + mes "^FF0000[Prontera Maze 3F Monster Encyclopedia]^000000"; + mes "18.Side Winder"; + mes "Horrendous Snake of Dark colour."; + mes "^0099FFFound Items^000000: Shining Scale,Zargon,Poisonous Canine,Snake Scale"; + next; + mes "^FF0000[Prontera Maze 3F Monster Encyclopedia]^000000"; + mes "19.Yoyo"; + mes "Pink coloured Monkey.Not only they pick up every stuff dropped on the gound outrageously, but they are nimble and cooperative,you must be cautious of being attacked by a group."; + mes "^0099FFFound Items^000000: Yoyo Tail,Banana,Yellow Herb,Leather"; + next; + mes "^FF0000[Prontera Maze 3F Monster Encyclopedia]^000000"; + mes "20.Caramel"; + mes "Cute porcupine with tiny spiky quills.But don't ever touch it without intention,it will get mad immeduately."; + mes "^0099FFFound Items^000000: Porcupine Quill,Leather"; + next; + mes "^FF0000[Prontera Maze 3F Monster Encyclopedia]^000000"; + mes "21.Steel Chonchon"; + mes "This is similar as Chonchon, but in yellow and green. Picks up every stuff on the ground. It is strong and well-cooperative with its fellows, so don't forget to get items before it picks up."; + mes "^0099FFFound Items^000000: Garlet,Shell,Solid Shell"; + next; + mes "^FF0000[Prontera Maze 3F Monster Encyclopedia]^000000"; + mes "22.Coco"; + mes "Little but fierce-looking eyed Creature carrying an Acorn on both hands. It is very unpleasant when it gives a dirty look,let's give it a lesson."; + mes "^0099FFFound Items^000000: Acorn,Fluff,Leather,Sweet Potato"; + next; + mes "^FF0000[Prontera Maze 3F Monster Encyclopedia]^000000"; + mes "23.Dustiness"; + mes "This monster owns high dodge rate because it is flying. Need to be attentive if you want to attack."; + mes "^0099FFFound Items^000000: Moth Dust,Moth Wing,Insect Feeler,Red Herb"; + next; + mes "^FF0000[Prontera Maze 3F Monster Encyclopedia]^000000"; + mes "24.Martin"; + mes "Funny looking Mole wearing a Safety Helmet on the head,which is always busy to walk around."; + mes "^0099FFFound Items^000000: Mole Whiskers,Mole Claw"; + next; + mes "^FF0000[Prontera Maze 3F Monster Encyclopedia]^000000"; + mes "25.Savage"; + mes "Wild Boar always walking around restlessly,making some noise. It has Big fangs and looks different from the young one."; + mes "^0099FFFound Items^000000: Mane,Leather"; + next; + mes "^FF0000[Prontera Maze 3F Monster Encyclopedia]^000000"; + mes "26.Savage Bebe"; + mes "Tiny Pink baby of Savage.Unlike its small size, It is running about fields making annoying noise"; + mes "^0099FFFound Items^000000: Leather,Meat,Arrow,Feather"; + next; + mes "^FF0000[Prontera Maze 3F Monster Encyclopedia]^000000"; + mes "27.Mastering"; + mes "Giant Poring rarely seen in the Morroc Desert,Mt.Mjornir or the Prontera Maze.It might be the leader of Porings.Surely stronger than normal Porings but, still it can't be more than a Poring anyway."; + mes "^0099FFFound Items^000000: Apple,Apple Juice"; + next; + mes "^FF0000[Prontera Maze 3F Monster Encyclopedia]^000000"; + mes "28.Eclipse"; + mes "Giant Lunatic which might be the Boss among Lunatics!It does weak attacks but is highly defensive at the same time."; + mes "^0099FFFound Items^000000: Carrot,Glass Bead,Milk,Carrot Juice"; + next; + mes "^FF0000[Prontera Maze 3F Monster Encyclopedia]^000000"; + mes "29.Baphomet"; + mes "Dreadful Monster having huge horns on the head.It uses a Gargantuan Scythe to slay foes,often attacks with bare hands."; + mes "^0099FFFound Items^000000: Evil Horn,Yggdrasilberry,Leather,Oridecon"; + next; + EndPrtMaze: + close; +} + +prt_in.gat,168,56,4 script Monster Encyclopedia 111,{ + mes "^FF0000[Monster Encyclopedia]^000000"; + mes "I am a Monster Encyclopedia, you can check several types of Monster with me."; + next; + menu "Monsters of Water Property",MonWatPro,"Monsters of Wind Property",MonWinPro,"Monsters of Spiritual Property",MonSpiPro,"Cancel",Cancel; + + MonWatPro: + menu "Small Size Monster",SmaMonWatPro,"Medium Size Monster",MidMonWatPro,"Great Size Monster",GrMonWatPro,"Cancel",EndWatPro; + + SmaMonWatPro: + mes "^FF0000[Water, Small Monster Encyclopedia]^000000"; + mes "1.Plankton"; + mes "Even though looks like trifle creatures, they fly into a rage when stepped on. They are light, drifting on the water and attack with several projections."; + mes "^0099FFFound Items^000000: Single Cell. Garlet. Sticky Muscus. Empty Bottle"; + next; + mes "^FF0000[Water, Small Monster Encyclopedia]^000000"; + mes "2.Kukre"; + mes "Look better than Thief Bugs but basically do the same thing. But luckily they don't attack players in a group."; + mes "^0099FFFound Items^000000: Worm Peeling. Garlet. Monster's Feed. Red Herb. Insect Feeler"; + next; + mes "^FF0000[Water, Small Monster Encyclopedia]^000000"; + mes "3.Hydra"; + mes "Veggie Monsters which live near water or in the deep sea. Attack using tentacles. When run into them in a group, it will be the pain in the ass."; + mes "It will be effective to kill one by one before they gather."; + mes "^0099FFFound Items^000000: Tentacle. Sticky Muscus. Meat"; + next; + mes "^FF0000[Water, Small Monster Encyclopedia]^000000"; + mes "4.Vadon"; + mes "They wear thick shells all around the body and walk around tinkling nippers. Also their red color looks so tempting an appetite. Be careful anyway."; + mes "^0099FFFound Items^000000: Nipper.Garlet.Solid Shell.Shell"; + next; + mes "^FF0000[Water, Small Monster Encyclopedia]^000000"; + mes "5.Marina"; + mes "Jelly Fishes of transparent white color. Do flexible attacks stretching its body as long as they can. They live in cool places near water."; + mes "^0099FFFound Items^000000: Single Cell.Sticky Muscus"; + next; + mes "^FF0000[Water, Small Monster Encyclopedia]^000000"; + mes "6.Cornutus"; + mes "Some buddies concealing themselves within hard turban shells and try to lead a quiet life."; + mes "^0099FFFound Items^000000: Conch. Scell. Solid Shell"; + next; + mes "^FF0000[Water, Small Monster Encyclopedia]^000000"; + mes "7.Magnolia"; + mes "Creatures shaped in Big Egg Frying Fans. They spank attackers with the Frying Fans without mercy."; + mes "Don't let your guard down just because they look cute. You will suffer if you do so."; + mes "^0099FFFound Items^000000: Jellopy. Garlet. Scell"; + next; + mes "^FF0000[Water, Small Monster Encyclopedia]^000000"; + mes "8.Marine Sphere"; + mes "Strange, round-shaped monsters beating so fast that they seem like they will burst."; + mes "^0099FFFound Items^000000: Tendon.Detonator"; + next; + goto MonWatPro; + close; + MidMonWatPro: + mes "^FF0000[Water,Medium Monster Encyclopedia]^000000"; + mes "1.Poring"; + mes "Small and circular monsters of transparent pink color. Swallow anything on the ground with sparkling eyes, without any hesitations. No matter what kind of things dropped,"; + mes "They tend to eat first. So be cautious when you put down drop something on the ground. But don't worry."; + mes "They are not strong, and you will get yours back once you kill the monster, which eat your stuff."; + mes "^0099FFFound Items^000000: Jellopy.Sticky Muscus.Apple.Empty Bottle.Red Herb"; + next; + mes "^FF0000[Water,Medium Monster Encyclopedia]^000000"; + mes "2.Roda Frog"; + mes "Usually they are hopping around, croaking very annoyingly. Let's stomp on them when found."; + mes "^0099FFFound Items^000000: Sticky Webfoot,Spawn,Green Herb,Empty Bottle"; + next; + mes "^FF0000[Water,Medium Monster Encyclopedia]^000000"; + mes "3.Spore"; + mes "Mushroom-like monsters. Usually live in the Forest or Dungeons. By the way Don't try to eat it!"; + mes "^0099FFFound Items^000000: Spore,Red Herb,Blue Herb"; + next; + mes "^FF0000[Water,Medium Monster Encyclopedia]^000000"; + mes "4.Goblin"; + mes "They are small and attack passengers using different kinds of mace. They always wear Masques, which frighten people more because we can't see what they might look like."; + mes "There are all 5 different types, and they seem to be brothers."; + mes "^0099FFFound Items^000000: Yellow Herb,Red Potion"; + next; + mes "^FF0000[Water,Medium Monster Encyclopedia]^000000"; + mes "5.Thara Frog"; + mes "Frogs of red color, surely stronger than Roda Frogs. However there is obvious one thing in common about them, annoying croaking noise."; + mes "^0099FFFound Items^000000: Spawn,Scell,Sticky Webfoot"; + next; + mes "^FF0000[Water,Medium Monster Encyclopedia]^000000"; + mes "6.Phen"; + mes "Fish of blue color which is kicking and definitely alive."; + mes "^0099FFFound Items^000000: Fish Tail,Sharp Scale,Meat,Fin"; + next; + mes "^FF0000[Water,Medium Monster Encyclopedia]^000000"; + mes "7.Mars"; + mes "Have many legs, flapping under the water. Do not rush to it because of its tempting look."; + mes "^0099FFFound Items^000000: Squid Ink,Tentacle"; + next; + mes "^FF0000[Water,Medium Monster Encyclopedia]^000000"; + mes "8.Obeaune"; + mes "Female Mermaid. Attacks using long hair, with a grim face."; + mes "^0099FFFound Items^000000: Heart of Mermaid,Fin"; + next; + mes "^FF0000[Water,Medium Monster Encyclopedia]^000000"; + mes "9. Sohee"; + mes "Female Ghost which holds grudge deep inside. She is always crying as waving long hair. But when running into the living, she suddenly changes her attitude fiercely."; + mes "^0099FFFound Items^000000: Black Hair,Red Potion"; + next; + mes "^FF0000[Water,Medium Monster Encyclopedia]^000000"; + mes "10.Marc"; + mes "Sea Horse. Don't ever think about riding a Sea Horse!"; + mes "^0099FFFound Items^000000: Gill,Fin"; + next; + mes "^FF0000[Water,Medium Monster Encyclopedia]^000000"; + mes "11.Deviace"; + mes "Fish monster with a big mouth possibly carrying something within. Small but Strong."; + mes "^0099FFFound Items^000000: Ancient Tooth,Ancient Lips"; + next; + goto MonWatPro; + close; + GrMonWatPro: + mes "^FF0000[Water,Great Monster Encyclopedia]^000000"; + mes "1.Ambernite"; + mes "Snail shaped monster, it is highly strong and defensive at the same time. Don't you worry though. It is too slow to catch you so that you can run away at ease any time."; + mes "^0099FFFound Items^000000: Snail's Shell,Garlet,Shell,Solid Shell"; + next; + mes "^FF0000[Water,Great Monster Encyclopedia]^000000"; + mes "2.Sword Fish"; + mes "Fish Monster with a sharp, thin, and long nose. Goggle eyes are funny but it belongs to one of those dangerous monsters."; + mes "^0099FFFound Items^000000: Sharp Scale,Gill"; + next; + goto MonWatPro; + close; + EndMonWatPro: + close; + close; + MonWinPro: + menu "Small Size Monster",SmaMonWinPro,"Medium Size Monster",MedMonWinPro,"Great Size Monster",GrMonWinPro,"Cancel",EndMonWinPro; + + SmaMonWinPro: + mes "^FF0000[Wind,Small Monster Encyclopedia]^000000"; + mes "1.Chonchon"; + mes "Flying monsters, they are not strong but make as annoying noises as Roda Frog. Make sure to eliminate them whenever you see."; + mes "^0099FFFound Items^000000: Shell,Jellopy,Fly Wing"; + next; + mes "^FF0000[Wind,Small Monster Encyclopedia]^000000"; + mes "2.Hornet"; + mes "Usually they are doing their duty but when get harmed, they will group themselves to attack the enemy without mercy!"; + mes "^0099FFFound Items^000000: Bee Sting,Jellopy,Green Herb"; + next; + mes "^FF0000[Wind,Small Monster Encyclopedia]^000000"; + mes "3.Creamy"; + mes "Monster with Beautiful Wings. `Hah~ it's just a butterfly!'. Careless thinking like this will make you bleeding~! It is much stronger than you expect. Be careful!"; + mes "^0099FFFound Items^000000: Powder of Butterfly,Honey,Butterfly Wing,Flower"; + next; + mes "^FF0000[Wind,Small Monster Encyclopedia]^000000"; + mes "4.Steiner"; + mes "Tiny little insect with a Splendid shell. Don't ever look down upon it. It is stronger than you expect. Besides it recognizes Magical Spell Casting."; + mes "^0099FFFound Items^000000: Rainbow Shell,Garlet,Shell,Solid Shell"; + next; + mes "^FF0000[Wind,Small Monster Encyclopedia]^000000"; + mes "5.Steel Chonchon"; + mes "This is similar as Chonchon, but in yellow and green. Picks up every stuff on the ground. It is strong and well-cooperative with its fellows, so don't forget to get items before it picks up."; + mes "^0099FFFound Items^000000: Garlet,Shell,Solid Shell"; + next; + mes "^FF0000[Wind,Small Monster Encyclopedia]^000000"; + mes "6.Dustiness"; + mes "This monster owns high dodge rate because it is flying. Need to be attentive if you want to attack."; + mes "^0099FFFound Items^000000: Moth Dust,Moth Wing,Insect Feeler,Red Herb"; + next; + mes "^FF0000[Wind,Small Monster Encyclopedia]^000000"; + mes "7.Hunter Fly"; + mes "Winged insect of Blood. It is Strong meanwhile very annoying. Be advised, you'd better flee away if you can."; + mes "^0099FFFound Items^000000: Solid Shell,Zargon"; + next; + goto MonWinPro; + close; + MedMonWinPro: + mes "^FF0000[Wind,Medium Monster Encyclopedia]^000000"; + mes "1.Condor"; + mes "Bald head eagle in funny feature. They tends to be gathered when one gets attacked. So don't look down upon them and think of `I will caress you!'"; + mes "^0099FFFound Items^000000: Talon,Arrow,Meat,Feather of Birds"; + next; + mes "^FF0000[Wind,Medium Monster Encyclopedia]^000000"; + mes "2.Cobold the 1st"; + mes "Small monster looks like a Wolf but it is smart enough to handle several tools. It is hostile and strong unlike its appearance. All Cobolds seem to be brothers."; + mes "^0099FFFound Items^000000: Blue Hair,Zargon,Orange Potion"; + next; + mes "^FF0000[Wind,Medium Monster Encyclopedia]^000000"; + mes "3.Petite"; + mes "Tiny Cute flying Dragon. It seems like there exists 2 different kinds of Petite, flying one and walking one and this is the 1st one."; + mes "^0099FFFound Items^000000: Dragon Canine,Dragon Tail,Zargon"; + next; + goto MonWinPro; + close; + GrMonWinPro: + mes "^FF0000[Wind,Great Monster Encyclopedia]^000000"; + mes "4.Joker"; + mes "A big Poker Card with Ugly looking girl printed on both side assaults you."; + mes "^0099FFFound Items^000000: High Heels"; + next; + goto MonWinPro; + close; + EndMonWinPro: + close; + close; + MonSpiPro: + menu "Small Size Monster",SmaMonSpiPro,"Medium Size Monster",MedMonSpiPro,"Great Size Monster",GrMonSpiPro,"Cancel",EndMonSpiPro; + + SmaMonSpiPro: + mes "^FF0000[Spiritual,Small Monster Encyclopedia]^000000"; + mes "1.Whisper"; + mes "Living Fabric, which gives spooky feeling."; + mes "^0099FFFound Items^000000: Fabric"; + next; + mes "^FF0000[Spiritual,Small Monster Encyclopedia]^000000"; + mes "2.Marionette"; + mes "Monster reborn from a bewitched Doll, bound to strings on Wooden Sticks."; + mes "^0099FFFound Items^000000: Golden Hair,Trunk"; + next; + goto MonSpiPro; + close; + MedMonSpiPro: + mes "^FF0000[Spiritual,Medium Monster Encyclopedia]^000000"; + mes "1.Eggyra"; + mes "Hovering here and there, while making a clattering sound. Tough-Looking Face scares people but it is not as strong as it looks."; + mes "^0099FFFound Items^000000: Scell,Sticky Muscus,Red Herb"; + next; + goto MonSpiPro; + close; + GrMonSpiPro: + mes "^FF0000[Spiritual,Great Monster Encyclopedia]^000000"; + mes "1.Nightmare"; + mes "Ghost Horse radiating an Aura of Violet all over the body."; + mes "^0099FFFound Items^000000: Horseshoe,Blue Herb"; + next; + mes "^FF0000[Spiritual,Great Monster Encyclopedia]^000000"; + mes "3.Medusa"; + mes "Each of her hairs is a snake. It has rumored to turn people into stone when their eyes happen to meet."; + mes "^0099FFFound Items^000000: Dead Medusa,Horrendous Hair,White Potion"; + next; + goto MonSpiPro; + close; + EndMonSpiPro: + close; + close; + Cancel: + close; +} + +prt_in.gat,168,68,4 script `Merchant Guideline' for Dummies 111,{ + mes "^FF0000[Blacksmith Guide for Dummies]^000000"; + mes "You can get the information about how to refine Ores and about Weapon Craft Skills."; + next; + menu "Ore Refining.",OreRef,"Weapon Craft.",WeaCra,"Cancel.",Cancel; + + OreRef: + mes "^FF0000[Ore Refining for Dummies]^000000"; + mes "Please go over the next page if you want to know how to refine Ores."; + next; + menu "Ok",OreRefOk,"Cancel",EndOreRef; + + OreRefOk: + mes "^FF0000[Ore Refining for Dummies]^000000"; + mes "Rough Ores like Iron Ore or Raw Materials for Enchanted Stones can be polished into High Quality Ones.For that, ^0099FFFurnace^000000 is needed."; + mes "One High Quality Ore needs several Rough Ones to be refined."; + next; + mes "^FF0000[Ore Refining for Dummies]^000000"; + mes "When enough items are gathered,Double Click `Furnace'.You can use a Furnace only one time for refining."; + next; + mes "^FF0000[Ore Refining for Dummies]^000000"; + mes "Possible ores you can refine will pop up on a new window.You can make Ore with a click the name of Ore you need."; + next; + mes "^FF0000[Ore Refining for Dummies]^000000"; + mes "However it has a possiblity to be failed."; + close; + EndOreRef: + close; + close; + WeaCra: + mes "^FF0000[Weapon Craft for Dummies]^000000"; + mes "Please go over the next page if you want to learn how to Smith Weapons."; + next; + menu "Ok",WeaCraOk,"Cancel",EndWeaCra; + + WeaCraOk: + mes "^FF0000[Weapon Craft for Dummies]^000000"; + mes "Learn a Skill from `Smith Sword,Two-Handed Sword,Spear,Mace,Brassknuckle' which allows you to make the pertinent weapon."; + next; + mes "^FF0000[Weapon Craft for Dummies]^000000"; + mes "Every Weapon needs ^0099FFSteel^000000 and ^0099FFHammer^000000.You can use a Hammer one time and it will be disapeared whenever used."; + next; + mes "^FF0000[Weapon Craft for Dummies]^000000"; + mes "When Double Click on a Hammer,a new window which lists of items you can make will pop up."; + mes "Clicking a Weapon on that list will show the required items and their numbers.But they will be exhausted automatically,so just know this."; + next; + mes "^FF0000[Weapon Craft for Dummies]^000000"; + mes "On that list window,there are 3 sockets which enable you to input some special items like Enchanted Stone or Star Crumb.These items amplify the weapon ability"; + next; + mes "^FF0000[Weapon Craft for Dummies]^000000"; + mes "And they have different possibility of Success by their characters."; + close; + EndWeaCra: + close; + close; + Cancel: + close; +} + +prt_in.gat,172,96,4 script Monster Encyclopedia 111,{ + mes "^FF0000[Dungeon Monster Encyclopedia]^000000"; + mes "This is an Encyclopedia describing monsters living in Dungeons."; + next; + menu "Ant Hell",AntHell,"Geffen Dungeon",GefDung,"Sphinx",Sphinx,"Cancel",Cancel; + + AntHell: + menu "1F",AntHellF1,"2F",AntHellF2,"Cancel",EndAntHell; + + AntHellF1: + mes "^FF0000[Ant Hell 1F Monster Encyclopedia]^000000"; + mes "1.Ant Egg"; + mes "Simple Ant Egg."; + mes "^0099FFFound Items^000000: Shell,Jellopy,Sticky Muscus,Empty Bottle"; + next; + mes "^FF0000[Ant Hell 1F Monster Encyclopedia]^000000"; + mes "2.Andre"; + mes "A kind of Worker Ants,they are very diligent in their work.They gather everything to save a sufficient stock and are well-cooperative,you need to be careful."; + mes "^0099FFFound Items^000000: Worm Peeling,Garlet,Sticky Muscus,Shell"; + next; + mes "^FF0000[Ant Hell 1F Monster Encyclopedia]^000000"; + mes "3.Piere"; + mes "A kind of Work Ants,seems to be very diligent.Its appearance is similar with other Ants,but you can easily distinguish them from others as they only gather in a same kind."; + mes "^0099FFFound Items^000000: Worm Peeling,Garlet,Sticky Muscus,Shell"; + next; + mes "^FF0000[Ant Hell 1F Monster Encyclopedia]^000000"; + mes "4.Deniro"; + mes "A kind of Work Ants, tend to group in a same kind as well as other ants."; + mes "^0099FFFound Items^000000: Worm Peeling,Garlet,Sticky Muscus,Shell"; + next; + mes "^FF0000[Ant Hell 1F Monster Encyclopedia]^000000"; + mes "5.Vitata"; + mes "Work Ants in charge of storing honey inside the body for emergency.It is a little pathetic to see their chubby tummy filled with Honey."; + mes "^0099FFFound Items^000000: Worm Peeling,Scell,Honey"; + next; + mes "^FF0000[Ant Hell 1F Monster Encyclopedia]^000000"; + mes "6.Giearth"; + mes "Little Grampa Pixie. Usually lives in Caves to gather Ores.Even though he is short, but actually an adult.Show your manners."; + mes "^0099FFFound Items^000000: Old Pixie's Moustache"; + next; + goto AntHell; + close; + AntHellF2: + mes "^FF0000[Ant Hell 2F Monster Encyclopedia]^000000"; + mes "1.Ant Egg"; + mes "Simple Ant Egg."; + mes "^0099FFFound Items^000000: Shell,Jellopy,Sticky Muscus,Empty Bottle"; + next; + mes "^FF0000[Ant Hell 2F Monster Encyclopedia]^000000"; + mes "2.Andre"; + mes "A kind of Worker Ants,they are very diligent in their work.They gather everything to save a sufficient stock and are well-cooperative,you need to be careful."; + mes "^0099FFFound Items^000000: Worm Peeling,Garlet,Sticky Muscus,Shell"; + next; + mes "^FF0000[Ant Hell 2F Monster Encyclopedia]^000000"; + mes "3.Piere"; + mes "A kind of Work Ants,seems to be very diligent.Its appearance is similar with other Ants,but you can easily distinguish them from others as they only gather in a same kind."; + mes "^0099FFFound Items^000000: Worm Peeling,Garlet,Sticky Muscus,Shell"; + next; + mes "^FF0000[Ant Hell 2F Monster Encyclopedia]^000000"; + mes "4.Deniro"; + mes "A kind of Work Ants, tend to group in a same kind as well as other ants"; + mes "^0099FFFound Items^000000: Worm Peeling,Garlet,Sticky Muscus,Shell"; + + next; + mes "^FF0000[Ant Hell 2F Monster Encyclopedia]^000000"; + mes "5.Vitata"; + mes "Work Ants in charge of storing honey inside the body for emergency.It is a little pathetic to see their chubby tummy filled with Honey."; + mes "^0099FFFound Items^000000: Worm Peeling,Scell,Honey"; + next; + mes "^FF0000[Ant Hell 2F Monster Encyclopedia]^000000"; + mes "6.Giearth"; + mes "Little Grampa Pixie. Usually lives in Caves to gather Ores.Even though he is short, but actually an adult.Show your manners."; + mes "^0099FFFound Items^000000: Old Pixie's Moustache"; + next; + mes "^FF0000[Ant Hell 2F Monster Encyclopedia]^000000"; + mes "7.Phreeoni"; + mes "Some bastard with a huge creepy tongue.Extremely strong Monster rarely seen around."; + mes "^0099FFFound Items^000000: Tongue,Ant Jaw"; + next; + goto AntHell; + close; + EndAntHell: + close; + close; + GefDung: + menu "1F",GefDungF1,"2F",GefDungF2,"3F",GefDungF3,"4F",GefDungF4,"Cancel",EndGefDung; + + GefDungF1: + mes "^FF0000[Geffen Dungeon 1F Monster Encyclopedia]^000000"; + mes "1.Familiar"; + mes "Bat of Violet Colour.Not that strong but really annoying because it attacks very fast and outregeously when somebody gets near it."; + mes "^0099FFFound Items^000000: Tooth of Bat,Fly Wing,Grape,Red Herb"; + next; + mes "^FF0000[Geffen Dungeon 1F Monster Encyclopedia]^000000"; + mes "2.Poporing"; + mes "Poisonous Poring in light green.Every character is the same as poring,but much more stronger."; + mes "^0099FFFound Items^000000: Sticky Muscus,Garlet,Green Herb"; + next; + mes "^FF0000[Geffen Dungeon 1F Monster Encyclopedia]^000000"; + mes "3.Dustiness"; + mes "This monster owns high dodge rate because it is flying. Need to be attentive if you want to attack."; + mes "^0099FFFound Items^000000: Moth Dust,Moth Wing,Insect Feeler,Red Herb"; + next; + mes "^FF0000[Geffen Dungeon 1F Monster Encyclopedia]^000000"; + mes "4.Poison Spore"; + mes "Poisonous Spore in Violet.Besides,it tends to attack haphazardly if anybody gets near."; + mes "^0099FFFound Items^000000: Spore,Green Herb"; + next; + goto GefDung; + close; + GefDungF2: + mes "^FF0000[Geffen Dungeon 2F Monster Encyclopedia]^000000"; + mes "1.Familiar"; + mes "Bat of Violet Colour.Not that strong but really annoying because it attacks very fast and outregeously when somebody gets near it."; + mes "^0099FFFound Items^000000: Tooth of Bat,Fly Wing,Grape,Red Herb"; + next; + mes "^FF0000[Geffen Dungeon 2F Monster Encyclopedia]^000000"; + mes "2.Dustiness"; + mes "This monster owns high dodge rate because it is flying. Need to be attentive if you want to attack."; + mes "^0099FFFound Items^000000: Moth Dust,Moth Wing,Insect Feeler,Red Herb"; + next; + mes "^FF0000[Geffen Dungeon 2F Monster Encyclopedia]^000000"; + mes "3.Poison Spore"; + mes "Poisonous Spore in Violet.Besides,it tends to attack haphazardly if anybody gets near."; + mes "^0099FFFound Items^000000: Spore,Green Herb"; + next; + mes "^FF0000[Geffen Dungeon 2F Monster Encyclopedia]^000000"; + mes "4.Argos"; + mes "Big Spider of Dark colour.It often invades passangers."; + mes "^0099FFFound Items^000000: Cobweb,Scell,Bug Leg,Green Herb,Yellow Herb"; + next; + mes "^FF0000[Geffen Dungeon 2F Monster Encyclopedia]^000000"; + mes "5.Whisper"; + mes "Living Fabric, which gives spooky feeling."; + mes "^0099FFFound Items^000000: Fabric"; + next; + mes "^FF0000[Geffen Dungeon 2F Monster Encyclopedia]^000000"; + mes "6.Jakk"; + mes "Quite Odd monster in a nice suit,but with a pumpkin head.It looks funny but changes the attitude fiercely when attacks someone."; + mes "^0099FFFound Items^000000: Jack'o'Pumpkin,Zargon"; + next; + goto GefDung; + close; + GefDungF3: + mes "^FF0000[Geffen Dungeon 3F Monster Encyclopedia]^000000"; + mes "1.Argos"; + mes "Big Spider of Dark colour.It often invades passangers."; + mes "^0099FFFound Items^000000: Cobweb,Scell,Bug Leg,Green Herb,Yellow Herb"; + next; + mes "^FF0000[Geffen Dungeon 3F Monster Encyclopedia]^000000"; + mes "2.Whisper"; + mes "Living Fabric, which gives spooky feeling."; + mes "^0099FFFound Items^000000: Fabric"; + next; + mes "^FF0000[Geffen Dungeon 3F Monster Encyclopedia]^000000"; + mes "3.Jakk"; + mes "Quite Odd monster in a nice suit,but with a pumpkin head.It looks funny but changes the attitude fiercely when attacks someone."; + mes "^0099FFFound Items^000000: Jack'o'Pumpkin,Zargon"; + next; + mes "^FF0000[Geffen Dungeon 3F Monster Encyclopedia]^000000"; + mes "4.Myst"; + mes "Mist-like Monster."; + mes "^0099FFFound Items^000000: Trunk.Gas Mask"; + next; + mes "^FF0000[Geffen Dungeon 3F Monster Encyclopedia]^000000"; + mes "5.Marionette"; + mes "Monster reborn from a bewitched Doll, bound to strings on Wooden Sticks."; + mes "^0099FFFound Items^000000: Golden Hair,Trunk"; + next; + mes "^FF0000[Geffen Dungeon 3F Monster Encyclopedia]^000000"; + mes "6.Bathory"; + mes "Witch with a big wen on the nose.She rides on her magic broom flying around in the air.."; + mes "^0099FFFound Items^000000: Witched Starsand"; + next; + mes "^FF0000[Geffen Dungeon 3F Monster Encyclopedia]^000000"; + mes "7.Nightmare"; + mes "Ghost Horse radiating an Aura of Violet all over the body."; + mes "^0099FFFound Items^000000: Horseshoe,Blue Herb"; + next; + goto GefDung; + close; + GefDungF4: + mes "^FF0000[Geffen Dungeon 4F Monster Encyclopedia]^000000"; + mes "1.Myst"; + mes "Mist-like Monster."; + mes "^0099FFFound Items^000000: Trunk.Gas Mask"; + next; + mes "^FF0000[Geffen Dungeon 4F Monster Encyclopedia]^000000"; + mes "2.Deviruchi"; + mes "Little evil creature,which carries a cute fork with."; + mes "^0099FFFound Items^000000: Little Evil Horn,Little Evil Wing,Zargon"; + next; + mes "^FF0000[Geffen Dungeon 4F Monster Encyclopedia]^000000"; + mes "3.Raydric"; + mes "Ghost Knight of misfortune."; + mes "^0099FFFound Items^000000: Elunium,Chivarly Emblem"; + next; + mes "^FF0000[Geffen Dungeon 4F Monster Encyclopedia]^000000"; + mes "4.Joker"; + mes "A big Poker Card with Ugly looking girl printed on both side assaults you."; + mes "^0099FFFound Items^000000: High Heels"; + next; + mes "^FF0000[Geffen Dungeon 4F Monster Encyclopedia]^000000"; + mes "5.Doppelganger"; + mes "A ghostly double of a swordman,Spooky and Powerful."; + mes "^0099FFFound Items^000000: Spiky Band,Blue Potion,Cursed Ruby,Ruby"; + next; + goto GefDung; + close; + EndGefDung: + close; + close; + Sphinx: + menu "1F",SphinxF1,"2F",SphinxF2,"3F",SphinxF3,"4F",SphinxF4,"5F",SphinxF5,"Cancel",EndSphinx; + + SphinxF1: + mes "^FF0000[Sphinx 1F Monster Encyclopedia]^000000"; + mes "1.Familiar"; + mes "Bat of Violet Colour.Not that strong but really annoying because it attacks very fast and outregeously when somebody gets near it."; + mes "^0099FFFound Items^000000: Tooth of Bat,Fly Wing,Grape,Red Herb"; + next; + mes "^FF0000[Sphinx 1F Monster Encyclopedia]^000000"; + mes "2.Snake"; + mes "Green Cloloured Snake living in the Forest or Desert.Not poisonous but be careful."; + mes "^0099FFFound Items^000000: Snake Scale,Red Herb"; + next; + mes "^FF0000[Sphinx 1F Monster Encyclopedia]^000000"; + mes "3.Zerom"; + mes "Undead Slave who had been extremely abused before he died.He is wandering in the Sphinx,carrying a big box on the back.."; + mes "^0099FFFound Items^000000: Panties"; + next; + mes "^FF0000[Sphinx 1F Monster Encyclopedia]^000000"; + mes "4.Matyr"; + mes "Creature shaped in Black Dog."; + mes "^0099FFFound Items^000000: Monster's Feed,Leather"; + next; + mes "^FF0000[Sphinx 1F Monster Encyclopedia]^000000"; + mes "5.Requiem"; + mes "It seems like an Ancient Slave,carrying a heavy Coffin on the back."; + mes "^0099FFFound Items^000000: Mystic Blue Box"; + next; + goto Sphinx; + close; + SphinxF2: + mes "^FF0000[Sphinx 2F Monster Encyclopedia]^000000"; + mes "1.Familiar"; + mes "Bat of Violet Colour.Not that strong but really annoying because it attacks very fast and outregeously when somebody gets near it."; + mes "^0099FFFound Items^000000: Tooth of Bat,Fly Wing,Grape,Red Herb"; + next; + mes "^FF0000[Sphinx 2F Monster Encyclopedia]^000000"; + mes "2.Matyr"; + mes "Creature shaped in Black Dog."; + mes "^0099FFFound Items^000000: Monster's Feed,Leather"; + next; + mes "^FF0000[Sphinx 2F Monster Encyclopedia]^000000"; + mes "3.Requiem"; + mes "It seems like an Ancient Slave,carrying a heavy Coffin on the back."; + mes "^0099FFFound Items^000000: Mystic Blue Box"; + next; + mes "^FF0000[Sphinx 2F Monster Encyclopedia]^000000"; + mes "4.Whisper"; + mes "Living Fabric, which gives spooky feeling."; + mes "^0099FFFound Items^000000: Fabric"; + next; + goto Sphinx; + close; + SphinxF3: + mes "^FF0000[Sphinx 3F Monster Encyclopedia]^000000"; + mes "1.Matyr"; + mes "Creature shaped in Black Dog."; + mes "^0099FFFound Items^000000: Monster's Feed,Leather"; + next; + mes "^FF0000[Sphinx 3F Monster Encyclopedia]^000000"; + mes "2.Whisper"; + mes "Living Fabric, which gives spooky feeling."; + mes "^0099FFFound Items^000000: Fabric"; + next; + mes "^FF0000[Sphinx 3F Monster Encyclopedia]^000000"; + mes "3.Marduk"; + mes "Unknown monster wearing Catholic uniform and looking serious."; + mes "^0099FFFound Items^000000: Flame Heart"; + next; + goto Sphinx; + SphinxF4: + mes "^FF0000[Sphinx 4F Monster Encyclopedia]^000000"; + mes "1.Whisper"; + mes "Living Fabric, which gives spooky feeling."; + mes "^0099FFFound Items^000000: Fabric"; + next; + mes "^FF0000[Sphinx 4F Monster Encyclopedia]^000000"; + mes "2.Marduk"; + mes "Unknown monster wearing Catholic uniform and looking serious."; + mes "^0099FFFound Items^000000: Flame Heart"; + next; + mes "^FF0000[Sphinx 4F Monster Encyclopedia]^000000"; + mes "3.Medusa"; + mes "Each of her hairs is a snake. It has rumored to turn people into stone when their eyes happen to meet."; + mes "^0099FFFound Items^000000: Dead Medusa,Horrendous Snake,White Potion"; + next; + goto Sphinx; + close; + SphinxF5: + mes "^FF0000[Sphinx 5F Monster Encyclopedia]^000000"; + mes "1.Whisper"; + mes "Living Fabric, which gives spooky feeling."; + mes "^0099FFFound Items^000000: Fabric"; + next; + mes "^FF0000[Sphinx 5F Monster Encyclopedia]^000000"; + mes "2.Marduk"; + mes "Unknown monster wearing Catholic uniform and looking serious."; + mes "^0099FFFound Items^000000: Flame Heart"; + next; + mes "^FF0000[Sphinx 5F Monster Encyclopedia]^000000"; + mes "3.Medusa"; + mes "Each of her hairs is a snake. It has rumored to turn people into stone when their eyes happen to meet."; + mes "^0099FFFound Items^000000: Dead Medusa,Horrendous Snake,White Potion"; + next; + goto Sphinx; + close; + EndSphinx: + close; + close; + Cancel: + close; +} + +prt_in.gat,172,102,4 script Monster Encyclopedia 111,{ + mes "^FF0000[Dungeon Monster Encyclopedia]^000000"; + mes "The is an Encyclopedia describing Monsters living in Dungeons."; + next; + menu "Mjornir Dead Pit",MjrDeadPit,"Payon Cave",PayCave,"Pyramid",Pyramid; + + MjrDeadPit: + menu "F1",MjrDeadPitF1,"F2",MjrDeadPitF2,"F3",MjrDeadPitF3,"Cancel",EndMjrDeadPit; + + MjrDeadPitF1: + mes "^FF0000[Dead Pit 1F Monster Encyclopedia]^000000"; + mes "1.Familiar"; + mes "Bat of Violet Colour.Not that strong but really annoying because it attacks very fast and outregeously when somebody gets near it."; + mes "^0099FFFound Items^000000: Tooth of Bat,Fly Wing,Grape,Red Herb"; + next; + mes "^FF0000[Dead Pit 1F Monster Encyclopedia]^000000"; + mes "2.Tarou"; + mes "Little mouse of white colour. It is squicking very loudly in the Dead Pit or the Prontera Culvert.."; + mes "^0099FFFound Items^000000: Rat Tail,Leather,Feather,Monster's Feed"; + next; + mes "^FF0000[Dead Pit 1F Monster Encyclopedia]^000000"; + mes "3.Martin"; + mes "Funny looking Mole wearing a Safety Helmet on the head,which is always busy to walk around."; + mes "^0099FFFound Items^000000: Mole Whiskers,Mole Claw"; + next; + mes "^FF0000[Dead Pit 1F Monster Encyclopedia]^000000"; + mes "4.Drainliar"; + mes "Freaking Bloody bat with a might."; + mes "^0099FFFound Items^000000: Tooth of Bat,Red Herb"; + next; + goto MjrDeadPit; + close; + MjrDeadPitF2: + mes "^FF0000[Dead Pit 2F Monster Encyclopedia]^000000"; + mes "1.Martin"; + mes "Funny looking Mole wearing a Safety Helmet on the head,which is always busy to walk around."; + mes "^0099FFFound Items^000000: Mole Whiskers,Mole Claw"; + next; + mes "^FF0000[Dead Pit 2F Monster Encyclopedia]^000000"; + mes "2.Drainliar"; + mes "Freaking Bloody bat with a might."; + mes "^0099FFFound Items^000000: Tooth of Bat,Red Herb"; + next; + mes "^FF0000[Dead Pit 2F Monster Encyclopedia]^000000"; + mes "3.Skel Worker"; + mes "Walking Skeletion which was dead in a mine."; + mes "^0099FFFound Items^000000: Iron,Lantern"; + next; + mes "^FF0000[Dead Pit 2F Monster Encyclopedia]^000000"; + mes "4.Myst"; + mes "Mist-like Monster."; + mes "^0099FFFound Items^000000: Trunk.Gas Mask"; + next; + goto MjrDeadPit; + close; + MjrDeadPitF3: + mes "^FF0000[Dead Pit 3F Monster Encyclopedia]^000000"; + mes "1.Skel Worker"; + mes "Walking Skeletion which was dead in a mine."; + mes "^0099FFFound Items^000000: Iron,Lantern"; + next; + mes "^FF0000[Dead Pit 3F Monster Encyclopedia]^000000"; + mes "2.Myst"; + mes "Mist-like Monster."; + mes "^0099FFFound Items^000000: Trunk.Gas Mask"; + next; + mes "^FF0000[Dead Pit 3F Monster Encyclopedia]^000000"; + mes "3.Evil Druid"; + mes "You'll shudder even once looking at it."; + mes "^0099FFFound Items^000000: Amulet,White Herb"; + next; + goto MjrDeadPit; + close; + EndMjrDeadPit: + close; + close; + PayCave: + menu "1F",PayCaveF1,"2F",PayCaveF2,"3F",PayCaveF3,"4F",PayCaveF4,"5F",PayCaveF5,"Cancel",EndPayCave; + + PayCaveF1: + mes "^FF0000[Payon Cave 1F Monster Encyclopedia]^000000"; + mes "1.Familiar"; + mes "Bat of Violet Colour.Not that strong but really annoying because it attacks very fast and outregeously when somebody gets near it."; + mes "^0099FFFound Items^000000: Tooth of Bat,Fly Wing,Grape,Red Herb"; + next; + mes "^FF0000[Payon Cave 1F Monster Encyclopedia]^000000"; + mes "2.Spore"; + mes "Mushroom-like monsters. Usually live in the Forest or Dungeons. By the way Don't try to eat it!"; + mes "^0099FFFound Items^000000: Spore,Red Herb,Blue Herb"; + next; + mes "^FF0000[Payon Cave 1F Monster Encyclopedia]^000000"; + mes "3.Zombie"; + mes "Bad Case of the Dead which has been reborn as a Walking Corpse by Back magic.Let's lead it to Nirvana."; + mes "^0099FFFound Items^000000: Decayed Nail,Sticky Muscus,Horrendous Mouth"; + next; + goto PayCave; + close; + PayCaveF2: + mes "^FF0000[Payon Cave 2F Monster Encyclopedia]^000000"; + mes "1.Familiar"; + mes "Bat of Violet Colour.Not that strong but really annoying because it attacks very fast and outregeously when somebody gets near it."; + mes "^0099FFFound Items^000000: Tooth of Bat,Fly Wing,Grape,Red Herb"; + next; + mes "^FF0000[Payon Cave 2F Monster Encyclopedia]^000000"; + mes "2.Eggyra"; + mes "Hovering here and there, while making a clattering sound. Tough-Looking Face scares people but it is not as strong as it looks."; + mes "^0099FFFound Items^000000: Scell,Sticky Muscus,Red Herb"; + next; + mes "^FF0000[Payon Cave 2F Monster Encyclopedia]^000000"; + mes "3.Magnolia"; + mes "Creatures shaped in Big Egg Frying Fans. They spank attackers with the Frying Fans without mercy. Don't let your guard down just because they look cute. You will suffer if you do so."; + mes "^0099FFFound Items^000000: Jellopy.Garlet.Scell"; + next; + mes "^FF0000[Payon Cave 2F Monster Encyclopedia]^000000"; + mes "4.Soldier Skeleton"; + mes "Skeleton holding 2 swords on both grips,attacks fast.One of the dangerous monsters in the Cave."; + mes "^0099FFFound Items^000000: Skel-Bone,Red Potion"; + next; + goto PayCave; + close; + PayCaveF3: + mes "^FF0000[Payon Cave 3F Monster Encyclopedia]^000000"; + mes "1.Familiar"; + mes "Bat of Violet Colour.Not that strong but really annoying because it attacks very fast and outregeously when somebody gets near it."; + mes "^0099FFFound Items^000000: Tooth of Bat,Fly Wing,Grape,Red Herb"; + next; + mes "^FF0000[Payon Cave 3F Monster Encyclopedia]^000000"; + mes "2.Soldier Skeleton"; + mes "Skeleton holding 2 swords on both grips,attacks fast.One of the dangerous monsters in the Cave."; + mes "^0099FFFound Items^000000: Skel-Bone,Red Potion"; + next; + mes "^FF0000[Payon Cave 3F Monster Encyclopedia]^000000"; + mes "3.Munak"; + mes "Pretty-looking Female corpse which had been frozen for a long time.She looks like holding a long story deep inside, the story people want to know about.Anyway Don't give her a break,she'll give strong damages on you."; + mes "^0099FFFound Items^000000: Daenggie ,Munak Turban"; + next; + mes "^FF0000[Payon Cave 3F Monster Encyclopedia]^000000"; + mes "4.Archer Skeleton"; + mes "It seems to be an expert of bow when it was alive.It'll come to attack in no time when somebody gets inside of its range."; + mes "^0099FFFound Items^000000: Skel-Bone,Fire Arrow,Red Potion"; + next; + goto PayCave; + close; + PayCaveF4: + mes "^FF0000[Payon Cave 4F Monster Encyclopedia]^000000"; + mes "1.Soldier Skeleton"; + mes "Skeleton holding 2 swords on both grips,attacks fast.One of the dangerous monsters in the Cave."; + mes "^0099FFFound Items^000000: Skel-Bone,Red Potion"; + next; + mes "^FF0000[Payon Cave 4F Monster Encyclopedia]^000000"; + mes "2.Archer Skeleton"; + mes "It seems to be an expert of bow when it was alive.It'll come to attack in no time when somebody gets inside of its range."; + mes "^0099FFFound Items^000000: Skel-Bone,Fire Arrow,Red Potion"; + next; + mes "^FF0000[Payon Cave 4F Monster Encyclopedia]^000000"; + mes "3.Sohee"; + mes "Female Ghost which holds grudge deep inside. She is always crying as waving long hair. But when running into the living, she suddenly changes her attitude fiercely."; + mes "^0099FFFound Items^000000: Black Hair,Red Potion"; + next; + mes "^FF0000[Payon Cave 4F Monster Encyclopedia]^000000"; + mes "4.Horong"; + mes "Eerie-looking fireball of violet colour.Recognises the living when gets near."; + mes "^0099FFFound Items^000000: Stone Heart,Zargon,Fire Arrow"; + next; + goto PayCave; + close; + PayCaveF5: + mes "^FF0000[Payon Cave 5F Monster Encyclopedia]^000000"; + mes "1.Soldier Skeleton"; + mes "Skeleton holding 2 swords on both grips,attacks fast.One of the dangerous monsters in the Cave."; + mes "^0099FFFound Items^000000: Skel-Bone,Red Potion"; + next; + mes "^FF0000[Payon Cave 5F Monster Encyclopedia]^000000"; + mes "2.Archer Skeleton"; + mes "It seems to be an expert of bow when it was alive.It'll come to attack in no time when somebody gets inside of its range."; + mes "^0099FFFound Items^000000: Skel-Bone,Fire Arrow,Red Potion"; + next; + mes "^FF0000[Payon Cave 5F Monster Encyclopedia]^000000"; + mes "3.Sohee"; + mes "Female Ghost which holds grudge deep inside. She is always crying as waving long hair. But when running into the living, she suddenly changes her attitude fiercely."; + mes "^0099FFFound Items^000000: Black Hair,Red Potion"; + next; + mes "^FF0000[Payon Cave 5F Monster Encyclopedia]^000000"; + mes "4.Horong"; + mes "Eerie-looking fireball of violet colour.Recognises the living when gets near."; + mes "^0099FFFound Items^000000: Stone Heart,Zargon,Fire Arrow"; + next; + mes "^FF0000[Payon Cave 5F Monster Encyclopedia]^000000"; + mes "5.Moonlight"; + mes "Wild Girl having 9 tails of a Fox, and with a Big Bell on the back."; + mes "^0099FFFound Items^000000: 9 Tails,White Potion,Topaz,Elunium"; + next; + goto PayCave; + close; + EndPayCave: + close; + close; + Pyramid: + menu "1F",PyramidF1,"2F",PyramidF2,"3F",PyramidF3,"4F",PyramidF4,"5F",PyramidF5,"6F",PyramidF6,"Cancel",EndPyramid; + + PyramidF1: + mes "^FF0000[Pyramid 1F Monster Encyclopedia]^000000"; + mes "1.Familiar"; + mes "Bat of Violet Colour.Not that strong but really annoying because it attacks very fast and outregeously when somebody gets near it."; + mes "^0099FFFound Items^000000: Tooth of Bat,Fly Wing,Grape,Red Herb"; + next; + mes "^FF0000[Pyramid 1F Monster Encyclopedia]^000000"; + mes "2.Spore"; + mes "Mushroom-like monsters. Usually live in the Forest or Dungeons. By the way Don't try to eat it!"; + mes "^0099FFFound Items^000000: Spore,Red Herb,Blue Herb"; + next; + mes "^FF0000[Pyramid 1F Monster Encyclopedia]^000000"; + mes "3.Poporing"; + mes "Poisonous Poring in light green.Every character is the same as poring,but much more stronger."; + mes "^0099FFFound Items^000000: Sticky Muscus,Garlet,Green Herb"; + next; + goto Pyramid; + close; + PyramidF2: + mes "^FF0000[Pyramid 2F Monster Encyclopedia]^000000"; + mes "1.Poporing"; + mes "Poisonous Poring in light green.Every character is the same as poring,but much more stronger."; + mes "^0099FFFound Items^000000: Sticky Muscus,Garlet,Green Herb"; + next; + mes "^FF0000[Pyramid 2F Monster Encyclopedia]^000000"; + mes "2.Drainliar"; + mes "Freaking Bloody bat with a might."; + mes "^0099FFFound Items^000000: Tooth of Bat,Red Herb"; + + next; + mes "^FF0000[Pyramid 2F Monster Encyclopedia]^000000"; + mes "3.Soldier Skeleton"; + mes "Skeleton holding 2 swords on both grips,attacks fast.One of the dangerous monsters in the Cave."; + mes "^0099FFFound Items^000000: Skel-Bone,Red Potion"; + next; + mes "^FF0000[Pyramid 2F Monster Encyclopedia]^000000"; + mes "4.Archer Skeleton"; + mes "It seems to be an expert of bow when it was alive.It'll come to attack in no time when somebody gets inside of its range."; + mes "^0099FFFound Items^000000: Skel-Bone,Fire Arrow,Red Potion"; + next; + goto Pyramid; + close; + PyramidF3: + mes "^FF0000[Pyramid 3F Monster Encyclopedia]^000000"; + mes "1.Drainliar"; + mes "Freaking Bloody bat with a might."; + mes "^0099FFFound Items^000000: Tooth of Bat,Red Herb"; + next; + mes "^FF0000[Pyramid 3F Monster Encyclopedia]^000000"; + mes "2.Soldier Skeleton"; + mes "Skeleton holding 2 swords on both grips,attacks fast.One of the dangerous monsters in the Cave."; + mes "^0099FFFound Items^000000: Skel-Bone,Red Potion"; + next; + mes "^FF0000[Pyramid 3F Monster Encyclopedia]^000000"; + mes "3.Archer Skeleton"; + mes "It seems to be an expert of bow when it was alive.It'll come to attack in no time when somebody gets inside of its range."; + mes "^0099FFFound Items^000000: Skel-Bone,Fire Arrow,Red Potion"; + next; + mes "^FF0000[Pyramid 3F Monster Encyclopedia]^000000"; + mes "4.Mummy"; + mes "Walking Corpse with a bandage all around the body.It smells so bad because its body is still on the decomposed stage."; + mes "^0099FFFound Items^000000: Rotten Bandage"; + next; + mes "^FF0000[Pyramid 3F Monster Encyclopedia]^000000"; + mes "5.Verit"; + mes "Dog with a bandage all around the body which was dead once before.It tends to eat everything dropped on the ground."; + mes "^0099FFFound Items^000000: Immortal Heart,Zargon,Rotten Bandage"; + next; + goto Pyramid; + close; + PyramidF4: + mes "^FF0000[Pyramid 4F Monster Encyclopedia]^000000"; + mes "1.Mummy"; + mes "Walking Corpse with a bandage all around the body.It smells so bad because its body is still on the decomposed stage."; + mes "^0099FFFound Items^000000: Rotten Bandage"; + next; + mes "^FF0000[Pyramid 4F Monster Encyclopedia]^000000"; + mes "2.Verit"; + mes "Dog with a bandage all around the body which was dead once before.It tends to eat everything dropped on the ground."; + mes "^0099FFFound Items^000000: Immortal Heart,Zargon,Rotten Bandage"; + next; + mes "^FF0000[Pyramid 4F Monster Encyclopedia]^000000"; + mes "3.Ghoul"; + mes "Similar as Zombie but much more stronger. Yet very slow, you'd better run for your life when happen to meet this thing."; + mes "^0099FFFound Items^000000: Horrendous Mouth"; + next; + mes "^FF0000[Pyramid 4F Monster Encyclopedia]^000000"; + mes "4.Isis"; + mes "Creature having the head and upper body of a woman and the tail of a snake.Her nail is quite a menace."; + mes "^0099FFFound Items^000000: Scale Skin,Shining Scale"; + next; + goto Pyramid; + close; + PyramidF5: + mes "^FF0000[Pyramid 5F Monster Encyclopedia]^000000"; + mes "1.Mummy"; + mes "Walking Corpse with a bandage all around the body.It smells so bad because its body is still on the decomposed stage."; + mes "^0099FFFound Items^000000: Rotten Bandage"; + next; + mes "^FF0000[Pyramid 5F Monster Encyclopedia]^000000"; + mes "2.Ghoul"; + mes "Similar as Zombie but much more stronger. Yet very slow, you'd better run for your life when happen to meet this thing."; + mes "^0099FFFound Items^000000: Horrendous Mouth"; + next; + mes "^FF0000[Pyramid 5F Monster Encyclopedia]^000000"; + mes "3.Isis"; + mes "Creature having the head and upper body of a woman and the tail of a snake.Her nail is quite a menace."; + mes "^0099FFFound Items^000000: Scale Skin,Shining Scale"; + next; + goto Pyramid; + close; + PyramidF6: + mes "^FF0000[Pyramid 6F Monster Encyclopedia]^000000"; + mes "1.Mummy"; + mes "Walking Corpse with a bandage all around the body.It smells so bad because its body is still on the decomposed stage."; + mes "^0099FFFound Items^000000: Rotten Bandage"; + next; + mes "^FF0000[Pyramid 6F Monster Encyclopedia]^000000"; + mes "2.Verit"; + mes "Dog with a bandage all around the body which was dead once before.It tends to eat everything dropped on the ground."; + mes "^0099FFFound Items^000000: Immortal Heart,Zargon,Rotten Bandage"; + next; + mes "^FF0000[Pyramid 6F Monster Encyclopedia]^000000"; + mes "3.Ghoul"; + mes "Similar as Zombie but much more stronger. Yet very slow, you'd better run for your life when happen to meet this thing."; + mes "^0099FFFound Items^000000: Horrendous Mouth"; + next; + mes "^FF0000[Pyramid 6F Monster Encyclopedia]^000000"; + mes "4.Isis"; + mes "Creature having the head and upper body of a woman and the tail of a snake.Her nail is quite a menace."; + mes "^0099FFFound Items^000000: Scale Skin,Shining Scale"; + next; + mes "^FF0000[Pyramid 6F Monster Encyclopedia]^000000"; + mes "5.Osiris"; + mes "Mummy King with a rotten bandage all over the body, wearing a Crown on the head.He threatens Adventurers with an incredible might."; + mes "^0099FFFound Items^000000: Memento,Rotten Bandage,Hand of God,Elunium"; + next; + goto Pyramid; + close; + EndPyramid: + close; + close; + Cancel: + close; +} +//<=========== Library - End ==========>\\ diff --git a/npc/other/breeder.txt b/npc/other/breeder.txt index 86cb9aa99..af9d56bbb 100644 --- a/npc/other/breeder.txt +++ b/npc/other/breeder.txt @@ -1,65 +1,65 @@ -prontera.gat,122,200,1 script Universal Rental Npc 726,{
-mes "[Universal Rental Npc]";
-mes "Hi, here you can rent Carts, Falcons or Pecopecos.";
-next;
-L_Menu:
-menu "Rent a Cart",L_Cart,"Rent a Falcon",L_Falcon,"Rent a Pecopeco",L_Peco,"Quit",L_Quit;
-close;
-L_Cart:
-if(Class == 5 && checkcart(0) == 0) goto L_Cart_Ok;
-if(Class == 10 && checkcart(0) == 0) goto L_Cart_Ok;
-if(Class == 18 && checkcart(0) == 0) goto L_Cart_Ok;
-if(Class == 4006 && checkcart(0) == 0) goto L_Cart_Ok;
-if(Class == 4011 && checkcart(0) == 0) goto L_Cart_Ok;
-if(Class == 4019 && checkcart(0) == 0) goto L_Cart_Ok;
-if(getskilllv(39)<1) goto L_Need_Skill;
-mes "[Universal Rental Npc]";
-mes "Sorry " + strcharinfo(0) + " but I only rent carts to Merchants, Blacksmiths and Alchimists who have enough skills to handle a cart.";
-close;
-L_Cart_Ok:
- setcart;
- goto L_Quit2;
-L_Need_Skill:
-mes "[Universal Rental Npc]";
-mes "Sorry you don't have the required skill to rent a cart.";
-close;
-L_Falcon:
- if(Class == 11 && checkfalcon(0) == 0) goto L_falc;
- if(Class == 4012 && checkfalcon(0) == 0) goto L_falc;
- if(getskilllv(127)<1) goto L_Need_Skill2;
- mes "[Universal Rental Npc]";
- mes "Sorry " + strcharinfo(0) + " but I only rent falcons to Hunters who the ability to handle 'em.";
- close;
- L_falc:
-setfalcon;
-goto L_Quit2;
-
-L_Need_Skill2:
-mes "[Universal Rental Npc]";
-mes "Sorry you don't have the required skill to tame a Falcon.";
-close;
-L_Peco:
-if (Class == 7 && checkriding(0) == 0) goto L_Peco_Ok;
-if (Class == 14 && checkriding(0) == 0) goto L_Peco_Ok;
-if (Class == 4008 && checkriding(0) == 0) goto L_Peco_Ok;
-if (Class == 4015 && checkriding(0) == 0) goto L_Peco_Ok;
-if(getskilllv(63)<1) goto L_Need_Skill3;
-mes "[Universal Rental Npc]";
-mes "Sorry" + strcharinfo(0) + "but I only rent pecopecos to Knights and Crusaders who can harness them.";
-close;
-L_Peco_Ok:
-setriding;
-goto L_Quit2;
-L_Need_Skill3:
-mes "[Universal Rental Npc]";
-mes "Sorry you don't have the required skill to ride a Peco Peco.";
-close;
-L_Quit:
-mes "[Universal Rental Npc]";
-mes strcharinfo(0) + ", please come back when you are ready to rent something.";
-close;
-L_Quit2:
-mes "[Universal Rental Npc]";
-mes strcharinfo(0) + ", please come again when you want another...";
-close;
+prontera.gat,122,200,1 script Universal Rental Npc 726,{ +mes "[Universal Rental Npc]"; +mes "Hi, here you can rent Carts, Falcons or Pecopecos."; +next; +L_Menu: +menu "Rent a Cart",L_Cart,"Rent a Falcon",L_Falcon,"Rent a Pecopeco",L_Peco,"Quit",L_Quit; +close; +L_Cart: +if(Class == 5 && checkcart(0) == 0) goto L_Cart_Ok; +if(Class == 10 && checkcart(0) == 0) goto L_Cart_Ok; +if(Class == 18 && checkcart(0) == 0) goto L_Cart_Ok; +if(Class == 4006 && checkcart(0) == 0) goto L_Cart_Ok; +if(Class == 4011 && checkcart(0) == 0) goto L_Cart_Ok; +if(Class == 4019 && checkcart(0) == 0) goto L_Cart_Ok; +if(getskilllv(39)<1) goto L_Need_Skill; +mes "[Universal Rental Npc]"; +mes "Sorry " + strcharinfo(0) + " but I only rent carts to Merchants, Blacksmiths and Alchimists who have enough skills to handle a cart."; +close; +L_Cart_Ok: + setcart; + goto L_Quit2; +L_Need_Skill: +mes "[Universal Rental Npc]"; +mes "Sorry you don't have the required skill to rent a cart."; +close; +L_Falcon: + if(Class == 11 && checkfalcon(0) == 0) goto L_falc; + if(Class == 4012 && checkfalcon(0) == 0) goto L_falc; + if(getskilllv(127)<1) goto L_Need_Skill2; + mes "[Universal Rental Npc]"; + mes "Sorry " + strcharinfo(0) + " but I only rent falcons to Hunters who the ability to handle 'em."; + close; + L_falc: +setfalcon; +goto L_Quit2; + +L_Need_Skill2: +mes "[Universal Rental Npc]"; +mes "Sorry you don't have the required skill to tame a Falcon."; +close; +L_Peco: +if (Class == 7 && checkriding(0) == 0) goto L_Peco_Ok; +if (Class == 14 && checkriding(0) == 0) goto L_Peco_Ok; +if (Class == 4008 && checkriding(0) == 0) goto L_Peco_Ok; +if (Class == 4015 && checkriding(0) == 0) goto L_Peco_Ok; +if(getskilllv(63)<1) goto L_Need_Skill3; +mes "[Universal Rental Npc]"; +mes "Sorry" + strcharinfo(0) + "but I only rent pecopecos to Knights and Crusaders who can harness them."; +close; +L_Peco_Ok: +setriding; +goto L_Quit2; +L_Need_Skill3: +mes "[Universal Rental Npc]"; +mes "Sorry you don't have the required skill to ride a Peco Peco."; +close; +L_Quit: +mes "[Universal Rental Npc]"; +mes strcharinfo(0) + ", please come back when you are ready to rent something."; +close; +L_Quit2: +mes "[Universal Rental Npc]"; +mes strcharinfo(0) + ", please come again when you want another..."; +close; }
\ No newline at end of file diff --git a/npc/other/card_remover.txt b/npc/other/card_remover.txt index be3ec14a8..460171461 100644 --- a/npc/other/card_remover.txt +++ b/npc/other/card_remover.txt @@ -1,169 +1,169 @@ -// Card removal NPC by TyrNemesis^
-prt_in.gat,28,73,4 script Wise Old Woman 78,{
-
-UPGRADEROOT:
- mes "[Wise Old Woman]";
- mes "Good day, young one. I have the power to remove cards that you have compounded onto your equipment. Does this idea please you?";
- next;
- menu "Yes, it does.",REMOVEMENU,
- "What do you charge?",REMOVEPRICE,
- "No thanks.",CLOSEOUT;
-
-REMOVEPRICE:
- mes "[Wise Old Woman]";
- mes "I charge a flat fee of 200000 zeny, plus 25000 zeny for each card I remove from the item. In addition, I need a star crumb and a yellow gemstone to work my magic.";
- next;
- menu "Very well. Let's do it.",REMOVEMENU,
- "No thanks.",CLOSEOUT;
-
-REMOVEMENU:
- mes "[Wise Old Woman]";
- mes "Very well. Which item shall I examine for you?";
- next;
- menu "I changed my mind.",CLOSEOUT,
- getequipname(1),SLOT1,
- getequipname(2),SLOT2,
- getequipname(3),SLOT3,
- getequipname(4),SLOT4,
- getequipname(5),SLOT5,
- getequipname(6),SLOT6,
- getequipname(7),SLOT7,
- getequipname(8),SLOT8,
- getequipname(9),SLOT9,
- getequipname(10),SLOT10;
-
-SLOT1:
- set @part,1;
- goto CARDNUMCHECK;
-
-SLOT2:
- set @part,2;
- goto CARDNUMCHECK;
-
-SLOT3:
- set @part,3;
- goto CARDNUMCHECK;
-
-SLOT4:
- set @part,4;
- goto CARDNUMCHECK;
-
-SLOT5:
- set @part,5;
- goto CARDNUMCHECK;
-
-SLOT6:
- set @part,6;
- goto CARDNUMCHECK;
-
-SLOT7:
- set @part,7;
- goto CARDNUMCHECK;
-
-SLOT8:
- set @part,8;
- goto CARDNUMCHECK;
-
-SLOT9:
- set @part,9;
- goto CARDNUMCHECK;
-
-SLOT10:
- set @part,10;
- goto CARDNUMCHECK;
-
-CARDNUMCHECK:
- if(getequipcardcnt(@part) == 0) goto DENYCARDCOUNT;
- set @cardcount,getequipcardcnt(@part);
- if(@cardcount > 1) goto CARDNUMMULTIMSG;
- mes "[Wise Old Woman]";
- mes "This item has " + @cardcount + " card compounded on it. To perform my magic, I will need 225000 zeny, a ^0000FFStar Crumb^000000, and a ^0000FFYellow Gemstone^000000.";
- goto CARDNUMPOSTMSG;
-CARDNUMMULTIMSG:
- mes "[Wise Old Woman]";
- mes "This item has " + @cardcount + " cards compounded on it. To perform my magic, I will need " + (200000+(@cardcount * 25000)) + " zeny, a ^0000FFStar Crumb^000000, and a ^0000FFYellow Gemstone^000000.";
-CARDNUMPOSTMSG:
- next;
- menu "Very well. Do it.",REMOVECARDWARNING,
- "Never mind.",CLOSEOUT;
-
-REMOVECARDWARNING:
- mes "[Wise Old Woman]";
- mes "Before I begin, I must warn you--I may fail. If I do, I may destroy the cards, the item, or both. I do not give refunds. That being said, which is more important to you: The cards, or the item?";
- next;
- menu "I changed my mind about this.",CLOSEOUT,
- "The item.",PRIORITYITEM,
- "The cards.",PRIORITYCARD;
-
-PRIORITYITEM:
- set @failtype,1;
- goto REMOVECARD;
-
-PRIORITYCARD:
- set @failtype,2;
- goto REMOVECARD;
-
-REMOVECARD:
- mes "[Wise Old Woman]";
- mes "Very well. I shall begin.";
- next;
- if((zeny < (200000+(@cardcount * 25000))) || (countitem(1000) < 1) || (countitem(715) < 1)) goto DENYMATERIAL;
- set zeny,zeny - (200000+(@cardcount * 25000));
- delitem 1000,1;
- delitem 715,1;
-
-// Replace the constants in the next 3 lines with failure chance values defined in refine_db.txt
-// First value = Total failure chance (item and cards destroyed)
-// Second value = Partial failure chance (one or the other is destroyed, player decides which one is safe)
-// Third value = Harmless failure chance (all that's lost is your investment)
-
- set @failchance,rand(100);
-// if(@failchance < 2) goto FAILREMOVECARD0;
-// if((@failchance < 8) && (@failtype == 1)) goto FAILREMOVECARD1;
-// if((@failchance < 8) && (@failtype == 2)) goto FAILREMOVECARD2;
- if(@failchance < 10) goto FAILREMOVECARD3;
- successremovecards @part;
- mes "[Wise Old Woman]";
- mes "The process was a success. Here are your cards and your item. Farewell.";
- close;
-
-FAILREMOVECARD0:
- mes "[Wise Old Woman]";
- mes "The process was a total failure. I am afraid the item and the cards were destroyed.";
- failedremovecards @part,0;
- close;
-
-FAILREMOVECARD1:
- mes "[Wise Old Woman]";
- mes "While I have managed to remove the cards from the item, they were destroyed in the process. The item, however, is okay.";
- failedremovecards @part,1;
- close;
-
-FAILREMOVECARD2:
- mes "[Wise Old Woman]";
- mes "Most unfortunate. I succeeded at removing the cards, but the item itself was destroyed in the process.";
- failedremovecards @part,2;
- close;
-
-FAILREMOVECARD3:
- mes "[Wise Old Woman]";
- mes "I have failed to remove the cards. Luckily, however, both the item and the cards are still okay.";
- failedremovecards @part,3;
- close;
-
-DENYCARDCOUNT:
- mes "[Wise Old Woman]";
- mes "Young one... There are no cards compounded on this item. I can do nothing with it, I'm afraid.";
- close;
-
-DENYMATERIAL:
- mes "[Wise Old Woman]";
- mes "You do not have all the items I require to work my magic, child. Come again when you do.";
- close;
-
-CLOSEOUT:
- mes "[Wise Old Woman]";
- mes "Very well. Return at once if you seek my services.";
- close;
-
-}
+// Card removal NPC by TyrNemesis^ +prt_in.gat,28,73,4 script Wise Old Woman 78,{ + +UPGRADEROOT: + mes "[Wise Old Woman]"; + mes "Good day, young one. I have the power to remove cards that you have compounded onto your equipment. Does this idea please you?"; + next; + menu "Yes, it does.",REMOVEMENU, + "What do you charge?",REMOVEPRICE, + "No thanks.",CLOSEOUT; + +REMOVEPRICE: + mes "[Wise Old Woman]"; + mes "I charge a flat fee of 200000 zeny, plus 25000 zeny for each card I remove from the item. In addition, I need a star crumb and a yellow gemstone to work my magic."; + next; + menu "Very well. Let's do it.",REMOVEMENU, + "No thanks.",CLOSEOUT; + +REMOVEMENU: + mes "[Wise Old Woman]"; + mes "Very well. Which item shall I examine for you?"; + next; + menu "I changed my mind.",CLOSEOUT, + getequipname(1),SLOT1, + getequipname(2),SLOT2, + getequipname(3),SLOT3, + getequipname(4),SLOT4, + getequipname(5),SLOT5, + getequipname(6),SLOT6, + getequipname(7),SLOT7, + getequipname(8),SLOT8, + getequipname(9),SLOT9, + getequipname(10),SLOT10; + +SLOT1: + set @part,1; + goto CARDNUMCHECK; + +SLOT2: + set @part,2; + goto CARDNUMCHECK; + +SLOT3: + set @part,3; + goto CARDNUMCHECK; + +SLOT4: + set @part,4; + goto CARDNUMCHECK; + +SLOT5: + set @part,5; + goto CARDNUMCHECK; + +SLOT6: + set @part,6; + goto CARDNUMCHECK; + +SLOT7: + set @part,7; + goto CARDNUMCHECK; + +SLOT8: + set @part,8; + goto CARDNUMCHECK; + +SLOT9: + set @part,9; + goto CARDNUMCHECK; + +SLOT10: + set @part,10; + goto CARDNUMCHECK; + +CARDNUMCHECK: + if(getequipcardcnt(@part) == 0) goto DENYCARDCOUNT; + set @cardcount,getequipcardcnt(@part); + if(@cardcount > 1) goto CARDNUMMULTIMSG; + mes "[Wise Old Woman]"; + mes "This item has " + @cardcount + " card compounded on it. To perform my magic, I will need 225000 zeny, a ^0000FFStar Crumb^000000, and a ^0000FFYellow Gemstone^000000."; + goto CARDNUMPOSTMSG; +CARDNUMMULTIMSG: + mes "[Wise Old Woman]"; + mes "This item has " + @cardcount + " cards compounded on it. To perform my magic, I will need " + (200000+(@cardcount * 25000)) + " zeny, a ^0000FFStar Crumb^000000, and a ^0000FFYellow Gemstone^000000."; +CARDNUMPOSTMSG: + next; + menu "Very well. Do it.",REMOVECARDWARNING, + "Never mind.",CLOSEOUT; + +REMOVECARDWARNING: + mes "[Wise Old Woman]"; + mes "Before I begin, I must warn you--I may fail. If I do, I may destroy the cards, the item, or both. I do not give refunds. That being said, which is more important to you: The cards, or the item?"; + next; + menu "I changed my mind about this.",CLOSEOUT, + "The item.",PRIORITYITEM, + "The cards.",PRIORITYCARD; + +PRIORITYITEM: + set @failtype,1; + goto REMOVECARD; + +PRIORITYCARD: + set @failtype,2; + goto REMOVECARD; + +REMOVECARD: + mes "[Wise Old Woman]"; + mes "Very well. I shall begin."; + next; + if((zeny < (200000+(@cardcount * 25000))) || (countitem(1000) < 1) || (countitem(715) < 1)) goto DENYMATERIAL; + set zeny,zeny - (200000+(@cardcount * 25000)); + delitem 1000,1; + delitem 715,1; + +// Replace the constants in the next 3 lines with failure chance values defined in refine_db.txt +// First value = Total failure chance (item and cards destroyed) +// Second value = Partial failure chance (one or the other is destroyed, player decides which one is safe) +// Third value = Harmless failure chance (all that's lost is your investment) + + set @failchance,rand(100); +// if(@failchance < 2) goto FAILREMOVECARD0; +// if((@failchance < 8) && (@failtype == 1)) goto FAILREMOVECARD1; +// if((@failchance < 8) && (@failtype == 2)) goto FAILREMOVECARD2; + if(@failchance < 10) goto FAILREMOVECARD3; + successremovecards @part; + mes "[Wise Old Woman]"; + mes "The process was a success. Here are your cards and your item. Farewell."; + close; + +FAILREMOVECARD0: + mes "[Wise Old Woman]"; + mes "The process was a total failure. I am afraid the item and the cards were destroyed."; + failedremovecards @part,0; + close; + +FAILREMOVECARD1: + mes "[Wise Old Woman]"; + mes "While I have managed to remove the cards from the item, they were destroyed in the process. The item, however, is okay."; + failedremovecards @part,1; + close; + +FAILREMOVECARD2: + mes "[Wise Old Woman]"; + mes "Most unfortunate. I succeeded at removing the cards, but the item itself was destroyed in the process."; + failedremovecards @part,2; + close; + +FAILREMOVECARD3: + mes "[Wise Old Woman]"; + mes "I have failed to remove the cards. Luckily, however, both the item and the cards are still okay."; + failedremovecards @part,3; + close; + +DENYCARDCOUNT: + mes "[Wise Old Woman]"; + mes "Young one... There are no cards compounded on this item. I can do nothing with it, I'm afraid."; + close; + +DENYMATERIAL: + mes "[Wise Old Woman]"; + mes "You do not have all the items I require to work my magic, child. Come again when you do."; + close; + +CLOSEOUT: + mes "[Wise Old Woman]"; + mes "Very well. Return at once if you seek my services."; + close; + +} diff --git a/npc/other/devnpc.txt b/npc/other/devnpc.txt index 4a06cfcdd..6b61b4615 100644 --- a/npc/other/devnpc.txt +++ b/npc/other/devnpc.txt @@ -1,193 +1,193 @@ -//===== eAthena Script =======================================
-//= Dev edition NPCs!
-//===== By: ==================================================
-//= Most NPCs by Aria
-//= MouseJstr NPC by MouseJstr
-//===== Current Version: =====================================
-//= 0.5
-//===== Compatible With: =====================================
-//= eAthena 1.0 Final +
-//===== Description: =========================================
-//= NPCs of the devs!
-//===== Additional Comments: =================================
-//= Some devs don't have their quotes yet >_>
-//= currently we only have Aria, Mouse, and MC_Cameri done.
-//= David is there because he has coords, but he's incomplete;
-//= he has no biography
-//============================================================
-
-// MouseJstr =========================================================>\\
-ayothaya.gat,76,145,5 script MouseJstr 763,{
- npcspeed 100;
- mes "[MouseJstr]";
- mes "Yo homeslices..";
- mes "I am MouseJstr on AIM and josh in real life..";
- next;
- mes "I enjoy maintaining a RO server because of the abuse I get";
- initnpctimer;
- close;
- OnTimer15000:
- npcwalkto 70+rand(17),135+rand(16);
- setnpctimer 0;
-
-doitagain:
- set $foo,rand(5);
- if($foo == 0) goto Lquote0;
- if($foo == 1) goto Lquote1;
- if($foo == 2) goto Lquote2;
- if($foo == 3) goto Lquote3;
- if($foo == 4) goto Lquote4;
- goto doitagain;
-
-Lquote0:
- npctalk "Brb.. my baby is throwing up on my leg.";
- setnpctimer 0;
- break;
-Lquote1:
- npctalk "The only difference between a hurricane and skydiving is which direction the tree's come at you from..";
- setnpctimer 0;
- break;
-Lquote2:
- npctalk "Wanna be a GM? Write me a C routine that reverses a string in place..";
- setnpctimer 0;
- break;
-Lquote3:
- npctalk "Wanna be a GM? Write me a C routine that finds me the highest bit set in a network order 32 bit integer...";
- setnpctimer 0;
- break;
-Lquote4:
- npctalk "I am the dark angel of eAthena.. withen weeks of my arrival, almost everybody was gone or dead.. fear me...";
- setnpctimer 0;
- break;
-}
-
-// MC Cameri =========================================================>\\
-morocc.gat,160,97,4 script MC Cameri 706,{
- npcspeed 150;
- mes "[MC Cameri]";
- mes "I'm the @command guy from oA...";
- mes "^FF00FFReal Name^000000: Can't tell you my name";
- mes "^FF00FFAge^000000: 16 years";
- mes "^FF00FFWhere I live^000000: Dominican Republic, in the caribbean";
- next;
- mes "[MC Cameri]";
- mes "^FF00FFWhat I Do^000000: mostly working on @commands for GMs...";
- mes "^FF00FFWhy I'm here^000000: Because I like programming...";
- next;
- mes "[MC Cameri]";
- mes "I'm a senior student, programmer, body builder(yes, I lift weights), etc.";
- initnpctimer;
- close;
- OnTimer15000:
- npcwalkto 154+rand(17),87+rand(16);
- setnpctimer 0;
-
-Lmctalk:
- set $mctalk,rand(10);
- if($mctalk == 0) goto Lquote0;
- if($mctalk == 1) goto Lquote1;
- if($mctalk == 2) goto Lquote2;
- if($mctalk == 3) goto Lquote3;
- if($mctalk == 4) goto Lquote4;
- if($mctalk == 5) goto Lquote5;
- if($mctalk == 6) goto Lquote6;
- if($mctalk == 7) goto Lquote7;
- if($mctalk == 8) goto Lquote8;
- if($mctalk == 9) goto Lquote9;
- if($mctalk == 10) goto Lquote10;
- goto Lmctalk;
-Lquote0:
- npctalk "OMGWTFBBQ";
- setnpctimer 0;
- break;
-Lquote1:
- npctalk "160,95-I owns you all, under my commands. *lol*";
- setnpctimer 0;
- break;
-Lquote2:
- npctalk "I forgot what my script, what do I have to say again? *_*U";
- setnpctimer 0;
- break;
-Lquote3:
- npctalk "¿Donde estoy? *wonders* (<-- Means, where am I?)";
- setnpctimer 0;
- break;
-Lquote4:
- npctalk "Are you guys my friends?";
- setnpctimer 0;
- break;
-Lquote5:
- npctalk "My mom told me not to talk to strangers. *stares*";
- setnpctimer 0;
- break;
-Lquote6:
- npctalk "How can you be SO ugly!?";
- setnpctimer 0;
- break;
-Lquote7:
- npctalk "I need a friend to play with =(. *sobs*";
- setnpctimer 0;
- break;
-Lquote8:
- npctalk "I've been kicking this rock for as long as I can remember.";
- setnpctimer 0;
- break;
-Lquote9:
- npctalk "My computer just broke, and I don't know how to format. *sobs*";
- setnpctimer 0;
- break;
-Lquote10:
- setnpctimer 0;
- break;
-}
-
-
-// Davidsiaw =========================================================>\\
-payon.gat,182,104,4 script Davidsiaw 1002,{
- npcspeed 150;
- mes "[Davidsiaw]";
- mes "omghi";
- initnpctimer;
- close;
- OnTimer15000:
- npcwalkto 176+rand(17),94+rand(16);
- setnpctimer 0;
-
-Ldavidtalk:
- set $davidtalk,rand(10);
- if($davidtalk == 0) goto Lquote0;
- if($davidtalk == 1) goto Lquote1;
- if($davidtalk == 2) goto Lquote2;
- if($davidtalk == 3) goto Lquote3;
- if($davidtalk == 4) goto Lquote4;
- if($davidtalk == 5) goto Lquote5;
- if($davidtalk == 6) goto Lquote6;
- goto Ldavidtalk;
-Lquote0:
- npctalk "OMGWTFBBQ";
- setnpctimer 0;
- break;
-Lquote1:
- npctalk "Wud are you looking at?";
- setnpctimer 0;
- break;
-Lquote2:
- npctalk "baka...";
- setnpctimer 0;
- break;
-Lquote3:
- npctalk "¿Donde estoy? *wonders* (<-- Means, where am I?)";
- setnpctimer 0;
- break;
-Lquote4:
- npctalk "*drops 100 Mjolnirs on the floor*";
- setnpctimer 0;
- break;
-Lquote5:
- npctalk "There ya go ;)";
- setnpctimer 0;
- break;
-Lquote6:
- setnpctimer 0;
- break;
+//===== eAthena Script ======================================= +//= Dev edition NPCs! +//===== By: ================================================== +//= Most NPCs by Aria +//= MouseJstr NPC by MouseJstr +//===== Current Version: ===================================== +//= 0.5 +//===== Compatible With: ===================================== +//= eAthena 1.0 Final + +//===== Description: ========================================= +//= NPCs of the devs! +//===== Additional Comments: ================================= +//= Some devs don't have their quotes yet >_> +//= currently we only have Aria, Mouse, and MC_Cameri done. +//= David is there because he has coords, but he's incomplete; +//= he has no biography +//============================================================ + +// MouseJstr =========================================================>\\ +ayothaya.gat,76,145,5 script MouseJstr 763,{ + npcspeed 100; + mes "[MouseJstr]"; + mes "Yo homeslices.."; + mes "I am MouseJstr on AIM and josh in real life.."; + next; + mes "I enjoy maintaining a RO server because of the abuse I get"; + initnpctimer; + close; + OnTimer15000: + npcwalkto 70+rand(17),135+rand(16); + setnpctimer 0; + +doitagain: + set $foo,rand(5); + if($foo == 0) goto Lquote0; + if($foo == 1) goto Lquote1; + if($foo == 2) goto Lquote2; + if($foo == 3) goto Lquote3; + if($foo == 4) goto Lquote4; + goto doitagain; + +Lquote0: + npctalk "Brb.. my baby is throwing up on my leg."; + setnpctimer 0; + break; +Lquote1: + npctalk "The only difference between a hurricane and skydiving is which direction the tree's come at you from.."; + setnpctimer 0; + break; +Lquote2: + npctalk "Wanna be a GM? Write me a C routine that reverses a string in place.."; + setnpctimer 0; + break; +Lquote3: + npctalk "Wanna be a GM? Write me a C routine that finds me the highest bit set in a network order 32 bit integer..."; + setnpctimer 0; + break; +Lquote4: + npctalk "I am the dark angel of eAthena.. withen weeks of my arrival, almost everybody was gone or dead.. fear me..."; + setnpctimer 0; + break; +} + +// MC Cameri =========================================================>\\ +morocc.gat,160,97,4 script MC Cameri 706,{ + npcspeed 150; + mes "[MC Cameri]"; + mes "I'm the @command guy from oA..."; + mes "^FF00FFReal Name^000000: Can't tell you my name"; + mes "^FF00FFAge^000000: 16 years"; + mes "^FF00FFWhere I live^000000: Dominican Republic, in the caribbean"; + next; + mes "[MC Cameri]"; + mes "^FF00FFWhat I Do^000000: mostly working on @commands for GMs..."; + mes "^FF00FFWhy I'm here^000000: Because I like programming..."; + next; + mes "[MC Cameri]"; + mes "I'm a senior student, programmer, body builder(yes, I lift weights), etc."; + initnpctimer; + close; + OnTimer15000: + npcwalkto 154+rand(17),87+rand(16); + setnpctimer 0; + +Lmctalk: + set $mctalk,rand(10); + if($mctalk == 0) goto Lquote0; + if($mctalk == 1) goto Lquote1; + if($mctalk == 2) goto Lquote2; + if($mctalk == 3) goto Lquote3; + if($mctalk == 4) goto Lquote4; + if($mctalk == 5) goto Lquote5; + if($mctalk == 6) goto Lquote6; + if($mctalk == 7) goto Lquote7; + if($mctalk == 8) goto Lquote8; + if($mctalk == 9) goto Lquote9; + if($mctalk == 10) goto Lquote10; + goto Lmctalk; +Lquote0: + npctalk "OMGWTFBBQ"; + setnpctimer 0; + break; +Lquote1: + npctalk "160,95-I owns you all, under my commands. *lol*"; + setnpctimer 0; + break; +Lquote2: + npctalk "I forgot what my script, what do I have to say again? *_*U"; + setnpctimer 0; + break; +Lquote3: + npctalk "¿Donde estoy? *wonders* (<-- Means, where am I?)"; + setnpctimer 0; + break; +Lquote4: + npctalk "Are you guys my friends?"; + setnpctimer 0; + break; +Lquote5: + npctalk "My mom told me not to talk to strangers. *stares*"; + setnpctimer 0; + break; +Lquote6: + npctalk "How can you be SO ugly!?"; + setnpctimer 0; + break; +Lquote7: + npctalk "I need a friend to play with =(. *sobs*"; + setnpctimer 0; + break; +Lquote8: + npctalk "I've been kicking this rock for as long as I can remember."; + setnpctimer 0; + break; +Lquote9: + npctalk "My computer just broke, and I don't know how to format. *sobs*"; + setnpctimer 0; + break; +Lquote10: + setnpctimer 0; + break; +} + + +// Davidsiaw =========================================================>\\ +payon.gat,182,104,4 script Davidsiaw 1002,{ + npcspeed 150; + mes "[Davidsiaw]"; + mes "omghi"; + initnpctimer; + close; + OnTimer15000: + npcwalkto 176+rand(17),94+rand(16); + setnpctimer 0; + +Ldavidtalk: + set $davidtalk,rand(10); + if($davidtalk == 0) goto Lquote0; + if($davidtalk == 1) goto Lquote1; + if($davidtalk == 2) goto Lquote2; + if($davidtalk == 3) goto Lquote3; + if($davidtalk == 4) goto Lquote4; + if($davidtalk == 5) goto Lquote5; + if($davidtalk == 6) goto Lquote6; + goto Ldavidtalk; +Lquote0: + npctalk "OMGWTFBBQ"; + setnpctimer 0; + break; +Lquote1: + npctalk "Wud are you looking at?"; + setnpctimer 0; + break; +Lquote2: + npctalk "baka..."; + setnpctimer 0; + break; +Lquote3: + npctalk "¿Donde estoy? *wonders* (<-- Means, where am I?)"; + setnpctimer 0; + break; +Lquote4: + npctalk "*drops 100 Mjolnirs on the floor*"; + setnpctimer 0; + break; +Lquote5: + npctalk "There ya go ;)"; + setnpctimer 0; + break; +Lquote6: + setnpctimer 0; + break; }
\ No newline at end of file diff --git a/npc/other/gefenia.txt b/npc/other/gefenia.txt index dbda378ce..28b93601c 100644 --- a/npc/other/gefenia.txt +++ b/npc/other/gefenia.txt @@ -1,31 +1,31 @@ -//===== Athena Script ========================================
-//= Gefenia Warper Script
-//===== By: ==================================================
-//= Darkchild (1.0)
-//===== Current Version: =====================================
-//= 1.0
-//===== Compatible With: =====================================
-//= Any Athena Version; RO Episode 6+
-//===== Description: =========================================
-//= Temp Warper to Gefenia
-//===== Additional Comments: =================================
-//= IF you know how you SHOULD get there then please tell me
-//============================================================
-prontera.gat,154,198,5 script Geovani 805,{
-mes "[Geovani]";
-mes "Hi there my friend,";
-mes "A while ago a very wise man taught me something.";
-next;
-mes "[Geovani]";
-mes "He taught me how to warp people";
-mes "And yesterday i finally mastered it!!";
-next;
-mes "[Geovani]";
-mes "Want me to show you?";
-mes "I can warp you to Gefenia, the old ruins of the rebuild city, Geffen";
-next;
-menu "Sure, Warp Me ;)",Mwarpme,"Nah, Don't Try It On me",-;
-close;
-Mwarpme:
-warp "gefenia01.gat", 40, 103; close;
+//===== Athena Script ======================================== +//= Gefenia Warper Script +//===== By: ================================================== +//= Darkchild (1.0) +//===== Current Version: ===================================== +//= 1.0 +//===== Compatible With: ===================================== +//= Any Athena Version; RO Episode 6+ +//===== Description: ========================================= +//= Temp Warper to Gefenia +//===== Additional Comments: ================================= +//= IF you know how you SHOULD get there then please tell me +//============================================================ +prontera.gat,154,198,5 script Geovani 805,{ +mes "[Geovani]"; +mes "Hi there my friend,"; +mes "A while ago a very wise man taught me something."; +next; +mes "[Geovani]"; +mes "He taught me how to warp people"; +mes "And yesterday i finally mastered it!!"; +next; +mes "[Geovani]"; +mes "Want me to show you?"; +mes "I can warp you to Gefenia, the old ruins of the rebuild city, Geffen"; +next; +menu "Sure, Warp Me ;)",Mwarpme,"Nah, Don't Try It On me",-; +close; +Mwarpme: +warp "gefenia01.gat", 40, 103; close; }
\ No newline at end of file diff --git a/npc/other/heal.txt b/npc/other/heal.txt index b8df478b9..69fc7bf6a 100644 --- a/npc/other/heal.txt +++ b/npc/other/heal.txt @@ -1,41 +1,41 @@ -//===== eAthena Script =======================================
-//= Heal Npc
-//===== By: ==================================================
-//= Lotsa People (1.x)
-//===== Current Version: =====================================
-//= 2.0
-//===== Compatible With: =====================================
-//= eAthena 0.1+;
-//===== Description: =========================================
-//= Poring Which Heals For Free
-//===== Additional Comments: =================================
-//= 2.0 By Darkchild, Duplicates And Changed A Bit
-//= you can replace this script file by heal_payment.txt
-//= if you want that players have to pay their healings.
-//============================================================
-
-prontera.gat,150,184,5 script Healring#h1-1::Healring 1002,{
- mes "[Healring]";
- mes "Booooiiing!!";
- next;
- menu "Heal",-,"Quit",CANCEL;
- percentheal 100,100;
- mes "[Healring]";
- mes "Boooing! Booiing Boing! (Healed! Have fun!)";
- close;
- CANCEL:
- mes "[Healring]";
- mes "Boing Boing! (Bye Bye!)";
- close;
-}
-
-morocc.gat,159,96,5 duplicate(Healring) Healring#h1-2 1002
-geffen.gat,121,61,5 duplicate(Healring) Healring#h1-3 1002
-payon.gat,180,105,5 duplicate(Healring) Healring#h1-4 1002
-alberta.gat,185,144,5 duplicate(Healring) Healring#h1-5 1002
-aldebaran.gat,134,123,5 duplicate(Healring) Healring#h1-6 1002
-izlude.gat,125,118,5 duplicate(Healring) Healring#h1-7 1002
-xmas.gat,149,136,5 duplicate(Healring) Healring#h1-8 1002
-comodo.gat,188,162,5 duplicate(Healring) Healring#h1-9 1002
-amatsu.gat,200,80,5 duplicate(Healring) Healring#h1-10 1002
+//===== eAthena Script ======================================= +//= Heal Npc +//===== By: ================================================== +//= Lotsa People (1.x) +//===== Current Version: ===================================== +//= 2.0 +//===== Compatible With: ===================================== +//= eAthena 0.1+; +//===== Description: ========================================= +//= Poring Which Heals For Free +//===== Additional Comments: ================================= +//= 2.0 By Darkchild, Duplicates And Changed A Bit +//= you can replace this script file by heal_payment.txt +//= if you want that players have to pay their healings. +//============================================================ + +prontera.gat,150,184,5 script Healring#h1-1::Healring 1002,{ + mes "[Healring]"; + mes "Booooiiing!!"; + next; + menu "Heal",-,"Quit",CANCEL; + percentheal 100,100; + mes "[Healring]"; + mes "Boooing! Booiing Boing! (Healed! Have fun!)"; + close; + CANCEL: + mes "[Healring]"; + mes "Boing Boing! (Bye Bye!)"; + close; +} + +morocc.gat,159,96,5 duplicate(Healring) Healring#h1-2 1002 +geffen.gat,121,61,5 duplicate(Healring) Healring#h1-3 1002 +payon.gat,180,105,5 duplicate(Healring) Healring#h1-4 1002 +alberta.gat,185,144,5 duplicate(Healring) Healring#h1-5 1002 +aldebaran.gat,134,123,5 duplicate(Healring) Healring#h1-6 1002 +izlude.gat,125,118,5 duplicate(Healring) Healring#h1-7 1002 +xmas.gat,149,136,5 duplicate(Healring) Healring#h1-8 1002 +comodo.gat,188,162,5 duplicate(Healring) Healring#h1-9 1002 +amatsu.gat,200,80,5 duplicate(Healring) Healring#h1-10 1002 gonryun.gat,164,130,5 duplicate(Healring) Healring#h1-1 1002
\ No newline at end of file diff --git a/npc/other/heal_payment.txt b/npc/other/heal_payment.txt index 344ee96d9..39a832985 100644 --- a/npc/other/heal_payment.txt +++ b/npc/other/heal_payment.txt @@ -1,99 +1,99 @@ -//===== eAthena Script =======================================
-//= Dog Script (for healings)
-//===== By: ==================================================
-//= Yor
-//===== Current Version: =====================================
-//= 1.1
-//===== Compatible With: =====================================
-//= Any Athena Version (need dog sprite)
-//===== Description: =========================================
-//= Dog heals/regenerates people against zenys
-//===== Additional Comments: =================================
-//= alternative dog with payment.
-//= each HP need 1 zeny
-//= each SP need (baselevel / 5) zenys
-//= calculation is done at start of the script
-//= Added Duplicates And Correct payon Loc [Darkchild]
-//============================================================
-
-prontera.gat,150,184,5 script Healring#h2-1::Healring 1002,{
- set @tempHp, MaxHp-Hp;
- set @tempSp, ((MaxSp-Sp) * BaseLevel) / 5;
- if (@tempHp > 0) goto WOUNDED;
- if (@tempSp > 0) goto ONLY_REGENERATION;
-
- mes "[Healring]";
- mes "Booiiing Boiing (You don't need healings).";
- mes "Boing Boing! (Bye Bye!)";
- close;
-
- WOUNDED:
- if (@tempSp > 0) goto WITH_REGENERATION;
- mes "[Healring]";
- mes "Booiing: BoooiiinnnG (Need healings: "+@tempHp+" z)?";
- mes "BOINNG: Booing (I use zenys for a good cause: my medicines and my Poring Food)!";
- next;
- menu "Healing ("+@tempHp+"z)",HEALINGS,"No, thanks",CANCEL;
-
- WITH_REGENERATION:
- mes "[Healring]";
- mes "Booiing: BoooiiinnnG (Need only healing: "+@tempHp+" z)?";
- mes "Boooing: BoooiiinnnG (Only a regeneration: "+@tempSp+" z)?";
- mes "Booiing Boooing: BoooiiinnnG (or healing and regeneration: "+(@tempHp+@tempSp)+" z)?";
- mes "BOINNG: Booing (I use zenys for a good cause: my medicines and my Poring Food)!";
- next;
- menu "Only healings ("+@tempHp+"z)",HEALINGS,"Only a regeneration ("+@tempSp+"z)",REGENERATION,"Healings with regeneration ("+(@tempHp+@tempSp)+"z)",HEALINGS_AND_REGENERATION,"Nothing, thanks",CANCEL;
-
- ONLY_REGENERATION:
- mes "[Healring]";
- mes "Boooing: BoooiiinnnG (Need a regeneration: "+@tempSp+" z)?";
- mes "BOINNG: Booing (I use zenys for a good cause: my medicines and my Poring Food)!";
- next;
- menu "Regeneration ("+@tempSp+"z)",REGENERATION,"No, thanks",CANCEL;
-
- HEALINGS:
- if (Zeny < @tempHp) goto NO_ZENYS;
- set Zeny, Zeny-@tempHp;
- heal 30000,0;
- goto FIN;
-
- REGENERATION:
- if (Zeny < @tempSp) goto NO_ZENYS;
- set Zeny, Zeny-@tempSp;
- heal 0,30000;
- goto FIN;
-
- HEALINGS_AND_REGENERATION:
- if (Zeny < (@tempHp+@tempSp)) goto NO_ZENYS;
- set Zeny, Zeny-(@tempHp+@tempSp);
- heal 30000,30000;
- goto FIN;
-
- NO_ZENYS:
- mes "[Healring]";
- mes "BOIING! (You don't have enough zenys)!";
- mes "BOING BOING!! (Starver)!";
- close;
-
- FIN:
- mes "[Healring]";
- mes "Boooing! Booiing Boing! (Healed! Have fun!)";
- close;
-
- CANCEL:
- mes "[Healring]";
- mes "Boing Boing! (Bye Bye!)";
- close;
-}
-
-
-morocc.gat,159,96,5 duplicate(Healring) Healring#h2-2 1002
-geffen.gat,121,61,5 duplicate(Healring) Healring#h2-3 1002
-payon.gat,180,105,5 duplicate(Healring) Healring#h2-4 1002
-alberta.gat,185,144,5 duplicate(Healring) Healring#h2-5 1002
-aldebaran.gat,134,123,5 duplicate(Healring) Healring#h2-6 1002
-izlude.gat,125,118,5 duplicate(Healring) Healring#h2-7 1002
-xmas.gat,149,136,5 duplicate(Healring) Healring#h2-8 1002
-comodo.gat,188,162,5 duplicate(Healring) Healring#h2-9 1002
-amatsu.gat,200,80,5 duplicate(Healring) Healring#h2-10 1002
+//===== eAthena Script ======================================= +//= Dog Script (for healings) +//===== By: ================================================== +//= Yor +//===== Current Version: ===================================== +//= 1.1 +//===== Compatible With: ===================================== +//= Any Athena Version (need dog sprite) +//===== Description: ========================================= +//= Dog heals/regenerates people against zenys +//===== Additional Comments: ================================= +//= alternative dog with payment. +//= each HP need 1 zeny +//= each SP need (baselevel / 5) zenys +//= calculation is done at start of the script +//= Added Duplicates And Correct payon Loc [Darkchild] +//============================================================ + +prontera.gat,150,184,5 script Healring#h2-1::Healring 1002,{ + set @tempHp, MaxHp-Hp; + set @tempSp, ((MaxSp-Sp) * BaseLevel) / 5; + if (@tempHp > 0) goto WOUNDED; + if (@tempSp > 0) goto ONLY_REGENERATION; + + mes "[Healring]"; + mes "Booiiing Boiing (You don't need healings)."; + mes "Boing Boing! (Bye Bye!)"; + close; + + WOUNDED: + if (@tempSp > 0) goto WITH_REGENERATION; + mes "[Healring]"; + mes "Booiing: BoooiiinnnG (Need healings: "+@tempHp+" z)?"; + mes "BOINNG: Booing (I use zenys for a good cause: my medicines and my Poring Food)!"; + next; + menu "Healing ("+@tempHp+"z)",HEALINGS,"No, thanks",CANCEL; + + WITH_REGENERATION: + mes "[Healring]"; + mes "Booiing: BoooiiinnnG (Need only healing: "+@tempHp+" z)?"; + mes "Boooing: BoooiiinnnG (Only a regeneration: "+@tempSp+" z)?"; + mes "Booiing Boooing: BoooiiinnnG (or healing and regeneration: "+(@tempHp+@tempSp)+" z)?"; + mes "BOINNG: Booing (I use zenys for a good cause: my medicines and my Poring Food)!"; + next; + menu "Only healings ("+@tempHp+"z)",HEALINGS,"Only a regeneration ("+@tempSp+"z)",REGENERATION,"Healings with regeneration ("+(@tempHp+@tempSp)+"z)",HEALINGS_AND_REGENERATION,"Nothing, thanks",CANCEL; + + ONLY_REGENERATION: + mes "[Healring]"; + mes "Boooing: BoooiiinnnG (Need a regeneration: "+@tempSp+" z)?"; + mes "BOINNG: Booing (I use zenys for a good cause: my medicines and my Poring Food)!"; + next; + menu "Regeneration ("+@tempSp+"z)",REGENERATION,"No, thanks",CANCEL; + + HEALINGS: + if (Zeny < @tempHp) goto NO_ZENYS; + set Zeny, Zeny-@tempHp; + heal 30000,0; + goto FIN; + + REGENERATION: + if (Zeny < @tempSp) goto NO_ZENYS; + set Zeny, Zeny-@tempSp; + heal 0,30000; + goto FIN; + + HEALINGS_AND_REGENERATION: + if (Zeny < (@tempHp+@tempSp)) goto NO_ZENYS; + set Zeny, Zeny-(@tempHp+@tempSp); + heal 30000,30000; + goto FIN; + + NO_ZENYS: + mes "[Healring]"; + mes "BOIING! (You don't have enough zenys)!"; + mes "BOING BOING!! (Starver)!"; + close; + + FIN: + mes "[Healring]"; + mes "Boooing! Booiing Boing! (Healed! Have fun!)"; + close; + + CANCEL: + mes "[Healring]"; + mes "Boing Boing! (Bye Bye!)"; + close; +} + + +morocc.gat,159,96,5 duplicate(Healring) Healring#h2-2 1002 +geffen.gat,121,61,5 duplicate(Healring) Healring#h2-3 1002 +payon.gat,180,105,5 duplicate(Healring) Healring#h2-4 1002 +alberta.gat,185,144,5 duplicate(Healring) Healring#h2-5 1002 +aldebaran.gat,134,123,5 duplicate(Healring) Healring#h2-6 1002 +izlude.gat,125,118,5 duplicate(Healring) Healring#h2-7 1002 +xmas.gat,149,136,5 duplicate(Healring) Healring#h2-8 1002 +comodo.gat,188,162,5 duplicate(Healring) Healring#h2-9 1002 +amatsu.gat,200,80,5 duplicate(Healring) Healring#h2-10 1002 gonryun.gat,164,130,5 duplicate(Healring) Healring#h2-1 1002
\ No newline at end of file diff --git a/npc/other/kafra_bank.txt b/npc/other/kafra_bank.txt index f332dcada..8d8bf4fc9 100644 --- a/npc/other/kafra_bank.txt +++ b/npc/other/kafra_bank.txt @@ -1,106 +1,106 @@ -//===== eAthena Script =======================================
-//= 2nd Bank of Prontera ( with daily 0.01% income! )
-//===== By: ==================================================
-//= Lupus (1.0)
-//===== Current Version: =====================================
-//= 1.0
-//===== Compatible With: =====================================
-//= eAthena 1.x
-//===== Description: =========================================
-//= A bank which has an interest %
-//===== Additional Comments: =================================
-// Look for this formula and setup your Bank daily % interest
-// #kafrabank/1000 = 0.1% of interest per day
-// #kafrabank/100 = 1% of interest per day
-// #kafrabank/10 = 10% of interest per day
-//============================================================
-
-prontera.gat,131,190,1 script Bank Clerk 112,{
- cutin "kafra_06",2;
- mes"[Manya]";
- mes strcharinfo(0)+", welcome to the 2nd Bank of Prontera!";
-
- set @kb_int,(gettime(6)*31)+gettime(5); //today's number
- set @income,0;
-//calculate %
- if (#kafrabank<=0 || #kb_int>=@kb_int) goto L_NoIncomeToday;
- set @income,(#kafrabank/1000)*(@kb_int-#kb_int); //@income == % of the summ
-L_NoIncomeToday:
- set #kb_int,@kb_int; //reset days timer
-
- if(#kafrabank==0) mes "We could open you an account.";
- if(@income>0) mes "Today's income ^135445" + @income + "^000000 zeny.";
- set #kafrabank,#kafrabank+@income;
- if(#kafrabank>0) mes "Your account: ^135445" + #kafrabank + "^000000 zeny.";
- mes "What would you like?";
- next;
- if(#kafrabank==0) menu "-Open a bank account",-,"-Quit",B_EXIT2;
- if(#kafrabank>0) menu "-Deposit money",-,"-Withdraw money",M_WITHDRAW,"-Quit",B_EXIT2;
-
- mes"[Manya]";
- mes "Please, tell me how much zeny you would like to deposit.";
- next;
- input @kafrabank;
-
- if(@kafrabank<1000) goto L_LESS_1000;
- if(@kafrabank>1000000) goto L_TOO_BIG_AMOUNT;
- if(@kafrabank>zeny) goto L_NOT_ENOUGH;
- set zeny,zeny-@kafrabank;
- set #kafrabank,#kafrabank+@kafrabank;
- mes"[Manya]";
- mes "You've made a deposit of ^135445" + @kafrabank + "z^000000.";
-
- goto B_EXIT;
-
-M_WITHDRAW:
- if(#kafrabank==0) goto L_ZERO_ACCOUNT;
- mes"[Manya]";
- mes "Your account: ^135445" + #kafrabank + "^000000 zeny.";
- mes "How much zeny would you like to withdraw?";
- next;
- input @kafrabank;
-
- if(@kafrabank<1) goto B_EXIT2;
- if(@kafrabank>1000000) goto L_TOO_BIG_AMOUNT;
- if(@kafrabank>#kafrabank) goto L_NOT_ENOUGH;
- set #kafrabank,#kafrabank-@kafrabank;
- set zeny,zeny+@kafrabank;
- mes"[Manya]";
- mes "Here is your ^135445" + @kafrabank + "z^000000, put your sign here...";
- goto B_EXIT;
-
-L_NOT_ENOUGH:
- mes"[Manya]";
- mes "You don't have enough zeny for this operation.";
- next;
- goto B_EXIT2;
-
-L_ZERO_ACCOUNT:
- mes"[Manya]";
- mes "You don't have any zeny on your account!";
- next;
- goto B_EXIT2;
-
-L_TOO_BIG_AMOUNT:
- mes"[Manya]";
- mes "Sorry. The maximum deposit you can make on a time is 1,000,000 zeny.";
- next;
- goto B_EXIT2;
-
-L_LESS_1000:
- mes"[Manya]";
- mes "We're sorry, the minimum amount of zeny you can deposit is 1,000 zeny.";
- next;
- goto B_EXIT2;
-
-B_EXIT:
- mes "Very well... Come again soon!";
- next;
-
-B_EXIT2:
- mes"[Manya]";
- mes "Thank you for using our Bank Service. We hope to see you again soon.";
- cutin "kafra_06",255;
- close;
-
+//===== eAthena Script ======================================= +//= 2nd Bank of Prontera ( with daily 0.01% income! ) +//===== By: ================================================== +//= Lupus (1.0) +//===== Current Version: ===================================== +//= 1.0 +//===== Compatible With: ===================================== +//= eAthena 1.x +//===== Description: ========================================= +//= A bank which has an interest % +//===== Additional Comments: ================================= +// Look for this formula and setup your Bank daily % interest +// #kafrabank/1000 = 0.1% of interest per day +// #kafrabank/100 = 1% of interest per day +// #kafrabank/10 = 10% of interest per day +//============================================================ + +prontera.gat,131,190,1 script Bank Clerk 112,{ + cutin "kafra_06",2; + mes"[Manya]"; + mes strcharinfo(0)+", welcome to the 2nd Bank of Prontera!"; + + set @kb_int,(gettime(6)*31)+gettime(5); //today's number + set @income,0; +//calculate % + if (#kafrabank<=0 || #kb_int>=@kb_int) goto L_NoIncomeToday; + set @income,(#kafrabank/1000)*(@kb_int-#kb_int); //@income == % of the summ +L_NoIncomeToday: + set #kb_int,@kb_int; //reset days timer + + if(#kafrabank==0) mes "We could open you an account."; + if(@income>0) mes "Today's income ^135445" + @income + "^000000 zeny."; + set #kafrabank,#kafrabank+@income; + if(#kafrabank>0) mes "Your account: ^135445" + #kafrabank + "^000000 zeny."; + mes "What would you like?"; + next; + if(#kafrabank==0) menu "-Open a bank account",-,"-Quit",B_EXIT2; + if(#kafrabank>0) menu "-Deposit money",-,"-Withdraw money",M_WITHDRAW,"-Quit",B_EXIT2; + + mes"[Manya]"; + mes "Please, tell me how much zeny you would like to deposit."; + next; + input @kafrabank; + + if(@kafrabank<1000) goto L_LESS_1000; + if(@kafrabank>1000000) goto L_TOO_BIG_AMOUNT; + if(@kafrabank>zeny) goto L_NOT_ENOUGH; + set zeny,zeny-@kafrabank; + set #kafrabank,#kafrabank+@kafrabank; + mes"[Manya]"; + mes "You've made a deposit of ^135445" + @kafrabank + "z^000000."; + + goto B_EXIT; + +M_WITHDRAW: + if(#kafrabank==0) goto L_ZERO_ACCOUNT; + mes"[Manya]"; + mes "Your account: ^135445" + #kafrabank + "^000000 zeny."; + mes "How much zeny would you like to withdraw?"; + next; + input @kafrabank; + + if(@kafrabank<1) goto B_EXIT2; + if(@kafrabank>1000000) goto L_TOO_BIG_AMOUNT; + if(@kafrabank>#kafrabank) goto L_NOT_ENOUGH; + set #kafrabank,#kafrabank-@kafrabank; + set zeny,zeny+@kafrabank; + mes"[Manya]"; + mes "Here is your ^135445" + @kafrabank + "z^000000, put your sign here..."; + goto B_EXIT; + +L_NOT_ENOUGH: + mes"[Manya]"; + mes "You don't have enough zeny for this operation."; + next; + goto B_EXIT2; + +L_ZERO_ACCOUNT: + mes"[Manya]"; + mes "You don't have any zeny on your account!"; + next; + goto B_EXIT2; + +L_TOO_BIG_AMOUNT: + mes"[Manya]"; + mes "Sorry. The maximum deposit you can make on a time is 1,000,000 zeny."; + next; + goto B_EXIT2; + +L_LESS_1000: + mes"[Manya]"; + mes "We're sorry, the minimum amount of zeny you can deposit is 1,000 zeny."; + next; + goto B_EXIT2; + +B_EXIT: + mes "Very well... Come again soon!"; + next; + +B_EXIT2: + mes"[Manya]"; + mes "Thank you for using our Bank Service. We hope to see you again soon."; + cutin "kafra_06",255; + close; + }
\ No newline at end of file diff --git a/npc/other/mc_cameri/bank.txt b/npc/other/mc_cameri/bank.txt index 45216738b..25074f4c7 100644 --- a/npc/other/mc_cameri/bank.txt +++ b/npc/other/mc_cameri/bank.txt @@ -1,2794 +1,2794 @@ -//========================================================================================
-// -»» OmniAthena Scripts ««-
-// Copyright (c) 2004, Athena Advanced
-// http://agelessanime.com/aaforums/
-// By MC_Cameri
-// This Bank NPC doesn't need any items.
-// It is useful for servers in which you
-// lose zeny when you die.
-// Also, if you have 1,000,000,000z this
-// will be good to use.
-//========================================================================================
-//0072FF (sky blue)
-//FF7F01 (orange)
-
-prt_in.gat,165,141,4 script Bank Manager 109,{
- set @tInterestRate, 2; //no decimals
- set @tMaxAccZeny, 1000000000; //max zeny allowed in ^FF7F01Bank Account^000000 1,000,000,000=1 billion
- set @tMaxZeny, 1000000000; //max zeny that a player can carry
- set @tMinZeny, 100; //min zeny allowed or Bank Account is closed
- set @tCreateZeny, 500; //zeny needed in order to create a Bank Account
- set @tMinDeposit,100; //min zeny to deposit
- set @tBeginningZeny, 100; //amount of zeny in Bank Account after creating
- mes "^0072FF[Bank Manager]^000000";
- mes "Welcome to this office branch of Midgard's Bank.";
- next;
- if (vBankAccActive==1) goto AccMenu;
- mes "^0072FF[Bank Manager]^000000";
- mes "You don't have a ^FF7F01Bank Account^000000 yet, you must buy one.";
- mes "It will cost you ^0000FF" + @tCreateZeny + "z^000000 to create it.";
- next;
- menu "^FF7F01Create Account.^000000",CreateAcc,"^FF7F01Information.^000000",BankInfo,"^FF7F01No thanks.^000000",NoCreateAcc;
- BankInfo:
- mes "^0072FF[Bank Manager]^000000";
- mes "Here are some points that you need to know:";
- mes "1. To create a ^FF7F01Bank Account^000000 you have to pay ^0000FF" + @tCreateZeny + "z^000000.";
- mes "2. You will be charged ^0000FF" + @tInterestRate + " percent^000000 everytime you Deposit.";
- mes "3. You must always have no less than ^0000FF" + @tMinZeny + "z^000000 on your ^FF7F01Bank Account^000000.";
- next;
- mes "4. You can save up to ^0000FF" + @tMaxAccZeny + "z^000000 in your bank account.";
- mes "5. You will be able to access your ^FF7F01Bank Account^000000 in any town with a Bank Office.";
- mes "6. You will start by having ^0000FF" + @tBeginningZeny + "z^000000 in your bank account.";
- close;
- CreateAcc:
- mes "^0072FF[Bank Manager]^000000";
- mes "First of all, you will have to have at least ^0000FF" + @tCreateZeny + "z^000000 with you.";
- mes "Your account will start with ^0000FF" + @tBeginningZeny +"z^000000.";
- mes "Are you sure you want to continue?";
- next;
- menu "^FF7F01Sure.^000000",CreateAccCont,"^FF7F01Nah, it's ok.^000000",NoCreateAcc;
- CreateAccCont:
- if (@tCreateZeny > Zeny) goto CreateAccNoEnoughZeny;
- set Zeny, Zeny - @tCreateZeny;
- set vBankAccActive,1;
- set vBankAccZeny, @tBeginningZeny;
- set vBankAccLastZeny, @tBeginningZeny;
- set vBankAccInterests,0;
- mes "^0072FF[Bank Manager]^000000";
- mes "Congratulations, your ^FF7F01Bank Account^000000 is now created with ^0000FF" + vBankAccZeny + "z^000000.";
- mes "You may now proceed to do any transactions.";
- next;
- goto AccMenu;
- CreateAccNoEnoughZeny:
- mes "^0072FF[Bank Manager]^000000";
- mes "Didn't I tell you to make sure you had enough zeny?";
- mes "You can't create it with just ^0000FF" + Zeny + "z^000000.";
- mes "Come back when you get those ^0000FF" + @tCreateZeny + "z^000000...";
- next;
- goto EndNPC;
- NoCreateAcc:
- mes "^0072FF[Bank Manager]^000000";
- mes "Come back when you change your mind!";
- next;
- goto EndNPC;
- AccMenu:
- mes "^0072FF[Bank Manager]^000000";
- mes "Your current balance is ^0000FF" + vBankAccZeny +"z^000000.";
- mes "What would you like to do now?";
- next;
- menu "^FF7F01Deposit.^000000",AccDeposit,"^FF7F01Withdraw.^000000",AccWithdraw,"^FF7F01Bank Account Info.^000000",AccBalance,"^FF7F01Close Bank Account^000000",AccClose,"^FF7F01Cancel.^000000",EndNPC;
- AccDeposit:
- mes "^0072FF[Bank Manager]^000000";
- mes "It's always good to deposit every once in a while.";
- mes "Be noticed that we charge a ^0000FF" + @tInterestRate + " percent ^000000 of interest rate in every deposit you make.";
- mes "This means that to deposit ^0000FF100z^000000 you need to have pay us ^0000FF" + 100 * @tInterestRate / 100 + "z^000000.";
- mes "How much are you willing to deposit?";
- next;
- AccDepositInput:
- input @tDeposit;
- set @tDepositTax, @tDeposit * @tInterestRate / 100;
- set @tDepositTotal, @tDeposit - @tDepositTax;
- if (@tDeposit <= 0) goto AccDepositNoInput;
- if (@tDeposit < @tMinDeposit) goto AccDepositNotEnoughInput;
- if (@tDepositTotal > Zeny) goto AccDepositNotEnoughZeny;
- set @tBankAccZenyTemp, vBankAccZeny + @tDepositTotal;
- if (@tBankAccZenyTemp > @tMaxAccZeny) goto AccDepositOver;
- if ((@tDeposit <= Zeny) && (@tBankAccZenyTemp <= @tMaxAccZeny)) goto AccDepositCont;
- mes "^0072FF[Bank Manager]^000000";
- mes "Sorry, for some weird reason I couldn't deposit your money.";
- next;
- goto AccMenu;
- AccDepositCont:
- set Zeny, Zeny - @tDeposit;
- set vBankAccLastZeny, vBankAccZeny;
- set vBankAccZeny, @tBankAccZenyTemp;
- set vBankAccInterests, vBankAccInterests + @tDepositTax;
- mes "^0072FF[Bank Manager]^000000";
- mes "Transaction completed successfully.";
- mes "^0000FF" + @tDeposit + "z^000000 substracted from your money (Taxes applied).";
- mes "^0000FF" + @tDepositTotal + "z^000000 successfully added to your ^FF7F01Bank Account^000000.";
- next;
- goto AccMenu;
- AccDepositOver:
- mes "^0072FF[Bank Manager]^000000";
- mes "There is a limit of ^0000FF" + @tMaxAccZeny + "z^000000 of how much zeny your ^FF7F01Bank Account^000000 can hold.";
- mes "You can't deposit more than that, please try again.";
- mes "Do you want to try again?";
- next;
- menu "^FF7F01Yes, please.^000000",AccDepositInput,"^FF7F01No, thanks.^000000",AccMenu;
- AccDepositNotEnoughInput:
- mes "^0072FF[Bank Manager]^000000";
- mes "You need to put more money in order to make a deposit.";
- mes "Do you want to try again?";
- next;
- menu "^FF7F01Yes, please.^000000",AccDepositInput,"^FF7F01No, thanks.^000000",AccMenu;
- AccDepositNoInput:
- mes "^0072FF[Bank Manager]^000000";
- mes "You must enter a value higher than ^0000FF" + @tMinDeposit + "z^000000.";
- mes "Do you want to try again?";
- next;
- menu "^FF7F01Yes, please.^000000",AccDepositInput,"^FF7F01No, thanks.^000000",AccMenu;
- AccDepositNotEnoughZeny:
- mes "^0072FF[Bank Manager]^000000";
- mes "You don't have ^0000FF" + @tDepositTotal + "z^000000.";
- mes "Remember that taxes are being applied.";
- mes "Do you want to try again?";
- next;
- menu "^FF7F01Yes, please.^000000",AccDepositInput,"^FF7F01No, thanks.^000000",AccMenu;
- AccWithdraw:
- mes "^0072FF[Bank Manager]^000000";
- mes "This is the only transaction I don't like... you figure out why...";
- mes "You can't withdraw leaving less than ^0000FF" + @tMinZeny +"z^000000 in your ^FF7F01Bank Account^000000.";
- mes "Your current balance is ^0000FF" + vBankAccZeny + "z^000000.";
- mes "How much are you going to widthdraw?";
- next;
- AccWithdrawInput:
- input @tWithdraw;
- set @tZenyLeft, vBankAccZeny - @tWithdraw;
- set @tZenyTemp, Zeny + @tWithdraw;
- if (@tWithdraw == 0) goto AccWithdrawNoInput;
- if (@tZenyLeft < @tMinZeny) goto AccWithdrawMinZeny;
- if (@tZenyTemp > @tMaxZeny) goto AccWithDrawOverCharZeny;
- set Zeny, Zeny + @tWithdraw;
- set vBankAccLastZeny, vBankAccZeny;
- set vBankAccZeny, vBankAccZeny - @tWithdraw;
- mes "^0072FF[Bank Manager]^000000";
- mes "Transaction completed successfully.";
- mes "Thank you for using our services.";
- next;
- goto AccMenu;
- AccWithdrawNoInput:
- mes "^0072FF[Bank Manager]^000000";
- mes "In order to withdraw from the bank, you must withdraw more than 0 zeny.";
- mes "Do you want to try again?";
- next;
- menu "^FF7F01Yes, please.^000000",AccWithdrawInput,"^FF7F01No, thanks.^000000",AccMenu;
- AccWithdrawMinZeny:
- mes "^0072FF[Bank Manager]^000000";
- mes "I'm sorry...";
- mes "You can't withdraw ^0000FF" + @tWithdraw + "z^000000 because your ^FF7F01Bank Account^000000 must have ^0000FF" + @tMinZeny + "z^000000 left or more at all times.";
- mes "In order to take all your money from the bank you must select Close Account in the Account Menu.";
- mes "Do you want to try again?";
- next;
- menu "^FF7F01Yes, please.^000000",AccWithdrawInput,"^FF7F01No, thanks.^000000",AccMenu;
- AccWithDrawOverCharZeny:
- mes "^0072FF[Bank Manager]^000000";
- mes "Sorry, but you can't withdraw ^0000FF" + @tWithdraw + "z^000000 because your Player can't carry more than ^0000FF" + @tMaxZeny + "z^000000.";
- mes "Do you want to try again?";
- next;
- menu "^FF7F01Yes, please.^000000",AccWithdrawInput,"^FF7F01No, thanks.^000000",AccMenu;
- AccBalance:
- mes "^0072FF[Bank Manager]^000000";
- mes "Account Status:";
- //shown in blue if the same or more, show in red if less than previous balance
- if (vBankAccZeny >= vBankAccLastZeny) goto AccBalance2;
- mes "Current Balance: ^FF0000" + vBankAccZeny +"z^000000.";
- goto AccBalance3;
- AccBalance2:
- mes "Current Balance: ^0000FF" + vBankAccZeny +"z^000000.";
- goto AccBalance3;
- AccBalance3:
- mes "Previous Balance: ^0000FF" + vBankAccLastZeny +"z^000000.";
- mes "Interest Rate: ^0000FF" + @tInterestRate + "%^000000.";
- mes "Interests Payed: ^0000FF" + vBankAccInterests + "z^000000.";
- next;
- goto AccMenu;
- AccClose:
- mes "^0072FF[Bank Manager]^000000";
- mes "If you close your ^FF7F01Bank Account^000000, it means you eliminate it.";
- mes "Of course, you will get all your money back.";
- mes "Are you sure you want to close your ^FF7F01Bank Account^000000?";
- next;
- menu "^FF7F01I don't want it anymore.^000000",AccCloseConfirm,"^FF7F01No, I'll keep it.^000000",AccCloseKeep;
- AccCloseConfirm:
- set vBankAccActive,0;
- set Zeny, Zeny + vBankAccZeny;
- set vBankAccZeny,0;
- set vBankAccLastZeny,0;
- set vBankAccInterests,0;
- mes "^0072FF[Bank Manager]^000000";
- mes "Thanks for using our services, we hope you come back to visit us.";
- mes "Here's your money.";
- next;
- goto EndNPC;
- AccCloseKeep:
- mes "^0072FF[Bank Manager]^000000";
- mes "Good choice, thanks for staying with us.";
- next;
- goto AccMenu;
- EndNPC:
- set @random,rand(4);
- mes "^0072FF[Bank Manager]^000000";
- if (@random == 0) mes "Have a nice day!";
- if (@random == 1) mes "See you soon!";
- if (@random == 2) mes "See you next time!";
- if (@random == 3) mes "Come back soon!";
- close;
-}
-
-izlude_in.gat,57,110,4 script Bank Manager 109,{
- set @tInterestRate, 2; //no decimals
- set @tMaxAccZeny, 1000000000; //max zeny allowed in ^FF7F01Bank Account^000000 1,000,000,000=1 billion
- set @tMaxZeny, 1000000000; //max zeny that a player can carry
- set @tMinZeny, 100; //min zeny allowed or Bank Account is closed
- set @tCreateZeny, 500; //zeny needed in order to create a Bank Account
- set @tMinDeposit,100; //min zeny to deposit
- set @tBeginningZeny, 100; //amount of zeny in Bank Account after creating
- mes "^0072FF[Bank Manager]^000000";
- mes "Welcome to this office branch of Midgard's Bank.";
- next;
- if (vBankAccActive==1) goto AccMenu;
- mes "^0072FF[Bank Manager]^000000";
- mes "You don't have a ^FF7F01Bank Account^000000 yet, you must buy one.";
- mes "It will cost you ^0000FF" + @tCreateZeny + "z^000000 to create it.";
- next;
- menu "^FF7F01Create Account.^000000",CreateAcc,"^FF7F01Information.^000000",BankInfo,"^FF7F01No thanks.^000000",NoCreateAcc;
- BankInfo:
- mes "^0072FF[Bank Manager]^000000";
- mes "Here are some points that you need to know:";
- mes "1. To create a ^FF7F01Bank Account^000000 you have to pay ^0000FF" + @tCreateZeny + "z^000000.";
- mes "2. You will be charged ^0000FF" + @tInterestRate + " percent^000000 everytime you Deposit.";
- mes "3. You must always have no less than ^0000FF" + @tMinZeny + "z^000000 on your ^FF7F01Bank Account^000000.";
- next;
- mes "4. You can save up to ^0000FF" + @tMaxAccZeny + "z^000000 in your bank account.";
- mes "5. You will be able to access your ^FF7F01Bank Account^000000 in any town with a Bank Office.";
- mes "6. You will start by having ^0000FF" + @tBeginningZeny + "z^000000 in your bank account.";
- close;
- CreateAcc:
- mes "^0072FF[Bank Manager]^000000";
- mes "First of all, you will have to have at least ^0000FF" + @tCreateZeny + "z^000000 with you.";
- mes "Your account will start with ^0000FF" + @tBeginningZeny +"z^000000.";
- mes "Are you sure you want to continue?";
- next;
- menu "^FF7F01Sure.^000000",CreateAccCont,"^FF7F01Nah, it's ok.^000000",NoCreateAcc;
- CreateAccCont:
- if (@tCreateZeny > Zeny) goto CreateAccNoEnoughZeny;
- set Zeny, Zeny - @tCreateZeny;
- set vBankAccActive,1;
- set vBankAccZeny, @tBeginningZeny;
- set vBankAccLastZeny, @tBeginningZeny;
- set vBankAccInterests,0;
- mes "^0072FF[Bank Manager]^000000";
- mes "Congratulations, your ^FF7F01Bank Account^000000 is now created with ^0000FF" + vBankAccZeny + "z^000000.";
- mes "You may now proceed to do any transactions.";
- next;
- goto AccMenu;
- CreateAccNoEnoughZeny:
- mes "^0072FF[Bank Manager]^000000";
- mes "Didn't I tell you to make sure you had enough zeny?";
- mes "You can't create it with just ^0000FF" + Zeny + "z^000000.";
- mes "Come back when you get those ^0000FF" + @tCreateZeny + "z^000000...";
- next;
- goto EndNPC;
- NoCreateAcc:
- mes "^0072FF[Bank Manager]^000000";
- mes "Come back when you change your mind!";
- next;
- goto EndNPC;
- AccMenu:
- mes "^0072FF[Bank Manager]^000000";
- mes "Your current balance is ^0000FF" + vBankAccZeny +"z^000000.";
- mes "What would you like to do now?";
- next;
- menu "^FF7F01Deposit.^000000",AccDeposit,"^FF7F01Withdraw.^000000",AccWithdraw,"^FF7F01Bank Account Info.^000000",AccBalance,"^FF7F01Close Bank Account^000000",AccClose,"^FF7F01Cancel.^000000",EndNPC;
- AccDeposit:
- mes "^0072FF[Bank Manager]^000000";
- mes "It's always good to deposit every once in a while.";
- mes "Be noticed that we charge a ^0000FF" + @tInterestRate + " percent ^000000 of interest rate in every deposit you make.";
- mes "This means that to deposit ^0000FF100z^000000 you need to have pay us ^0000FF" + 100 * @tInterestRate / 100 + "z^000000.";
- mes "How much are you willing to deposit?";
- next;
- AccDepositInput:
- input @tDeposit;
- set @tDepositTax, @tDeposit * @tInterestRate / 100;
- set @tDepositTotal, @tDeposit - @tDepositTax;
- if (@tDeposit <= 0) goto AccDepositNoInput;
- if (@tDeposit < @tMinDeposit) goto AccDepositNotEnoughInput;
- if (@tDepositTotal > Zeny) goto AccDepositNotEnoughZeny;
- set @tBankAccZenyTemp, vBankAccZeny + @tDepositTotal;
- if (@tBankAccZenyTemp > @tMaxAccZeny) goto AccDepositOver;
- if ((@tDeposit <= Zeny) && (@tBankAccZenyTemp <= @tMaxAccZeny)) goto AccDepositCont;
- mes "^0072FF[Bank Manager]^000000";
- mes "Sorry, for some weird reason I couldn't deposit your money.";
- next;
- goto AccMenu;
- AccDepositCont:
- set Zeny, Zeny - @tDeposit;
- set vBankAccLastZeny, vBankAccZeny;
- set vBankAccZeny, @tBankAccZenyTemp;
- set vBankAccInterests, vBankAccInterests + @tDepositTax;
- mes "^0072FF[Bank Manager]^000000";
- mes "Transaction completed successfully.";
- mes "^0000FF" + @tDeposit + "z^000000 substracted from your money (Taxes applied).";
- mes "^0000FF" + @tDepositTotal + "z^000000 successfully added to your ^FF7F01Bank Account^000000.";
- next;
- goto AccMenu;
- AccDepositOver:
- mes "^0072FF[Bank Manager]^000000";
- mes "There is a limit of ^0000FF" + @tMaxAccZeny + "z^000000 of how much zeny your ^FF7F01Bank Account^000000 can hold.";
- mes "You can't deposit more than that, please try again.";
- mes "Do you want to try again?";
- next;
- menu "^FF7F01Yes, please.^000000",AccDepositInput,"^FF7F01No, thanks.^000000",AccMenu;
- AccDepositNotEnoughInput:
- mes "^0072FF[Bank Manager]^000000";
- mes "You need to put more money in order to make a deposit.";
- mes "Do you want to try again?";
- next;
- menu "^FF7F01Yes, please.^000000",AccDepositInput,"^FF7F01No, thanks.^000000",AccMenu;
- AccDepositNoInput:
- mes "^0072FF[Bank Manager]^000000";
- mes "You must enter a value higher than ^0000FF" + @tMinDeposit + "z^000000.";
- mes "Do you want to try again?";
- next;
- menu "^FF7F01Yes, please.^000000",AccDepositInput,"^FF7F01No, thanks.^000000",AccMenu;
- AccDepositNotEnoughZeny:
- mes "^0072FF[Bank Manager]^000000";
- mes "You don't have ^0000FF" + @tDepositTotal + "z^000000.";
- mes "Remember that taxes are being applied.";
- mes "Do you want to try again?";
- next;
- menu "^FF7F01Yes, please.^000000",AccDepositInput,"^FF7F01No, thanks.^000000",AccMenu;
- AccWithdraw:
- mes "^0072FF[Bank Manager]^000000";
- mes "This is the only transaction I don't like... you figure out why...";
- mes "You can't withdraw leaving less than ^0000FF" + @tMinZeny +"z^000000 in your ^FF7F01Bank Account^000000.";
- mes "Your current balance is ^0000FF" + vBankAccZeny + "z^000000.";
- mes "How much are you going to widthdraw?";
- next;
- AccWithdrawInput:
- input @tWithdraw;
- set @tZenyLeft, vBankAccZeny - @tWithdraw;
- set @tZenyTemp, Zeny + @tWithdraw;
- if (@tWithdraw == 0) goto AccWithdrawNoInput;
- if (@tZenyLeft < @tMinZeny) goto AccWithdrawMinZeny;
- if (@tZenyTemp > @tMaxZeny) goto AccWithDrawOverCharZeny;
- set Zeny, Zeny + @tWithdraw;
- set vBankAccLastZeny, vBankAccZeny;
- set vBankAccZeny, vBankAccZeny - @tWithdraw;
- mes "^0072FF[Bank Manager]^000000";
- mes "Transaction completed successfully.";
- mes "Thank you for using our services.";
- next;
- goto AccMenu;
- AccWithdrawNoInput:
- mes "^0072FF[Bank Manager]^000000";
- mes "In order to withdraw from the bank, you must withdraw more than 0 zeny.";
- mes "Do you want to try again?";
- next;
- menu "^FF7F01Yes, please.^000000",AccWithdrawInput,"^FF7F01No, thanks.^000000",AccMenu;
- AccWithdrawMinZeny:
- mes "^0072FF[Bank Manager]^000000";
- mes "I'm sorry...";
- mes "You can't withdraw ^0000FF" + @tWithdraw + "z^000000 because your ^FF7F01Bank Account^000000 must have ^0000FF" + @tMinZeny + "z^000000 left or more at all times.";
- mes "In order to take all your money from the bank you must select Close Account in the Account Menu.";
- mes "Do you want to try again?";
- next;
- menu "^FF7F01Yes, please.^000000",AccWithdrawInput,"^FF7F01No, thanks.^000000",AccMenu;
- AccWithDrawOverCharZeny:
- mes "^0072FF[Bank Manager]^000000";
- mes "Sorry, but you can't withdraw ^0000FF" + @tWithdraw + "z^000000 because your Player can't carry more than ^0000FF" + @tMaxZeny + "z^000000.";
- mes "Do you want to try again?";
- next;
- menu "^FF7F01Yes, please.^000000",AccWithdrawInput,"^FF7F01No, thanks.^000000",AccMenu;
- AccBalance:
- mes "^0072FF[Bank Manager]^000000";
- mes "Account Status:";
- //shown in blue if the same or more, show in red if less than previous balance
- if (vBankAccZeny >= vBankAccLastZeny) goto AccBalance2;
- mes "Current Balance: ^FF0000" + vBankAccZeny +"z^000000.";
- goto AccBalance3;
- AccBalance2:
- mes "Current Balance: ^0000FF" + vBankAccZeny +"z^000000.";
- goto AccBalance3;
- AccBalance3:
- mes "Previous Balance: ^0000FF" + vBankAccLastZeny +"z^000000.";
- mes "Interest Rate: ^0000FF" + @tInterestRate + "%^000000.";
- mes "Interests Payed: ^0000FF" + vBankAccInterests + "z^000000.";
- next;
- goto AccMenu;
- AccClose:
- mes "^0072FF[Bank Manager]^000000";
- mes "If you close your ^FF7F01Bank Account^000000, it means you eliminate it.";
- mes "Of course, you will get all your money back.";
- mes "Are you sure you want to close your ^FF7F01Bank Account^000000?";
- next;
- menu "^FF7F01I don't want it anymore.^000000",AccCloseConfirm,"^FF7F01No, I'll keep it.^000000",AccCloseKeep;
- AccCloseConfirm:
- set vBankAccActive,0;
- set Zeny, Zeny + vBankAccZeny;
- set vBankAccZeny,0;
- set vBankAccLastZeny,0;
- set vBankAccInterests,0;
- mes "^0072FF[Bank Manager]^000000";
- mes "Thanks for using our services, we hope you come back to visit us.";
- mes "Here's your money.";
- next;
- goto EndNPC;
- AccCloseKeep:
- mes "^0072FF[Bank Manager]^000000";
- mes "Good choice, thanks for staying with us.";
- next;
- goto AccMenu;
- EndNPC:
- set @random,rand(4);
- mes "^0072FF[Bank Manager]^000000";
- if (@random == 0) mes "Have a nice day!";
- if (@random == 1) mes "See you soon!";
- if (@random == 2) mes "See you next time!";
- if (@random == 3) mes "Come back soon!";
- close;
-}
-
-morocc_in.gat,142,64,3 script Bank Manager 109,{
- set @tInterestRate, 2; //no decimals
- set @tMaxAccZeny, 1000000000; //max zeny allowed in ^FF7F01Bank Account^000000 1,000,000,000=1 billion
- set @tMaxZeny, 1000000000; //max zeny that a player can carry
- set @tMinZeny, 100; //min zeny allowed or Bank Account is closed
- set @tCreateZeny, 500; //zeny needed in order to create a Bank Account
- set @tMinDeposit,100; //min zeny to deposit
- set @tBeginningZeny, 100; //amount of zeny in Bank Account after creating
- mes "^0072FF[Bank Manager]^000000";
- mes "Welcome to this office branch of Midgard's Bank.";
- next;
- if (vBankAccActive==1) goto AccMenu;
- mes "^0072FF[Bank Manager]^000000";
- mes "You don't have a ^FF7F01Bank Account^000000 yet, you must buy one.";
- mes "It will cost you ^0000FF" + @tCreateZeny + "z^000000 to create it.";
- next;
- menu "^FF7F01Create Account.^000000",CreateAcc,"^FF7F01Information.^000000",BankInfo,"^FF7F01No thanks.^000000",NoCreateAcc;
- BankInfo:
- mes "^0072FF[Bank Manager]^000000";
- mes "Here are some points that you need to know:";
- mes "1. To create a ^FF7F01Bank Account^000000 you have to pay ^0000FF" + @tCreateZeny + "z^000000.";
- mes "2. You will be charged ^0000FF" + @tInterestRate + " percent^000000 everytime you Deposit.";
- mes "3. You must always have no less than ^0000FF" + @tMinZeny + "z^000000 on your ^FF7F01Bank Account^000000.";
- next;
- mes "4. You can save up to ^0000FF" + @tMaxAccZeny + "z^000000 in your bank account.";
- mes "5. You will be able to access your ^FF7F01Bank Account^000000 in any town with a Bank Office.";
- mes "6. You will start by having ^0000FF" + @tBeginningZeny + "z^000000 in your bank account.";
- close;
- CreateAcc:
- mes "^0072FF[Bank Manager]^000000";
- mes "First of all, you will have to have at least ^0000FF" + @tCreateZeny + "z^000000 with you.";
- mes "Your account will start with ^0000FF" + @tBeginningZeny +"z^000000.";
- mes "Are you sure you want to continue?";
- next;
- menu "^FF7F01Sure.^000000",CreateAccCont,"^FF7F01Nah, it's ok.^000000",NoCreateAcc;
- CreateAccCont:
- if (@tCreateZeny > Zeny) goto CreateAccNoEnoughZeny;
- set Zeny, Zeny - @tCreateZeny;
- set vBankAccActive,1;
- set vBankAccZeny, @tBeginningZeny;
- set vBankAccLastZeny, @tBeginningZeny;
- set vBankAccInterests,0;
- mes "^0072FF[Bank Manager]^000000";
- mes "Congratulations, your ^FF7F01Bank Account^000000 is now created with ^0000FF" + vBankAccZeny + "z^000000.";
- mes "You may now proceed to do any transactions.";
- next;
- goto AccMenu;
- CreateAccNoEnoughZeny:
- mes "^0072FF[Bank Manager]^000000";
- mes "Didn't I tell you to make sure you had enough zeny?";
- mes "You can't create it with just ^0000FF" + Zeny + "z^000000.";
- mes "Come back when you get those ^0000FF" + @tCreateZeny + "z^000000...";
- next;
- goto EndNPC;
- NoCreateAcc:
- mes "^0072FF[Bank Manager]^000000";
- mes "Come back when you change your mind!";
- next;
- goto EndNPC;
- AccMenu:
- mes "^0072FF[Bank Manager]^000000";
- mes "Your current balance is ^0000FF" + vBankAccZeny +"z^000000.";
- mes "What would you like to do now?";
- next;
- menu "^FF7F01Deposit.^000000",AccDeposit,"^FF7F01Withdraw.^000000",AccWithdraw,"^FF7F01Bank Account Info.^000000",AccBalance,"^FF7F01Close Bank Account^000000",AccClose,"^FF7F01Cancel.^000000",EndNPC;
- AccDeposit:
- mes "^0072FF[Bank Manager]^000000";
- mes "It's always good to deposit every once in a while.";
- mes "Be noticed that we charge a ^0000FF" + @tInterestRate + " percent ^000000 of interest rate in every deposit you make.";
- mes "This means that to deposit ^0000FF100z^000000 you need to have pay us ^0000FF" + 100 * @tInterestRate / 100 + "z^000000.";
- mes "How much are you willing to deposit?";
- next;
- AccDepositInput:
- input @tDeposit;
- set @tDepositTax, @tDeposit * @tInterestRate / 100;
- set @tDepositTotal, @tDeposit - @tDepositTax;
- if (@tDeposit <= 0) goto AccDepositNoInput;
- if (@tDeposit < @tMinDeposit) goto AccDepositNotEnoughInput;
- if (@tDepositTotal > Zeny) goto AccDepositNotEnoughZeny;
- set @tBankAccZenyTemp, vBankAccZeny + @tDepositTotal;
- if (@tBankAccZenyTemp > @tMaxAccZeny) goto AccDepositOver;
- if ((@tDeposit <= Zeny) && (@tBankAccZenyTemp <= @tMaxAccZeny)) goto AccDepositCont;
- mes "^0072FF[Bank Manager]^000000";
- mes "Sorry, for some weird reason I couldn't deposit your money.";
- next;
- goto AccMenu;
- AccDepositCont:
- set Zeny, Zeny - @tDeposit;
- set vBankAccLastZeny, vBankAccZeny;
- set vBankAccZeny, @tBankAccZenyTemp;
- set vBankAccInterests, vBankAccInterests + @tDepositTax;
- mes "^0072FF[Bank Manager]^000000";
- mes "Transaction completed successfully.";
- mes "^0000FF" + @tDeposit + "z^000000 substracted from your money (Taxes applied).";
- mes "^0000FF" + @tDepositTotal + "z^000000 successfully added to your ^FF7F01Bank Account^000000.";
- next;
- goto AccMenu;
- AccDepositOver:
- mes "^0072FF[Bank Manager]^000000";
- mes "There is a limit of ^0000FF" + @tMaxAccZeny + "z^000000 of how much zeny your ^FF7F01Bank Account^000000 can hold.";
- mes "You can't deposit more than that, please try again.";
- mes "Do you want to try again?";
- next;
- menu "^FF7F01Yes, please.^000000",AccDepositInput,"^FF7F01No, thanks.^000000",AccMenu;
- AccDepositNotEnoughInput:
- mes "^0072FF[Bank Manager]^000000";
- mes "You need to put more money in order to make a deposit.";
- mes "Do you want to try again?";
- next;
- menu "^FF7F01Yes, please.^000000",AccDepositInput,"^FF7F01No, thanks.^000000",AccMenu;
- AccDepositNoInput:
- mes "^0072FF[Bank Manager]^000000";
- mes "You must enter a value higher than ^0000FF" + @tMinDeposit + "z^000000.";
- mes "Do you want to try again?";
- next;
- menu "^FF7F01Yes, please.^000000",AccDepositInput,"^FF7F01No, thanks.^000000",AccMenu;
- AccDepositNotEnoughZeny:
- mes "^0072FF[Bank Manager]^000000";
- mes "You don't have ^0000FF" + @tDepositTotal + "z^000000.";
- mes "Remember that taxes are being applied.";
- mes "Do you want to try again?";
- next;
- menu "^FF7F01Yes, please.^000000",AccDepositInput,"^FF7F01No, thanks.^000000",AccMenu;
- AccWithdraw:
- mes "^0072FF[Bank Manager]^000000";
- mes "This is the only transaction I don't like... you figure out why...";
- mes "You can't withdraw leaving less than ^0000FF" + @tMinZeny +"z^000000 in your ^FF7F01Bank Account^000000.";
- mes "Your current balance is ^0000FF" + vBankAccZeny + "z^000000.";
- mes "How much are you going to widthdraw?";
- next;
- AccWithdrawInput:
- input @tWithdraw;
- set @tZenyLeft, vBankAccZeny - @tWithdraw;
- set @tZenyTemp, Zeny + @tWithdraw;
- if (@tWithdraw == 0) goto AccWithdrawNoInput;
- if (@tZenyLeft < @tMinZeny) goto AccWithdrawMinZeny;
- if (@tZenyTemp > @tMaxZeny) goto AccWithDrawOverCharZeny;
- set Zeny, Zeny + @tWithdraw;
- set vBankAccLastZeny, vBankAccZeny;
- set vBankAccZeny, vBankAccZeny - @tWithdraw;
- mes "^0072FF[Bank Manager]^000000";
- mes "Transaction completed successfully.";
- mes "Thank you for using our services.";
- next;
- goto AccMenu;
- AccWithdrawNoInput:
- mes "^0072FF[Bank Manager]^000000";
- mes "In order to withdraw from the bank, you must withdraw more than 0 zeny.";
- mes "Do you want to try again?";
- next;
- menu "^FF7F01Yes, please.^000000",AccWithdrawInput,"^FF7F01No, thanks.^000000",AccMenu;
- AccWithdrawMinZeny:
- mes "^0072FF[Bank Manager]^000000";
- mes "I'm sorry...";
- mes "You can't withdraw ^0000FF" + @tWithdraw + "z^000000 because your ^FF7F01Bank Account^000000 must have ^0000FF" + @tMinZeny + "z^000000 left or more at all times.";
- mes "In order to take all your money from the bank you must select Close Account in the Account Menu.";
- mes "Do you want to try again?";
- next;
- menu "^FF7F01Yes, please.^000000",AccWithdrawInput,"^FF7F01No, thanks.^000000",AccMenu;
- AccWithDrawOverCharZeny:
- mes "^0072FF[Bank Manager]^000000";
- mes "Sorry, but you can't withdraw ^0000FF" + @tWithdraw + "z^000000 because your Player can't carry more than ^0000FF" + @tMaxZeny + "z^000000.";
- mes "Do you want to try again?";
- next;
- menu "^FF7F01Yes, please.^000000",AccWithdrawInput,"^FF7F01No, thanks.^000000",AccMenu;
- AccBalance:
- mes "^0072FF[Bank Manager]^000000";
- mes "Account Status:";
- //shown in blue if the same or more, show in red if less than previous balance
- if (vBankAccZeny >= vBankAccLastZeny) goto AccBalance2;
- mes "Current Balance: ^FF0000" + vBankAccZeny +"z^000000.";
- goto AccBalance3;
- AccBalance2:
- mes "Current Balance: ^0000FF" + vBankAccZeny +"z^000000.";
- goto AccBalance3;
- AccBalance3:
- mes "Previous Balance: ^0000FF" + vBankAccLastZeny +"z^000000.";
- mes "Interest Rate: ^0000FF" + @tInterestRate + "%^000000.";
- mes "Interests Payed: ^0000FF" + vBankAccInterests + "z^000000.";
- next;
- goto AccMenu;
- AccClose:
- mes "^0072FF[Bank Manager]^000000";
- mes "If you close your ^FF7F01Bank Account^000000, it means you eliminate it.";
- mes "Of course, you will get all your money back.";
- mes "Are you sure you want to close your ^FF7F01Bank Account^000000?";
- next;
- menu "^FF7F01I don't want it anymore.^000000",AccCloseConfirm,"^FF7F01No, I'll keep it.^000000",AccCloseKeep;
- AccCloseConfirm:
- set vBankAccActive,0;
- set Zeny, Zeny + vBankAccZeny;
- set vBankAccZeny,0;
- set vBankAccLastZeny,0;
- set vBankAccInterests,0;
- mes "^0072FF[Bank Manager]^000000";
- mes "Thanks for using our services, we hope you come back to visit us.";
- mes "Here's your money.";
- next;
- goto EndNPC;
- AccCloseKeep:
- mes "^0072FF[Bank Manager]^000000";
- mes "Good choice, thanks for staying with us.";
- next;
- goto AccMenu;
- EndNPC:
- set @random,rand(4);
- mes "^0072FF[Bank Manager]^000000";
- if (@random == 0) mes "Have a nice day!";
- if (@random == 1) mes "See you soon!";
- if (@random == 2) mes "See you next time!";
- if (@random == 3) mes "Come back soon!";
- close;
-}
-geffen_in.gat,77,169,2 script Bank Manager 109,{
- set @tInterestRate, 2; //no decimals
- set @tMaxAccZeny, 1000000000; //max zeny allowed in ^FF7F01Bank Account^000000 1,000,000,000=1 billion
- set @tMaxZeny, 1000000000; //max zeny that a player can carry
- set @tMinZeny, 100; //min zeny allowed or Bank Account is closed
- set @tCreateZeny, 500; //zeny needed in order to create a Bank Account
- set @tMinDeposit,100; //min zeny to deposit
- set @tBeginningZeny, 100; //amount of zeny in Bank Account after creating
- mes "^0072FF[Bank Manager]^000000";
- mes "Welcome to this office branch of Midgard's Bank.";
- next;
- if (vBankAccActive==1) goto AccMenu;
- mes "^0072FF[Bank Manager]^000000";
- mes "You don't have a ^FF7F01Bank Account^000000 yet, you must buy one.";
- mes "It will cost you ^0000FF" + @tCreateZeny + "z^000000 to create it.";
- next;
- menu "^FF7F01Create Account.^000000",CreateAcc,"^FF7F01Information.^000000",BankInfo,"^FF7F01No thanks.^000000",NoCreateAcc;
- BankInfo:
- mes "^0072FF[Bank Manager]^000000";
- mes "Here are some points that you need to know:";
- mes "1. To create a ^FF7F01Bank Account^000000 you have to pay ^0000FF" + @tCreateZeny + "z^000000.";
- mes "2. You will be charged ^0000FF" + @tInterestRate + " percent^000000 everytime you Deposit.";
- mes "3. You must always have no less than ^0000FF" + @tMinZeny + "z^000000 on your ^FF7F01Bank Account^000000.";
- next;
- mes "4. You can save up to ^0000FF" + @tMaxAccZeny + "z^000000 in your bank account.";
- mes "5. You will be able to access your ^FF7F01Bank Account^000000 in any town with a Bank Office.";
- mes "6. You will start by having ^0000FF" + @tBeginningZeny + "z^000000 in your bank account.";
- close;
- CreateAcc:
- mes "^0072FF[Bank Manager]^000000";
- mes "First of all, you will have to have at least ^0000FF" + @tCreateZeny + "z^000000 with you.";
- mes "Your account will start with ^0000FF" + @tBeginningZeny +"z^000000.";
- mes "Are you sure you want to continue?";
- next;
- menu "^FF7F01Sure.^000000",CreateAccCont,"^FF7F01Nah, it's ok.^000000",NoCreateAcc;
- CreateAccCont:
- if (@tCreateZeny > Zeny) goto CreateAccNoEnoughZeny;
- set Zeny, Zeny - @tCreateZeny;
- set vBankAccActive,1;
- set vBankAccZeny, @tBeginningZeny;
- set vBankAccLastZeny, @tBeginningZeny;
- set vBankAccInterests,0;
- mes "^0072FF[Bank Manager]^000000";
- mes "Congratulations, your ^FF7F01Bank Account^000000 is now created with ^0000FF" + vBankAccZeny + "z^000000.";
- mes "You may now proceed to do any transactions.";
- next;
- goto AccMenu;
- CreateAccNoEnoughZeny:
- mes "^0072FF[Bank Manager]^000000";
- mes "Didn't I tell you to make sure you had enough zeny?";
- mes "You can't create it with just ^0000FF" + Zeny + "z^000000.";
- mes "Come back when you get those ^0000FF" + @tCreateZeny + "z^000000...";
- next;
- goto EndNPC;
- NoCreateAcc:
- mes "^0072FF[Bank Manager]^000000";
- mes "Come back when you change your mind!";
- next;
- goto EndNPC;
- AccMenu:
- mes "^0072FF[Bank Manager]^000000";
- mes "Your current balance is ^0000FF" + vBankAccZeny +"z^000000.";
- mes "What would you like to do now?";
- next;
- menu "^FF7F01Deposit.^000000",AccDeposit,"^FF7F01Withdraw.^000000",AccWithdraw,"^FF7F01Bank Account Info.^000000",AccBalance,"^FF7F01Close Bank Account^000000",AccClose,"^FF7F01Cancel.^000000",EndNPC;
- AccDeposit:
- mes "^0072FF[Bank Manager]^000000";
- mes "It's always good to deposit every once in a while.";
- mes "Be noticed that we charge a ^0000FF" + @tInterestRate + " percent ^000000 of interest rate in every deposit you make.";
- mes "This means that to deposit ^0000FF100z^000000 you need to have pay us ^0000FF" + 100 * @tInterestRate / 100 + "z^000000.";
- mes "How much are you willing to deposit?";
- next;
- AccDepositInput:
- input @tDeposit;
- set @tDepositTax, @tDeposit * @tInterestRate / 100;
- set @tDepositTotal, @tDeposit - @tDepositTax;
- if (@tDeposit <= 0) goto AccDepositNoInput;
- if (@tDeposit < @tMinDeposit) goto AccDepositNotEnoughInput;
- if (@tDepositTotal > Zeny) goto AccDepositNotEnoughZeny;
- set @tBankAccZenyTemp, vBankAccZeny + @tDepositTotal;
- if (@tBankAccZenyTemp > @tMaxAccZeny) goto AccDepositOver;
- if ((@tDeposit <= Zeny) && (@tBankAccZenyTemp <= @tMaxAccZeny)) goto AccDepositCont;
- mes "^0072FF[Bank Manager]^000000";
- mes "Sorry, for some weird reason I couldn't deposit your money.";
- next;
- goto AccMenu;
- AccDepositCont:
- set Zeny, Zeny - @tDeposit;
- set vBankAccLastZeny, vBankAccZeny;
- set vBankAccZeny, @tBankAccZenyTemp;
- set vBankAccInterests, vBankAccInterests + @tDepositTax;
- mes "^0072FF[Bank Manager]^000000";
- mes "Transaction completed successfully.";
- mes "^0000FF" + @tDeposit + "z^000000 substracted from your money (Taxes applied).";
- mes "^0000FF" + @tDepositTotal + "z^000000 successfully added to your ^FF7F01Bank Account^000000.";
- next;
- goto AccMenu;
- AccDepositOver:
- mes "^0072FF[Bank Manager]^000000";
- mes "There is a limit of ^0000FF" + @tMaxAccZeny + "z^000000 of how much zeny your ^FF7F01Bank Account^000000 can hold.";
- mes "You can't deposit more than that, please try again.";
- mes "Do you want to try again?";
- next;
- menu "^FF7F01Yes, please.^000000",AccDepositInput,"^FF7F01No, thanks.^000000",AccMenu;
- AccDepositNotEnoughInput:
- mes "^0072FF[Bank Manager]^000000";
- mes "You need to put more money in order to make a deposit.";
- mes "Do you want to try again?";
- next;
- menu "^FF7F01Yes, please.^000000",AccDepositInput,"^FF7F01No, thanks.^000000",AccMenu;
- AccDepositNoInput:
- mes "^0072FF[Bank Manager]^000000";
- mes "You must enter a value higher than ^0000FF" + @tMinDeposit + "z^000000.";
- mes "Do you want to try again?";
- next;
- menu "^FF7F01Yes, please.^000000",AccDepositInput,"^FF7F01No, thanks.^000000",AccMenu;
- AccDepositNotEnoughZeny:
- mes "^0072FF[Bank Manager]^000000";
- mes "You don't have ^0000FF" + @tDepositTotal + "z^000000.";
- mes "Remember that taxes are being applied.";
- mes "Do you want to try again?";
- next;
- menu "^FF7F01Yes, please.^000000",AccDepositInput,"^FF7F01No, thanks.^000000",AccMenu;
- AccWithdraw:
- mes "^0072FF[Bank Manager]^000000";
- mes "This is the only transaction I don't like... you figure out why...";
- mes "You can't withdraw leaving less than ^0000FF" + @tMinZeny +"z^000000 in your ^FF7F01Bank Account^000000.";
- mes "Your current balance is ^0000FF" + vBankAccZeny + "z^000000.";
- mes "How much are you going to widthdraw?";
- next;
- AccWithdrawInput:
- input @tWithdraw;
- set @tZenyLeft, vBankAccZeny - @tWithdraw;
- set @tZenyTemp, Zeny + @tWithdraw;
- if (@tWithdraw == 0) goto AccWithdrawNoInput;
- if (@tZenyLeft < @tMinZeny) goto AccWithdrawMinZeny;
- if (@tZenyTemp > @tMaxZeny) goto AccWithDrawOverCharZeny;
- set Zeny, Zeny + @tWithdraw;
- set vBankAccLastZeny, vBankAccZeny;
- set vBankAccZeny, vBankAccZeny - @tWithdraw;
- mes "^0072FF[Bank Manager]^000000";
- mes "Transaction completed successfully.";
- mes "Thank you for using our services.";
- next;
- goto AccMenu;
- AccWithdrawNoInput:
- mes "^0072FF[Bank Manager]^000000";
- mes "In order to withdraw from the bank, you must withdraw more than 0 zeny.";
- mes "Do you want to try again?";
- next;
- menu "^FF7F01Yes, please.^000000",AccWithdrawInput,"^FF7F01No, thanks.^000000",AccMenu;
- AccWithdrawMinZeny:
- mes "^0072FF[Bank Manager]^000000";
- mes "I'm sorry...";
- mes "You can't withdraw ^0000FF" + @tWithdraw + "z^000000 because your ^FF7F01Bank Account^000000 must have ^0000FF" + @tMinZeny + "z^000000 left or more at all times.";
- mes "In order to take all your money from the bank you must select Close Account in the Account Menu.";
- mes "Do you want to try again?";
- next;
- menu "^FF7F01Yes, please.^000000",AccWithdrawInput,"^FF7F01No, thanks.^000000",AccMenu;
- AccWithDrawOverCharZeny:
- mes "^0072FF[Bank Manager]^000000";
- mes "Sorry, but you can't withdraw ^0000FF" + @tWithdraw + "z^000000 because your Player can't carry more than ^0000FF" + @tMaxZeny + "z^000000.";
- mes "Do you want to try again?";
- next;
- menu "^FF7F01Yes, please.^000000",AccWithdrawInput,"^FF7F01No, thanks.^000000",AccMenu;
- AccBalance:
- mes "^0072FF[Bank Manager]^000000";
- mes "Account Status:";
- //shown in blue if the same or more, show in red if less than previous balance
- if (vBankAccZeny >= vBankAccLastZeny) goto AccBalance2;
- mes "Current Balance: ^FF0000" + vBankAccZeny +"z^000000.";
- goto AccBalance3;
- AccBalance2:
- mes "Current Balance: ^0000FF" + vBankAccZeny +"z^000000.";
- goto AccBalance3;
- AccBalance3:
- mes "Previous Balance: ^0000FF" + vBankAccLastZeny +"z^000000.";
- mes "Interest Rate: ^0000FF" + @tInterestRate + "%^000000.";
- mes "Interests Payed: ^0000FF" + vBankAccInterests + "z^000000.";
- next;
- goto AccMenu;
- AccClose:
- mes "^0072FF[Bank Manager]^000000";
- mes "If you close your ^FF7F01Bank Account^000000, it means you eliminate it.";
- mes "Of course, you will get all your money back.";
- mes "Are you sure you want to close your ^FF7F01Bank Account^000000?";
- next;
- menu "^FF7F01I don't want it anymore.^000000",AccCloseConfirm,"^FF7F01No, I'll keep it.^000000",AccCloseKeep;
- AccCloseConfirm:
- set vBankAccActive,0;
- set Zeny, Zeny + vBankAccZeny;
- set vBankAccZeny,0;
- set vBankAccLastZeny,0;
- set vBankAccInterests,0;
- mes "^0072FF[Bank Manager]^000000";
- mes "Thanks for using our services, we hope you come back to visit us.";
- mes "Here's your money.";
- next;
- goto EndNPC;
- AccCloseKeep:
- mes "^0072FF[Bank Manager]^000000";
- mes "Good choice, thanks for staying with us.";
- next;
- goto AccMenu;
- EndNPC:
- set @random,rand(4);
- mes "^0072FF[Bank Manager]^000000";
- if (@random == 0) mes "Have a nice day!";
- if (@random == 1) mes "See you soon!";
- if (@random == 2) mes "See you next time!";
- if (@random == 3) mes "Come back soon!";
- close;
-}
-
-//Fixed location for new payon
-payon.gat,155,97,4 script Bank Manager 109,{
- set @tInterestRate, 2; //no decimals
- set @tMaxAccZeny, 1000000000; //max zeny allowed in ^FF7F01Bank Account^000000 1,000,000,000=1 billion
- set @tMaxZeny, 1000000000; //max zeny that a player can carry
- set @tMinZeny, 100; //min zeny allowed or Bank Account is closed
- set @tCreateZeny, 500; //zeny needed in order to create a Bank Account
- set @tMinDeposit,100; //min zeny to deposit
- set @tBeginningZeny, 100; //amount of zeny in Bank Account after creating
- mes "^0072FF[Bank Manager]^000000";
- mes "Welcome to this office branch of Midgard's Bank.";
- next;
- if (vBankAccActive==1) goto AccMenu;
- mes "^0072FF[Bank Manager]^000000";
- mes "You don't have a ^FF7F01Bank Account^000000 yet, you must buy one.";
- mes "It will cost you ^0000FF" + @tCreateZeny + "z^000000 to create it.";
- next;
- menu "^FF7F01Create Account.^000000",CreateAcc,"^FF7F01Information.^000000",BankInfo,"^FF7F01No thanks.^000000",NoCreateAcc;
- BankInfo:
- mes "^0072FF[Bank Manager]^000000";
- mes "Here are some points that you need to know:";
- mes "1. To create a ^FF7F01Bank Account^000000 you have to pay ^0000FF" + @tCreateZeny + "z^000000.";
- mes "2. You will be charged ^0000FF" + @tInterestRate + " percent^000000 everytime you Deposit.";
- mes "3. You must always have no less than ^0000FF" + @tMinZeny + "z^000000 on your ^FF7F01Bank Account^000000.";
- next;
- mes "4. You can save up to ^0000FF" + @tMaxAccZeny + "z^000000 in your bank account.";
- mes "5. You will be able to access your ^FF7F01Bank Account^000000 in any town with a Bank Office.";
- mes "6. You will start by having ^0000FF" + @tBeginningZeny + "z^000000 in your bank account.";
- close;
- CreateAcc:
- mes "^0072FF[Bank Manager]^000000";
- mes "First of all, you will have to have at least ^0000FF" + @tCreateZeny + "z^000000 with you.";
- mes "Your account will start with ^0000FF" + @tBeginningZeny +"z^000000.";
- mes "Are you sure you want to continue?";
- next;
- menu "^FF7F01Sure.^000000",CreateAccCont,"^FF7F01Nah, it's ok.^000000",NoCreateAcc;
- CreateAccCont:
- if (@tCreateZeny > Zeny) goto CreateAccNoEnoughZeny;
- set Zeny, Zeny - @tCreateZeny;
- set vBankAccActive,1;
- set vBankAccZeny, @tBeginningZeny;
- set vBankAccLastZeny, @tBeginningZeny;
- set vBankAccInterests,0;
- mes "^0072FF[Bank Manager]^000000";
- mes "Congratulations, your ^FF7F01Bank Account^000000 is now created with ^0000FF" + vBankAccZeny + "z^000000.";
- mes "You may now proceed to do any transactions.";
- next;
- goto AccMenu;
- CreateAccNoEnoughZeny:
- mes "^0072FF[Bank Manager]^000000";
- mes "Didn't I tell you to make sure you had enough zeny?";
- mes "You can't create it with just ^0000FF" + Zeny + "z^000000.";
- mes "Come back when you get those ^0000FF" + @tCreateZeny + "z^000000...";
- next;
- goto EndNPC;
- NoCreateAcc:
- mes "^0072FF[Bank Manager]^000000";
- mes "Come back when you change your mind!";
- next;
- goto EndNPC;
- AccMenu:
- mes "^0072FF[Bank Manager]^000000";
- mes "Your current balance is ^0000FF" + vBankAccZeny +"z^000000.";
- mes "What would you like to do now?";
- next;
- menu "^FF7F01Deposit.^000000",AccDeposit,"^FF7F01Withdraw.^000000",AccWithdraw,"^FF7F01Bank Account Info.^000000",AccBalance,"^FF7F01Close Bank Account^000000",AccClose,"^FF7F01Cancel.^000000",EndNPC;
- AccDeposit:
- mes "^0072FF[Bank Manager]^000000";
- mes "It's always good to deposit every once in a while.";
- mes "Be noticed that we charge a ^0000FF" + @tInterestRate + " percent ^000000 of interest rate in every deposit you make.";
- mes "This means that to deposit ^0000FF100z^000000 you need to have pay us ^0000FF" + 100 * @tInterestRate / 100 + "z^000000.";
- mes "How much are you willing to deposit?";
- next;
- AccDepositInput:
- input @tDeposit;
- set @tDepositTax, @tDeposit * @tInterestRate / 100;
- set @tDepositTotal, @tDeposit - @tDepositTax;
- if (@tDeposit <= 0) goto AccDepositNoInput;
- if (@tDeposit < @tMinDeposit) goto AccDepositNotEnoughInput;
- if (@tDepositTotal > Zeny) goto AccDepositNotEnoughZeny;
- set @tBankAccZenyTemp, vBankAccZeny + @tDepositTotal;
- if (@tBankAccZenyTemp > @tMaxAccZeny) goto AccDepositOver;
- if ((@tDeposit <= Zeny) && (@tBankAccZenyTemp <= @tMaxAccZeny)) goto AccDepositCont;
- mes "^0072FF[Bank Manager]^000000";
- mes "Sorry, for some weird reason I couldn't deposit your money.";
- next;
- goto AccMenu;
- AccDepositCont:
- set Zeny, Zeny - @tDeposit;
- set vBankAccLastZeny, vBankAccZeny;
- set vBankAccZeny, @tBankAccZenyTemp;
- set vBankAccInterests, vBankAccInterests + @tDepositTax;
- mes "^0072FF[Bank Manager]^000000";
- mes "Transaction completed successfully.";
- mes "^0000FF" + @tDeposit + "z^000000 substracted from your money (Taxes applied).";
- mes "^0000FF" + @tDepositTotal + "z^000000 successfully added to your ^FF7F01Bank Account^000000.";
- next;
- goto AccMenu;
- AccDepositOver:
- mes "^0072FF[Bank Manager]^000000";
- mes "There is a limit of ^0000FF" + @tMaxAccZeny + "z^000000 of how much zeny your ^FF7F01Bank Account^000000 can hold.";
- mes "You can't deposit more than that, please try again.";
- mes "Do you want to try again?";
- next;
- menu "^FF7F01Yes, please.^000000",AccDepositInput,"^FF7F01No, thanks.^000000",AccMenu;
- AccDepositNotEnoughInput:
- mes "^0072FF[Bank Manager]^000000";
- mes "You need to put more money in order to make a deposit.";
- mes "Do you want to try again?";
- next;
- menu "^FF7F01Yes, please.^000000",AccDepositInput,"^FF7F01No, thanks.^000000",AccMenu;
- AccDepositNoInput:
- mes "^0072FF[Bank Manager]^000000";
- mes "You must enter a value higher than ^0000FF" + @tMinDeposit + "z^000000.";
- mes "Do you want to try again?";
- next;
- menu "^FF7F01Yes, please.^000000",AccDepositInput,"^FF7F01No, thanks.^000000",AccMenu;
- AccDepositNotEnoughZeny:
- mes "^0072FF[Bank Manager]^000000";
- mes "You don't have ^0000FF" + @tDepositTotal + "z^000000.";
- mes "Remember that taxes are being applied.";
- mes "Do you want to try again?";
- next;
- menu "^FF7F01Yes, please.^000000",AccDepositInput,"^FF7F01No, thanks.^000000",AccMenu;
- AccWithdraw:
- mes "^0072FF[Bank Manager]^000000";
- mes "This is the only transaction I don't like... you figure out why...";
- mes "You can't withdraw leaving less than ^0000FF" + @tMinZeny +"z^000000 in your ^FF7F01Bank Account^000000.";
- mes "Your current balance is ^0000FF" + vBankAccZeny + "z^000000.";
- mes "How much are you going to widthdraw?";
- next;
- AccWithdrawInput:
- input @tWithdraw;
- set @tZenyLeft, vBankAccZeny - @tWithdraw;
- set @tZenyTemp, Zeny + @tWithdraw;
- if (@tWithdraw == 0) goto AccWithdrawNoInput;
- if (@tZenyLeft < @tMinZeny) goto AccWithdrawMinZeny;
- if (@tZenyTemp > @tMaxZeny) goto AccWithDrawOverCharZeny;
- set Zeny, Zeny + @tWithdraw;
- set vBankAccLastZeny, vBankAccZeny;
- set vBankAccZeny, vBankAccZeny - @tWithdraw;
- mes "^0072FF[Bank Manager]^000000";
- mes "Transaction completed successfully.";
- mes "Thank you for using our services.";
- next;
- goto AccMenu;
- AccWithdrawNoInput:
- mes "^0072FF[Bank Manager]^000000";
- mes "In order to withdraw from the bank, you must withdraw more than 0 zeny.";
- mes "Do you want to try again?";
- next;
- menu "^FF7F01Yes, please.^000000",AccWithdrawInput,"^FF7F01No, thanks.^000000",AccMenu;
- AccWithdrawMinZeny:
- mes "^0072FF[Bank Manager]^000000";
- mes "I'm sorry...";
- mes "You can't withdraw ^0000FF" + @tWithdraw + "z^000000 because your ^FF7F01Bank Account^000000 must have ^0000FF" + @tMinZeny + "z^000000 left or more at all times.";
- mes "In order to take all your money from the bank you must select Close Account in the Account Menu.";
- mes "Do you want to try again?";
- next;
- menu "^FF7F01Yes, please.^000000",AccWithdrawInput,"^FF7F01No, thanks.^000000",AccMenu;
- AccWithDrawOverCharZeny:
- mes "^0072FF[Bank Manager]^000000";
- mes "Sorry, but you can't withdraw ^0000FF" + @tWithdraw + "z^000000 because your Player can't carry more than ^0000FF" + @tMaxZeny + "z^000000.";
- mes "Do you want to try again?";
- next;
- menu "^FF7F01Yes, please.^000000",AccWithdrawInput,"^FF7F01No, thanks.^000000",AccMenu;
- AccBalance:
- mes "^0072FF[Bank Manager]^000000";
- mes "Account Status:";
- //shown in blue if the same or more, show in red if less than previous balance
- if (vBankAccZeny >= vBankAccLastZeny) goto AccBalance2;
- mes "Current Balance: ^FF0000" + vBankAccZeny +"z^000000.";
- goto AccBalance3;
- AccBalance2:
- mes "Current Balance: ^0000FF" + vBankAccZeny +"z^000000.";
- goto AccBalance3;
- AccBalance3:
- mes "Previous Balance: ^0000FF" + vBankAccLastZeny +"z^000000.";
- mes "Interest Rate: ^0000FF" + @tInterestRate + "%^000000.";
- mes "Interests Payed: ^0000FF" + vBankAccInterests + "z^000000.";
- next;
- goto AccMenu;
- AccClose:
- mes "^0072FF[Bank Manager]^000000";
- mes "If you close your ^FF7F01Bank Account^000000, it means you eliminate it.";
- mes "Of course, you will get all your money back.";
- mes "Are you sure you want to close your ^FF7F01Bank Account^000000?";
- next;
- menu "^FF7F01I don't want it anymore.^000000",AccCloseConfirm,"^FF7F01No, I'll keep it.^000000",AccCloseKeep;
- AccCloseConfirm:
- set vBankAccActive,0;
- set Zeny, Zeny + vBankAccZeny;
- set vBankAccZeny,0;
- set vBankAccLastZeny,0;
- set vBankAccInterests,0;
- mes "^0072FF[Bank Manager]^000000";
- mes "Thanks for using our services, we hope you come back to visit us.";
- mes "Here's your money.";
- next;
- goto EndNPC;
- AccCloseKeep:
- mes "^0072FF[Bank Manager]^000000";
- mes "Good choice, thanks for staying with us.";
- next;
- goto AccMenu;
- EndNPC:
- set @random,rand(4);
- mes "^0072FF[Bank Manager]^000000";
- if (@random == 0) mes "Have a nice day!";
- if (@random == 1) mes "See you soon!";
- if (@random == 2) mes "See you next time!";
- if (@random == 3) mes "Come back soon!";
- close;
-}
-
-alberta_in.gat,187,26,2 script Bank Manager 109,{
- set @tInterestRate, 2; //no decimals
- set @tMaxAccZeny, 1000000000; //max zeny allowed in ^FF7F01Bank Account^000000 1,000,000,000=1 billion
- set @tMaxZeny, 1000000000; //max zeny that a player can carry
- set @tMinZeny, 100; //min zeny allowed or Bank Account is closed
- set @tCreateZeny, 500; //zeny needed in order to create a Bank Account
- set @tMinDeposit,100; //min zeny to deposit
- set @tBeginningZeny, 100; //amount of zeny in Bank Account after creating
- mes "^0072FF[Bank Manager]^000000";
- mes "Welcome to this office branch of Midgard's Bank.";
- next;
- if (vBankAccActive==1) goto AccMenu;
- mes "^0072FF[Bank Manager]^000000";
- mes "You don't have a ^FF7F01Bank Account^000000 yet, you must buy one.";
- mes "It will cost you ^0000FF" + @tCreateZeny + "z^000000 to create it.";
- next;
- menu "^FF7F01Create Account.^000000",CreateAcc,"^FF7F01Information.^000000",BankInfo,"^FF7F01No thanks.^000000",NoCreateAcc;
- BankInfo:
- mes "^0072FF[Bank Manager]^000000";
- mes "Here are some points that you need to know:";
- mes "1. To create a ^FF7F01Bank Account^000000 you have to pay ^0000FF" + @tCreateZeny + "z^000000.";
- mes "2. You will be charged ^0000FF" + @tInterestRate + " percent^000000 everytime you Deposit.";
- mes "3. You must always have no less than ^0000FF" + @tMinZeny + "z^000000 on your ^FF7F01Bank Account^000000.";
- next;
- mes "4. You can save up to ^0000FF" + @tMaxAccZeny + "z^000000 in your bank account.";
- mes "5. You will be able to access your ^FF7F01Bank Account^000000 in any town with a Bank Office.";
- mes "6. You will start by having ^0000FF" + @tBeginningZeny + "z^000000 in your bank account.";
- close;
- CreateAcc:
- mes "^0072FF[Bank Manager]^000000";
- mes "First of all, you will have to have at least ^0000FF" + @tCreateZeny + "z^000000 with you.";
- mes "Your account will start with ^0000FF" + @tBeginningZeny +"z^000000.";
- mes "Are you sure you want to continue?";
- next;
- menu "^FF7F01Sure.^000000",CreateAccCont,"^FF7F01Nah, it's ok.^000000",NoCreateAcc;
- CreateAccCont:
- if (@tCreateZeny > Zeny) goto CreateAccNoEnoughZeny;
- set Zeny, Zeny - @tCreateZeny;
- set vBankAccActive,1;
- set vBankAccZeny, @tBeginningZeny;
- set vBankAccLastZeny, @tBeginningZeny;
- set vBankAccInterests,0;
- mes "^0072FF[Bank Manager]^000000";
- mes "Congratulations, your ^FF7F01Bank Account^000000 is now created with ^0000FF" + vBankAccZeny + "z^000000.";
- mes "You may now proceed to do any transactions.";
- next;
- goto AccMenu;
- CreateAccNoEnoughZeny:
- mes "^0072FF[Bank Manager]^000000";
- mes "Didn't I tell you to make sure you had enough zeny?";
- mes "You can't create it with just ^0000FF" + Zeny + "z^000000.";
- mes "Come back when you get those ^0000FF" + @tCreateZeny + "z^000000...";
- next;
- goto EndNPC;
- NoCreateAcc:
- mes "^0072FF[Bank Manager]^000000";
- mes "Come back when you change your mind!";
- next;
- goto EndNPC;
- AccMenu:
- mes "^0072FF[Bank Manager]^000000";
- mes "Your current balance is ^0000FF" + vBankAccZeny +"z^000000.";
- mes "What would you like to do now?";
- next;
- menu "^FF7F01Deposit.^000000",AccDeposit,"^FF7F01Withdraw.^000000",AccWithdraw,"^FF7F01Bank Account Info.^000000",AccBalance,"^FF7F01Close Bank Account^000000",AccClose,"^FF7F01Cancel.^000000",EndNPC;
- AccDeposit:
- mes "^0072FF[Bank Manager]^000000";
- mes "It's always good to deposit every once in a while.";
- mes "Be noticed that we charge a ^0000FF" + @tInterestRate + " percent ^000000 of interest rate in every deposit you make.";
- mes "This means that to deposit ^0000FF100z^000000 you need to have pay us ^0000FF" + 100 * @tInterestRate / 100 + "z^000000.";
- mes "How much are you willing to deposit?";
- next;
- AccDepositInput:
- input @tDeposit;
- set @tDepositTax, @tDeposit * @tInterestRate / 100;
- set @tDepositTotal, @tDeposit - @tDepositTax;
- if (@tDeposit <= 0) goto AccDepositNoInput;
- if (@tDeposit < @tMinDeposit) goto AccDepositNotEnoughInput;
- if (@tDepositTotal > Zeny) goto AccDepositNotEnoughZeny;
- set @tBankAccZenyTemp, vBankAccZeny + @tDepositTotal;
- if (@tBankAccZenyTemp > @tMaxAccZeny) goto AccDepositOver;
- if ((@tDeposit <= Zeny) && (@tBankAccZenyTemp <= @tMaxAccZeny)) goto AccDepositCont;
- mes "^0072FF[Bank Manager]^000000";
- mes "Sorry, for some weird reason I couldn't deposit your money.";
- next;
- goto AccMenu;
- AccDepositCont:
- set Zeny, Zeny - @tDeposit;
- set vBankAccLastZeny, vBankAccZeny;
- set vBankAccZeny, @tBankAccZenyTemp;
- set vBankAccInterests, vBankAccInterests + @tDepositTax;
- mes "^0072FF[Bank Manager]^000000";
- mes "Transaction completed successfully.";
- mes "^0000FF" + @tDeposit + "z^000000 substracted from your money (Taxes applied).";
- mes "^0000FF" + @tDepositTotal + "z^000000 successfully added to your ^FF7F01Bank Account^000000.";
- next;
- goto AccMenu;
- AccDepositOver:
- mes "^0072FF[Bank Manager]^000000";
- mes "There is a limit of ^0000FF" + @tMaxAccZeny + "z^000000 of how much zeny your ^FF7F01Bank Account^000000 can hold.";
- mes "You can't deposit more than that, please try again.";
- mes "Do you want to try again?";
- next;
- menu "^FF7F01Yes, please.^000000",AccDepositInput,"^FF7F01No, thanks.^000000",AccMenu;
- AccDepositNotEnoughInput:
- mes "^0072FF[Bank Manager]^000000";
- mes "You need to put more money in order to make a deposit.";
- mes "Do you want to try again?";
- next;
- menu "^FF7F01Yes, please.^000000",AccDepositInput,"^FF7F01No, thanks.^000000",AccMenu;
- AccDepositNoInput:
- mes "^0072FF[Bank Manager]^000000";
- mes "You must enter a value higher than ^0000FF" + @tMinDeposit + "z^000000.";
- mes "Do you want to try again?";
- next;
- menu "^FF7F01Yes, please.^000000",AccDepositInput,"^FF7F01No, thanks.^000000",AccMenu;
- AccDepositNotEnoughZeny:
- mes "^0072FF[Bank Manager]^000000";
- mes "You don't have ^0000FF" + @tDepositTotal + "z^000000.";
- mes "Remember that taxes are being applied.";
- mes "Do you want to try again?";
- next;
- menu "^FF7F01Yes, please.^000000",AccDepositInput,"^FF7F01No, thanks.^000000",AccMenu;
- AccWithdraw:
- mes "^0072FF[Bank Manager]^000000";
- mes "This is the only transaction I don't like... you figure out why...";
- mes "You can't withdraw leaving less than ^0000FF" + @tMinZeny +"z^000000 in your ^FF7F01Bank Account^000000.";
- mes "Your current balance is ^0000FF" + vBankAccZeny + "z^000000.";
- mes "How much are you going to widthdraw?";
- next;
- AccWithdrawInput:
- input @tWithdraw;
- set @tZenyLeft, vBankAccZeny - @tWithdraw;
- set @tZenyTemp, Zeny + @tWithdraw;
- if (@tWithdraw == 0) goto AccWithdrawNoInput;
- if (@tZenyLeft < @tMinZeny) goto AccWithdrawMinZeny;
- if (@tZenyTemp > @tMaxZeny) goto AccWithDrawOverCharZeny;
- set Zeny, Zeny + @tWithdraw;
- set vBankAccLastZeny, vBankAccZeny;
- set vBankAccZeny, vBankAccZeny - @tWithdraw;
- mes "^0072FF[Bank Manager]^000000";
- mes "Transaction completed successfully.";
- mes "Thank you for using our services.";
- next;
- goto AccMenu;
- AccWithdrawNoInput:
- mes "^0072FF[Bank Manager]^000000";
- mes "In order to withdraw from the bank, you must withdraw more than 0 zeny.";
- mes "Do you want to try again?";
- next;
- menu "^FF7F01Yes, please.^000000",AccWithdrawInput,"^FF7F01No, thanks.^000000",AccMenu;
- AccWithdrawMinZeny:
- mes "^0072FF[Bank Manager]^000000";
- mes "I'm sorry...";
- mes "You can't withdraw ^0000FF" + @tWithdraw + "z^000000 because your ^FF7F01Bank Account^000000 must have ^0000FF" + @tMinZeny + "z^000000 left or more at all times.";
- mes "In order to take all your money from the bank you must select Close Account in the Account Menu.";
- mes "Do you want to try again?";
- next;
- menu "^FF7F01Yes, please.^000000",AccWithdrawInput,"^FF7F01No, thanks.^000000",AccMenu;
- AccWithDrawOverCharZeny:
- mes "^0072FF[Bank Manager]^000000";
- mes "Sorry, but you can't withdraw ^0000FF" + @tWithdraw + "z^000000 because your Player can't carry more than ^0000FF" + @tMaxZeny + "z^000000.";
- mes "Do you want to try again?";
- next;
- menu "^FF7F01Yes, please.^000000",AccWithdrawInput,"^FF7F01No, thanks.^000000",AccMenu;
- AccBalance:
- mes "^0072FF[Bank Manager]^000000";
- mes "Account Status:";
- //shown in blue if the same or more, show in red if less than previous balance
- if (vBankAccZeny >= vBankAccLastZeny) goto AccBalance2;
- mes "Current Balance: ^FF0000" + vBankAccZeny +"z^000000.";
- goto AccBalance3;
- AccBalance2:
- mes "Current Balance: ^0000FF" + vBankAccZeny +"z^000000.";
- goto AccBalance3;
- AccBalance3:
- mes "Previous Balance: ^0000FF" + vBankAccLastZeny +"z^000000.";
- mes "Interest Rate: ^0000FF" + @tInterestRate + "%^000000.";
- mes "Interests Payed: ^0000FF" + vBankAccInterests + "z^000000.";
- next;
- goto AccMenu;
- AccClose:
- mes "^0072FF[Bank Manager]^000000";
- mes "If you close your ^FF7F01Bank Account^000000, it means you eliminate it.";
- mes "Of course, you will get all your money back.";
- mes "Are you sure you want to close your ^FF7F01Bank Account^000000?";
- next;
- menu "^FF7F01I don't want it anymore.^000000",AccCloseConfirm,"^FF7F01No, I'll keep it.^000000",AccCloseKeep;
- AccCloseConfirm:
- set vBankAccActive,0;
- set Zeny, Zeny + vBankAccZeny;
- set vBankAccZeny,0;
- set vBankAccLastZeny,0;
- set vBankAccInterests,0;
- mes "^0072FF[Bank Manager]^000000";
- mes "Thanks for using our services, we hope you come back to visit us.";
- mes "Here's your money.";
- next;
- goto EndNPC;
- AccCloseKeep:
- mes "^0072FF[Bank Manager]^000000";
- mes "Good choice, thanks for staying with us.";
- next;
- goto AccMenu;
- EndNPC:
- set @random,rand(4);
- mes "^0072FF[Bank Manager]^000000";
- if (@random == 0) mes "Have a nice day!";
- if (@random == 1) mes "See you soon!";
- if (@random == 2) mes "See you next time!";
- if (@random == 3) mes "Come back soon!";
- close;
-}
-aldebaran.gat,144,120,4 script Bank Manager 109,{
- set @tInterestRate, 2; //no decimals
- set @tMaxAccZeny, 1000000000; //max zeny allowed in ^FF7F01Bank Account^000000 1,000,000,000=1 billion
- set @tMaxZeny, 1000000000; //max zeny that a player can carry
- set @tMinZeny, 100; //min zeny allowed or Bank Account is closed
- set @tCreateZeny, 500; //zeny needed in order to create a Bank Account
- set @tMinDeposit,100; //min zeny to deposit
- set @tBeginningZeny, 100; //amount of zeny in Bank Account after creating
- mes "^0072FF[Bank Manager]^000000";
- mes "Welcome to this office branch of Midgard's Bank.";
- next;
- if (vBankAccActive==1) goto AccMenu;
- mes "^0072FF[Bank Manager]^000000";
- mes "You don't have a ^FF7F01Bank Account^000000 yet, you must buy one.";
- mes "It will cost you ^0000FF" + @tCreateZeny + "z^000000 to create it.";
- next;
- menu "^FF7F01Create Account.^000000",CreateAcc,"^FF7F01Information.^000000",BankInfo,"^FF7F01No thanks.^000000",NoCreateAcc;
- BankInfo:
- mes "^0072FF[Bank Manager]^000000";
- mes "Here are some points that you need to know:";
- mes "1. To create a ^FF7F01Bank Account^000000 you have to pay ^0000FF" + @tCreateZeny + "z^000000.";
- mes "2. You will be charged ^0000FF" + @tInterestRate + " percent^000000 everytime you Deposit.";
- mes "3. You must always have no less than ^0000FF" + @tMinZeny + "z^000000 on your ^FF7F01Bank Account^000000.";
- next;
- mes "4. You can save up to ^0000FF" + @tMaxAccZeny + "z^000000 in your bank account.";
- mes "5. You will be able to access your ^FF7F01Bank Account^000000 in any town with a Bank Office.";
- mes "6. You will start by having ^0000FF" + @tBeginningZeny + "z^000000 in your bank account.";
- close;
- CreateAcc:
- mes "^0072FF[Bank Manager]^000000";
- mes "First of all, you will have to have at least ^0000FF" + @tCreateZeny + "z^000000 with you.";
- mes "Your account will start with ^0000FF" + @tBeginningZeny +"z^000000.";
- mes "Are you sure you want to continue?";
- next;
- menu "^FF7F01Sure.^000000",CreateAccCont,"^FF7F01Nah, it's ok.^000000",NoCreateAcc;
- CreateAccCont:
- if (@tCreateZeny > Zeny) goto CreateAccNoEnoughZeny;
- set Zeny, Zeny - @tCreateZeny;
- set vBankAccActive,1;
- set vBankAccZeny, @tBeginningZeny;
- set vBankAccLastZeny, @tBeginningZeny;
- set vBankAccInterests,0;
- mes "^0072FF[Bank Manager]^000000";
- mes "Congratulations, your ^FF7F01Bank Account^000000 is now created with ^0000FF" + vBankAccZeny + "z^000000.";
- mes "You may now proceed to do any transactions.";
- next;
- goto AccMenu;
- CreateAccNoEnoughZeny:
- mes "^0072FF[Bank Manager]^000000";
- mes "Didn't I tell you to make sure you had enough zeny?";
- mes "You can't create it with just ^0000FF" + Zeny + "z^000000.";
- mes "Come back when you get those ^0000FF" + @tCreateZeny + "z^000000...";
- next;
- goto EndNPC;
- NoCreateAcc:
- mes "^0072FF[Bank Manager]^000000";
- mes "Come back when you change your mind!";
- next;
- goto EndNPC;
- AccMenu:
- mes "^0072FF[Bank Manager]^000000";
- mes "Your current balance is ^0000FF" + vBankAccZeny +"z^000000.";
- mes "What would you like to do now?";
- next;
- menu "^FF7F01Deposit.^000000",AccDeposit,"^FF7F01Withdraw.^000000",AccWithdraw,"^FF7F01Bank Account Info.^000000",AccBalance,"^FF7F01Close Bank Account^000000",AccClose,"^FF7F01Cancel.^000000",EndNPC;
- AccDeposit:
- mes "^0072FF[Bank Manager]^000000";
- mes "It's always good to deposit every once in a while.";
- mes "Be noticed that we charge a ^0000FF" + @tInterestRate + " percent ^000000 of interest rate in every deposit you make.";
- mes "This means that to deposit ^0000FF100z^000000 you need to have pay us ^0000FF" + 100 * @tInterestRate / 100 + "z^000000.";
- mes "How much are you willing to deposit?";
- next;
- AccDepositInput:
- input @tDeposit;
- set @tDepositTax, @tDeposit * @tInterestRate / 100;
- set @tDepositTotal, @tDeposit - @tDepositTax;
- if (@tDeposit <= 0) goto AccDepositNoInput;
- if (@tDeposit < @tMinDeposit) goto AccDepositNotEnoughInput;
- if (@tDepositTotal > Zeny) goto AccDepositNotEnoughZeny;
- set @tBankAccZenyTemp, vBankAccZeny + @tDepositTotal;
- if (@tBankAccZenyTemp > @tMaxAccZeny) goto AccDepositOver;
- if ((@tDeposit <= Zeny) && (@tBankAccZenyTemp <= @tMaxAccZeny)) goto AccDepositCont;
- mes "^0072FF[Bank Manager]^000000";
- mes "Sorry, for some weird reason I couldn't deposit your money.";
- next;
- goto AccMenu;
- AccDepositCont:
- set Zeny, Zeny - @tDeposit;
- set vBankAccLastZeny, vBankAccZeny;
- set vBankAccZeny, @tBankAccZenyTemp;
- set vBankAccInterests, vBankAccInterests + @tDepositTax;
- mes "^0072FF[Bank Manager]^000000";
- mes "Transaction completed successfully.";
- mes "^0000FF" + @tDeposit + "z^000000 substracted from your money (Taxes applied).";
- mes "^0000FF" + @tDepositTotal + "z^000000 successfully added to your ^FF7F01Bank Account^000000.";
- next;
- goto AccMenu;
- AccDepositOver:
- mes "^0072FF[Bank Manager]^000000";
- mes "There is a limit of ^0000FF" + @tMaxAccZeny + "z^000000 of how much zeny your ^FF7F01Bank Account^000000 can hold.";
- mes "You can't deposit more than that, please try again.";
- mes "Do you want to try again?";
- next;
- menu "^FF7F01Yes, please.^000000",AccDepositInput,"^FF7F01No, thanks.^000000",AccMenu;
- AccDepositNotEnoughInput:
- mes "^0072FF[Bank Manager]^000000";
- mes "You need to put more money in order to make a deposit.";
- mes "Do you want to try again?";
- next;
- menu "^FF7F01Yes, please.^000000",AccDepositInput,"^FF7F01No, thanks.^000000",AccMenu;
- AccDepositNoInput:
- mes "^0072FF[Bank Manager]^000000";
- mes "You must enter a value higher than ^0000FF" + @tMinDeposit + "z^000000.";
- mes "Do you want to try again?";
- next;
- menu "^FF7F01Yes, please.^000000",AccDepositInput,"^FF7F01No, thanks.^000000",AccMenu;
- AccDepositNotEnoughZeny:
- mes "^0072FF[Bank Manager]^000000";
- mes "You don't have ^0000FF" + @tDepositTotal + "z^000000.";
- mes "Remember that taxes are being applied.";
- mes "Do you want to try again?";
- next;
- menu "^FF7F01Yes, please.^000000",AccDepositInput,"^FF7F01No, thanks.^000000",AccMenu;
- AccWithdraw:
- mes "^0072FF[Bank Manager]^000000";
- mes "This is the only transaction I don't like... you figure out why...";
- mes "You can't withdraw leaving less than ^0000FF" + @tMinZeny +"z^000000 in your ^FF7F01Bank Account^000000.";
- mes "Your current balance is ^0000FF" + vBankAccZeny + "z^000000.";
- mes "How much are you going to widthdraw?";
- next;
- AccWithdrawInput:
- input @tWithdraw;
- set @tZenyLeft, vBankAccZeny - @tWithdraw;
- set @tZenyTemp, Zeny + @tWithdraw;
- if (@tWithdraw == 0) goto AccWithdrawNoInput;
- if (@tZenyLeft < @tMinZeny) goto AccWithdrawMinZeny;
- if (@tZenyTemp > @tMaxZeny) goto AccWithDrawOverCharZeny;
- set Zeny, Zeny + @tWithdraw;
- set vBankAccLastZeny, vBankAccZeny;
- set vBankAccZeny, vBankAccZeny - @tWithdraw;
- mes "^0072FF[Bank Manager]^000000";
- mes "Transaction completed successfully.";
- mes "Thank you for using our services.";
- next;
- goto AccMenu;
- AccWithdrawNoInput:
- mes "^0072FF[Bank Manager]^000000";
- mes "In order to withdraw from the bank, you must withdraw more than 0 zeny.";
- mes "Do you want to try again?";
- next;
- menu "^FF7F01Yes, please.^000000",AccWithdrawInput,"^FF7F01No, thanks.^000000",AccMenu;
- AccWithdrawMinZeny:
- mes "^0072FF[Bank Manager]^000000";
- mes "I'm sorry...";
- mes "You can't withdraw ^0000FF" + @tWithdraw + "z^000000 because your ^FF7F01Bank Account^000000 must have ^0000FF" + @tMinZeny + "z^000000 left or more at all times.";
- mes "In order to take all your money from the bank you must select Close Account in the Account Menu.";
- mes "Do you want to try again?";
- next;
- menu "^FF7F01Yes, please.^000000",AccWithdrawInput,"^FF7F01No, thanks.^000000",AccMenu;
- AccWithDrawOverCharZeny:
- mes "^0072FF[Bank Manager]^000000";
- mes "Sorry, but you can't withdraw ^0000FF" + @tWithdraw + "z^000000 because your Player can't carry more than ^0000FF" + @tMaxZeny + "z^000000.";
- mes "Do you want to try again?";
- next;
- menu "^FF7F01Yes, please.^000000",AccWithdrawInput,"^FF7F01No, thanks.^000000",AccMenu;
- AccBalance:
- mes "^0072FF[Bank Manager]^000000";
- mes "Account Status:";
- //shown in blue if the same or more, show in red if less than previous balance
- if (vBankAccZeny >= vBankAccLastZeny) goto AccBalance2;
- mes "Current Balance: ^FF0000" + vBankAccZeny +"z^000000.";
- goto AccBalance3;
- AccBalance2:
- mes "Current Balance: ^0000FF" + vBankAccZeny +"z^000000.";
- goto AccBalance3;
- AccBalance3:
- mes "Previous Balance: ^0000FF" + vBankAccLastZeny +"z^000000.";
- mes "Interest Rate: ^0000FF" + @tInterestRate + "%^000000.";
- mes "Interests Payed: ^0000FF" + vBankAccInterests + "z^000000.";
- next;
- goto AccMenu;
- AccClose:
- mes "^0072FF[Bank Manager]^000000";
- mes "If you close your ^FF7F01Bank Account^000000, it means you eliminate it.";
- mes "Of course, you will get all your money back.";
- mes "Are you sure you want to close your ^FF7F01Bank Account^000000?";
- next;
- menu "^FF7F01I don't want it anymore.^000000",AccCloseConfirm,"^FF7F01No, I'll keep it.^000000",AccCloseKeep;
- AccCloseConfirm:
- set vBankAccActive,0;
- set Zeny, Zeny + vBankAccZeny;
- set vBankAccZeny,0;
- set vBankAccLastZeny,0;
- set vBankAccInterests,0;
- mes "^0072FF[Bank Manager]^000000";
- mes "Thanks for using our services, we hope you come back to visit us.";
- mes "Here's your money.";
- next;
- goto EndNPC;
- AccCloseKeep:
- mes "^0072FF[Bank Manager]^000000";
- mes "Good choice, thanks for staying with us.";
- next;
- goto AccMenu;
- EndNPC:
- set @random,rand(4);
- mes "^0072FF[Bank Manager]^000000";
- if (@random == 0) mes "Have a nice day!";
- if (@random == 1) mes "See you soon!";
- if (@random == 2) mes "See you next time!";
- if (@random == 3) mes "Come back soon!";
- close;
-}
-
-xmas_in.gat,35,37,5 script Bank Manager 109,{
- set @tInterestRate, 2; //no decimals
- set @tMaxAccZeny, 1000000000; //max zeny allowed in ^FF7F01Bank Account^000000 1,000,000,000=1 billion
- set @tMaxZeny, 1000000000; //max zeny that a player can carry
- set @tMinZeny, 100; //min zeny allowed or Bank Account is closed
- set @tCreateZeny, 500; //zeny needed in order to create a Bank Account
- set @tMinDeposit,100; //min zeny to deposit
- set @tBeginningZeny, 100; //amount of zeny in Bank Account after creating
- mes "^0072FF[Bank Manager]^000000";
- mes "Welcome to this office branch of Midgard's Bank.";
- next;
- if (vBankAccActive==1) goto AccMenu;
- mes "^0072FF[Bank Manager]^000000";
- mes "You don't have a ^FF7F01Bank Account^000000 yet, you must buy one.";
- mes "It will cost you ^0000FF" + @tCreateZeny + "z^000000 to create it.";
- next;
- menu "^FF7F01Create Account.^000000",CreateAcc,"^FF7F01Information.^000000",BankInfo,"^FF7F01No thanks.^000000",NoCreateAcc;
- BankInfo:
- mes "^0072FF[Bank Manager]^000000";
- mes "Here are some points that you need to know:";
- mes "1. To create a ^FF7F01Bank Account^000000 you have to pay ^0000FF" + @tCreateZeny + "z^000000.";
- mes "2. You will be charged ^0000FF" + @tInterestRate + " percent^000000 everytime you Deposit.";
- mes "3. You must always have no less than ^0000FF" + @tMinZeny + "z^000000 on your ^FF7F01Bank Account^000000.";
- next;
- mes "4. You can save up to ^0000FF" + @tMaxAccZeny + "z^000000 in your bank account.";
- mes "5. You will be able to access your ^FF7F01Bank Account^000000 in any town with a Bank Office.";
- mes "6. You will start by having ^0000FF" + @tBeginningZeny + "z^000000 in your bank account.";
- close;
- CreateAcc:
- mes "^0072FF[Bank Manager]^000000";
- mes "First of all, you will have to have at least ^0000FF" + @tCreateZeny + "z^000000 with you.";
- mes "Your account will start with ^0000FF" + @tBeginningZeny +"z^000000.";
- mes "Are you sure you want to continue?";
- next;
- menu "^FF7F01Sure.^000000",CreateAccCont,"^FF7F01Nah, it's ok.^000000",NoCreateAcc;
- CreateAccCont:
- if (@tCreateZeny > Zeny) goto CreateAccNoEnoughZeny;
- set Zeny, Zeny - @tCreateZeny;
- set vBankAccActive,1;
- set vBankAccZeny, @tBeginningZeny;
- set vBankAccLastZeny, @tBeginningZeny;
- set vBankAccInterests,0;
- mes "^0072FF[Bank Manager]^000000";
- mes "Congratulations, your ^FF7F01Bank Account^000000 is now created with ^0000FF" + vBankAccZeny + "z^000000.";
- mes "You may now proceed to do any transactions.";
- next;
- goto AccMenu;
- CreateAccNoEnoughZeny:
- mes "^0072FF[Bank Manager]^000000";
- mes "Didn't I tell you to make sure you had enough zeny?";
- mes "You can't create it with just ^0000FF" + Zeny + "z^000000.";
- mes "Come back when you get those ^0000FF" + @tCreateZeny + "z^000000...";
- next;
- goto EndNPC;
- NoCreateAcc:
- mes "^0072FF[Bank Manager]^000000";
- mes "Come back when you change your mind!";
- next;
- goto EndNPC;
- AccMenu:
- mes "^0072FF[Bank Manager]^000000";
- mes "Your current balance is ^0000FF" + vBankAccZeny +"z^000000.";
- mes "What would you like to do now?";
- next;
- menu "^FF7F01Deposit.^000000",AccDeposit,"^FF7F01Withdraw.^000000",AccWithdraw,"^FF7F01Bank Account Info.^000000",AccBalance,"^FF7F01Close Bank Account^000000",AccClose,"^FF7F01Cancel.^000000",EndNPC;
- AccDeposit:
- mes "^0072FF[Bank Manager]^000000";
- mes "It's always good to deposit every once in a while.";
- mes "Be noticed that we charge a ^0000FF" + @tInterestRate + " percent ^000000 of interest rate in every deposit you make.";
- mes "This means that to deposit ^0000FF100z^000000 you need to have pay us ^0000FF" + 100 * @tInterestRate / 100 + "z^000000.";
- mes "How much are you willing to deposit?";
- next;
- AccDepositInput:
- input @tDeposit;
- set @tDepositTax, @tDeposit * @tInterestRate / 100;
- set @tDepositTotal, @tDeposit - @tDepositTax;
- if (@tDeposit <= 0) goto AccDepositNoInput;
- if (@tDeposit < @tMinDeposit) goto AccDepositNotEnoughInput;
- if (@tDepositTotal > Zeny) goto AccDepositNotEnoughZeny;
- set @tBankAccZenyTemp, vBankAccZeny + @tDepositTotal;
- if (@tBankAccZenyTemp > @tMaxAccZeny) goto AccDepositOver;
- if ((@tDeposit <= Zeny) && (@tBankAccZenyTemp <= @tMaxAccZeny)) goto AccDepositCont;
- mes "^0072FF[Bank Manager]^000000";
- mes "Sorry, for some weird reason I couldn't deposit your money.";
- next;
- goto AccMenu;
- AccDepositCont:
- set Zeny, Zeny - @tDeposit;
- set vBankAccLastZeny, vBankAccZeny;
- set vBankAccZeny, @tBankAccZenyTemp;
- set vBankAccInterests, vBankAccInterests + @tDepositTax;
- mes "^0072FF[Bank Manager]^000000";
- mes "Transaction completed successfully.";
- mes "^0000FF" + @tDeposit + "z^000000 substracted from your money (Taxes applied).";
- mes "^0000FF" + @tDepositTotal + "z^000000 successfully added to your ^FF7F01Bank Account^000000.";
- next;
- goto AccMenu;
- AccDepositOver:
- mes "^0072FF[Bank Manager]^000000";
- mes "There is a limit of ^0000FF" + @tMaxAccZeny + "z^000000 of how much zeny your ^FF7F01Bank Account^000000 can hold.";
- mes "You can't deposit more than that, please try again.";
- mes "Do you want to try again?";
- next;
- menu "^FF7F01Yes, please.^000000",AccDepositInput,"^FF7F01No, thanks.^000000",AccMenu;
- AccDepositNotEnoughInput:
- mes "^0072FF[Bank Manager]^000000";
- mes "You need to put more money in order to make a deposit.";
- mes "Do you want to try again?";
- next;
- menu "^FF7F01Yes, please.^000000",AccDepositInput,"^FF7F01No, thanks.^000000",AccMenu;
- AccDepositNoInput:
- mes "^0072FF[Bank Manager]^000000";
- mes "You must enter a value higher than ^0000FF" + @tMinDeposit + "z^000000.";
- mes "Do you want to try again?";
- next;
- menu "^FF7F01Yes, please.^000000",AccDepositInput,"^FF7F01No, thanks.^000000",AccMenu;
- AccDepositNotEnoughZeny:
- mes "^0072FF[Bank Manager]^000000";
- mes "You don't have ^0000FF" + @tDepositTotal + "z^000000.";
- mes "Remember that taxes are being applied.";
- mes "Do you want to try again?";
- next;
- menu "^FF7F01Yes, please.^000000",AccDepositInput,"^FF7F01No, thanks.^000000",AccMenu;
- AccWithdraw:
- mes "^0072FF[Bank Manager]^000000";
- mes "This is the only transaction I don't like... you figure out why...";
- mes "You can't withdraw leaving less than ^0000FF" + @tMinZeny +"z^000000 in your ^FF7F01Bank Account^000000.";
- mes "Your current balance is ^0000FF" + vBankAccZeny + "z^000000.";
- mes "How much are you going to widthdraw?";
- next;
- AccWithdrawInput:
- input @tWithdraw;
- set @tZenyLeft, vBankAccZeny - @tWithdraw;
- set @tZenyTemp, Zeny + @tWithdraw;
- if (@tWithdraw == 0) goto AccWithdrawNoInput;
- if (@tZenyLeft < @tMinZeny) goto AccWithdrawMinZeny;
- if (@tZenyTemp > @tMaxZeny) goto AccWithDrawOverCharZeny;
- set Zeny, Zeny + @tWithdraw;
- set vBankAccLastZeny, vBankAccZeny;
- set vBankAccZeny, vBankAccZeny - @tWithdraw;
- mes "^0072FF[Bank Manager]^000000";
- mes "Transaction completed successfully.";
- mes "Thank you for using our services.";
- next;
- goto AccMenu;
- AccWithdrawNoInput:
- mes "^0072FF[Bank Manager]^000000";
- mes "In order to withdraw from the bank, you must withdraw more than 0 zeny.";
- mes "Do you want to try again?";
- next;
- menu "^FF7F01Yes, please.^000000",AccWithdrawInput,"^FF7F01No, thanks.^000000",AccMenu;
- AccWithdrawMinZeny:
- mes "^0072FF[Bank Manager]^000000";
- mes "I'm sorry...";
- mes "You can't withdraw ^0000FF" + @tWithdraw + "z^000000 because your ^FF7F01Bank Account^000000 must have ^0000FF" + @tMinZeny + "z^000000 left or more at all times.";
- mes "In order to take all your money from the bank you must select Close Account in the Account Menu.";
- mes "Do you want to try again?";
- next;
- menu "^FF7F01Yes, please.^000000",AccWithdrawInput,"^FF7F01No, thanks.^000000",AccMenu;
- AccWithDrawOverCharZeny:
- mes "^0072FF[Bank Manager]^000000";
- mes "Sorry, but you can't withdraw ^0000FF" + @tWithdraw + "z^000000 because your Player can't carry more than ^0000FF" + @tMaxZeny + "z^000000.";
- mes "Do you want to try again?";
- next;
- menu "^FF7F01Yes, please.^000000",AccWithdrawInput,"^FF7F01No, thanks.^000000",AccMenu;
- AccBalance:
- mes "^0072FF[Bank Manager]^000000";
- mes "Account Status:";
- //shown in blue if the same or more, show in red if less than previous balance
- if (vBankAccZeny >= vBankAccLastZeny) goto AccBalance2;
- mes "Current Balance: ^FF0000" + vBankAccZeny +"z^000000.";
- goto AccBalance3;
- AccBalance2:
- mes "Current Balance: ^0000FF" + vBankAccZeny +"z^000000.";
- goto AccBalance3;
- AccBalance3:
- mes "Previous Balance: ^0000FF" + vBankAccLastZeny +"z^000000.";
- mes "Interest Rate: ^0000FF" + @tInterestRate + "%^000000.";
- mes "Interests Payed: ^0000FF" + vBankAccInterests + "z^000000.";
- next;
- goto AccMenu;
- AccClose:
- mes "^0072FF[Bank Manager]^000000";
- mes "If you close your ^FF7F01Bank Account^000000, it means you eliminate it.";
- mes "Of course, you will get all your money back.";
- mes "Are you sure you want to close your ^FF7F01Bank Account^000000?";
- next;
- menu "^FF7F01I don't want it anymore.^000000",AccCloseConfirm,"^FF7F01No, I'll keep it.^000000",AccCloseKeep;
- AccCloseConfirm:
- set vBankAccActive,0;
- set Zeny, Zeny + vBankAccZeny;
- set vBankAccZeny,0;
- set vBankAccLastZeny,0;
- set vBankAccInterests,0;
- mes "^0072FF[Bank Manager]^000000";
- mes "Thanks for using our services, we hope you come back to visit us.";
- mes "Here's your money.";
- next;
- goto EndNPC;
- AccCloseKeep:
- mes "^0072FF[Bank Manager]^000000";
- mes "Good choice, thanks for staying with us.";
- next;
- goto AccMenu;
- EndNPC:
- set @random,rand(4);
- mes "^0072FF[Bank Manager]^000000";
- if (@random == 0) mes "Have a nice day!";
- if (@random == 1) mes "See you soon!";
- if (@random == 2) mes "See you next time!";
- if (@random == 3) mes "Come back soon!";
- close;
-}
-
-cmd_in01.gat,115,171,7 script Bank Manager 109,{
- set @tInterestRate, 2; //no decimals
- set @tMaxAccZeny, 1000000000; //max zeny allowed in ^FF7F01Bank Account^000000 1,000,000,000=1 billion
- set @tMaxZeny, 1000000000; //max zeny that a player can carry
- set @tMinZeny, 100; //min zeny allowed or Bank Account is closed
- set @tCreateZeny, 500; //zeny needed in order to create a Bank Account
- set @tMinDeposit,100; //min zeny to deposit
- set @tBeginningZeny, 100; //amount of zeny in Bank Account after creating
- mes "^0072FF[Bank Manager]^000000";
- mes "Welcome to this office branch of Midgard's Bank.";
- next;
- if (vBankAccActive==1) goto AccMenu;
- mes "^0072FF[Bank Manager]^000000";
- mes "You don't have a ^FF7F01Bank Account^000000 yet, you must buy one.";
- mes "It will cost you ^0000FF" + @tCreateZeny + "z^000000 to create it.";
- next;
- menu "^FF7F01Create Account.^000000",CreateAcc,"^FF7F01Information.^000000",BankInfo,"^FF7F01No thanks.^000000",NoCreateAcc;
- BankInfo:
- mes "^0072FF[Bank Manager]^000000";
- mes "Here are some points that you need to know:";
- mes "1. To create a ^FF7F01Bank Account^000000 you have to pay ^0000FF" + @tCreateZeny + "z^000000.";
- mes "2. You will be charged ^0000FF" + @tInterestRate + " percent^000000 everytime you Deposit.";
- mes "3. You must always have no less than ^0000FF" + @tMinZeny + "z^000000 on your ^FF7F01Bank Account^000000.";
- next;
- mes "4. You can save up to ^0000FF" + @tMaxAccZeny + "z^000000 in your bank account.";
- mes "5. You will be able to access your ^FF7F01Bank Account^000000 in any town with a Bank Office.";
- mes "6. You will start by having ^0000FF" + @tBeginningZeny + "z^000000 in your bank account.";
- close;
- CreateAcc:
- mes "^0072FF[Bank Manager]^000000";
- mes "First of all, you will have to have at least ^0000FF" + @tCreateZeny + "z^000000 with you.";
- mes "Your account will start with ^0000FF" + @tBeginningZeny +"z^000000.";
- mes "Are you sure you want to continue?";
- next;
- menu "^FF7F01Sure.^000000",CreateAccCont,"^FF7F01Nah, it's ok.^000000",NoCreateAcc;
- CreateAccCont:
- if (@tCreateZeny > Zeny) goto CreateAccNoEnoughZeny;
- set Zeny, Zeny - @tCreateZeny;
- set vBankAccActive,1;
- set vBankAccZeny, @tBeginningZeny;
- set vBankAccLastZeny, @tBeginningZeny;
- set vBankAccInterests,0;
- mes "^0072FF[Bank Manager]^000000";
- mes "Congratulations, your ^FF7F01Bank Account^000000 is now created with ^0000FF" + vBankAccZeny + "z^000000.";
- mes "You may now proceed to do any transactions.";
- next;
- goto AccMenu;
- CreateAccNoEnoughZeny:
- mes "^0072FF[Bank Manager]^000000";
- mes "Didn't I tell you to make sure you had enough zeny?";
- mes "You can't create it with just ^0000FF" + Zeny + "z^000000.";
- mes "Come back when you get those ^0000FF" + @tCreateZeny + "z^000000...";
- next;
- goto EndNPC;
- NoCreateAcc:
- mes "^0072FF[Bank Manager]^000000";
- mes "Come back when you change your mind!";
- next;
- goto EndNPC;
- AccMenu:
- mes "^0072FF[Bank Manager]^000000";
- mes "Your current balance is ^0000FF" + vBankAccZeny +"z^000000.";
- mes "What would you like to do now?";
- next;
- menu "^FF7F01Deposit.^000000",AccDeposit,"^FF7F01Withdraw.^000000",AccWithdraw,"^FF7F01Bank Account Info.^000000",AccBalance,"^FF7F01Close Bank Account^000000",AccClose,"^FF7F01Cancel.^000000",EndNPC;
- AccDeposit:
- mes "^0072FF[Bank Manager]^000000";
- mes "It's always good to deposit every once in a while.";
- mes "Be noticed that we charge a ^0000FF" + @tInterestRate + " percent ^000000 of interest rate in every deposit you make.";
- mes "This means that to deposit ^0000FF100z^000000 you need to have pay us ^0000FF" + 100 * @tInterestRate / 100 + "z^000000.";
- mes "How much are you willing to deposit?";
- next;
- AccDepositInput:
- input @tDeposit;
- set @tDepositTax, @tDeposit * @tInterestRate / 100;
- set @tDepositTotal, @tDeposit - @tDepositTax;
- if (@tDeposit <= 0) goto AccDepositNoInput;
- if (@tDeposit < @tMinDeposit) goto AccDepositNotEnoughInput;
- if (@tDepositTotal > Zeny) goto AccDepositNotEnoughZeny;
- set @tBankAccZenyTemp, vBankAccZeny + @tDepositTotal;
- if (@tBankAccZenyTemp > @tMaxAccZeny) goto AccDepositOver;
- if ((@tDeposit <= Zeny) && (@tBankAccZenyTemp <= @tMaxAccZeny)) goto AccDepositCont;
- mes "^0072FF[Bank Manager]^000000";
- mes "Sorry, for some weird reason I couldn't deposit your money.";
- next;
- goto AccMenu;
- AccDepositCont:
- set Zeny, Zeny - @tDeposit;
- set vBankAccLastZeny, vBankAccZeny;
- set vBankAccZeny, @tBankAccZenyTemp;
- set vBankAccInterests, vBankAccInterests + @tDepositTax;
- mes "^0072FF[Bank Manager]^000000";
- mes "Transaction completed successfully.";
- mes "^0000FF" + @tDeposit + "z^000000 substracted from your money (Taxes applied).";
- mes "^0000FF" + @tDepositTotal + "z^000000 successfully added to your ^FF7F01Bank Account^000000.";
- next;
- goto AccMenu;
- AccDepositOver:
- mes "^0072FF[Bank Manager]^000000";
- mes "There is a limit of ^0000FF" + @tMaxAccZeny + "z^000000 of how much zeny your ^FF7F01Bank Account^000000 can hold.";
- mes "You can't deposit more than that, please try again.";
- mes "Do you want to try again?";
- next;
- menu "^FF7F01Yes, please.^000000",AccDepositInput,"^FF7F01No, thanks.^000000",AccMenu;
- AccDepositNotEnoughInput:
- mes "^0072FF[Bank Manager]^000000";
- mes "You need to put more money in order to make a deposit.";
- mes "Do you want to try again?";
- next;
- menu "^FF7F01Yes, please.^000000",AccDepositInput,"^FF7F01No, thanks.^000000",AccMenu;
- AccDepositNoInput:
- mes "^0072FF[Bank Manager]^000000";
- mes "You must enter a value higher than ^0000FF" + @tMinDeposit + "z^000000.";
- mes "Do you want to try again?";
- next;
- menu "^FF7F01Yes, please.^000000",AccDepositInput,"^FF7F01No, thanks.^000000",AccMenu;
- AccDepositNotEnoughZeny:
- mes "^0072FF[Bank Manager]^000000";
- mes "You don't have ^0000FF" + @tDepositTotal + "z^000000.";
- mes "Remember that taxes are being applied.";
- mes "Do you want to try again?";
- next;
- menu "^FF7F01Yes, please.^000000",AccDepositInput,"^FF7F01No, thanks.^000000",AccMenu;
- AccWithdraw:
- mes "^0072FF[Bank Manager]^000000";
- mes "This is the only transaction I don't like... you figure out why...";
- mes "You can't withdraw leaving less than ^0000FF" + @tMinZeny +"z^000000 in your ^FF7F01Bank Account^000000.";
- mes "Your current balance is ^0000FF" + vBankAccZeny + "z^000000.";
- mes "How much are you going to widthdraw?";
- next;
- AccWithdrawInput:
- input @tWithdraw;
- set @tZenyLeft, vBankAccZeny - @tWithdraw;
- set @tZenyTemp, Zeny + @tWithdraw;
- if (@tWithdraw == 0) goto AccWithdrawNoInput;
- if (@tZenyLeft < @tMinZeny) goto AccWithdrawMinZeny;
- if (@tZenyTemp > @tMaxZeny) goto AccWithDrawOverCharZeny;
- set Zeny, Zeny + @tWithdraw;
- set vBankAccLastZeny, vBankAccZeny;
- set vBankAccZeny, vBankAccZeny - @tWithdraw;
- mes "^0072FF[Bank Manager]^000000";
- mes "Transaction completed successfully.";
- mes "Thank you for using our services.";
- next;
- goto AccMenu;
- AccWithdrawNoInput:
- mes "^0072FF[Bank Manager]^000000";
- mes "In order to withdraw from the bank, you must withdraw more than 0 zeny.";
- mes "Do you want to try again?";
- next;
- menu "^FF7F01Yes, please.^000000",AccWithdrawInput,"^FF7F01No, thanks.^000000",AccMenu;
- AccWithdrawMinZeny:
- mes "^0072FF[Bank Manager]^000000";
- mes "I'm sorry...";
- mes "You can't withdraw ^0000FF" + @tWithdraw + "z^000000 because your ^FF7F01Bank Account^000000 must have ^0000FF" + @tMinZeny + "z^000000 left or more at all times.";
- mes "In order to take all your money from the bank you must select Close Account in the Account Menu.";
- mes "Do you want to try again?";
- next;
- menu "^FF7F01Yes, please.^000000",AccWithdrawInput,"^FF7F01No, thanks.^000000",AccMenu;
- AccWithDrawOverCharZeny:
- mes "^0072FF[Bank Manager]^000000";
- mes "Sorry, but you can't withdraw ^0000FF" + @tWithdraw + "z^000000 because your Player can't carry more than ^0000FF" + @tMaxZeny + "z^000000.";
- mes "Do you want to try again?";
- next;
- menu "^FF7F01Yes, please.^000000",AccWithdrawInput,"^FF7F01No, thanks.^000000",AccMenu;
- AccBalance:
- mes "^0072FF[Bank Manager]^000000";
- mes "Account Status:";
- //shown in blue if the same or more, show in red if less than previous balance
- if (vBankAccZeny >= vBankAccLastZeny) goto AccBalance2;
- mes "Current Balance: ^FF0000" + vBankAccZeny +"z^000000.";
- goto AccBalance3;
- AccBalance2:
- mes "Current Balance: ^0000FF" + vBankAccZeny +"z^000000.";
- goto AccBalance3;
- AccBalance3:
- mes "Previous Balance: ^0000FF" + vBankAccLastZeny +"z^000000.";
- mes "Interest Rate: ^0000FF" + @tInterestRate + "%^000000.";
- mes "Interests Payed: ^0000FF" + vBankAccInterests + "z^000000.";
- next;
- goto AccMenu;
- AccClose:
- mes "^0072FF[Bank Manager]^000000";
- mes "If you close your ^FF7F01Bank Account^000000, it means you eliminate it.";
- mes "Of course, you will get all your money back.";
- mes "Are you sure you want to close your ^FF7F01Bank Account^000000?";
- next;
- menu "^FF7F01I don't want it anymore.^000000",AccCloseConfirm,"^FF7F01No, I'll keep it.^000000",AccCloseKeep;
- AccCloseConfirm:
- set vBankAccActive,0;
- set Zeny, Zeny + vBankAccZeny;
- set vBankAccZeny,0;
- set vBankAccLastZeny,0;
- set vBankAccInterests,0;
- mes "^0072FF[Bank Manager]^000000";
- mes "Thanks for using our services, we hope you come back to visit us.";
- mes "Here's your money.";
- next;
- goto EndNPC;
- AccCloseKeep:
- mes "^0072FF[Bank Manager]^000000";
- mes "Good choice, thanks for staying with us.";
- next;
- goto AccMenu;
- EndNPC:
- set @random,rand(4);
- mes "^0072FF[Bank Manager]^000000";
- if (@random == 0) mes "Have a nice day!";
- if (@random == 1) mes "See you soon!";
- if (@random == 2) mes "See you next time!";
- if (@random == 3) mes "Come back soon!";
- close;
-}
-
-yuno_in01.gat,119,29,2 script Bank Manager 109,{
- set @tInterestRate, 2; //no decimals
- set @tMaxAccZeny, 1000000000; //max zeny allowed in ^FF7F01Bank Account^000000 1,000,000,000=1 billion
- set @tMaxZeny, 1000000000; //max zeny that a player can carry
- set @tMinZeny, 100; //min zeny allowed or Bank Account is closed
- set @tCreateZeny, 500; //zeny needed in order to create a Bank Account
- set @tMinDeposit,100; //min zeny to deposit
- set @tBeginningZeny, 100; //amount of zeny in Bank Account after creating
- mes "^0072FF[Bank Manager]^000000";
- mes "Welcome to this office branch of Midgard's Bank.";
- next;
- if (vBankAccActive==1) goto AccMenu;
- mes "^0072FF[Bank Manager]^000000";
- mes "You don't have a ^FF7F01Bank Account^000000 yet, you must buy one.";
- mes "It will cost you ^0000FF" + @tCreateZeny + "z^000000 to create it.";
- next;
- menu "^FF7F01Create Account.^000000",CreateAcc,"^FF7F01Information.^000000",BankInfo,"^FF7F01No thanks.^000000",NoCreateAcc;
- BankInfo:
- mes "^0072FF[Bank Manager]^000000";
- mes "Here are some points that you need to know:";
- mes "1. To create a ^FF7F01Bank Account^000000 you have to pay ^0000FF" + @tCreateZeny + "z^000000.";
- mes "2. You will be charged ^0000FF" + @tInterestRate + " percent^000000 everytime you Deposit.";
- mes "3. You must always have no less than ^0000FF" + @tMinZeny + "z^000000 on your ^FF7F01Bank Account^000000.";
- next;
- mes "4. You can save up to ^0000FF" + @tMaxAccZeny + "z^000000 in your bank account.";
- mes "5. You will be able to access your ^FF7F01Bank Account^000000 in any town with a Bank Office.";
- mes "6. You will start by having ^0000FF" + @tBeginningZeny + "z^000000 in your bank account.";
- close;
- CreateAcc:
- mes "^0072FF[Bank Manager]^000000";
- mes "First of all, you will have to have at least ^0000FF" + @tCreateZeny + "z^000000 with you.";
- mes "Your account will start with ^0000FF" + @tBeginningZeny +"z^000000.";
- mes "Are you sure you want to continue?";
- next;
- menu "^FF7F01Sure.^000000",CreateAccCont,"^FF7F01Nah, it's ok.^000000",NoCreateAcc;
- CreateAccCont:
- if (@tCreateZeny > Zeny) goto CreateAccNoEnoughZeny;
- set Zeny, Zeny - @tCreateZeny;
- set vBankAccActive,1;
- set vBankAccZeny, @tBeginningZeny;
- set vBankAccLastZeny, @tBeginningZeny;
- set vBankAccInterests,0;
- mes "^0072FF[Bank Manager]^000000";
- mes "Congratulations, your ^FF7F01Bank Account^000000 is now created with ^0000FF" + vBankAccZeny + "z^000000.";
- mes "You may now proceed to do any transactions.";
- next;
- goto AccMenu;
- CreateAccNoEnoughZeny:
- mes "^0072FF[Bank Manager]^000000";
- mes "Didn't I tell you to make sure you had enough zeny?";
- mes "You can't create it with just ^0000FF" + Zeny + "z^000000.";
- mes "Come back when you get those ^0000FF" + @tCreateZeny + "z^000000...";
- next;
- goto EndNPC;
- NoCreateAcc:
- mes "^0072FF[Bank Manager]^000000";
- mes "Come back when you change your mind!";
- next;
- goto EndNPC;
- AccMenu:
- mes "^0072FF[Bank Manager]^000000";
- mes "Your current balance is ^0000FF" + vBankAccZeny +"z^000000.";
- mes "What would you like to do now?";
- next;
- menu "^FF7F01Deposit.^000000",AccDeposit,"^FF7F01Withdraw.^000000",AccWithdraw,"^FF7F01Bank Account Info.^000000",AccBalance,"^FF7F01Close Bank Account^000000",AccClose,"^FF7F01Cancel.^000000",EndNPC;
- AccDeposit:
- mes "^0072FF[Bank Manager]^000000";
- mes "It's always good to deposit every once in a while.";
- mes "Be noticed that we charge a ^0000FF" + @tInterestRate + " percent ^000000 of interest rate in every deposit you make.";
- mes "This means that to deposit ^0000FF100z^000000 you need to have pay us ^0000FF" + 100 * @tInterestRate / 100 + "z^000000.";
- mes "How much are you willing to deposit?";
- next;
- AccDepositInput:
- input @tDeposit;
- set @tDepositTax, @tDeposit * @tInterestRate / 100;
- set @tDepositTotal, @tDeposit - @tDepositTax;
- if (@tDeposit <= 0) goto AccDepositNoInput;
- if (@tDeposit < @tMinDeposit) goto AccDepositNotEnoughInput;
- if (@tDepositTotal > Zeny) goto AccDepositNotEnoughZeny;
- set @tBankAccZenyTemp, vBankAccZeny + @tDepositTotal;
- if (@tBankAccZenyTemp > @tMaxAccZeny) goto AccDepositOver;
- if ((@tDeposit <= Zeny) && (@tBankAccZenyTemp <= @tMaxAccZeny)) goto AccDepositCont;
- mes "^0072FF[Bank Manager]^000000";
- mes "Sorry, for some weird reason I couldn't deposit your money.";
- next;
- goto AccMenu;
- AccDepositCont:
- set Zeny, Zeny - @tDeposit;
- set vBankAccLastZeny, vBankAccZeny;
- set vBankAccZeny, @tBankAccZenyTemp;
- set vBankAccInterests, vBankAccInterests + @tDepositTax;
- mes "^0072FF[Bank Manager]^000000";
- mes "Transaction completed successfully.";
- mes "^0000FF" + @tDeposit + "z^000000 substracted from your money (Taxes applied).";
- mes "^0000FF" + @tDepositTotal + "z^000000 successfully added to your ^FF7F01Bank Account^000000.";
- next;
- goto AccMenu;
- AccDepositOver:
- mes "^0072FF[Bank Manager]^000000";
- mes "There is a limit of ^0000FF" + @tMaxAccZeny + "z^000000 of how much zeny your ^FF7F01Bank Account^000000 can hold.";
- mes "You can't deposit more than that, please try again.";
- mes "Do you want to try again?";
- next;
- menu "^FF7F01Yes, please.^000000",AccDepositInput,"^FF7F01No, thanks.^000000",AccMenu;
- AccDepositNotEnoughInput:
- mes "^0072FF[Bank Manager]^000000";
- mes "You need to put more money in order to make a deposit.";
- mes "Do you want to try again?";
- next;
- menu "^FF7F01Yes, please.^000000",AccDepositInput,"^FF7F01No, thanks.^000000",AccMenu;
- AccDepositNoInput:
- mes "^0072FF[Bank Manager]^000000";
- mes "You must enter a value higher than ^0000FF" + @tMinDeposit + "z^000000.";
- mes "Do you want to try again?";
- next;
- menu "^FF7F01Yes, please.^000000",AccDepositInput,"^FF7F01No, thanks.^000000",AccMenu;
- AccDepositNotEnoughZeny:
- mes "^0072FF[Bank Manager]^000000";
- mes "You don't have ^0000FF" + @tDepositTotal + "z^000000.";
- mes "Remember that taxes are being applied.";
- mes "Do you want to try again?";
- next;
- menu "^FF7F01Yes, please.^000000",AccDepositInput,"^FF7F01No, thanks.^000000",AccMenu;
- AccWithdraw:
- mes "^0072FF[Bank Manager]^000000";
- mes "This is the only transaction I don't like... you figure out why...";
- mes "You can't withdraw leaving less than ^0000FF" + @tMinZeny +"z^000000 in your ^FF7F01Bank Account^000000.";
- mes "Your current balance is ^0000FF" + vBankAccZeny + "z^000000.";
- mes "How much are you going to widthdraw?";
- next;
- AccWithdrawInput:
- input @tWithdraw;
- set @tZenyLeft, vBankAccZeny - @tWithdraw;
- set @tZenyTemp, Zeny + @tWithdraw;
- if (@tWithdraw == 0) goto AccWithdrawNoInput;
- if (@tZenyLeft < @tMinZeny) goto AccWithdrawMinZeny;
- if (@tZenyTemp > @tMaxZeny) goto AccWithDrawOverCharZeny;
- set Zeny, Zeny + @tWithdraw;
- set vBankAccLastZeny, vBankAccZeny;
- set vBankAccZeny, vBankAccZeny - @tWithdraw;
- mes "^0072FF[Bank Manager]^000000";
- mes "Transaction completed successfully.";
- mes "Thank you for using our services.";
- next;
- goto AccMenu;
- AccWithdrawNoInput:
- mes "^0072FF[Bank Manager]^000000";
- mes "In order to withdraw from the bank, you must withdraw more than 0 zeny.";
- mes "Do you want to try again?";
- next;
- menu "^FF7F01Yes, please.^000000",AccWithdrawInput,"^FF7F01No, thanks.^000000",AccMenu;
- AccWithdrawMinZeny:
- mes "^0072FF[Bank Manager]^000000";
- mes "I'm sorry...";
- mes "You can't withdraw ^0000FF" + @tWithdraw + "z^000000 because your ^FF7F01Bank Account^000000 must have ^0000FF" + @tMinZeny + "z^000000 left or more at all times.";
- mes "In order to take all your money from the bank you must select Close Account in the Account Menu.";
- mes "Do you want to try again?";
- next;
- menu "^FF7F01Yes, please.^000000",AccWithdrawInput,"^FF7F01No, thanks.^000000",AccMenu;
- AccWithDrawOverCharZeny:
- mes "^0072FF[Bank Manager]^000000";
- mes "Sorry, but you can't withdraw ^0000FF" + @tWithdraw + "z^000000 because your Player can't carry more than ^0000FF" + @tMaxZeny + "z^000000.";
- mes "Do you want to try again?";
- next;
- menu "^FF7F01Yes, please.^000000",AccWithdrawInput,"^FF7F01No, thanks.^000000",AccMenu;
- AccBalance:
- mes "^0072FF[Bank Manager]^000000";
- mes "Account Status:";
- //shown in blue if the same or more, show in red if less than previous balance
- if (vBankAccZeny >= vBankAccLastZeny) goto AccBalance2;
- mes "Current Balance: ^FF0000" + vBankAccZeny +"z^000000.";
- goto AccBalance3;
- AccBalance2:
- mes "Current Balance: ^0000FF" + vBankAccZeny +"z^000000.";
- goto AccBalance3;
- AccBalance3:
- mes "Previous Balance: ^0000FF" + vBankAccLastZeny +"z^000000.";
- mes "Interest Rate: ^0000FF" + @tInterestRate + "%^000000.";
- mes "Interests Payed: ^0000FF" + vBankAccInterests + "z^000000.";
- next;
- goto AccMenu;
- AccClose:
- mes "^0072FF[Bank Manager]^000000";
- mes "If you close your ^FF7F01Bank Account^000000, it means you eliminate it.";
- mes "Of course, you will get all your money back.";
- mes "Are you sure you want to close your ^FF7F01Bank Account^000000?";
- next;
- menu "^FF7F01I don't want it anymore.^000000",AccCloseConfirm,"^FF7F01No, I'll keep it.^000000",AccCloseKeep;
- AccCloseConfirm:
- set vBankAccActive,0;
- set Zeny, Zeny + vBankAccZeny;
- set vBankAccZeny,0;
- set vBankAccLastZeny,0;
- set vBankAccInterests,0;
- mes "^0072FF[Bank Manager]^000000";
- mes "Thanks for using our services, we hope you come back to visit us.";
- mes "Here's your money.";
- next;
- goto EndNPC;
- AccCloseKeep:
- mes "^0072FF[Bank Manager]^000000";
- mes "Good choice, thanks for staying with us.";
- next;
- goto AccMenu;
- EndNPC:
- set @random,rand(4);
- mes "^0072FF[Bank Manager]^000000";
- if (@random == 0) mes "Have a nice day!";
- if (@random == 1) mes "See you soon!";
- if (@random == 2) mes "See you next time!";
- if (@random == 3) mes "Come back soon!";
- close;
-}
-
-amatsu.gat,189,108,6 script Bank Manager 109,{
- set @tInterestRate, 2; //no decimals
- set @tMaxAccZeny, 1000000000; //max zeny allowed in ^FF7F01Bank Account^000000 1,000,000,000=1 billion
- set @tMaxZeny, 1000000000; //max zeny that a player can carry
- set @tMinZeny, 100; //min zeny allowed or Bank Account is closed
- set @tCreateZeny, 500; //zeny needed in order to create a Bank Account
- set @tMinDeposit,100; //min zeny to deposit
- set @tBeginningZeny, 100; //amount of zeny in Bank Account after creating
- mes "^0072FF[Bank Manager]^000000";
- mes "Welcome to this office branch of Midgard's Bank.";
- next;
- if (vBankAccActive==1) goto AccMenu;
- mes "^0072FF[Bank Manager]^000000";
- mes "You don't have a ^FF7F01Bank Account^000000 yet, you must buy one.";
- mes "It will cost you ^0000FF" + @tCreateZeny + "z^000000 to create it.";
- next;
- menu "^FF7F01Create Account.^000000",CreateAcc,"^FF7F01Information.^000000",BankInfo,"^FF7F01No thanks.^000000",NoCreateAcc;
- BankInfo:
- mes "^0072FF[Bank Manager]^000000";
- mes "Here are some points that you need to know:";
- mes "1. To create a ^FF7F01Bank Account^000000 you have to pay ^0000FF" + @tCreateZeny + "z^000000.";
- mes "2. You will be charged ^0000FF" + @tInterestRate + " percent^000000 everytime you Deposit.";
- mes "3. You must always have no less than ^0000FF" + @tMinZeny + "z^000000 on your ^FF7F01Bank Account^000000.";
- next;
- mes "4. You can save up to ^0000FF" + @tMaxAccZeny + "z^000000 in your bank account.";
- mes "5. You will be able to access your ^FF7F01Bank Account^000000 in any town with a Bank Office.";
- mes "6. You will start by having ^0000FF" + @tBeginningZeny + "z^000000 in your bank account.";
- close;
- CreateAcc:
- mes "^0072FF[Bank Manager]^000000";
- mes "First of all, you will have to have at least ^0000FF" + @tCreateZeny + "z^000000 with you.";
- mes "Your account will start with ^0000FF" + @tBeginningZeny +"z^000000.";
- mes "Are you sure you want to continue?";
- next;
- menu "^FF7F01Sure.^000000",CreateAccCont,"^FF7F01Nah, it's ok.^000000",NoCreateAcc;
- CreateAccCont:
- if (@tCreateZeny > Zeny) goto CreateAccNoEnoughZeny;
- set Zeny, Zeny - @tCreateZeny;
- set vBankAccActive,1;
- set vBankAccZeny, @tBeginningZeny;
- set vBankAccLastZeny, @tBeginningZeny;
- set vBankAccInterests,0;
- mes "^0072FF[Bank Manager]^000000";
- mes "Congratulations, your ^FF7F01Bank Account^000000 is now created with ^0000FF" + vBankAccZeny + "z^000000.";
- mes "You may now proceed to do any transactions.";
- next;
- goto AccMenu;
- CreateAccNoEnoughZeny:
- mes "^0072FF[Bank Manager]^000000";
- mes "Didn't I tell you to make sure you had enough zeny?";
- mes "You can't create it with just ^0000FF" + Zeny + "z^000000.";
- mes "Come back when you get those ^0000FF" + @tCreateZeny + "z^000000...";
- next;
- goto EndNPC;
- NoCreateAcc:
- mes "^0072FF[Bank Manager]^000000";
- mes "Come back when you change your mind!";
- next;
- goto EndNPC;
- AccMenu:
- mes "^0072FF[Bank Manager]^000000";
- mes "Your current balance is ^0000FF" + vBankAccZeny +"z^000000.";
- mes "What would you like to do now?";
- next;
- menu "^FF7F01Deposit.^000000",AccDeposit,"^FF7F01Withdraw.^000000",AccWithdraw,"^FF7F01Bank Account Info.^000000",AccBalance,"^FF7F01Close Bank Account^000000",AccClose,"^FF7F01Cancel.^000000",EndNPC;
- AccDeposit:
- mes "^0072FF[Bank Manager]^000000";
- mes "It's always good to deposit every once in a while.";
- mes "Be noticed that we charge a ^0000FF" + @tInterestRate + " percent ^000000 of interest rate in every deposit you make.";
- mes "This means that to deposit ^0000FF100z^000000 you need to have pay us ^0000FF" + 100 * @tInterestRate / 100 + "z^000000.";
- mes "How much are you willing to deposit?";
- next;
- AccDepositInput:
- input @tDeposit;
- set @tDepositTax, @tDeposit * @tInterestRate / 100;
- set @tDepositTotal, @tDeposit - @tDepositTax;
- if (@tDeposit <= 0) goto AccDepositNoInput;
- if (@tDeposit < @tMinDeposit) goto AccDepositNotEnoughInput;
- if (@tDepositTotal > Zeny) goto AccDepositNotEnoughZeny;
- set @tBankAccZenyTemp, vBankAccZeny + @tDepositTotal;
- if (@tBankAccZenyTemp > @tMaxAccZeny) goto AccDepositOver;
- if ((@tDeposit <= Zeny) && (@tBankAccZenyTemp <= @tMaxAccZeny)) goto AccDepositCont;
- mes "^0072FF[Bank Manager]^000000";
- mes "Sorry, for some weird reason I couldn't deposit your money.";
- next;
- goto AccMenu;
- AccDepositCont:
- set Zeny, Zeny - @tDeposit;
- set vBankAccLastZeny, vBankAccZeny;
- set vBankAccZeny, @tBankAccZenyTemp;
- set vBankAccInterests, vBankAccInterests + @tDepositTax;
- mes "^0072FF[Bank Manager]^000000";
- mes "Transaction completed successfully.";
- mes "^0000FF" + @tDeposit + "z^000000 substracted from your money (Taxes applied).";
- mes "^0000FF" + @tDepositTotal + "z^000000 successfully added to your ^FF7F01Bank Account^000000.";
- next;
- goto AccMenu;
- AccDepositOver:
- mes "^0072FF[Bank Manager]^000000";
- mes "There is a limit of ^0000FF" + @tMaxAccZeny + "z^000000 of how much zeny your ^FF7F01Bank Account^000000 can hold.";
- mes "You can't deposit more than that, please try again.";
- mes "Do you want to try again?";
- next;
- menu "^FF7F01Yes, please.^000000",AccDepositInput,"^FF7F01No, thanks.^000000",AccMenu;
- AccDepositNotEnoughInput:
- mes "^0072FF[Bank Manager]^000000";
- mes "You need to put more money in order to make a deposit.";
- mes "Do you want to try again?";
- next;
- menu "^FF7F01Yes, please.^000000",AccDepositInput,"^FF7F01No, thanks.^000000",AccMenu;
- AccDepositNoInput:
- mes "^0072FF[Bank Manager]^000000";
- mes "You must enter a value higher than ^0000FF" + @tMinDeposit + "z^000000.";
- mes "Do you want to try again?";
- next;
- menu "^FF7F01Yes, please.^000000",AccDepositInput,"^FF7F01No, thanks.^000000",AccMenu;
- AccDepositNotEnoughZeny:
- mes "^0072FF[Bank Manager]^000000";
- mes "You don't have ^0000FF" + @tDepositTotal + "z^000000.";
- mes "Remember that taxes are being applied.";
- mes "Do you want to try again?";
- next;
- menu "^FF7F01Yes, please.^000000",AccDepositInput,"^FF7F01No, thanks.^000000",AccMenu;
- AccWithdraw:
- mes "^0072FF[Bank Manager]^000000";
- mes "This is the only transaction I don't like... you figure out why...";
- mes "You can't withdraw leaving less than ^0000FF" + @tMinZeny +"z^000000 in your ^FF7F01Bank Account^000000.";
- mes "Your current balance is ^0000FF" + vBankAccZeny + "z^000000.";
- mes "How much are you going to widthdraw?";
- next;
- AccWithdrawInput:
- input @tWithdraw;
- set @tZenyLeft, vBankAccZeny - @tWithdraw;
- set @tZenyTemp, Zeny + @tWithdraw;
- if (@tWithdraw == 0) goto AccWithdrawNoInput;
- if (@tZenyLeft < @tMinZeny) goto AccWithdrawMinZeny;
- if (@tZenyTemp > @tMaxZeny) goto AccWithDrawOverCharZeny;
- set Zeny, Zeny + @tWithdraw;
- set vBankAccLastZeny, vBankAccZeny;
- set vBankAccZeny, vBankAccZeny - @tWithdraw;
- mes "^0072FF[Bank Manager]^000000";
- mes "Transaction completed successfully.";
- mes "Thank you for using our services.";
- next;
- goto AccMenu;
- AccWithdrawNoInput:
- mes "^0072FF[Bank Manager]^000000";
- mes "In order to withdraw from the bank, you must withdraw more than 0 zeny.";
- mes "Do you want to try again?";
- next;
- menu "^FF7F01Yes, please.^000000",AccWithdrawInput,"^FF7F01No, thanks.^000000",AccMenu;
- AccWithdrawMinZeny:
- mes "^0072FF[Bank Manager]^000000";
- mes "I'm sorry...";
- mes "You can't withdraw ^0000FF" + @tWithdraw + "z^000000 because your ^FF7F01Bank Account^000000 must have ^0000FF" + @tMinZeny + "z^000000 left or more at all times.";
- mes "In order to take all your money from the bank you must select Close Account in the Account Menu.";
- mes "Do you want to try again?";
- next;
- menu "^FF7F01Yes, please.^000000",AccWithdrawInput,"^FF7F01No, thanks.^000000",AccMenu;
- AccWithDrawOverCharZeny:
- mes "^0072FF[Bank Manager]^000000";
- mes "Sorry, but you can't withdraw ^0000FF" + @tWithdraw + "z^000000 because your Player can't carry more than ^0000FF" + @tMaxZeny + "z^000000.";
- mes "Do you want to try again?";
- next;
- menu "^FF7F01Yes, please.^000000",AccWithdrawInput,"^FF7F01No, thanks.^000000",AccMenu;
- AccBalance:
- mes "^0072FF[Bank Manager]^000000";
- mes "Account Status:";
- //shown in blue if the same or more, show in red if less than previous balance
- if (vBankAccZeny >= vBankAccLastZeny) goto AccBalance2;
- mes "Current Balance: ^FF0000" + vBankAccZeny +"z^000000.";
- goto AccBalance3;
- AccBalance2:
- mes "Current Balance: ^0000FF" + vBankAccZeny +"z^000000.";
- goto AccBalance3;
- AccBalance3:
- mes "Previous Balance: ^0000FF" + vBankAccLastZeny +"z^000000.";
- mes "Interest Rate: ^0000FF" + @tInterestRate + "%^000000.";
- mes "Interests Payed: ^0000FF" + vBankAccInterests + "z^000000.";
- next;
- goto AccMenu;
- AccClose:
- mes "^0072FF[Bank Manager]^000000";
- mes "If you close your ^FF7F01Bank Account^000000, it means you eliminate it.";
- mes "Of course, you will get all your money back.";
- mes "Are you sure you want to close your ^FF7F01Bank Account^000000?";
- next;
- menu "^FF7F01I don't want it anymore.^000000",AccCloseConfirm,"^FF7F01No, I'll keep it.^000000",AccCloseKeep;
- AccCloseConfirm:
- set vBankAccActive,0;
- set Zeny, Zeny + vBankAccZeny;
- set vBankAccZeny,0;
- set vBankAccLastZeny,0;
- set vBankAccInterests,0;
- mes "^0072FF[Bank Manager]^000000";
- mes "Thanks for using our services, we hope you come back to visit us.";
- mes "Here's your money.";
- next;
- goto EndNPC;
- AccCloseKeep:
- mes "^0072FF[Bank Manager]^000000";
- mes "Good choice, thanks for staying with us.";
- next;
- goto AccMenu;
- EndNPC:
- set @random,rand(4);
- mes "^0072FF[Bank Manager]^000000";
- if (@random == 0) mes "Have a nice day!";
- if (@random == 1) mes "See you soon!";
- if (@random == 2) mes "See you next time!";
- if (@random == 3) mes "Come back soon!";
- close;
-}
-
-gonryun.gat,146,142,3 script Bank Manager 109,{
- set @tInterestRate, 2; //no decimals
- set @tMaxAccZeny, 1000000000; //max zeny allowed in ^FF7F01Bank Account^000000 1,000,000,000=1 billion
- set @tMaxZeny, 1000000000; //max zeny that a player can carry
- set @tMinZeny, 100; //min zeny allowed or Bank Account is closed
- set @tCreateZeny, 500; //zeny needed in order to create a Bank Account
- set @tMinDeposit,100; //min zeny to deposit
- set @tBeginningZeny, 100; //amount of zeny in Bank Account after creating
- mes "^0072FF[Bank Manager]^000000";
- mes "Welcome to this office branch of Midgard's Bank.";
- next;
- if (vBankAccActive==1) goto AccMenu;
- mes "^0072FF[Bank Manager]^000000";
- mes "You don't have a ^FF7F01Bank Account^000000 yet, you must buy one.";
- mes "It will cost you ^0000FF" + @tCreateZeny + "z^000000 to create it.";
- next;
- menu "^FF7F01Create Account.^000000",CreateAcc,"^FF7F01Information.^000000",BankInfo,"^FF7F01No thanks.^000000",NoCreateAcc;
- BankInfo:
- mes "^0072FF[Bank Manager]^000000";
- mes "Here are some points that you need to know:";
- mes "1. To create a ^FF7F01Bank Account^000000 you have to pay ^0000FF" + @tCreateZeny + "z^000000.";
- mes "2. You will be charged ^0000FF" + @tInterestRate + " percent^000000 everytime you Deposit.";
- mes "3. You must always have no less than ^0000FF" + @tMinZeny + "z^000000 on your ^FF7F01Bank Account^000000.";
- next;
- mes "4. You can save up to ^0000FF" + @tMaxAccZeny + "z^000000 in your bank account.";
- mes "5. You will be able to access your ^FF7F01Bank Account^000000 in any town with a Bank Office.";
- mes "6. You will start by having ^0000FF" + @tBeginningZeny + "z^000000 in your bank account.";
- close;
- CreateAcc:
- mes "^0072FF[Bank Manager]^000000";
- mes "First of all, you will have to have at least ^0000FF" + @tCreateZeny + "z^000000 with you.";
- mes "Your account will start with ^0000FF" + @tBeginningZeny +"z^000000.";
- mes "Are you sure you want to continue?";
- next;
- menu "^FF7F01Sure.^000000",CreateAccCont,"^FF7F01Nah, it's ok.^000000",NoCreateAcc;
- CreateAccCont:
- if (@tCreateZeny > Zeny) goto CreateAccNoEnoughZeny;
- set Zeny, Zeny - @tCreateZeny;
- set vBankAccActive,1;
- set vBankAccZeny, @tBeginningZeny;
- set vBankAccLastZeny, @tBeginningZeny;
- set vBankAccInterests,0;
- mes "^0072FF[Bank Manager]^000000";
- mes "Congratulations, your ^FF7F01Bank Account^000000 is now created with ^0000FF" + vBankAccZeny + "z^000000.";
- mes "You may now proceed to do any transactions.";
- next;
- goto AccMenu;
- CreateAccNoEnoughZeny:
- mes "^0072FF[Bank Manager]^000000";
- mes "Didn't I tell you to make sure you had enough zeny?";
- mes "You can't create it with just ^0000FF" + Zeny + "z^000000.";
- mes "Come back when you get those ^0000FF" + @tCreateZeny + "z^000000...";
- next;
- goto EndNPC;
- NoCreateAcc:
- mes "^0072FF[Bank Manager]^000000";
- mes "Come back when you change your mind!";
- next;
- goto EndNPC;
- AccMenu:
- mes "^0072FF[Bank Manager]^000000";
- mes "Your current balance is ^0000FF" + vBankAccZeny +"z^000000.";
- mes "What would you like to do now?";
- next;
- menu "^FF7F01Deposit.^000000",AccDeposit,"^FF7F01Withdraw.^000000",AccWithdraw,"^FF7F01Bank Account Info.^000000",AccBalance,"^FF7F01Close Bank Account^000000",AccClose,"^FF7F01Cancel.^000000",EndNPC;
- AccDeposit:
- mes "^0072FF[Bank Manager]^000000";
- mes "It's always good to deposit every once in a while.";
- mes "Be noticed that we charge a ^0000FF" + @tInterestRate + " percent ^000000 of interest rate in every deposit you make.";
- mes "This means that to deposit ^0000FF100z^000000 you need to have pay us ^0000FF" + 100 * @tInterestRate / 100 + "z^000000.";
- mes "How much are you willing to deposit?";
- next;
- AccDepositInput:
- input @tDeposit;
- set @tDepositTax, @tDeposit * @tInterestRate / 100;
- set @tDepositTotal, @tDeposit - @tDepositTax;
- if (@tDeposit <= 0) goto AccDepositNoInput;
- if (@tDeposit < @tMinDeposit) goto AccDepositNotEnoughInput;
- if (@tDepositTotal > Zeny) goto AccDepositNotEnoughZeny;
- set @tBankAccZenyTemp, vBankAccZeny + @tDepositTotal;
- if (@tBankAccZenyTemp > @tMaxAccZeny) goto AccDepositOver;
- if ((@tDeposit <= Zeny) && (@tBankAccZenyTemp <= @tMaxAccZeny)) goto AccDepositCont;
- mes "^0072FF[Bank Manager]^000000";
- mes "Sorry, for some weird reason I couldn't deposit your money.";
- next;
- goto AccMenu;
- AccDepositCont:
- set Zeny, Zeny - @tDeposit;
- set vBankAccLastZeny, vBankAccZeny;
- set vBankAccZeny, @tBankAccZenyTemp;
- set vBankAccInterests, vBankAccInterests + @tDepositTax;
- mes "^0072FF[Bank Manager]^000000";
- mes "Transaction completed successfully.";
- mes "^0000FF" + @tDeposit + "z^000000 substracted from your money (Taxes applied).";
- mes "^0000FF" + @tDepositTotal + "z^000000 successfully added to your ^FF7F01Bank Account^000000.";
- next;
- goto AccMenu;
- AccDepositOver:
- mes "^0072FF[Bank Manager]^000000";
- mes "There is a limit of ^0000FF" + @tMaxAccZeny + "z^000000 of how much zeny your ^FF7F01Bank Account^000000 can hold.";
- mes "You can't deposit more than that, please try again.";
- mes "Do you want to try again?";
- next;
- menu "^FF7F01Yes, please.^000000",AccDepositInput,"^FF7F01No, thanks.^000000",AccMenu;
- AccDepositNotEnoughInput:
- mes "^0072FF[Bank Manager]^000000";
- mes "You need to put more money in order to make a deposit.";
- mes "Do you want to try again?";
- next;
- menu "^FF7F01Yes, please.^000000",AccDepositInput,"^FF7F01No, thanks.^000000",AccMenu;
- AccDepositNoInput:
- mes "^0072FF[Bank Manager]^000000";
- mes "You must enter a value higher than ^0000FF" + @tMinDeposit + "z^000000.";
- mes "Do you want to try again?";
- next;
- menu "^FF7F01Yes, please.^000000",AccDepositInput,"^FF7F01No, thanks.^000000",AccMenu;
- AccDepositNotEnoughZeny:
- mes "^0072FF[Bank Manager]^000000";
- mes "You don't have ^0000FF" + @tDepositTotal + "z^000000.";
- mes "Remember that taxes are being applied.";
- mes "Do you want to try again?";
- next;
- menu "^FF7F01Yes, please.^000000",AccDepositInput,"^FF7F01No, thanks.^000000",AccMenu;
- AccWithdraw:
- mes "^0072FF[Bank Manager]^000000";
- mes "This is the only transaction I don't like... you figure out why...";
- mes "You can't withdraw leaving less than ^0000FF" + @tMinZeny +"z^000000 in your ^FF7F01Bank Account^000000.";
- mes "Your current balance is ^0000FF" + vBankAccZeny + "z^000000.";
- mes "How much are you going to widthdraw?";
- next;
- AccWithdrawInput:
- input @tWithdraw;
- set @tZenyLeft, vBankAccZeny - @tWithdraw;
- set @tZenyTemp, Zeny + @tWithdraw;
- if (@tWithdraw == 0) goto AccWithdrawNoInput;
- if (@tZenyLeft < @tMinZeny) goto AccWithdrawMinZeny;
- if (@tZenyTemp > @tMaxZeny) goto AccWithDrawOverCharZeny;
- set Zeny, Zeny + @tWithdraw;
- set vBankAccLastZeny, vBankAccZeny;
- set vBankAccZeny, vBankAccZeny - @tWithdraw;
- mes "^0072FF[Bank Manager]^000000";
- mes "Transaction completed successfully.";
- mes "Thank you for using our services.";
- next;
- goto AccMenu;
- AccWithdrawNoInput:
- mes "^0072FF[Bank Manager]^000000";
- mes "In order to withdraw from the bank, you must withdraw more than 0 zeny.";
- mes "Do you want to try again?";
- next;
- menu "^FF7F01Yes, please.^000000",AccWithdrawInput,"^FF7F01No, thanks.^000000",AccMenu;
- AccWithdrawMinZeny:
- mes "^0072FF[Bank Manager]^000000";
- mes "I'm sorry...";
- mes "You can't withdraw ^0000FF" + @tWithdraw + "z^000000 because your ^FF7F01Bank Account^000000 must have ^0000FF" + @tMinZeny + "z^000000 left or more at all times.";
- mes "In order to take all your money from the bank you must select Close Account in the Account Menu.";
- mes "Do you want to try again?";
- next;
- menu "^FF7F01Yes, please.^000000",AccWithdrawInput,"^FF7F01No, thanks.^000000",AccMenu;
- AccWithDrawOverCharZeny:
- mes "^0072FF[Bank Manager]^000000";
- mes "Sorry, but you can't withdraw ^0000FF" + @tWithdraw + "z^000000 because your Player can't carry more than ^0000FF" + @tMaxZeny + "z^000000.";
- mes "Do you want to try again?";
- next;
- menu "^FF7F01Yes, please.^000000",AccWithdrawInput,"^FF7F01No, thanks.^000000",AccMenu;
- AccBalance:
- mes "^0072FF[Bank Manager]^000000";
- mes "Account Status:";
- //shown in blue if the same or more, show in red if less than previous balance
- if (vBankAccZeny >= vBankAccLastZeny) goto AccBalance2;
- mes "Current Balance: ^FF0000" + vBankAccZeny +"z^000000.";
- goto AccBalance3;
- AccBalance2:
- mes "Current Balance: ^0000FF" + vBankAccZeny +"z^000000.";
- goto AccBalance3;
- AccBalance3:
- mes "Previous Balance: ^0000FF" + vBankAccLastZeny +"z^000000.";
- mes "Interest Rate: ^0000FF" + @tInterestRate + "%^000000.";
- mes "Interests Payed: ^0000FF" + vBankAccInterests + "z^000000.";
- next;
- goto AccMenu;
- AccClose:
- mes "^0072FF[Bank Manager]^000000";
- mes "If you close your ^FF7F01Bank Account^000000, it means you eliminate it.";
- mes "Of course, you will get all your money back.";
- mes "Are you sure you want to close your ^FF7F01Bank Account^000000?";
- next;
- menu "^FF7F01I don't want it anymore.^000000",AccCloseConfirm,"^FF7F01No, I'll keep it.^000000",AccCloseKeep;
- AccCloseConfirm:
- set vBankAccActive,0;
- set Zeny, Zeny + vBankAccZeny;
- set vBankAccZeny,0;
- set vBankAccLastZeny,0;
- set vBankAccInterests,0;
- mes "^0072FF[Bank Manager]^000000";
- mes "Thanks for using our services, we hope you come back to visit us.";
- mes "Here's your money.";
- next;
- goto EndNPC;
- AccCloseKeep:
- mes "^0072FF[Bank Manager]^000000";
- mes "Good choice, thanks for staying with us.";
- next;
- goto AccMenu;
- EndNPC:
- set @random,rand(4);
- mes "^0072FF[Bank Manager]^000000";
- if (@random == 0) mes "Have a nice day!";
- if (@random == 1) mes "See you soon!";
- if (@random == 2) mes "See you next time!";
- if (@random == 3) mes "Come back soon!";
- close;
-}
-
-um_in.gat,154,125,4 script Bank Manager 109,{
- set @tInterestRate, 2; //no decimals
- set @tMaxAccZeny, 1000000000; //max zeny allowed in ^FF7F01Bank Account^000000 1,000,000,000=1 billion
- set @tMaxZeny, 1000000000; //max zeny that a player can carry
- set @tMinZeny, 100; //min zeny allowed or Bank Account is closed
- set @tCreateZeny, 500; //zeny needed in order to create a Bank Account
- set @tMinDeposit,100; //min zeny to deposit
- set @tBeginningZeny, 100; //amount of zeny in Bank Account after creating
- mes "^0072FF[Bank Manager]^000000";
- mes "Welcome to this office branch of Midgard's Bank.";
- next;
- if (vBankAccActive==1) goto AccMenu;
- mes "^0072FF[Bank Manager]^000000";
- mes "You don't have a ^FF7F01Bank Account^000000 yet, you must buy one.";
- mes "It will cost you ^0000FF" + @tCreateZeny + "z^000000 to create it.";
- next;
- menu "^FF7F01Create Account.^000000",CreateAcc,"^FF7F01Information.^000000",BankInfo,"^FF7F01No thanks.^000000",NoCreateAcc;
- BankInfo:
- mes "^0072FF[Bank Manager]^000000";
- mes "Here are some points that you need to know:";
- mes "1. To create a ^FF7F01Bank Account^000000 you have to pay ^0000FF" + @tCreateZeny + "z^000000.";
- mes "2. You will be charged ^0000FF" + @tInterestRate + " percent^000000 everytime you Deposit.";
- mes "3. You must always have no less than ^0000FF" + @tMinZeny + "z^000000 on your ^FF7F01Bank Account^000000.";
- next;
- mes "4. You can save up to ^0000FF" + @tMaxAccZeny + "z^000000 in your bank account.";
- mes "5. You will be able to access your ^FF7F01Bank Account^000000 in any town with a Bank Office.";
- mes "6. You will start by having ^0000FF" + @tBeginningZeny + "z^000000 in your bank account.";
- close;
- CreateAcc:
- mes "^0072FF[Bank Manager]^000000";
- mes "First of all, you will have to have at least ^0000FF" + @tCreateZeny + "z^000000 with you.";
- mes "Your account will start with ^0000FF" + @tBeginningZeny +"z^000000.";
- mes "Are you sure you want to continue?";
- next;
- menu "^FF7F01Sure.^000000",CreateAccCont,"^FF7F01Nah, it's ok.^000000",NoCreateAcc;
- CreateAccCont:
- if (@tCreateZeny > Zeny) goto CreateAccNoEnoughZeny;
- set Zeny, Zeny - @tCreateZeny;
- set vBankAccActive,1;
- set vBankAccZeny, @tBeginningZeny;
- set vBankAccLastZeny, @tBeginningZeny;
- set vBankAccInterests,0;
- mes "^0072FF[Bank Manager]^000000";
- mes "Congratulations, your ^FF7F01Bank Account^000000 is now created with ^0000FF" + vBankAccZeny + "z^000000.";
- mes "You may now proceed to do any transactions.";
- next;
- goto AccMenu;
- CreateAccNoEnoughZeny:
- mes "^0072FF[Bank Manager]^000000";
- mes "Didn't I tell you to make sure you had enough zeny?";
- mes "You can't create it with just ^0000FF" + Zeny + "z^000000.";
- mes "Come back when you get those ^0000FF" + @tCreateZeny + "z^000000...";
- next;
- goto EndNPC;
- NoCreateAcc:
- mes "^0072FF[Bank Manager]^000000";
- mes "Come back when you change your mind!";
- next;
- goto EndNPC;
- AccMenu:
- mes "^0072FF[Bank Manager]^000000";
- mes "Your current balance is ^0000FF" + vBankAccZeny +"z^000000.";
- mes "What would you like to do now?";
- next;
- menu "^FF7F01Deposit.^000000",AccDeposit,"^FF7F01Withdraw.^000000",AccWithdraw,"^FF7F01Bank Account Info.^000000",AccBalance,"^FF7F01Close Bank Account^000000",AccClose,"^FF7F01Cancel.^000000",EndNPC;
- AccDeposit:
- mes "^0072FF[Bank Manager]^000000";
- mes "It's always good to deposit every once in a while.";
- mes "Be noticed that we charge a ^0000FF" + @tInterestRate + " percent ^000000 of interest rate in every deposit you make.";
- mes "This means that to deposit ^0000FF100z^000000 you need to have pay us ^0000FF" + 100 * @tInterestRate / 100 + "z^000000.";
- mes "How much are you willing to deposit?";
- next;
- AccDepositInput:
- input @tDeposit;
- set @tDepositTax, @tDeposit * @tInterestRate / 100;
- set @tDepositTotal, @tDeposit - @tDepositTax;
- if (@tDeposit <= 0) goto AccDepositNoInput;
- if (@tDeposit < @tMinDeposit) goto AccDepositNotEnoughInput;
- if (@tDepositTotal > Zeny) goto AccDepositNotEnoughZeny;
- set @tBankAccZenyTemp, vBankAccZeny + @tDepositTotal;
- if (@tBankAccZenyTemp > @tMaxAccZeny) goto AccDepositOver;
- if ((@tDeposit <= Zeny) && (@tBankAccZenyTemp <= @tMaxAccZeny)) goto AccDepositCont;
- mes "^0072FF[Bank Manager]^000000";
- mes "Sorry, for some weird reason I couldn't deposit your money.";
- next;
- goto AccMenu;
- AccDepositCont:
- set Zeny, Zeny - @tDeposit;
- set vBankAccLastZeny, vBankAccZeny;
- set vBankAccZeny, @tBankAccZenyTemp;
- set vBankAccInterests, vBankAccInterests + @tDepositTax;
- mes "^0072FF[Bank Manager]^000000";
- mes "Transaction completed successfully.";
- mes "^0000FF" + @tDeposit + "z^000000 substracted from your money (Taxes applied).";
- mes "^0000FF" + @tDepositTotal + "z^000000 successfully added to your ^FF7F01Bank Account^000000.";
- next;
- goto AccMenu;
- AccDepositOver:
- mes "^0072FF[Bank Manager]^000000";
- mes "There is a limit of ^0000FF" + @tMaxAccZeny + "z^000000 of how much zeny your ^FF7F01Bank Account^000000 can hold.";
- mes "You can't deposit more than that, please try again.";
- mes "Do you want to try again?";
- next;
- menu "^FF7F01Yes, please.^000000",AccDepositInput,"^FF7F01No, thanks.^000000",AccMenu;
- AccDepositNotEnoughInput:
- mes "^0072FF[Bank Manager]^000000";
- mes "You need to put more money in order to make a deposit.";
- mes "Do you want to try again?";
- next;
- menu "^FF7F01Yes, please.^000000",AccDepositInput,"^FF7F01No, thanks.^000000",AccMenu;
- AccDepositNoInput:
- mes "^0072FF[Bank Manager]^000000";
- mes "You must enter a value higher than ^0000FF" + @tMinDeposit + "z^000000.";
- mes "Do you want to try again?";
- next;
- menu "^FF7F01Yes, please.^000000",AccDepositInput,"^FF7F01No, thanks.^000000",AccMenu;
- AccDepositNotEnoughZeny:
- mes "^0072FF[Bank Manager]^000000";
- mes "You don't have ^0000FF" + @tDepositTotal + "z^000000.";
- mes "Remember that taxes are being applied.";
- mes "Do you want to try again?";
- next;
- menu "^FF7F01Yes, please.^000000",AccDepositInput,"^FF7F01No, thanks.^000000",AccMenu;
- AccWithdraw:
- mes "^0072FF[Bank Manager]^000000";
- mes "This is the only transaction I don't like... you figure out why...";
- mes "You can't withdraw leaving less than ^0000FF" + @tMinZeny +"z^000000 in your ^FF7F01Bank Account^000000.";
- mes "Your current balance is ^0000FF" + vBankAccZeny + "z^000000.";
- mes "How much are you going to widthdraw?";
- next;
- AccWithdrawInput:
- input @tWithdraw;
- set @tZenyLeft, vBankAccZeny - @tWithdraw;
- set @tZenyTemp, Zeny + @tWithdraw;
- if (@tWithdraw == 0) goto AccWithdrawNoInput;
- if (@tZenyLeft < @tMinZeny) goto AccWithdrawMinZeny;
- if (@tZenyTemp > @tMaxZeny) goto AccWithDrawOverCharZeny;
- set Zeny, Zeny + @tWithdraw;
- set vBankAccLastZeny, vBankAccZeny;
- set vBankAccZeny, vBankAccZeny - @tWithdraw;
- mes "^0072FF[Bank Manager]^000000";
- mes "Transaction completed successfully.";
- mes "Thank you for using our services.";
- next;
- goto AccMenu;
- AccWithdrawNoInput:
- mes "^0072FF[Bank Manager]^000000";
- mes "In order to withdraw from the bank, you must withdraw more than 0 zeny.";
- mes "Do you want to try again?";
- next;
- menu "^FF7F01Yes, please.^000000",AccWithdrawInput,"^FF7F01No, thanks.^000000",AccMenu;
- AccWithdrawMinZeny:
- mes "^0072FF[Bank Manager]^000000";
- mes "I'm sorry...";
- mes "You can't withdraw ^0000FF" + @tWithdraw + "z^000000 because your ^FF7F01Bank Account^000000 must have ^0000FF" + @tMinZeny + "z^000000 left or more at all times.";
- mes "In order to take all your money from the bank you must select Close Account in the Account Menu.";
- mes "Do you want to try again?";
- next;
- menu "^FF7F01Yes, please.^000000",AccWithdrawInput,"^FF7F01No, thanks.^000000",AccMenu;
- AccWithDrawOverCharZeny:
- mes "^0072FF[Bank Manager]^000000";
- mes "Sorry, but you can't withdraw ^0000FF" + @tWithdraw + "z^000000 because your Player can't carry more than ^0000FF" + @tMaxZeny + "z^000000.";
- mes "Do you want to try again?";
- next;
- menu "^FF7F01Yes, please.^000000",AccWithdrawInput,"^FF7F01No, thanks.^000000",AccMenu;
- AccBalance:
- mes "^0072FF[Bank Manager]^000000";
- mes "Account Status:";
- //shown in blue if the same or more, show in red if less than previous balance
- if (vBankAccZeny >= vBankAccLastZeny) goto AccBalance2;
- mes "Current Balance: ^FF0000" + vBankAccZeny +"z^000000.";
- goto AccBalance3;
- AccBalance2:
- mes "Current Balance: ^0000FF" + vBankAccZeny +"z^000000.";
- goto AccBalance3;
- AccBalance3:
- mes "Previous Balance: ^0000FF" + vBankAccLastZeny +"z^000000.";
- mes "Interest Rate: ^0000FF" + @tInterestRate + "%^000000.";
- mes "Interests Payed: ^0000FF" + vBankAccInterests + "z^000000.";
- next;
- goto AccMenu;
- AccClose:
- mes "^0072FF[Bank Manager]^000000";
- mes "If you close your ^FF7F01Bank Account^000000, it means you eliminate it.";
- mes "Of course, you will get all your money back.";
- mes "Are you sure you want to close your ^FF7F01Bank Account^000000?";
- next;
- menu "^FF7F01I don't want it anymore.^000000",AccCloseConfirm,"^FF7F01No, I'll keep it.^000000",AccCloseKeep;
- AccCloseConfirm:
- set vBankAccActive,0;
- set Zeny, Zeny + vBankAccZeny;
- set vBankAccZeny,0;
- set vBankAccLastZeny,0;
- set vBankAccInterests,0;
- mes "^0072FF[Bank Manager]^000000";
- mes "Thanks for using our services, we hope you come back to visit us.";
- mes "Here's your money.";
- next;
- goto EndNPC;
- AccCloseKeep:
- mes "^0072FF[Bank Manager]^000000";
- mes "Good choice, thanks for staying with us.";
- next;
- goto AccMenu;
- EndNPC:
- set @random,rand(4);
- mes "^0072FF[Bank Manager]^000000";
- if (@random == 0) mes "Have a nice day!";
- if (@random == 1) mes "See you soon!";
- if (@random == 2) mes "See you next time!";
- if (@random == 3) mes "Come back soon!";
- close;
+//======================================================================================== +// -»» OmniAthena Scripts ««- +// Copyright (c) 2004, Athena Advanced +// http://agelessanime.com/aaforums/ +// By MC_Cameri +// This Bank NPC doesn't need any items. +// It is useful for servers in which you +// lose zeny when you die. +// Also, if you have 1,000,000,000z this +// will be good to use. +//======================================================================================== +//0072FF (sky blue) +//FF7F01 (orange) + +prt_in.gat,165,141,4 script Bank Manager 109,{ + set @tInterestRate, 2; //no decimals + set @tMaxAccZeny, 1000000000; //max zeny allowed in ^FF7F01Bank Account^000000 1,000,000,000=1 billion + set @tMaxZeny, 1000000000; //max zeny that a player can carry + set @tMinZeny, 100; //min zeny allowed or Bank Account is closed + set @tCreateZeny, 500; //zeny needed in order to create a Bank Account + set @tMinDeposit,100; //min zeny to deposit + set @tBeginningZeny, 100; //amount of zeny in Bank Account after creating + mes "^0072FF[Bank Manager]^000000"; + mes "Welcome to this office branch of Midgard's Bank."; + next; + if (vBankAccActive==1) goto AccMenu; + mes "^0072FF[Bank Manager]^000000"; + mes "You don't have a ^FF7F01Bank Account^000000 yet, you must buy one."; + mes "It will cost you ^0000FF" + @tCreateZeny + "z^000000 to create it."; + next; + menu "^FF7F01Create Account.^000000",CreateAcc,"^FF7F01Information.^000000",BankInfo,"^FF7F01No thanks.^000000",NoCreateAcc; + BankInfo: + mes "^0072FF[Bank Manager]^000000"; + mes "Here are some points that you need to know:"; + mes "1. To create a ^FF7F01Bank Account^000000 you have to pay ^0000FF" + @tCreateZeny + "z^000000."; + mes "2. You will be charged ^0000FF" + @tInterestRate + " percent^000000 everytime you Deposit."; + mes "3. You must always have no less than ^0000FF" + @tMinZeny + "z^000000 on your ^FF7F01Bank Account^000000."; + next; + mes "4. You can save up to ^0000FF" + @tMaxAccZeny + "z^000000 in your bank account."; + mes "5. You will be able to access your ^FF7F01Bank Account^000000 in any town with a Bank Office."; + mes "6. You will start by having ^0000FF" + @tBeginningZeny + "z^000000 in your bank account."; + close; + CreateAcc: + mes "^0072FF[Bank Manager]^000000"; + mes "First of all, you will have to have at least ^0000FF" + @tCreateZeny + "z^000000 with you."; + mes "Your account will start with ^0000FF" + @tBeginningZeny +"z^000000."; + mes "Are you sure you want to continue?"; + next; + menu "^FF7F01Sure.^000000",CreateAccCont,"^FF7F01Nah, it's ok.^000000",NoCreateAcc; + CreateAccCont: + if (@tCreateZeny > Zeny) goto CreateAccNoEnoughZeny; + set Zeny, Zeny - @tCreateZeny; + set vBankAccActive,1; + set vBankAccZeny, @tBeginningZeny; + set vBankAccLastZeny, @tBeginningZeny; + set vBankAccInterests,0; + mes "^0072FF[Bank Manager]^000000"; + mes "Congratulations, your ^FF7F01Bank Account^000000 is now created with ^0000FF" + vBankAccZeny + "z^000000."; + mes "You may now proceed to do any transactions."; + next; + goto AccMenu; + CreateAccNoEnoughZeny: + mes "^0072FF[Bank Manager]^000000"; + mes "Didn't I tell you to make sure you had enough zeny?"; + mes "You can't create it with just ^0000FF" + Zeny + "z^000000."; + mes "Come back when you get those ^0000FF" + @tCreateZeny + "z^000000..."; + next; + goto EndNPC; + NoCreateAcc: + mes "^0072FF[Bank Manager]^000000"; + mes "Come back when you change your mind!"; + next; + goto EndNPC; + AccMenu: + mes "^0072FF[Bank Manager]^000000"; + mes "Your current balance is ^0000FF" + vBankAccZeny +"z^000000."; + mes "What would you like to do now?"; + next; + menu "^FF7F01Deposit.^000000",AccDeposit,"^FF7F01Withdraw.^000000",AccWithdraw,"^FF7F01Bank Account Info.^000000",AccBalance,"^FF7F01Close Bank Account^000000",AccClose,"^FF7F01Cancel.^000000",EndNPC; + AccDeposit: + mes "^0072FF[Bank Manager]^000000"; + mes "It's always good to deposit every once in a while."; + mes "Be noticed that we charge a ^0000FF" + @tInterestRate + " percent ^000000 of interest rate in every deposit you make."; + mes "This means that to deposit ^0000FF100z^000000 you need to have pay us ^0000FF" + 100 * @tInterestRate / 100 + "z^000000."; + mes "How much are you willing to deposit?"; + next; + AccDepositInput: + input @tDeposit; + set @tDepositTax, @tDeposit * @tInterestRate / 100; + set @tDepositTotal, @tDeposit - @tDepositTax; + if (@tDeposit <= 0) goto AccDepositNoInput; + if (@tDeposit < @tMinDeposit) goto AccDepositNotEnoughInput; + if (@tDepositTotal > Zeny) goto AccDepositNotEnoughZeny; + set @tBankAccZenyTemp, vBankAccZeny + @tDepositTotal; + if (@tBankAccZenyTemp > @tMaxAccZeny) goto AccDepositOver; + if ((@tDeposit <= Zeny) && (@tBankAccZenyTemp <= @tMaxAccZeny)) goto AccDepositCont; + mes "^0072FF[Bank Manager]^000000"; + mes "Sorry, for some weird reason I couldn't deposit your money."; + next; + goto AccMenu; + AccDepositCont: + set Zeny, Zeny - @tDeposit; + set vBankAccLastZeny, vBankAccZeny; + set vBankAccZeny, @tBankAccZenyTemp; + set vBankAccInterests, vBankAccInterests + @tDepositTax; + mes "^0072FF[Bank Manager]^000000"; + mes "Transaction completed successfully."; + mes "^0000FF" + @tDeposit + "z^000000 substracted from your money (Taxes applied)."; + mes "^0000FF" + @tDepositTotal + "z^000000 successfully added to your ^FF7F01Bank Account^000000."; + next; + goto AccMenu; + AccDepositOver: + mes "^0072FF[Bank Manager]^000000"; + mes "There is a limit of ^0000FF" + @tMaxAccZeny + "z^000000 of how much zeny your ^FF7F01Bank Account^000000 can hold."; + mes "You can't deposit more than that, please try again."; + mes "Do you want to try again?"; + next; + menu "^FF7F01Yes, please.^000000",AccDepositInput,"^FF7F01No, thanks.^000000",AccMenu; + AccDepositNotEnoughInput: + mes "^0072FF[Bank Manager]^000000"; + mes "You need to put more money in order to make a deposit."; + mes "Do you want to try again?"; + next; + menu "^FF7F01Yes, please.^000000",AccDepositInput,"^FF7F01No, thanks.^000000",AccMenu; + AccDepositNoInput: + mes "^0072FF[Bank Manager]^000000"; + mes "You must enter a value higher than ^0000FF" + @tMinDeposit + "z^000000."; + mes "Do you want to try again?"; + next; + menu "^FF7F01Yes, please.^000000",AccDepositInput,"^FF7F01No, thanks.^000000",AccMenu; + AccDepositNotEnoughZeny: + mes "^0072FF[Bank Manager]^000000"; + mes "You don't have ^0000FF" + @tDepositTotal + "z^000000."; + mes "Remember that taxes are being applied."; + mes "Do you want to try again?"; + next; + menu "^FF7F01Yes, please.^000000",AccDepositInput,"^FF7F01No, thanks.^000000",AccMenu; + AccWithdraw: + mes "^0072FF[Bank Manager]^000000"; + mes "This is the only transaction I don't like... you figure out why..."; + mes "You can't withdraw leaving less than ^0000FF" + @tMinZeny +"z^000000 in your ^FF7F01Bank Account^000000."; + mes "Your current balance is ^0000FF" + vBankAccZeny + "z^000000."; + mes "How much are you going to widthdraw?"; + next; + AccWithdrawInput: + input @tWithdraw; + set @tZenyLeft, vBankAccZeny - @tWithdraw; + set @tZenyTemp, Zeny + @tWithdraw; + if (@tWithdraw == 0) goto AccWithdrawNoInput; + if (@tZenyLeft < @tMinZeny) goto AccWithdrawMinZeny; + if (@tZenyTemp > @tMaxZeny) goto AccWithDrawOverCharZeny; + set Zeny, Zeny + @tWithdraw; + set vBankAccLastZeny, vBankAccZeny; + set vBankAccZeny, vBankAccZeny - @tWithdraw; + mes "^0072FF[Bank Manager]^000000"; + mes "Transaction completed successfully."; + mes "Thank you for using our services."; + next; + goto AccMenu; + AccWithdrawNoInput: + mes "^0072FF[Bank Manager]^000000"; + mes "In order to withdraw from the bank, you must withdraw more than 0 zeny."; + mes "Do you want to try again?"; + next; + menu "^FF7F01Yes, please.^000000",AccWithdrawInput,"^FF7F01No, thanks.^000000",AccMenu; + AccWithdrawMinZeny: + mes "^0072FF[Bank Manager]^000000"; + mes "I'm sorry..."; + mes "You can't withdraw ^0000FF" + @tWithdraw + "z^000000 because your ^FF7F01Bank Account^000000 must have ^0000FF" + @tMinZeny + "z^000000 left or more at all times."; + mes "In order to take all your money from the bank you must select Close Account in the Account Menu."; + mes "Do you want to try again?"; + next; + menu "^FF7F01Yes, please.^000000",AccWithdrawInput,"^FF7F01No, thanks.^000000",AccMenu; + AccWithDrawOverCharZeny: + mes "^0072FF[Bank Manager]^000000"; + mes "Sorry, but you can't withdraw ^0000FF" + @tWithdraw + "z^000000 because your Player can't carry more than ^0000FF" + @tMaxZeny + "z^000000."; + mes "Do you want to try again?"; + next; + menu "^FF7F01Yes, please.^000000",AccWithdrawInput,"^FF7F01No, thanks.^000000",AccMenu; + AccBalance: + mes "^0072FF[Bank Manager]^000000"; + mes "Account Status:"; + //shown in blue if the same or more, show in red if less than previous balance + if (vBankAccZeny >= vBankAccLastZeny) goto AccBalance2; + mes "Current Balance: ^FF0000" + vBankAccZeny +"z^000000."; + goto AccBalance3; + AccBalance2: + mes "Current Balance: ^0000FF" + vBankAccZeny +"z^000000."; + goto AccBalance3; + AccBalance3: + mes "Previous Balance: ^0000FF" + vBankAccLastZeny +"z^000000."; + mes "Interest Rate: ^0000FF" + @tInterestRate + "%^000000."; + mes "Interests Payed: ^0000FF" + vBankAccInterests + "z^000000."; + next; + goto AccMenu; + AccClose: + mes "^0072FF[Bank Manager]^000000"; + mes "If you close your ^FF7F01Bank Account^000000, it means you eliminate it."; + mes "Of course, you will get all your money back."; + mes "Are you sure you want to close your ^FF7F01Bank Account^000000?"; + next; + menu "^FF7F01I don't want it anymore.^000000",AccCloseConfirm,"^FF7F01No, I'll keep it.^000000",AccCloseKeep; + AccCloseConfirm: + set vBankAccActive,0; + set Zeny, Zeny + vBankAccZeny; + set vBankAccZeny,0; + set vBankAccLastZeny,0; + set vBankAccInterests,0; + mes "^0072FF[Bank Manager]^000000"; + mes "Thanks for using our services, we hope you come back to visit us."; + mes "Here's your money."; + next; + goto EndNPC; + AccCloseKeep: + mes "^0072FF[Bank Manager]^000000"; + mes "Good choice, thanks for staying with us."; + next; + goto AccMenu; + EndNPC: + set @random,rand(4); + mes "^0072FF[Bank Manager]^000000"; + if (@random == 0) mes "Have a nice day!"; + if (@random == 1) mes "See you soon!"; + if (@random == 2) mes "See you next time!"; + if (@random == 3) mes "Come back soon!"; + close; +} + +izlude_in.gat,57,110,4 script Bank Manager 109,{ + set @tInterestRate, 2; //no decimals + set @tMaxAccZeny, 1000000000; //max zeny allowed in ^FF7F01Bank Account^000000 1,000,000,000=1 billion + set @tMaxZeny, 1000000000; //max zeny that a player can carry + set @tMinZeny, 100; //min zeny allowed or Bank Account is closed + set @tCreateZeny, 500; //zeny needed in order to create a Bank Account + set @tMinDeposit,100; //min zeny to deposit + set @tBeginningZeny, 100; //amount of zeny in Bank Account after creating + mes "^0072FF[Bank Manager]^000000"; + mes "Welcome to this office branch of Midgard's Bank."; + next; + if (vBankAccActive==1) goto AccMenu; + mes "^0072FF[Bank Manager]^000000"; + mes "You don't have a ^FF7F01Bank Account^000000 yet, you must buy one."; + mes "It will cost you ^0000FF" + @tCreateZeny + "z^000000 to create it."; + next; + menu "^FF7F01Create Account.^000000",CreateAcc,"^FF7F01Information.^000000",BankInfo,"^FF7F01No thanks.^000000",NoCreateAcc; + BankInfo: + mes "^0072FF[Bank Manager]^000000"; + mes "Here are some points that you need to know:"; + mes "1. To create a ^FF7F01Bank Account^000000 you have to pay ^0000FF" + @tCreateZeny + "z^000000."; + mes "2. You will be charged ^0000FF" + @tInterestRate + " percent^000000 everytime you Deposit."; + mes "3. You must always have no less than ^0000FF" + @tMinZeny + "z^000000 on your ^FF7F01Bank Account^000000."; + next; + mes "4. You can save up to ^0000FF" + @tMaxAccZeny + "z^000000 in your bank account."; + mes "5. You will be able to access your ^FF7F01Bank Account^000000 in any town with a Bank Office."; + mes "6. You will start by having ^0000FF" + @tBeginningZeny + "z^000000 in your bank account."; + close; + CreateAcc: + mes "^0072FF[Bank Manager]^000000"; + mes "First of all, you will have to have at least ^0000FF" + @tCreateZeny + "z^000000 with you."; + mes "Your account will start with ^0000FF" + @tBeginningZeny +"z^000000."; + mes "Are you sure you want to continue?"; + next; + menu "^FF7F01Sure.^000000",CreateAccCont,"^FF7F01Nah, it's ok.^000000",NoCreateAcc; + CreateAccCont: + if (@tCreateZeny > Zeny) goto CreateAccNoEnoughZeny; + set Zeny, Zeny - @tCreateZeny; + set vBankAccActive,1; + set vBankAccZeny, @tBeginningZeny; + set vBankAccLastZeny, @tBeginningZeny; + set vBankAccInterests,0; + mes "^0072FF[Bank Manager]^000000"; + mes "Congratulations, your ^FF7F01Bank Account^000000 is now created with ^0000FF" + vBankAccZeny + "z^000000."; + mes "You may now proceed to do any transactions."; + next; + goto AccMenu; + CreateAccNoEnoughZeny: + mes "^0072FF[Bank Manager]^000000"; + mes "Didn't I tell you to make sure you had enough zeny?"; + mes "You can't create it with just ^0000FF" + Zeny + "z^000000."; + mes "Come back when you get those ^0000FF" + @tCreateZeny + "z^000000..."; + next; + goto EndNPC; + NoCreateAcc: + mes "^0072FF[Bank Manager]^000000"; + mes "Come back when you change your mind!"; + next; + goto EndNPC; + AccMenu: + mes "^0072FF[Bank Manager]^000000"; + mes "Your current balance is ^0000FF" + vBankAccZeny +"z^000000."; + mes "What would you like to do now?"; + next; + menu "^FF7F01Deposit.^000000",AccDeposit,"^FF7F01Withdraw.^000000",AccWithdraw,"^FF7F01Bank Account Info.^000000",AccBalance,"^FF7F01Close Bank Account^000000",AccClose,"^FF7F01Cancel.^000000",EndNPC; + AccDeposit: + mes "^0072FF[Bank Manager]^000000"; + mes "It's always good to deposit every once in a while."; + mes "Be noticed that we charge a ^0000FF" + @tInterestRate + " percent ^000000 of interest rate in every deposit you make."; + mes "This means that to deposit ^0000FF100z^000000 you need to have pay us ^0000FF" + 100 * @tInterestRate / 100 + "z^000000."; + mes "How much are you willing to deposit?"; + next; + AccDepositInput: + input @tDeposit; + set @tDepositTax, @tDeposit * @tInterestRate / 100; + set @tDepositTotal, @tDeposit - @tDepositTax; + if (@tDeposit <= 0) goto AccDepositNoInput; + if (@tDeposit < @tMinDeposit) goto AccDepositNotEnoughInput; + if (@tDepositTotal > Zeny) goto AccDepositNotEnoughZeny; + set @tBankAccZenyTemp, vBankAccZeny + @tDepositTotal; + if (@tBankAccZenyTemp > @tMaxAccZeny) goto AccDepositOver; + if ((@tDeposit <= Zeny) && (@tBankAccZenyTemp <= @tMaxAccZeny)) goto AccDepositCont; + mes "^0072FF[Bank Manager]^000000"; + mes "Sorry, for some weird reason I couldn't deposit your money."; + next; + goto AccMenu; + AccDepositCont: + set Zeny, Zeny - @tDeposit; + set vBankAccLastZeny, vBankAccZeny; + set vBankAccZeny, @tBankAccZenyTemp; + set vBankAccInterests, vBankAccInterests + @tDepositTax; + mes "^0072FF[Bank Manager]^000000"; + mes "Transaction completed successfully."; + mes "^0000FF" + @tDeposit + "z^000000 substracted from your money (Taxes applied)."; + mes "^0000FF" + @tDepositTotal + "z^000000 successfully added to your ^FF7F01Bank Account^000000."; + next; + goto AccMenu; + AccDepositOver: + mes "^0072FF[Bank Manager]^000000"; + mes "There is a limit of ^0000FF" + @tMaxAccZeny + "z^000000 of how much zeny your ^FF7F01Bank Account^000000 can hold."; + mes "You can't deposit more than that, please try again."; + mes "Do you want to try again?"; + next; + menu "^FF7F01Yes, please.^000000",AccDepositInput,"^FF7F01No, thanks.^000000",AccMenu; + AccDepositNotEnoughInput: + mes "^0072FF[Bank Manager]^000000"; + mes "You need to put more money in order to make a deposit."; + mes "Do you want to try again?"; + next; + menu "^FF7F01Yes, please.^000000",AccDepositInput,"^FF7F01No, thanks.^000000",AccMenu; + AccDepositNoInput: + mes "^0072FF[Bank Manager]^000000"; + mes "You must enter a value higher than ^0000FF" + @tMinDeposit + "z^000000."; + mes "Do you want to try again?"; + next; + menu "^FF7F01Yes, please.^000000",AccDepositInput,"^FF7F01No, thanks.^000000",AccMenu; + AccDepositNotEnoughZeny: + mes "^0072FF[Bank Manager]^000000"; + mes "You don't have ^0000FF" + @tDepositTotal + "z^000000."; + mes "Remember that taxes are being applied."; + mes "Do you want to try again?"; + next; + menu "^FF7F01Yes, please.^000000",AccDepositInput,"^FF7F01No, thanks.^000000",AccMenu; + AccWithdraw: + mes "^0072FF[Bank Manager]^000000"; + mes "This is the only transaction I don't like... you figure out why..."; + mes "You can't withdraw leaving less than ^0000FF" + @tMinZeny +"z^000000 in your ^FF7F01Bank Account^000000."; + mes "Your current balance is ^0000FF" + vBankAccZeny + "z^000000."; + mes "How much are you going to widthdraw?"; + next; + AccWithdrawInput: + input @tWithdraw; + set @tZenyLeft, vBankAccZeny - @tWithdraw; + set @tZenyTemp, Zeny + @tWithdraw; + if (@tWithdraw == 0) goto AccWithdrawNoInput; + if (@tZenyLeft < @tMinZeny) goto AccWithdrawMinZeny; + if (@tZenyTemp > @tMaxZeny) goto AccWithDrawOverCharZeny; + set Zeny, Zeny + @tWithdraw; + set vBankAccLastZeny, vBankAccZeny; + set vBankAccZeny, vBankAccZeny - @tWithdraw; + mes "^0072FF[Bank Manager]^000000"; + mes "Transaction completed successfully."; + mes "Thank you for using our services."; + next; + goto AccMenu; + AccWithdrawNoInput: + mes "^0072FF[Bank Manager]^000000"; + mes "In order to withdraw from the bank, you must withdraw more than 0 zeny."; + mes "Do you want to try again?"; + next; + menu "^FF7F01Yes, please.^000000",AccWithdrawInput,"^FF7F01No, thanks.^000000",AccMenu; + AccWithdrawMinZeny: + mes "^0072FF[Bank Manager]^000000"; + mes "I'm sorry..."; + mes "You can't withdraw ^0000FF" + @tWithdraw + "z^000000 because your ^FF7F01Bank Account^000000 must have ^0000FF" + @tMinZeny + "z^000000 left or more at all times."; + mes "In order to take all your money from the bank you must select Close Account in the Account Menu."; + mes "Do you want to try again?"; + next; + menu "^FF7F01Yes, please.^000000",AccWithdrawInput,"^FF7F01No, thanks.^000000",AccMenu; + AccWithDrawOverCharZeny: + mes "^0072FF[Bank Manager]^000000"; + mes "Sorry, but you can't withdraw ^0000FF" + @tWithdraw + "z^000000 because your Player can't carry more than ^0000FF" + @tMaxZeny + "z^000000."; + mes "Do you want to try again?"; + next; + menu "^FF7F01Yes, please.^000000",AccWithdrawInput,"^FF7F01No, thanks.^000000",AccMenu; + AccBalance: + mes "^0072FF[Bank Manager]^000000"; + mes "Account Status:"; + //shown in blue if the same or more, show in red if less than previous balance + if (vBankAccZeny >= vBankAccLastZeny) goto AccBalance2; + mes "Current Balance: ^FF0000" + vBankAccZeny +"z^000000."; + goto AccBalance3; + AccBalance2: + mes "Current Balance: ^0000FF" + vBankAccZeny +"z^000000."; + goto AccBalance3; + AccBalance3: + mes "Previous Balance: ^0000FF" + vBankAccLastZeny +"z^000000."; + mes "Interest Rate: ^0000FF" + @tInterestRate + "%^000000."; + mes "Interests Payed: ^0000FF" + vBankAccInterests + "z^000000."; + next; + goto AccMenu; + AccClose: + mes "^0072FF[Bank Manager]^000000"; + mes "If you close your ^FF7F01Bank Account^000000, it means you eliminate it."; + mes "Of course, you will get all your money back."; + mes "Are you sure you want to close your ^FF7F01Bank Account^000000?"; + next; + menu "^FF7F01I don't want it anymore.^000000",AccCloseConfirm,"^FF7F01No, I'll keep it.^000000",AccCloseKeep; + AccCloseConfirm: + set vBankAccActive,0; + set Zeny, Zeny + vBankAccZeny; + set vBankAccZeny,0; + set vBankAccLastZeny,0; + set vBankAccInterests,0; + mes "^0072FF[Bank Manager]^000000"; + mes "Thanks for using our services, we hope you come back to visit us."; + mes "Here's your money."; + next; + goto EndNPC; + AccCloseKeep: + mes "^0072FF[Bank Manager]^000000"; + mes "Good choice, thanks for staying with us."; + next; + goto AccMenu; + EndNPC: + set @random,rand(4); + mes "^0072FF[Bank Manager]^000000"; + if (@random == 0) mes "Have a nice day!"; + if (@random == 1) mes "See you soon!"; + if (@random == 2) mes "See you next time!"; + if (@random == 3) mes "Come back soon!"; + close; +} + +morocc_in.gat,142,64,3 script Bank Manager 109,{ + set @tInterestRate, 2; //no decimals + set @tMaxAccZeny, 1000000000; //max zeny allowed in ^FF7F01Bank Account^000000 1,000,000,000=1 billion + set @tMaxZeny, 1000000000; //max zeny that a player can carry + set @tMinZeny, 100; //min zeny allowed or Bank Account is closed + set @tCreateZeny, 500; //zeny needed in order to create a Bank Account + set @tMinDeposit,100; //min zeny to deposit + set @tBeginningZeny, 100; //amount of zeny in Bank Account after creating + mes "^0072FF[Bank Manager]^000000"; + mes "Welcome to this office branch of Midgard's Bank."; + next; + if (vBankAccActive==1) goto AccMenu; + mes "^0072FF[Bank Manager]^000000"; + mes "You don't have a ^FF7F01Bank Account^000000 yet, you must buy one."; + mes "It will cost you ^0000FF" + @tCreateZeny + "z^000000 to create it."; + next; + menu "^FF7F01Create Account.^000000",CreateAcc,"^FF7F01Information.^000000",BankInfo,"^FF7F01No thanks.^000000",NoCreateAcc; + BankInfo: + mes "^0072FF[Bank Manager]^000000"; + mes "Here are some points that you need to know:"; + mes "1. To create a ^FF7F01Bank Account^000000 you have to pay ^0000FF" + @tCreateZeny + "z^000000."; + mes "2. You will be charged ^0000FF" + @tInterestRate + " percent^000000 everytime you Deposit."; + mes "3. You must always have no less than ^0000FF" + @tMinZeny + "z^000000 on your ^FF7F01Bank Account^000000."; + next; + mes "4. You can save up to ^0000FF" + @tMaxAccZeny + "z^000000 in your bank account."; + mes "5. You will be able to access your ^FF7F01Bank Account^000000 in any town with a Bank Office."; + mes "6. You will start by having ^0000FF" + @tBeginningZeny + "z^000000 in your bank account."; + close; + CreateAcc: + mes "^0072FF[Bank Manager]^000000"; + mes "First of all, you will have to have at least ^0000FF" + @tCreateZeny + "z^000000 with you."; + mes "Your account will start with ^0000FF" + @tBeginningZeny +"z^000000."; + mes "Are you sure you want to continue?"; + next; + menu "^FF7F01Sure.^000000",CreateAccCont,"^FF7F01Nah, it's ok.^000000",NoCreateAcc; + CreateAccCont: + if (@tCreateZeny > Zeny) goto CreateAccNoEnoughZeny; + set Zeny, Zeny - @tCreateZeny; + set vBankAccActive,1; + set vBankAccZeny, @tBeginningZeny; + set vBankAccLastZeny, @tBeginningZeny; + set vBankAccInterests,0; + mes "^0072FF[Bank Manager]^000000"; + mes "Congratulations, your ^FF7F01Bank Account^000000 is now created with ^0000FF" + vBankAccZeny + "z^000000."; + mes "You may now proceed to do any transactions."; + next; + goto AccMenu; + CreateAccNoEnoughZeny: + mes "^0072FF[Bank Manager]^000000"; + mes "Didn't I tell you to make sure you had enough zeny?"; + mes "You can't create it with just ^0000FF" + Zeny + "z^000000."; + mes "Come back when you get those ^0000FF" + @tCreateZeny + "z^000000..."; + next; + goto EndNPC; + NoCreateAcc: + mes "^0072FF[Bank Manager]^000000"; + mes "Come back when you change your mind!"; + next; + goto EndNPC; + AccMenu: + mes "^0072FF[Bank Manager]^000000"; + mes "Your current balance is ^0000FF" + vBankAccZeny +"z^000000."; + mes "What would you like to do now?"; + next; + menu "^FF7F01Deposit.^000000",AccDeposit,"^FF7F01Withdraw.^000000",AccWithdraw,"^FF7F01Bank Account Info.^000000",AccBalance,"^FF7F01Close Bank Account^000000",AccClose,"^FF7F01Cancel.^000000",EndNPC; + AccDeposit: + mes "^0072FF[Bank Manager]^000000"; + mes "It's always good to deposit every once in a while."; + mes "Be noticed that we charge a ^0000FF" + @tInterestRate + " percent ^000000 of interest rate in every deposit you make."; + mes "This means that to deposit ^0000FF100z^000000 you need to have pay us ^0000FF" + 100 * @tInterestRate / 100 + "z^000000."; + mes "How much are you willing to deposit?"; + next; + AccDepositInput: + input @tDeposit; + set @tDepositTax, @tDeposit * @tInterestRate / 100; + set @tDepositTotal, @tDeposit - @tDepositTax; + if (@tDeposit <= 0) goto AccDepositNoInput; + if (@tDeposit < @tMinDeposit) goto AccDepositNotEnoughInput; + if (@tDepositTotal > Zeny) goto AccDepositNotEnoughZeny; + set @tBankAccZenyTemp, vBankAccZeny + @tDepositTotal; + if (@tBankAccZenyTemp > @tMaxAccZeny) goto AccDepositOver; + if ((@tDeposit <= Zeny) && (@tBankAccZenyTemp <= @tMaxAccZeny)) goto AccDepositCont; + mes "^0072FF[Bank Manager]^000000"; + mes "Sorry, for some weird reason I couldn't deposit your money."; + next; + goto AccMenu; + AccDepositCont: + set Zeny, Zeny - @tDeposit; + set vBankAccLastZeny, vBankAccZeny; + set vBankAccZeny, @tBankAccZenyTemp; + set vBankAccInterests, vBankAccInterests + @tDepositTax; + mes "^0072FF[Bank Manager]^000000"; + mes "Transaction completed successfully."; + mes "^0000FF" + @tDeposit + "z^000000 substracted from your money (Taxes applied)."; + mes "^0000FF" + @tDepositTotal + "z^000000 successfully added to your ^FF7F01Bank Account^000000."; + next; + goto AccMenu; + AccDepositOver: + mes "^0072FF[Bank Manager]^000000"; + mes "There is a limit of ^0000FF" + @tMaxAccZeny + "z^000000 of how much zeny your ^FF7F01Bank Account^000000 can hold."; + mes "You can't deposit more than that, please try again."; + mes "Do you want to try again?"; + next; + menu "^FF7F01Yes, please.^000000",AccDepositInput,"^FF7F01No, thanks.^000000",AccMenu; + AccDepositNotEnoughInput: + mes "^0072FF[Bank Manager]^000000"; + mes "You need to put more money in order to make a deposit."; + mes "Do you want to try again?"; + next; + menu "^FF7F01Yes, please.^000000",AccDepositInput,"^FF7F01No, thanks.^000000",AccMenu; + AccDepositNoInput: + mes "^0072FF[Bank Manager]^000000"; + mes "You must enter a value higher than ^0000FF" + @tMinDeposit + "z^000000."; + mes "Do you want to try again?"; + next; + menu "^FF7F01Yes, please.^000000",AccDepositInput,"^FF7F01No, thanks.^000000",AccMenu; + AccDepositNotEnoughZeny: + mes "^0072FF[Bank Manager]^000000"; + mes "You don't have ^0000FF" + @tDepositTotal + "z^000000."; + mes "Remember that taxes are being applied."; + mes "Do you want to try again?"; + next; + menu "^FF7F01Yes, please.^000000",AccDepositInput,"^FF7F01No, thanks.^000000",AccMenu; + AccWithdraw: + mes "^0072FF[Bank Manager]^000000"; + mes "This is the only transaction I don't like... you figure out why..."; + mes "You can't withdraw leaving less than ^0000FF" + @tMinZeny +"z^000000 in your ^FF7F01Bank Account^000000."; + mes "Your current balance is ^0000FF" + vBankAccZeny + "z^000000."; + mes "How much are you going to widthdraw?"; + next; + AccWithdrawInput: + input @tWithdraw; + set @tZenyLeft, vBankAccZeny - @tWithdraw; + set @tZenyTemp, Zeny + @tWithdraw; + if (@tWithdraw == 0) goto AccWithdrawNoInput; + if (@tZenyLeft < @tMinZeny) goto AccWithdrawMinZeny; + if (@tZenyTemp > @tMaxZeny) goto AccWithDrawOverCharZeny; + set Zeny, Zeny + @tWithdraw; + set vBankAccLastZeny, vBankAccZeny; + set vBankAccZeny, vBankAccZeny - @tWithdraw; + mes "^0072FF[Bank Manager]^000000"; + mes "Transaction completed successfully."; + mes "Thank you for using our services."; + next; + goto AccMenu; + AccWithdrawNoInput: + mes "^0072FF[Bank Manager]^000000"; + mes "In order to withdraw from the bank, you must withdraw more than 0 zeny."; + mes "Do you want to try again?"; + next; + menu "^FF7F01Yes, please.^000000",AccWithdrawInput,"^FF7F01No, thanks.^000000",AccMenu; + AccWithdrawMinZeny: + mes "^0072FF[Bank Manager]^000000"; + mes "I'm sorry..."; + mes "You can't withdraw ^0000FF" + @tWithdraw + "z^000000 because your ^FF7F01Bank Account^000000 must have ^0000FF" + @tMinZeny + "z^000000 left or more at all times."; + mes "In order to take all your money from the bank you must select Close Account in the Account Menu."; + mes "Do you want to try again?"; + next; + menu "^FF7F01Yes, please.^000000",AccWithdrawInput,"^FF7F01No, thanks.^000000",AccMenu; + AccWithDrawOverCharZeny: + mes "^0072FF[Bank Manager]^000000"; + mes "Sorry, but you can't withdraw ^0000FF" + @tWithdraw + "z^000000 because your Player can't carry more than ^0000FF" + @tMaxZeny + "z^000000."; + mes "Do you want to try again?"; + next; + menu "^FF7F01Yes, please.^000000",AccWithdrawInput,"^FF7F01No, thanks.^000000",AccMenu; + AccBalance: + mes "^0072FF[Bank Manager]^000000"; + mes "Account Status:"; + //shown in blue if the same or more, show in red if less than previous balance + if (vBankAccZeny >= vBankAccLastZeny) goto AccBalance2; + mes "Current Balance: ^FF0000" + vBankAccZeny +"z^000000."; + goto AccBalance3; + AccBalance2: + mes "Current Balance: ^0000FF" + vBankAccZeny +"z^000000."; + goto AccBalance3; + AccBalance3: + mes "Previous Balance: ^0000FF" + vBankAccLastZeny +"z^000000."; + mes "Interest Rate: ^0000FF" + @tInterestRate + "%^000000."; + mes "Interests Payed: ^0000FF" + vBankAccInterests + "z^000000."; + next; + goto AccMenu; + AccClose: + mes "^0072FF[Bank Manager]^000000"; + mes "If you close your ^FF7F01Bank Account^000000, it means you eliminate it."; + mes "Of course, you will get all your money back."; + mes "Are you sure you want to close your ^FF7F01Bank Account^000000?"; + next; + menu "^FF7F01I don't want it anymore.^000000",AccCloseConfirm,"^FF7F01No, I'll keep it.^000000",AccCloseKeep; + AccCloseConfirm: + set vBankAccActive,0; + set Zeny, Zeny + vBankAccZeny; + set vBankAccZeny,0; + set vBankAccLastZeny,0; + set vBankAccInterests,0; + mes "^0072FF[Bank Manager]^000000"; + mes "Thanks for using our services, we hope you come back to visit us."; + mes "Here's your money."; + next; + goto EndNPC; + AccCloseKeep: + mes "^0072FF[Bank Manager]^000000"; + mes "Good choice, thanks for staying with us."; + next; + goto AccMenu; + EndNPC: + set @random,rand(4); + mes "^0072FF[Bank Manager]^000000"; + if (@random == 0) mes "Have a nice day!"; + if (@random == 1) mes "See you soon!"; + if (@random == 2) mes "See you next time!"; + if (@random == 3) mes "Come back soon!"; + close; +} +geffen_in.gat,77,169,2 script Bank Manager 109,{ + set @tInterestRate, 2; //no decimals + set @tMaxAccZeny, 1000000000; //max zeny allowed in ^FF7F01Bank Account^000000 1,000,000,000=1 billion + set @tMaxZeny, 1000000000; //max zeny that a player can carry + set @tMinZeny, 100; //min zeny allowed or Bank Account is closed + set @tCreateZeny, 500; //zeny needed in order to create a Bank Account + set @tMinDeposit,100; //min zeny to deposit + set @tBeginningZeny, 100; //amount of zeny in Bank Account after creating + mes "^0072FF[Bank Manager]^000000"; + mes "Welcome to this office branch of Midgard's Bank."; + next; + if (vBankAccActive==1) goto AccMenu; + mes "^0072FF[Bank Manager]^000000"; + mes "You don't have a ^FF7F01Bank Account^000000 yet, you must buy one."; + mes "It will cost you ^0000FF" + @tCreateZeny + "z^000000 to create it."; + next; + menu "^FF7F01Create Account.^000000",CreateAcc,"^FF7F01Information.^000000",BankInfo,"^FF7F01No thanks.^000000",NoCreateAcc; + BankInfo: + mes "^0072FF[Bank Manager]^000000"; + mes "Here are some points that you need to know:"; + mes "1. To create a ^FF7F01Bank Account^000000 you have to pay ^0000FF" + @tCreateZeny + "z^000000."; + mes "2. You will be charged ^0000FF" + @tInterestRate + " percent^000000 everytime you Deposit."; + mes "3. You must always have no less than ^0000FF" + @tMinZeny + "z^000000 on your ^FF7F01Bank Account^000000."; + next; + mes "4. You can save up to ^0000FF" + @tMaxAccZeny + "z^000000 in your bank account."; + mes "5. You will be able to access your ^FF7F01Bank Account^000000 in any town with a Bank Office."; + mes "6. You will start by having ^0000FF" + @tBeginningZeny + "z^000000 in your bank account."; + close; + CreateAcc: + mes "^0072FF[Bank Manager]^000000"; + mes "First of all, you will have to have at least ^0000FF" + @tCreateZeny + "z^000000 with you."; + mes "Your account will start with ^0000FF" + @tBeginningZeny +"z^000000."; + mes "Are you sure you want to continue?"; + next; + menu "^FF7F01Sure.^000000",CreateAccCont,"^FF7F01Nah, it's ok.^000000",NoCreateAcc; + CreateAccCont: + if (@tCreateZeny > Zeny) goto CreateAccNoEnoughZeny; + set Zeny, Zeny - @tCreateZeny; + set vBankAccActive,1; + set vBankAccZeny, @tBeginningZeny; + set vBankAccLastZeny, @tBeginningZeny; + set vBankAccInterests,0; + mes "^0072FF[Bank Manager]^000000"; + mes "Congratulations, your ^FF7F01Bank Account^000000 is now created with ^0000FF" + vBankAccZeny + "z^000000."; + mes "You may now proceed to do any transactions."; + next; + goto AccMenu; + CreateAccNoEnoughZeny: + mes "^0072FF[Bank Manager]^000000"; + mes "Didn't I tell you to make sure you had enough zeny?"; + mes "You can't create it with just ^0000FF" + Zeny + "z^000000."; + mes "Come back when you get those ^0000FF" + @tCreateZeny + "z^000000..."; + next; + goto EndNPC; + NoCreateAcc: + mes "^0072FF[Bank Manager]^000000"; + mes "Come back when you change your mind!"; + next; + goto EndNPC; + AccMenu: + mes "^0072FF[Bank Manager]^000000"; + mes "Your current balance is ^0000FF" + vBankAccZeny +"z^000000."; + mes "What would you like to do now?"; + next; + menu "^FF7F01Deposit.^000000",AccDeposit,"^FF7F01Withdraw.^000000",AccWithdraw,"^FF7F01Bank Account Info.^000000",AccBalance,"^FF7F01Close Bank Account^000000",AccClose,"^FF7F01Cancel.^000000",EndNPC; + AccDeposit: + mes "^0072FF[Bank Manager]^000000"; + mes "It's always good to deposit every once in a while."; + mes "Be noticed that we charge a ^0000FF" + @tInterestRate + " percent ^000000 of interest rate in every deposit you make."; + mes "This means that to deposit ^0000FF100z^000000 you need to have pay us ^0000FF" + 100 * @tInterestRate / 100 + "z^000000."; + mes "How much are you willing to deposit?"; + next; + AccDepositInput: + input @tDeposit; + set @tDepositTax, @tDeposit * @tInterestRate / 100; + set @tDepositTotal, @tDeposit - @tDepositTax; + if (@tDeposit <= 0) goto AccDepositNoInput; + if (@tDeposit < @tMinDeposit) goto AccDepositNotEnoughInput; + if (@tDepositTotal > Zeny) goto AccDepositNotEnoughZeny; + set @tBankAccZenyTemp, vBankAccZeny + @tDepositTotal; + if (@tBankAccZenyTemp > @tMaxAccZeny) goto AccDepositOver; + if ((@tDeposit <= Zeny) && (@tBankAccZenyTemp <= @tMaxAccZeny)) goto AccDepositCont; + mes "^0072FF[Bank Manager]^000000"; + mes "Sorry, for some weird reason I couldn't deposit your money."; + next; + goto AccMenu; + AccDepositCont: + set Zeny, Zeny - @tDeposit; + set vBankAccLastZeny, vBankAccZeny; + set vBankAccZeny, @tBankAccZenyTemp; + set vBankAccInterests, vBankAccInterests + @tDepositTax; + mes "^0072FF[Bank Manager]^000000"; + mes "Transaction completed successfully."; + mes "^0000FF" + @tDeposit + "z^000000 substracted from your money (Taxes applied)."; + mes "^0000FF" + @tDepositTotal + "z^000000 successfully added to your ^FF7F01Bank Account^000000."; + next; + goto AccMenu; + AccDepositOver: + mes "^0072FF[Bank Manager]^000000"; + mes "There is a limit of ^0000FF" + @tMaxAccZeny + "z^000000 of how much zeny your ^FF7F01Bank Account^000000 can hold."; + mes "You can't deposit more than that, please try again."; + mes "Do you want to try again?"; + next; + menu "^FF7F01Yes, please.^000000",AccDepositInput,"^FF7F01No, thanks.^000000",AccMenu; + AccDepositNotEnoughInput: + mes "^0072FF[Bank Manager]^000000"; + mes "You need to put more money in order to make a deposit."; + mes "Do you want to try again?"; + next; + menu "^FF7F01Yes, please.^000000",AccDepositInput,"^FF7F01No, thanks.^000000",AccMenu; + AccDepositNoInput: + mes "^0072FF[Bank Manager]^000000"; + mes "You must enter a value higher than ^0000FF" + @tMinDeposit + "z^000000."; + mes "Do you want to try again?"; + next; + menu "^FF7F01Yes, please.^000000",AccDepositInput,"^FF7F01No, thanks.^000000",AccMenu; + AccDepositNotEnoughZeny: + mes "^0072FF[Bank Manager]^000000"; + mes "You don't have ^0000FF" + @tDepositTotal + "z^000000."; + mes "Remember that taxes are being applied."; + mes "Do you want to try again?"; + next; + menu "^FF7F01Yes, please.^000000",AccDepositInput,"^FF7F01No, thanks.^000000",AccMenu; + AccWithdraw: + mes "^0072FF[Bank Manager]^000000"; + mes "This is the only transaction I don't like... you figure out why..."; + mes "You can't withdraw leaving less than ^0000FF" + @tMinZeny +"z^000000 in your ^FF7F01Bank Account^000000."; + mes "Your current balance is ^0000FF" + vBankAccZeny + "z^000000."; + mes "How much are you going to widthdraw?"; + next; + AccWithdrawInput: + input @tWithdraw; + set @tZenyLeft, vBankAccZeny - @tWithdraw; + set @tZenyTemp, Zeny + @tWithdraw; + if (@tWithdraw == 0) goto AccWithdrawNoInput; + if (@tZenyLeft < @tMinZeny) goto AccWithdrawMinZeny; + if (@tZenyTemp > @tMaxZeny) goto AccWithDrawOverCharZeny; + set Zeny, Zeny + @tWithdraw; + set vBankAccLastZeny, vBankAccZeny; + set vBankAccZeny, vBankAccZeny - @tWithdraw; + mes "^0072FF[Bank Manager]^000000"; + mes "Transaction completed successfully."; + mes "Thank you for using our services."; + next; + goto AccMenu; + AccWithdrawNoInput: + mes "^0072FF[Bank Manager]^000000"; + mes "In order to withdraw from the bank, you must withdraw more than 0 zeny."; + mes "Do you want to try again?"; + next; + menu "^FF7F01Yes, please.^000000",AccWithdrawInput,"^FF7F01No, thanks.^000000",AccMenu; + AccWithdrawMinZeny: + mes "^0072FF[Bank Manager]^000000"; + mes "I'm sorry..."; + mes "You can't withdraw ^0000FF" + @tWithdraw + "z^000000 because your ^FF7F01Bank Account^000000 must have ^0000FF" + @tMinZeny + "z^000000 left or more at all times."; + mes "In order to take all your money from the bank you must select Close Account in the Account Menu."; + mes "Do you want to try again?"; + next; + menu "^FF7F01Yes, please.^000000",AccWithdrawInput,"^FF7F01No, thanks.^000000",AccMenu; + AccWithDrawOverCharZeny: + mes "^0072FF[Bank Manager]^000000"; + mes "Sorry, but you can't withdraw ^0000FF" + @tWithdraw + "z^000000 because your Player can't carry more than ^0000FF" + @tMaxZeny + "z^000000."; + mes "Do you want to try again?"; + next; + menu "^FF7F01Yes, please.^000000",AccWithdrawInput,"^FF7F01No, thanks.^000000",AccMenu; + AccBalance: + mes "^0072FF[Bank Manager]^000000"; + mes "Account Status:"; + //shown in blue if the same or more, show in red if less than previous balance + if (vBankAccZeny >= vBankAccLastZeny) goto AccBalance2; + mes "Current Balance: ^FF0000" + vBankAccZeny +"z^000000."; + goto AccBalance3; + AccBalance2: + mes "Current Balance: ^0000FF" + vBankAccZeny +"z^000000."; + goto AccBalance3; + AccBalance3: + mes "Previous Balance: ^0000FF" + vBankAccLastZeny +"z^000000."; + mes "Interest Rate: ^0000FF" + @tInterestRate + "%^000000."; + mes "Interests Payed: ^0000FF" + vBankAccInterests + "z^000000."; + next; + goto AccMenu; + AccClose: + mes "^0072FF[Bank Manager]^000000"; + mes "If you close your ^FF7F01Bank Account^000000, it means you eliminate it."; + mes "Of course, you will get all your money back."; + mes "Are you sure you want to close your ^FF7F01Bank Account^000000?"; + next; + menu "^FF7F01I don't want it anymore.^000000",AccCloseConfirm,"^FF7F01No, I'll keep it.^000000",AccCloseKeep; + AccCloseConfirm: + set vBankAccActive,0; + set Zeny, Zeny + vBankAccZeny; + set vBankAccZeny,0; + set vBankAccLastZeny,0; + set vBankAccInterests,0; + mes "^0072FF[Bank Manager]^000000"; + mes "Thanks for using our services, we hope you come back to visit us."; + mes "Here's your money."; + next; + goto EndNPC; + AccCloseKeep: + mes "^0072FF[Bank Manager]^000000"; + mes "Good choice, thanks for staying with us."; + next; + goto AccMenu; + EndNPC: + set @random,rand(4); + mes "^0072FF[Bank Manager]^000000"; + if (@random == 0) mes "Have a nice day!"; + if (@random == 1) mes "See you soon!"; + if (@random == 2) mes "See you next time!"; + if (@random == 3) mes "Come back soon!"; + close; +} + +//Fixed location for new payon +payon.gat,155,97,4 script Bank Manager 109,{ + set @tInterestRate, 2; //no decimals + set @tMaxAccZeny, 1000000000; //max zeny allowed in ^FF7F01Bank Account^000000 1,000,000,000=1 billion + set @tMaxZeny, 1000000000; //max zeny that a player can carry + set @tMinZeny, 100; //min zeny allowed or Bank Account is closed + set @tCreateZeny, 500; //zeny needed in order to create a Bank Account + set @tMinDeposit,100; //min zeny to deposit + set @tBeginningZeny, 100; //amount of zeny in Bank Account after creating + mes "^0072FF[Bank Manager]^000000"; + mes "Welcome to this office branch of Midgard's Bank."; + next; + if (vBankAccActive==1) goto AccMenu; + mes "^0072FF[Bank Manager]^000000"; + mes "You don't have a ^FF7F01Bank Account^000000 yet, you must buy one."; + mes "It will cost you ^0000FF" + @tCreateZeny + "z^000000 to create it."; + next; + menu "^FF7F01Create Account.^000000",CreateAcc,"^FF7F01Information.^000000",BankInfo,"^FF7F01No thanks.^000000",NoCreateAcc; + BankInfo: + mes "^0072FF[Bank Manager]^000000"; + mes "Here are some points that you need to know:"; + mes "1. To create a ^FF7F01Bank Account^000000 you have to pay ^0000FF" + @tCreateZeny + "z^000000."; + mes "2. You will be charged ^0000FF" + @tInterestRate + " percent^000000 everytime you Deposit."; + mes "3. You must always have no less than ^0000FF" + @tMinZeny + "z^000000 on your ^FF7F01Bank Account^000000."; + next; + mes "4. You can save up to ^0000FF" + @tMaxAccZeny + "z^000000 in your bank account."; + mes "5. You will be able to access your ^FF7F01Bank Account^000000 in any town with a Bank Office."; + mes "6. You will start by having ^0000FF" + @tBeginningZeny + "z^000000 in your bank account."; + close; + CreateAcc: + mes "^0072FF[Bank Manager]^000000"; + mes "First of all, you will have to have at least ^0000FF" + @tCreateZeny + "z^000000 with you."; + mes "Your account will start with ^0000FF" + @tBeginningZeny +"z^000000."; + mes "Are you sure you want to continue?"; + next; + menu "^FF7F01Sure.^000000",CreateAccCont,"^FF7F01Nah, it's ok.^000000",NoCreateAcc; + CreateAccCont: + if (@tCreateZeny > Zeny) goto CreateAccNoEnoughZeny; + set Zeny, Zeny - @tCreateZeny; + set vBankAccActive,1; + set vBankAccZeny, @tBeginningZeny; + set vBankAccLastZeny, @tBeginningZeny; + set vBankAccInterests,0; + mes "^0072FF[Bank Manager]^000000"; + mes "Congratulations, your ^FF7F01Bank Account^000000 is now created with ^0000FF" + vBankAccZeny + "z^000000."; + mes "You may now proceed to do any transactions."; + next; + goto AccMenu; + CreateAccNoEnoughZeny: + mes "^0072FF[Bank Manager]^000000"; + mes "Didn't I tell you to make sure you had enough zeny?"; + mes "You can't create it with just ^0000FF" + Zeny + "z^000000."; + mes "Come back when you get those ^0000FF" + @tCreateZeny + "z^000000..."; + next; + goto EndNPC; + NoCreateAcc: + mes "^0072FF[Bank Manager]^000000"; + mes "Come back when you change your mind!"; + next; + goto EndNPC; + AccMenu: + mes "^0072FF[Bank Manager]^000000"; + mes "Your current balance is ^0000FF" + vBankAccZeny +"z^000000."; + mes "What would you like to do now?"; + next; + menu "^FF7F01Deposit.^000000",AccDeposit,"^FF7F01Withdraw.^000000",AccWithdraw,"^FF7F01Bank Account Info.^000000",AccBalance,"^FF7F01Close Bank Account^000000",AccClose,"^FF7F01Cancel.^000000",EndNPC; + AccDeposit: + mes "^0072FF[Bank Manager]^000000"; + mes "It's always good to deposit every once in a while."; + mes "Be noticed that we charge a ^0000FF" + @tInterestRate + " percent ^000000 of interest rate in every deposit you make."; + mes "This means that to deposit ^0000FF100z^000000 you need to have pay us ^0000FF" + 100 * @tInterestRate / 100 + "z^000000."; + mes "How much are you willing to deposit?"; + next; + AccDepositInput: + input @tDeposit; + set @tDepositTax, @tDeposit * @tInterestRate / 100; + set @tDepositTotal, @tDeposit - @tDepositTax; + if (@tDeposit <= 0) goto AccDepositNoInput; + if (@tDeposit < @tMinDeposit) goto AccDepositNotEnoughInput; + if (@tDepositTotal > Zeny) goto AccDepositNotEnoughZeny; + set @tBankAccZenyTemp, vBankAccZeny + @tDepositTotal; + if (@tBankAccZenyTemp > @tMaxAccZeny) goto AccDepositOver; + if ((@tDeposit <= Zeny) && (@tBankAccZenyTemp <= @tMaxAccZeny)) goto AccDepositCont; + mes "^0072FF[Bank Manager]^000000"; + mes "Sorry, for some weird reason I couldn't deposit your money."; + next; + goto AccMenu; + AccDepositCont: + set Zeny, Zeny - @tDeposit; + set vBankAccLastZeny, vBankAccZeny; + set vBankAccZeny, @tBankAccZenyTemp; + set vBankAccInterests, vBankAccInterests + @tDepositTax; + mes "^0072FF[Bank Manager]^000000"; + mes "Transaction completed successfully."; + mes "^0000FF" + @tDeposit + "z^000000 substracted from your money (Taxes applied)."; + mes "^0000FF" + @tDepositTotal + "z^000000 successfully added to your ^FF7F01Bank Account^000000."; + next; + goto AccMenu; + AccDepositOver: + mes "^0072FF[Bank Manager]^000000"; + mes "There is a limit of ^0000FF" + @tMaxAccZeny + "z^000000 of how much zeny your ^FF7F01Bank Account^000000 can hold."; + mes "You can't deposit more than that, please try again."; + mes "Do you want to try again?"; + next; + menu "^FF7F01Yes, please.^000000",AccDepositInput,"^FF7F01No, thanks.^000000",AccMenu; + AccDepositNotEnoughInput: + mes "^0072FF[Bank Manager]^000000"; + mes "You need to put more money in order to make a deposit."; + mes "Do you want to try again?"; + next; + menu "^FF7F01Yes, please.^000000",AccDepositInput,"^FF7F01No, thanks.^000000",AccMenu; + AccDepositNoInput: + mes "^0072FF[Bank Manager]^000000"; + mes "You must enter a value higher than ^0000FF" + @tMinDeposit + "z^000000."; + mes "Do you want to try again?"; + next; + menu "^FF7F01Yes, please.^000000",AccDepositInput,"^FF7F01No, thanks.^000000",AccMenu; + AccDepositNotEnoughZeny: + mes "^0072FF[Bank Manager]^000000"; + mes "You don't have ^0000FF" + @tDepositTotal + "z^000000."; + mes "Remember that taxes are being applied."; + mes "Do you want to try again?"; + next; + menu "^FF7F01Yes, please.^000000",AccDepositInput,"^FF7F01No, thanks.^000000",AccMenu; + AccWithdraw: + mes "^0072FF[Bank Manager]^000000"; + mes "This is the only transaction I don't like... you figure out why..."; + mes "You can't withdraw leaving less than ^0000FF" + @tMinZeny +"z^000000 in your ^FF7F01Bank Account^000000."; + mes "Your current balance is ^0000FF" + vBankAccZeny + "z^000000."; + mes "How much are you going to widthdraw?"; + next; + AccWithdrawInput: + input @tWithdraw; + set @tZenyLeft, vBankAccZeny - @tWithdraw; + set @tZenyTemp, Zeny + @tWithdraw; + if (@tWithdraw == 0) goto AccWithdrawNoInput; + if (@tZenyLeft < @tMinZeny) goto AccWithdrawMinZeny; + if (@tZenyTemp > @tMaxZeny) goto AccWithDrawOverCharZeny; + set Zeny, Zeny + @tWithdraw; + set vBankAccLastZeny, vBankAccZeny; + set vBankAccZeny, vBankAccZeny - @tWithdraw; + mes "^0072FF[Bank Manager]^000000"; + mes "Transaction completed successfully."; + mes "Thank you for using our services."; + next; + goto AccMenu; + AccWithdrawNoInput: + mes "^0072FF[Bank Manager]^000000"; + mes "In order to withdraw from the bank, you must withdraw more than 0 zeny."; + mes "Do you want to try again?"; + next; + menu "^FF7F01Yes, please.^000000",AccWithdrawInput,"^FF7F01No, thanks.^000000",AccMenu; + AccWithdrawMinZeny: + mes "^0072FF[Bank Manager]^000000"; + mes "I'm sorry..."; + mes "You can't withdraw ^0000FF" + @tWithdraw + "z^000000 because your ^FF7F01Bank Account^000000 must have ^0000FF" + @tMinZeny + "z^000000 left or more at all times."; + mes "In order to take all your money from the bank you must select Close Account in the Account Menu."; + mes "Do you want to try again?"; + next; + menu "^FF7F01Yes, please.^000000",AccWithdrawInput,"^FF7F01No, thanks.^000000",AccMenu; + AccWithDrawOverCharZeny: + mes "^0072FF[Bank Manager]^000000"; + mes "Sorry, but you can't withdraw ^0000FF" + @tWithdraw + "z^000000 because your Player can't carry more than ^0000FF" + @tMaxZeny + "z^000000."; + mes "Do you want to try again?"; + next; + menu "^FF7F01Yes, please.^000000",AccWithdrawInput,"^FF7F01No, thanks.^000000",AccMenu; + AccBalance: + mes "^0072FF[Bank Manager]^000000"; + mes "Account Status:"; + //shown in blue if the same or more, show in red if less than previous balance + if (vBankAccZeny >= vBankAccLastZeny) goto AccBalance2; + mes "Current Balance: ^FF0000" + vBankAccZeny +"z^000000."; + goto AccBalance3; + AccBalance2: + mes "Current Balance: ^0000FF" + vBankAccZeny +"z^000000."; + goto AccBalance3; + AccBalance3: + mes "Previous Balance: ^0000FF" + vBankAccLastZeny +"z^000000."; + mes "Interest Rate: ^0000FF" + @tInterestRate + "%^000000."; + mes "Interests Payed: ^0000FF" + vBankAccInterests + "z^000000."; + next; + goto AccMenu; + AccClose: + mes "^0072FF[Bank Manager]^000000"; + mes "If you close your ^FF7F01Bank Account^000000, it means you eliminate it."; + mes "Of course, you will get all your money back."; + mes "Are you sure you want to close your ^FF7F01Bank Account^000000?"; + next; + menu "^FF7F01I don't want it anymore.^000000",AccCloseConfirm,"^FF7F01No, I'll keep it.^000000",AccCloseKeep; + AccCloseConfirm: + set vBankAccActive,0; + set Zeny, Zeny + vBankAccZeny; + set vBankAccZeny,0; + set vBankAccLastZeny,0; + set vBankAccInterests,0; + mes "^0072FF[Bank Manager]^000000"; + mes "Thanks for using our services, we hope you come back to visit us."; + mes "Here's your money."; + next; + goto EndNPC; + AccCloseKeep: + mes "^0072FF[Bank Manager]^000000"; + mes "Good choice, thanks for staying with us."; + next; + goto AccMenu; + EndNPC: + set @random,rand(4); + mes "^0072FF[Bank Manager]^000000"; + if (@random == 0) mes "Have a nice day!"; + if (@random == 1) mes "See you soon!"; + if (@random == 2) mes "See you next time!"; + if (@random == 3) mes "Come back soon!"; + close; +} + +alberta_in.gat,187,26,2 script Bank Manager 109,{ + set @tInterestRate, 2; //no decimals + set @tMaxAccZeny, 1000000000; //max zeny allowed in ^FF7F01Bank Account^000000 1,000,000,000=1 billion + set @tMaxZeny, 1000000000; //max zeny that a player can carry + set @tMinZeny, 100; //min zeny allowed or Bank Account is closed + set @tCreateZeny, 500; //zeny needed in order to create a Bank Account + set @tMinDeposit,100; //min zeny to deposit + set @tBeginningZeny, 100; //amount of zeny in Bank Account after creating + mes "^0072FF[Bank Manager]^000000"; + mes "Welcome to this office branch of Midgard's Bank."; + next; + if (vBankAccActive==1) goto AccMenu; + mes "^0072FF[Bank Manager]^000000"; + mes "You don't have a ^FF7F01Bank Account^000000 yet, you must buy one."; + mes "It will cost you ^0000FF" + @tCreateZeny + "z^000000 to create it."; + next; + menu "^FF7F01Create Account.^000000",CreateAcc,"^FF7F01Information.^000000",BankInfo,"^FF7F01No thanks.^000000",NoCreateAcc; + BankInfo: + mes "^0072FF[Bank Manager]^000000"; + mes "Here are some points that you need to know:"; + mes "1. To create a ^FF7F01Bank Account^000000 you have to pay ^0000FF" + @tCreateZeny + "z^000000."; + mes "2. You will be charged ^0000FF" + @tInterestRate + " percent^000000 everytime you Deposit."; + mes "3. You must always have no less than ^0000FF" + @tMinZeny + "z^000000 on your ^FF7F01Bank Account^000000."; + next; + mes "4. You can save up to ^0000FF" + @tMaxAccZeny + "z^000000 in your bank account."; + mes "5. You will be able to access your ^FF7F01Bank Account^000000 in any town with a Bank Office."; + mes "6. You will start by having ^0000FF" + @tBeginningZeny + "z^000000 in your bank account."; + close; + CreateAcc: + mes "^0072FF[Bank Manager]^000000"; + mes "First of all, you will have to have at least ^0000FF" + @tCreateZeny + "z^000000 with you."; + mes "Your account will start with ^0000FF" + @tBeginningZeny +"z^000000."; + mes "Are you sure you want to continue?"; + next; + menu "^FF7F01Sure.^000000",CreateAccCont,"^FF7F01Nah, it's ok.^000000",NoCreateAcc; + CreateAccCont: + if (@tCreateZeny > Zeny) goto CreateAccNoEnoughZeny; + set Zeny, Zeny - @tCreateZeny; + set vBankAccActive,1; + set vBankAccZeny, @tBeginningZeny; + set vBankAccLastZeny, @tBeginningZeny; + set vBankAccInterests,0; + mes "^0072FF[Bank Manager]^000000"; + mes "Congratulations, your ^FF7F01Bank Account^000000 is now created with ^0000FF" + vBankAccZeny + "z^000000."; + mes "You may now proceed to do any transactions."; + next; + goto AccMenu; + CreateAccNoEnoughZeny: + mes "^0072FF[Bank Manager]^000000"; + mes "Didn't I tell you to make sure you had enough zeny?"; + mes "You can't create it with just ^0000FF" + Zeny + "z^000000."; + mes "Come back when you get those ^0000FF" + @tCreateZeny + "z^000000..."; + next; + goto EndNPC; + NoCreateAcc: + mes "^0072FF[Bank Manager]^000000"; + mes "Come back when you change your mind!"; + next; + goto EndNPC; + AccMenu: + mes "^0072FF[Bank Manager]^000000"; + mes "Your current balance is ^0000FF" + vBankAccZeny +"z^000000."; + mes "What would you like to do now?"; + next; + menu "^FF7F01Deposit.^000000",AccDeposit,"^FF7F01Withdraw.^000000",AccWithdraw,"^FF7F01Bank Account Info.^000000",AccBalance,"^FF7F01Close Bank Account^000000",AccClose,"^FF7F01Cancel.^000000",EndNPC; + AccDeposit: + mes "^0072FF[Bank Manager]^000000"; + mes "It's always good to deposit every once in a while."; + mes "Be noticed that we charge a ^0000FF" + @tInterestRate + " percent ^000000 of interest rate in every deposit you make."; + mes "This means that to deposit ^0000FF100z^000000 you need to have pay us ^0000FF" + 100 * @tInterestRate / 100 + "z^000000."; + mes "How much are you willing to deposit?"; + next; + AccDepositInput: + input @tDeposit; + set @tDepositTax, @tDeposit * @tInterestRate / 100; + set @tDepositTotal, @tDeposit - @tDepositTax; + if (@tDeposit <= 0) goto AccDepositNoInput; + if (@tDeposit < @tMinDeposit) goto AccDepositNotEnoughInput; + if (@tDepositTotal > Zeny) goto AccDepositNotEnoughZeny; + set @tBankAccZenyTemp, vBankAccZeny + @tDepositTotal; + if (@tBankAccZenyTemp > @tMaxAccZeny) goto AccDepositOver; + if ((@tDeposit <= Zeny) && (@tBankAccZenyTemp <= @tMaxAccZeny)) goto AccDepositCont; + mes "^0072FF[Bank Manager]^000000"; + mes "Sorry, for some weird reason I couldn't deposit your money."; + next; + goto AccMenu; + AccDepositCont: + set Zeny, Zeny - @tDeposit; + set vBankAccLastZeny, vBankAccZeny; + set vBankAccZeny, @tBankAccZenyTemp; + set vBankAccInterests, vBankAccInterests + @tDepositTax; + mes "^0072FF[Bank Manager]^000000"; + mes "Transaction completed successfully."; + mes "^0000FF" + @tDeposit + "z^000000 substracted from your money (Taxes applied)."; + mes "^0000FF" + @tDepositTotal + "z^000000 successfully added to your ^FF7F01Bank Account^000000."; + next; + goto AccMenu; + AccDepositOver: + mes "^0072FF[Bank Manager]^000000"; + mes "There is a limit of ^0000FF" + @tMaxAccZeny + "z^000000 of how much zeny your ^FF7F01Bank Account^000000 can hold."; + mes "You can't deposit more than that, please try again."; + mes "Do you want to try again?"; + next; + menu "^FF7F01Yes, please.^000000",AccDepositInput,"^FF7F01No, thanks.^000000",AccMenu; + AccDepositNotEnoughInput: + mes "^0072FF[Bank Manager]^000000"; + mes "You need to put more money in order to make a deposit."; + mes "Do you want to try again?"; + next; + menu "^FF7F01Yes, please.^000000",AccDepositInput,"^FF7F01No, thanks.^000000",AccMenu; + AccDepositNoInput: + mes "^0072FF[Bank Manager]^000000"; + mes "You must enter a value higher than ^0000FF" + @tMinDeposit + "z^000000."; + mes "Do you want to try again?"; + next; + menu "^FF7F01Yes, please.^000000",AccDepositInput,"^FF7F01No, thanks.^000000",AccMenu; + AccDepositNotEnoughZeny: + mes "^0072FF[Bank Manager]^000000"; + mes "You don't have ^0000FF" + @tDepositTotal + "z^000000."; + mes "Remember that taxes are being applied."; + mes "Do you want to try again?"; + next; + menu "^FF7F01Yes, please.^000000",AccDepositInput,"^FF7F01No, thanks.^000000",AccMenu; + AccWithdraw: + mes "^0072FF[Bank Manager]^000000"; + mes "This is the only transaction I don't like... you figure out why..."; + mes "You can't withdraw leaving less than ^0000FF" + @tMinZeny +"z^000000 in your ^FF7F01Bank Account^000000."; + mes "Your current balance is ^0000FF" + vBankAccZeny + "z^000000."; + mes "How much are you going to widthdraw?"; + next; + AccWithdrawInput: + input @tWithdraw; + set @tZenyLeft, vBankAccZeny - @tWithdraw; + set @tZenyTemp, Zeny + @tWithdraw; + if (@tWithdraw == 0) goto AccWithdrawNoInput; + if (@tZenyLeft < @tMinZeny) goto AccWithdrawMinZeny; + if (@tZenyTemp > @tMaxZeny) goto AccWithDrawOverCharZeny; + set Zeny, Zeny + @tWithdraw; + set vBankAccLastZeny, vBankAccZeny; + set vBankAccZeny, vBankAccZeny - @tWithdraw; + mes "^0072FF[Bank Manager]^000000"; + mes "Transaction completed successfully."; + mes "Thank you for using our services."; + next; + goto AccMenu; + AccWithdrawNoInput: + mes "^0072FF[Bank Manager]^000000"; + mes "In order to withdraw from the bank, you must withdraw more than 0 zeny."; + mes "Do you want to try again?"; + next; + menu "^FF7F01Yes, please.^000000",AccWithdrawInput,"^FF7F01No, thanks.^000000",AccMenu; + AccWithdrawMinZeny: + mes "^0072FF[Bank Manager]^000000"; + mes "I'm sorry..."; + mes "You can't withdraw ^0000FF" + @tWithdraw + "z^000000 because your ^FF7F01Bank Account^000000 must have ^0000FF" + @tMinZeny + "z^000000 left or more at all times."; + mes "In order to take all your money from the bank you must select Close Account in the Account Menu."; + mes "Do you want to try again?"; + next; + menu "^FF7F01Yes, please.^000000",AccWithdrawInput,"^FF7F01No, thanks.^000000",AccMenu; + AccWithDrawOverCharZeny: + mes "^0072FF[Bank Manager]^000000"; + mes "Sorry, but you can't withdraw ^0000FF" + @tWithdraw + "z^000000 because your Player can't carry more than ^0000FF" + @tMaxZeny + "z^000000."; + mes "Do you want to try again?"; + next; + menu "^FF7F01Yes, please.^000000",AccWithdrawInput,"^FF7F01No, thanks.^000000",AccMenu; + AccBalance: + mes "^0072FF[Bank Manager]^000000"; + mes "Account Status:"; + //shown in blue if the same or more, show in red if less than previous balance + if (vBankAccZeny >= vBankAccLastZeny) goto AccBalance2; + mes "Current Balance: ^FF0000" + vBankAccZeny +"z^000000."; + goto AccBalance3; + AccBalance2: + mes "Current Balance: ^0000FF" + vBankAccZeny +"z^000000."; + goto AccBalance3; + AccBalance3: + mes "Previous Balance: ^0000FF" + vBankAccLastZeny +"z^000000."; + mes "Interest Rate: ^0000FF" + @tInterestRate + "%^000000."; + mes "Interests Payed: ^0000FF" + vBankAccInterests + "z^000000."; + next; + goto AccMenu; + AccClose: + mes "^0072FF[Bank Manager]^000000"; + mes "If you close your ^FF7F01Bank Account^000000, it means you eliminate it."; + mes "Of course, you will get all your money back."; + mes "Are you sure you want to close your ^FF7F01Bank Account^000000?"; + next; + menu "^FF7F01I don't want it anymore.^000000",AccCloseConfirm,"^FF7F01No, I'll keep it.^000000",AccCloseKeep; + AccCloseConfirm: + set vBankAccActive,0; + set Zeny, Zeny + vBankAccZeny; + set vBankAccZeny,0; + set vBankAccLastZeny,0; + set vBankAccInterests,0; + mes "^0072FF[Bank Manager]^000000"; + mes "Thanks for using our services, we hope you come back to visit us."; + mes "Here's your money."; + next; + goto EndNPC; + AccCloseKeep: + mes "^0072FF[Bank Manager]^000000"; + mes "Good choice, thanks for staying with us."; + next; + goto AccMenu; + EndNPC: + set @random,rand(4); + mes "^0072FF[Bank Manager]^000000"; + if (@random == 0) mes "Have a nice day!"; + if (@random == 1) mes "See you soon!"; + if (@random == 2) mes "See you next time!"; + if (@random == 3) mes "Come back soon!"; + close; +} +aldebaran.gat,144,120,4 script Bank Manager 109,{ + set @tInterestRate, 2; //no decimals + set @tMaxAccZeny, 1000000000; //max zeny allowed in ^FF7F01Bank Account^000000 1,000,000,000=1 billion + set @tMaxZeny, 1000000000; //max zeny that a player can carry + set @tMinZeny, 100; //min zeny allowed or Bank Account is closed + set @tCreateZeny, 500; //zeny needed in order to create a Bank Account + set @tMinDeposit,100; //min zeny to deposit + set @tBeginningZeny, 100; //amount of zeny in Bank Account after creating + mes "^0072FF[Bank Manager]^000000"; + mes "Welcome to this office branch of Midgard's Bank."; + next; + if (vBankAccActive==1) goto AccMenu; + mes "^0072FF[Bank Manager]^000000"; + mes "You don't have a ^FF7F01Bank Account^000000 yet, you must buy one."; + mes "It will cost you ^0000FF" + @tCreateZeny + "z^000000 to create it."; + next; + menu "^FF7F01Create Account.^000000",CreateAcc,"^FF7F01Information.^000000",BankInfo,"^FF7F01No thanks.^000000",NoCreateAcc; + BankInfo: + mes "^0072FF[Bank Manager]^000000"; + mes "Here are some points that you need to know:"; + mes "1. To create a ^FF7F01Bank Account^000000 you have to pay ^0000FF" + @tCreateZeny + "z^000000."; + mes "2. You will be charged ^0000FF" + @tInterestRate + " percent^000000 everytime you Deposit."; + mes "3. You must always have no less than ^0000FF" + @tMinZeny + "z^000000 on your ^FF7F01Bank Account^000000."; + next; + mes "4. You can save up to ^0000FF" + @tMaxAccZeny + "z^000000 in your bank account."; + mes "5. You will be able to access your ^FF7F01Bank Account^000000 in any town with a Bank Office."; + mes "6. You will start by having ^0000FF" + @tBeginningZeny + "z^000000 in your bank account."; + close; + CreateAcc: + mes "^0072FF[Bank Manager]^000000"; + mes "First of all, you will have to have at least ^0000FF" + @tCreateZeny + "z^000000 with you."; + mes "Your account will start with ^0000FF" + @tBeginningZeny +"z^000000."; + mes "Are you sure you want to continue?"; + next; + menu "^FF7F01Sure.^000000",CreateAccCont,"^FF7F01Nah, it's ok.^000000",NoCreateAcc; + CreateAccCont: + if (@tCreateZeny > Zeny) goto CreateAccNoEnoughZeny; + set Zeny, Zeny - @tCreateZeny; + set vBankAccActive,1; + set vBankAccZeny, @tBeginningZeny; + set vBankAccLastZeny, @tBeginningZeny; + set vBankAccInterests,0; + mes "^0072FF[Bank Manager]^000000"; + mes "Congratulations, your ^FF7F01Bank Account^000000 is now created with ^0000FF" + vBankAccZeny + "z^000000."; + mes "You may now proceed to do any transactions."; + next; + goto AccMenu; + CreateAccNoEnoughZeny: + mes "^0072FF[Bank Manager]^000000"; + mes "Didn't I tell you to make sure you had enough zeny?"; + mes "You can't create it with just ^0000FF" + Zeny + "z^000000."; + mes "Come back when you get those ^0000FF" + @tCreateZeny + "z^000000..."; + next; + goto EndNPC; + NoCreateAcc: + mes "^0072FF[Bank Manager]^000000"; + mes "Come back when you change your mind!"; + next; + goto EndNPC; + AccMenu: + mes "^0072FF[Bank Manager]^000000"; + mes "Your current balance is ^0000FF" + vBankAccZeny +"z^000000."; + mes "What would you like to do now?"; + next; + menu "^FF7F01Deposit.^000000",AccDeposit,"^FF7F01Withdraw.^000000",AccWithdraw,"^FF7F01Bank Account Info.^000000",AccBalance,"^FF7F01Close Bank Account^000000",AccClose,"^FF7F01Cancel.^000000",EndNPC; + AccDeposit: + mes "^0072FF[Bank Manager]^000000"; + mes "It's always good to deposit every once in a while."; + mes "Be noticed that we charge a ^0000FF" + @tInterestRate + " percent ^000000 of interest rate in every deposit you make."; + mes "This means that to deposit ^0000FF100z^000000 you need to have pay us ^0000FF" + 100 * @tInterestRate / 100 + "z^000000."; + mes "How much are you willing to deposit?"; + next; + AccDepositInput: + input @tDeposit; + set @tDepositTax, @tDeposit * @tInterestRate / 100; + set @tDepositTotal, @tDeposit - @tDepositTax; + if (@tDeposit <= 0) goto AccDepositNoInput; + if (@tDeposit < @tMinDeposit) goto AccDepositNotEnoughInput; + if (@tDepositTotal > Zeny) goto AccDepositNotEnoughZeny; + set @tBankAccZenyTemp, vBankAccZeny + @tDepositTotal; + if (@tBankAccZenyTemp > @tMaxAccZeny) goto AccDepositOver; + if ((@tDeposit <= Zeny) && (@tBankAccZenyTemp <= @tMaxAccZeny)) goto AccDepositCont; + mes "^0072FF[Bank Manager]^000000"; + mes "Sorry, for some weird reason I couldn't deposit your money."; + next; + goto AccMenu; + AccDepositCont: + set Zeny, Zeny - @tDeposit; + set vBankAccLastZeny, vBankAccZeny; + set vBankAccZeny, @tBankAccZenyTemp; + set vBankAccInterests, vBankAccInterests + @tDepositTax; + mes "^0072FF[Bank Manager]^000000"; + mes "Transaction completed successfully."; + mes "^0000FF" + @tDeposit + "z^000000 substracted from your money (Taxes applied)."; + mes "^0000FF" + @tDepositTotal + "z^000000 successfully added to your ^FF7F01Bank Account^000000."; + next; + goto AccMenu; + AccDepositOver: + mes "^0072FF[Bank Manager]^000000"; + mes "There is a limit of ^0000FF" + @tMaxAccZeny + "z^000000 of how much zeny your ^FF7F01Bank Account^000000 can hold."; + mes "You can't deposit more than that, please try again."; + mes "Do you want to try again?"; + next; + menu "^FF7F01Yes, please.^000000",AccDepositInput,"^FF7F01No, thanks.^000000",AccMenu; + AccDepositNotEnoughInput: + mes "^0072FF[Bank Manager]^000000"; + mes "You need to put more money in order to make a deposit."; + mes "Do you want to try again?"; + next; + menu "^FF7F01Yes, please.^000000",AccDepositInput,"^FF7F01No, thanks.^000000",AccMenu; + AccDepositNoInput: + mes "^0072FF[Bank Manager]^000000"; + mes "You must enter a value higher than ^0000FF" + @tMinDeposit + "z^000000."; + mes "Do you want to try again?"; + next; + menu "^FF7F01Yes, please.^000000",AccDepositInput,"^FF7F01No, thanks.^000000",AccMenu; + AccDepositNotEnoughZeny: + mes "^0072FF[Bank Manager]^000000"; + mes "You don't have ^0000FF" + @tDepositTotal + "z^000000."; + mes "Remember that taxes are being applied."; + mes "Do you want to try again?"; + next; + menu "^FF7F01Yes, please.^000000",AccDepositInput,"^FF7F01No, thanks.^000000",AccMenu; + AccWithdraw: + mes "^0072FF[Bank Manager]^000000"; + mes "This is the only transaction I don't like... you figure out why..."; + mes "You can't withdraw leaving less than ^0000FF" + @tMinZeny +"z^000000 in your ^FF7F01Bank Account^000000."; + mes "Your current balance is ^0000FF" + vBankAccZeny + "z^000000."; + mes "How much are you going to widthdraw?"; + next; + AccWithdrawInput: + input @tWithdraw; + set @tZenyLeft, vBankAccZeny - @tWithdraw; + set @tZenyTemp, Zeny + @tWithdraw; + if (@tWithdraw == 0) goto AccWithdrawNoInput; + if (@tZenyLeft < @tMinZeny) goto AccWithdrawMinZeny; + if (@tZenyTemp > @tMaxZeny) goto AccWithDrawOverCharZeny; + set Zeny, Zeny + @tWithdraw; + set vBankAccLastZeny, vBankAccZeny; + set vBankAccZeny, vBankAccZeny - @tWithdraw; + mes "^0072FF[Bank Manager]^000000"; + mes "Transaction completed successfully."; + mes "Thank you for using our services."; + next; + goto AccMenu; + AccWithdrawNoInput: + mes "^0072FF[Bank Manager]^000000"; + mes "In order to withdraw from the bank, you must withdraw more than 0 zeny."; + mes "Do you want to try again?"; + next; + menu "^FF7F01Yes, please.^000000",AccWithdrawInput,"^FF7F01No, thanks.^000000",AccMenu; + AccWithdrawMinZeny: + mes "^0072FF[Bank Manager]^000000"; + mes "I'm sorry..."; + mes "You can't withdraw ^0000FF" + @tWithdraw + "z^000000 because your ^FF7F01Bank Account^000000 must have ^0000FF" + @tMinZeny + "z^000000 left or more at all times."; + mes "In order to take all your money from the bank you must select Close Account in the Account Menu."; + mes "Do you want to try again?"; + next; + menu "^FF7F01Yes, please.^000000",AccWithdrawInput,"^FF7F01No, thanks.^000000",AccMenu; + AccWithDrawOverCharZeny: + mes "^0072FF[Bank Manager]^000000"; + mes "Sorry, but you can't withdraw ^0000FF" + @tWithdraw + "z^000000 because your Player can't carry more than ^0000FF" + @tMaxZeny + "z^000000."; + mes "Do you want to try again?"; + next; + menu "^FF7F01Yes, please.^000000",AccWithdrawInput,"^FF7F01No, thanks.^000000",AccMenu; + AccBalance: + mes "^0072FF[Bank Manager]^000000"; + mes "Account Status:"; + //shown in blue if the same or more, show in red if less than previous balance + if (vBankAccZeny >= vBankAccLastZeny) goto AccBalance2; + mes "Current Balance: ^FF0000" + vBankAccZeny +"z^000000."; + goto AccBalance3; + AccBalance2: + mes "Current Balance: ^0000FF" + vBankAccZeny +"z^000000."; + goto AccBalance3; + AccBalance3: + mes "Previous Balance: ^0000FF" + vBankAccLastZeny +"z^000000."; + mes "Interest Rate: ^0000FF" + @tInterestRate + "%^000000."; + mes "Interests Payed: ^0000FF" + vBankAccInterests + "z^000000."; + next; + goto AccMenu; + AccClose: + mes "^0072FF[Bank Manager]^000000"; + mes "If you close your ^FF7F01Bank Account^000000, it means you eliminate it."; + mes "Of course, you will get all your money back."; + mes "Are you sure you want to close your ^FF7F01Bank Account^000000?"; + next; + menu "^FF7F01I don't want it anymore.^000000",AccCloseConfirm,"^FF7F01No, I'll keep it.^000000",AccCloseKeep; + AccCloseConfirm: + set vBankAccActive,0; + set Zeny, Zeny + vBankAccZeny; + set vBankAccZeny,0; + set vBankAccLastZeny,0; + set vBankAccInterests,0; + mes "^0072FF[Bank Manager]^000000"; + mes "Thanks for using our services, we hope you come back to visit us."; + mes "Here's your money."; + next; + goto EndNPC; + AccCloseKeep: + mes "^0072FF[Bank Manager]^000000"; + mes "Good choice, thanks for staying with us."; + next; + goto AccMenu; + EndNPC: + set @random,rand(4); + mes "^0072FF[Bank Manager]^000000"; + if (@random == 0) mes "Have a nice day!"; + if (@random == 1) mes "See you soon!"; + if (@random == 2) mes "See you next time!"; + if (@random == 3) mes "Come back soon!"; + close; +} + +xmas_in.gat,35,37,5 script Bank Manager 109,{ + set @tInterestRate, 2; //no decimals + set @tMaxAccZeny, 1000000000; //max zeny allowed in ^FF7F01Bank Account^000000 1,000,000,000=1 billion + set @tMaxZeny, 1000000000; //max zeny that a player can carry + set @tMinZeny, 100; //min zeny allowed or Bank Account is closed + set @tCreateZeny, 500; //zeny needed in order to create a Bank Account + set @tMinDeposit,100; //min zeny to deposit + set @tBeginningZeny, 100; //amount of zeny in Bank Account after creating + mes "^0072FF[Bank Manager]^000000"; + mes "Welcome to this office branch of Midgard's Bank."; + next; + if (vBankAccActive==1) goto AccMenu; + mes "^0072FF[Bank Manager]^000000"; + mes "You don't have a ^FF7F01Bank Account^000000 yet, you must buy one."; + mes "It will cost you ^0000FF" + @tCreateZeny + "z^000000 to create it."; + next; + menu "^FF7F01Create Account.^000000",CreateAcc,"^FF7F01Information.^000000",BankInfo,"^FF7F01No thanks.^000000",NoCreateAcc; + BankInfo: + mes "^0072FF[Bank Manager]^000000"; + mes "Here are some points that you need to know:"; + mes "1. To create a ^FF7F01Bank Account^000000 you have to pay ^0000FF" + @tCreateZeny + "z^000000."; + mes "2. You will be charged ^0000FF" + @tInterestRate + " percent^000000 everytime you Deposit."; + mes "3. You must always have no less than ^0000FF" + @tMinZeny + "z^000000 on your ^FF7F01Bank Account^000000."; + next; + mes "4. You can save up to ^0000FF" + @tMaxAccZeny + "z^000000 in your bank account."; + mes "5. You will be able to access your ^FF7F01Bank Account^000000 in any town with a Bank Office."; + mes "6. You will start by having ^0000FF" + @tBeginningZeny + "z^000000 in your bank account."; + close; + CreateAcc: + mes "^0072FF[Bank Manager]^000000"; + mes "First of all, you will have to have at least ^0000FF" + @tCreateZeny + "z^000000 with you."; + mes "Your account will start with ^0000FF" + @tBeginningZeny +"z^000000."; + mes "Are you sure you want to continue?"; + next; + menu "^FF7F01Sure.^000000",CreateAccCont,"^FF7F01Nah, it's ok.^000000",NoCreateAcc; + CreateAccCont: + if (@tCreateZeny > Zeny) goto CreateAccNoEnoughZeny; + set Zeny, Zeny - @tCreateZeny; + set vBankAccActive,1; + set vBankAccZeny, @tBeginningZeny; + set vBankAccLastZeny, @tBeginningZeny; + set vBankAccInterests,0; + mes "^0072FF[Bank Manager]^000000"; + mes "Congratulations, your ^FF7F01Bank Account^000000 is now created with ^0000FF" + vBankAccZeny + "z^000000."; + mes "You may now proceed to do any transactions."; + next; + goto AccMenu; + CreateAccNoEnoughZeny: + mes "^0072FF[Bank Manager]^000000"; + mes "Didn't I tell you to make sure you had enough zeny?"; + mes "You can't create it with just ^0000FF" + Zeny + "z^000000."; + mes "Come back when you get those ^0000FF" + @tCreateZeny + "z^000000..."; + next; + goto EndNPC; + NoCreateAcc: + mes "^0072FF[Bank Manager]^000000"; + mes "Come back when you change your mind!"; + next; + goto EndNPC; + AccMenu: + mes "^0072FF[Bank Manager]^000000"; + mes "Your current balance is ^0000FF" + vBankAccZeny +"z^000000."; + mes "What would you like to do now?"; + next; + menu "^FF7F01Deposit.^000000",AccDeposit,"^FF7F01Withdraw.^000000",AccWithdraw,"^FF7F01Bank Account Info.^000000",AccBalance,"^FF7F01Close Bank Account^000000",AccClose,"^FF7F01Cancel.^000000",EndNPC; + AccDeposit: + mes "^0072FF[Bank Manager]^000000"; + mes "It's always good to deposit every once in a while."; + mes "Be noticed that we charge a ^0000FF" + @tInterestRate + " percent ^000000 of interest rate in every deposit you make."; + mes "This means that to deposit ^0000FF100z^000000 you need to have pay us ^0000FF" + 100 * @tInterestRate / 100 + "z^000000."; + mes "How much are you willing to deposit?"; + next; + AccDepositInput: + input @tDeposit; + set @tDepositTax, @tDeposit * @tInterestRate / 100; + set @tDepositTotal, @tDeposit - @tDepositTax; + if (@tDeposit <= 0) goto AccDepositNoInput; + if (@tDeposit < @tMinDeposit) goto AccDepositNotEnoughInput; + if (@tDepositTotal > Zeny) goto AccDepositNotEnoughZeny; + set @tBankAccZenyTemp, vBankAccZeny + @tDepositTotal; + if (@tBankAccZenyTemp > @tMaxAccZeny) goto AccDepositOver; + if ((@tDeposit <= Zeny) && (@tBankAccZenyTemp <= @tMaxAccZeny)) goto AccDepositCont; + mes "^0072FF[Bank Manager]^000000"; + mes "Sorry, for some weird reason I couldn't deposit your money."; + next; + goto AccMenu; + AccDepositCont: + set Zeny, Zeny - @tDeposit; + set vBankAccLastZeny, vBankAccZeny; + set vBankAccZeny, @tBankAccZenyTemp; + set vBankAccInterests, vBankAccInterests + @tDepositTax; + mes "^0072FF[Bank Manager]^000000"; + mes "Transaction completed successfully."; + mes "^0000FF" + @tDeposit + "z^000000 substracted from your money (Taxes applied)."; + mes "^0000FF" + @tDepositTotal + "z^000000 successfully added to your ^FF7F01Bank Account^000000."; + next; + goto AccMenu; + AccDepositOver: + mes "^0072FF[Bank Manager]^000000"; + mes "There is a limit of ^0000FF" + @tMaxAccZeny + "z^000000 of how much zeny your ^FF7F01Bank Account^000000 can hold."; + mes "You can't deposit more than that, please try again."; + mes "Do you want to try again?"; + next; + menu "^FF7F01Yes, please.^000000",AccDepositInput,"^FF7F01No, thanks.^000000",AccMenu; + AccDepositNotEnoughInput: + mes "^0072FF[Bank Manager]^000000"; + mes "You need to put more money in order to make a deposit."; + mes "Do you want to try again?"; + next; + menu "^FF7F01Yes, please.^000000",AccDepositInput,"^FF7F01No, thanks.^000000",AccMenu; + AccDepositNoInput: + mes "^0072FF[Bank Manager]^000000"; + mes "You must enter a value higher than ^0000FF" + @tMinDeposit + "z^000000."; + mes "Do you want to try again?"; + next; + menu "^FF7F01Yes, please.^000000",AccDepositInput,"^FF7F01No, thanks.^000000",AccMenu; + AccDepositNotEnoughZeny: + mes "^0072FF[Bank Manager]^000000"; + mes "You don't have ^0000FF" + @tDepositTotal + "z^000000."; + mes "Remember that taxes are being applied."; + mes "Do you want to try again?"; + next; + menu "^FF7F01Yes, please.^000000",AccDepositInput,"^FF7F01No, thanks.^000000",AccMenu; + AccWithdraw: + mes "^0072FF[Bank Manager]^000000"; + mes "This is the only transaction I don't like... you figure out why..."; + mes "You can't withdraw leaving less than ^0000FF" + @tMinZeny +"z^000000 in your ^FF7F01Bank Account^000000."; + mes "Your current balance is ^0000FF" + vBankAccZeny + "z^000000."; + mes "How much are you going to widthdraw?"; + next; + AccWithdrawInput: + input @tWithdraw; + set @tZenyLeft, vBankAccZeny - @tWithdraw; + set @tZenyTemp, Zeny + @tWithdraw; + if (@tWithdraw == 0) goto AccWithdrawNoInput; + if (@tZenyLeft < @tMinZeny) goto AccWithdrawMinZeny; + if (@tZenyTemp > @tMaxZeny) goto AccWithDrawOverCharZeny; + set Zeny, Zeny + @tWithdraw; + set vBankAccLastZeny, vBankAccZeny; + set vBankAccZeny, vBankAccZeny - @tWithdraw; + mes "^0072FF[Bank Manager]^000000"; + mes "Transaction completed successfully."; + mes "Thank you for using our services."; + next; + goto AccMenu; + AccWithdrawNoInput: + mes "^0072FF[Bank Manager]^000000"; + mes "In order to withdraw from the bank, you must withdraw more than 0 zeny."; + mes "Do you want to try again?"; + next; + menu "^FF7F01Yes, please.^000000",AccWithdrawInput,"^FF7F01No, thanks.^000000",AccMenu; + AccWithdrawMinZeny: + mes "^0072FF[Bank Manager]^000000"; + mes "I'm sorry..."; + mes "You can't withdraw ^0000FF" + @tWithdraw + "z^000000 because your ^FF7F01Bank Account^000000 must have ^0000FF" + @tMinZeny + "z^000000 left or more at all times."; + mes "In order to take all your money from the bank you must select Close Account in the Account Menu."; + mes "Do you want to try again?"; + next; + menu "^FF7F01Yes, please.^000000",AccWithdrawInput,"^FF7F01No, thanks.^000000",AccMenu; + AccWithDrawOverCharZeny: + mes "^0072FF[Bank Manager]^000000"; + mes "Sorry, but you can't withdraw ^0000FF" + @tWithdraw + "z^000000 because your Player can't carry more than ^0000FF" + @tMaxZeny + "z^000000."; + mes "Do you want to try again?"; + next; + menu "^FF7F01Yes, please.^000000",AccWithdrawInput,"^FF7F01No, thanks.^000000",AccMenu; + AccBalance: + mes "^0072FF[Bank Manager]^000000"; + mes "Account Status:"; + //shown in blue if the same or more, show in red if less than previous balance + if (vBankAccZeny >= vBankAccLastZeny) goto AccBalance2; + mes "Current Balance: ^FF0000" + vBankAccZeny +"z^000000."; + goto AccBalance3; + AccBalance2: + mes "Current Balance: ^0000FF" + vBankAccZeny +"z^000000."; + goto AccBalance3; + AccBalance3: + mes "Previous Balance: ^0000FF" + vBankAccLastZeny +"z^000000."; + mes "Interest Rate: ^0000FF" + @tInterestRate + "%^000000."; + mes "Interests Payed: ^0000FF" + vBankAccInterests + "z^000000."; + next; + goto AccMenu; + AccClose: + mes "^0072FF[Bank Manager]^000000"; + mes "If you close your ^FF7F01Bank Account^000000, it means you eliminate it."; + mes "Of course, you will get all your money back."; + mes "Are you sure you want to close your ^FF7F01Bank Account^000000?"; + next; + menu "^FF7F01I don't want it anymore.^000000",AccCloseConfirm,"^FF7F01No, I'll keep it.^000000",AccCloseKeep; + AccCloseConfirm: + set vBankAccActive,0; + set Zeny, Zeny + vBankAccZeny; + set vBankAccZeny,0; + set vBankAccLastZeny,0; + set vBankAccInterests,0; + mes "^0072FF[Bank Manager]^000000"; + mes "Thanks for using our services, we hope you come back to visit us."; + mes "Here's your money."; + next; + goto EndNPC; + AccCloseKeep: + mes "^0072FF[Bank Manager]^000000"; + mes "Good choice, thanks for staying with us."; + next; + goto AccMenu; + EndNPC: + set @random,rand(4); + mes "^0072FF[Bank Manager]^000000"; + if (@random == 0) mes "Have a nice day!"; + if (@random == 1) mes "See you soon!"; + if (@random == 2) mes "See you next time!"; + if (@random == 3) mes "Come back soon!"; + close; +} + +cmd_in01.gat,115,171,7 script Bank Manager 109,{ + set @tInterestRate, 2; //no decimals + set @tMaxAccZeny, 1000000000; //max zeny allowed in ^FF7F01Bank Account^000000 1,000,000,000=1 billion + set @tMaxZeny, 1000000000; //max zeny that a player can carry + set @tMinZeny, 100; //min zeny allowed or Bank Account is closed + set @tCreateZeny, 500; //zeny needed in order to create a Bank Account + set @tMinDeposit,100; //min zeny to deposit + set @tBeginningZeny, 100; //amount of zeny in Bank Account after creating + mes "^0072FF[Bank Manager]^000000"; + mes "Welcome to this office branch of Midgard's Bank."; + next; + if (vBankAccActive==1) goto AccMenu; + mes "^0072FF[Bank Manager]^000000"; + mes "You don't have a ^FF7F01Bank Account^000000 yet, you must buy one."; + mes "It will cost you ^0000FF" + @tCreateZeny + "z^000000 to create it."; + next; + menu "^FF7F01Create Account.^000000",CreateAcc,"^FF7F01Information.^000000",BankInfo,"^FF7F01No thanks.^000000",NoCreateAcc; + BankInfo: + mes "^0072FF[Bank Manager]^000000"; + mes "Here are some points that you need to know:"; + mes "1. To create a ^FF7F01Bank Account^000000 you have to pay ^0000FF" + @tCreateZeny + "z^000000."; + mes "2. You will be charged ^0000FF" + @tInterestRate + " percent^000000 everytime you Deposit."; + mes "3. You must always have no less than ^0000FF" + @tMinZeny + "z^000000 on your ^FF7F01Bank Account^000000."; + next; + mes "4. You can save up to ^0000FF" + @tMaxAccZeny + "z^000000 in your bank account."; + mes "5. You will be able to access your ^FF7F01Bank Account^000000 in any town with a Bank Office."; + mes "6. You will start by having ^0000FF" + @tBeginningZeny + "z^000000 in your bank account."; + close; + CreateAcc: + mes "^0072FF[Bank Manager]^000000"; + mes "First of all, you will have to have at least ^0000FF" + @tCreateZeny + "z^000000 with you."; + mes "Your account will start with ^0000FF" + @tBeginningZeny +"z^000000."; + mes "Are you sure you want to continue?"; + next; + menu "^FF7F01Sure.^000000",CreateAccCont,"^FF7F01Nah, it's ok.^000000",NoCreateAcc; + CreateAccCont: + if (@tCreateZeny > Zeny) goto CreateAccNoEnoughZeny; + set Zeny, Zeny - @tCreateZeny; + set vBankAccActive,1; + set vBankAccZeny, @tBeginningZeny; + set vBankAccLastZeny, @tBeginningZeny; + set vBankAccInterests,0; + mes "^0072FF[Bank Manager]^000000"; + mes "Congratulations, your ^FF7F01Bank Account^000000 is now created with ^0000FF" + vBankAccZeny + "z^000000."; + mes "You may now proceed to do any transactions."; + next; + goto AccMenu; + CreateAccNoEnoughZeny: + mes "^0072FF[Bank Manager]^000000"; + mes "Didn't I tell you to make sure you had enough zeny?"; + mes "You can't create it with just ^0000FF" + Zeny + "z^000000."; + mes "Come back when you get those ^0000FF" + @tCreateZeny + "z^000000..."; + next; + goto EndNPC; + NoCreateAcc: + mes "^0072FF[Bank Manager]^000000"; + mes "Come back when you change your mind!"; + next; + goto EndNPC; + AccMenu: + mes "^0072FF[Bank Manager]^000000"; + mes "Your current balance is ^0000FF" + vBankAccZeny +"z^000000."; + mes "What would you like to do now?"; + next; + menu "^FF7F01Deposit.^000000",AccDeposit,"^FF7F01Withdraw.^000000",AccWithdraw,"^FF7F01Bank Account Info.^000000",AccBalance,"^FF7F01Close Bank Account^000000",AccClose,"^FF7F01Cancel.^000000",EndNPC; + AccDeposit: + mes "^0072FF[Bank Manager]^000000"; + mes "It's always good to deposit every once in a while."; + mes "Be noticed that we charge a ^0000FF" + @tInterestRate + " percent ^000000 of interest rate in every deposit you make."; + mes "This means that to deposit ^0000FF100z^000000 you need to have pay us ^0000FF" + 100 * @tInterestRate / 100 + "z^000000."; + mes "How much are you willing to deposit?"; + next; + AccDepositInput: + input @tDeposit; + set @tDepositTax, @tDeposit * @tInterestRate / 100; + set @tDepositTotal, @tDeposit - @tDepositTax; + if (@tDeposit <= 0) goto AccDepositNoInput; + if (@tDeposit < @tMinDeposit) goto AccDepositNotEnoughInput; + if (@tDepositTotal > Zeny) goto AccDepositNotEnoughZeny; + set @tBankAccZenyTemp, vBankAccZeny + @tDepositTotal; + if (@tBankAccZenyTemp > @tMaxAccZeny) goto AccDepositOver; + if ((@tDeposit <= Zeny) && (@tBankAccZenyTemp <= @tMaxAccZeny)) goto AccDepositCont; + mes "^0072FF[Bank Manager]^000000"; + mes "Sorry, for some weird reason I couldn't deposit your money."; + next; + goto AccMenu; + AccDepositCont: + set Zeny, Zeny - @tDeposit; + set vBankAccLastZeny, vBankAccZeny; + set vBankAccZeny, @tBankAccZenyTemp; + set vBankAccInterests, vBankAccInterests + @tDepositTax; + mes "^0072FF[Bank Manager]^000000"; + mes "Transaction completed successfully."; + mes "^0000FF" + @tDeposit + "z^000000 substracted from your money (Taxes applied)."; + mes "^0000FF" + @tDepositTotal + "z^000000 successfully added to your ^FF7F01Bank Account^000000."; + next; + goto AccMenu; + AccDepositOver: + mes "^0072FF[Bank Manager]^000000"; + mes "There is a limit of ^0000FF" + @tMaxAccZeny + "z^000000 of how much zeny your ^FF7F01Bank Account^000000 can hold."; + mes "You can't deposit more than that, please try again."; + mes "Do you want to try again?"; + next; + menu "^FF7F01Yes, please.^000000",AccDepositInput,"^FF7F01No, thanks.^000000",AccMenu; + AccDepositNotEnoughInput: + mes "^0072FF[Bank Manager]^000000"; + mes "You need to put more money in order to make a deposit."; + mes "Do you want to try again?"; + next; + menu "^FF7F01Yes, please.^000000",AccDepositInput,"^FF7F01No, thanks.^000000",AccMenu; + AccDepositNoInput: + mes "^0072FF[Bank Manager]^000000"; + mes "You must enter a value higher than ^0000FF" + @tMinDeposit + "z^000000."; + mes "Do you want to try again?"; + next; + menu "^FF7F01Yes, please.^000000",AccDepositInput,"^FF7F01No, thanks.^000000",AccMenu; + AccDepositNotEnoughZeny: + mes "^0072FF[Bank Manager]^000000"; + mes "You don't have ^0000FF" + @tDepositTotal + "z^000000."; + mes "Remember that taxes are being applied."; + mes "Do you want to try again?"; + next; + menu "^FF7F01Yes, please.^000000",AccDepositInput,"^FF7F01No, thanks.^000000",AccMenu; + AccWithdraw: + mes "^0072FF[Bank Manager]^000000"; + mes "This is the only transaction I don't like... you figure out why..."; + mes "You can't withdraw leaving less than ^0000FF" + @tMinZeny +"z^000000 in your ^FF7F01Bank Account^000000."; + mes "Your current balance is ^0000FF" + vBankAccZeny + "z^000000."; + mes "How much are you going to widthdraw?"; + next; + AccWithdrawInput: + input @tWithdraw; + set @tZenyLeft, vBankAccZeny - @tWithdraw; + set @tZenyTemp, Zeny + @tWithdraw; + if (@tWithdraw == 0) goto AccWithdrawNoInput; + if (@tZenyLeft < @tMinZeny) goto AccWithdrawMinZeny; + if (@tZenyTemp > @tMaxZeny) goto AccWithDrawOverCharZeny; + set Zeny, Zeny + @tWithdraw; + set vBankAccLastZeny, vBankAccZeny; + set vBankAccZeny, vBankAccZeny - @tWithdraw; + mes "^0072FF[Bank Manager]^000000"; + mes "Transaction completed successfully."; + mes "Thank you for using our services."; + next; + goto AccMenu; + AccWithdrawNoInput: + mes "^0072FF[Bank Manager]^000000"; + mes "In order to withdraw from the bank, you must withdraw more than 0 zeny."; + mes "Do you want to try again?"; + next; + menu "^FF7F01Yes, please.^000000",AccWithdrawInput,"^FF7F01No, thanks.^000000",AccMenu; + AccWithdrawMinZeny: + mes "^0072FF[Bank Manager]^000000"; + mes "I'm sorry..."; + mes "You can't withdraw ^0000FF" + @tWithdraw + "z^000000 because your ^FF7F01Bank Account^000000 must have ^0000FF" + @tMinZeny + "z^000000 left or more at all times."; + mes "In order to take all your money from the bank you must select Close Account in the Account Menu."; + mes "Do you want to try again?"; + next; + menu "^FF7F01Yes, please.^000000",AccWithdrawInput,"^FF7F01No, thanks.^000000",AccMenu; + AccWithDrawOverCharZeny: + mes "^0072FF[Bank Manager]^000000"; + mes "Sorry, but you can't withdraw ^0000FF" + @tWithdraw + "z^000000 because your Player can't carry more than ^0000FF" + @tMaxZeny + "z^000000."; + mes "Do you want to try again?"; + next; + menu "^FF7F01Yes, please.^000000",AccWithdrawInput,"^FF7F01No, thanks.^000000",AccMenu; + AccBalance: + mes "^0072FF[Bank Manager]^000000"; + mes "Account Status:"; + //shown in blue if the same or more, show in red if less than previous balance + if (vBankAccZeny >= vBankAccLastZeny) goto AccBalance2; + mes "Current Balance: ^FF0000" + vBankAccZeny +"z^000000."; + goto AccBalance3; + AccBalance2: + mes "Current Balance: ^0000FF" + vBankAccZeny +"z^000000."; + goto AccBalance3; + AccBalance3: + mes "Previous Balance: ^0000FF" + vBankAccLastZeny +"z^000000."; + mes "Interest Rate: ^0000FF" + @tInterestRate + "%^000000."; + mes "Interests Payed: ^0000FF" + vBankAccInterests + "z^000000."; + next; + goto AccMenu; + AccClose: + mes "^0072FF[Bank Manager]^000000"; + mes "If you close your ^FF7F01Bank Account^000000, it means you eliminate it."; + mes "Of course, you will get all your money back."; + mes "Are you sure you want to close your ^FF7F01Bank Account^000000?"; + next; + menu "^FF7F01I don't want it anymore.^000000",AccCloseConfirm,"^FF7F01No, I'll keep it.^000000",AccCloseKeep; + AccCloseConfirm: + set vBankAccActive,0; + set Zeny, Zeny + vBankAccZeny; + set vBankAccZeny,0; + set vBankAccLastZeny,0; + set vBankAccInterests,0; + mes "^0072FF[Bank Manager]^000000"; + mes "Thanks for using our services, we hope you come back to visit us."; + mes "Here's your money."; + next; + goto EndNPC; + AccCloseKeep: + mes "^0072FF[Bank Manager]^000000"; + mes "Good choice, thanks for staying with us."; + next; + goto AccMenu; + EndNPC: + set @random,rand(4); + mes "^0072FF[Bank Manager]^000000"; + if (@random == 0) mes "Have a nice day!"; + if (@random == 1) mes "See you soon!"; + if (@random == 2) mes "See you next time!"; + if (@random == 3) mes "Come back soon!"; + close; +} + +yuno_in01.gat,119,29,2 script Bank Manager 109,{ + set @tInterestRate, 2; //no decimals + set @tMaxAccZeny, 1000000000; //max zeny allowed in ^FF7F01Bank Account^000000 1,000,000,000=1 billion + set @tMaxZeny, 1000000000; //max zeny that a player can carry + set @tMinZeny, 100; //min zeny allowed or Bank Account is closed + set @tCreateZeny, 500; //zeny needed in order to create a Bank Account + set @tMinDeposit,100; //min zeny to deposit + set @tBeginningZeny, 100; //amount of zeny in Bank Account after creating + mes "^0072FF[Bank Manager]^000000"; + mes "Welcome to this office branch of Midgard's Bank."; + next; + if (vBankAccActive==1) goto AccMenu; + mes "^0072FF[Bank Manager]^000000"; + mes "You don't have a ^FF7F01Bank Account^000000 yet, you must buy one."; + mes "It will cost you ^0000FF" + @tCreateZeny + "z^000000 to create it."; + next; + menu "^FF7F01Create Account.^000000",CreateAcc,"^FF7F01Information.^000000",BankInfo,"^FF7F01No thanks.^000000",NoCreateAcc; + BankInfo: + mes "^0072FF[Bank Manager]^000000"; + mes "Here are some points that you need to know:"; + mes "1. To create a ^FF7F01Bank Account^000000 you have to pay ^0000FF" + @tCreateZeny + "z^000000."; + mes "2. You will be charged ^0000FF" + @tInterestRate + " percent^000000 everytime you Deposit."; + mes "3. You must always have no less than ^0000FF" + @tMinZeny + "z^000000 on your ^FF7F01Bank Account^000000."; + next; + mes "4. You can save up to ^0000FF" + @tMaxAccZeny + "z^000000 in your bank account."; + mes "5. You will be able to access your ^FF7F01Bank Account^000000 in any town with a Bank Office."; + mes "6. You will start by having ^0000FF" + @tBeginningZeny + "z^000000 in your bank account."; + close; + CreateAcc: + mes "^0072FF[Bank Manager]^000000"; + mes "First of all, you will have to have at least ^0000FF" + @tCreateZeny + "z^000000 with you."; + mes "Your account will start with ^0000FF" + @tBeginningZeny +"z^000000."; + mes "Are you sure you want to continue?"; + next; + menu "^FF7F01Sure.^000000",CreateAccCont,"^FF7F01Nah, it's ok.^000000",NoCreateAcc; + CreateAccCont: + if (@tCreateZeny > Zeny) goto CreateAccNoEnoughZeny; + set Zeny, Zeny - @tCreateZeny; + set vBankAccActive,1; + set vBankAccZeny, @tBeginningZeny; + set vBankAccLastZeny, @tBeginningZeny; + set vBankAccInterests,0; + mes "^0072FF[Bank Manager]^000000"; + mes "Congratulations, your ^FF7F01Bank Account^000000 is now created with ^0000FF" + vBankAccZeny + "z^000000."; + mes "You may now proceed to do any transactions."; + next; + goto AccMenu; + CreateAccNoEnoughZeny: + mes "^0072FF[Bank Manager]^000000"; + mes "Didn't I tell you to make sure you had enough zeny?"; + mes "You can't create it with just ^0000FF" + Zeny + "z^000000."; + mes "Come back when you get those ^0000FF" + @tCreateZeny + "z^000000..."; + next; + goto EndNPC; + NoCreateAcc: + mes "^0072FF[Bank Manager]^000000"; + mes "Come back when you change your mind!"; + next; + goto EndNPC; + AccMenu: + mes "^0072FF[Bank Manager]^000000"; + mes "Your current balance is ^0000FF" + vBankAccZeny +"z^000000."; + mes "What would you like to do now?"; + next; + menu "^FF7F01Deposit.^000000",AccDeposit,"^FF7F01Withdraw.^000000",AccWithdraw,"^FF7F01Bank Account Info.^000000",AccBalance,"^FF7F01Close Bank Account^000000",AccClose,"^FF7F01Cancel.^000000",EndNPC; + AccDeposit: + mes "^0072FF[Bank Manager]^000000"; + mes "It's always good to deposit every once in a while."; + mes "Be noticed that we charge a ^0000FF" + @tInterestRate + " percent ^000000 of interest rate in every deposit you make."; + mes "This means that to deposit ^0000FF100z^000000 you need to have pay us ^0000FF" + 100 * @tInterestRate / 100 + "z^000000."; + mes "How much are you willing to deposit?"; + next; + AccDepositInput: + input @tDeposit; + set @tDepositTax, @tDeposit * @tInterestRate / 100; + set @tDepositTotal, @tDeposit - @tDepositTax; + if (@tDeposit <= 0) goto AccDepositNoInput; + if (@tDeposit < @tMinDeposit) goto AccDepositNotEnoughInput; + if (@tDepositTotal > Zeny) goto AccDepositNotEnoughZeny; + set @tBankAccZenyTemp, vBankAccZeny + @tDepositTotal; + if (@tBankAccZenyTemp > @tMaxAccZeny) goto AccDepositOver; + if ((@tDeposit <= Zeny) && (@tBankAccZenyTemp <= @tMaxAccZeny)) goto AccDepositCont; + mes "^0072FF[Bank Manager]^000000"; + mes "Sorry, for some weird reason I couldn't deposit your money."; + next; + goto AccMenu; + AccDepositCont: + set Zeny, Zeny - @tDeposit; + set vBankAccLastZeny, vBankAccZeny; + set vBankAccZeny, @tBankAccZenyTemp; + set vBankAccInterests, vBankAccInterests + @tDepositTax; + mes "^0072FF[Bank Manager]^000000"; + mes "Transaction completed successfully."; + mes "^0000FF" + @tDeposit + "z^000000 substracted from your money (Taxes applied)."; + mes "^0000FF" + @tDepositTotal + "z^000000 successfully added to your ^FF7F01Bank Account^000000."; + next; + goto AccMenu; + AccDepositOver: + mes "^0072FF[Bank Manager]^000000"; + mes "There is a limit of ^0000FF" + @tMaxAccZeny + "z^000000 of how much zeny your ^FF7F01Bank Account^000000 can hold."; + mes "You can't deposit more than that, please try again."; + mes "Do you want to try again?"; + next; + menu "^FF7F01Yes, please.^000000",AccDepositInput,"^FF7F01No, thanks.^000000",AccMenu; + AccDepositNotEnoughInput: + mes "^0072FF[Bank Manager]^000000"; + mes "You need to put more money in order to make a deposit."; + mes "Do you want to try again?"; + next; + menu "^FF7F01Yes, please.^000000",AccDepositInput,"^FF7F01No, thanks.^000000",AccMenu; + AccDepositNoInput: + mes "^0072FF[Bank Manager]^000000"; + mes "You must enter a value higher than ^0000FF" + @tMinDeposit + "z^000000."; + mes "Do you want to try again?"; + next; + menu "^FF7F01Yes, please.^000000",AccDepositInput,"^FF7F01No, thanks.^000000",AccMenu; + AccDepositNotEnoughZeny: + mes "^0072FF[Bank Manager]^000000"; + mes "You don't have ^0000FF" + @tDepositTotal + "z^000000."; + mes "Remember that taxes are being applied."; + mes "Do you want to try again?"; + next; + menu "^FF7F01Yes, please.^000000",AccDepositInput,"^FF7F01No, thanks.^000000",AccMenu; + AccWithdraw: + mes "^0072FF[Bank Manager]^000000"; + mes "This is the only transaction I don't like... you figure out why..."; + mes "You can't withdraw leaving less than ^0000FF" + @tMinZeny +"z^000000 in your ^FF7F01Bank Account^000000."; + mes "Your current balance is ^0000FF" + vBankAccZeny + "z^000000."; + mes "How much are you going to widthdraw?"; + next; + AccWithdrawInput: + input @tWithdraw; + set @tZenyLeft, vBankAccZeny - @tWithdraw; + set @tZenyTemp, Zeny + @tWithdraw; + if (@tWithdraw == 0) goto AccWithdrawNoInput; + if (@tZenyLeft < @tMinZeny) goto AccWithdrawMinZeny; + if (@tZenyTemp > @tMaxZeny) goto AccWithDrawOverCharZeny; + set Zeny, Zeny + @tWithdraw; + set vBankAccLastZeny, vBankAccZeny; + set vBankAccZeny, vBankAccZeny - @tWithdraw; + mes "^0072FF[Bank Manager]^000000"; + mes "Transaction completed successfully."; + mes "Thank you for using our services."; + next; + goto AccMenu; + AccWithdrawNoInput: + mes "^0072FF[Bank Manager]^000000"; + mes "In order to withdraw from the bank, you must withdraw more than 0 zeny."; + mes "Do you want to try again?"; + next; + menu "^FF7F01Yes, please.^000000",AccWithdrawInput,"^FF7F01No, thanks.^000000",AccMenu; + AccWithdrawMinZeny: + mes "^0072FF[Bank Manager]^000000"; + mes "I'm sorry..."; + mes "You can't withdraw ^0000FF" + @tWithdraw + "z^000000 because your ^FF7F01Bank Account^000000 must have ^0000FF" + @tMinZeny + "z^000000 left or more at all times."; + mes "In order to take all your money from the bank you must select Close Account in the Account Menu."; + mes "Do you want to try again?"; + next; + menu "^FF7F01Yes, please.^000000",AccWithdrawInput,"^FF7F01No, thanks.^000000",AccMenu; + AccWithDrawOverCharZeny: + mes "^0072FF[Bank Manager]^000000"; + mes "Sorry, but you can't withdraw ^0000FF" + @tWithdraw + "z^000000 because your Player can't carry more than ^0000FF" + @tMaxZeny + "z^000000."; + mes "Do you want to try again?"; + next; + menu "^FF7F01Yes, please.^000000",AccWithdrawInput,"^FF7F01No, thanks.^000000",AccMenu; + AccBalance: + mes "^0072FF[Bank Manager]^000000"; + mes "Account Status:"; + //shown in blue if the same or more, show in red if less than previous balance + if (vBankAccZeny >= vBankAccLastZeny) goto AccBalance2; + mes "Current Balance: ^FF0000" + vBankAccZeny +"z^000000."; + goto AccBalance3; + AccBalance2: + mes "Current Balance: ^0000FF" + vBankAccZeny +"z^000000."; + goto AccBalance3; + AccBalance3: + mes "Previous Balance: ^0000FF" + vBankAccLastZeny +"z^000000."; + mes "Interest Rate: ^0000FF" + @tInterestRate + "%^000000."; + mes "Interests Payed: ^0000FF" + vBankAccInterests + "z^000000."; + next; + goto AccMenu; + AccClose: + mes "^0072FF[Bank Manager]^000000"; + mes "If you close your ^FF7F01Bank Account^000000, it means you eliminate it."; + mes "Of course, you will get all your money back."; + mes "Are you sure you want to close your ^FF7F01Bank Account^000000?"; + next; + menu "^FF7F01I don't want it anymore.^000000",AccCloseConfirm,"^FF7F01No, I'll keep it.^000000",AccCloseKeep; + AccCloseConfirm: + set vBankAccActive,0; + set Zeny, Zeny + vBankAccZeny; + set vBankAccZeny,0; + set vBankAccLastZeny,0; + set vBankAccInterests,0; + mes "^0072FF[Bank Manager]^000000"; + mes "Thanks for using our services, we hope you come back to visit us."; + mes "Here's your money."; + next; + goto EndNPC; + AccCloseKeep: + mes "^0072FF[Bank Manager]^000000"; + mes "Good choice, thanks for staying with us."; + next; + goto AccMenu; + EndNPC: + set @random,rand(4); + mes "^0072FF[Bank Manager]^000000"; + if (@random == 0) mes "Have a nice day!"; + if (@random == 1) mes "See you soon!"; + if (@random == 2) mes "See you next time!"; + if (@random == 3) mes "Come back soon!"; + close; +} + +amatsu.gat,189,108,6 script Bank Manager 109,{ + set @tInterestRate, 2; //no decimals + set @tMaxAccZeny, 1000000000; //max zeny allowed in ^FF7F01Bank Account^000000 1,000,000,000=1 billion + set @tMaxZeny, 1000000000; //max zeny that a player can carry + set @tMinZeny, 100; //min zeny allowed or Bank Account is closed + set @tCreateZeny, 500; //zeny needed in order to create a Bank Account + set @tMinDeposit,100; //min zeny to deposit + set @tBeginningZeny, 100; //amount of zeny in Bank Account after creating + mes "^0072FF[Bank Manager]^000000"; + mes "Welcome to this office branch of Midgard's Bank."; + next; + if (vBankAccActive==1) goto AccMenu; + mes "^0072FF[Bank Manager]^000000"; + mes "You don't have a ^FF7F01Bank Account^000000 yet, you must buy one."; + mes "It will cost you ^0000FF" + @tCreateZeny + "z^000000 to create it."; + next; + menu "^FF7F01Create Account.^000000",CreateAcc,"^FF7F01Information.^000000",BankInfo,"^FF7F01No thanks.^000000",NoCreateAcc; + BankInfo: + mes "^0072FF[Bank Manager]^000000"; + mes "Here are some points that you need to know:"; + mes "1. To create a ^FF7F01Bank Account^000000 you have to pay ^0000FF" + @tCreateZeny + "z^000000."; + mes "2. You will be charged ^0000FF" + @tInterestRate + " percent^000000 everytime you Deposit."; + mes "3. You must always have no less than ^0000FF" + @tMinZeny + "z^000000 on your ^FF7F01Bank Account^000000."; + next; + mes "4. You can save up to ^0000FF" + @tMaxAccZeny + "z^000000 in your bank account."; + mes "5. You will be able to access your ^FF7F01Bank Account^000000 in any town with a Bank Office."; + mes "6. You will start by having ^0000FF" + @tBeginningZeny + "z^000000 in your bank account."; + close; + CreateAcc: + mes "^0072FF[Bank Manager]^000000"; + mes "First of all, you will have to have at least ^0000FF" + @tCreateZeny + "z^000000 with you."; + mes "Your account will start with ^0000FF" + @tBeginningZeny +"z^000000."; + mes "Are you sure you want to continue?"; + next; + menu "^FF7F01Sure.^000000",CreateAccCont,"^FF7F01Nah, it's ok.^000000",NoCreateAcc; + CreateAccCont: + if (@tCreateZeny > Zeny) goto CreateAccNoEnoughZeny; + set Zeny, Zeny - @tCreateZeny; + set vBankAccActive,1; + set vBankAccZeny, @tBeginningZeny; + set vBankAccLastZeny, @tBeginningZeny; + set vBankAccInterests,0; + mes "^0072FF[Bank Manager]^000000"; + mes "Congratulations, your ^FF7F01Bank Account^000000 is now created with ^0000FF" + vBankAccZeny + "z^000000."; + mes "You may now proceed to do any transactions."; + next; + goto AccMenu; + CreateAccNoEnoughZeny: + mes "^0072FF[Bank Manager]^000000"; + mes "Didn't I tell you to make sure you had enough zeny?"; + mes "You can't create it with just ^0000FF" + Zeny + "z^000000."; + mes "Come back when you get those ^0000FF" + @tCreateZeny + "z^000000..."; + next; + goto EndNPC; + NoCreateAcc: + mes "^0072FF[Bank Manager]^000000"; + mes "Come back when you change your mind!"; + next; + goto EndNPC; + AccMenu: + mes "^0072FF[Bank Manager]^000000"; + mes "Your current balance is ^0000FF" + vBankAccZeny +"z^000000."; + mes "What would you like to do now?"; + next; + menu "^FF7F01Deposit.^000000",AccDeposit,"^FF7F01Withdraw.^000000",AccWithdraw,"^FF7F01Bank Account Info.^000000",AccBalance,"^FF7F01Close Bank Account^000000",AccClose,"^FF7F01Cancel.^000000",EndNPC; + AccDeposit: + mes "^0072FF[Bank Manager]^000000"; + mes "It's always good to deposit every once in a while."; + mes "Be noticed that we charge a ^0000FF" + @tInterestRate + " percent ^000000 of interest rate in every deposit you make."; + mes "This means that to deposit ^0000FF100z^000000 you need to have pay us ^0000FF" + 100 * @tInterestRate / 100 + "z^000000."; + mes "How much are you willing to deposit?"; + next; + AccDepositInput: + input @tDeposit; + set @tDepositTax, @tDeposit * @tInterestRate / 100; + set @tDepositTotal, @tDeposit - @tDepositTax; + if (@tDeposit <= 0) goto AccDepositNoInput; + if (@tDeposit < @tMinDeposit) goto AccDepositNotEnoughInput; + if (@tDepositTotal > Zeny) goto AccDepositNotEnoughZeny; + set @tBankAccZenyTemp, vBankAccZeny + @tDepositTotal; + if (@tBankAccZenyTemp > @tMaxAccZeny) goto AccDepositOver; + if ((@tDeposit <= Zeny) && (@tBankAccZenyTemp <= @tMaxAccZeny)) goto AccDepositCont; + mes "^0072FF[Bank Manager]^000000"; + mes "Sorry, for some weird reason I couldn't deposit your money."; + next; + goto AccMenu; + AccDepositCont: + set Zeny, Zeny - @tDeposit; + set vBankAccLastZeny, vBankAccZeny; + set vBankAccZeny, @tBankAccZenyTemp; + set vBankAccInterests, vBankAccInterests + @tDepositTax; + mes "^0072FF[Bank Manager]^000000"; + mes "Transaction completed successfully."; + mes "^0000FF" + @tDeposit + "z^000000 substracted from your money (Taxes applied)."; + mes "^0000FF" + @tDepositTotal + "z^000000 successfully added to your ^FF7F01Bank Account^000000."; + next; + goto AccMenu; + AccDepositOver: + mes "^0072FF[Bank Manager]^000000"; + mes "There is a limit of ^0000FF" + @tMaxAccZeny + "z^000000 of how much zeny your ^FF7F01Bank Account^000000 can hold."; + mes "You can't deposit more than that, please try again."; + mes "Do you want to try again?"; + next; + menu "^FF7F01Yes, please.^000000",AccDepositInput,"^FF7F01No, thanks.^000000",AccMenu; + AccDepositNotEnoughInput: + mes "^0072FF[Bank Manager]^000000"; + mes "You need to put more money in order to make a deposit."; + mes "Do you want to try again?"; + next; + menu "^FF7F01Yes, please.^000000",AccDepositInput,"^FF7F01No, thanks.^000000",AccMenu; + AccDepositNoInput: + mes "^0072FF[Bank Manager]^000000"; + mes "You must enter a value higher than ^0000FF" + @tMinDeposit + "z^000000."; + mes "Do you want to try again?"; + next; + menu "^FF7F01Yes, please.^000000",AccDepositInput,"^FF7F01No, thanks.^000000",AccMenu; + AccDepositNotEnoughZeny: + mes "^0072FF[Bank Manager]^000000"; + mes "You don't have ^0000FF" + @tDepositTotal + "z^000000."; + mes "Remember that taxes are being applied."; + mes "Do you want to try again?"; + next; + menu "^FF7F01Yes, please.^000000",AccDepositInput,"^FF7F01No, thanks.^000000",AccMenu; + AccWithdraw: + mes "^0072FF[Bank Manager]^000000"; + mes "This is the only transaction I don't like... you figure out why..."; + mes "You can't withdraw leaving less than ^0000FF" + @tMinZeny +"z^000000 in your ^FF7F01Bank Account^000000."; + mes "Your current balance is ^0000FF" + vBankAccZeny + "z^000000."; + mes "How much are you going to widthdraw?"; + next; + AccWithdrawInput: + input @tWithdraw; + set @tZenyLeft, vBankAccZeny - @tWithdraw; + set @tZenyTemp, Zeny + @tWithdraw; + if (@tWithdraw == 0) goto AccWithdrawNoInput; + if (@tZenyLeft < @tMinZeny) goto AccWithdrawMinZeny; + if (@tZenyTemp > @tMaxZeny) goto AccWithDrawOverCharZeny; + set Zeny, Zeny + @tWithdraw; + set vBankAccLastZeny, vBankAccZeny; + set vBankAccZeny, vBankAccZeny - @tWithdraw; + mes "^0072FF[Bank Manager]^000000"; + mes "Transaction completed successfully."; + mes "Thank you for using our services."; + next; + goto AccMenu; + AccWithdrawNoInput: + mes "^0072FF[Bank Manager]^000000"; + mes "In order to withdraw from the bank, you must withdraw more than 0 zeny."; + mes "Do you want to try again?"; + next; + menu "^FF7F01Yes, please.^000000",AccWithdrawInput,"^FF7F01No, thanks.^000000",AccMenu; + AccWithdrawMinZeny: + mes "^0072FF[Bank Manager]^000000"; + mes "I'm sorry..."; + mes "You can't withdraw ^0000FF" + @tWithdraw + "z^000000 because your ^FF7F01Bank Account^000000 must have ^0000FF" + @tMinZeny + "z^000000 left or more at all times."; + mes "In order to take all your money from the bank you must select Close Account in the Account Menu."; + mes "Do you want to try again?"; + next; + menu "^FF7F01Yes, please.^000000",AccWithdrawInput,"^FF7F01No, thanks.^000000",AccMenu; + AccWithDrawOverCharZeny: + mes "^0072FF[Bank Manager]^000000"; + mes "Sorry, but you can't withdraw ^0000FF" + @tWithdraw + "z^000000 because your Player can't carry more than ^0000FF" + @tMaxZeny + "z^000000."; + mes "Do you want to try again?"; + next; + menu "^FF7F01Yes, please.^000000",AccWithdrawInput,"^FF7F01No, thanks.^000000",AccMenu; + AccBalance: + mes "^0072FF[Bank Manager]^000000"; + mes "Account Status:"; + //shown in blue if the same or more, show in red if less than previous balance + if (vBankAccZeny >= vBankAccLastZeny) goto AccBalance2; + mes "Current Balance: ^FF0000" + vBankAccZeny +"z^000000."; + goto AccBalance3; + AccBalance2: + mes "Current Balance: ^0000FF" + vBankAccZeny +"z^000000."; + goto AccBalance3; + AccBalance3: + mes "Previous Balance: ^0000FF" + vBankAccLastZeny +"z^000000."; + mes "Interest Rate: ^0000FF" + @tInterestRate + "%^000000."; + mes "Interests Payed: ^0000FF" + vBankAccInterests + "z^000000."; + next; + goto AccMenu; + AccClose: + mes "^0072FF[Bank Manager]^000000"; + mes "If you close your ^FF7F01Bank Account^000000, it means you eliminate it."; + mes "Of course, you will get all your money back."; + mes "Are you sure you want to close your ^FF7F01Bank Account^000000?"; + next; + menu "^FF7F01I don't want it anymore.^000000",AccCloseConfirm,"^FF7F01No, I'll keep it.^000000",AccCloseKeep; + AccCloseConfirm: + set vBankAccActive,0; + set Zeny, Zeny + vBankAccZeny; + set vBankAccZeny,0; + set vBankAccLastZeny,0; + set vBankAccInterests,0; + mes "^0072FF[Bank Manager]^000000"; + mes "Thanks for using our services, we hope you come back to visit us."; + mes "Here's your money."; + next; + goto EndNPC; + AccCloseKeep: + mes "^0072FF[Bank Manager]^000000"; + mes "Good choice, thanks for staying with us."; + next; + goto AccMenu; + EndNPC: + set @random,rand(4); + mes "^0072FF[Bank Manager]^000000"; + if (@random == 0) mes "Have a nice day!"; + if (@random == 1) mes "See you soon!"; + if (@random == 2) mes "See you next time!"; + if (@random == 3) mes "Come back soon!"; + close; +} + +gonryun.gat,146,142,3 script Bank Manager 109,{ + set @tInterestRate, 2; //no decimals + set @tMaxAccZeny, 1000000000; //max zeny allowed in ^FF7F01Bank Account^000000 1,000,000,000=1 billion + set @tMaxZeny, 1000000000; //max zeny that a player can carry + set @tMinZeny, 100; //min zeny allowed or Bank Account is closed + set @tCreateZeny, 500; //zeny needed in order to create a Bank Account + set @tMinDeposit,100; //min zeny to deposit + set @tBeginningZeny, 100; //amount of zeny in Bank Account after creating + mes "^0072FF[Bank Manager]^000000"; + mes "Welcome to this office branch of Midgard's Bank."; + next; + if (vBankAccActive==1) goto AccMenu; + mes "^0072FF[Bank Manager]^000000"; + mes "You don't have a ^FF7F01Bank Account^000000 yet, you must buy one."; + mes "It will cost you ^0000FF" + @tCreateZeny + "z^000000 to create it."; + next; + menu "^FF7F01Create Account.^000000",CreateAcc,"^FF7F01Information.^000000",BankInfo,"^FF7F01No thanks.^000000",NoCreateAcc; + BankInfo: + mes "^0072FF[Bank Manager]^000000"; + mes "Here are some points that you need to know:"; + mes "1. To create a ^FF7F01Bank Account^000000 you have to pay ^0000FF" + @tCreateZeny + "z^000000."; + mes "2. You will be charged ^0000FF" + @tInterestRate + " percent^000000 everytime you Deposit."; + mes "3. You must always have no less than ^0000FF" + @tMinZeny + "z^000000 on your ^FF7F01Bank Account^000000."; + next; + mes "4. You can save up to ^0000FF" + @tMaxAccZeny + "z^000000 in your bank account."; + mes "5. You will be able to access your ^FF7F01Bank Account^000000 in any town with a Bank Office."; + mes "6. You will start by having ^0000FF" + @tBeginningZeny + "z^000000 in your bank account."; + close; + CreateAcc: + mes "^0072FF[Bank Manager]^000000"; + mes "First of all, you will have to have at least ^0000FF" + @tCreateZeny + "z^000000 with you."; + mes "Your account will start with ^0000FF" + @tBeginningZeny +"z^000000."; + mes "Are you sure you want to continue?"; + next; + menu "^FF7F01Sure.^000000",CreateAccCont,"^FF7F01Nah, it's ok.^000000",NoCreateAcc; + CreateAccCont: + if (@tCreateZeny > Zeny) goto CreateAccNoEnoughZeny; + set Zeny, Zeny - @tCreateZeny; + set vBankAccActive,1; + set vBankAccZeny, @tBeginningZeny; + set vBankAccLastZeny, @tBeginningZeny; + set vBankAccInterests,0; + mes "^0072FF[Bank Manager]^000000"; + mes "Congratulations, your ^FF7F01Bank Account^000000 is now created with ^0000FF" + vBankAccZeny + "z^000000."; + mes "You may now proceed to do any transactions."; + next; + goto AccMenu; + CreateAccNoEnoughZeny: + mes "^0072FF[Bank Manager]^000000"; + mes "Didn't I tell you to make sure you had enough zeny?"; + mes "You can't create it with just ^0000FF" + Zeny + "z^000000."; + mes "Come back when you get those ^0000FF" + @tCreateZeny + "z^000000..."; + next; + goto EndNPC; + NoCreateAcc: + mes "^0072FF[Bank Manager]^000000"; + mes "Come back when you change your mind!"; + next; + goto EndNPC; + AccMenu: + mes "^0072FF[Bank Manager]^000000"; + mes "Your current balance is ^0000FF" + vBankAccZeny +"z^000000."; + mes "What would you like to do now?"; + next; + menu "^FF7F01Deposit.^000000",AccDeposit,"^FF7F01Withdraw.^000000",AccWithdraw,"^FF7F01Bank Account Info.^000000",AccBalance,"^FF7F01Close Bank Account^000000",AccClose,"^FF7F01Cancel.^000000",EndNPC; + AccDeposit: + mes "^0072FF[Bank Manager]^000000"; + mes "It's always good to deposit every once in a while."; + mes "Be noticed that we charge a ^0000FF" + @tInterestRate + " percent ^000000 of interest rate in every deposit you make."; + mes "This means that to deposit ^0000FF100z^000000 you need to have pay us ^0000FF" + 100 * @tInterestRate / 100 + "z^000000."; + mes "How much are you willing to deposit?"; + next; + AccDepositInput: + input @tDeposit; + set @tDepositTax, @tDeposit * @tInterestRate / 100; + set @tDepositTotal, @tDeposit - @tDepositTax; + if (@tDeposit <= 0) goto AccDepositNoInput; + if (@tDeposit < @tMinDeposit) goto AccDepositNotEnoughInput; + if (@tDepositTotal > Zeny) goto AccDepositNotEnoughZeny; + set @tBankAccZenyTemp, vBankAccZeny + @tDepositTotal; + if (@tBankAccZenyTemp > @tMaxAccZeny) goto AccDepositOver; + if ((@tDeposit <= Zeny) && (@tBankAccZenyTemp <= @tMaxAccZeny)) goto AccDepositCont; + mes "^0072FF[Bank Manager]^000000"; + mes "Sorry, for some weird reason I couldn't deposit your money."; + next; + goto AccMenu; + AccDepositCont: + set Zeny, Zeny - @tDeposit; + set vBankAccLastZeny, vBankAccZeny; + set vBankAccZeny, @tBankAccZenyTemp; + set vBankAccInterests, vBankAccInterests + @tDepositTax; + mes "^0072FF[Bank Manager]^000000"; + mes "Transaction completed successfully."; + mes "^0000FF" + @tDeposit + "z^000000 substracted from your money (Taxes applied)."; + mes "^0000FF" + @tDepositTotal + "z^000000 successfully added to your ^FF7F01Bank Account^000000."; + next; + goto AccMenu; + AccDepositOver: + mes "^0072FF[Bank Manager]^000000"; + mes "There is a limit of ^0000FF" + @tMaxAccZeny + "z^000000 of how much zeny your ^FF7F01Bank Account^000000 can hold."; + mes "You can't deposit more than that, please try again."; + mes "Do you want to try again?"; + next; + menu "^FF7F01Yes, please.^000000",AccDepositInput,"^FF7F01No, thanks.^000000",AccMenu; + AccDepositNotEnoughInput: + mes "^0072FF[Bank Manager]^000000"; + mes "You need to put more money in order to make a deposit."; + mes "Do you want to try again?"; + next; + menu "^FF7F01Yes, please.^000000",AccDepositInput,"^FF7F01No, thanks.^000000",AccMenu; + AccDepositNoInput: + mes "^0072FF[Bank Manager]^000000"; + mes "You must enter a value higher than ^0000FF" + @tMinDeposit + "z^000000."; + mes "Do you want to try again?"; + next; + menu "^FF7F01Yes, please.^000000",AccDepositInput,"^FF7F01No, thanks.^000000",AccMenu; + AccDepositNotEnoughZeny: + mes "^0072FF[Bank Manager]^000000"; + mes "You don't have ^0000FF" + @tDepositTotal + "z^000000."; + mes "Remember that taxes are being applied."; + mes "Do you want to try again?"; + next; + menu "^FF7F01Yes, please.^000000",AccDepositInput,"^FF7F01No, thanks.^000000",AccMenu; + AccWithdraw: + mes "^0072FF[Bank Manager]^000000"; + mes "This is the only transaction I don't like... you figure out why..."; + mes "You can't withdraw leaving less than ^0000FF" + @tMinZeny +"z^000000 in your ^FF7F01Bank Account^000000."; + mes "Your current balance is ^0000FF" + vBankAccZeny + "z^000000."; + mes "How much are you going to widthdraw?"; + next; + AccWithdrawInput: + input @tWithdraw; + set @tZenyLeft, vBankAccZeny - @tWithdraw; + set @tZenyTemp, Zeny + @tWithdraw; + if (@tWithdraw == 0) goto AccWithdrawNoInput; + if (@tZenyLeft < @tMinZeny) goto AccWithdrawMinZeny; + if (@tZenyTemp > @tMaxZeny) goto AccWithDrawOverCharZeny; + set Zeny, Zeny + @tWithdraw; + set vBankAccLastZeny, vBankAccZeny; + set vBankAccZeny, vBankAccZeny - @tWithdraw; + mes "^0072FF[Bank Manager]^000000"; + mes "Transaction completed successfully."; + mes "Thank you for using our services."; + next; + goto AccMenu; + AccWithdrawNoInput: + mes "^0072FF[Bank Manager]^000000"; + mes "In order to withdraw from the bank, you must withdraw more than 0 zeny."; + mes "Do you want to try again?"; + next; + menu "^FF7F01Yes, please.^000000",AccWithdrawInput,"^FF7F01No, thanks.^000000",AccMenu; + AccWithdrawMinZeny: + mes "^0072FF[Bank Manager]^000000"; + mes "I'm sorry..."; + mes "You can't withdraw ^0000FF" + @tWithdraw + "z^000000 because your ^FF7F01Bank Account^000000 must have ^0000FF" + @tMinZeny + "z^000000 left or more at all times."; + mes "In order to take all your money from the bank you must select Close Account in the Account Menu."; + mes "Do you want to try again?"; + next; + menu "^FF7F01Yes, please.^000000",AccWithdrawInput,"^FF7F01No, thanks.^000000",AccMenu; + AccWithDrawOverCharZeny: + mes "^0072FF[Bank Manager]^000000"; + mes "Sorry, but you can't withdraw ^0000FF" + @tWithdraw + "z^000000 because your Player can't carry more than ^0000FF" + @tMaxZeny + "z^000000."; + mes "Do you want to try again?"; + next; + menu "^FF7F01Yes, please.^000000",AccWithdrawInput,"^FF7F01No, thanks.^000000",AccMenu; + AccBalance: + mes "^0072FF[Bank Manager]^000000"; + mes "Account Status:"; + //shown in blue if the same or more, show in red if less than previous balance + if (vBankAccZeny >= vBankAccLastZeny) goto AccBalance2; + mes "Current Balance: ^FF0000" + vBankAccZeny +"z^000000."; + goto AccBalance3; + AccBalance2: + mes "Current Balance: ^0000FF" + vBankAccZeny +"z^000000."; + goto AccBalance3; + AccBalance3: + mes "Previous Balance: ^0000FF" + vBankAccLastZeny +"z^000000."; + mes "Interest Rate: ^0000FF" + @tInterestRate + "%^000000."; + mes "Interests Payed: ^0000FF" + vBankAccInterests + "z^000000."; + next; + goto AccMenu; + AccClose: + mes "^0072FF[Bank Manager]^000000"; + mes "If you close your ^FF7F01Bank Account^000000, it means you eliminate it."; + mes "Of course, you will get all your money back."; + mes "Are you sure you want to close your ^FF7F01Bank Account^000000?"; + next; + menu "^FF7F01I don't want it anymore.^000000",AccCloseConfirm,"^FF7F01No, I'll keep it.^000000",AccCloseKeep; + AccCloseConfirm: + set vBankAccActive,0; + set Zeny, Zeny + vBankAccZeny; + set vBankAccZeny,0; + set vBankAccLastZeny,0; + set vBankAccInterests,0; + mes "^0072FF[Bank Manager]^000000"; + mes "Thanks for using our services, we hope you come back to visit us."; + mes "Here's your money."; + next; + goto EndNPC; + AccCloseKeep: + mes "^0072FF[Bank Manager]^000000"; + mes "Good choice, thanks for staying with us."; + next; + goto AccMenu; + EndNPC: + set @random,rand(4); + mes "^0072FF[Bank Manager]^000000"; + if (@random == 0) mes "Have a nice day!"; + if (@random == 1) mes "See you soon!"; + if (@random == 2) mes "See you next time!"; + if (@random == 3) mes "Come back soon!"; + close; +} + +um_in.gat,154,125,4 script Bank Manager 109,{ + set @tInterestRate, 2; //no decimals + set @tMaxAccZeny, 1000000000; //max zeny allowed in ^FF7F01Bank Account^000000 1,000,000,000=1 billion + set @tMaxZeny, 1000000000; //max zeny that a player can carry + set @tMinZeny, 100; //min zeny allowed or Bank Account is closed + set @tCreateZeny, 500; //zeny needed in order to create a Bank Account + set @tMinDeposit,100; //min zeny to deposit + set @tBeginningZeny, 100; //amount of zeny in Bank Account after creating + mes "^0072FF[Bank Manager]^000000"; + mes "Welcome to this office branch of Midgard's Bank."; + next; + if (vBankAccActive==1) goto AccMenu; + mes "^0072FF[Bank Manager]^000000"; + mes "You don't have a ^FF7F01Bank Account^000000 yet, you must buy one."; + mes "It will cost you ^0000FF" + @tCreateZeny + "z^000000 to create it."; + next; + menu "^FF7F01Create Account.^000000",CreateAcc,"^FF7F01Information.^000000",BankInfo,"^FF7F01No thanks.^000000",NoCreateAcc; + BankInfo: + mes "^0072FF[Bank Manager]^000000"; + mes "Here are some points that you need to know:"; + mes "1. To create a ^FF7F01Bank Account^000000 you have to pay ^0000FF" + @tCreateZeny + "z^000000."; + mes "2. You will be charged ^0000FF" + @tInterestRate + " percent^000000 everytime you Deposit."; + mes "3. You must always have no less than ^0000FF" + @tMinZeny + "z^000000 on your ^FF7F01Bank Account^000000."; + next; + mes "4. You can save up to ^0000FF" + @tMaxAccZeny + "z^000000 in your bank account."; + mes "5. You will be able to access your ^FF7F01Bank Account^000000 in any town with a Bank Office."; + mes "6. You will start by having ^0000FF" + @tBeginningZeny + "z^000000 in your bank account."; + close; + CreateAcc: + mes "^0072FF[Bank Manager]^000000"; + mes "First of all, you will have to have at least ^0000FF" + @tCreateZeny + "z^000000 with you."; + mes "Your account will start with ^0000FF" + @tBeginningZeny +"z^000000."; + mes "Are you sure you want to continue?"; + next; + menu "^FF7F01Sure.^000000",CreateAccCont,"^FF7F01Nah, it's ok.^000000",NoCreateAcc; + CreateAccCont: + if (@tCreateZeny > Zeny) goto CreateAccNoEnoughZeny; + set Zeny, Zeny - @tCreateZeny; + set vBankAccActive,1; + set vBankAccZeny, @tBeginningZeny; + set vBankAccLastZeny, @tBeginningZeny; + set vBankAccInterests,0; + mes "^0072FF[Bank Manager]^000000"; + mes "Congratulations, your ^FF7F01Bank Account^000000 is now created with ^0000FF" + vBankAccZeny + "z^000000."; + mes "You may now proceed to do any transactions."; + next; + goto AccMenu; + CreateAccNoEnoughZeny: + mes "^0072FF[Bank Manager]^000000"; + mes "Didn't I tell you to make sure you had enough zeny?"; + mes "You can't create it with just ^0000FF" + Zeny + "z^000000."; + mes "Come back when you get those ^0000FF" + @tCreateZeny + "z^000000..."; + next; + goto EndNPC; + NoCreateAcc: + mes "^0072FF[Bank Manager]^000000"; + mes "Come back when you change your mind!"; + next; + goto EndNPC; + AccMenu: + mes "^0072FF[Bank Manager]^000000"; + mes "Your current balance is ^0000FF" + vBankAccZeny +"z^000000."; + mes "What would you like to do now?"; + next; + menu "^FF7F01Deposit.^000000",AccDeposit,"^FF7F01Withdraw.^000000",AccWithdraw,"^FF7F01Bank Account Info.^000000",AccBalance,"^FF7F01Close Bank Account^000000",AccClose,"^FF7F01Cancel.^000000",EndNPC; + AccDeposit: + mes "^0072FF[Bank Manager]^000000"; + mes "It's always good to deposit every once in a while."; + mes "Be noticed that we charge a ^0000FF" + @tInterestRate + " percent ^000000 of interest rate in every deposit you make."; + mes "This means that to deposit ^0000FF100z^000000 you need to have pay us ^0000FF" + 100 * @tInterestRate / 100 + "z^000000."; + mes "How much are you willing to deposit?"; + next; + AccDepositInput: + input @tDeposit; + set @tDepositTax, @tDeposit * @tInterestRate / 100; + set @tDepositTotal, @tDeposit - @tDepositTax; + if (@tDeposit <= 0) goto AccDepositNoInput; + if (@tDeposit < @tMinDeposit) goto AccDepositNotEnoughInput; + if (@tDepositTotal > Zeny) goto AccDepositNotEnoughZeny; + set @tBankAccZenyTemp, vBankAccZeny + @tDepositTotal; + if (@tBankAccZenyTemp > @tMaxAccZeny) goto AccDepositOver; + if ((@tDeposit <= Zeny) && (@tBankAccZenyTemp <= @tMaxAccZeny)) goto AccDepositCont; + mes "^0072FF[Bank Manager]^000000"; + mes "Sorry, for some weird reason I couldn't deposit your money."; + next; + goto AccMenu; + AccDepositCont: + set Zeny, Zeny - @tDeposit; + set vBankAccLastZeny, vBankAccZeny; + set vBankAccZeny, @tBankAccZenyTemp; + set vBankAccInterests, vBankAccInterests + @tDepositTax; + mes "^0072FF[Bank Manager]^000000"; + mes "Transaction completed successfully."; + mes "^0000FF" + @tDeposit + "z^000000 substracted from your money (Taxes applied)."; + mes "^0000FF" + @tDepositTotal + "z^000000 successfully added to your ^FF7F01Bank Account^000000."; + next; + goto AccMenu; + AccDepositOver: + mes "^0072FF[Bank Manager]^000000"; + mes "There is a limit of ^0000FF" + @tMaxAccZeny + "z^000000 of how much zeny your ^FF7F01Bank Account^000000 can hold."; + mes "You can't deposit more than that, please try again."; + mes "Do you want to try again?"; + next; + menu "^FF7F01Yes, please.^000000",AccDepositInput,"^FF7F01No, thanks.^000000",AccMenu; + AccDepositNotEnoughInput: + mes "^0072FF[Bank Manager]^000000"; + mes "You need to put more money in order to make a deposit."; + mes "Do you want to try again?"; + next; + menu "^FF7F01Yes, please.^000000",AccDepositInput,"^FF7F01No, thanks.^000000",AccMenu; + AccDepositNoInput: + mes "^0072FF[Bank Manager]^000000"; + mes "You must enter a value higher than ^0000FF" + @tMinDeposit + "z^000000."; + mes "Do you want to try again?"; + next; + menu "^FF7F01Yes, please.^000000",AccDepositInput,"^FF7F01No, thanks.^000000",AccMenu; + AccDepositNotEnoughZeny: + mes "^0072FF[Bank Manager]^000000"; + mes "You don't have ^0000FF" + @tDepositTotal + "z^000000."; + mes "Remember that taxes are being applied."; + mes "Do you want to try again?"; + next; + menu "^FF7F01Yes, please.^000000",AccDepositInput,"^FF7F01No, thanks.^000000",AccMenu; + AccWithdraw: + mes "^0072FF[Bank Manager]^000000"; + mes "This is the only transaction I don't like... you figure out why..."; + mes "You can't withdraw leaving less than ^0000FF" + @tMinZeny +"z^000000 in your ^FF7F01Bank Account^000000."; + mes "Your current balance is ^0000FF" + vBankAccZeny + "z^000000."; + mes "How much are you going to widthdraw?"; + next; + AccWithdrawInput: + input @tWithdraw; + set @tZenyLeft, vBankAccZeny - @tWithdraw; + set @tZenyTemp, Zeny + @tWithdraw; + if (@tWithdraw == 0) goto AccWithdrawNoInput; + if (@tZenyLeft < @tMinZeny) goto AccWithdrawMinZeny; + if (@tZenyTemp > @tMaxZeny) goto AccWithDrawOverCharZeny; + set Zeny, Zeny + @tWithdraw; + set vBankAccLastZeny, vBankAccZeny; + set vBankAccZeny, vBankAccZeny - @tWithdraw; + mes "^0072FF[Bank Manager]^000000"; + mes "Transaction completed successfully."; + mes "Thank you for using our services."; + next; + goto AccMenu; + AccWithdrawNoInput: + mes "^0072FF[Bank Manager]^000000"; + mes "In order to withdraw from the bank, you must withdraw more than 0 zeny."; + mes "Do you want to try again?"; + next; + menu "^FF7F01Yes, please.^000000",AccWithdrawInput,"^FF7F01No, thanks.^000000",AccMenu; + AccWithdrawMinZeny: + mes "^0072FF[Bank Manager]^000000"; + mes "I'm sorry..."; + mes "You can't withdraw ^0000FF" + @tWithdraw + "z^000000 because your ^FF7F01Bank Account^000000 must have ^0000FF" + @tMinZeny + "z^000000 left or more at all times."; + mes "In order to take all your money from the bank you must select Close Account in the Account Menu."; + mes "Do you want to try again?"; + next; + menu "^FF7F01Yes, please.^000000",AccWithdrawInput,"^FF7F01No, thanks.^000000",AccMenu; + AccWithDrawOverCharZeny: + mes "^0072FF[Bank Manager]^000000"; + mes "Sorry, but you can't withdraw ^0000FF" + @tWithdraw + "z^000000 because your Player can't carry more than ^0000FF" + @tMaxZeny + "z^000000."; + mes "Do you want to try again?"; + next; + menu "^FF7F01Yes, please.^000000",AccWithdrawInput,"^FF7F01No, thanks.^000000",AccMenu; + AccBalance: + mes "^0072FF[Bank Manager]^000000"; + mes "Account Status:"; + //shown in blue if the same or more, show in red if less than previous balance + if (vBankAccZeny >= vBankAccLastZeny) goto AccBalance2; + mes "Current Balance: ^FF0000" + vBankAccZeny +"z^000000."; + goto AccBalance3; + AccBalance2: + mes "Current Balance: ^0000FF" + vBankAccZeny +"z^000000."; + goto AccBalance3; + AccBalance3: + mes "Previous Balance: ^0000FF" + vBankAccLastZeny +"z^000000."; + mes "Interest Rate: ^0000FF" + @tInterestRate + "%^000000."; + mes "Interests Payed: ^0000FF" + vBankAccInterests + "z^000000."; + next; + goto AccMenu; + AccClose: + mes "^0072FF[Bank Manager]^000000"; + mes "If you close your ^FF7F01Bank Account^000000, it means you eliminate it."; + mes "Of course, you will get all your money back."; + mes "Are you sure you want to close your ^FF7F01Bank Account^000000?"; + next; + menu "^FF7F01I don't want it anymore.^000000",AccCloseConfirm,"^FF7F01No, I'll keep it.^000000",AccCloseKeep; + AccCloseConfirm: + set vBankAccActive,0; + set Zeny, Zeny + vBankAccZeny; + set vBankAccZeny,0; + set vBankAccLastZeny,0; + set vBankAccInterests,0; + mes "^0072FF[Bank Manager]^000000"; + mes "Thanks for using our services, we hope you come back to visit us."; + mes "Here's your money."; + next; + goto EndNPC; + AccCloseKeep: + mes "^0072FF[Bank Manager]^000000"; + mes "Good choice, thanks for staying with us."; + next; + goto AccMenu; + EndNPC: + set @random,rand(4); + mes "^0072FF[Bank Manager]^000000"; + if (@random == 0) mes "Have a nice day!"; + if (@random == 1) mes "See you soon!"; + if (@random == 2) mes "See you next time!"; + if (@random == 3) mes "Come back soon!"; + close; }
\ No newline at end of file diff --git a/npc/other/momotaro.txt b/npc/other/momotaro.txt index 4ca7aaad2..745ad5540 100644 --- a/npc/other/momotaro.txt +++ b/npc/other/momotaro.txt @@ -1,443 +1,443 @@ -//=====================================================================
-//MOMOTARO event (translated thanks to Shinomori)
-//=====================================================================
-amatsu.gat,223,235,4 script Publisher 763,{
- if (event_momo > 4) goto Lfin;
- if ((event_momo >= 1) && (event_momo <= 4)) goto Lget;
- mes "[Publisher]";
- mes "Hello.";
- mes "I represent ^009CFFTsurukame Publishing Inc.^000000 and handle the legends that are told in the village for generations.";
- mes "A popular legend among men and women of all ages is ^009CFF<Momotaro>^000000......";
- next;
- mes "[Publisher]";
- mes "One Million copies were sold!";
- mes "To celebrate the anniversary, the ^3163FFMomotaro Event Hall^000000 was established.";
- next;
- mes "[Publisher]";
- mes "You practical become the protagonist of the Momotaro Story and fight against a small demon.";
- mes "There are also presents!";
- next;
- menu "Who is Momotaro?",-,"I really wanna do that!",L1,"I'm busy right now......",L2;
- mes "[Publisher]";
- mes "What? You do not know Momotaro? Oh my, what an insensitive person......";
- mes "Well then, I will tell you......";
- next;
- mes "[Publisher]";
- mes "Once upon a time, there was an old couple......";
- mes "The couple had a very good relation, but they had no children...";
- next;
- mes "[Publisher]";
- mes "Someday, the grandmother did their laundry at the river, a big peach flowed by. ";
- mes "The Grandmother picked up the peach and returned home, where the grandfather tried to divide the fruit...... ";
- mes "But from the middle of the peach a baby appeared.";
- next;
- mes "[Publisher]";
- mes "Grandfather and Grandmother were surprised very much, but decided to raise the baby as their own child.";
- next;
- mes "[Publisher]";
- mes "The Child grow up rapidly and became a strong young boy several days later.";
- next;
- mes "[Publisher]";
- mes "The name of the child was ^3163FF<Momotaro>^000000.";
- mes "In those days a small demon appeard and tormented the village people so Momotaro decided to go on a travel to exterminate the demon......";
- next;
- mes "[Publisher]";
- mes "Along the way Momotaro met a ^3163FFmonkey^000000, a ^3163FFpheasant^000000 and a ^3163FFdog^000000m which followed him as companions.";
- mes " Finally they defeated the demon and lived with the grandfather and the grandmother in happiness...... ";
- mes "- the end -";
- next;
- mes "[Publisher]";
- mes "How was it?";
- mes "It was of interest One Million times!";
- close;
-L1:
- mes "[Publisher]";
- mes "Oh! You are a good and powerfull person! To me you seem to be vigorous. ";
- mes "Well then, this application form has to be filled......";
- next;
- mes "[Publisher]";
- mes "......";
- mes "......Hmm hmm......";
- mes "......Well! Everything ok!";
- mes "We can start at once. Please enjoy the ^3163FFMomotaro Event Hall^000000.";
- next;
-//modification
-// warp "ama_test",52,35;
- warp "ama_fild01",330,130;
-//end modification
- break;
-L2:
- mes "[Publisher]";
- mes "There are also premium presents, you know....... (wink)";
- close;
-Lget:
- mes "[Publisher]";
- mes "How was it? Did you enjoy the event?";
- mes "I hope the arrangements at the event hall allowed you to spend an enjoyable time there.";
- next;
- if (event_momo == 1) getitem 627,1; //sweet milk
- if (event_momo == 2) getitem 629,1; //singing flower
- if (event_momo == 3) getitem 625,1; //rusty iron
-//Am Mut successful finish unknown
- if (event_momo == 4) getitem 627,1; //sweet milk
- if (event_momo == 4) getitem 629,1; //singing flower
- if (event_momo == 4) getitem 625,1; //rusty iron
- set event_momo,10;
- mes "[Publisher]";
- mes "Well then, I will give you a small present which I have prepared.";
- mes "May the legend be widely loved also in the future......";
- close;
-Lfin:
- mes "[Publisher]";
- mes "We have a nice weather today, don't we...... It is a perfect day to dry the futon.";
- close;
-}
-//=====================================================================
-ama_test.gat,52,44,4 script Waiting Room Staff 109,{
- mes "[Satoshi]";
- mes "Welcome to the Momotaro Event Hall";
- next;
- mes "[Satoshi]";
- mes "I'm in charge of the waiting room of the Momotaro Event Hall. My name is Satoshi.";
- next;
- mes "[Satoshi]";
- mes "Originally this was the work of the publisher, but...... she was not sufficient for that job and got transfered suddenly......";
- mes "But this was good! Because this way we could make the attraction even more challenging for the visitors.";
- next;
- mes "[Satoshi]";
- mes "......hehehe, no no, it was just a joke...... (sweat)";
- next;
- mes "[Satoshi]";
- mes "Well, I will give you an explanation about the Event Hall.";
- next;
- mes "[Satoshi]";
- mes "Did you ask the Publisher outside about the Momotaro Story?";
- next;
- menu "Yes",L1,"No",-;
- mes "[Satoshi]";
- mes "What the heck? You come here without knowing the story?";
- mes "......";
- mes "You are by no means a fan of Momotaro.";
- next;
- mes "[Satoshi]";
- mes "The Story is told by the publisher outside. Well then...... Goodby.";
- next;
- warp "amatsu.gat",223,230;
- break;
-L1:
- mes "[Satoshi]";
- mes "Hmm......";
- mes "The story of Momotaro is the best work of this Publisher. Maybe it is even a supreme masterpiece?";
- mes "Hahaha!!!";
- next;
- mes "[Satoshi]";
- mes "...... So, what's next...";
- next;
- mes "[Satoshi]";
- mes "The rule of the Event Hall are simple. Just go in, like the brave Momotaro! And if the small demon is defeated, everything will be good.";
- mes "Well, be brave!";
- next;
- mes "[Satoshi]";
- mes "Furthermore, there are 3 important points.";
- next;
- mes "[Satoshi]";
- mes "First:";
- mes "When the Event Hall is cleared it cannot be entered again.";
- mes "Please pay attention to this point.";
- next;
- mes "[Satoshi]";
- mes "Second:";
- mes "Please do not go accompanied by a pet inside the Event Hall. If you have a pet with you, please change it back to an egg before entering.";
- next;
- mes "[Satoshi]";
- mes "And the last important point:";
- mes "There is a time restriction of 6 minutes for people entering the Event Hall.";
- next;
- mes "[Satoshi]";
- mes "Well then, Please enter the Waiting Room Chat and wait for your turn. I wish you a good fight.";
- close;
-OnInit:
- waitingroom "Event Hall Waiting Room",1,"Waiting Room Staff::OnMax";
-//modification
-//do clear everything in case of somebody got stuck in the hall
- areawarp "ama_test.gat",30,78,68,120,"amatsu.gat",223,230;
- disablenpc "Manager";
- enablenpc "Grandfather";
- enablenpc "Grandmother";
- killmonsterall "ama_test.gat";
- stopnpctimer "roomtimer";
-//end modification
- break;
-OnMax:
-//modification
-// doevent "roomt";
- initnpctimer "roomtimer";
-//end modification
- warpwaitingpc "ama_test.gat",50,83;
- disablenpc "Waiting Room Staff";
- disablenpc "Manager";
- enablenpc "Grandfather";
- enablenpc "Grandmother";
- break;
-}
-
-ama_test.gat,49,95,4 script Grandfather 766,{
-//modification
- mes "[Grandfather]";
- mes "Zzzzzz......";
-//end modification
- close;
-}
-
-ama_test.gat,51,95,4 script Grandmother 761,{
- mes "[Grandmother]";
- mes "Oh....!?";
- next;
- mes "[Grandmother]";
- mes "Grandfather, do you know where I put my money?";
- next;
- mes "[Grandfather]";
- mes "Grandmother...... The village headman said, that the small demons recently stole money from people right in the middle of the village, causing big tumult...";
- next;
- mes "[Grandmother]";
- mes "Iiiiiii......!";
- next;
- mes "[Grandfather]";
- mes "This is the recent talk in the village......";
- next;
- mes "[Grandfather]";
- mes "Oh, there is Momotaro......";
- next;
- mes "[Grandfather]";
- mes "As you probably know, there are only cowards here with no power to fight the small demons....";
- mes "So I would like to ask you a favour, Momotaro.";
- next;
- mes "[Grandmother]";
- mes "Momotaro......";
- mes "Your Grandmother would like to give you ^3355ffthe tastiest red portion on this world^000000...... but I cannot...... ";
- next;
- mes "[Grandmother]";
- mes "I'm so sorry...... Momotaro......";
- next;
- mes "[Grandmother & Grandfather]";
- mes "Please, Momotaro, help us......";
-//modification
- addtimer 5000, "Grandmother::OnTimer5000";
- close;
-OnTimer5000:
-//end modification
- disablenpc "Grandfather";
- disablenpc "Grandmother";
- set @mobdie,0;
- monster "ama_test.gat",47,101,"Small Demon",1110,1,"mobcount";
- monster "ama_test.gat",51,101,"Small Demon",1110,1,"mobcount";
- monster "ama_test.gat",55,101,"Small Demon",1110,1,"mobcount";
- monster "ama_test.gat",55,97,"Small Demon",1110,1,"mobcount";
- monster "ama_test.gat",55,93,"Small Demon",1110,1,"mobcount";
- monster "ama_test.gat",53,91,"Small Demon",1110,1,"mobcount";
- monster "ama_test.gat",49,91,"Small Demon",1110,1,"mobcount";
- monster "ama_test.gat",45,96,"Small Demon",1110,1,"mobcount";
- monster "ama_test.gat",45,99,"Small Demon",1110,1,"mobcount";
- end;
-}
-
-ama_test.gat,50,100,4 script Manager 762,{
-//modification
- if (event_momo >= 4) goto LSecondFin;
-//end modification
- mes "[Manager]";
- mes "Hoho, you did it...... I'm the manager here...... You are not an ordinary person, right? You did very well.";
- next;
- mes "[Manager]";
- mes "The Momotaro from the legend appears in this world!";
- mes "Hohohohoho!";
- next;
- menu "Is there some extra?",L1,"Thanks for nothing......",L2;
-L1:
- mes "[Manager]";
- mes "Hohoho......";
- mes "This is maybe not really recomending......";
- mes "I think in your current condition the small demons can twirl you lightly around their fingers.";
- mes "......Hohoho......";
- next;
- mes "[Manager]";
- mes "......";
- mes "Just a joke.";
- next;
- mes "[Manager]";
- mes "Well then, you enjoyed the Momotaro Event Hall?";
- mes "Talk to the staff member, that you have met first, about our premium presents. He will give you some.";
- next;
- mes "[Manager]";
- mes "Whatever you encounter, never loose that strong spirit!";
- next;
- set event_momo,1;
-//modification
-// deltimer "roomt";
-//end modification
- disablenpc "Manager";
- enablenpc "Waiting Room Staff";
- warp "amatsu.gat",223,230;
- break;
-L2:
- mes "[Manager]";
- mes "!!!!!";
- mes "......Ho...Hohoho......";
- mes "You are an amusing fellow......";
- mes "Well...... One little suggestion from me to you.";
- next;
- mes "[Manager]";
- mes "Normally I would just kick you out, but...... I would like to see your true capabilities... Hohoho.";
- mes "As if I would look at my own young self. Hohohoho.";
- next;
- mes "[Manager]";
- mes "What do you think? I will give this one nonrecurring chance. It is the challenge of ^3355ffSecond Grad^000000 which is not officially available......";
- mes "But I warn you, this one will be difficult.";
- next;
- menu "Na, it is enough",L2_1,"I take the challenge",L2_2;
-L2_1:
- mes "[Manager]";
- mes "Hoho......";
- mes "You got tired from the last fight?";
- mes "Well, ok...... Did you enjoy the Momotaro Event Hall? Talk to the staff member, that you have met first, about our premium presents. She will give you some.";
- next;
- mes "[Manager]";
- mes "Whatever you encounter, never loose that strong spirit!";
- next;
- set event_momo,2;
-//modification
- goto LWarpOut;
-// break;
-//end modification
-L2_2:
- mes "[Manager]";
- mes "Hohoho, You like it more and more, right? This will be the last decisive battle. Show your power without regrets!";
-//modification
- addtimer 5000, "Manager::OnTimer5000";
-//end modification
- close;
-OnTimer5000:
- monster "ama_test.gat",35,103,"Demon",1301,1,"mobcount2";
- monster "ama_test.gat",56,111,"Demon",1301,1,"mobcount2";
- monster "ama_test.gat",40,91,"Demon",1301,1,"mobcount2";
- disablenpc "Manager";
- set event_momo,3;
- end;
-//modification
-LSecondFin:
- mes "[Manager]";
- mes "You are really strong... Wasn't it thrilling? Momotaro Event Hall can be really enjoyable, right?";
- mes "Ok now, talk to the staff member, that you have met first, about our premium presents. She will give you some.";
- next;
- set event_momo,4;
-LWarpOut:
-//end modification
- mes "[Manager]";
- mes "Whatever you encounter, never loose that strong spirit!";
- next;
- warp "amatsu.gat",223,230;
- disablenpc "Manager";
- enablenpc "Waiting Room Staff";
- donpcevent "Waiting Room Staff::OnInit";
- break;
-Onstart:
- mes "[Manager]";
- mes "Hohoho......";
- close;
-}
-//=======================================MobCount===============================-
-ama_test.gat,0,1,0 script mobcount -1,{
- if (@mobdie >= 8) goto Lfin;
- set @mobdie,@mobdie+1;
- set @mobrand,rand(4);
- if (@mobrand == 1) goto Lrand2;
- if (@mobrand == 2) goto Lrand3;
- if (@mobrand == 3) goto Lrand4;
-Lrand1:
- areaannounce "ama_test.gat",30,78,68,120,"Small Demon: I havn't done anything!",8;break;
-Lrand2:
- areaannounce "ama_test.gat",30,78,68,120,"Small Demon: Excuse me, Excuse me",8;break;
-Lrand3:
- areaannounce "ama_test.gat",30,78,68,120,"Small Demon: Ahhh......",8;break;
-Lrand4:
- areaannounce "ama_test.gat",30,78,68,120,"Small Demon: I've been hit on surprise...",8;break;
-Lfin:
- areaannounce "ama_test.gat",30,78,68,120,"Small Demon: Uhhaaa......",8;
- addtimer 5000, "mobcount2::OnTimer5000";
-//modification
- stopnpctimer "roomtimer";
- end;
-// enablenpc "Manager";
-// doevent "Manager::Onstart";
-// end;
-//end modification
-}
-//=======================================MobCount2==============================-
-ama_test.gat,50,101,0 script mobcount2 -1,{
- if (@mobdie2 == 2) goto Lfin;
- set @mobdie2,@mobdie2+1;
- areaannounce "ama_test.gat",30,78,68,120,"Am Mut: Uhaaa...",8;break;
-Lfin:
- set event_momo,4;
-//modification
- addtimer 5000, "mobcount2::OnTimer5000";
- end;
-OnTimer5000:
-//end modification
- enablenpc "Manager";
- doevent "Manager::Onstart";
- end;
-}
-//=======================================TIMER==================================-
-
-//modification
-//dead code
-//ama_test.gat,50,102,0 script roomt -1,{
-//
-// deltimer "roomt";
-// mapannounce "ama_test.gat","Time limit is 6 Minutes from now.",8;
-// addtimer 180000,"roomt::On180000";
-// end;
-//
-//OnTestTime:
-// mapannounce "ama_test.gat","Time left: "+temp_time+"sec ",8;
-// break;
-//
-//On180000:
-// deltimer "roomt";
-// mapannounce "ama_test.gat","3 Minutes left.",8;
-// addtimer 120000,"roomt::On300000";
-// break;
-//On300000:
-// deltimer "roomt";
-// mapannounce "ama_test.gat","One Minute left.",8;
-// addtimer 60000,"roomt::On360000";
-// break;
-//On360000:
-// mapannounce "ama_test.gat","Hohoho - Time limit is exceeded.",8;
-// disablenpc "Manager";
-// enablenpc "Waiting Room Staff";
-// areawarp "ama_test.gat",30,78,68,120,"amatsu.gat",223,230;
-// break;
-//}
-
-ama_test.gat,50,102,0 script roomtimer -1,{
-
-OnTimer1000:
- mapannounce "ama_test.gat","Time limit is 6 Minutes from now.",8;
- end;
-OnTimer180000:
- mapannounce "ama_test.gat","3 Minutes left.",8;
- end;
-OnTimer300000:
- mapannounce "ama_test.gat","One Minute left.",8;
- end;
-OnTimer360000:
- stopnpctimer "roomtimer";
- mapannounce "ama_test.gat","Hohoho - Time limit is exceeded.",8;
- areawarp "ama_test.gat",30,78,68,120,"amatsu.gat",223,230;
- disablenpc "Manager";
- enablenpc "Waiting Room Staff";
- donpcevent "Waiting Room Staff::OnInit";
- end;
-}
+//===================================================================== +//MOMOTARO event (translated thanks to Shinomori) +//===================================================================== +amatsu.gat,223,235,4 script Publisher 763,{ + if (event_momo > 4) goto Lfin; + if ((event_momo >= 1) && (event_momo <= 4)) goto Lget; + mes "[Publisher]"; + mes "Hello."; + mes "I represent ^009CFFTsurukame Publishing Inc.^000000 and handle the legends that are told in the village for generations."; + mes "A popular legend among men and women of all ages is ^009CFF<Momotaro>^000000......"; + next; + mes "[Publisher]"; + mes "One Million copies were sold!"; + mes "To celebrate the anniversary, the ^3163FFMomotaro Event Hall^000000 was established."; + next; + mes "[Publisher]"; + mes "You practical become the protagonist of the Momotaro Story and fight against a small demon."; + mes "There are also presents!"; + next; + menu "Who is Momotaro?",-,"I really wanna do that!",L1,"I'm busy right now......",L2; + mes "[Publisher]"; + mes "What? You do not know Momotaro? Oh my, what an insensitive person......"; + mes "Well then, I will tell you......"; + next; + mes "[Publisher]"; + mes "Once upon a time, there was an old couple......"; + mes "The couple had a very good relation, but they had no children..."; + next; + mes "[Publisher]"; + mes "Someday, the grandmother did their laundry at the river, a big peach flowed by. "; + mes "The Grandmother picked up the peach and returned home, where the grandfather tried to divide the fruit...... "; + mes "But from the middle of the peach a baby appeared."; + next; + mes "[Publisher]"; + mes "Grandfather and Grandmother were surprised very much, but decided to raise the baby as their own child."; + next; + mes "[Publisher]"; + mes "The Child grow up rapidly and became a strong young boy several days later."; + next; + mes "[Publisher]"; + mes "The name of the child was ^3163FF<Momotaro>^000000."; + mes "In those days a small demon appeard and tormented the village people so Momotaro decided to go on a travel to exterminate the demon......"; + next; + mes "[Publisher]"; + mes "Along the way Momotaro met a ^3163FFmonkey^000000, a ^3163FFpheasant^000000 and a ^3163FFdog^000000m which followed him as companions."; + mes " Finally they defeated the demon and lived with the grandfather and the grandmother in happiness...... "; + mes "- the end -"; + next; + mes "[Publisher]"; + mes "How was it?"; + mes "It was of interest One Million times!"; + close; +L1: + mes "[Publisher]"; + mes "Oh! You are a good and powerfull person! To me you seem to be vigorous. "; + mes "Well then, this application form has to be filled......"; + next; + mes "[Publisher]"; + mes "......"; + mes "......Hmm hmm......"; + mes "......Well! Everything ok!"; + mes "We can start at once. Please enjoy the ^3163FFMomotaro Event Hall^000000."; + next; +//modification +// warp "ama_test",52,35; + warp "ama_fild01",330,130; +//end modification + break; +L2: + mes "[Publisher]"; + mes "There are also premium presents, you know....... (wink)"; + close; +Lget: + mes "[Publisher]"; + mes "How was it? Did you enjoy the event?"; + mes "I hope the arrangements at the event hall allowed you to spend an enjoyable time there."; + next; + if (event_momo == 1) getitem 627,1; //sweet milk + if (event_momo == 2) getitem 629,1; //singing flower + if (event_momo == 3) getitem 625,1; //rusty iron +//Am Mut successful finish unknown + if (event_momo == 4) getitem 627,1; //sweet milk + if (event_momo == 4) getitem 629,1; //singing flower + if (event_momo == 4) getitem 625,1; //rusty iron + set event_momo,10; + mes "[Publisher]"; + mes "Well then, I will give you a small present which I have prepared."; + mes "May the legend be widely loved also in the future......"; + close; +Lfin: + mes "[Publisher]"; + mes "We have a nice weather today, don't we...... It is a perfect day to dry the futon."; + close; +} +//===================================================================== +ama_test.gat,52,44,4 script Waiting Room Staff 109,{ + mes "[Satoshi]"; + mes "Welcome to the Momotaro Event Hall"; + next; + mes "[Satoshi]"; + mes "I'm in charge of the waiting room of the Momotaro Event Hall. My name is Satoshi."; + next; + mes "[Satoshi]"; + mes "Originally this was the work of the publisher, but...... she was not sufficient for that job and got transfered suddenly......"; + mes "But this was good! Because this way we could make the attraction even more challenging for the visitors."; + next; + mes "[Satoshi]"; + mes "......hehehe, no no, it was just a joke...... (sweat)"; + next; + mes "[Satoshi]"; + mes "Well, I will give you an explanation about the Event Hall."; + next; + mes "[Satoshi]"; + mes "Did you ask the Publisher outside about the Momotaro Story?"; + next; + menu "Yes",L1,"No",-; + mes "[Satoshi]"; + mes "What the heck? You come here without knowing the story?"; + mes "......"; + mes "You are by no means a fan of Momotaro."; + next; + mes "[Satoshi]"; + mes "The Story is told by the publisher outside. Well then...... Goodby."; + next; + warp "amatsu.gat",223,230; + break; +L1: + mes "[Satoshi]"; + mes "Hmm......"; + mes "The story of Momotaro is the best work of this Publisher. Maybe it is even a supreme masterpiece?"; + mes "Hahaha!!!"; + next; + mes "[Satoshi]"; + mes "...... So, what's next..."; + next; + mes "[Satoshi]"; + mes "The rule of the Event Hall are simple. Just go in, like the brave Momotaro! And if the small demon is defeated, everything will be good."; + mes "Well, be brave!"; + next; + mes "[Satoshi]"; + mes "Furthermore, there are 3 important points."; + next; + mes "[Satoshi]"; + mes "First:"; + mes "When the Event Hall is cleared it cannot be entered again."; + mes "Please pay attention to this point."; + next; + mes "[Satoshi]"; + mes "Second:"; + mes "Please do not go accompanied by a pet inside the Event Hall. If you have a pet with you, please change it back to an egg before entering."; + next; + mes "[Satoshi]"; + mes "And the last important point:"; + mes "There is a time restriction of 6 minutes for people entering the Event Hall."; + next; + mes "[Satoshi]"; + mes "Well then, Please enter the Waiting Room Chat and wait for your turn. I wish you a good fight."; + close; +OnInit: + waitingroom "Event Hall Waiting Room",1,"Waiting Room Staff::OnMax"; +//modification +//do clear everything in case of somebody got stuck in the hall + areawarp "ama_test.gat",30,78,68,120,"amatsu.gat",223,230; + disablenpc "Manager"; + enablenpc "Grandfather"; + enablenpc "Grandmother"; + killmonsterall "ama_test.gat"; + stopnpctimer "roomtimer"; +//end modification + break; +OnMax: +//modification +// doevent "roomt"; + initnpctimer "roomtimer"; +//end modification + warpwaitingpc "ama_test.gat",50,83; + disablenpc "Waiting Room Staff"; + disablenpc "Manager"; + enablenpc "Grandfather"; + enablenpc "Grandmother"; + break; +} + +ama_test.gat,49,95,4 script Grandfather 766,{ +//modification + mes "[Grandfather]"; + mes "Zzzzzz......"; +//end modification + close; +} + +ama_test.gat,51,95,4 script Grandmother 761,{ + mes "[Grandmother]"; + mes "Oh....!?"; + next; + mes "[Grandmother]"; + mes "Grandfather, do you know where I put my money?"; + next; + mes "[Grandfather]"; + mes "Grandmother...... The village headman said, that the small demons recently stole money from people right in the middle of the village, causing big tumult..."; + next; + mes "[Grandmother]"; + mes "Iiiiiii......!"; + next; + mes "[Grandfather]"; + mes "This is the recent talk in the village......"; + next; + mes "[Grandfather]"; + mes "Oh, there is Momotaro......"; + next; + mes "[Grandfather]"; + mes "As you probably know, there are only cowards here with no power to fight the small demons...."; + mes "So I would like to ask you a favour, Momotaro."; + next; + mes "[Grandmother]"; + mes "Momotaro......"; + mes "Your Grandmother would like to give you ^3355ffthe tastiest red portion on this world^000000...... but I cannot...... "; + next; + mes "[Grandmother]"; + mes "I'm so sorry...... Momotaro......"; + next; + mes "[Grandmother & Grandfather]"; + mes "Please, Momotaro, help us......"; +//modification + addtimer 5000, "Grandmother::OnTimer5000"; + close; +OnTimer5000: +//end modification + disablenpc "Grandfather"; + disablenpc "Grandmother"; + set @mobdie,0; + monster "ama_test.gat",47,101,"Small Demon",1110,1,"mobcount"; + monster "ama_test.gat",51,101,"Small Demon",1110,1,"mobcount"; + monster "ama_test.gat",55,101,"Small Demon",1110,1,"mobcount"; + monster "ama_test.gat",55,97,"Small Demon",1110,1,"mobcount"; + monster "ama_test.gat",55,93,"Small Demon",1110,1,"mobcount"; + monster "ama_test.gat",53,91,"Small Demon",1110,1,"mobcount"; + monster "ama_test.gat",49,91,"Small Demon",1110,1,"mobcount"; + monster "ama_test.gat",45,96,"Small Demon",1110,1,"mobcount"; + monster "ama_test.gat",45,99,"Small Demon",1110,1,"mobcount"; + end; +} + +ama_test.gat,50,100,4 script Manager 762,{ +//modification + if (event_momo >= 4) goto LSecondFin; +//end modification + mes "[Manager]"; + mes "Hoho, you did it...... I'm the manager here...... You are not an ordinary person, right? You did very well."; + next; + mes "[Manager]"; + mes "The Momotaro from the legend appears in this world!"; + mes "Hohohohoho!"; + next; + menu "Is there some extra?",L1,"Thanks for nothing......",L2; +L1: + mes "[Manager]"; + mes "Hohoho......"; + mes "This is maybe not really recomending......"; + mes "I think in your current condition the small demons can twirl you lightly around their fingers."; + mes "......Hohoho......"; + next; + mes "[Manager]"; + mes "......"; + mes "Just a joke."; + next; + mes "[Manager]"; + mes "Well then, you enjoyed the Momotaro Event Hall?"; + mes "Talk to the staff member, that you have met first, about our premium presents. He will give you some."; + next; + mes "[Manager]"; + mes "Whatever you encounter, never loose that strong spirit!"; + next; + set event_momo,1; +//modification +// deltimer "roomt"; +//end modification + disablenpc "Manager"; + enablenpc "Waiting Room Staff"; + warp "amatsu.gat",223,230; + break; +L2: + mes "[Manager]"; + mes "!!!!!"; + mes "......Ho...Hohoho......"; + mes "You are an amusing fellow......"; + mes "Well...... One little suggestion from me to you."; + next; + mes "[Manager]"; + mes "Normally I would just kick you out, but...... I would like to see your true capabilities... Hohoho."; + mes "As if I would look at my own young self. Hohohoho."; + next; + mes "[Manager]"; + mes "What do you think? I will give this one nonrecurring chance. It is the challenge of ^3355ffSecond Grad^000000 which is not officially available......"; + mes "But I warn you, this one will be difficult."; + next; + menu "Na, it is enough",L2_1,"I take the challenge",L2_2; +L2_1: + mes "[Manager]"; + mes "Hoho......"; + mes "You got tired from the last fight?"; + mes "Well, ok...... Did you enjoy the Momotaro Event Hall? Talk to the staff member, that you have met first, about our premium presents. She will give you some."; + next; + mes "[Manager]"; + mes "Whatever you encounter, never loose that strong spirit!"; + next; + set event_momo,2; +//modification + goto LWarpOut; +// break; +//end modification +L2_2: + mes "[Manager]"; + mes "Hohoho, You like it more and more, right? This will be the last decisive battle. Show your power without regrets!"; +//modification + addtimer 5000, "Manager::OnTimer5000"; +//end modification + close; +OnTimer5000: + monster "ama_test.gat",35,103,"Demon",1301,1,"mobcount2"; + monster "ama_test.gat",56,111,"Demon",1301,1,"mobcount2"; + monster "ama_test.gat",40,91,"Demon",1301,1,"mobcount2"; + disablenpc "Manager"; + set event_momo,3; + end; +//modification +LSecondFin: + mes "[Manager]"; + mes "You are really strong... Wasn't it thrilling? Momotaro Event Hall can be really enjoyable, right?"; + mes "Ok now, talk to the staff member, that you have met first, about our premium presents. She will give you some."; + next; + set event_momo,4; +LWarpOut: +//end modification + mes "[Manager]"; + mes "Whatever you encounter, never loose that strong spirit!"; + next; + warp "amatsu.gat",223,230; + disablenpc "Manager"; + enablenpc "Waiting Room Staff"; + donpcevent "Waiting Room Staff::OnInit"; + break; +Onstart: + mes "[Manager]"; + mes "Hohoho......"; + close; +} +//=======================================MobCount===============================- +ama_test.gat,0,1,0 script mobcount -1,{ + if (@mobdie >= 8) goto Lfin; + set @mobdie,@mobdie+1; + set @mobrand,rand(4); + if (@mobrand == 1) goto Lrand2; + if (@mobrand == 2) goto Lrand3; + if (@mobrand == 3) goto Lrand4; +Lrand1: + areaannounce "ama_test.gat",30,78,68,120,"Small Demon: I havn't done anything!",8;break; +Lrand2: + areaannounce "ama_test.gat",30,78,68,120,"Small Demon: Excuse me, Excuse me",8;break; +Lrand3: + areaannounce "ama_test.gat",30,78,68,120,"Small Demon: Ahhh......",8;break; +Lrand4: + areaannounce "ama_test.gat",30,78,68,120,"Small Demon: I've been hit on surprise...",8;break; +Lfin: + areaannounce "ama_test.gat",30,78,68,120,"Small Demon: Uhhaaa......",8; + addtimer 5000, "mobcount2::OnTimer5000"; +//modification + stopnpctimer "roomtimer"; + end; +// enablenpc "Manager"; +// doevent "Manager::Onstart"; +// end; +//end modification +} +//=======================================MobCount2==============================- +ama_test.gat,50,101,0 script mobcount2 -1,{ + if (@mobdie2 == 2) goto Lfin; + set @mobdie2,@mobdie2+1; + areaannounce "ama_test.gat",30,78,68,120,"Am Mut: Uhaaa...",8;break; +Lfin: + set event_momo,4; +//modification + addtimer 5000, "mobcount2::OnTimer5000"; + end; +OnTimer5000: +//end modification + enablenpc "Manager"; + doevent "Manager::Onstart"; + end; +} +//=======================================TIMER==================================- + +//modification +//dead code +//ama_test.gat,50,102,0 script roomt -1,{ +// +// deltimer "roomt"; +// mapannounce "ama_test.gat","Time limit is 6 Minutes from now.",8; +// addtimer 180000,"roomt::On180000"; +// end; +// +//OnTestTime: +// mapannounce "ama_test.gat","Time left: "+temp_time+"sec ",8; +// break; +// +//On180000: +// deltimer "roomt"; +// mapannounce "ama_test.gat","3 Minutes left.",8; +// addtimer 120000,"roomt::On300000"; +// break; +//On300000: +// deltimer "roomt"; +// mapannounce "ama_test.gat","One Minute left.",8; +// addtimer 60000,"roomt::On360000"; +// break; +//On360000: +// mapannounce "ama_test.gat","Hohoho - Time limit is exceeded.",8; +// disablenpc "Manager"; +// enablenpc "Waiting Room Staff"; +// areawarp "ama_test.gat",30,78,68,120,"amatsu.gat",223,230; +// break; +//} + +ama_test.gat,50,102,0 script roomtimer -1,{ + +OnTimer1000: + mapannounce "ama_test.gat","Time limit is 6 Minutes from now.",8; + end; +OnTimer180000: + mapannounce "ama_test.gat","3 Minutes left.",8; + end; +OnTimer300000: + mapannounce "ama_test.gat","One Minute left.",8; + end; +OnTimer360000: + stopnpctimer "roomtimer"; + mapannounce "ama_test.gat","Hohoho - Time limit is exceeded.",8; + areawarp "ama_test.gat",30,78,68,120,"amatsu.gat",223,230; + disablenpc "Manager"; + enablenpc "Waiting Room Staff"; + donpcevent "Waiting Room Staff::OnInit"; + end; +} diff --git a/npc/other/msg_boards.txt b/npc/other/msg_boards.txt index a3dfe38f2..634337abf 100644 --- a/npc/other/msg_boards.txt +++ b/npc/other/msg_boards.txt @@ -1,175 +1,175 @@ -//===== eAthena Script =======================================
-//= Message Boards
-//===== By: ==================================================
-//= kobra_k88
-//===== Current Version: =====================================
-//= 1.1
-//===== Compatible With: =====================================
-//= eAthena 7.15 +
-//===== Description: =========================================
-//=
-//===== Additional Comments: =================================
-//= Rearranged [Lupus]
-//============================================================
-
-
-
-//=======================================================================//
-// Al De Baran //
-//=======================================================================//
-/ Welcome Sign ------------------------------------------------
-aldebaran.gat,133,104,1 script Welcome Sign 111,
-{
- mes "~sign reads....~";
- mes "Hello and enjoy your visit to Aldebaran! Aldebaran is the mystical city of clocks and Kafras!";
- close;
-}
-
-// Kafra Corp. Main Office Sign ---------------------------------------------------------------
-aldebaran.gat,53,223,1 script Kafra Corp. Main Office 111,
-{
- mes "~sign reads...~";
- mes "This is the Kafra Services Main Office, home to the lovely Kafra employees.";
- close;
-}
-
-
-//=======================================================================//
-// Alberta //
-//=======================================================================//
-// Sign: Alberta Harbor -----------------------------------------------
-alberta.gat,35,241,1 script Alberta Harbor 111,
-{
- mes "~sign reads....~";
- mes "Welcome to the port city Alberta! Alberta is the city of the sea! A tourist delight!";
- close;
-}
-
-// Welcome Sign -----------------------------------------------
-alberta.gat,196,152,1 script Welcome Sign 111,
-{
- mes "~sign reads...~";
- mes "Welcome to the port city Alberta! Alberta is the city of the sea! A tourist delight!";
- close;
-}
-
-// Sign: Merchant Guild ------------------------------------------
-alberta.gat,37,39,1 script Merchant Guild 111,
-{
- mes "~sign reads...~";
- mes "Enjoy the art of buying and selling? Love making unbeatable deals?";
- mes "Then the Alberta Merchant Guild is perfect for you!";
- mes "Come on inn and find out all you need to know about becoming a Merchant.";
- close;
-}
-
-
-//=======================================================================//
-// Geffen //
-//=======================================================================//
-// Welcome Sign ----------------------------------------------
-geffen.gat,116,58,1 script Welcome Sign 111,
-{
- mes "~sign reads...~";
- mes "Greetings!! You are in the wonderfull city of Geffen! Geffen is the city of Magic and home to Mages and Wizards!.";
- close;
-}
-
-// Sign: Restaurant Inn ---------------------------------------------
-geffen.gat,167,175,1 script Geffen Restaurant Inn 111,
-{
- mes "~sign reads..... ~";
- mes "Welcome weary travelers! Have a hot meal and stay the night at the the Geffen Restaurant Inn!";
- close;
-}
-
-// Sign: Mage Association ---------------------------------------
-geffen.gat,61,174,1 script Mage Association 111,
-{
- mes "~sign reads...~";
- mes "Greetings!! This is the Geffen Magic Academy. Come in if you have an interest in all things magic!";
- close;
-}
-
-// Sign: Geffen Tower Sign ----------------------------------------------
-geffen.gat,113,104,1 script Geffen Tower 111,
-{
- mes "~sign reads...~";
- mes "This is the Geffen Tower, home to the Wizard Academey as well as the infamous Geffen Dungeon. Novices beware!!!";
- close;
-}
-
-// Sign: Blacksmith Guild -------------------------------------------
-geffen.gat,184,61,1 script Blacksmith Guild 111,
-{
- mes "~sign reads...~";
- mes "This is the Blacksmith Guild.";
- close;
-}
-
-// Sign Post -----------------------------------------------------------
-geffen.gat,119,190,0 script Sign Post 111,
-{
- mes "~sign reads...~";
- mes "North to Geffen Fields";
- mes "NorthEast to Al De Baran";
- mes "NorthWest to Glast Heim";
- mes "East to Geffen Fields";
- mes "South to Morroc";
- mes "SouthEast to Prontera";
- mes "Further SouthEast to Alberta";
- mes "Further SouthWest to Comodo";
- mes "West to Geffen Fields";
- close;
-}
-
-
-//=======================================================================//
-// Morroc //
-//=======================================================================//
-// Welcome Sign ---------------------------------------------------
-morocc.gat,168,264,1 script Welcome Sign 111,
-{
- mes "~sign reads...~";
- mes "Morocc welcomes you! Morocc is the city of the desert and home to Thieves, Assassins, and alls sorts of Egyption temptations!";
- close;
-}
-
-// Sign: Inn ----------------------------------------------------------
-morocc.gat,272,272,1 script Morroc Town Inn 111,
-{
- mes "~sign reads....~";
- mes "Welcome weary travelers! Stay the night at the Morroc Town Inn.";
- close;
-}
-
-
-//=======================================================================//
-// Payon //
-//=======================================================================//
-
-
-
-//=======================================================================//
-// Prontera //
-//=======================================================================//
-// Welcome Sign -----------------------------------------------------------
-prontera.gat,156,197,1 script Welcome Sign 111,
-{
- mes"~sign reads...~";
- mes "You've found yourself in the great city of Prontera! Prontera is one of the largest cities in Rune-Midgard and is home to the Prontera Chivalry!";
- close;
-}
-
-// Sign Post ----------------------------------------------------------------
-prontera.gat,158,213,1 script Sign Post 111,
-{
- mes "~ the sign post reads ~";
- mes "North to Prontera Castle";
- mes "Farther North to Al De Baran";
- mes "Northwest to Geffen";
- mes "East to Prontera Fields";
- mes "South to Prontera Fields";
- mes "Farther SouthEast to Alberta";
- close;
-}
+//===== eAthena Script ======================================= +//= Message Boards +//===== By: ================================================== +//= kobra_k88 +//===== Current Version: ===================================== +//= 1.1 +//===== Compatible With: ===================================== +//= eAthena 7.15 + +//===== Description: ========================================= +//= +//===== Additional Comments: ================================= +//= Rearranged [Lupus] +//============================================================ + + + +//=======================================================================// +// Al De Baran // +//=======================================================================// +/ Welcome Sign ------------------------------------------------ +aldebaran.gat,133,104,1 script Welcome Sign 111, +{ + mes "~sign reads....~"; + mes "Hello and enjoy your visit to Aldebaran! Aldebaran is the mystical city of clocks and Kafras!"; + close; +} + +// Kafra Corp. Main Office Sign --------------------------------------------------------------- +aldebaran.gat,53,223,1 script Kafra Corp. Main Office 111, +{ + mes "~sign reads...~"; + mes "This is the Kafra Services Main Office, home to the lovely Kafra employees."; + close; +} + + +//=======================================================================// +// Alberta // +//=======================================================================// +// Sign: Alberta Harbor ----------------------------------------------- +alberta.gat,35,241,1 script Alberta Harbor 111, +{ + mes "~sign reads....~"; + mes "Welcome to the port city Alberta! Alberta is the city of the sea! A tourist delight!"; + close; +} + +// Welcome Sign ----------------------------------------------- +alberta.gat,196,152,1 script Welcome Sign 111, +{ + mes "~sign reads...~"; + mes "Welcome to the port city Alberta! Alberta is the city of the sea! A tourist delight!"; + close; +} + +// Sign: Merchant Guild ------------------------------------------ +alberta.gat,37,39,1 script Merchant Guild 111, +{ + mes "~sign reads...~"; + mes "Enjoy the art of buying and selling? Love making unbeatable deals?"; + mes "Then the Alberta Merchant Guild is perfect for you!"; + mes "Come on inn and find out all you need to know about becoming a Merchant."; + close; +} + + +//=======================================================================// +// Geffen // +//=======================================================================// +// Welcome Sign ---------------------------------------------- +geffen.gat,116,58,1 script Welcome Sign 111, +{ + mes "~sign reads...~"; + mes "Greetings!! You are in the wonderfull city of Geffen! Geffen is the city of Magic and home to Mages and Wizards!."; + close; +} + +// Sign: Restaurant Inn --------------------------------------------- +geffen.gat,167,175,1 script Geffen Restaurant Inn 111, +{ + mes "~sign reads..... ~"; + mes "Welcome weary travelers! Have a hot meal and stay the night at the the Geffen Restaurant Inn!"; + close; +} + +// Sign: Mage Association --------------------------------------- +geffen.gat,61,174,1 script Mage Association 111, +{ + mes "~sign reads...~"; + mes "Greetings!! This is the Geffen Magic Academy. Come in if you have an interest in all things magic!"; + close; +} + +// Sign: Geffen Tower Sign ---------------------------------------------- +geffen.gat,113,104,1 script Geffen Tower 111, +{ + mes "~sign reads...~"; + mes "This is the Geffen Tower, home to the Wizard Academey as well as the infamous Geffen Dungeon. Novices beware!!!"; + close; +} + +// Sign: Blacksmith Guild ------------------------------------------- +geffen.gat,184,61,1 script Blacksmith Guild 111, +{ + mes "~sign reads...~"; + mes "This is the Blacksmith Guild."; + close; +} + +// Sign Post ----------------------------------------------------------- +geffen.gat,119,190,0 script Sign Post 111, +{ + mes "~sign reads...~"; + mes "North to Geffen Fields"; + mes "NorthEast to Al De Baran"; + mes "NorthWest to Glast Heim"; + mes "East to Geffen Fields"; + mes "South to Morroc"; + mes "SouthEast to Prontera"; + mes "Further SouthEast to Alberta"; + mes "Further SouthWest to Comodo"; + mes "West to Geffen Fields"; + close; +} + + +//=======================================================================// +// Morroc // +//=======================================================================// +// Welcome Sign --------------------------------------------------- +morocc.gat,168,264,1 script Welcome Sign 111, +{ + mes "~sign reads...~"; + mes "Morocc welcomes you! Morocc is the city of the desert and home to Thieves, Assassins, and alls sorts of Egyption temptations!"; + close; +} + +// Sign: Inn ---------------------------------------------------------- +morocc.gat,272,272,1 script Morroc Town Inn 111, +{ + mes "~sign reads....~"; + mes "Welcome weary travelers! Stay the night at the Morroc Town Inn."; + close; +} + + +//=======================================================================// +// Payon // +//=======================================================================// + + + +//=======================================================================// +// Prontera // +//=======================================================================// +// Welcome Sign ----------------------------------------------------------- +prontera.gat,156,197,1 script Welcome Sign 111, +{ + mes"~sign reads...~"; + mes "You've found yourself in the great city of Prontera! Prontera is one of the largest cities in Rune-Midgard and is home to the Prontera Chivalry!"; + close; +} + +// Sign Post ---------------------------------------------------------------- +prontera.gat,158,213,1 script Sign Post 111, +{ + mes "~ the sign post reads ~"; + mes "North to Prontera Castle"; + mes "Farther North to Al De Baran"; + mes "Northwest to Geffen"; + mes "East to Prontera Fields"; + mes "South to Prontera Fields"; + mes "Farther SouthEast to Alberta"; + close; +} diff --git a/npc/other/old/guide.txt b/npc/other/old/guide.txt index 8952fd20b..1e21387c4 100644 --- a/npc/other/old/guide.txt +++ b/npc/other/old/guide.txt @@ -1,1153 +1,1153 @@ -//===== eAthena Script =======================================
-//= Guide Script
-//===== By: ==================================================
-//= Lotsa People (1.0)
-//= Even More People (1.1)
-//= Darkchild (1.2)
-//===== Current Version: =====================================
-//= 1.2
-//===== Compatible With: =====================================
-//= Any eAthena Version In Which Duplicate Works
-//===== Description: =========================================
-//= Guides In RO World
-//===== Additional Comments: =================================
-//= 1.2 - Used the duplicate and fixed minor things
-//============================================================
-
-//[Prontera Guide]
-
-//Complete
-prontera.gat,154,187,4 script Guide#p1-1::guide_p 105,{
- cutin "prt_soldier",2;
- mes "[Prontera Squad]";
- mes "Welcome to Prontera,the Capital City of Rune-Midgard Kingdom.";
- mes "We can help you to find Buildings easily, Feel free to inquire at us anytime.";
- mes "Please Choose a menu `Notice' if you are a beginner of Ragnarok.";
-L_START_1:
- next;
- menu "View Buildings",L_MENU_1,"Wipe all Indications on Mini-Map.",L_MENU_2,"Notice",L_MENU_3,"Cancel",L_MENU_4;
- L_MENU_1:
- if (@COMPASS_CHECK != 0) goto L_MENU_1_ROOT;
- mes "[Prontera Squad]";
- mes "Please choose a Menu first.";
- mes "Do you want me to leave indications on the Mini-Map?";
- next;
- menu "Yes, Please.",-,"No, Thanks.",L_MENU_1_ROOT;
- set @COMPASS_CHECK,1;
- L_MENU_1_ROOT:
- mes "[Prontera Squad]";
- mes "Please select location you want me to show you.";
- L_SUB_1:
- next;
- menu "Swordman Asosiation",L_MENU_1_1,"^0000FFSantuary^000000",L_MENU_1_2,"Prontera Chivalry",L_MENU_1_3,"Armory",L_MENU_1_4,"Kit Shop",L_MENU_1_5,"Inn",L_MENU_1_6,"Trading Post",L_MENU_1_7,"Pub",L_MENU_1_8,"Library",L_MENU_1_9,"Job Agency",L_MENU_1_10,"The Castle of Prontera",L_MENU_1_11,"City Hall",L_MENU_1_12,"Cancel",L_MENU_1_13;
- L_MENU_1_1:
- mes "[Prontera Squad]";
- mes "The 'Swordman Assosiation' has moved to Izlude, the Sattelite of Prontera, now that Building is Empty";
- if (@COMPASS_CHECK != 1) goto L_SUB_1;
- viewpoint 1,237,41,1,0x00FF00;
- goto L_SUB_1;
- L_MENU_1_2:
- mes "[Prontera Squad]";
- mes "The main Chapel of Rune-Midgard Kingdom, `Santuary' is located at Northeast. Usually citizens visit there to become Acolyte";
- if (@COMPASS_CHECK != 1) goto L_SUB_1;
- viewpoint 1,236,316,2,0xFF0000;
- goto L_SUB_1;
- L_MENU_1_3:
- mes "[Prontera Squad]";
- mes "'Prontera Chivalry' the Defense Force of Prontera City is located at Northwest.";
- if (@COMPASS_CHECK != 1) goto L_SUB_1;
- viewpoint 1,46,345,3,0x00FF00;
- goto L_SUB_1;
- L_MENU_1_4:
- mes "[Prontera Squad]";
- mes "'Armory' is located at Northeast around the Fountain.";
- if (@COMPASS_CHECK != 1) goto L_SUB_1;
- viewpoint 1,175,220,4,0xFF00FF;
- goto L_SUB_1;
- L_MENU_1_5:
- mes "[Prontera Squad]";
- mes "'Kit Shop' is located Northwest around the Fountain.";
- if (@COMPASS_CHECK != 1) goto L_SUB_1;
- viewpoint 1,134,221,5,0xFF00FF;
- goto L_SUB_1;
- L_MENU_1_6:
- mes "[Prontera Squad]";
- mes "There are 2 'Inn's' around the Fountain, on is located at West, other one at East.";
- if (@COMPASS_CHECK != 1) goto L_SUB_1;
- viewpoint 1,204,214,6,0xFF00FF;
- viewpoint 1,107,192,7,0xFF00FF;
- goto L_SUB_1;
- L_MENU_1_7:
- mes "[Prontera Squad]";
- mes "'Trading Post' is located at Southeast around the Fountain.";
- if (@COMPASS_CHECK != 1) goto L_SUB_1;
- viewpoint 1,179,184,8,0x00FF00;
- goto L_SUB_1;
- L_MENU_1_8:
- mes "[Prontera Squad]";
- mes "'Pub is located at Southeast around the Fountain, right behind Trading Post building.";
- if (@COMPASS_CHECK != 1) goto L_SUB_1;
- viewpoint 1,208,154,9,0x00FF00;
- goto L_SUB_1;
- L_MENU_1_9:
- mes "[Prontera Squad]";
- mes "There are 2 Buildings of 'Library', located both at Northern East and Northern West around the Fountain.";
- if (@COMPASS_CHECK != 1) goto L_SUB_1;
- viewpoint 1,120,267,10,0x00FF00;
- viewpoint 1,192,267,11,0x00FF00;
- goto L_SUB_1;
- L_MENU_1_10:
- mes "[Prontera Squad]";
- mes "'Job Agency' is located at Southeast of the Fountain.";
- if (@COMPASS_CHECK != 1) goto L_SUB_1;
- viewpoint 1,133,183,12,0x00FF00;
- goto L_SUB_1;
- L_MENU_1_11:
- mes "[Prontera Squad]";
- mes "'The Castle Of Prontera' is located at Due North. Clockwise rotation is 12.";
- mes "And when you go outside the Castle through a postern, you will see the North Prontera Field.";
- if (@COMPASS_CHECK != 1) goto L_SUB_1;
- viewpoint 1,156,360,13,0x00FF00;
- goto L_SUB_1;
- L_MENU_1_12:
- mes "[Prontera Squad]";
- mes "City Hall is located at Southeast Contour. The Clockwise rotarion is 7.";
- if (@COMPASS_CHECK != 1) goto L_SUB_1;
- viewpoint 1,75,91,14,0x00FF00;
- goto L_SUB_1;
- L_MENU_1_13:
- mes "[Prontera Squad]";
- mes "If you want to remove location marks, Please choose 'Wipe all Indications on Mini-Map.'.";
- goto L_START_1;
- L_MENU_2:
- viewpoint 2,237,41,1,0x00FF00;
- viewpoint 2,236,316,2,0xFF0000;
- viewpoint 2,46,345,3,0x00FF00;
- viewpoint 2,175,220,4,0xFF00FF;
- viewpoint 2,8,134,5,0xFF00FF;
- viewpoint 2,204,214,6,0xFF00FF;
- viewpoint 2,107,192,7,0xFF00FF;
- viewpoint 2,179,184,8,0x00FF00;
- viewpoint 2,208,154,9,0x00FF00;
- viewpoint 2,120,267,10,0x00FF00;
- viewpoint 2,192,267,11,0x00FF00;
- viewpoint 2,133,183,12,0x00FF00;
- viewpoint 2,156,360,13,0x00FF00;
- viewpoint 2,75,91,14,0x00FF00;
- set @COMPASS_CHECK,0;
- goto L_START_1;
- L_MENU_3:
- mes "[Prontera Squad]";
- mes "We altered the Location Guide into de Newest Digital Style, out of the former Analog One.";
- mes "Please Check this gorgeous newest system with your own eyes.";
- next;
- mes "[Prontera Squad]";
- mes "Don't forget to refer the Mini-Map on Upper-Right of the Screen.";
- mes "If you can't see the Mini-Map, just use Shortcut 'ctrl+tab' or Click 'map' button on the Basic Information Window";
- mes "After that, Click '-' button on the Mini-Map until whole buildings are shown on it.";
- goto L_START_1;
- L_MENU_4:
- mes "[Prontera Squad]";
- mes "Have a nice day.";
- cutin "prt_soldier",255;
- close;
-}
-//Duplicate
-prontera.gat,282,208,2 duplicate(guide_p) Guide#p1-2 105
-
-prontera.gat,29,200,6 duplicate(guide_p) Guide#p1-3 105
-
-prontera.gat,160,29,0 duplicate(guide_p) Guide#p1-4 105
-
-prontera.gat,151,330,4 duplicate(guide_p) Guide#p1-5 105
-
-
-//[Izlude]
-
-//Complete
-izlude.gat,123,87,6 script Guide 105,{
- mes "[Izlude Squad]";
- mes "Welcome to Izlude, the New Satelite of Prontera.";
- mes "Feel free to inquire at us anytime, Algight?";
-L_START_1:
- next;
- menu "View Buildings",L_MENU_1,"Wipe all Indications on Mini-Map.",L_MENU_2,"Notice",L_MENU_3,"Cancel",L_MENU_4;
- L_MENU_1:
- if (@COMPASS_CHECK != 0) goto L_MENU_1_ROOT;
- mes "[Izlude Squad]";
- mes "Please choose a Menu first.";
- mes "Do you want me to leave indications on the Mini-Map?";
- next;
- menu "Yes, Please",-,"No, Thanks",L_SUB_1;
- set @COMPASS_CHECK,1;
- L_MENU_1_ROOT:
- L_SUB_1:
- next;
- menu "^FF0000Swordman Asosiation^000000",L_MENU_1_1,"Swordman Hall",L_MENU_1_2,"Arena",L_MENU_1_3,"Izlude Marina",L_MENU_1_4,"Armory",L_MENU_1_5,"Kit Shop",L_MENU_1_6,"Cancel",L_MENU_1_7;
- L_MENU_1_1:
- mes "[Izlude Squad]";
- mes "Do you want to be a Swordman?";
- if (@COMPASS_CHECK != 1) goto L_SUB_1;
- viewpoint 1,52,140,1,0xFF0000;
- goto L_SUB_1;
- L_MENU_1_2:
- mes "[Izlude Squad]";
- mes "Swordman Hall, the official Building of Swordman Assosiation is at East Contour.";
- if (@COMPASS_CHECK != 1) goto L_SUB_1;
- viewpoint 1,214,130,2,0x00FF00;
- goto L_SUB_1;
- L_MENU_1_3:
- mes "[Izlude Squad]";
- mes "'Arena' the Popular Colosseum is at Due North. The Clockwise totation is 12.";
- mes "You can have fun there, you know.";
- if (@COMPASS_CHECK != 1) goto L_SUB_1;
- viewpoint 1,128,225,3,0x00FF00;
- goto L_SUB_1;
- L_MENU_1_4:
- mes "[Izlude Squad]";
- mes "Marina which allows you to go to 'Alberta' or 'Byalan Island' is at Northeast.";
- if (@COMPASS_CHECK != 1) goto L_SUB_1;
- viewpoint 1,200,180,4,0xFF0000;
- goto L_SUB_1;
- L_MENU_1_5:
- mes "[Izlude Squad]";
- mes "Armory is near at Northwest, and you can find it easily.";
- if (@COMPASS_CHECK != 1) goto L_SUB_1;
- viewpoint 1,111,149,5,0xFF00FF;
- goto L_SUB_1;
- L_MENU_1_6:
- mes "[Izlude Squad]";
- mes "Kit Shop is near at Northeast, and you can find it easily.";
- if (@COMPASS_CHECK != 1) goto L_SUB_1;
- viewpoint 1,148,148,6,0xFF00FF;
- goto L_SUB_1;
- L_MENU_1_7:
- mes "[Izlude Squad]";
- mes "If you want to remove location marks, Please choose 'Wipe all Indications on Mini-Map.'.";
- goto L_START_1;
- L_MENU_2:
- viewpoint 2,52,140,1,0xFF0000;
- viewpoint 2,214,130,2,0x00FF00;
- viewpoint 2,128,225,3,0x00FF00;
- viewpoint 2,200,180,4,0xFF0000;
- viewpoint 2,111,149,5,0xFF00FF;
- viewpoint 2,148,148,6,0xFF00FF;
- set @COMPASS_CHECK,0;
- goto L_START_1;
- L_MENU_3:
- mes "[Izlude Squad]";
- mes "We altered the Location Guideinto de Newest Digital Style, out of the former Analog One.";
- mes "Please Check this gorgeous newest system with your own eyes.";
- next;
- mes "[Izlude Squad]";
- mes "Don't forget to refer the Mini-Map on Upper-Right of the Screen.";
- mes "If you can't see the Mini-Map, just use Shortcut 'ctrl+tab' or Click 'map' button on the Basic Information Window";
- mes "After that, Click '-' button on the Mini-Map until whole buildings are shown on it.";
- goto L_START_1;
- L_MENU_4:
- mes "[Izlude Squad]";
- mes "Don't get lost.";
- close;
-}
-
-//[Geffen]
-
-//Complete
-geffen.gat,203,116,0 script Guide#p1-6::guide_g 705,{
- cutin "gef_soldier",2;
- mes "[Geffen Squad]";
- mes "Welcome to Geffen, the City of Magic.";
- mes "We will help you when you take the Wrong way, Feel free to inquire at us anytime.";
- mes "Please Choose a menu `Notice' if you are a beginner of Ragnarok.";
-L_START_1:
- next;
- menu "View Buildings",L_MENU_1,"Wipe all Indications on Mini-Map.",L_MENU_2,"Notice",L_MENU_3,"Cancel",L_MENU_4;
- L_MENU_1:
- if (@COMPASS_CHECK != 0) goto L_MENU_1_ROOT;
- mes "[Geffen Squad]";
- mes "Please choose a Menu first.";
- mes "Do you want me to leave indications on the Mini-Map?";
- next;
- menu "Yes, Please",-,"No, Thanks",L_MENU_1_ROOT;
- set @COMPASS_CHECK,1;
- L_MENU_1_ROOT:
- L_SUB_1:
- next;
- menu "^FF0000Magic Acadamy^000000",L_MENU_1_1,"Forge",L_MENU_1_2,"Armory",L_MENU_1_3,"Kit Shop",L_MENU_1_4,"Pub",L_MENU_1_5,"Inn",L_MENU_1_6,"Cancel",L_MENU_1_7;
- L_MENU_1_1:
- mes "[Geffen Squad]";
- mes "'Magic Acadamy' is the Building in charge of Every Magical Theory.";
- if (@COMPASS_CHECK != 1) goto L_SUB_1;
- viewpoint 1,61,180,1,0xFF0000;
- goto L_SUB_1;
- L_MENU_1_2:
- mes "[Geffen Squad]";
- mes "'Forge' is located at Southeast around the Tower of Magic.";
- if (@COMPASS_CHECK != 1) goto L_SUB_1;
- viewpoint 1,182,59,2,0x00FF00;
- goto L_SUB_1;
- L_MENU_1_3:
- mes "[Geffen Squad]";
- mes "'Armory' is located at Northwest oround the Tower of Magic.";
- if (@COMPASS_CHECK != 1) goto L_SUB_1;
- viewpoint 1,99,140,3,0xFF00FF;
- goto L_SUB_1;
- L_MENU_1_4:
- mes "[Geffen Squad]";
- mes "'Kit Shop' is located at Southwest arround the Tower of Magic.";
- if (@COMPASS_CHECK != 1) goto L_SUB_1;
- viewpoint 1,44,86,4,0xFF00FF;
- goto L_SUB_1;
- L_MENU_1_5:
- mes "[Geffen Squad]";
- mes "'Pub' is located at Northeast around the Tower of Magic.";
- if (@COMPASS_CHECK != 1) goto L_SUB_1;
- viewpoint 1,138,138,5,0xFF00FF;
- goto L_SUB_1;
- L_MENU_1_6:
- mes "[Geffen Squad]";
- mes "'Inn' is located at Northeast around the Tower of Magic.";
- if (@COMPASS_CHECK != 1) goto L_SUB_1;
- viewpoint 1,172,174,6,0xFF00FF;
- goto L_SUB_1;
- L_MENU_1_7:
- mes "[Geffen Squad]";
- mes "If you want to remove location marks, Please choose 'Wipe all Indications on Mini-Map.'.";
- goto L_START_1;
- L_MENU_2:
- viewpoint 2,61,180,1,0xFF0000;
- viewpoint 2,182,59,2,0x00FF00;
- viewpoint 2,99,140,3,0xFF00FF;
- viewpoint 2,44,86,4,0xFF00FF;
- viewpoint 2,138,138,5,0xFF00FF;
- viewpoint 2,172,174,6,0xFF00FF;
- set @COMPASS_CHECK,0;
- goto L_START_1;
- L_MENU_3:
- mes "[Geffen Squad]";
- mes "We altered the Location Guide into de Newest Digital Style, out of the former Analog One.";
- mes "Please Check this gorgeous newest system with your own eyes.";
- next;
- mes "[Geffen Squad]";
- mes "Don't forget to refer the Mini-Map on Upper-Right of the Screen.";
- mes "If you can't see the Mini-Map, just use Shortcut 'ctrl+tab' or Click 'map' button on the Basic Information Window";
- mes "After that, Click '-' button on the Mini-Map until whole buildings are shown on it.";
- goto L_START_1;
- L_MENU_4:
- mes "[Geffen Squad]";
- mes "Have a nice day.";
- cutin "gef_soldier",255;
- close;
-}
-
-//Duplicate
-geffen.gat,118,62,0 duplicate(guide_g) Guide#p1-7 105
-
-//[Payon]
-payon.gat,82,116,4 script Guide#p1-8::guide_p 708,{
- cutin "pay_soldier",2;
- mes "[Payon Squad]";
- mes "Welcome to Payon, the uplander village.";
- mes "We will help you when you take the wrong way, Feel free to inquire at us anytime.";
- mes "Please Choose a menu `Notice' if you are a beginner of Ragnarok.";
-L_START_1:
- next;
- menu "View Buildings",L_MENU_1,"Wipe all Indications on Mini-Map.",L_MENU_2,"Notice",L_MENU_3,"Cancel",L_MENU_4;
- L_MENU_1:
- if (@COMPASS_CHECK != 0) goto L_MENU_1_ROOT;
- mes "[Payon Squad]";
- mes "Please choose a Menu first.";
- mes "Do you want me to leave indications on the Mini-Map?";
- next;
- menu "Yes, Please",-,"No, Thanks",L_MENU_1_ROOT;
- set @COMPASS_CHECK,1;
- L_MENU_1_ROOT:
- L_SUB_1:
- next;
- menu "^FF0000Archer Guild^000000",L_MENU_1_1,"Armory",L_MENU_1_2,"Kit Shop",L_MENU_1_3,"Inn",L_MENU_1_4,"Central Palace",L_MENU_1_5,"Cancel",L_MENU_1_6;
- L_MENU_1_1:
- mes "[Payon Squad]";
- mes "'Archer Guild' is a Control Office of Archers. It is located at Northeast Contour of the Archer Village.";
- if (@COMPASS_CHECK != 1) goto L_SUB_1;
- viewpoint 1,174,189,1,0xFF0000;
- goto L_SUB_1;
- L_MENU_1_2:
- mes "[Payon Squad]";
- mes "'Armory' is located at Northwest around the Centre.";
- if (@COMPASS_CHECK != 1) goto L_SUB_1;
- viewpoint 1,30,176,2,0xFF00FF;
- goto L_SUB_1;
- L_MENU_1_3:
- mes "[Payon Squad]";
- mes "'Kit Shop' is located at Northwest Contour of the Archer Village.";
- if (@COMPASS_CHECK != 1) goto L_SUB_1;
- viewpoint 1,174,189,3,0xFF00FF;
- goto L_SUB_1;
- L_MENU_1_4:
- mes "[Payon Squad]";
- mes "'Inn' is located at East around the Centre.";
- if (@COMPASS_CHECK != 1) goto L_SUB_1;
- viewpoint 1,172,134,4,0xFF00FF;
- goto L_SUB_1;
- L_MENU_1_5:
- mes "[Payon Squad]";
- mes "'Central Palace' is at North around the Centre.";
- if (@COMPASS_CHECK != 1) goto L_SUB_1;
- viewpoint 1,89,166,5,0x00FF00;
- goto L_SUB_1;
- L_MENU_1_6:
- mes "[Payon Squad]";
- mes "If you want to remove location marks, Please choose 'Wipe all Indications on the Mini-Map.'.";
- goto L_START_1;
- L_MENU_2:
- viewpoint 2,174,189,1,0xFF0000;
- viewpoint 2,30,176,2,0xFF00FF;
- viewpoint 2,174,189,3,0xFF00FF;
- viewpoint 2,172,134,4,0xFF00FF;
- viewpoint 2,89,166,5,0x00FF00;
- set @COMPASS_CHECK,0;
- goto L_START_1;
- L_MENU_3:
- mes "[Payon Squad]";
- mes "We altered the Location Guide into de Newest Digital Style, out of the former Analog One.";
- mes "Please Check this gorgeous newest system with your own eyes.";
- next;
- mes "[Payon Squad]";
- mes "Don't forget to refer the Mini-Map on Upper-Right of the Screen.";
- mes "If you can't see the Mini-Map, just use Shortcut 'ctrl+tab' or Click 'map' button on the Basic Information Window";
- mes "After that, Click '-' button on the Mini-Map until whole buildings are shown on it.";
- goto L_START_1;
- L_MENU_4:
- mes "[Payon Squad]";
- mes "Bon Voyage, Wanderer.";
- cutin "pay_soldier",255;
- close;
-}
-
-//Duplicate
-pay_arche.gat,85,30,2 duplicate(guide_p) Guide#p1-9 105
-
-//[Alberta]
-
-alberta.gat,23,238,4 script Guide#p1-10::guide_a 105,{
- mes "[Alberta Squad]";
- mes "Welcome to Alberta, the The Port Town.";
- mes "We will helpyou when you take a wrong way, Feel free to inquire at us anytime.";
- mes "Please Choose a menu `Notice' if you are a beginner of Ragnarok.";
-L_START_1:
- next;
- menu "View Buildings",L_MENU_1,"Wipe all Indications on Mini-Map.",L_MENU_2,"Notice",L_MENU_3,"Cancel",L_MENU_4;
- L_MENU_1:
- if (@COMPASS_CHECK != 0) goto L_SUB_1;
- mes "[Alberta Squad]";
- mes "Please choose a Menu first.";
- mes "Do you want me to leave indications on the Mini-Map?";
- next;
- menu "Yes, Please",-,"No, Thanks",L_MENU_1_ROOT;
- set @COMPASS_CHECK,1;
- L_MENU_1_ROOT:
- L_SUB_1:
- menu "^FF0000Merchant Guild^000000",L_MENU_1_1,"Armory",L_MENU_1_2,"Kit Shop",L_MENU_1_3,"Inn",L_MENU_1_4,"Cancel",L_MENU_1_5;
- L_MENU_1_1:
- mes "[Alberta Squad]";
- mes "'Merchant Guild' will help you to transform into a Merchant.";
- if (@COMPASS_CHECK != 1) goto L_SUB_1;
- viewpoint 1,33,41,1,0xFF0000;
- goto L_SUB_1;
- L_MENU_1_2:
- mes "[Alberta Squad]";
- mes "'Armory' is located at North Contour from the Centre of Mini-Map.";
- if (@COMPASS_CHECK != 1) goto L_SUB_1;
- viewpoint 1,117,37,2,0xFF00FF;
- goto L_SUB_1;
- L_MENU_1_3:
- mes "[Alberta Squad]";
- mes "'Kit Shop' is located at the Centre of Mini-Map.";
- if (@COMPASS_CHECK != 1) goto L_SUB_1;
- viewpoint 1,98,154,3,0xFF00FF;
- goto L_SUB_1;
- L_MENU_1_4:
- mes "[Alberta Squad]";
- mes "'Armory' is located at North Contour around the Centre of Mini-Map.";
- if (@COMPASS_CHECK != 1) goto L_SUB_1;
- viewpoint 1,65,233,4,0xFF00FF;
- goto L_SUB_1;
- L_MENU_1_5:
- mes "[Alberta Squad]";
- mes "If you want to remove location marks, Please choose 'Wipe all Indications on Mini-Map.'.";
- goto L_START_1;
- L_MENU_2:
- viewpoint 2,33,41,1,0xFF0000;
- viewpoint 2,117,37,2,0xFF00FF;
- viewpoint 2,98,154,3,0xFF00FF;
- viewpoint 2,65,233,4,0xFF00FF;
- set @COMPASS_CHECK,0;
- goto L_START_1;
- L_MENU_3:
- mes "[Alberta Squad]";
- mes "We altered the Location Guideinto de Newest Digital Style, out of the former Analog One.";
- mes "Please Check this gorgeous newest system with your own eyes.";
- next;
- mes "[Alberta Squad]";
- mes "Don't forget to refer the Mini-Map on Upper-Right of the Screen.";
- mes "If you can't see the Mini-Map, just use Shortcut 'ctrl+tab' or Click 'map' button on the Basic Information Window";
- mes "After that, Click '-' button on the Mini-Map until whole buildings are shown on it.";
- goto L_START_1;
- L_MENU_4:
- mes "[Alberta Squad]";
- mes "Ta Ta.";
- close;
-}
-
-//Duplicate
-alberta.gat,120,60,3 duplicate(guide_a) Guide#p1-11 105
-
-//[Morroc]
-
-morocc.gat,153,286,6 script Guide#p1-12::guide_m 707,{
- cutin "moc_soldier",2;
- mes "[Morocc Squad]";
- mes "Welcome to Morroc,the Frontier.";
- mes "We will help you when you take a Wrong Way, Feel free to inquire at us anytime, Algight?";
-L_START_1:
- next;
- menu "View Buildings",L_MENU_1,"Wipe all Indications on Mini-Map.",L_MENU_2,"Notice",L_MENU_3,"Cancel",L_MENU_4;
- L_MENU_1:
- if (@COMPASS_CHECK != 0) goto L_SUB_1;
- mes "[Morocc Squad]";
- mes "Please choose a Menu first.";
- mes "Do you want me to leave indications on the Mini-Map?";
- next;
- menu "Yes, Please",-,"No, Thanks",L_MENU_1_ROOT;
- set @COMPASS_CHECK,1;
- L_MENU_1_ROOT:
- L_SUB_1:
- next;
- menu "^FF0000Thief Guild^000000",L_MENU_1_1,"Armory",L_MENU_1_2,"Inn",L_MENU_1_3,"Pub",L_MENU_1_4,"Mercenary Guild",L_MENU_1_5,"Cancel",L_MENU_1_6;
- L_MENU_1_1:
- mes "[Morocc Squad]";
- mes "'Thief Guild' wich grants you to be a Thief is located inside by hearsay...";
- if (@COMPASS_CHECK != 1) goto L_SUB_1;
- viewpoint 1,24,297,1,0xFF0000;
- goto L_SUB_1;
- L_MENU_1_2:
- mes "[Morocc Squad]";
- mes "'Armory' is located at Southwest around the Centre of Mini-Map.";
- if (@COMPASS_CHECK != 1) goto L_SUB_1;
- viewpoint 1,253,56,2,0xFF00FF;
- goto L_SUB_1;
- L_MENU_1_3:
- mes "[Morocc Squad]";
- mes "In Morroc there are 2 'Inn's' located both at South and Northeast around the Centre on Mini-Map.";
- if (@COMPASS_CHECK != 1) goto L_SUB_1;
- viewpoint 1,274,269,3,0xFF00FF;
- viewpoint 1,197,66,3,0xFF00FF;
- goto L_SUB_1;
- L_MENU_1_4:
- mes "[Morocc Squad]";
- mes "'Pub' is located at Northwest around the Centre.";
- if (@COMPASS_CHECK != 1) goto L_SUB_1;
- viewpoint 1,52,259,4,0xFF00FF;
- goto L_SUB_1;
- L_MENU_1_5:
- mes "[Morocc Squad]";
- mes "'Mercenary Guild' is at East Contour around the Centre of Mini-Map.";
- if (@COMPASS_CHECK != 1) goto L_SUB_1;
- viewpoint 1,284,171,5,0x00FF00;
- goto L_SUB_1;
- L_MENU_1_6:
- mes "[Morocc Squad]";
- mes "If you want to remove location marks, Please choose 'Wipe all Indications on the Mini-Map.'.";
- goto L_START_1;
- L_MENU_2:
- viewpoint 2,24,297,1,0xFF0000;
- viewpoint 2,253,56,2,0xFF00FF;
- viewpoint 2,274,269,3,0xFF00FF;
- viewpoint 2,197,66,3,0xFF00FF;
- viewpoint 2,52,259,4,0xFF00FF;
- viewpoint 2,284,171,5,0x00FF00;
- set @COMPASS_CHECK,0;
- goto L_START_1;
- L_MENU_3:
- mes "[Morocc Squad]";
- mes "We altered the Location Guide into de Newest Digital Style, out of the former Analog One.";
- mes "Please Check this gorgeous newest system with your own eyes.";
- next;
- mes "[Morroc Squad]";
- mes "Don't forget to refer the Mini-Map on Upper-Right of the Screen.";
- mes "If you can't see the Mini-Map, just use Shortcut 'ctrl+tab' or Click 'map' button on the Basic Information Window";
- mes "After that, Click '-' button on the Mini-Map until whole buildings are shown on it.";
- goto L_START_1;
- L_MENU_4:
- mes "[Morocc Squad]";
- mes "Good by for now.";
- cutin "moc_soldier",255;
- close;
-}
-
-//Duplicate
-morocc.gat,54,97,6 duplicate(guide_m) Guide#p1-13 707
-
-
-//[Comodo]
-
-comodo.gat,322,178,4 script Guide#p1-14::guide_c 700,{
- mes "[Native Papaya]";
- mes "Where the night life continues 24 hours a day";
- mes "The city of Dreams and Fantasy!";
- mes "We welcome you to the land of Comodo!";
- mes "I know the area very well.";
- mes "If you need directions, ask me anytime for asistance";
- next;
- menu "Casino",L_MENU_1,"Hula dancing stage ^0000FF(Dancer Job Change)^000000",L_MENU_2,"Weapons and Armor Shop",L_MENU_3,"Tool store",L_MENU_4,"Tourist Shop",L_MENU_5,"Kafra Corp. Western Branch",L_MENU_6,"Chief's House",L_MENU_7,"Pub",L_MENU_8,"Camp Ground",L_MENU_9,"End Conversation",L_MENU_10;
- L_MENU_1:
- viewpoint 1,140,98,1,0xFF6633;
- mes "^FF0000+^000000 -> Casino!";
- mes "The heart of Comodo's night life!";
- mes "A heaven of rest for tired travelers!";
- mes "Another service provided here.!";
- mes "The COmodo Casino ~!";
- close;
- L_MENU_2:
- viewpoint 1,188,168,2,0x0000FF;
- mes "^0000FF+^000000 -> Hula dancing Stage";
- mes "Hula Hula - Hula Hula";
- mes "When you become more comfortable performing on stage, you should consider changing job to be a Dancer";
- mes "What do you think? Hula Dancing Stage - ^0000FF(Change job to Dancer)^000000";
- close;
- L_MENU_3:
- viewpoint 1,266,70,3,0x00FFFF;
- mes "^00FFFF+^000000 -> Weapons and Armor Shop";
- mes "Here in Comodo, you can find unique items only found in Comodo.";
- mes "'Comodo Weapons and Armor Shop'";
- close;
- L_MENU_4:
- viewpoint 1,86,128,4,0x515151;
- mes "^808080+^000000 -> Tool Shop";
- mes "Here in Comodo, you can find tools only found in Comodo";
- mes "'Comodo Tool Store'";
- close;
- L_MENU_5:
- viewpoint 1,298,124,5,0x3355FF;
- mes "^0000FF+^000000 -> Tourist Shop";
- mes "Here in Comodo, you can find unique gifts only found in Comodo";
- mes "'Comodo Tourist Shop'";
- close;
- L_MENU_6:
- viewpoint 1,136,202,6,0xFF5555;
- mes "^FF0000+^000000 -> Kafra Corp. Western Branch";
- mes "The Western Branch of Midgards Kafra Corp.";
- mes "Ofering you the best service!";
- mes "Kafra Corp.'s Western Branch center is located here in Comodo";
- close;
- L_MENU_7:
- viewpoint 1,114,294,7,0xFF5555;
- mes "^FF0000+^000000 -> Chief's House";
- mes "This is the house where the Chief of Comodo resides.";
- mes "If you are one who posseses a serious interest in Comodo, you can meet the Chief in person.";
- mes "I think that would be okay with him.";
- close;
- L_MENU_8:
- viewpoint 1,166,298,8,0xFF5555;
- mes "^FF0000+^000000 -> Pub";
- mes "The pub is a place where tourists from all over the world come to converse and exchange ideas";
- mes "Bringing the ethnic atmosphere of Comodo, to an environment which tourists can enjoy";
- close;
- L_MENU_9:
- viewpoint 1,210,308,9,0xFF5555;
- mes "^FF0000+^000000 -> Camp Ground";
- mes "Sometimes with family and sometimes with friends, people come to Comodo campground to creat great memories.";
- mes "BBQ Camp Ground is where you can taste the ethnic flavors of Comodo's Spit BBQ!";
- close;
- L_MENU_10:
- mes "[Native Papaya]";
- mes "Because Comodo is located in a cave, sunlight cannot shine into this area.";
- mes "It is dark 24 hours a day!";
- mes "The residents of Comodo are using this unusual circumstance to draw tourists to our area...";
- close;
-}
-
-//Duplicates
-comodo.gat,176,350,4 duplicate(guide_c) Guide#p1-14 700
-
-comodo.gat,37,219,4 duplicate(guide_c) Guide#p1-15 700
-
-//[Yuno]
-
-//Needs Translation
-yuno.gat,153,47,4 script "ƒWƒ…ƒm[ƒKƒCƒh" 700,{
- mes "[ƒWƒ…ƒm[ƒKƒCƒh]";
- mes "‰ß‹Ž‚ð’m‚ècc";
- mes "Œ»Ý‚ðŒ©‚Â‚ßcc";
- mes "–¢—ˆ‚ð—\’m‚·‚écc";
- mes "‚±‚±‚ÍŒ«ŽÒ‚½‚¿‚Ì“sŽs";
- mes "- ƒWƒ…ƒm[ -";
- mes "ƒWƒ…ƒm[‚ɂ悤‚±‚»";
- next;
- menu "•Ší–h‹ï“X",L1,"“¹‹ï“X",L2,"ƒZ[ƒWƒLƒƒƒbƒXƒ‹ (ƒZ[ƒW“]EŠ)",L3,"‘“X’Ê‚è",L4,"’†‰›Lê",L5,"‹¤˜a‘}‘ŠÙ",L6,"ƒVƒ…ƒoƒCƒ`ƒFƒ‹–‚–@ƒAƒJƒfƒ~[",L7,"ƒ‚ƒ“ƒXƒ^[”Ž•¨ŠÙ",L8,"‰ï˜b‚ðCancel",LEnd;
-L1:
- mes "[ƒWƒ…ƒm[ƒKƒCƒh]";
- viewpoint 1,120,138,1,0xFF3355;
- mes "^FF3355+^000000 -> •Ší–h‹ï“X";
- goto Lgo;
-L2:
- mes "[ƒWƒ…ƒm[ƒKƒCƒh]";
- viewpoint 1,193,142,2,0x3355FF;
- mes "^3355FF+^000000 -> “¹‹ï“X";
- goto Lgo;
-L3:
- mes "[ƒWƒ…ƒm[ƒKƒCƒh]";
- viewpoint 1,90,318,3,0x33FF55;
- mes "^33FF55+^000000 -> ƒZ[ƒWƒLƒƒƒbƒXƒ‹";
- mes "(ƒZ[ƒW“]EŠ)";
- goto Lgo;
-L4:
- mes "[ƒWƒ…ƒm[ƒKƒCƒh]";
- viewpoint 1,257,102,4,0xFF3355;
- mes "^FF3355+^000000 -> ‘“X’Ê‚è";
- goto Lgo;
-L5:
- mes "[ƒWƒ…ƒm[ƒKƒCƒh]";
- viewpoint 1,157,170,5,0x3355FF;
- mes "^3355FF+^000000 -> ’†‰›Lê";
- goto Lgo;
-L6:
- mes "[ƒWƒ…ƒm[ƒKƒCƒh]";
- viewpoint 1,336,204,6,0x33FF55;
- mes "^33FF55+^000000 -> ‹¤˜a‘}‘ŠÙ";
- goto Lgo;
-L7:
- mes "[ƒWƒ…ƒm[ƒKƒCƒh]";
- viewpoint 1,323,281,7,0xFF3355;
- mes "^FF3355+^000000 -> ƒVƒ…ƒoƒCƒ`ƒFƒ‹–‚–@ƒAƒJƒfƒ~[";
- goto Lgo;
-L8:
- mes "[ƒWƒ…ƒm[ƒKƒCƒh]";
- viewpoint 1,278,288,8,0x3355FF;
- mes "^3355FF+^000000 -> ƒ‚ƒ“ƒXƒ^[”Ž•¨ŠÙ";
- goto Lgo;
-Lgo:
- mes "‚É‚È‚è‚Ü‚·B";
- mes "—Ç‚¢Žž‚ð‚¨‰ß‚²‚µ‚‚¾‚³‚¢B";
- close;
-LEnd:
- mes "[ƒWƒ…ƒm[ƒKƒCƒh]";
- mes "Œ«ŽÒ‚½‚¿‚Ì‘å“sŽs";
- mes "‚»‚µ‚Ä’mŽ¯‚Ì•óŒÉ";
- mes "ƒWƒ…ƒm[‚ւ悤‚±‚»I";
- close;
-}
-
-//[Amatsu]
-
-//Needs Translation
-amatsu.gat,207,91,4 script ƒ~ƒXEƒAƒ}ƒc 758,{
- mes "[Œu‚¿‚á‚ñ]";
- mes "Ž„‚ÍA‘æ13‘ãƒ~ƒXEƒAƒ}ƒc";
- mes "¢Œu£‚Æ\‚µ‚Ü‚·B";
- mes "ƒAƒ}ƒc‘ã•\‚Æ‚µ‚Ä";
- mes "‘º‚̈ēà‚ð‹Â‚¹‚‚©‚Á‚Ä‚¨‚è‚Ü‚·B";
- mes "‚È‚É‚©‚²Ž¿–₪‚ ‚è‚Ü‚µ‚½‚ç";
- mes "‚È‚ñ‚È‚è‚Æ‚¨‚Á‚µ‚á‚Á‚Ä‚‚¾‚³‚¢‚Ü‚¹B";
- next;
- menu "é",L1,"“¹‹ï“X",L2,"•Ší“X",L3,"‹Žð‰®",L4;
-L1:
- viewpoint 1,85,235,0,0xFF3355;
- mes "[Œu‚¿‚á‚ñ]";
- mes "ƒ~ƒjƒ}ƒbƒv‚Ì";
- mes "^FF3355+^000000•”•ª‚ª";
- mes "é‚Å‚²‚´‚¢‚Ü‚·B";
- goto LEnd;
-L2:
- viewpoint 1,96,118,1,0xCE6300;
- mes "[Œu‚¿‚á‚ñ]";
- mes "ƒ~ƒjƒ}ƒbƒv‚Ì";
- mes "^CE6300+^000000•”•ª‚ª";
- mes "“¹‹ï“X‚É‚È‚è‚Ü‚·B";
- goto LEnd;
-L3:
- viewpoint 1,132,117,2,0x55FF33;
- mes "[Œu‚¿‚á‚ñ]";
- mes "ƒ~ƒjƒ}ƒbƒv‚Ì";
- mes "^55FF33+^000000•”•ª‚ª";
- mes "•Ší“X‚É‚È‚è‚Ü‚·B";
- goto LEnd;
-L4:
- viewpoint 1,217,116,3,0x3355FF;
- mes "[Œu‚¿‚á‚ñ]";
- mes "ƒ~ƒjƒ}ƒbƒv‚Ì";
- mes "^3355FF+^000000•”•ª‚ª";
- mes "‹Žð‰®‚É‚È‚è‚Ü‚·B";
-LEnd:
- mes "‚»‚ê‚Å‚ÍAƒAƒ}ƒc‚Å";
- mes "Šy‚µ‚¢ŽžŠÔ‚ð‚¨‰ß‚²‚µ‰º‚³‚¢‚Ü‚¹B";
- close;
-}
-
-amatsu.gat,251,283,4 script ˆÄ“àl 767,{
- mes "[ˆÄ“àl]";
- mes "‚悤‚±‚»B";
- mes "—·‚ð‚·‚é‚É‚Í—Ç‚¢‹Gß‚Å‚·‚ËB";
- mes "Ž„‚Í‚±‚̃Aƒ}ƒc‚Ì";
- mes "ˆÄ“à‚ðˆø‚«Žó‚¯‚Ä‚¨‚éŽÒ‚Å‚·B";
- next;
- mes "[ˆÄ“àl]";
- mes "‰½‚ð‚¨’T‚µ‚Å‚·‚©H";
- next;
- menu "é",L1,"“¹‹ï“X",L2,"•Ší“X",L3,"‹Žð‰®",L4;
-L1:
- viewpoint 1,85,235,0,0xFF3355;
- mes "[ˆÄ“àl]";
- mes "ƒ~ƒjƒ}ƒbƒv‚Ì";
- mes "^FF3355+^000000•”•ª‚ª";
- mes "é‚Å‚²‚´‚¢‚Ü‚·B";
- goto LEnd;
-L2:
- viewpoint 1,96,118,1,0xCE6300;
- mes "[ˆÄ“àl]";
- mes "ƒ~ƒjƒ}ƒbƒv‚Ì";
- mes "^CE6300+^000000•”•ª‚ª";
- mes "“¹‹ï“X‚É‚È‚è‚Ü‚·B";
- goto LEnd;
-L3:
- viewpoint 1,132,117,2,0x55FF33;
- mes "[ˆÄ“àl]";
- mes "ƒ~ƒjƒ}ƒbƒv‚Ì";
- mes "^55FF33+^000000•”•ª‚ª";
- mes "•Ší“X‚É‚È‚è‚Ü‚·B";
- goto LEnd;
-L4:
- viewpoint 1,217,116,3,0x3355FF;
- mes "[ˆÄ“àl]";
- mes "ƒ~ƒjƒ}ƒbƒv‚Ì";
- mes "^3355FF+^000000•”•ª‚ª";
- mes "‹Žð‰®‚É‚È‚è‚Ü‚·B";
-LEnd:
- mes "‚»‚ê‚Å‚ÍAƒAƒ}ƒc‚Å";
- mes "Šy‚µ‚¢ŽžŠÔ‚ð‚¨‰ß‚²‚µ‰º‚³‚¢‚Ü‚¹B";
- close;
-}
-
-
-//[Gonryun]
-
-//Needs Translation
-gonryun.gat,163,60,4 script ƒRƒ“ƒƒ“ƒKƒCƒh 780,{
- mes "[ƒn ƒEƒHƒ“ƒ`]";
- mes "‚¢‚Â‚àŠˆ‹C‚É–ž‚¿‚ÄA”M‹C‚ª‚ ‚Ó‚ê";
- mes "–ˆ“úlX‚ªs‚«Œð‚Á‚Ä‚¢‚é";
- mes "ƒRƒ“ƒƒ“‚É‚¢‚ç‚Á‚µ‚á‚¢‚Ü‚¹!";
- next;
- mes "[ƒn ƒEƒHƒ“ƒ`]";
- mes "¤”„‚ª‚çA‘º‚̈ēà‚ð‚µ‚Ä";
- mes "‚¢‚Ü‚·B’m‚肽‚¢‚±‚Æ‚ª‚ ‚ê‚Î";
- mes "‰½‚Å‚à•·‚¢‚Ä‚‚¾‚³‚¢B";
- next;
- menu "‘º’·‚̉Æ",L1,"“¹‹ï¤l",L2,"•Ší¤l",L3,"–h‹ï¤l",L4,"—·ŠÙ",L5;
-L1:
- viewpoint 1,109,131,0,0xff3355;
- mes "[ƒn ƒEƒHƒ“ƒ`]";
- mes "ƒ~ƒjƒ}ƒbƒv‚Ì";
- mes "^ff3355+^000000‚̈ʒu‚É";
- mes "‘º’·‚̉Ƃª‚ ‚è‚Ü‚·B";
- goto Lend;
-L2:
- viewpoint 1,147,84,1,0xce6300;
- mes "[ƒn ƒEƒHƒ“ƒ`]";
- mes "ƒ~ƒjƒ}ƒbƒv‚Ì";
- mes "^ce6300+^000000‚̈ʒu‚É";
- mes "“¹‹ï¤l‚ª‚¢‚Ü‚·B";
- goto Lend;
-L3:
- viewpoint 1,174,101,2,0x55ff33;
- mes "[ƒn ƒEƒHƒ“ƒ`]";
- mes "ƒ~ƒjƒ}ƒbƒv‚Ì";
- mes "^55ff33+^000000‚̈ʒu‚É";
- mes "•Ší¤l‚ª‚¢‚Ü‚·B";
- goto Lend;
-L4:
- viewpoint 1,173,84,3,0x3355ff;
- mes "[ƒn ƒEƒHƒ“ƒ`]";
- mes "ƒ~ƒjƒ}ƒbƒv‚Ì";
- mes "^3355ff+^000000‚̈ʒu‚É";
- mes "–h‹ï¤l‚ª‚¢‚Ü‚·B";
- goto Lend;
-L5:
- viewpoint 1,215,114,4,0xffffff;
- mes "[ƒn ƒEƒHƒ“ƒ`]";
- mes "ƒ~ƒjƒ}ƒbƒv‚Ì";
- mes "^ffffff+^000000‚̈ʒu‚É";
- mes "—·ŠÙ‚ª‚ ‚è‚Ü‚·B";
- goto Lend;
-Lend:
- mes "Ž„’B‚ÌŠy‚µ‚¢ƒRƒ“ƒƒ“‚ð";
- mes "Žv‚¢‚Á‚«‚èŠy‚µ‚ñ‚Å‚‚¾‚³‚¢I";
- close;
-}
-
-// Below not in japanese NPC
-
-aldebaran.gat,139,63,4 script Soldier 105,{
- mes "[Al De Baran Guard]";
- mes "I am just any ordinary guard you could find in any other cities!!";
- mes "I am in charge of Service Guide in Al De Baran Garrison, and the name is Al De Baran Guard (No Name) !!";
- mes "I will guide you though our town!";
- next;
- menu "Get Location Guide",L0,"End conversation",End;
-
- L0:
- mes "^FF0000+^000000 -> Kafra Main Office";
- mes "^0000FF+^000000 -> Weapon Shop";
- mes "^00F0F0+^000000 -> Sorcerer Guild (Closed)";
- mes "^808080+^000000 -> Pub";
- mes "^00FF00+^000000 -> Item Shop";
- mes "^F0F000+^000000 -> Chemical Acadamy (Closed)";
- viewpoint 0,53,228,1,0xFF0000;
- viewpoint 1,48,198,1,0x0000FF;
- viewpoint 2,48,198,1,0x00F0F0;
- viewpoint 3,48,198,1,0x808080;
- viewpoint 4,48,198,1,0x00FF00;
- viewpoint 5,35,35,1,0xF0F000;
- close;
- LEnd:
- mes "[Al De Baran Guard]";
- mes "We are shown to protect Al De Baran!!";
- close;
-}
-
-izlude.gat,124,178,4 script Soldier 105,{
- mes "[Soldier]";
- mes "HeHeHeHe... HaHaHaHa";
- mes "Huh? Why am I so happy?";
- mes "you wanna know?";
- next;
- menu "Sure, why?",Sure,"Not really, I don't care.",NotReally;
-
- Sure:
- mes "[Soldier]";
- mes "Ah~~ There is not much for us to do these days. Merchants buy items, which monsters drop. You knew that, right?";
- next;
- menu "Of course",OfCourse,"Eh? Really?",EhReally;
-
- OfCourse:
- mes "[Soldier]";
- mes "HaHa In fact, that was actually our job.";
- mes "But there were more and more hunters who come in order to get paid. So it was just too much to handle.";
- next;
- mes "[Soldier]";
- mes "We had to work over time every day.";
- mes "Ah~~~ that was a nightmare...~~~";
- mes "Anyways, the government took a smart action, making the Registration System. The Office of Prize Compensation only pays those who have the Registration.";
- next;
- mes "[Soldier]";
- mes "Requirements for the Registration are for a merchant to secure sufficient funds and to stay at one place all the time. The Office gives away the registration to any merchant who fullfills those requirements.";
- next;
- mes "[Soldier]";
- mes "So there aren't too many people that come to us any more. I mean we are still busy, but that's nothing compared to how it was before~~";
- mes "People who suffered first know how to thank even the slightest comfort.";
- mes "HaHaHaHaHa!";
- close;
- EhReally:
- mes "[Soldier]";
- mes "What?! What do you mean you didn't know?!";
- mes "Hm... well... well... You know you could get some items killing some monsters. You could make some money out of it if you bring and sell those to a merchant.";
- mes "ANYWAYS!";
- next;
- mes "[Soldier]";
- mes "HaHa In fact, that was actually our job.";
- mes "But there were more and more hunters who come in order to get paid. So it was just too much to handle.";
- next;
- mes "[Soldier]";
- mes "We had to work over time every day.";
- mes "Ah~~~ that was a nightmare...~~~";
- mes "Anyways, the government took a smart action, making the Registration System. The Office of Prize Compensation only pays those who have the Registration.";
- next;
- mes "[Soldier]";
- mes "Requirements for the Registration are for a merchant to secure sufficient funds and to stay at one place all the time. The Office gives away the registration to any merchant who fullfills those requirements.";
- next;
- mes "[Soldier]";
- mes "So there aren't too many people that come to us any more. I mean we are still busy, but that's nothing compared to how it was before~~";
- mes "People who suffered first know how to thank even the slightest comfort.";
- mes "HaHaHaHaHa!";
- close;
- NotReally:
- mes "[Soldier]";
- mes "OK Good bye~~";
- close;
-}
-
-prontera.gat,160,330,4 script Guard#p2-1::guard_p 105,{
- mes "Welcome to Prontera.";
- close;
-}
-
-prontera.gat,223,99,1 duplicate(guard_p) Guard#p2-2 105
-
-prontera.gat,229,104,1 duplicate(guard_p) Guard#p2-3 105
-
-prontera.gat,47,339,5 duplicate(guard_p) Guard#p2-4 105
-
-prontera.gat,52,344,5 duplicate(guard_p) Guard#p2-5 105
-
-
-prt_maze02.gat,100,69,4 script Soldier#p3-1::soldier_p 105,{
- mes "[Soldier]";
- mes "Yo yo, you'd be better not to go in there. It has rumored there is a Demon living in the forest.";
- mes "Of course it is just a rumor because no one see the people turning back from the palce.";
- mes "hmmm... it's up to you to go in or leave.";
- close;
-}
-prt_maze02.gat,110,69,4 duplicate(soldier_p) Soldier#p3-2 105
-
-//Yuno
-yuno.gat,46,165,4 script Soldier#p4-1::soldier_y 105,{
- mes "[Yuno Soldier]";
- mes "Welcome to City of scholars where wisdom exists.";
- close;
-}
-
-yuno.gat,61,165,4 duplicate(soldier_y) Soldier#p4-2 105
-
-yuno.gat,150,228,4 duplicate(soldier_y) Soldier#p4-2 105
-
-yuno.gat,165,228,4 duplicate(soldier_y) Soldier#p4-2 105
-
-yuno.gat,262,319,2 script Yuno Soldier 105,{
- mes "[Yuno Soldier]";
- mes "Welcome to Yuno, the scholar's city where ancient wisdom exists.";
- next;
- mes "[Yuno Soldier]";
- mes "There is a holy shield for Crusaders called 'The Messenger of the God'.";
- next;
- mes "[Yuno Soldier]";
- mes "It looks like a long shield with a angel's wing image on its center.";
- mes " It is especially strong against undead or demons.";
- close;
-}
-
-yuno.gat,227,292,4 script Yuno Soldier 105,{
- mes "[Yuno Soldier]";
- mes "Welcome to City of scholars where wisdom exists, Yuno.";
- next;
- mes "[Yuno Soldier]";
- mes "Around the City of Juno, there is fallen angel that fakes himself as the real angel, named 'Fake Angel'.";
- next;
- mes "[Yuno Soldier]";
- mes "This one fakes itself as the real angel, and acts as if it's blessing travelers, and attacks them.";
- mes "It looks all beautiful, so it's bad if you fall for its appearance.";
- close;
-}
-
-yuno.gat,150,283,4 script Yuno Soldier 105,{
- mes "[Yuno Soldier]";
- mes "Welcome to City of scholars where wisdom exists, Yuno.";
- next;
- mes "[Yuno Soldier]";
- mes "Larva Golem is a stone doll that has a stone heart in which its magical power was induced by magma.";
- mes "....from the body, it flows...";
- next;
- mes "[Yuno Soldier]";
- mes "Magma is really hot as to even melt away armor and weapon made with steel.";
- mes "if you attack thoughtlessly, ";
- next;
- mes "[Yuno Soldier]";
- mes "you might get a lot of damage on yourself and even get your armor and weapon broken.";
- close;
-}
-
-yuno.gat,165,283,4 script Yuno Soldier 105,{
- mes "[Yuno Soldier]";
- mes "Welcome to City of scholars where wisdom exists.";
- next;
- mes "[Yuno Soldier]";
- mes "'Geographer', it is a hard shell type thing that grows around flowers from the earth.";
- mes "Thus, even if it's far away, you can't think less of it.";
- next;
- mes "[Yuno Soldier]";
- mes "it got such name 'cause the passing-by geography scholar got eaten away during his research.";
- close;
-}
-
-//Comodo
-
-//Yuno
-yuno.gat,46,165,4 script Yuno Soldier 105,{
- mes "[Yuno Soldier]";
- mes "Welcome to City of scholars where wisdom exists.";
- close;
-}
-
-yuno.gat,61,165,4 script Yuno Soldier 105,{
- mes "[Yuno Soldier]";
- mes "Welcome to City of scholars where wisdom exists.";
- close;
-}
-
-
-yuno.gat,150,228,4 script Yuno Soldier 105,{
- mes "[Yuno Soldier]";
- mes "Welcome to City of scholars where wisdom exists.";
- close;
-}
-
-yuno.gat,165,228,4 script Yuno Soldier 105,{
- mes "[Yuno Soldier]";
- mes "Welcome to City of scholars where wisdom exists.";
- close;
-}
-
-yuno.gat,262,319,2 script Yuno Soldier 105,{
- mes "[Yuno Soldier]";
- mes "Welcome to Yuno, the scholar's city where ancient wisdom exists.";
- next;
- mes "[Yuno Soldier]";
- mes "There is a holy shield for Crusaders called 'The Messenger of the God'.";
- next;
- mes "[Yuno Soldier]";
- mes "It looks like a long shield with a angel's wing image on its center.";
- mes " It is especially strong against undead or demons.";
- close;
-}
-
-yuno.gat,227,292,4 script Yuno Soldier 105,{
- mes "[Yuno Soldier]";
- mes "Welcome to City of scholars where wisdom exists, Yuno.";
- next;
- mes "[Yuno Soldier]";
- mes "Around the City of Juno, there is fallen angel that fakes himself as the real angel, named 'Fake Angel'.";
- next;
- mes "[Yuno Soldier]";
- mes "This one fakes itself as the real angel, and acts as if it's blessing travelers, and attacks them.";
- mes "It looks all beautiful, so it's bad if you fall for its appearance.";
- close;
-}
-
-yuno.gat,150,283,4 script Yuno Soldier 105,{
- mes "[Yuno Soldier]";
- mes "Welcome to City of scholars where wisdom exists, Yuno.";
- next;
- mes "[Yuno Soldier]";
- mes "Larva Golem is a stone doll that has a stone heart in which its magical power was induced by magma.";
- mes "....from the body, it flows...";
- next;
- mes "[Yuno Soldier]";
- mes "Magma is really hot as to even melt away armor and weapon made with steel.";
- mes "if you attack thoughtlessly, ";
- next;
- mes "[Yuno Soldier]";
- mes "you might get a lot of damage on yourself and even get your armor and weapon broken.";
- close;
-}
-
-yuno.gat,165,283,4 script Yuno Soldier 105,{
- mes "[Yuno Soldier]";
- mes "Welcome to City of scholars where wisdom exists.";
- next;
- mes "[Yuno Soldier]";
- mes "'Geographer', it is a hard shell type thing that grows around flowers from the earth.";
- mes "Thus, even if it's far away, you can't think less of it.";
- next;
- mes "[Yuno Soldier]";
- mes "it got such name 'cause the passing-by geography scholar got eaten away during his research.";
- close;
-}
+//===== eAthena Script ======================================= +//= Guide Script +//===== By: ================================================== +//= Lotsa People (1.0) +//= Even More People (1.1) +//= Darkchild (1.2) +//===== Current Version: ===================================== +//= 1.2 +//===== Compatible With: ===================================== +//= Any eAthena Version In Which Duplicate Works +//===== Description: ========================================= +//= Guides In RO World +//===== Additional Comments: ================================= +//= 1.2 - Used the duplicate and fixed minor things +//============================================================ + +//[Prontera Guide] + +//Complete +prontera.gat,154,187,4 script Guide#p1-1::guide_p 105,{ + cutin "prt_soldier",2; + mes "[Prontera Squad]"; + mes "Welcome to Prontera,the Capital City of Rune-Midgard Kingdom."; + mes "We can help you to find Buildings easily, Feel free to inquire at us anytime."; + mes "Please Choose a menu `Notice' if you are a beginner of Ragnarok."; +L_START_1: + next; + menu "View Buildings",L_MENU_1,"Wipe all Indications on Mini-Map.",L_MENU_2,"Notice",L_MENU_3,"Cancel",L_MENU_4; + L_MENU_1: + if (@COMPASS_CHECK != 0) goto L_MENU_1_ROOT; + mes "[Prontera Squad]"; + mes "Please choose a Menu first."; + mes "Do you want me to leave indications on the Mini-Map?"; + next; + menu "Yes, Please.",-,"No, Thanks.",L_MENU_1_ROOT; + set @COMPASS_CHECK,1; + L_MENU_1_ROOT: + mes "[Prontera Squad]"; + mes "Please select location you want me to show you."; + L_SUB_1: + next; + menu "Swordman Asosiation",L_MENU_1_1,"^0000FFSantuary^000000",L_MENU_1_2,"Prontera Chivalry",L_MENU_1_3,"Armory",L_MENU_1_4,"Kit Shop",L_MENU_1_5,"Inn",L_MENU_1_6,"Trading Post",L_MENU_1_7,"Pub",L_MENU_1_8,"Library",L_MENU_1_9,"Job Agency",L_MENU_1_10,"The Castle of Prontera",L_MENU_1_11,"City Hall",L_MENU_1_12,"Cancel",L_MENU_1_13; + L_MENU_1_1: + mes "[Prontera Squad]"; + mes "The 'Swordman Assosiation' has moved to Izlude, the Sattelite of Prontera, now that Building is Empty"; + if (@COMPASS_CHECK != 1) goto L_SUB_1; + viewpoint 1,237,41,1,0x00FF00; + goto L_SUB_1; + L_MENU_1_2: + mes "[Prontera Squad]"; + mes "The main Chapel of Rune-Midgard Kingdom, `Santuary' is located at Northeast. Usually citizens visit there to become Acolyte"; + if (@COMPASS_CHECK != 1) goto L_SUB_1; + viewpoint 1,236,316,2,0xFF0000; + goto L_SUB_1; + L_MENU_1_3: + mes "[Prontera Squad]"; + mes "'Prontera Chivalry' the Defense Force of Prontera City is located at Northwest."; + if (@COMPASS_CHECK != 1) goto L_SUB_1; + viewpoint 1,46,345,3,0x00FF00; + goto L_SUB_1; + L_MENU_1_4: + mes "[Prontera Squad]"; + mes "'Armory' is located at Northeast around the Fountain."; + if (@COMPASS_CHECK != 1) goto L_SUB_1; + viewpoint 1,175,220,4,0xFF00FF; + goto L_SUB_1; + L_MENU_1_5: + mes "[Prontera Squad]"; + mes "'Kit Shop' is located Northwest around the Fountain."; + if (@COMPASS_CHECK != 1) goto L_SUB_1; + viewpoint 1,134,221,5,0xFF00FF; + goto L_SUB_1; + L_MENU_1_6: + mes "[Prontera Squad]"; + mes "There are 2 'Inn's' around the Fountain, on is located at West, other one at East."; + if (@COMPASS_CHECK != 1) goto L_SUB_1; + viewpoint 1,204,214,6,0xFF00FF; + viewpoint 1,107,192,7,0xFF00FF; + goto L_SUB_1; + L_MENU_1_7: + mes "[Prontera Squad]"; + mes "'Trading Post' is located at Southeast around the Fountain."; + if (@COMPASS_CHECK != 1) goto L_SUB_1; + viewpoint 1,179,184,8,0x00FF00; + goto L_SUB_1; + L_MENU_1_8: + mes "[Prontera Squad]"; + mes "'Pub is located at Southeast around the Fountain, right behind Trading Post building."; + if (@COMPASS_CHECK != 1) goto L_SUB_1; + viewpoint 1,208,154,9,0x00FF00; + goto L_SUB_1; + L_MENU_1_9: + mes "[Prontera Squad]"; + mes "There are 2 Buildings of 'Library', located both at Northern East and Northern West around the Fountain."; + if (@COMPASS_CHECK != 1) goto L_SUB_1; + viewpoint 1,120,267,10,0x00FF00; + viewpoint 1,192,267,11,0x00FF00; + goto L_SUB_1; + L_MENU_1_10: + mes "[Prontera Squad]"; + mes "'Job Agency' is located at Southeast of the Fountain."; + if (@COMPASS_CHECK != 1) goto L_SUB_1; + viewpoint 1,133,183,12,0x00FF00; + goto L_SUB_1; + L_MENU_1_11: + mes "[Prontera Squad]"; + mes "'The Castle Of Prontera' is located at Due North. Clockwise rotation is 12."; + mes "And when you go outside the Castle through a postern, you will see the North Prontera Field."; + if (@COMPASS_CHECK != 1) goto L_SUB_1; + viewpoint 1,156,360,13,0x00FF00; + goto L_SUB_1; + L_MENU_1_12: + mes "[Prontera Squad]"; + mes "City Hall is located at Southeast Contour. The Clockwise rotarion is 7."; + if (@COMPASS_CHECK != 1) goto L_SUB_1; + viewpoint 1,75,91,14,0x00FF00; + goto L_SUB_1; + L_MENU_1_13: + mes "[Prontera Squad]"; + mes "If you want to remove location marks, Please choose 'Wipe all Indications on Mini-Map.'."; + goto L_START_1; + L_MENU_2: + viewpoint 2,237,41,1,0x00FF00; + viewpoint 2,236,316,2,0xFF0000; + viewpoint 2,46,345,3,0x00FF00; + viewpoint 2,175,220,4,0xFF00FF; + viewpoint 2,8,134,5,0xFF00FF; + viewpoint 2,204,214,6,0xFF00FF; + viewpoint 2,107,192,7,0xFF00FF; + viewpoint 2,179,184,8,0x00FF00; + viewpoint 2,208,154,9,0x00FF00; + viewpoint 2,120,267,10,0x00FF00; + viewpoint 2,192,267,11,0x00FF00; + viewpoint 2,133,183,12,0x00FF00; + viewpoint 2,156,360,13,0x00FF00; + viewpoint 2,75,91,14,0x00FF00; + set @COMPASS_CHECK,0; + goto L_START_1; + L_MENU_3: + mes "[Prontera Squad]"; + mes "We altered the Location Guide into de Newest Digital Style, out of the former Analog One."; + mes "Please Check this gorgeous newest system with your own eyes."; + next; + mes "[Prontera Squad]"; + mes "Don't forget to refer the Mini-Map on Upper-Right of the Screen."; + mes "If you can't see the Mini-Map, just use Shortcut 'ctrl+tab' or Click 'map' button on the Basic Information Window"; + mes "After that, Click '-' button on the Mini-Map until whole buildings are shown on it."; + goto L_START_1; + L_MENU_4: + mes "[Prontera Squad]"; + mes "Have a nice day."; + cutin "prt_soldier",255; + close; +} +//Duplicate +prontera.gat,282,208,2 duplicate(guide_p) Guide#p1-2 105 + +prontera.gat,29,200,6 duplicate(guide_p) Guide#p1-3 105 + +prontera.gat,160,29,0 duplicate(guide_p) Guide#p1-4 105 + +prontera.gat,151,330,4 duplicate(guide_p) Guide#p1-5 105 + + +//[Izlude] + +//Complete +izlude.gat,123,87,6 script Guide 105,{ + mes "[Izlude Squad]"; + mes "Welcome to Izlude, the New Satelite of Prontera."; + mes "Feel free to inquire at us anytime, Algight?"; +L_START_1: + next; + menu "View Buildings",L_MENU_1,"Wipe all Indications on Mini-Map.",L_MENU_2,"Notice",L_MENU_3,"Cancel",L_MENU_4; + L_MENU_1: + if (@COMPASS_CHECK != 0) goto L_MENU_1_ROOT; + mes "[Izlude Squad]"; + mes "Please choose a Menu first."; + mes "Do you want me to leave indications on the Mini-Map?"; + next; + menu "Yes, Please",-,"No, Thanks",L_SUB_1; + set @COMPASS_CHECK,1; + L_MENU_1_ROOT: + L_SUB_1: + next; + menu "^FF0000Swordman Asosiation^000000",L_MENU_1_1,"Swordman Hall",L_MENU_1_2,"Arena",L_MENU_1_3,"Izlude Marina",L_MENU_1_4,"Armory",L_MENU_1_5,"Kit Shop",L_MENU_1_6,"Cancel",L_MENU_1_7; + L_MENU_1_1: + mes "[Izlude Squad]"; + mes "Do you want to be a Swordman?"; + if (@COMPASS_CHECK != 1) goto L_SUB_1; + viewpoint 1,52,140,1,0xFF0000; + goto L_SUB_1; + L_MENU_1_2: + mes "[Izlude Squad]"; + mes "Swordman Hall, the official Building of Swordman Assosiation is at East Contour."; + if (@COMPASS_CHECK != 1) goto L_SUB_1; + viewpoint 1,214,130,2,0x00FF00; + goto L_SUB_1; + L_MENU_1_3: + mes "[Izlude Squad]"; + mes "'Arena' the Popular Colosseum is at Due North. The Clockwise totation is 12."; + mes "You can have fun there, you know."; + if (@COMPASS_CHECK != 1) goto L_SUB_1; + viewpoint 1,128,225,3,0x00FF00; + goto L_SUB_1; + L_MENU_1_4: + mes "[Izlude Squad]"; + mes "Marina which allows you to go to 'Alberta' or 'Byalan Island' is at Northeast."; + if (@COMPASS_CHECK != 1) goto L_SUB_1; + viewpoint 1,200,180,4,0xFF0000; + goto L_SUB_1; + L_MENU_1_5: + mes "[Izlude Squad]"; + mes "Armory is near at Northwest, and you can find it easily."; + if (@COMPASS_CHECK != 1) goto L_SUB_1; + viewpoint 1,111,149,5,0xFF00FF; + goto L_SUB_1; + L_MENU_1_6: + mes "[Izlude Squad]"; + mes "Kit Shop is near at Northeast, and you can find it easily."; + if (@COMPASS_CHECK != 1) goto L_SUB_1; + viewpoint 1,148,148,6,0xFF00FF; + goto L_SUB_1; + L_MENU_1_7: + mes "[Izlude Squad]"; + mes "If you want to remove location marks, Please choose 'Wipe all Indications on Mini-Map.'."; + goto L_START_1; + L_MENU_2: + viewpoint 2,52,140,1,0xFF0000; + viewpoint 2,214,130,2,0x00FF00; + viewpoint 2,128,225,3,0x00FF00; + viewpoint 2,200,180,4,0xFF0000; + viewpoint 2,111,149,5,0xFF00FF; + viewpoint 2,148,148,6,0xFF00FF; + set @COMPASS_CHECK,0; + goto L_START_1; + L_MENU_3: + mes "[Izlude Squad]"; + mes "We altered the Location Guideinto de Newest Digital Style, out of the former Analog One."; + mes "Please Check this gorgeous newest system with your own eyes."; + next; + mes "[Izlude Squad]"; + mes "Don't forget to refer the Mini-Map on Upper-Right of the Screen."; + mes "If you can't see the Mini-Map, just use Shortcut 'ctrl+tab' or Click 'map' button on the Basic Information Window"; + mes "After that, Click '-' button on the Mini-Map until whole buildings are shown on it."; + goto L_START_1; + L_MENU_4: + mes "[Izlude Squad]"; + mes "Don't get lost."; + close; +} + +//[Geffen] + +//Complete +geffen.gat,203,116,0 script Guide#p1-6::guide_g 705,{ + cutin "gef_soldier",2; + mes "[Geffen Squad]"; + mes "Welcome to Geffen, the City of Magic."; + mes "We will help you when you take the Wrong way, Feel free to inquire at us anytime."; + mes "Please Choose a menu `Notice' if you are a beginner of Ragnarok."; +L_START_1: + next; + menu "View Buildings",L_MENU_1,"Wipe all Indications on Mini-Map.",L_MENU_2,"Notice",L_MENU_3,"Cancel",L_MENU_4; + L_MENU_1: + if (@COMPASS_CHECK != 0) goto L_MENU_1_ROOT; + mes "[Geffen Squad]"; + mes "Please choose a Menu first."; + mes "Do you want me to leave indications on the Mini-Map?"; + next; + menu "Yes, Please",-,"No, Thanks",L_MENU_1_ROOT; + set @COMPASS_CHECK,1; + L_MENU_1_ROOT: + L_SUB_1: + next; + menu "^FF0000Magic Acadamy^000000",L_MENU_1_1,"Forge",L_MENU_1_2,"Armory",L_MENU_1_3,"Kit Shop",L_MENU_1_4,"Pub",L_MENU_1_5,"Inn",L_MENU_1_6,"Cancel",L_MENU_1_7; + L_MENU_1_1: + mes "[Geffen Squad]"; + mes "'Magic Acadamy' is the Building in charge of Every Magical Theory."; + if (@COMPASS_CHECK != 1) goto L_SUB_1; + viewpoint 1,61,180,1,0xFF0000; + goto L_SUB_1; + L_MENU_1_2: + mes "[Geffen Squad]"; + mes "'Forge' is located at Southeast around the Tower of Magic."; + if (@COMPASS_CHECK != 1) goto L_SUB_1; + viewpoint 1,182,59,2,0x00FF00; + goto L_SUB_1; + L_MENU_1_3: + mes "[Geffen Squad]"; + mes "'Armory' is located at Northwest oround the Tower of Magic."; + if (@COMPASS_CHECK != 1) goto L_SUB_1; + viewpoint 1,99,140,3,0xFF00FF; + goto L_SUB_1; + L_MENU_1_4: + mes "[Geffen Squad]"; + mes "'Kit Shop' is located at Southwest arround the Tower of Magic."; + if (@COMPASS_CHECK != 1) goto L_SUB_1; + viewpoint 1,44,86,4,0xFF00FF; + goto L_SUB_1; + L_MENU_1_5: + mes "[Geffen Squad]"; + mes "'Pub' is located at Northeast around the Tower of Magic."; + if (@COMPASS_CHECK != 1) goto L_SUB_1; + viewpoint 1,138,138,5,0xFF00FF; + goto L_SUB_1; + L_MENU_1_6: + mes "[Geffen Squad]"; + mes "'Inn' is located at Northeast around the Tower of Magic."; + if (@COMPASS_CHECK != 1) goto L_SUB_1; + viewpoint 1,172,174,6,0xFF00FF; + goto L_SUB_1; + L_MENU_1_7: + mes "[Geffen Squad]"; + mes "If you want to remove location marks, Please choose 'Wipe all Indications on Mini-Map.'."; + goto L_START_1; + L_MENU_2: + viewpoint 2,61,180,1,0xFF0000; + viewpoint 2,182,59,2,0x00FF00; + viewpoint 2,99,140,3,0xFF00FF; + viewpoint 2,44,86,4,0xFF00FF; + viewpoint 2,138,138,5,0xFF00FF; + viewpoint 2,172,174,6,0xFF00FF; + set @COMPASS_CHECK,0; + goto L_START_1; + L_MENU_3: + mes "[Geffen Squad]"; + mes "We altered the Location Guide into de Newest Digital Style, out of the former Analog One."; + mes "Please Check this gorgeous newest system with your own eyes."; + next; + mes "[Geffen Squad]"; + mes "Don't forget to refer the Mini-Map on Upper-Right of the Screen."; + mes "If you can't see the Mini-Map, just use Shortcut 'ctrl+tab' or Click 'map' button on the Basic Information Window"; + mes "After that, Click '-' button on the Mini-Map until whole buildings are shown on it."; + goto L_START_1; + L_MENU_4: + mes "[Geffen Squad]"; + mes "Have a nice day."; + cutin "gef_soldier",255; + close; +} + +//Duplicate +geffen.gat,118,62,0 duplicate(guide_g) Guide#p1-7 105 + +//[Payon] +payon.gat,82,116,4 script Guide#p1-8::guide_p 708,{ + cutin "pay_soldier",2; + mes "[Payon Squad]"; + mes "Welcome to Payon, the uplander village."; + mes "We will help you when you take the wrong way, Feel free to inquire at us anytime."; + mes "Please Choose a menu `Notice' if you are a beginner of Ragnarok."; +L_START_1: + next; + menu "View Buildings",L_MENU_1,"Wipe all Indications on Mini-Map.",L_MENU_2,"Notice",L_MENU_3,"Cancel",L_MENU_4; + L_MENU_1: + if (@COMPASS_CHECK != 0) goto L_MENU_1_ROOT; + mes "[Payon Squad]"; + mes "Please choose a Menu first."; + mes "Do you want me to leave indications on the Mini-Map?"; + next; + menu "Yes, Please",-,"No, Thanks",L_MENU_1_ROOT; + set @COMPASS_CHECK,1; + L_MENU_1_ROOT: + L_SUB_1: + next; + menu "^FF0000Archer Guild^000000",L_MENU_1_1,"Armory",L_MENU_1_2,"Kit Shop",L_MENU_1_3,"Inn",L_MENU_1_4,"Central Palace",L_MENU_1_5,"Cancel",L_MENU_1_6; + L_MENU_1_1: + mes "[Payon Squad]"; + mes "'Archer Guild' is a Control Office of Archers. It is located at Northeast Contour of the Archer Village."; + if (@COMPASS_CHECK != 1) goto L_SUB_1; + viewpoint 1,174,189,1,0xFF0000; + goto L_SUB_1; + L_MENU_1_2: + mes "[Payon Squad]"; + mes "'Armory' is located at Northwest around the Centre."; + if (@COMPASS_CHECK != 1) goto L_SUB_1; + viewpoint 1,30,176,2,0xFF00FF; + goto L_SUB_1; + L_MENU_1_3: + mes "[Payon Squad]"; + mes "'Kit Shop' is located at Northwest Contour of the Archer Village."; + if (@COMPASS_CHECK != 1) goto L_SUB_1; + viewpoint 1,174,189,3,0xFF00FF; + goto L_SUB_1; + L_MENU_1_4: + mes "[Payon Squad]"; + mes "'Inn' is located at East around the Centre."; + if (@COMPASS_CHECK != 1) goto L_SUB_1; + viewpoint 1,172,134,4,0xFF00FF; + goto L_SUB_1; + L_MENU_1_5: + mes "[Payon Squad]"; + mes "'Central Palace' is at North around the Centre."; + if (@COMPASS_CHECK != 1) goto L_SUB_1; + viewpoint 1,89,166,5,0x00FF00; + goto L_SUB_1; + L_MENU_1_6: + mes "[Payon Squad]"; + mes "If you want to remove location marks, Please choose 'Wipe all Indications on the Mini-Map.'."; + goto L_START_1; + L_MENU_2: + viewpoint 2,174,189,1,0xFF0000; + viewpoint 2,30,176,2,0xFF00FF; + viewpoint 2,174,189,3,0xFF00FF; + viewpoint 2,172,134,4,0xFF00FF; + viewpoint 2,89,166,5,0x00FF00; + set @COMPASS_CHECK,0; + goto L_START_1; + L_MENU_3: + mes "[Payon Squad]"; + mes "We altered the Location Guide into de Newest Digital Style, out of the former Analog One."; + mes "Please Check this gorgeous newest system with your own eyes."; + next; + mes "[Payon Squad]"; + mes "Don't forget to refer the Mini-Map on Upper-Right of the Screen."; + mes "If you can't see the Mini-Map, just use Shortcut 'ctrl+tab' or Click 'map' button on the Basic Information Window"; + mes "After that, Click '-' button on the Mini-Map until whole buildings are shown on it."; + goto L_START_1; + L_MENU_4: + mes "[Payon Squad]"; + mes "Bon Voyage, Wanderer."; + cutin "pay_soldier",255; + close; +} + +//Duplicate +pay_arche.gat,85,30,2 duplicate(guide_p) Guide#p1-9 105 + +//[Alberta] + +alberta.gat,23,238,4 script Guide#p1-10::guide_a 105,{ + mes "[Alberta Squad]"; + mes "Welcome to Alberta, the The Port Town."; + mes "We will helpyou when you take a wrong way, Feel free to inquire at us anytime."; + mes "Please Choose a menu `Notice' if you are a beginner of Ragnarok."; +L_START_1: + next; + menu "View Buildings",L_MENU_1,"Wipe all Indications on Mini-Map.",L_MENU_2,"Notice",L_MENU_3,"Cancel",L_MENU_4; + L_MENU_1: + if (@COMPASS_CHECK != 0) goto L_SUB_1; + mes "[Alberta Squad]"; + mes "Please choose a Menu first."; + mes "Do you want me to leave indications on the Mini-Map?"; + next; + menu "Yes, Please",-,"No, Thanks",L_MENU_1_ROOT; + set @COMPASS_CHECK,1; + L_MENU_1_ROOT: + L_SUB_1: + menu "^FF0000Merchant Guild^000000",L_MENU_1_1,"Armory",L_MENU_1_2,"Kit Shop",L_MENU_1_3,"Inn",L_MENU_1_4,"Cancel",L_MENU_1_5; + L_MENU_1_1: + mes "[Alberta Squad]"; + mes "'Merchant Guild' will help you to transform into a Merchant."; + if (@COMPASS_CHECK != 1) goto L_SUB_1; + viewpoint 1,33,41,1,0xFF0000; + goto L_SUB_1; + L_MENU_1_2: + mes "[Alberta Squad]"; + mes "'Armory' is located at North Contour from the Centre of Mini-Map."; + if (@COMPASS_CHECK != 1) goto L_SUB_1; + viewpoint 1,117,37,2,0xFF00FF; + goto L_SUB_1; + L_MENU_1_3: + mes "[Alberta Squad]"; + mes "'Kit Shop' is located at the Centre of Mini-Map."; + if (@COMPASS_CHECK != 1) goto L_SUB_1; + viewpoint 1,98,154,3,0xFF00FF; + goto L_SUB_1; + L_MENU_1_4: + mes "[Alberta Squad]"; + mes "'Armory' is located at North Contour around the Centre of Mini-Map."; + if (@COMPASS_CHECK != 1) goto L_SUB_1; + viewpoint 1,65,233,4,0xFF00FF; + goto L_SUB_1; + L_MENU_1_5: + mes "[Alberta Squad]"; + mes "If you want to remove location marks, Please choose 'Wipe all Indications on Mini-Map.'."; + goto L_START_1; + L_MENU_2: + viewpoint 2,33,41,1,0xFF0000; + viewpoint 2,117,37,2,0xFF00FF; + viewpoint 2,98,154,3,0xFF00FF; + viewpoint 2,65,233,4,0xFF00FF; + set @COMPASS_CHECK,0; + goto L_START_1; + L_MENU_3: + mes "[Alberta Squad]"; + mes "We altered the Location Guideinto de Newest Digital Style, out of the former Analog One."; + mes "Please Check this gorgeous newest system with your own eyes."; + next; + mes "[Alberta Squad]"; + mes "Don't forget to refer the Mini-Map on Upper-Right of the Screen."; + mes "If you can't see the Mini-Map, just use Shortcut 'ctrl+tab' or Click 'map' button on the Basic Information Window"; + mes "After that, Click '-' button on the Mini-Map until whole buildings are shown on it."; + goto L_START_1; + L_MENU_4: + mes "[Alberta Squad]"; + mes "Ta Ta."; + close; +} + +//Duplicate +alberta.gat,120,60,3 duplicate(guide_a) Guide#p1-11 105 + +//[Morroc] + +morocc.gat,153,286,6 script Guide#p1-12::guide_m 707,{ + cutin "moc_soldier",2; + mes "[Morocc Squad]"; + mes "Welcome to Morroc,the Frontier."; + mes "We will help you when you take a Wrong Way, Feel free to inquire at us anytime, Algight?"; +L_START_1: + next; + menu "View Buildings",L_MENU_1,"Wipe all Indications on Mini-Map.",L_MENU_2,"Notice",L_MENU_3,"Cancel",L_MENU_4; + L_MENU_1: + if (@COMPASS_CHECK != 0) goto L_SUB_1; + mes "[Morocc Squad]"; + mes "Please choose a Menu first."; + mes "Do you want me to leave indications on the Mini-Map?"; + next; + menu "Yes, Please",-,"No, Thanks",L_MENU_1_ROOT; + set @COMPASS_CHECK,1; + L_MENU_1_ROOT: + L_SUB_1: + next; + menu "^FF0000Thief Guild^000000",L_MENU_1_1,"Armory",L_MENU_1_2,"Inn",L_MENU_1_3,"Pub",L_MENU_1_4,"Mercenary Guild",L_MENU_1_5,"Cancel",L_MENU_1_6; + L_MENU_1_1: + mes "[Morocc Squad]"; + mes "'Thief Guild' wich grants you to be a Thief is located inside by hearsay..."; + if (@COMPASS_CHECK != 1) goto L_SUB_1; + viewpoint 1,24,297,1,0xFF0000; + goto L_SUB_1; + L_MENU_1_2: + mes "[Morocc Squad]"; + mes "'Armory' is located at Southwest around the Centre of Mini-Map."; + if (@COMPASS_CHECK != 1) goto L_SUB_1; + viewpoint 1,253,56,2,0xFF00FF; + goto L_SUB_1; + L_MENU_1_3: + mes "[Morocc Squad]"; + mes "In Morroc there are 2 'Inn's' located both at South and Northeast around the Centre on Mini-Map."; + if (@COMPASS_CHECK != 1) goto L_SUB_1; + viewpoint 1,274,269,3,0xFF00FF; + viewpoint 1,197,66,3,0xFF00FF; + goto L_SUB_1; + L_MENU_1_4: + mes "[Morocc Squad]"; + mes "'Pub' is located at Northwest around the Centre."; + if (@COMPASS_CHECK != 1) goto L_SUB_1; + viewpoint 1,52,259,4,0xFF00FF; + goto L_SUB_1; + L_MENU_1_5: + mes "[Morocc Squad]"; + mes "'Mercenary Guild' is at East Contour around the Centre of Mini-Map."; + if (@COMPASS_CHECK != 1) goto L_SUB_1; + viewpoint 1,284,171,5,0x00FF00; + goto L_SUB_1; + L_MENU_1_6: + mes "[Morocc Squad]"; + mes "If you want to remove location marks, Please choose 'Wipe all Indications on the Mini-Map.'."; + goto L_START_1; + L_MENU_2: + viewpoint 2,24,297,1,0xFF0000; + viewpoint 2,253,56,2,0xFF00FF; + viewpoint 2,274,269,3,0xFF00FF; + viewpoint 2,197,66,3,0xFF00FF; + viewpoint 2,52,259,4,0xFF00FF; + viewpoint 2,284,171,5,0x00FF00; + set @COMPASS_CHECK,0; + goto L_START_1; + L_MENU_3: + mes "[Morocc Squad]"; + mes "We altered the Location Guide into de Newest Digital Style, out of the former Analog One."; + mes "Please Check this gorgeous newest system with your own eyes."; + next; + mes "[Morroc Squad]"; + mes "Don't forget to refer the Mini-Map on Upper-Right of the Screen."; + mes "If you can't see the Mini-Map, just use Shortcut 'ctrl+tab' or Click 'map' button on the Basic Information Window"; + mes "After that, Click '-' button on the Mini-Map until whole buildings are shown on it."; + goto L_START_1; + L_MENU_4: + mes "[Morocc Squad]"; + mes "Good by for now."; + cutin "moc_soldier",255; + close; +} + +//Duplicate +morocc.gat,54,97,6 duplicate(guide_m) Guide#p1-13 707 + + +//[Comodo] + +comodo.gat,322,178,4 script Guide#p1-14::guide_c 700,{ + mes "[Native Papaya]"; + mes "Where the night life continues 24 hours a day"; + mes "The city of Dreams and Fantasy!"; + mes "We welcome you to the land of Comodo!"; + mes "I know the area very well."; + mes "If you need directions, ask me anytime for asistance"; + next; + menu "Casino",L_MENU_1,"Hula dancing stage ^0000FF(Dancer Job Change)^000000",L_MENU_2,"Weapons and Armor Shop",L_MENU_3,"Tool store",L_MENU_4,"Tourist Shop",L_MENU_5,"Kafra Corp. Western Branch",L_MENU_6,"Chief's House",L_MENU_7,"Pub",L_MENU_8,"Camp Ground",L_MENU_9,"End Conversation",L_MENU_10; + L_MENU_1: + viewpoint 1,140,98,1,0xFF6633; + mes "^FF0000+^000000 -> Casino!"; + mes "The heart of Comodo's night life!"; + mes "A heaven of rest for tired travelers!"; + mes "Another service provided here.!"; + mes "The COmodo Casino ~!"; + close; + L_MENU_2: + viewpoint 1,188,168,2,0x0000FF; + mes "^0000FF+^000000 -> Hula dancing Stage"; + mes "Hula Hula - Hula Hula"; + mes "When you become more comfortable performing on stage, you should consider changing job to be a Dancer"; + mes "What do you think? Hula Dancing Stage - ^0000FF(Change job to Dancer)^000000"; + close; + L_MENU_3: + viewpoint 1,266,70,3,0x00FFFF; + mes "^00FFFF+^000000 -> Weapons and Armor Shop"; + mes "Here in Comodo, you can find unique items only found in Comodo."; + mes "'Comodo Weapons and Armor Shop'"; + close; + L_MENU_4: + viewpoint 1,86,128,4,0x515151; + mes "^808080+^000000 -> Tool Shop"; + mes "Here in Comodo, you can find tools only found in Comodo"; + mes "'Comodo Tool Store'"; + close; + L_MENU_5: + viewpoint 1,298,124,5,0x3355FF; + mes "^0000FF+^000000 -> Tourist Shop"; + mes "Here in Comodo, you can find unique gifts only found in Comodo"; + mes "'Comodo Tourist Shop'"; + close; + L_MENU_6: + viewpoint 1,136,202,6,0xFF5555; + mes "^FF0000+^000000 -> Kafra Corp. Western Branch"; + mes "The Western Branch of Midgards Kafra Corp."; + mes "Ofering you the best service!"; + mes "Kafra Corp.'s Western Branch center is located here in Comodo"; + close; + L_MENU_7: + viewpoint 1,114,294,7,0xFF5555; + mes "^FF0000+^000000 -> Chief's House"; + mes "This is the house where the Chief of Comodo resides."; + mes "If you are one who posseses a serious interest in Comodo, you can meet the Chief in person."; + mes "I think that would be okay with him."; + close; + L_MENU_8: + viewpoint 1,166,298,8,0xFF5555; + mes "^FF0000+^000000 -> Pub"; + mes "The pub is a place where tourists from all over the world come to converse and exchange ideas"; + mes "Bringing the ethnic atmosphere of Comodo, to an environment which tourists can enjoy"; + close; + L_MENU_9: + viewpoint 1,210,308,9,0xFF5555; + mes "^FF0000+^000000 -> Camp Ground"; + mes "Sometimes with family and sometimes with friends, people come to Comodo campground to creat great memories."; + mes "BBQ Camp Ground is where you can taste the ethnic flavors of Comodo's Spit BBQ!"; + close; + L_MENU_10: + mes "[Native Papaya]"; + mes "Because Comodo is located in a cave, sunlight cannot shine into this area."; + mes "It is dark 24 hours a day!"; + mes "The residents of Comodo are using this unusual circumstance to draw tourists to our area..."; + close; +} + +//Duplicates +comodo.gat,176,350,4 duplicate(guide_c) Guide#p1-14 700 + +comodo.gat,37,219,4 duplicate(guide_c) Guide#p1-15 700 + +//[Yuno] + +//Needs Translation +yuno.gat,153,47,4 script "ƒWƒ…ƒm[ƒKƒCƒh" 700,{ + mes "[ƒWƒ…ƒm[ƒKƒCƒh]"; + mes "‰ß‹Ž‚ð’m‚ècc"; + mes "Œ»Ý‚ðŒ©‚Â‚ßcc"; + mes "–¢—ˆ‚ð—\’m‚·‚écc"; + mes "‚±‚±‚ÍŒ«ŽÒ‚½‚¿‚Ì“sŽs"; + mes "- ƒWƒ…ƒm[ -"; + mes "ƒWƒ…ƒm[‚ɂ悤‚±‚»"; + next; + menu "•Ší–h‹ï“X",L1,"“¹‹ï“X",L2,"ƒZ[ƒWƒLƒƒƒbƒXƒ‹ (ƒZ[ƒW“]EŠ)",L3,"‘“X’Ê‚è",L4,"’†‰›Lê",L5,"‹¤˜a‘}‘ŠÙ",L6,"ƒVƒ…ƒoƒCƒ`ƒFƒ‹–‚–@ƒAƒJƒfƒ~[",L7,"ƒ‚ƒ“ƒXƒ^[”Ž•¨ŠÙ",L8,"‰ï˜b‚ðCancel",LEnd; +L1: + mes "[ƒWƒ…ƒm[ƒKƒCƒh]"; + viewpoint 1,120,138,1,0xFF3355; + mes "^FF3355+^000000 -> •Ší–h‹ï“X"; + goto Lgo; +L2: + mes "[ƒWƒ…ƒm[ƒKƒCƒh]"; + viewpoint 1,193,142,2,0x3355FF; + mes "^3355FF+^000000 -> “¹‹ï“X"; + goto Lgo; +L3: + mes "[ƒWƒ…ƒm[ƒKƒCƒh]"; + viewpoint 1,90,318,3,0x33FF55; + mes "^33FF55+^000000 -> ƒZ[ƒWƒLƒƒƒbƒXƒ‹"; + mes "(ƒZ[ƒW“]EŠ)"; + goto Lgo; +L4: + mes "[ƒWƒ…ƒm[ƒKƒCƒh]"; + viewpoint 1,257,102,4,0xFF3355; + mes "^FF3355+^000000 -> ‘“X’Ê‚è"; + goto Lgo; +L5: + mes "[ƒWƒ…ƒm[ƒKƒCƒh]"; + viewpoint 1,157,170,5,0x3355FF; + mes "^3355FF+^000000 -> ’†‰›Lê"; + goto Lgo; +L6: + mes "[ƒWƒ…ƒm[ƒKƒCƒh]"; + viewpoint 1,336,204,6,0x33FF55; + mes "^33FF55+^000000 -> ‹¤˜a‘}‘ŠÙ"; + goto Lgo; +L7: + mes "[ƒWƒ…ƒm[ƒKƒCƒh]"; + viewpoint 1,323,281,7,0xFF3355; + mes "^FF3355+^000000 -> ƒVƒ…ƒoƒCƒ`ƒFƒ‹–‚–@ƒAƒJƒfƒ~["; + goto Lgo; +L8: + mes "[ƒWƒ…ƒm[ƒKƒCƒh]"; + viewpoint 1,278,288,8,0x3355FF; + mes "^3355FF+^000000 -> ƒ‚ƒ“ƒXƒ^[”Ž•¨ŠÙ"; + goto Lgo; +Lgo: + mes "‚É‚È‚è‚Ü‚·B"; + mes "—Ç‚¢Žž‚ð‚¨‰ß‚²‚µ‚‚¾‚³‚¢B"; + close; +LEnd: + mes "[ƒWƒ…ƒm[ƒKƒCƒh]"; + mes "Œ«ŽÒ‚½‚¿‚Ì‘å“sŽs"; + mes "‚»‚µ‚Ä’mŽ¯‚Ì•óŒÉ"; + mes "ƒWƒ…ƒm[‚ւ悤‚±‚»I"; + close; +} + +//[Amatsu] + +//Needs Translation +amatsu.gat,207,91,4 script ƒ~ƒXEƒAƒ}ƒc 758,{ + mes "[Œu‚¿‚á‚ñ]"; + mes "Ž„‚ÍA‘æ13‘ãƒ~ƒXEƒAƒ}ƒc"; + mes "¢Œu£‚Æ\‚µ‚Ü‚·B"; + mes "ƒAƒ}ƒc‘ã•\‚Æ‚µ‚Ä"; + mes "‘º‚̈ēà‚ð‹Â‚¹‚‚©‚Á‚Ä‚¨‚è‚Ü‚·B"; + mes "‚È‚É‚©‚²Ž¿–₪‚ ‚è‚Ü‚µ‚½‚ç"; + mes "‚È‚ñ‚È‚è‚Æ‚¨‚Á‚µ‚á‚Á‚Ä‚‚¾‚³‚¢‚Ü‚¹B"; + next; + menu "é",L1,"“¹‹ï“X",L2,"•Ší“X",L3,"‹Žð‰®",L4; +L1: + viewpoint 1,85,235,0,0xFF3355; + mes "[Œu‚¿‚á‚ñ]"; + mes "ƒ~ƒjƒ}ƒbƒv‚Ì"; + mes "^FF3355+^000000•”•ª‚ª"; + mes "é‚Å‚²‚´‚¢‚Ü‚·B"; + goto LEnd; +L2: + viewpoint 1,96,118,1,0xCE6300; + mes "[Œu‚¿‚á‚ñ]"; + mes "ƒ~ƒjƒ}ƒbƒv‚Ì"; + mes "^CE6300+^000000•”•ª‚ª"; + mes "“¹‹ï“X‚É‚È‚è‚Ü‚·B"; + goto LEnd; +L3: + viewpoint 1,132,117,2,0x55FF33; + mes "[Œu‚¿‚á‚ñ]"; + mes "ƒ~ƒjƒ}ƒbƒv‚Ì"; + mes "^55FF33+^000000•”•ª‚ª"; + mes "•Ší“X‚É‚È‚è‚Ü‚·B"; + goto LEnd; +L4: + viewpoint 1,217,116,3,0x3355FF; + mes "[Œu‚¿‚á‚ñ]"; + mes "ƒ~ƒjƒ}ƒbƒv‚Ì"; + mes "^3355FF+^000000•”•ª‚ª"; + mes "‹Žð‰®‚É‚È‚è‚Ü‚·B"; +LEnd: + mes "‚»‚ê‚Å‚ÍAƒAƒ}ƒc‚Å"; + mes "Šy‚µ‚¢ŽžŠÔ‚ð‚¨‰ß‚²‚µ‰º‚³‚¢‚Ü‚¹B"; + close; +} + +amatsu.gat,251,283,4 script ˆÄ“àl 767,{ + mes "[ˆÄ“àl]"; + mes "‚悤‚±‚»B"; + mes "—·‚ð‚·‚é‚É‚Í—Ç‚¢‹Gß‚Å‚·‚ËB"; + mes "Ž„‚Í‚±‚̃Aƒ}ƒc‚Ì"; + mes "ˆÄ“à‚ðˆø‚«Žó‚¯‚Ä‚¨‚éŽÒ‚Å‚·B"; + next; + mes "[ˆÄ“àl]"; + mes "‰½‚ð‚¨’T‚µ‚Å‚·‚©H"; + next; + menu "é",L1,"“¹‹ï“X",L2,"•Ší“X",L3,"‹Žð‰®",L4; +L1: + viewpoint 1,85,235,0,0xFF3355; + mes "[ˆÄ“àl]"; + mes "ƒ~ƒjƒ}ƒbƒv‚Ì"; + mes "^FF3355+^000000•”•ª‚ª"; + mes "é‚Å‚²‚´‚¢‚Ü‚·B"; + goto LEnd; +L2: + viewpoint 1,96,118,1,0xCE6300; + mes "[ˆÄ“àl]"; + mes "ƒ~ƒjƒ}ƒbƒv‚Ì"; + mes "^CE6300+^000000•”•ª‚ª"; + mes "“¹‹ï“X‚É‚È‚è‚Ü‚·B"; + goto LEnd; +L3: + viewpoint 1,132,117,2,0x55FF33; + mes "[ˆÄ“àl]"; + mes "ƒ~ƒjƒ}ƒbƒv‚Ì"; + mes "^55FF33+^000000•”•ª‚ª"; + mes "•Ší“X‚É‚È‚è‚Ü‚·B"; + goto LEnd; +L4: + viewpoint 1,217,116,3,0x3355FF; + mes "[ˆÄ“àl]"; + mes "ƒ~ƒjƒ}ƒbƒv‚Ì"; + mes "^3355FF+^000000•”•ª‚ª"; + mes "‹Žð‰®‚É‚È‚è‚Ü‚·B"; +LEnd: + mes "‚»‚ê‚Å‚ÍAƒAƒ}ƒc‚Å"; + mes "Šy‚µ‚¢ŽžŠÔ‚ð‚¨‰ß‚²‚µ‰º‚³‚¢‚Ü‚¹B"; + close; +} + + +//[Gonryun] + +//Needs Translation +gonryun.gat,163,60,4 script ƒRƒ“ƒƒ“ƒKƒCƒh 780,{ + mes "[ƒn ƒEƒHƒ“ƒ`]"; + mes "‚¢‚Â‚àŠˆ‹C‚É–ž‚¿‚ÄA”M‹C‚ª‚ ‚Ó‚ê"; + mes "–ˆ“úlX‚ªs‚«Œð‚Á‚Ä‚¢‚é"; + mes "ƒRƒ“ƒƒ“‚É‚¢‚ç‚Á‚µ‚á‚¢‚Ü‚¹!"; + next; + mes "[ƒn ƒEƒHƒ“ƒ`]"; + mes "¤”„‚ª‚çA‘º‚̈ēà‚ð‚µ‚Ä"; + mes "‚¢‚Ü‚·B’m‚肽‚¢‚±‚Æ‚ª‚ ‚ê‚Î"; + mes "‰½‚Å‚à•·‚¢‚Ä‚‚¾‚³‚¢B"; + next; + menu "‘º’·‚̉Æ",L1,"“¹‹ï¤l",L2,"•Ší¤l",L3,"–h‹ï¤l",L4,"—·ŠÙ",L5; +L1: + viewpoint 1,109,131,0,0xff3355; + mes "[ƒn ƒEƒHƒ“ƒ`]"; + mes "ƒ~ƒjƒ}ƒbƒv‚Ì"; + mes "^ff3355+^000000‚̈ʒu‚É"; + mes "‘º’·‚̉Ƃª‚ ‚è‚Ü‚·B"; + goto Lend; +L2: + viewpoint 1,147,84,1,0xce6300; + mes "[ƒn ƒEƒHƒ“ƒ`]"; + mes "ƒ~ƒjƒ}ƒbƒv‚Ì"; + mes "^ce6300+^000000‚̈ʒu‚É"; + mes "“¹‹ï¤l‚ª‚¢‚Ü‚·B"; + goto Lend; +L3: + viewpoint 1,174,101,2,0x55ff33; + mes "[ƒn ƒEƒHƒ“ƒ`]"; + mes "ƒ~ƒjƒ}ƒbƒv‚Ì"; + mes "^55ff33+^000000‚̈ʒu‚É"; + mes "•Ší¤l‚ª‚¢‚Ü‚·B"; + goto Lend; +L4: + viewpoint 1,173,84,3,0x3355ff; + mes "[ƒn ƒEƒHƒ“ƒ`]"; + mes "ƒ~ƒjƒ}ƒbƒv‚Ì"; + mes "^3355ff+^000000‚̈ʒu‚É"; + mes "–h‹ï¤l‚ª‚¢‚Ü‚·B"; + goto Lend; +L5: + viewpoint 1,215,114,4,0xffffff; + mes "[ƒn ƒEƒHƒ“ƒ`]"; + mes "ƒ~ƒjƒ}ƒbƒv‚Ì"; + mes "^ffffff+^000000‚̈ʒu‚É"; + mes "—·ŠÙ‚ª‚ ‚è‚Ü‚·B"; + goto Lend; +Lend: + mes "Ž„’B‚ÌŠy‚µ‚¢ƒRƒ“ƒƒ“‚ð"; + mes "Žv‚¢‚Á‚«‚èŠy‚µ‚ñ‚Å‚‚¾‚³‚¢I"; + close; +} + +// Below not in japanese NPC + +aldebaran.gat,139,63,4 script Soldier 105,{ + mes "[Al De Baran Guard]"; + mes "I am just any ordinary guard you could find in any other cities!!"; + mes "I am in charge of Service Guide in Al De Baran Garrison, and the name is Al De Baran Guard (No Name) !!"; + mes "I will guide you though our town!"; + next; + menu "Get Location Guide",L0,"End conversation",End; + + L0: + mes "^FF0000+^000000 -> Kafra Main Office"; + mes "^0000FF+^000000 -> Weapon Shop"; + mes "^00F0F0+^000000 -> Sorcerer Guild (Closed)"; + mes "^808080+^000000 -> Pub"; + mes "^00FF00+^000000 -> Item Shop"; + mes "^F0F000+^000000 -> Chemical Acadamy (Closed)"; + viewpoint 0,53,228,1,0xFF0000; + viewpoint 1,48,198,1,0x0000FF; + viewpoint 2,48,198,1,0x00F0F0; + viewpoint 3,48,198,1,0x808080; + viewpoint 4,48,198,1,0x00FF00; + viewpoint 5,35,35,1,0xF0F000; + close; + LEnd: + mes "[Al De Baran Guard]"; + mes "We are shown to protect Al De Baran!!"; + close; +} + +izlude.gat,124,178,4 script Soldier 105,{ + mes "[Soldier]"; + mes "HeHeHeHe... HaHaHaHa"; + mes "Huh? Why am I so happy?"; + mes "you wanna know?"; + next; + menu "Sure, why?",Sure,"Not really, I don't care.",NotReally; + + Sure: + mes "[Soldier]"; + mes "Ah~~ There is not much for us to do these days. Merchants buy items, which monsters drop. You knew that, right?"; + next; + menu "Of course",OfCourse,"Eh? Really?",EhReally; + + OfCourse: + mes "[Soldier]"; + mes "HaHa In fact, that was actually our job."; + mes "But there were more and more hunters who come in order to get paid. So it was just too much to handle."; + next; + mes "[Soldier]"; + mes "We had to work over time every day."; + mes "Ah~~~ that was a nightmare...~~~"; + mes "Anyways, the government took a smart action, making the Registration System. The Office of Prize Compensation only pays those who have the Registration."; + next; + mes "[Soldier]"; + mes "Requirements for the Registration are for a merchant to secure sufficient funds and to stay at one place all the time. The Office gives away the registration to any merchant who fullfills those requirements."; + next; + mes "[Soldier]"; + mes "So there aren't too many people that come to us any more. I mean we are still busy, but that's nothing compared to how it was before~~"; + mes "People who suffered first know how to thank even the slightest comfort."; + mes "HaHaHaHaHa!"; + close; + EhReally: + mes "[Soldier]"; + mes "What?! What do you mean you didn't know?!"; + mes "Hm... well... well... You know you could get some items killing some monsters. You could make some money out of it if you bring and sell those to a merchant."; + mes "ANYWAYS!"; + next; + mes "[Soldier]"; + mes "HaHa In fact, that was actually our job."; + mes "But there were more and more hunters who come in order to get paid. So it was just too much to handle."; + next; + mes "[Soldier]"; + mes "We had to work over time every day."; + mes "Ah~~~ that was a nightmare...~~~"; + mes "Anyways, the government took a smart action, making the Registration System. The Office of Prize Compensation only pays those who have the Registration."; + next; + mes "[Soldier]"; + mes "Requirements for the Registration are for a merchant to secure sufficient funds and to stay at one place all the time. The Office gives away the registration to any merchant who fullfills those requirements."; + next; + mes "[Soldier]"; + mes "So there aren't too many people that come to us any more. I mean we are still busy, but that's nothing compared to how it was before~~"; + mes "People who suffered first know how to thank even the slightest comfort."; + mes "HaHaHaHaHa!"; + close; + NotReally: + mes "[Soldier]"; + mes "OK Good bye~~"; + close; +} + +prontera.gat,160,330,4 script Guard#p2-1::guard_p 105,{ + mes "Welcome to Prontera."; + close; +} + +prontera.gat,223,99,1 duplicate(guard_p) Guard#p2-2 105 + +prontera.gat,229,104,1 duplicate(guard_p) Guard#p2-3 105 + +prontera.gat,47,339,5 duplicate(guard_p) Guard#p2-4 105 + +prontera.gat,52,344,5 duplicate(guard_p) Guard#p2-5 105 + + +prt_maze02.gat,100,69,4 script Soldier#p3-1::soldier_p 105,{ + mes "[Soldier]"; + mes "Yo yo, you'd be better not to go in there. It has rumored there is a Demon living in the forest."; + mes "Of course it is just a rumor because no one see the people turning back from the palce."; + mes "hmmm... it's up to you to go in or leave."; + close; +} +prt_maze02.gat,110,69,4 duplicate(soldier_p) Soldier#p3-2 105 + +//Yuno +yuno.gat,46,165,4 script Soldier#p4-1::soldier_y 105,{ + mes "[Yuno Soldier]"; + mes "Welcome to City of scholars where wisdom exists."; + close; +} + +yuno.gat,61,165,4 duplicate(soldier_y) Soldier#p4-2 105 + +yuno.gat,150,228,4 duplicate(soldier_y) Soldier#p4-2 105 + +yuno.gat,165,228,4 duplicate(soldier_y) Soldier#p4-2 105 + +yuno.gat,262,319,2 script Yuno Soldier 105,{ + mes "[Yuno Soldier]"; + mes "Welcome to Yuno, the scholar's city where ancient wisdom exists."; + next; + mes "[Yuno Soldier]"; + mes "There is a holy shield for Crusaders called 'The Messenger of the God'."; + next; + mes "[Yuno Soldier]"; + mes "It looks like a long shield with a angel's wing image on its center."; + mes " It is especially strong against undead or demons."; + close; +} + +yuno.gat,227,292,4 script Yuno Soldier 105,{ + mes "[Yuno Soldier]"; + mes "Welcome to City of scholars where wisdom exists, Yuno."; + next; + mes "[Yuno Soldier]"; + mes "Around the City of Juno, there is fallen angel that fakes himself as the real angel, named 'Fake Angel'."; + next; + mes "[Yuno Soldier]"; + mes "This one fakes itself as the real angel, and acts as if it's blessing travelers, and attacks them."; + mes "It looks all beautiful, so it's bad if you fall for its appearance."; + close; +} + +yuno.gat,150,283,4 script Yuno Soldier 105,{ + mes "[Yuno Soldier]"; + mes "Welcome to City of scholars where wisdom exists, Yuno."; + next; + mes "[Yuno Soldier]"; + mes "Larva Golem is a stone doll that has a stone heart in which its magical power was induced by magma."; + mes "....from the body, it flows..."; + next; + mes "[Yuno Soldier]"; + mes "Magma is really hot as to even melt away armor and weapon made with steel."; + mes "if you attack thoughtlessly, "; + next; + mes "[Yuno Soldier]"; + mes "you might get a lot of damage on yourself and even get your armor and weapon broken."; + close; +} + +yuno.gat,165,283,4 script Yuno Soldier 105,{ + mes "[Yuno Soldier]"; + mes "Welcome to City of scholars where wisdom exists."; + next; + mes "[Yuno Soldier]"; + mes "'Geographer', it is a hard shell type thing that grows around flowers from the earth."; + mes "Thus, even if it's far away, you can't think less of it."; + next; + mes "[Yuno Soldier]"; + mes "it got such name 'cause the passing-by geography scholar got eaten away during his research."; + close; +} + +//Comodo + +//Yuno +yuno.gat,46,165,4 script Yuno Soldier 105,{ + mes "[Yuno Soldier]"; + mes "Welcome to City of scholars where wisdom exists."; + close; +} + +yuno.gat,61,165,4 script Yuno Soldier 105,{ + mes "[Yuno Soldier]"; + mes "Welcome to City of scholars where wisdom exists."; + close; +} + + +yuno.gat,150,228,4 script Yuno Soldier 105,{ + mes "[Yuno Soldier]"; + mes "Welcome to City of scholars where wisdom exists."; + close; +} + +yuno.gat,165,228,4 script Yuno Soldier 105,{ + mes "[Yuno Soldier]"; + mes "Welcome to City of scholars where wisdom exists."; + close; +} + +yuno.gat,262,319,2 script Yuno Soldier 105,{ + mes "[Yuno Soldier]"; + mes "Welcome to Yuno, the scholar's city where ancient wisdom exists."; + next; + mes "[Yuno Soldier]"; + mes "There is a holy shield for Crusaders called 'The Messenger of the God'."; + next; + mes "[Yuno Soldier]"; + mes "It looks like a long shield with a angel's wing image on its center."; + mes " It is especially strong against undead or demons."; + close; +} + +yuno.gat,227,292,4 script Yuno Soldier 105,{ + mes "[Yuno Soldier]"; + mes "Welcome to City of scholars where wisdom exists, Yuno."; + next; + mes "[Yuno Soldier]"; + mes "Around the City of Juno, there is fallen angel that fakes himself as the real angel, named 'Fake Angel'."; + next; + mes "[Yuno Soldier]"; + mes "This one fakes itself as the real angel, and acts as if it's blessing travelers, and attacks them."; + mes "It looks all beautiful, so it's bad if you fall for its appearance."; + close; +} + +yuno.gat,150,283,4 script Yuno Soldier 105,{ + mes "[Yuno Soldier]"; + mes "Welcome to City of scholars where wisdom exists, Yuno."; + next; + mes "[Yuno Soldier]"; + mes "Larva Golem is a stone doll that has a stone heart in which its magical power was induced by magma."; + mes "....from the body, it flows..."; + next; + mes "[Yuno Soldier]"; + mes "Magma is really hot as to even melt away armor and weapon made with steel."; + mes "if you attack thoughtlessly, "; + next; + mes "[Yuno Soldier]"; + mes "you might get a lot of damage on yourself and even get your armor and weapon broken."; + close; +} + +yuno.gat,165,283,4 script Yuno Soldier 105,{ + mes "[Yuno Soldier]"; + mes "Welcome to City of scholars where wisdom exists."; + next; + mes "[Yuno Soldier]"; + mes "'Geographer', it is a hard shell type thing that grows around flowers from the earth."; + mes "Thus, even if it's far away, you can't think less of it."; + next; + mes "[Yuno Soldier]"; + mes "it got such name 'cause the passing-by geography scholar got eaten away during his research."; + close; +} diff --git a/npc/other/old/kafra.txt b/npc/other/old/kafra.txt index dcf05a1ce..9d25b078c 100644 --- a/npc/other/old/kafra.txt +++ b/npc/other/old/kafra.txt @@ -1,1866 +1,1866 @@ -//===== eAthena Script =======================================
-//= Kafra Script
-//===== By: ==================================================
-//= Lotsa People (1.0)
-//= Darlskies (1.1)
-//= Darkchild (1.2)
-//= Syrus22 (2.0)
-//= Syrus22 (2.1)
-//= Darkchild (2.2)
-//===== Current Version: =====================================
-//= 2.2
-//===== Compatible With: =====================================
-//= Any eAthena Version In Which functions work.
-//===== Description: =========================================
-//= All The Kafra's In Ro, Incl HQ
-//===== Additional Comments: =================================
-//= Darkskies did all the kafra points stuff.
-//= Syrus22 - I compltely rewrote the script pretty much except for
-//= the normal conversation text in the Kafra HQ NPCs.
-//= Syrus22 - I fixed the Special Reserve in the Kafra HQ to really
-//= give you items. I will add the Lottery Chances when I get
-//= full info on the prizes.
-//= Syrus22 - I will add a Louyang Kafra when I get better location info.
-//= Darkchild - Added Comodo
-//============================================================
-
-//**********************************************//
-//Actual Kafra NPCs //
-//**********************************************//
-//These will set the necessary variables for my //
-//functions to work. //
-//**********************************************//
-//---Orc Dungeon Kafra---
-gef_fild10.gat,73,340,4 script Kafra#orc1 115,{
-set @cutinpic$,"kafra_02";
-
-set @save,1;
-set @save1map$,"gef_fild10.gat";
-set @save1x,54;
-set @save1y,232;
-
-callfunc "kaframain";
-break;
-}
-//---Byalan Kafra---
-izlu2dun.gat,106,58,8 script Kafra 115,{
-if (class != Job_Novice) goto Lkafra;
-if((job_merchant_q==8) || (job_merchant_q==7)) goto JobMerQE8oE7;
-if((job_merchant_q==6) || (job_merchant_q==5)) goto JobMerQE6oE5;
-
-JobMerQE8oE7:
- if(countitem(Delivery_Message) != 0) goto JobMerQE8oE7Cont;
-
-JobMerQE8oE7Cont:
- menu "Excuse me.",M0;
-
- M0:
- mes "[Kafra]";
- mes "Yes?";
- cutin "kafra_03",255;
- close;
-
-JobMerQE6oE5:
- mes "[Kafra]";
- mes "Delivery fro the Merchant Guild?? Ah, Right! Yes! I almost forgot.";
- mes "Okay,Please put down here....";
- if((countitem(1081)==1) || (countitem(1082)==1) || (countitem(1083)==1)) goto MerBox123E1;
- mes ".... I think our orders are almost one Box of Oversized and Heavy....But you seem to carry it on without difficulty.";
- close;
-
- MerBox123E1:
- next;
- mes "[Kafra]";
- mes "Let me check its Serial numbers, I have to give the receipt to you anyhow.";
- if(nov_1_2_cos_c==7) goto JobMerQ2E7;
- if(nov_1_2_cos_c==8) goto JobMerQ2E8;
- next;
- mes "[Kafra]";
- mes "......? Excuse me! I think you gave me the wrong one.";
- mes "Our order should have the serial numbers as either of 3318702 or 3543625...";
- cutin "kafra_03",255;
- close;
-
-JobMerQ2E7:
- if(countitem(1081) !=0) goto MerBox1NE0;
-
- MerBox1NE0:
- mes "Um.... 3012685. Yes! This is the right one we ordered. Here, your receipt.";
- delitem 1081,1;
- getitem 1079,1;
- goto JobMerQ2Cont;
-
-JobMerQ2E8:
- if(countitem(1081) !=0) goto MerBox2NE0;
-
- MerBox2NE0:
- mes "Um.... 3543625. Yes! This is the right one we ordered. Here, your receipt.";
- delitem 1082,1;
- getitem 1080,1;
- goto JobMerQ2Cont;
-
-JobMerQ2Cont:
- if(job_merchant_q==6) goto JobMerQE6;
- getitem 3005,2;
- goto JobMerQ2Cont1;
-
-JobMerQE6:
- getitem 3005,2;
- goto JobMerQ2Cont1;
-
-JobMerQ2Cont1:
- getitem 3017,1;
- if(countitem(Delivery_Message) != 0) goto DevMsg;
- goto DevMsgCont;
-
-DevMsg:
- menu "This is from Mr. Mahnsoo...",M1;
-
- M1:
- delitem 1072,1;
- set nov_3_merchant,11;
- mes "[Kapra]";
- mes "Oh, my good Lord! Mr. Mansoo wrote me a Letter? Thank you, Thank you~";
- mes "I though he would send one one of these days, but I've never expected it would be so soon like this time~";
- goto DevMsgCont;
-
- DevMsgCont:
- next;
- mes "[Kafra]";
- mes "I really appreciate you for what you've done so far. This is my Small Gift for you to lay my heart.";
- mes "I hope you will help me next time.";
- set @TEMP,rand(2);
- goto R0;
-
- R0:
- if(@TEMP !=0) goto R1;
- getitem 513,3;
- cutin "kafra_03",255;
- close;
- R1:
- getitem 512,3;
- cutin "kafra_03",255;
- close;
-
-Lkafra:
-set @cutinpic$,"kafra_03";
-
-set @save,1;
-set @save1map$,"izlu2dun.gat";
-set @save1x,87;
-set @save1y,170;
-
-callfunc "kaframain";
-break;
-}
-//---Pyramids Kafra---
-moc_ruins.gat,61,156,5 script Kafra#pyr1 114,{
-set @cutinpic$,"kafra_04";
-
-set @save,1;
-set @save1map$,"moc_ruins.gat";
-set @save1x,41;
-set @save1y,141;
-
-callfunc "kaframain";
-break;
-}
-//---Northern Prontera Field Kafra---
-prt_fild01.gat,198,47,8 script Kafra#pfl1 112,{
-set @cutinpic$,"kafra_06";
-
-set @save,1;
-set @save1map$,"prt_fild01.gat";
-set @save1x,197;
-set @save1y,50;
-
-callfunc "kaframain";
-break;
-}
-//---Culvert Kafra---
-prt_fild05.gat,290,224,1 script Kafra#pfl2 114,{
-set @cutinpic$,"kafra_04";
-
-set @save,1;
-set @save1map$,"prt_fild05.gat";
-set @save1x,274;
-set @save1y,243;
-
-callfunc "kaframain";
-break;
-}
-//---In Alberta Kafras---
-alberta.gat,28,229,8 script Kafra#alb1 115,{
-set @cutinpic$,"kafra_02";
-
-set @save1map$,"alberta.gat";
-set @save1x,31;
-set @save1y,231;
-set @save2map$,"pay_fild03.gat";
-set @save2x,386;
-set @save2y,76;
-
-set @warps,4;
-
-set @warp1$,"Payon";
-set @warp1name$,"payon.gat";
-set @warp1x,69;
-set @warp1y,100;
-set @warp1zeny,1300;
-
-set @warp2$,"Prontera";
-set @warp2name$,"prontera.gat";
-set @warp2x,116;
-set @warp2y,75;
-set @warp2zeny,2100;
-
-set @warp3$,"Morocc";
-set @warp3name$,"morocc.gat";
-set @warp3x,156;
-set @warp3y,46;
-set @warp3zeny,2200;
-
-set @warp4$,"Comodo";
-set @warp4name$,"comodo.gat";
-set @warp4x,209;
-set @warp4y,143;
-set @warp4zeny,2400;
-
-set @kaflocations,1;
-set @location1x,113;
-set @location1y,60;
-
-set @special,1;
-
-callfunc "kaframain";
-break;
-}
-alberta.gat,113,60,5 script Kafra#alb2 112,{
-set @cutinpic$,"kafra_06";
-
-set @save,1;
-set @save1map$,"alberta.gat";
-set @save1x,117;
-set @save1y,57;
-
-set @warps,4;
-
-set @warp1$,"Payon";
-set @warp1name$,"payon.gat";
-set @warp1x,69;
-set @warp1y,100;
-set @warp1zeny,1300;
-
-set @warp2$,"Prontera";
-set @warp2name$,"prontera.gat";
-set @warp2x,116;
-set @warp2y,75;
-set @warp2zeny,2100;
-
-set @warp3$,"Morocc";
-set @warp3name$,"morocc.gat";
-set @warp3x,156;
-set @warp3y,46;
-set @warp3zeny,2200;
-
-set @warp4$,"Comodo";
-set @warp4name$,"comodo.gat";
-set @warp4x,209;
-set @warp4y,143;
-set @warp4zeny,2400;
-
-set @kaflocations,1;
-set @location1x,28;
-set @location1y,229;
-
-set @special,1;
-
-callfunc "kaframain";
-break;
-}
-//---Sunken Ship Kafra---
-alb2trea.gat,59,69,1 script Kafra#snk1 117,{
-set @cutinpic$,"kafra_03";
-
-set @save,1;
-set @save1map$,"alb2trea.gat";
-set @save1x,92;
-set @save1y,64;
-
-callfunc "kaframain";
-break;
-}
-//---In Al De Baran Kafra---
-aldebaran.gat,143,119,4 script Kafra#ald1 113,{
-set @cutinpic$,"kafra_05";
-
-set @save,1;
-set @save1map$,"aldebaran.gat";
-set @save1x,143;
-set @save1y,109;
-
-set @warps,3;
-
-set @warp1$,"Geffen";
-set @warp1name$,"geffen.gat";
-set @warp1x,120;
-set @warp1y,39;
-set @warp1zeny,1600;
-
-set @warp2$,"Mjolnir Dead Pit";
-set @warp2name$,"mjolnir_02.gat";
-set @warp2x,99;
-set @warp2y,351;
-set @warp2zeny,1700;
-
-set @warp3$,"Comodo";
-set @warp3name$,"comodo.gat";
-set @warp3x,209;
-set @warp3y,143;
-set @warp3zeny,2200;
-
-set @special,1;
-
-callfunc "kaframain";
-break;
-}
-//---In Geffen Kafras---
-geffen.gat,120,62,8 script Kafra#gef1 115,{
-set @cutinpic$,"kafra_03";
-
-set @save,1;
-set @save1map$,"geffen.gat";
-set @save1x,119;
-set @save1y,40;
-
-set @warps,5;
-
-set @warp1$,"Prontera";
-set @warp1name$,"prontera.gat";
-set @warp1x,116;
-set @warp1y,75;
-set @warp1zeny,1400;
-
-set @warp2$,"Izlude";
-set @warp2name$,"izlude.gat";
-set @warp2x,91;
-set @warp2y,105;
-set @warp2zeny,1800;
-
-set @warp3$,"Al De Baran";
-set @warp3name$,"aldebaran.gat";
-set @warp3x,143;
-set @warp3y,110;
-set @warp3zeny,2100;
-
-set @warp4$,"Morocc";
-set @warp4name$,"morocc.gat";
-set @warp4x,156;
-set @warp4y,46;
-set @warp4zeny,2200;
-
-set @warp5$,"Comodo";
-set @warp5name$,"comodo.gat";
-set @warp5x,209;
-set @warp5y,143;
-set @warp5zeny,2400;
-
-set @kaflocations,1;
-set @location1x,203;
-set @location1y,123;
-
-set @special,1;
-
-callfunc "kaframain";
-break;
-}
-geffen.gat,203,123,3 script Kafra#gef2 114,{
-set @cutinpic$,"kafra_04";
-
-set @save1map$,"geffen.gat";
-set @save1x,200;
-set @save1y,124;
-set @save2map$,"gef_fild00.gat";
-set @save2x,51;
-set @save2y,194;
-
-set @warps,5;
-
-set @warp1$,"Prontera";
-set @warp1name$,"prontera.gat";
-set @warp1x,116;
-set @warp1y,75;
-set @warp1zeny,1400;
-
-set @warp2$,"Izlude";
-set @warp2name$,"izlude.gat";
-set @warp2x,91;
-set @warp2y,105;
-set @warp2zeny,1800;
-
-set @warp3$,"Al De Baran";
-set @warp3name$,"aldebaran.gat";
-set @warp3x,143;
-set @warp3y,110;
-set @warp3zeny,2100;
-
-set @warp4$,"Morocc";
-set @warp4name$,"morocc.gat";
-set @warp4x,156;
-set @warp4y,46;
-set @warp4zeny,2200;
-
-set @warp5$,"Comodo";
-set @warp5name$,"comodo.gat";
-set @warp5x,209;
-set @warp5y,143;
-set @warp5zeny,2400;
-
-set @kaflocations,1;
-set @location1x,120;
-set @location1y,62;
-
-set @special,1;
-
-callfunc "kaframain";
-break;
-}
-//---In Izlude Kafra---
-izlude.gat,124,115,6 script Kafra#izl1 117,{
-set @cutinpic$,"kafra_01";
-
-set @save1map$,"izlude.gat";
-set @save1x,128;
-set @save1y,111;
-set @save2map$,"prt_fild08.gat";
-set @save2x,349;
-set @save2y,202;
-
-set @warps,4;
-
-set @warp1$,"Prontera";
-set @warp1name$,"prontera.gat";
-set @warp1x,116;
-set @warp1y,75;
-set @warp1zeny,900;
-
-set @warp2$,"Payon";
-set @warp2name$,"payon.gat";
-set @warp2x,69;
-set @warp2y,100;
-set @warp2zeny,1700;
-
-set @warp3$,"Geffen";
-set @warp3name$,"geffen.gat";
-set @warp3x,120;
-set @warp3y,39;
-set @warp3zeny,1800;
-
-set @warp4$,"Comodo";
-set @warp4name$,"comodo.gat";
-set @warp4x,209;
-set @warp4y,143;
-set @warp4zeny,2000;
-
-set @special,1;
-
-callfunc "kaframain";
-break;
-}
-//---In Morocc Kafras---
-morocc.gat,156,97,4 script Kafra#moc1 115,{
-set @cutinpic$,"kafra_03";
-
-set @save,1;
-set @save1map$,"morocc.gat";
-set @save1x,156;
-set @save1y,46;
-
-set @warps,5;
-
-set @warp1$,"Prontera";
-set @warp1name$,"prontera.gat";
-set @warp1x,116;
-set @warp1y,75;
-set @warp1zeny,1800;
-
-set @warp2$,"Payon";
-set @warp2name$,"payon.gat";
-set @warp2x,69;
-set @warp2y,100;
-set @warp2zeny,1800;
-
-set @warp3$,"Alberta";
-set @warp3name$,"alberta.gat";
-set @warp3x,117;
-set @warp3y,56;
-set @warp3zeny,2200;
-
-set @warp4$,"Geffen";
-set @warp4name$,"geffen.gat";
-set @warp4x,120;
-set @warp4y,39;
-set @warp4zeny,2200;
-
-set @warp5$,"Comodo";
-set @warp5name$,"comodo.gat";
-set @warp5x,209;
-set @warp5y,143;
-set @warp5zeny,1800;
-
-set @kaflocations,1;
-set @location1x,163;
-set @location1y,260;
-
-set @special,1;
-
-callfunc "kaframain";
-break;
-}
-morocc.gat,163,260,4 script Kafra 114,{
-set @cutinpic$,"kafra_04";
-
-set @save1map$,"morocc.gat";
-set @save1x,187;
-set @save1y,281;
-set @save2map$,"moc_fild07.gat";
-set @save2x,212;
-set @save2y,30;
-
-set @warps,5;
-
-set @warp1$,"Prontera";
-set @warp1name$,"prontera.gat";
-set @warp1x,116;
-set @warp1y,75;
-set @warp1zeny,1800;
-
-set @warp2$,"Payon";
-set @warp2name$,"payon.gat";
-set @warp2x,69;
-set @warp2y,100;
-set @warp2zeny,1800;
-
-set @warp3$,"Alberta";
-set @warp3name$,"alberta.gat";
-set @warp3x,117;
-set @warp3y,56;
-set @warp3zeny,2200;
-
-set @warp4$,"Geffen";
-set @warp4name$,"geffen.gat";
-set @warp4x,120;
-set @warp4y,39;
-set @warp4zeny,2200;
-
-set @warp5$,"Comodo";
-set @warp5name$,"comodo.gat";
-set @warp5x,209;
-set @warp5y,143;
-set @warp5zeny,1800;
-
-set @kaflocations,1;
-set @location1x,156;
-set @location1y,97;
-
-set @special,1;
-
-callfunc "kaframain";
-break;
-}
-//---In Payon Kafra---
-payon.gat,99,116,4 script Kafra#pay1 113,{
-set @cutinpic$,"kafra_05";
-
-set @save1map$,"payon.gat";
-set @save1x,69;
-set @save1y,100;
-set @save2map$,"pay_fild01.gat";
-set @save2x,340;
-set @save2y,347;
-
-set @warps,4;
-
-set @warp1$,"Alberta";
-set @warp1name$,"alberta.gat";
-set @warp1x,117;
-set @warp1y,56;
-set @warp1zeny,1300;
-
-set @warp2$,"Prontera";
-set @warp2name$,"prontera.gat";
-set @warp2x,116;
-set @warp2y,72;
-set @warp2zeny,1800;
-
-set @warp3$,"Morocc";
-set @warp3name$,"morocc.gat";
-set @warp3x,156;
-set @warp3y,46;
-set @warp3zeny,1800;
-
-set @warp4$,"Comodo";
-set @warp4name$,"comodo.gat";
-set @warp4x,209;
-set @warp4y,143;
-set @warp4zeny,2000;
-
-set @special,1;
-
-callfunc "kaframain";
-break;
-}
-//---Archer Village Kafra---
-pay_arche.gat,55,123,8 script Kafra 117,{
-set @cutinpic$,"kafra_01";
-
-set @save,1;
-set @save1map$,"pay_arche.gat";
-set @save1x,49;
-set @save1y,144;
-
-callfunc "kaframain";
-break;
-}
-//---In Prontera Kafras---
-prontera.gat,29,207,6 script Kafra#pro2 113,{
-set @cutinpic$,"kafra_05";
-
-set @warps,6;
-
-set @warp1$,"Izlude";
-set @warp1name$,"izlude.gat";
-set @warp1x,91;
-set @warp1y,105;
-set @warp1zeny,900;
-
-set @warp2$,"Geffen";
-set @warp2name$,"geffen.gat";
-set @warp2x,120;
-set @warp2y,39;
-set @warp2zeny,1400;
-
-set @warp3$,"Payon";
-set @warp3name$,"payon.gat";
-set @warp3x,69;
-set @warp3y,100;
-set @warp3zeny,1700;
-
-set @warp4$,"Morocc";
-set @warp4name$,"morocc.gat";
-set @warp4x,156;
-set @warp4y,46;
-set @warp4zeny,1800;
-
-set @warp5$,"Orc Dungeon";
-set @warp5name$,"gef_fild10.gat";
-set @warp5x,52;
-set @warp5y,326;
-set @warp5zeny,1700;
-
-set @warp6$,"Comodo";
-set @warp6name$,"comodo.gat";
-set @warp6x,209;
-set @warp6y,143;
-set @warp6zeny,2000;
-
-set @save1map$,"prontera.gat";
-set @save1x,33;
-set @save1y,208;
-set @save2map$,"prt_fild05.gat";
-set @save2x,367;
-set @save2y,205;
-
-set @kaflocations,1;
-set @location1x,146;
-set @location1y,89;
-set @location2x,282;
-set @location2y,200;
-set @location3x,151;
-set @location3y,29;
-
-set @special,1;
-
-callfunc "kaframain";
-break;
-}
-prontera.gat,146,89,6 script Kafra#pro1 115,{
-set @cutinpic$,"kafra_03";
-
-set @warps,6;
-
-set @warp1$,"Izlude";
-set @warp1name$,"izlude.gat";
-set @warp1x,91;
-set @warp1y,105;
-set @warp1zeny,900;
-
-set @warp2$,"Geffen";
-set @warp2name$,"geffen.gat";
-set @warp2x,120;
-set @warp2y,39;
-set @warp2zeny,1400;
-
-set @warp3$,"Payon";
-set @warp3name$,"payon.gat";
-set @warp3x,69;
-set @warp3y,100;
-set @warp3zeny,1700;
-
-set @warp4$,"Morocc";
-set @warp4name$,"morocc.gat";
-set @warp4x,156;
-set @warp4y,46;
-set @warp4zeny,1800;
-
-set @warp5$,"Orc Dungeon";
-set @warp5name$,"gef_fild10.gat";
-set @warp5x,52;
-set @warp5y,326;
-set @warp5zeny,1700;
-
-set @warp6$,"Comodo";
-set @warp6name$,"comodo.gat";
-set @warp6x,209;
-set @warp6y,143;
-set @warp6zeny,2000;
-
-set @save,1;
-set @save1map$,"prontera.gat";
-set @save1x,116;
-set @save1y,73;
-
-set @kaflocations,1;
-set @location1x,29;
-set @location1y,207;
-set @location2x,282;
-set @location2y,200;
-set @location3x,151;
-set @location3y,29;
-
-set @special,1;
-
-callfunc "kaframain";
-break;
-}
-prontera.gat,282,199,6 script Kafra 115,{
-set @cutinpic$,"kafra_03";
-
-set @warps,6;
-
-set @warp1$,"Izlude";
-set @warp1name$,"izlude.gat";
-set @warp1x,91;
-set @warp1y,105;
-set @warp1zeny,900;
-
-set @warp2$,"Geffen";
-set @warp2name$,"geffen.gat";
-set @warp2x,120;
-set @warp2y,39;
-set @warp2zeny,1400;
-
-set @warp3$,"Payon";
-set @warp3name$,"payon.gat";
-set @warp3x,69;
-set @warp3y,100;
-set @warp3zeny,1700;
-
-set @warp4$,"Morocc";
-set @warp4name$,"morocc.gat";
-set @warp4x,156;
-set @warp4y,46;
-set @warp4zeny,1800;
-
-set @warp5$,"Orc Dungeon";
-set @warp5name$,"gef_fild10.gat";
-set @warp5x,52;
-set @warp5y,326;
-set @warp5zeny,1700;
-
-set @warp6$,"Comodo";
-set @warp6name$,"comodo.gat";
-set @warp6x,209;
-set @warp6y,143;
-set @warp6zeny,2000;
-
-set @save,1;
-set @save1map$,"prontera.gat";
-set @save1x,117;
-set @save1y,73;
-
-set @kaflocations,1;
-set @location1x,29;
-set @location1y,207;
-set @location2x,146;
-set @location2y,89;
-set @location3x,151;
-set @location3y,29;
-
-set @special,1;
-
-callfunc "kaframain";
-break;
-}
-prontera.gat,151,29,8 script Kafra 115,{
-set @cutinpic$,"kafra_03";
-
-set @warps,6;
-
-set @warp1$,"Izlude";
-set @warp1name$,"izlude.gat";
-set @warp1x,91;
-set @warp1y,105;
-set @warp1zeny,900;
-
-set @warp2$,"Geffen";
-set @warp2name$,"geffen.gat";
-set @warp2x,120;
-set @warp2y,39;
-set @warp2zeny,1400;
-
-set @warp3$,"Payon";
-set @warp3name$,"payon.gat";
-set @warp3x,69;
-set @warp3y,100;
-set @warp3zeny,1700;
-
-set @warp4$,"Morocc";
-set @warp4name$,"morocc.gat";
-set @warp4x,156;
-set @warp4y,46;
-set @warp4zeny,1800;
-
-set @warp5$,"Orc Dungeon";
-set @warp5name$,"gef_fild10.gat";
-set @warp5x,52;
-set @warp5y,326;
-set @warp5zeny,1700;
-
-set @warp6$,"Comodo";
-set @warp6name$,"comodo.gat";
-set @warp6x,209;
-set @warp6y,143;
-set @warp6zeny,2000;
-
-set @save1map$,"prontera.gat";
-set @save1x,150;
-set @save1y,33;
-set @save2map$,"prt_fild08.gat";
-set @save2x,170;
-set @save2y,369;
-
-set @kaflocations,1;
-set @location1x,29;
-set @location1y,207;
-set @location2x,146;
-set @location2y,89;
-set @location3x,282;
-set @location3y,199;
-
-set @special,1;
-
-callfunc "kaframain";
-break;
-}
-//---In Yuno Kafras---
-yuno.gat,328,108,6 script Kafra 117,{
-set @cutinpic$,"kafra_02";
-
-set @save,1;
-set @save1map$,"yuno.gat";
-set @save1x,332;
-set @save1y,107;
-
-set @warps,4;
-
-set @warp1$,"Izlude";
-set @warp1name$,"izlude.gat";
-set @warp1x,91;
-set @warp1y,105;
-set @warp1zeny,900;
-
-set @warp2$,"Geffen";
-set @warp2name$,"geffen.gat";
-set @warp2x,120;
-set @warp2y,39;
-set @warp2zeny,2100;
-
-set @warp3$,"Payon";
-set @warp3name$,"payon.gat";
-set @warp3x,69;
-set @warp3y,100;
-set @warp3zeny,2100;
-
-set @warp4$,"Morocc";
-set @warp4name$,"morocc.gat";
-set @warp4x,156;
-set @warp4y,46;
-set @warp4zeny,2100;
-
-set @kafralocations,1;
-set @location1x,151;
-set @location1y,87;
-set @location2x,278;
-set @location2y,221;
-
-set @special,1;
-
-callfunc "kaframain";
-break;
-}
-yuno.gat,151,87,4 script Kafra 115,{
-set @cutinpic$,"kafra_02";
-
-set @save,1;
-set @save1map$,"yuno.gat";
-set @save1x,154;
-set @save1y,75;
-
-set @warps,4;
-
-set @warp1$,"Izlude";
-set @warp1name$,"izlude.gat";
-set @warp1x,91;
-set @warp1y,105;
-set @warp1zeny,900;
-
-set @warp2$,"Geffen";
-set @warp2name$,"geffen.gat";
-set @warp2x,120;
-set @warp2y,39;
-set @warp2zeny,2100;
-
-set @warp3$,"Payon";
-set @warp3name$,"payon.gat";
-set @warp3x,69;
-set @warp3y,100;
-set @warp3zeny,2100;
-
-set @warp4$,"Morocc";
-set @warp4name$,"morocc.gat";
-set @warp4x,156;
-set @warp4y,46;
-set @warp4zeny,2100;
-
-set @kafralocations,1;
-set @location1x,328;
-set @location1y,108;
-set @location2x,278;
-set @location2y,221;
-
-set @special,1;
-
-callfunc "kaframain";
-break;
-}
-yuno.gat,278,221,6 script Kafra 117,{
-set @cutinpic$,"kafra_02";
-
-set @save,1;
-set @save1map$,"yuno.gat";
-set @save1x,332;
-set @save1y,107;
-
-set @warps,4;
-
-set @warp1$,"Izlude";
-set @warp1name$,"izlude.gat";
-set @warp1x,91;
-set @warp1y,105;
-set @warp1zeny,900;
-
-set @warp2$,"Geffen";
-set @warp2name$,"geffen.gat";
-set @warp2x,120;
-set @warp2y,39;
-set @warp2zeny,2100;
-
-set @warp3$,"Payon";
-set @warp3name$,"payon.gat";
-set @warp3x,69;
-set @warp3y,100;
-set @warp3zeny,2100;
-
-set @warp4$,"Morocc";
-set @warp4name$,"morocc.gat";
-set @warp4x,156;
-set @warp4y,46;
-set @warp4zeny,2100;
-
-set @kafralocations,1;
-set @location1x,328;
-set @location1y,108;
-set @location2x,151;
-set @location2y,87;
-
-set @special,1;
-
-callfunc "kaframain";
-break;
-}
-//---In Umbala Kafra---
-umbala.gat,128,133,4 script Kafra 115,{
-set @cutinpic$,"kafra_02";
-
-set @save,1;
-set @save1map$,"umbala.gat";
-set @save1x,126;
-set @save1y,131;
-
-set @warps,4;
-
-set @warp1$,"Izlude";
-set @warp1name$,"izlude.gat";
-set @warp1x,91;
-set @warp1y,105;
-set @warp1zeny,900;
-
-set @warp2$,"Geffen";
-set @warp2name$,"geffen.gat";
-set @warp2x,120;
-set @warp2y,39;
-set @warp2zeny,2100;
-
-set @warp3$,"Payon";
-set @warp3name$,"payon.gat";
-set @warp3x,69;
-set @warp3y,100;
-set @warp3zeny,2100;
-
-set @warp4$,"Morocc";
-set @warp4name$,"morocc.gat";
-set @warp4x,156;
-set @warp4y,46;
-set @warp4zeny,2100;
-
-set @special,1;
-
-callfunc "kaframain";
-break;
-}
-//---In Gonryun Kafra---
-//Note: Gave this Kafra the same warps as Umbala and Yuno till I get the
-//real warp information.
-gonryun.gat,159,122,4 script Kafra 116,{
-set @cutinpic$,"kafra_02";
-
-set @save,1;
-set @save1map$,"gonryun.gat";
-set @save1x,160;
-set @save1y,62;
-
-set @warps,4;
-
-set @warp1$,"Izlude";
-set @warp1name$,"izlude.gat";
-set @warp1x,91;
-set @warp1y,105;
-set @warp1zeny,900;
-
-set @warp2$,"Geffen";
-set @warp2name$,"geffen.gat";
-set @warp2x,120;
-set @warp2y,39;
-set @warp2zeny,2100;
-
-set @warp3$,"Payon";
-set @warp3name$,"payon.gat";
-set @warp3x,69;
-set @warp3y,100;
-set @warp3zeny,2100;
-
-set @warp4$,"Morocc";
-set @warp4name$,"morocc.gat";
-set @warp4x,156;
-set @warp4y,46;
-set @warp4zeny,2100;
-
-set @special,1;
-
-callfunc "kaframain";
-break;
-}
-//---Comodo---
-comodo.gat,166,163,3 script Kafra 721,{
-set @cutinpic$,"kafra_02";
-
-set @save,1;
-set @save1map$,"comodo.gat";
-set @save1x,188;
-set @save1y,148;
-
-set @warps,2;
-
-set @warp1$,"Morroc";
-set @warp1name$,"morocc.gat";
-set @warp1x,156;
-set @warp1y,46;
-set @warp1pay,2400;
-
-set @warp2$,"Geffen";
-set @warp2name$,"geffen.gat";
-set @warp2x,120;
-set @warp2y,39;
-set @warp2zeny,2100;
-
-set @special,1;
-
-callfunc "kaframain";
-break;
-}
-//**********************************************//
-//Kafra Main //
-//**********************************************//
-//The main kafra script. This will call the //
-//necessary functions from the rest of the //
-//script. //
-//**********************************************//
-function script kaframain -1,{
-cutin @cutinpic$,2;
-mes "[Kafra Employee]";
-mes "Welcome to Kafra Corporation. The Kafra services are always by your side.";
-mes "How may I assist you?";
-next;
-if ((@warps > 0) && (@special > 0)) goto Lallmenu;
-if ((@warps > 0) && (@special == 0)) goto Lwarpmenu;
-if (@warps == 0) goto Lnowarpmenu;
-
-Lallmenu:
-menu "Save",Lsave,"Use Storage",Lstorage,"Use Teleport Service",Lwarp,"Rent a Cart",Lcart,"Check Other Information",Lother,"Cancel",Lcancel;
-
-Lwarpmenu:
-menu "Save",Lsave,"Use Storage",Lstorage,"Use Teleport Service",Lwarp,"Rent a Cart",Lcart,"Cancel",Lcancel;
-
-Lnowarpmenu:
-menu "Save",Lsave,"Use Storage",Lstorage,"Rent a Cart",Lcart,"Cancel",Lcancel;
-
-Lsave:
-callfunc "kafrasave";
-break;
-
-Lstorage:
-callfunc "kafrastorage";
-break;
-
-Lwarp:
-callfunc "kafrawarps";
-break;
-
-Lcart:
-callfunc "kafracart";
-break;
-
-Lother:
-callfunc "kafrainfo";
-break;
-
-Lcancel:
-callfunc "kafraend";
-break;
-}
-//**********************************************//
-//Kafra Save //
-//**********************************************//
-//This will handle the save function for all the//
-//kafras. //
-//**********************************************//
-function script kafrasave -1,{
-if (@save == 1) goto Lsavein;
-mes "[Kafra]";
-mes "Where would you like to save?";
-next;
-menu "Save Outside City",Lsaveout,"Save Inside City",Lsavein;
-
-Lsavein:
- savepoint @save1map$,@save1x,@save1y;
- mes "[Kafra]";
- mes "Your respawn point has been saved. Thank you.";
- callfunc "kafraend";
- break;
-
-Lsaveout:
- savepoint @save2map$,@save2x,@save2y;
- mes "[Kafra]";
- mes "Your respawn point has been saved. Thank you.";
- callfunc "kafraend";
- break;
-}
-//**********************************************//
-//Kafra Storage //
-//**********************************************//
-//This will handle the storage functions for //
-//all the kafras. //
-//**********************************************//
-function script kafrastorage -1,{
-if (getskilllv(1) < 6) goto NeedJobLevel;
-if (Zeny < 30) goto NeedZenys;
-set specialreserve,specialreserve + 30;
-set Zeny, Zeny - 30;
-mes "[Kafra]";
-mes "Ok let me just open your storage for you.";
-openstorage;
-callfunc "kafraend";
-break;
-
-NeedJobLevel:
- mes "[Kafra]";
- mes "I'm sorry but you must have Basic Skill 6 to use storage.";
- callfunc "kafraend";
- break;
-
-NeedZenys:
- mes "[Kafra]";
- mes "I'm sorry but you are short on Zeny.";
- callfunc "kafraend";
- break;
-}
-//**********************************************//
-//Kafra Warps //
-//**********************************************//
-//This will handle all the actual warping and //
-//the payment of Zeny //
-//**********************************************//
-function script kafrawarps -1,{
-mes "[Kafra]";
-mes "Please choose your destination.";
-next;
-if (@warps == 7) goto L7;
-if (@warps == 6) goto L6;
-if (@warps == 5) goto L5;
-if (@warps == 4) goto L4;
-if (@warps == 3) goto L3;
-if (@warps == 2) goto L2;
-
-L2:
- menu @warp1$ + " -> " + @warp1zeny,Lwarp1,@warp2$ + " -> " + @warp2zeny,Lwarp2,"Cancel",Lcancel;
-
-L3:
- menu @warp1$ + " -> " + @warp1zeny,Lwarp1,@warp2$ + " -> " + @warp2zeny,Lwarp2,@warp3$ + " -> " + @warp3zeny,Lwarp3,"Cancel",Lcancel;
-
-L4:
- menu @warp1$ + " -> " + @warp1zeny,Lwarp1,@warp2$ + " -> " + @warp2zeny,Lwarp2,@warp3$ + " -> " + @warp3zeny,Lwarp3,@warp4$ + " -> " + @warp4zeny,Lwarp4,"Cancel",Lcancel;
-
-L5:
- menu @warp1$ + " -> " + @warp1zeny,Lwarp1,@warp2$ + " -> " + @warp2zeny,Lwarp2,@warp3$ + " -> " + @warp3zeny,Lwarp3,@warp4$ + " -> " + @warp4zeny,Lwarp4,@warp5$ + " -> " + @warp5zeny,Lwarp5,"Cancel",Lcancel;
-
-L6:
- menu @warp1$ + " -> " + @warp1zeny,Lwarp1,@warp2$ + " -> " + @warp2zeny,Lwarp2,@warp3$ + " -> " + @warp3zeny,Lwarp3,@warp4$ + " -> " + @warp4zeny,Lwarp4,@warp5$ + " -> " + @warp5zeny,Lwarp5,@warp6$ + " -> " + @warp6zeny,Lwarp6,"Cancel",Lcancel;
-
-L7:
- menu @warp1$ + " -> " + @warp1zeny,Lwarp1,@warp2$ + " -> " + @warp2zeny,Lwarp2,@warp3$ + " -> " + @warp3zeny,Lwarp3,@warp4$ + " -> " + @warp4zeny,Lwarp4,@warp5$ + " -> " + @warp5zeny,Lwarp5,@warp6$ + " -> " + @warp6zeny,Lwarp6,@warp7$ + " -> " + @warp7zeny,Lwarp7,"Cancel",Lcancel;
-
-Lwarp1:
- if (Zeny < @warp1zeny) goto Lneedzeny;
- set specialreserve,specialreserve + @warp1zeny;
- set Zeny,Zeny - @warp1zeny;
- warp @warp1name$,@warp1x,@warp1y;
- set @end,1;
- callfunc "kafraend";
- break;
-
-Lwarp2:
- if (Zeny < @warp2zeny) goto Lneedzeny;
- set specialreserve,specialreserve + @warp2zeny;
- set Zeny,Zeny - @warp2zeny;
- warp @warp2name$,@warp2x,@warp2y;
- set @end,1;
- callfunc "kafraend";
- break;
-
-Lwarp3:
- if (Zeny < @warp3zeny) goto Lneedzeny;
- set specialreserve,specialreserve + @warp3zeny;
- set Zeny,Zeny - @warp3zeny;
- warp @warp3name$,@warp3x,@warp3y;
- set @end,1;
- callfunc "kafraend";
- break;
-
-Lwarp4:
- if (Zeny < @warp4zeny) goto Lneedzeny;
- set specialreserve,specialreserve + @warp4zeny;
- set Zeny,Zeny - @warp4zeny;
- warp @warp4name$,@warp4x,@warp4y;
- set @end,1;
- callfunc "kafraend";
- break;
-
-Lwarp5:
- if (Zeny < @warp5zeny) goto Lneedzeny;
- set specialreserve,specialreserve + @warp5zeny;
- set Zeny,Zeny - @warp5zeny;
- warp @warp5name$,@warp5x,@warp5y;
- set @end,1;
- callfunc "kafraend";
- break;
-
-Lwarp6:
- if (Zeny < @warp6zeny) goto Lneedzeny;
- set specialreserve,specialreserve + @warp6zeny;
- set Zeny,Zeny - @warp6zeny;
- warp @warp6name$,@warp6x,@warp6y;
- set @end,1;
- callfunc "kafraend";
- break;
-
-Lwarp7:
- if (Zeny < @warp7zeny) goto Lneedzeny;
- set specialreserve,specialreserve + @warp7zeny;
- set Zeny,Zeny - @warp7zeny;
- warp @warp7name$,@warp7x,@warp7y;
- set @end,1;
- callfunc "kafraend";
- break;
-
-Lneedzeny:
- mes "[Kafra]";
- mes "I'm sorry you don't have the necessary amount of zeny.";
- callfunc "kafraend";
- break;
-
-Lcancel:
- mes "[Kafra]";
- mes "Ok, Come again soon.";
- callfunc "kafraend";
- break;
-}
-//**********************************************//
-//Kafra Cart //
-//**********************************************//
-//This will handle the cart rental function for //
-//all the Kafras. //
-//**********************************************//
-function script kafracart -1,{
-if ((class == Job_Merchant) || (class == Job_Blacksmith) || (class == Job_Alchem) || (class == Job_Merchant_High) || (class == Job_Whitesmith) || (class == Job_Creator)) goto Lrentcart;
-mes "[Kafra]";
-mes "Sorry this service is only provided for Merchant classes.";
-callfunc "kafraend";
-break;
-
-Lrentcart:
- if (getskilllv(39) < 1) goto Lnopush;
- mes "[Kafra]";
- mes "The cart rental fee is 800 zeny. Do you want to rent a cart?";
- next;
- menu "Rent a Cart",Lrent,"Cancel",Lcancel;
-
-Lrent:
- if (Zeny < 800) goto Lneedzeny;
- set specialreserve,specialreserve + 800;
- set Zeny,Zeny - 800;
- setcart;
- mes "[Kafra]";
- mes "There ya go...";
- callfunc "kafraend";
- break;
-
-Lnopush:
- mes "[Kafra]";
- mes "Sorry but you must have at least ^ff0000Pushcart^000000 level 1.";
- callfunc "kafraend";
- break;
-
-Lneedzeny:
- mes "[Kafra]";
- mes "Sorry but you don't have the zeny.";
- callfunc "kafraend";
- break;
-
-Lcancel:
- mes "[Kafra]";
- mes "Ok. Goodbye then";
- callfunc "kafraend";
- break;
-}
-//**********************************************//
-//Kafra Information //
-//**********************************************//
-//This will handle the extra Kafra functions //
-//such as your kafra points and the locations of//
-//other kafras. //
-//**********************************************//
-function script kafrainfo -1,{
-if (@kaflocations == 1) goto Lfullmenu;
-menu "Check Special Reserve Points",Lreserve,"Cancel",Lcancel;
-
-Lfullmenu:
- menu "Check Special Reserve Points",Lreserve,"Location Tip",Llocation,"Cancel",Lcancel;
-
-Lreserve:
- mes "[Kafra]";
- mes strcharinfo(0) + ", you have accumulated " + specialreserve + " Special Reserve Points.";
- next;
- mes "[Kafra]";
- mes "You can redeem your points at our Headquarters in Al De Baran.";
- callfunc "kafraend";
- break;
-
-Llocation:
- mes "[Kafra]";
- mes "Ok I'll mark them on your map.";
- if (@location1x == 0) goto Lfinished;
- viewpoint 0,@location1x,@location1y,1,0x0000FF;
- if (@location2x == 0) goto Lfinished;
- viewpoint 1,@location2x,@location2y,1,0x0000FF;
- if (@location3x == 0) goto Lfinished;
- viewpoint 2,@location3x,@location3y,1,0x0000FF;
- if (@location4x == 0) goto Lfinished;
- viewpoint 3,@location4x,@location4y,1,0x0000FF;
- callfunc "kafraend";
- break;
-
-Lfinished:
- callfunc "kafraend";
- break;
-
-Lcancel:
- mes "[Kafra]";
- mes "Ok. Bye then...";
- callfunc "kafraend";
- break;
-}
-//**********************************************//
-//End Kafra Function //
-//**********************************************//
-//This will empty all possible variables and end//
-//the kafra scripts. //
-//**********************************************//
-function script kafraend -1,{
-set @warps,0;
-set @save,0;
-set @special,0;
-set @kaflocations,0;
-set @location1x,0;
-set @location2x,0;
-set @location3x,0;
-set @location4x,0;
-if (@end == 1) goto Lbreak;
-cutin @cutinpic$,255;
-close;
-
-Lbreak:
- set @end,0;
- cutin @cutinpic$,255;
- break;
-}
-//---Kafra Warehouse---
-aldeba_in.gat,24,245,4 script Kafra Service 115,{
- cutin "kafra_03",2;
- mes "[Kapra Jasmine]";
- mes "Hi~ I am Kafra No. 1 Type Jasmine.";
- mes "Thank you for comming all the way to Kafra Main Office here at Al De Baran!";
- next;
- mes "[Kapra Jasmine]";
- mes "Our Kapra Service is always together with our customers!";
- mes "Our Kapra Service has a history and legacy of 5 thousand 8 hundred years old...";
- mes "Blah-blah-blah.....";
- next;
- menu "FIVE THOUSNAD AND EIGHT HUNDRED YEARS?!",L0,"Ahh~ Shut Up!",L1,"You go a boyfriend?",L3;
-
- L0:
- mes "[Kapra Jasmine]";
- mes "Shut UP! And listen! It to me a week to memorice this!";
- mes "I've got poor memory unlike other Kafra agents!";
- mes "..... Eh!... What did I just say...";
- next;
- mes "[Kapra Jasmine]";
- mes "Hohohoho. S-sorry... I-it was a show, a standing comedy...";
- mes "Right... Dream Show only for Ka-Kafra customers~!";
- mes "(but a solo show)";
- close;
- L1:
- mes "[Kapra Jasmine]";
- mes ". . . . .";
- mes "I was the member of Kafra Garrion before I joined Kafra Service Team...";
- mes "The speciality was 'Bash'!!";
- mes "I'm trying to be feminine and live a quiet life";
- mes "So please don0t tempt me...";
- close;
- L2:
- mes "[Kapra Jasmine]";
- mes "My, my~. Kafra Service has a ridiculous rule that no Agent can have a boyfriend";
- mes ". . . . .";
- mes ". . . . . . . . . .";
- next;
- mes "[Kapra Jasmine]";
- mes "Just kidding~~ Hehe";
- close;
-}
-
-aldeba_in.gat,79,161,6 script Kafra 115,{
- mes "[Kafra]";
- mes "Welcome, my dearest " + strcharinfo(0) + ".";
- mes "Take goods as many as you've got speacial reserve from Kafra Service~";
- next;
- mes "[Kafra]";
- mes "Please keep in mind that each window requires a different special reserve for your information.";
- mes "Window I am at allows you to use special reserve form ^FF00FF100p to 3000p^000000.";
- next;
- mes "[Kafra]";
- mes "Your special reserve is ^FF0000" + specialreserve + "^000000~";
- mes "Please choose the items you want.";
- next;
- menu "100 = Carrot 7 ea",100,"200 = Carrot 15 ea",200,"300 = Carrot 25 ea",300,"400 = Carrot 35 ea",400,"500 = Carrot 50 ea",500,"600 = Carrot 60 ea",600,"700 = Carrot 75 ea",700,"800 = Carrot 85 ea",800,"900 = Carrot 100 ea",900,"1000 = 1st Lotery Chance!",1000,"Next Articles",L0,"Cancel",LEnd;
-
- 100:
- if(specialreserve < 100) goto Lneedpoints;
- mes "[Kafra]";
- mes "Good choice... Here ya go.";
- getitem 515,7;
- set specialreserve,specialreserve - 100;
- close;
- 200:
- if(specialreserve < 200) goto Lneedpoints;
- mes "[Kafra]";
- mes "Good choice... Here ya go.";
- getitem 515,15;
- set specialreserve,specialreserve - 200;
- close;
- 300:
- if(specialreserve < 300) goto Lneedpoints;
- mes "[Kafra]";
- mes "Good choice... Here ya go.";
- getitem 515,25;
- set specialreserve,specialreserve - 300;
- close;
- 400:
- if(specialreserve < 400) goto Lneedpoints;
- mes "[Kafra]";
- mes "Good choice... Here ya go.";
- getitem 515,35;
- set specialreserve,specialreserve - 400;
- close;
- 500:
- if(specialreserve < 500) goto Lneedpoints;
- mes "[Kafra]";
- mes "Good choice... Here ya go.";
- getitem 515,50;
- set specialreserve,specialreserve - 500;
- close;
- 600:
- if(specialreserve < 600) goto Lneedpoints;
- mes "[Kafra]";
- mes "Good choice... Here ya go.";
- getitem 515,60;
- set specialreserve,specialreserve - 600;
- close;
- 700:
- if(specialreserve < 700) goto Lneedpoints;
- mes "[Kafra]";
- mes "Good choice... Here ya go.";
- getitem 515,75;
- set specialreserve,specialreserve - 700;
- close;
- 800:
- if(specialreserve < 800) goto Lneedpoints;
- mes "[Kafra]";
- mes "Good choice... Here ya go.";
- getitem 515,85;
- set specialreserve,specialreserve - 800;
- close;
- 900:
- if(specialreserve < 900) goto Lneedpoints;
- mes "[Kafra]";
- mes "Good choice... Here ya go.";
- getitem 515,100;
- set specialreserve,specialreserve - 900;
- close;
- 1000:
- mes "^FF0000Under Construction^000000";
- close;
- L0:
- menu "1100 = Red Potion 7 ea",1100,"1300 = Red Potion 15 ea",1300,"1500 = Red Potion 25 ea",1500,"1700 = Red Potion 35 ea",1700,"1900 = Red Potion 50 ea",1900,"2100 = Red Potion 60 ea",2100,"2300 = Red Potion 75 ea",2300,"2500 = Red Potion 85 ea",2500,"2800 = Red Potion 100 ea",2800,"3000 = 2nd Lotery Chance!",3000,"Cancel",EndL0;
-
- 1100:
- if(specialreserve < 1100) goto Lneedpoints;
- mes "[Kafra]";
- mes "Good choice... Here ya go.";
- getitem 501,7;
- set specialreserve,specialreserve - 1100;
- close;
- 1300:
- if(specialreserve < 1300) goto Lneedpoints;
- mes "[Kafra]";
- mes "Good choice... Here ya go.";
- getitem 501,15;
- set specialreserve,specialreserve - 1300;
- close;
- 1500:
- if(specialreserve < 1500) goto Lneedpoints;
- mes "[Kafra]";
- mes "Good choice... Here ya go.";
- getitem 501,25;
- set specialreserve,specialreserve - 1500;
- close;
- 1700:
- if(specialreserve < 1700) goto Lneedpoints;
- mes "[Kafra]";
- mes "Good choice... Here ya go.";
- getitem 501,35;
- set specialreserve,specialreserve - 1700;
- close;
- 1900:
- if(specialreserve < 1900) goto Lneedpoints;
- mes "[Kafra]";
- mes "Good choice... Here ya go.";
- getitem 501,50;
- set specialreserve,specialreserve - 1900;
- close;
- 2100:
- if(specialreserve < 2100) goto Lneedpoints;
- mes "[Kafra]";
- mes "Good choice... Here ya go.";
- getitem 501,60;
- set specialreserve,specialreserve - 2100;
- close;
- 2300:
- if(specialreserve < 2300) goto Lneedpoints;
- mes "[Kafra]";
- mes "Good choice... Here ya go.";
- getitem 501,75;
- set specialreserve,specialreserve - 2300;
- close;
- 2500:
- if(specialreserve < 2500) goto Lneedpoints;
- mes "[Kafra]";
- mes "Good choice... Here ya go.";
- getitem 501,85;
- set specialreserve,specialreserve - 2500;
- close;
- 2800:
- if(specialreserve < 2800) goto Lneedpoints;
- mes "[Kafra]";
- mes "Good choice... Here ya go.";
- getitem 501,100;
- set specialreserve,specialreserve - 2800;
- close;
- 3000:
- mes "^FF0000Under Construction^000000";
- close;
-Lend:
- mes "[Kafra]";
- mes "Ok then... Come again if you change your mind.";
- close;
-}
-
-aldeba_in.gat,81,166,4 script Kafra Service 117,{
- cutin "kafra_01",2;
- mes "[Kafra Pavianne]";
- mes "Welcome! I'm Kafra service's the first Kapra Type 'Pavianne'";
- next;
- mes "[Kafra Pavianne]";
- mes "Our Kapra Service is always trying to meet 100% customers satisfaction based on 3 principles, Trust, Devotion and Truest.";
- mes "With complete Service training and supervision, we serve our customers to meet thier needs.";
- next;
- menu "Buy Kafra Pass",L0,"What is Kafra Pass",L1,"Good Bye",L3;
-
- L0:
- getitem 1084,1;
- set Zeny, Zeny-2000;
- mes "[Kafra Pavianne]";
- mes "Thank you for using our Kapra Service all the time!";
- mes "Have a Nice Day!";
- cutin "kafra_01",255;
- close;
- L1:
- mes "[Kafra Pavianne]";
- mes "The best gift you could get only at Kafra Main Office!";
- mes "^4040FF'K A P R A's P A S S'^000000!!";
- mes "TaDa~!";
- next;
- mes "[Kafra Pavianne]";
- mes "With Kafra Pass, you could experience the convenience of Kafra Service world-wide! No Hassle!";
- mes "The price is 2000 zeny~~";
- next;
- mes "[Kafra Pavianne]";
- mes "Visit any Kafra Service in Midgard, and you could enjoy Kafra Service any time any where for once.";
- mes "Ending a a conversation with Kafra Service Agent will expire the pass.";
- cutin "kafra_01",255;
- close;
- L3:
- mes "[Kafra Pavianne]";
- mes "Thank you for using Kafra Service!";
- mes "It was Kafra Pavianne";
- cutin "kafra_01",255;
- close;
-}
-
-aldeba_in.gat,83,244,4 script Kafra Service 116,{
- cutin "kafra_02",2;
- mes "[Kafra Blossom]";
- mes "..... Pavianne is such an old-timer!";
- mes "Too stubborn...";
- mes "We should make customers to experience more unique, never-seen, aspects of Kafra here at Main Office.";
- next;
- mes "[Kafra Blossom]";
- mes "Now! WELCOOOOOME~~ I am Kafra Tailing Type.";
- mes "Please don't forget to continue using our Kafra Service, and ask for me, Tailing~~";
- next;
- menu "I'm an admirer of you~!",L0,"Ehhaha",L1;
-
- L0:
- mes "[Kafra Blossom]";
- mes "Really!";
- mes "Thank you sooo much~";
- mes "Here is... my... autograph...";
- next;
- mes "[Kafra Blossom]";
- mes "Don't even bother to look in your Item Iventory. It won't be there... Hehe..";
- mes "My autograph will remail win your heart.";
- cutin "kafra_02",255;
- close;
- L1:
- mes "[Kafra Blossom]";
- mes "Huh?";
- mes ". . . . .";
- mes "That's all?";
- mes "Phew~ such a dull customer...";
- cutin "kafra_02",255;
- close;
-}
-
-aldeba_in.gat,91,244,4 script Kafra Service 112,{
- cutin "kafra_06",2;
- mes "[Kafra Curly Sue]";
- mes "Hello, hello?!!";
- mes "The youngest of all! Kafra cutty~~";
- mes "I am Kafra Type 'Curly Sue'";
- next;
- mes "[Kafra Curly Sue]";
- mes "It hasn't been long meeting customers since I am new, but I am always doing my best!!";
- next;
- menu "Where is your mom?",L0,"End conversation",LEnd;
-
- L0:
- mes "[Kafra Curly Sue]";
- mes ". . . . .";
- mes "Sob sob ...";
- mes "I am no a KID!!";
- next;
- cutin "kafra_06",255;
- close;
- LEnd:
- mes "[Kafra Curly Sue]";
- mes "Here at Kafra Service, We're all doing out B-E-S-T! to provide our customers the B-E-S-T! services.";
- mes "We really appreciate your business with us.";
- next;
- cutin "kafra_06",255;
- close;
-}
-
-aldeba_in.gat,96,181,4 script Kafra Service 113,{
- cutin "kafra_05",2;
- mes "[Kafra Leilah]";
- mes "Kafra Service.";
- mes "What can I do for you?";
- next;
- menu "Save.",Lsave,"Use Storage Service",Lstorage,"Use Cart Service.",Lcart,"End conversation.",Lcancel;
-
- Lsave:
- mes "[Kafra Leilah]";
- mes "Please. This is Kafra Service Command Center in charge of training Kafra Service Agent.";
- next;
- mes "[Kafra Leilah]";
- mes "For Actual Services you must visit Kafra Service Center Agent at each city including Al De Baran.";
- mes "... But I will do that for you...";
- next;
- savepoint "aldeba_in.gat",96,179;
- cutin "kafra_05",255;
- close;
- Lstorage:
- if((class ==Job_Novice) && (JobLevel<6)) goto NeedJobLevel;
- if(Zeny<30) goto NeedZenys;
- set Zeny, Zeny-30;
- openstorage;
- cutin "kafra_02",255;
- close;
-
- NeedJobLevel:
- mes "[Kafra Leilah]";
- mes "I am sorry but you have to be at least novice with job level 6 if you want to use the storage";
- cutin "kafra_05",255;
- close;
- NeedZenys:
- mes "[Kafra Leilah]";
- mes "Dear, you don't have enough zeny. The Storage fee is 30 Zeny.";
- cutin "kafra_05",255;
- close;
- Lcart:
- if((class ==Job_Merchant) || (class==Job_Blacksmith) || (class==Job_Alchem)) goto UseCart;
- mes "[Kafra Leilah]";
- mes "I'm sorry. The cart service is only provided for Merchants, Blacksmiths and Alchemists only.";
- cutin "kafra_04",255;
- close;
-
- UseCart:
- mes "[Kafra Leilah]";
- mes "The Cart Fee is 800 Zeny. Do you want to Rent a Cart?";
- next;
- menu "Rent a Cart.",RentCart,"Cancel.",RCCancel;
-
- RentCart:
- if(Zeny<800) goto RCNeedZenys;
- if(getskilllv(39) < 1) got Lneedskill;
- if((CheckCart)==1) goto GetCart;
-
- GetCart:
- set Zeny,Zeny-800;
- set specialreserve,specialreserve + 800;
- setcart;
- mes "[Kafra]";
- mes "There you go..";
- cutin "kafra_08",255;
- close;
- RCNeedZenys:
- mes "[Kafra Leilah]";
- mes "Dear, you don't have enough zeny. You need 800 Zeny.";
- cutin "kafra_04",255;
- close;
- Lneedskill:
- mes "[Kafra Leilah]";
- mes "Sorry dear but you need the Pushcart skill to rent a cart.";
- cutin "kafra_04",255;
- close;
- RCCancel:
- cutin "kafra_04",255;
- close;
- Lcancel:
- cutin "kafra_05",2;
- close;
-}
-
-aldeba_in.gat,142,238,4 script Kafra Service 114,{
- cutin "kafra_04",2;
- mes "[Kafra Roxie]";
- mes "Welcome! I'm Kafra Type 'Roxie'";
- mes "The Special Secret about Kapra only for you Kapra!";
- next;
- mes "[Kafra Roxie]";
- mes "You know... Our Kapra Service wasn't actually called Kapra originally~~";
- mes "Well what do you think it actually was?~";
- next;
- mes "[Kafra Roxie]";
- mes "TaDa~ Surprisingly it was~~~!";
- mes "Ka! P (Ring Ring Ring)";
- mes "Oh... my phone... Sorry please wait...";
- next;
- mes "[Kafra Roxie]";
- mes "Hi? Kapra Type Roxie";
- mes "Huh! Director, sir! Yes! Yes! I understand! ..... Sure!";
- mes "Ah... Huh?!";
- next;
- mes "[Kafra Roxie]";
- mes "No-no sir!";
- mes "Yes! I understand!!";
- next;
- mes "[Kafra Roxie]";
- mes "*Click*";
- mes "..... Hehehe...";
- mes ". . . . .";
- next;
- mes "[Kafra Roxie]";
- mes "Ah... Please ignore what you've just heard from me, haha.";
- mes ". . . . .";
- close;
+//===== eAthena Script ======================================= +//= Kafra Script +//===== By: ================================================== +//= Lotsa People (1.0) +//= Darlskies (1.1) +//= Darkchild (1.2) +//= Syrus22 (2.0) +//= Syrus22 (2.1) +//= Darkchild (2.2) +//===== Current Version: ===================================== +//= 2.2 +//===== Compatible With: ===================================== +//= Any eAthena Version In Which functions work. +//===== Description: ========================================= +//= All The Kafra's In Ro, Incl HQ +//===== Additional Comments: ================================= +//= Darkskies did all the kafra points stuff. +//= Syrus22 - I compltely rewrote the script pretty much except for +//= the normal conversation text in the Kafra HQ NPCs. +//= Syrus22 - I fixed the Special Reserve in the Kafra HQ to really +//= give you items. I will add the Lottery Chances when I get +//= full info on the prizes. +//= Syrus22 - I will add a Louyang Kafra when I get better location info. +//= Darkchild - Added Comodo +//============================================================ + +//**********************************************// +//Actual Kafra NPCs // +//**********************************************// +//These will set the necessary variables for my // +//functions to work. // +//**********************************************// +//---Orc Dungeon Kafra--- +gef_fild10.gat,73,340,4 script Kafra#orc1 115,{ +set @cutinpic$,"kafra_02"; + +set @save,1; +set @save1map$,"gef_fild10.gat"; +set @save1x,54; +set @save1y,232; + +callfunc "kaframain"; +break; +} +//---Byalan Kafra--- +izlu2dun.gat,106,58,8 script Kafra 115,{ +if (class != Job_Novice) goto Lkafra; +if((job_merchant_q==8) || (job_merchant_q==7)) goto JobMerQE8oE7; +if((job_merchant_q==6) || (job_merchant_q==5)) goto JobMerQE6oE5; + +JobMerQE8oE7: + if(countitem(Delivery_Message) != 0) goto JobMerQE8oE7Cont; + +JobMerQE8oE7Cont: + menu "Excuse me.",M0; + + M0: + mes "[Kafra]"; + mes "Yes?"; + cutin "kafra_03",255; + close; + +JobMerQE6oE5: + mes "[Kafra]"; + mes "Delivery fro the Merchant Guild?? Ah, Right! Yes! I almost forgot."; + mes "Okay,Please put down here...."; + if((countitem(1081)==1) || (countitem(1082)==1) || (countitem(1083)==1)) goto MerBox123E1; + mes ".... I think our orders are almost one Box of Oversized and Heavy....But you seem to carry it on without difficulty."; + close; + + MerBox123E1: + next; + mes "[Kafra]"; + mes "Let me check its Serial numbers, I have to give the receipt to you anyhow."; + if(nov_1_2_cos_c==7) goto JobMerQ2E7; + if(nov_1_2_cos_c==8) goto JobMerQ2E8; + next; + mes "[Kafra]"; + mes "......? Excuse me! I think you gave me the wrong one."; + mes "Our order should have the serial numbers as either of 3318702 or 3543625..."; + cutin "kafra_03",255; + close; + +JobMerQ2E7: + if(countitem(1081) !=0) goto MerBox1NE0; + + MerBox1NE0: + mes "Um.... 3012685. Yes! This is the right one we ordered. Here, your receipt."; + delitem 1081,1; + getitem 1079,1; + goto JobMerQ2Cont; + +JobMerQ2E8: + if(countitem(1081) !=0) goto MerBox2NE0; + + MerBox2NE0: + mes "Um.... 3543625. Yes! This is the right one we ordered. Here, your receipt."; + delitem 1082,1; + getitem 1080,1; + goto JobMerQ2Cont; + +JobMerQ2Cont: + if(job_merchant_q==6) goto JobMerQE6; + getitem 3005,2; + goto JobMerQ2Cont1; + +JobMerQE6: + getitem 3005,2; + goto JobMerQ2Cont1; + +JobMerQ2Cont1: + getitem 3017,1; + if(countitem(Delivery_Message) != 0) goto DevMsg; + goto DevMsgCont; + +DevMsg: + menu "This is from Mr. Mahnsoo...",M1; + + M1: + delitem 1072,1; + set nov_3_merchant,11; + mes "[Kapra]"; + mes "Oh, my good Lord! Mr. Mansoo wrote me a Letter? Thank you, Thank you~"; + mes "I though he would send one one of these days, but I've never expected it would be so soon like this time~"; + goto DevMsgCont; + + DevMsgCont: + next; + mes "[Kafra]"; + mes "I really appreciate you for what you've done so far. This is my Small Gift for you to lay my heart."; + mes "I hope you will help me next time."; + set @TEMP,rand(2); + goto R0; + + R0: + if(@TEMP !=0) goto R1; + getitem 513,3; + cutin "kafra_03",255; + close; + R1: + getitem 512,3; + cutin "kafra_03",255; + close; + +Lkafra: +set @cutinpic$,"kafra_03"; + +set @save,1; +set @save1map$,"izlu2dun.gat"; +set @save1x,87; +set @save1y,170; + +callfunc "kaframain"; +break; +} +//---Pyramids Kafra--- +moc_ruins.gat,61,156,5 script Kafra#pyr1 114,{ +set @cutinpic$,"kafra_04"; + +set @save,1; +set @save1map$,"moc_ruins.gat"; +set @save1x,41; +set @save1y,141; + +callfunc "kaframain"; +break; +} +//---Northern Prontera Field Kafra--- +prt_fild01.gat,198,47,8 script Kafra#pfl1 112,{ +set @cutinpic$,"kafra_06"; + +set @save,1; +set @save1map$,"prt_fild01.gat"; +set @save1x,197; +set @save1y,50; + +callfunc "kaframain"; +break; +} +//---Culvert Kafra--- +prt_fild05.gat,290,224,1 script Kafra#pfl2 114,{ +set @cutinpic$,"kafra_04"; + +set @save,1; +set @save1map$,"prt_fild05.gat"; +set @save1x,274; +set @save1y,243; + +callfunc "kaframain"; +break; +} +//---In Alberta Kafras--- +alberta.gat,28,229,8 script Kafra#alb1 115,{ +set @cutinpic$,"kafra_02"; + +set @save1map$,"alberta.gat"; +set @save1x,31; +set @save1y,231; +set @save2map$,"pay_fild03.gat"; +set @save2x,386; +set @save2y,76; + +set @warps,4; + +set @warp1$,"Payon"; +set @warp1name$,"payon.gat"; +set @warp1x,69; +set @warp1y,100; +set @warp1zeny,1300; + +set @warp2$,"Prontera"; +set @warp2name$,"prontera.gat"; +set @warp2x,116; +set @warp2y,75; +set @warp2zeny,2100; + +set @warp3$,"Morocc"; +set @warp3name$,"morocc.gat"; +set @warp3x,156; +set @warp3y,46; +set @warp3zeny,2200; + +set @warp4$,"Comodo"; +set @warp4name$,"comodo.gat"; +set @warp4x,209; +set @warp4y,143; +set @warp4zeny,2400; + +set @kaflocations,1; +set @location1x,113; +set @location1y,60; + +set @special,1; + +callfunc "kaframain"; +break; +} +alberta.gat,113,60,5 script Kafra#alb2 112,{ +set @cutinpic$,"kafra_06"; + +set @save,1; +set @save1map$,"alberta.gat"; +set @save1x,117; +set @save1y,57; + +set @warps,4; + +set @warp1$,"Payon"; +set @warp1name$,"payon.gat"; +set @warp1x,69; +set @warp1y,100; +set @warp1zeny,1300; + +set @warp2$,"Prontera"; +set @warp2name$,"prontera.gat"; +set @warp2x,116; +set @warp2y,75; +set @warp2zeny,2100; + +set @warp3$,"Morocc"; +set @warp3name$,"morocc.gat"; +set @warp3x,156; +set @warp3y,46; +set @warp3zeny,2200; + +set @warp4$,"Comodo"; +set @warp4name$,"comodo.gat"; +set @warp4x,209; +set @warp4y,143; +set @warp4zeny,2400; + +set @kaflocations,1; +set @location1x,28; +set @location1y,229; + +set @special,1; + +callfunc "kaframain"; +break; +} +//---Sunken Ship Kafra--- +alb2trea.gat,59,69,1 script Kafra#snk1 117,{ +set @cutinpic$,"kafra_03"; + +set @save,1; +set @save1map$,"alb2trea.gat"; +set @save1x,92; +set @save1y,64; + +callfunc "kaframain"; +break; +} +//---In Al De Baran Kafra--- +aldebaran.gat,143,119,4 script Kafra#ald1 113,{ +set @cutinpic$,"kafra_05"; + +set @save,1; +set @save1map$,"aldebaran.gat"; +set @save1x,143; +set @save1y,109; + +set @warps,3; + +set @warp1$,"Geffen"; +set @warp1name$,"geffen.gat"; +set @warp1x,120; +set @warp1y,39; +set @warp1zeny,1600; + +set @warp2$,"Mjolnir Dead Pit"; +set @warp2name$,"mjolnir_02.gat"; +set @warp2x,99; +set @warp2y,351; +set @warp2zeny,1700; + +set @warp3$,"Comodo"; +set @warp3name$,"comodo.gat"; +set @warp3x,209; +set @warp3y,143; +set @warp3zeny,2200; + +set @special,1; + +callfunc "kaframain"; +break; +} +//---In Geffen Kafras--- +geffen.gat,120,62,8 script Kafra#gef1 115,{ +set @cutinpic$,"kafra_03"; + +set @save,1; +set @save1map$,"geffen.gat"; +set @save1x,119; +set @save1y,40; + +set @warps,5; + +set @warp1$,"Prontera"; +set @warp1name$,"prontera.gat"; +set @warp1x,116; +set @warp1y,75; +set @warp1zeny,1400; + +set @warp2$,"Izlude"; +set @warp2name$,"izlude.gat"; +set @warp2x,91; +set @warp2y,105; +set @warp2zeny,1800; + +set @warp3$,"Al De Baran"; +set @warp3name$,"aldebaran.gat"; +set @warp3x,143; +set @warp3y,110; +set @warp3zeny,2100; + +set @warp4$,"Morocc"; +set @warp4name$,"morocc.gat"; +set @warp4x,156; +set @warp4y,46; +set @warp4zeny,2200; + +set @warp5$,"Comodo"; +set @warp5name$,"comodo.gat"; +set @warp5x,209; +set @warp5y,143; +set @warp5zeny,2400; + +set @kaflocations,1; +set @location1x,203; +set @location1y,123; + +set @special,1; + +callfunc "kaframain"; +break; +} +geffen.gat,203,123,3 script Kafra#gef2 114,{ +set @cutinpic$,"kafra_04"; + +set @save1map$,"geffen.gat"; +set @save1x,200; +set @save1y,124; +set @save2map$,"gef_fild00.gat"; +set @save2x,51; +set @save2y,194; + +set @warps,5; + +set @warp1$,"Prontera"; +set @warp1name$,"prontera.gat"; +set @warp1x,116; +set @warp1y,75; +set @warp1zeny,1400; + +set @warp2$,"Izlude"; +set @warp2name$,"izlude.gat"; +set @warp2x,91; +set @warp2y,105; +set @warp2zeny,1800; + +set @warp3$,"Al De Baran"; +set @warp3name$,"aldebaran.gat"; +set @warp3x,143; +set @warp3y,110; +set @warp3zeny,2100; + +set @warp4$,"Morocc"; +set @warp4name$,"morocc.gat"; +set @warp4x,156; +set @warp4y,46; +set @warp4zeny,2200; + +set @warp5$,"Comodo"; +set @warp5name$,"comodo.gat"; +set @warp5x,209; +set @warp5y,143; +set @warp5zeny,2400; + +set @kaflocations,1; +set @location1x,120; +set @location1y,62; + +set @special,1; + +callfunc "kaframain"; +break; +} +//---In Izlude Kafra--- +izlude.gat,124,115,6 script Kafra#izl1 117,{ +set @cutinpic$,"kafra_01"; + +set @save1map$,"izlude.gat"; +set @save1x,128; +set @save1y,111; +set @save2map$,"prt_fild08.gat"; +set @save2x,349; +set @save2y,202; + +set @warps,4; + +set @warp1$,"Prontera"; +set @warp1name$,"prontera.gat"; +set @warp1x,116; +set @warp1y,75; +set @warp1zeny,900; + +set @warp2$,"Payon"; +set @warp2name$,"payon.gat"; +set @warp2x,69; +set @warp2y,100; +set @warp2zeny,1700; + +set @warp3$,"Geffen"; +set @warp3name$,"geffen.gat"; +set @warp3x,120; +set @warp3y,39; +set @warp3zeny,1800; + +set @warp4$,"Comodo"; +set @warp4name$,"comodo.gat"; +set @warp4x,209; +set @warp4y,143; +set @warp4zeny,2000; + +set @special,1; + +callfunc "kaframain"; +break; +} +//---In Morocc Kafras--- +morocc.gat,156,97,4 script Kafra#moc1 115,{ +set @cutinpic$,"kafra_03"; + +set @save,1; +set @save1map$,"morocc.gat"; +set @save1x,156; +set @save1y,46; + +set @warps,5; + +set @warp1$,"Prontera"; +set @warp1name$,"prontera.gat"; +set @warp1x,116; +set @warp1y,75; +set @warp1zeny,1800; + +set @warp2$,"Payon"; +set @warp2name$,"payon.gat"; +set @warp2x,69; +set @warp2y,100; +set @warp2zeny,1800; + +set @warp3$,"Alberta"; +set @warp3name$,"alberta.gat"; +set @warp3x,117; +set @warp3y,56; +set @warp3zeny,2200; + +set @warp4$,"Geffen"; +set @warp4name$,"geffen.gat"; +set @warp4x,120; +set @warp4y,39; +set @warp4zeny,2200; + +set @warp5$,"Comodo"; +set @warp5name$,"comodo.gat"; +set @warp5x,209; +set @warp5y,143; +set @warp5zeny,1800; + +set @kaflocations,1; +set @location1x,163; +set @location1y,260; + +set @special,1; + +callfunc "kaframain"; +break; +} +morocc.gat,163,260,4 script Kafra 114,{ +set @cutinpic$,"kafra_04"; + +set @save1map$,"morocc.gat"; +set @save1x,187; +set @save1y,281; +set @save2map$,"moc_fild07.gat"; +set @save2x,212; +set @save2y,30; + +set @warps,5; + +set @warp1$,"Prontera"; +set @warp1name$,"prontera.gat"; +set @warp1x,116; +set @warp1y,75; +set @warp1zeny,1800; + +set @warp2$,"Payon"; +set @warp2name$,"payon.gat"; +set @warp2x,69; +set @warp2y,100; +set @warp2zeny,1800; + +set @warp3$,"Alberta"; +set @warp3name$,"alberta.gat"; +set @warp3x,117; +set @warp3y,56; +set @warp3zeny,2200; + +set @warp4$,"Geffen"; +set @warp4name$,"geffen.gat"; +set @warp4x,120; +set @warp4y,39; +set @warp4zeny,2200; + +set @warp5$,"Comodo"; +set @warp5name$,"comodo.gat"; +set @warp5x,209; +set @warp5y,143; +set @warp5zeny,1800; + +set @kaflocations,1; +set @location1x,156; +set @location1y,97; + +set @special,1; + +callfunc "kaframain"; +break; +} +//---In Payon Kafra--- +payon.gat,99,116,4 script Kafra#pay1 113,{ +set @cutinpic$,"kafra_05"; + +set @save1map$,"payon.gat"; +set @save1x,69; +set @save1y,100; +set @save2map$,"pay_fild01.gat"; +set @save2x,340; +set @save2y,347; + +set @warps,4; + +set @warp1$,"Alberta"; +set @warp1name$,"alberta.gat"; +set @warp1x,117; +set @warp1y,56; +set @warp1zeny,1300; + +set @warp2$,"Prontera"; +set @warp2name$,"prontera.gat"; +set @warp2x,116; +set @warp2y,72; +set @warp2zeny,1800; + +set @warp3$,"Morocc"; +set @warp3name$,"morocc.gat"; +set @warp3x,156; +set @warp3y,46; +set @warp3zeny,1800; + +set @warp4$,"Comodo"; +set @warp4name$,"comodo.gat"; +set @warp4x,209; +set @warp4y,143; +set @warp4zeny,2000; + +set @special,1; + +callfunc "kaframain"; +break; +} +//---Archer Village Kafra--- +pay_arche.gat,55,123,8 script Kafra 117,{ +set @cutinpic$,"kafra_01"; + +set @save,1; +set @save1map$,"pay_arche.gat"; +set @save1x,49; +set @save1y,144; + +callfunc "kaframain"; +break; +} +//---In Prontera Kafras--- +prontera.gat,29,207,6 script Kafra#pro2 113,{ +set @cutinpic$,"kafra_05"; + +set @warps,6; + +set @warp1$,"Izlude"; +set @warp1name$,"izlude.gat"; +set @warp1x,91; +set @warp1y,105; +set @warp1zeny,900; + +set @warp2$,"Geffen"; +set @warp2name$,"geffen.gat"; +set @warp2x,120; +set @warp2y,39; +set @warp2zeny,1400; + +set @warp3$,"Payon"; +set @warp3name$,"payon.gat"; +set @warp3x,69; +set @warp3y,100; +set @warp3zeny,1700; + +set @warp4$,"Morocc"; +set @warp4name$,"morocc.gat"; +set @warp4x,156; +set @warp4y,46; +set @warp4zeny,1800; + +set @warp5$,"Orc Dungeon"; +set @warp5name$,"gef_fild10.gat"; +set @warp5x,52; +set @warp5y,326; +set @warp5zeny,1700; + +set @warp6$,"Comodo"; +set @warp6name$,"comodo.gat"; +set @warp6x,209; +set @warp6y,143; +set @warp6zeny,2000; + +set @save1map$,"prontera.gat"; +set @save1x,33; +set @save1y,208; +set @save2map$,"prt_fild05.gat"; +set @save2x,367; +set @save2y,205; + +set @kaflocations,1; +set @location1x,146; +set @location1y,89; +set @location2x,282; +set @location2y,200; +set @location3x,151; +set @location3y,29; + +set @special,1; + +callfunc "kaframain"; +break; +} +prontera.gat,146,89,6 script Kafra#pro1 115,{ +set @cutinpic$,"kafra_03"; + +set @warps,6; + +set @warp1$,"Izlude"; +set @warp1name$,"izlude.gat"; +set @warp1x,91; +set @warp1y,105; +set @warp1zeny,900; + +set @warp2$,"Geffen"; +set @warp2name$,"geffen.gat"; +set @warp2x,120; +set @warp2y,39; +set @warp2zeny,1400; + +set @warp3$,"Payon"; +set @warp3name$,"payon.gat"; +set @warp3x,69; +set @warp3y,100; +set @warp3zeny,1700; + +set @warp4$,"Morocc"; +set @warp4name$,"morocc.gat"; +set @warp4x,156; +set @warp4y,46; +set @warp4zeny,1800; + +set @warp5$,"Orc Dungeon"; +set @warp5name$,"gef_fild10.gat"; +set @warp5x,52; +set @warp5y,326; +set @warp5zeny,1700; + +set @warp6$,"Comodo"; +set @warp6name$,"comodo.gat"; +set @warp6x,209; +set @warp6y,143; +set @warp6zeny,2000; + +set @save,1; +set @save1map$,"prontera.gat"; +set @save1x,116; +set @save1y,73; + +set @kaflocations,1; +set @location1x,29; +set @location1y,207; +set @location2x,282; +set @location2y,200; +set @location3x,151; +set @location3y,29; + +set @special,1; + +callfunc "kaframain"; +break; +} +prontera.gat,282,199,6 script Kafra 115,{ +set @cutinpic$,"kafra_03"; + +set @warps,6; + +set @warp1$,"Izlude"; +set @warp1name$,"izlude.gat"; +set @warp1x,91; +set @warp1y,105; +set @warp1zeny,900; + +set @warp2$,"Geffen"; +set @warp2name$,"geffen.gat"; +set @warp2x,120; +set @warp2y,39; +set @warp2zeny,1400; + +set @warp3$,"Payon"; +set @warp3name$,"payon.gat"; +set @warp3x,69; +set @warp3y,100; +set @warp3zeny,1700; + +set @warp4$,"Morocc"; +set @warp4name$,"morocc.gat"; +set @warp4x,156; +set @warp4y,46; +set @warp4zeny,1800; + +set @warp5$,"Orc Dungeon"; +set @warp5name$,"gef_fild10.gat"; +set @warp5x,52; +set @warp5y,326; +set @warp5zeny,1700; + +set @warp6$,"Comodo"; +set @warp6name$,"comodo.gat"; +set @warp6x,209; +set @warp6y,143; +set @warp6zeny,2000; + +set @save,1; +set @save1map$,"prontera.gat"; +set @save1x,117; +set @save1y,73; + +set @kaflocations,1; +set @location1x,29; +set @location1y,207; +set @location2x,146; +set @location2y,89; +set @location3x,151; +set @location3y,29; + +set @special,1; + +callfunc "kaframain"; +break; +} +prontera.gat,151,29,8 script Kafra 115,{ +set @cutinpic$,"kafra_03"; + +set @warps,6; + +set @warp1$,"Izlude"; +set @warp1name$,"izlude.gat"; +set @warp1x,91; +set @warp1y,105; +set @warp1zeny,900; + +set @warp2$,"Geffen"; +set @warp2name$,"geffen.gat"; +set @warp2x,120; +set @warp2y,39; +set @warp2zeny,1400; + +set @warp3$,"Payon"; +set @warp3name$,"payon.gat"; +set @warp3x,69; +set @warp3y,100; +set @warp3zeny,1700; + +set @warp4$,"Morocc"; +set @warp4name$,"morocc.gat"; +set @warp4x,156; +set @warp4y,46; +set @warp4zeny,1800; + +set @warp5$,"Orc Dungeon"; +set @warp5name$,"gef_fild10.gat"; +set @warp5x,52; +set @warp5y,326; +set @warp5zeny,1700; + +set @warp6$,"Comodo"; +set @warp6name$,"comodo.gat"; +set @warp6x,209; +set @warp6y,143; +set @warp6zeny,2000; + +set @save1map$,"prontera.gat"; +set @save1x,150; +set @save1y,33; +set @save2map$,"prt_fild08.gat"; +set @save2x,170; +set @save2y,369; + +set @kaflocations,1; +set @location1x,29; +set @location1y,207; +set @location2x,146; +set @location2y,89; +set @location3x,282; +set @location3y,199; + +set @special,1; + +callfunc "kaframain"; +break; +} +//---In Yuno Kafras--- +yuno.gat,328,108,6 script Kafra 117,{ +set @cutinpic$,"kafra_02"; + +set @save,1; +set @save1map$,"yuno.gat"; +set @save1x,332; +set @save1y,107; + +set @warps,4; + +set @warp1$,"Izlude"; +set @warp1name$,"izlude.gat"; +set @warp1x,91; +set @warp1y,105; +set @warp1zeny,900; + +set @warp2$,"Geffen"; +set @warp2name$,"geffen.gat"; +set @warp2x,120; +set @warp2y,39; +set @warp2zeny,2100; + +set @warp3$,"Payon"; +set @warp3name$,"payon.gat"; +set @warp3x,69; +set @warp3y,100; +set @warp3zeny,2100; + +set @warp4$,"Morocc"; +set @warp4name$,"morocc.gat"; +set @warp4x,156; +set @warp4y,46; +set @warp4zeny,2100; + +set @kafralocations,1; +set @location1x,151; +set @location1y,87; +set @location2x,278; +set @location2y,221; + +set @special,1; + +callfunc "kaframain"; +break; +} +yuno.gat,151,87,4 script Kafra 115,{ +set @cutinpic$,"kafra_02"; + +set @save,1; +set @save1map$,"yuno.gat"; +set @save1x,154; +set @save1y,75; + +set @warps,4; + +set @warp1$,"Izlude"; +set @warp1name$,"izlude.gat"; +set @warp1x,91; +set @warp1y,105; +set @warp1zeny,900; + +set @warp2$,"Geffen"; +set @warp2name$,"geffen.gat"; +set @warp2x,120; +set @warp2y,39; +set @warp2zeny,2100; + +set @warp3$,"Payon"; +set @warp3name$,"payon.gat"; +set @warp3x,69; +set @warp3y,100; +set @warp3zeny,2100; + +set @warp4$,"Morocc"; +set @warp4name$,"morocc.gat"; +set @warp4x,156; +set @warp4y,46; +set @warp4zeny,2100; + +set @kafralocations,1; +set @location1x,328; +set @location1y,108; +set @location2x,278; +set @location2y,221; + +set @special,1; + +callfunc "kaframain"; +break; +} +yuno.gat,278,221,6 script Kafra 117,{ +set @cutinpic$,"kafra_02"; + +set @save,1; +set @save1map$,"yuno.gat"; +set @save1x,332; +set @save1y,107; + +set @warps,4; + +set @warp1$,"Izlude"; +set @warp1name$,"izlude.gat"; +set @warp1x,91; +set @warp1y,105; +set @warp1zeny,900; + +set @warp2$,"Geffen"; +set @warp2name$,"geffen.gat"; +set @warp2x,120; +set @warp2y,39; +set @warp2zeny,2100; + +set @warp3$,"Payon"; +set @warp3name$,"payon.gat"; +set @warp3x,69; +set @warp3y,100; +set @warp3zeny,2100; + +set @warp4$,"Morocc"; +set @warp4name$,"morocc.gat"; +set @warp4x,156; +set @warp4y,46; +set @warp4zeny,2100; + +set @kafralocations,1; +set @location1x,328; +set @location1y,108; +set @location2x,151; +set @location2y,87; + +set @special,1; + +callfunc "kaframain"; +break; +} +//---In Umbala Kafra--- +umbala.gat,128,133,4 script Kafra 115,{ +set @cutinpic$,"kafra_02"; + +set @save,1; +set @save1map$,"umbala.gat"; +set @save1x,126; +set @save1y,131; + +set @warps,4; + +set @warp1$,"Izlude"; +set @warp1name$,"izlude.gat"; +set @warp1x,91; +set @warp1y,105; +set @warp1zeny,900; + +set @warp2$,"Geffen"; +set @warp2name$,"geffen.gat"; +set @warp2x,120; +set @warp2y,39; +set @warp2zeny,2100; + +set @warp3$,"Payon"; +set @warp3name$,"payon.gat"; +set @warp3x,69; +set @warp3y,100; +set @warp3zeny,2100; + +set @warp4$,"Morocc"; +set @warp4name$,"morocc.gat"; +set @warp4x,156; +set @warp4y,46; +set @warp4zeny,2100; + +set @special,1; + +callfunc "kaframain"; +break; +} +//---In Gonryun Kafra--- +//Note: Gave this Kafra the same warps as Umbala and Yuno till I get the +//real warp information. +gonryun.gat,159,122,4 script Kafra 116,{ +set @cutinpic$,"kafra_02"; + +set @save,1; +set @save1map$,"gonryun.gat"; +set @save1x,160; +set @save1y,62; + +set @warps,4; + +set @warp1$,"Izlude"; +set @warp1name$,"izlude.gat"; +set @warp1x,91; +set @warp1y,105; +set @warp1zeny,900; + +set @warp2$,"Geffen"; +set @warp2name$,"geffen.gat"; +set @warp2x,120; +set @warp2y,39; +set @warp2zeny,2100; + +set @warp3$,"Payon"; +set @warp3name$,"payon.gat"; +set @warp3x,69; +set @warp3y,100; +set @warp3zeny,2100; + +set @warp4$,"Morocc"; +set @warp4name$,"morocc.gat"; +set @warp4x,156; +set @warp4y,46; +set @warp4zeny,2100; + +set @special,1; + +callfunc "kaframain"; +break; +} +//---Comodo--- +comodo.gat,166,163,3 script Kafra 721,{ +set @cutinpic$,"kafra_02"; + +set @save,1; +set @save1map$,"comodo.gat"; +set @save1x,188; +set @save1y,148; + +set @warps,2; + +set @warp1$,"Morroc"; +set @warp1name$,"morocc.gat"; +set @warp1x,156; +set @warp1y,46; +set @warp1pay,2400; + +set @warp2$,"Geffen"; +set @warp2name$,"geffen.gat"; +set @warp2x,120; +set @warp2y,39; +set @warp2zeny,2100; + +set @special,1; + +callfunc "kaframain"; +break; +} +//**********************************************// +//Kafra Main // +//**********************************************// +//The main kafra script. This will call the // +//necessary functions from the rest of the // +//script. // +//**********************************************// +function script kaframain -1,{ +cutin @cutinpic$,2; +mes "[Kafra Employee]"; +mes "Welcome to Kafra Corporation. The Kafra services are always by your side."; +mes "How may I assist you?"; +next; +if ((@warps > 0) && (@special > 0)) goto Lallmenu; +if ((@warps > 0) && (@special == 0)) goto Lwarpmenu; +if (@warps == 0) goto Lnowarpmenu; + +Lallmenu: +menu "Save",Lsave,"Use Storage",Lstorage,"Use Teleport Service",Lwarp,"Rent a Cart",Lcart,"Check Other Information",Lother,"Cancel",Lcancel; + +Lwarpmenu: +menu "Save",Lsave,"Use Storage",Lstorage,"Use Teleport Service",Lwarp,"Rent a Cart",Lcart,"Cancel",Lcancel; + +Lnowarpmenu: +menu "Save",Lsave,"Use Storage",Lstorage,"Rent a Cart",Lcart,"Cancel",Lcancel; + +Lsave: +callfunc "kafrasave"; +break; + +Lstorage: +callfunc "kafrastorage"; +break; + +Lwarp: +callfunc "kafrawarps"; +break; + +Lcart: +callfunc "kafracart"; +break; + +Lother: +callfunc "kafrainfo"; +break; + +Lcancel: +callfunc "kafraend"; +break; +} +//**********************************************// +//Kafra Save // +//**********************************************// +//This will handle the save function for all the// +//kafras. // +//**********************************************// +function script kafrasave -1,{ +if (@save == 1) goto Lsavein; +mes "[Kafra]"; +mes "Where would you like to save?"; +next; +menu "Save Outside City",Lsaveout,"Save Inside City",Lsavein; + +Lsavein: + savepoint @save1map$,@save1x,@save1y; + mes "[Kafra]"; + mes "Your respawn point has been saved. Thank you."; + callfunc "kafraend"; + break; + +Lsaveout: + savepoint @save2map$,@save2x,@save2y; + mes "[Kafra]"; + mes "Your respawn point has been saved. Thank you."; + callfunc "kafraend"; + break; +} +//**********************************************// +//Kafra Storage // +//**********************************************// +//This will handle the storage functions for // +//all the kafras. // +//**********************************************// +function script kafrastorage -1,{ +if (getskilllv(1) < 6) goto NeedJobLevel; +if (Zeny < 30) goto NeedZenys; +set specialreserve,specialreserve + 30; +set Zeny, Zeny - 30; +mes "[Kafra]"; +mes "Ok let me just open your storage for you."; +openstorage; +callfunc "kafraend"; +break; + +NeedJobLevel: + mes "[Kafra]"; + mes "I'm sorry but you must have Basic Skill 6 to use storage."; + callfunc "kafraend"; + break; + +NeedZenys: + mes "[Kafra]"; + mes "I'm sorry but you are short on Zeny."; + callfunc "kafraend"; + break; +} +//**********************************************// +//Kafra Warps // +//**********************************************// +//This will handle all the actual warping and // +//the payment of Zeny // +//**********************************************// +function script kafrawarps -1,{ +mes "[Kafra]"; +mes "Please choose your destination."; +next; +if (@warps == 7) goto L7; +if (@warps == 6) goto L6; +if (@warps == 5) goto L5; +if (@warps == 4) goto L4; +if (@warps == 3) goto L3; +if (@warps == 2) goto L2; + +L2: + menu @warp1$ + " -> " + @warp1zeny,Lwarp1,@warp2$ + " -> " + @warp2zeny,Lwarp2,"Cancel",Lcancel; + +L3: + menu @warp1$ + " -> " + @warp1zeny,Lwarp1,@warp2$ + " -> " + @warp2zeny,Lwarp2,@warp3$ + " -> " + @warp3zeny,Lwarp3,"Cancel",Lcancel; + +L4: + menu @warp1$ + " -> " + @warp1zeny,Lwarp1,@warp2$ + " -> " + @warp2zeny,Lwarp2,@warp3$ + " -> " + @warp3zeny,Lwarp3,@warp4$ + " -> " + @warp4zeny,Lwarp4,"Cancel",Lcancel; + +L5: + menu @warp1$ + " -> " + @warp1zeny,Lwarp1,@warp2$ + " -> " + @warp2zeny,Lwarp2,@warp3$ + " -> " + @warp3zeny,Lwarp3,@warp4$ + " -> " + @warp4zeny,Lwarp4,@warp5$ + " -> " + @warp5zeny,Lwarp5,"Cancel",Lcancel; + +L6: + menu @warp1$ + " -> " + @warp1zeny,Lwarp1,@warp2$ + " -> " + @warp2zeny,Lwarp2,@warp3$ + " -> " + @warp3zeny,Lwarp3,@warp4$ + " -> " + @warp4zeny,Lwarp4,@warp5$ + " -> " + @warp5zeny,Lwarp5,@warp6$ + " -> " + @warp6zeny,Lwarp6,"Cancel",Lcancel; + +L7: + menu @warp1$ + " -> " + @warp1zeny,Lwarp1,@warp2$ + " -> " + @warp2zeny,Lwarp2,@warp3$ + " -> " + @warp3zeny,Lwarp3,@warp4$ + " -> " + @warp4zeny,Lwarp4,@warp5$ + " -> " + @warp5zeny,Lwarp5,@warp6$ + " -> " + @warp6zeny,Lwarp6,@warp7$ + " -> " + @warp7zeny,Lwarp7,"Cancel",Lcancel; + +Lwarp1: + if (Zeny < @warp1zeny) goto Lneedzeny; + set specialreserve,specialreserve + @warp1zeny; + set Zeny,Zeny - @warp1zeny; + warp @warp1name$,@warp1x,@warp1y; + set @end,1; + callfunc "kafraend"; + break; + +Lwarp2: + if (Zeny < @warp2zeny) goto Lneedzeny; + set specialreserve,specialreserve + @warp2zeny; + set Zeny,Zeny - @warp2zeny; + warp @warp2name$,@warp2x,@warp2y; + set @end,1; + callfunc "kafraend"; + break; + +Lwarp3: + if (Zeny < @warp3zeny) goto Lneedzeny; + set specialreserve,specialreserve + @warp3zeny; + set Zeny,Zeny - @warp3zeny; + warp @warp3name$,@warp3x,@warp3y; + set @end,1; + callfunc "kafraend"; + break; + +Lwarp4: + if (Zeny < @warp4zeny) goto Lneedzeny; + set specialreserve,specialreserve + @warp4zeny; + set Zeny,Zeny - @warp4zeny; + warp @warp4name$,@warp4x,@warp4y; + set @end,1; + callfunc "kafraend"; + break; + +Lwarp5: + if (Zeny < @warp5zeny) goto Lneedzeny; + set specialreserve,specialreserve + @warp5zeny; + set Zeny,Zeny - @warp5zeny; + warp @warp5name$,@warp5x,@warp5y; + set @end,1; + callfunc "kafraend"; + break; + +Lwarp6: + if (Zeny < @warp6zeny) goto Lneedzeny; + set specialreserve,specialreserve + @warp6zeny; + set Zeny,Zeny - @warp6zeny; + warp @warp6name$,@warp6x,@warp6y; + set @end,1; + callfunc "kafraend"; + break; + +Lwarp7: + if (Zeny < @warp7zeny) goto Lneedzeny; + set specialreserve,specialreserve + @warp7zeny; + set Zeny,Zeny - @warp7zeny; + warp @warp7name$,@warp7x,@warp7y; + set @end,1; + callfunc "kafraend"; + break; + +Lneedzeny: + mes "[Kafra]"; + mes "I'm sorry you don't have the necessary amount of zeny."; + callfunc "kafraend"; + break; + +Lcancel: + mes "[Kafra]"; + mes "Ok, Come again soon."; + callfunc "kafraend"; + break; +} +//**********************************************// +//Kafra Cart // +//**********************************************// +//This will handle the cart rental function for // +//all the Kafras. // +//**********************************************// +function script kafracart -1,{ +if ((class == Job_Merchant) || (class == Job_Blacksmith) || (class == Job_Alchem) || (class == Job_Merchant_High) || (class == Job_Whitesmith) || (class == Job_Creator)) goto Lrentcart; +mes "[Kafra]"; +mes "Sorry this service is only provided for Merchant classes."; +callfunc "kafraend"; +break; + +Lrentcart: + if (getskilllv(39) < 1) goto Lnopush; + mes "[Kafra]"; + mes "The cart rental fee is 800 zeny. Do you want to rent a cart?"; + next; + menu "Rent a Cart",Lrent,"Cancel",Lcancel; + +Lrent: + if (Zeny < 800) goto Lneedzeny; + set specialreserve,specialreserve + 800; + set Zeny,Zeny - 800; + setcart; + mes "[Kafra]"; + mes "There ya go..."; + callfunc "kafraend"; + break; + +Lnopush: + mes "[Kafra]"; + mes "Sorry but you must have at least ^ff0000Pushcart^000000 level 1."; + callfunc "kafraend"; + break; + +Lneedzeny: + mes "[Kafra]"; + mes "Sorry but you don't have the zeny."; + callfunc "kafraend"; + break; + +Lcancel: + mes "[Kafra]"; + mes "Ok. Goodbye then"; + callfunc "kafraend"; + break; +} +//**********************************************// +//Kafra Information // +//**********************************************// +//This will handle the extra Kafra functions // +//such as your kafra points and the locations of// +//other kafras. // +//**********************************************// +function script kafrainfo -1,{ +if (@kaflocations == 1) goto Lfullmenu; +menu "Check Special Reserve Points",Lreserve,"Cancel",Lcancel; + +Lfullmenu: + menu "Check Special Reserve Points",Lreserve,"Location Tip",Llocation,"Cancel",Lcancel; + +Lreserve: + mes "[Kafra]"; + mes strcharinfo(0) + ", you have accumulated " + specialreserve + " Special Reserve Points."; + next; + mes "[Kafra]"; + mes "You can redeem your points at our Headquarters in Al De Baran."; + callfunc "kafraend"; + break; + +Llocation: + mes "[Kafra]"; + mes "Ok I'll mark them on your map."; + if (@location1x == 0) goto Lfinished; + viewpoint 0,@location1x,@location1y,1,0x0000FF; + if (@location2x == 0) goto Lfinished; + viewpoint 1,@location2x,@location2y,1,0x0000FF; + if (@location3x == 0) goto Lfinished; + viewpoint 2,@location3x,@location3y,1,0x0000FF; + if (@location4x == 0) goto Lfinished; + viewpoint 3,@location4x,@location4y,1,0x0000FF; + callfunc "kafraend"; + break; + +Lfinished: + callfunc "kafraend"; + break; + +Lcancel: + mes "[Kafra]"; + mes "Ok. Bye then..."; + callfunc "kafraend"; + break; +} +//**********************************************// +//End Kafra Function // +//**********************************************// +//This will empty all possible variables and end// +//the kafra scripts. // +//**********************************************// +function script kafraend -1,{ +set @warps,0; +set @save,0; +set @special,0; +set @kaflocations,0; +set @location1x,0; +set @location2x,0; +set @location3x,0; +set @location4x,0; +if (@end == 1) goto Lbreak; +cutin @cutinpic$,255; +close; + +Lbreak: + set @end,0; + cutin @cutinpic$,255; + break; +} +//---Kafra Warehouse--- +aldeba_in.gat,24,245,4 script Kafra Service 115,{ + cutin "kafra_03",2; + mes "[Kapra Jasmine]"; + mes "Hi~ I am Kafra No. 1 Type Jasmine."; + mes "Thank you for comming all the way to Kafra Main Office here at Al De Baran!"; + next; + mes "[Kapra Jasmine]"; + mes "Our Kapra Service is always together with our customers!"; + mes "Our Kapra Service has a history and legacy of 5 thousand 8 hundred years old..."; + mes "Blah-blah-blah....."; + next; + menu "FIVE THOUSNAD AND EIGHT HUNDRED YEARS?!",L0,"Ahh~ Shut Up!",L1,"You go a boyfriend?",L3; + + L0: + mes "[Kapra Jasmine]"; + mes "Shut UP! And listen! It to me a week to memorice this!"; + mes "I've got poor memory unlike other Kafra agents!"; + mes "..... Eh!... What did I just say..."; + next; + mes "[Kapra Jasmine]"; + mes "Hohohoho. S-sorry... I-it was a show, a standing comedy..."; + mes "Right... Dream Show only for Ka-Kafra customers~!"; + mes "(but a solo show)"; + close; + L1: + mes "[Kapra Jasmine]"; + mes ". . . . ."; + mes "I was the member of Kafra Garrion before I joined Kafra Service Team..."; + mes "The speciality was 'Bash'!!"; + mes "I'm trying to be feminine and live a quiet life"; + mes "So please don0t tempt me..."; + close; + L2: + mes "[Kapra Jasmine]"; + mes "My, my~. Kafra Service has a ridiculous rule that no Agent can have a boyfriend"; + mes ". . . . ."; + mes ". . . . . . . . . ."; + next; + mes "[Kapra Jasmine]"; + mes "Just kidding~~ Hehe"; + close; +} + +aldeba_in.gat,79,161,6 script Kafra 115,{ + mes "[Kafra]"; + mes "Welcome, my dearest " + strcharinfo(0) + "."; + mes "Take goods as many as you've got speacial reserve from Kafra Service~"; + next; + mes "[Kafra]"; + mes "Please keep in mind that each window requires a different special reserve for your information."; + mes "Window I am at allows you to use special reserve form ^FF00FF100p to 3000p^000000."; + next; + mes "[Kafra]"; + mes "Your special reserve is ^FF0000" + specialreserve + "^000000~"; + mes "Please choose the items you want."; + next; + menu "100 = Carrot 7 ea",100,"200 = Carrot 15 ea",200,"300 = Carrot 25 ea",300,"400 = Carrot 35 ea",400,"500 = Carrot 50 ea",500,"600 = Carrot 60 ea",600,"700 = Carrot 75 ea",700,"800 = Carrot 85 ea",800,"900 = Carrot 100 ea",900,"1000 = 1st Lotery Chance!",1000,"Next Articles",L0,"Cancel",LEnd; + + 100: + if(specialreserve < 100) goto Lneedpoints; + mes "[Kafra]"; + mes "Good choice... Here ya go."; + getitem 515,7; + set specialreserve,specialreserve - 100; + close; + 200: + if(specialreserve < 200) goto Lneedpoints; + mes "[Kafra]"; + mes "Good choice... Here ya go."; + getitem 515,15; + set specialreserve,specialreserve - 200; + close; + 300: + if(specialreserve < 300) goto Lneedpoints; + mes "[Kafra]"; + mes "Good choice... Here ya go."; + getitem 515,25; + set specialreserve,specialreserve - 300; + close; + 400: + if(specialreserve < 400) goto Lneedpoints; + mes "[Kafra]"; + mes "Good choice... Here ya go."; + getitem 515,35; + set specialreserve,specialreserve - 400; + close; + 500: + if(specialreserve < 500) goto Lneedpoints; + mes "[Kafra]"; + mes "Good choice... Here ya go."; + getitem 515,50; + set specialreserve,specialreserve - 500; + close; + 600: + if(specialreserve < 600) goto Lneedpoints; + mes "[Kafra]"; + mes "Good choice... Here ya go."; + getitem 515,60; + set specialreserve,specialreserve - 600; + close; + 700: + if(specialreserve < 700) goto Lneedpoints; + mes "[Kafra]"; + mes "Good choice... Here ya go."; + getitem 515,75; + set specialreserve,specialreserve - 700; + close; + 800: + if(specialreserve < 800) goto Lneedpoints; + mes "[Kafra]"; + mes "Good choice... Here ya go."; + getitem 515,85; + set specialreserve,specialreserve - 800; + close; + 900: + if(specialreserve < 900) goto Lneedpoints; + mes "[Kafra]"; + mes "Good choice... Here ya go."; + getitem 515,100; + set specialreserve,specialreserve - 900; + close; + 1000: + mes "^FF0000Under Construction^000000"; + close; + L0: + menu "1100 = Red Potion 7 ea",1100,"1300 = Red Potion 15 ea",1300,"1500 = Red Potion 25 ea",1500,"1700 = Red Potion 35 ea",1700,"1900 = Red Potion 50 ea",1900,"2100 = Red Potion 60 ea",2100,"2300 = Red Potion 75 ea",2300,"2500 = Red Potion 85 ea",2500,"2800 = Red Potion 100 ea",2800,"3000 = 2nd Lotery Chance!",3000,"Cancel",EndL0; + + 1100: + if(specialreserve < 1100) goto Lneedpoints; + mes "[Kafra]"; + mes "Good choice... Here ya go."; + getitem 501,7; + set specialreserve,specialreserve - 1100; + close; + 1300: + if(specialreserve < 1300) goto Lneedpoints; + mes "[Kafra]"; + mes "Good choice... Here ya go."; + getitem 501,15; + set specialreserve,specialreserve - 1300; + close; + 1500: + if(specialreserve < 1500) goto Lneedpoints; + mes "[Kafra]"; + mes "Good choice... Here ya go."; + getitem 501,25; + set specialreserve,specialreserve - 1500; + close; + 1700: + if(specialreserve < 1700) goto Lneedpoints; + mes "[Kafra]"; + mes "Good choice... Here ya go."; + getitem 501,35; + set specialreserve,specialreserve - 1700; + close; + 1900: + if(specialreserve < 1900) goto Lneedpoints; + mes "[Kafra]"; + mes "Good choice... Here ya go."; + getitem 501,50; + set specialreserve,specialreserve - 1900; + close; + 2100: + if(specialreserve < 2100) goto Lneedpoints; + mes "[Kafra]"; + mes "Good choice... Here ya go."; + getitem 501,60; + set specialreserve,specialreserve - 2100; + close; + 2300: + if(specialreserve < 2300) goto Lneedpoints; + mes "[Kafra]"; + mes "Good choice... Here ya go."; + getitem 501,75; + set specialreserve,specialreserve - 2300; + close; + 2500: + if(specialreserve < 2500) goto Lneedpoints; + mes "[Kafra]"; + mes "Good choice... Here ya go."; + getitem 501,85; + set specialreserve,specialreserve - 2500; + close; + 2800: + if(specialreserve < 2800) goto Lneedpoints; + mes "[Kafra]"; + mes "Good choice... Here ya go."; + getitem 501,100; + set specialreserve,specialreserve - 2800; + close; + 3000: + mes "^FF0000Under Construction^000000"; + close; +Lend: + mes "[Kafra]"; + mes "Ok then... Come again if you change your mind."; + close; +} + +aldeba_in.gat,81,166,4 script Kafra Service 117,{ + cutin "kafra_01",2; + mes "[Kafra Pavianne]"; + mes "Welcome! I'm Kafra service's the first Kapra Type 'Pavianne'"; + next; + mes "[Kafra Pavianne]"; + mes "Our Kapra Service is always trying to meet 100% customers satisfaction based on 3 principles, Trust, Devotion and Truest."; + mes "With complete Service training and supervision, we serve our customers to meet thier needs."; + next; + menu "Buy Kafra Pass",L0,"What is Kafra Pass",L1,"Good Bye",L3; + + L0: + getitem 1084,1; + set Zeny, Zeny-2000; + mes "[Kafra Pavianne]"; + mes "Thank you for using our Kapra Service all the time!"; + mes "Have a Nice Day!"; + cutin "kafra_01",255; + close; + L1: + mes "[Kafra Pavianne]"; + mes "The best gift you could get only at Kafra Main Office!"; + mes "^4040FF'K A P R A's P A S S'^000000!!"; + mes "TaDa~!"; + next; + mes "[Kafra Pavianne]"; + mes "With Kafra Pass, you could experience the convenience of Kafra Service world-wide! No Hassle!"; + mes "The price is 2000 zeny~~"; + next; + mes "[Kafra Pavianne]"; + mes "Visit any Kafra Service in Midgard, and you could enjoy Kafra Service any time any where for once."; + mes "Ending a a conversation with Kafra Service Agent will expire the pass."; + cutin "kafra_01",255; + close; + L3: + mes "[Kafra Pavianne]"; + mes "Thank you for using Kafra Service!"; + mes "It was Kafra Pavianne"; + cutin "kafra_01",255; + close; +} + +aldeba_in.gat,83,244,4 script Kafra Service 116,{ + cutin "kafra_02",2; + mes "[Kafra Blossom]"; + mes "..... Pavianne is such an old-timer!"; + mes "Too stubborn..."; + mes "We should make customers to experience more unique, never-seen, aspects of Kafra here at Main Office."; + next; + mes "[Kafra Blossom]"; + mes "Now! WELCOOOOOME~~ I am Kafra Tailing Type."; + mes "Please don't forget to continue using our Kafra Service, and ask for me, Tailing~~"; + next; + menu "I'm an admirer of you~!",L0,"Ehhaha",L1; + + L0: + mes "[Kafra Blossom]"; + mes "Really!"; + mes "Thank you sooo much~"; + mes "Here is... my... autograph..."; + next; + mes "[Kafra Blossom]"; + mes "Don't even bother to look in your Item Iventory. It won't be there... Hehe.."; + mes "My autograph will remail win your heart."; + cutin "kafra_02",255; + close; + L1: + mes "[Kafra Blossom]"; + mes "Huh?"; + mes ". . . . ."; + mes "That's all?"; + mes "Phew~ such a dull customer..."; + cutin "kafra_02",255; + close; +} + +aldeba_in.gat,91,244,4 script Kafra Service 112,{ + cutin "kafra_06",2; + mes "[Kafra Curly Sue]"; + mes "Hello, hello?!!"; + mes "The youngest of all! Kafra cutty~~"; + mes "I am Kafra Type 'Curly Sue'"; + next; + mes "[Kafra Curly Sue]"; + mes "It hasn't been long meeting customers since I am new, but I am always doing my best!!"; + next; + menu "Where is your mom?",L0,"End conversation",LEnd; + + L0: + mes "[Kafra Curly Sue]"; + mes ". . . . ."; + mes "Sob sob ..."; + mes "I am no a KID!!"; + next; + cutin "kafra_06",255; + close; + LEnd: + mes "[Kafra Curly Sue]"; + mes "Here at Kafra Service, We're all doing out B-E-S-T! to provide our customers the B-E-S-T! services."; + mes "We really appreciate your business with us."; + next; + cutin "kafra_06",255; + close; +} + +aldeba_in.gat,96,181,4 script Kafra Service 113,{ + cutin "kafra_05",2; + mes "[Kafra Leilah]"; + mes "Kafra Service."; + mes "What can I do for you?"; + next; + menu "Save.",Lsave,"Use Storage Service",Lstorage,"Use Cart Service.",Lcart,"End conversation.",Lcancel; + + Lsave: + mes "[Kafra Leilah]"; + mes "Please. This is Kafra Service Command Center in charge of training Kafra Service Agent."; + next; + mes "[Kafra Leilah]"; + mes "For Actual Services you must visit Kafra Service Center Agent at each city including Al De Baran."; + mes "... But I will do that for you..."; + next; + savepoint "aldeba_in.gat",96,179; + cutin "kafra_05",255; + close; + Lstorage: + if((class ==Job_Novice) && (JobLevel<6)) goto NeedJobLevel; + if(Zeny<30) goto NeedZenys; + set Zeny, Zeny-30; + openstorage; + cutin "kafra_02",255; + close; + + NeedJobLevel: + mes "[Kafra Leilah]"; + mes "I am sorry but you have to be at least novice with job level 6 if you want to use the storage"; + cutin "kafra_05",255; + close; + NeedZenys: + mes "[Kafra Leilah]"; + mes "Dear, you don't have enough zeny. The Storage fee is 30 Zeny."; + cutin "kafra_05",255; + close; + Lcart: + if((class ==Job_Merchant) || (class==Job_Blacksmith) || (class==Job_Alchem)) goto UseCart; + mes "[Kafra Leilah]"; + mes "I'm sorry. The cart service is only provided for Merchants, Blacksmiths and Alchemists only."; + cutin "kafra_04",255; + close; + + UseCart: + mes "[Kafra Leilah]"; + mes "The Cart Fee is 800 Zeny. Do you want to Rent a Cart?"; + next; + menu "Rent a Cart.",RentCart,"Cancel.",RCCancel; + + RentCart: + if(Zeny<800) goto RCNeedZenys; + if(getskilllv(39) < 1) got Lneedskill; + if((CheckCart)==1) goto GetCart; + + GetCart: + set Zeny,Zeny-800; + set specialreserve,specialreserve + 800; + setcart; + mes "[Kafra]"; + mes "There you go.."; + cutin "kafra_08",255; + close; + RCNeedZenys: + mes "[Kafra Leilah]"; + mes "Dear, you don't have enough zeny. You need 800 Zeny."; + cutin "kafra_04",255; + close; + Lneedskill: + mes "[Kafra Leilah]"; + mes "Sorry dear but you need the Pushcart skill to rent a cart."; + cutin "kafra_04",255; + close; + RCCancel: + cutin "kafra_04",255; + close; + Lcancel: + cutin "kafra_05",2; + close; +} + +aldeba_in.gat,142,238,4 script Kafra Service 114,{ + cutin "kafra_04",2; + mes "[Kafra Roxie]"; + mes "Welcome! I'm Kafra Type 'Roxie'"; + mes "The Special Secret about Kapra only for you Kapra!"; + next; + mes "[Kafra Roxie]"; + mes "You know... Our Kapra Service wasn't actually called Kapra originally~~"; + mes "Well what do you think it actually was?~"; + next; + mes "[Kafra Roxie]"; + mes "TaDa~ Surprisingly it was~~~!"; + mes "Ka! P (Ring Ring Ring)"; + mes "Oh... my phone... Sorry please wait..."; + next; + mes "[Kafra Roxie]"; + mes "Hi? Kapra Type Roxie"; + mes "Huh! Director, sir! Yes! Yes! I understand! ..... Sure!"; + mes "Ah... Huh?!"; + next; + mes "[Kafra Roxie]"; + mes "No-no sir!"; + mes "Yes! I understand!!"; + next; + mes "[Kafra Roxie]"; + mes "*Click*"; + mes "..... Hehehe..."; + mes ". . . . ."; + next; + mes "[Kafra Roxie]"; + mes "Ah... Please ignore what you've just heard from me, haha."; + mes ". . . . ."; + close; }
\ No newline at end of file diff --git a/npc/other/old/pvp.txt b/npc/other/old/pvp.txt index 6dcbdfec3..3bdc2853c 100644 --- a/npc/other/old/pvp.txt +++ b/npc/other/old/pvp.txt @@ -1,1455 +1,1455 @@ -// Original Athena Japanese Dev PVP Script
-// *With added NPCs, missing Warps, and Warpers*
-// *Caution! This is an intended version/addition of the Izlude Arena!*
-//
-// Additions/Translation By DiaDz
-// Jan 24, 2004
-//
-//Addition 2v2 script by: Unknown - added
-
-
-
-// Begin PVP Room N
-pvp_y_room.gat,30,85,4 script Usher 31~40 105,{
- if ((BaseLevel < 31) || (BaseLevel > 40)) goto LVNG;
- menu "Prontera Arena [" + getmapusers("pvp_y_1-1.gat") + " / 128]",Lpro,
- "Izlude Arena [" + getmapusers("pvp_y_1-2.gat") + " / 128]",Lizu,
- "Payon Arena [" + getmapusers("pvp_y_1-3.gat") + " / 128]",Lpay,
- "Alberta Arena [" + getmapusers("pvp_y_1-4.gat") + " / 128]",Lalb,
- "Morroc Arena [" + getmapusers("pvp_y_1-5.gat") + " / 128]",Lmoc,
- "Quit",Lcancel;
-Lpro:
- if(getmapusers("pvp_y_1-1.gat") >= 128 ) goto LError;
- warp "pvp_y_1-1",0,0;
- break;
-Lizu:
- if(getmapusers("pvp_y_1-2.gat") >= 128 ) goto LError;
- warp "pvp_y_1-2",0,0;
- break;
-Lpay:
- if(getmapusers("pvp_y_1-3.gat") >= 128 ) goto LError;
- warp "pvp_y_1-3",0,0;
- break;
-Lalb:
- if(getmapusers("pvp_y_1-4.gat") >= 128 ) goto LError;
- warp "pvp_y_1-4",0,0;
- break;
-Lmoc:
- if(getmapusers("pvp_y_1-5.gat") >= 128 ) goto LError;
- warp "pvp_y_1-5",0,0;
- break;
-Lcancel:
- close;
-LVNG:
- mes "[PVP Usher]";
- mes "Sorry, this arena is only for levels 31~40";
- close;
-LError:
- mes "[PVP Usher]";
- mes "Sorry, this arena is currently full";
- close;
-OnInit:
- waitingroom "LV 41 ~ LV 50",0;
- break;
-}
-pvp_y_room.gat,38,85,4 script Usher 41~50 105,{
- if ((BaseLevel < 41) || (BaseLevel > 50)) goto LVNG;
- menu "Prontera Arena [" + getmapusers("pvp_y_2-1.gat") + " / 128]",Lpro,
- "Izlude Arena [" + getmapusers("pvp_y_2-2.gat") + " / 128]",Lizu,
- "Payon Arena [" + getmapusers("pvp_y_2-3.gat") + " / 128]",Lpay,
- "Alberta Arena [" + getmapusers("pvp_y_2-4.gat") + " / 128]",Lalb,
- "Morroc Arena [" + getmapusers("pvp_y_2-5.gat") + " / 128]",Lmoc,
- "Quit",Lcancel;
-Lpro:
- if(getmapusers("pvp_y_2-1.gat") >= 128 ) goto LError;
- warp "pvp_y_2-1",0,0;
- break;
-Lizu:
- if(getmapusers("pvp_y_2-2.gat") >= 128 ) goto LError;
- warp "pvp_y_2-2",0,0;
- break;
-Lpay:
- if(getmapusers("pvp_y_2-3.gat") >= 128 ) goto LError;
- warp "pvp_y_2-3",0,0;
- break;
-Lalb:
- if(getmapusers("pvp_y_2-4.gat") >= 128 ) goto LError;
- warp "pvp_y_2-4",0,0;
- break;
-Lmoc:
- if(getmapusers("pvp_y_2-5.gat") >= 128 ) goto LError;
- warp "pvp_y_2-5",0,0;
- break;
-Lcancel:
- close;
-LVNG:
- mes "[PVP Usher]";
- mes "Sorry, this arena is only for levels 41~50";
- close;
-LError:
- mes "[PVP Usher]";
- mes "Sorry, this arena is currently full";
- close;
-OnInit:
- waitingroom "LV 40 ~ LV 50",0;
- break;
-}
-pvp_y_room.gat,46,85,4 script Usher 51~60 105,{
- if ((BaseLevel < 51) || (BaseLevel > 60)) goto LVNG;
- menu "Prontera Arena [" + getmapusers("pvp_y_3-1.gat") + " / 128]",Lpro,
- "Izlude Arena [" + getmapusers("pvp_y_3-2.gat") + " / 128]",Lizu,
- "Payon Arena [" + getmapusers("pvp_y_3-3.gat") + " / 128]",Lpay,
- "Alberta Arena [" + getmapusers("pvp_y_3-4.gat") + " / 128]",Lalb,
- "Morroc Arena [" + getmapusers("pvp_y_3-5.gat") + " / 128]",Lmoc,
- "Quit",Lcancel;
-Lpro:
- if(getmapusers("pvp_y_3-1.gat") >= 128 ) goto LError;
- warp "pvp_y_3-1",0,0;
- break;
-Lizu:
- if(getmapusers("pvp_y_3-2.gat") >= 128 ) goto LError;
- warp "pvp_y_3-2",0,0;
- break;
-Lpay:
- if(getmapusers("pvp_y_3-3.gat") >= 128 ) goto LError;
- warp "pvp_y_3-3",0,0;
- break;
-Lalb:
- if(getmapusers("pvp_y_3-4.gat") >= 128 ) goto LError;
- warp "pvp_y_3-4",0,0;
- break;
-Lmoc:
- if(getmapusers("pvp_y_3-5.gat") >= 128 ) goto LError;
- warp "pvp_y_3-5",0,0;
- break;
-Lcancel:
- close;
-LVNG:
- mes "[PVP Usher]";
- mes "Sorry, this arena is only for levels 51~60";
- close;
-LError:
- mes "[PVP Usher]";
- mes "Sorry, this arena is currently full";
- close;
-OnInit:
- waitingroom "LV 51 ~ LV 60",0;
- break;
-}
-pvp_y_room.gat,54,85,4 script Usher 61~70 105,{
- if ((BaseLevel < 61) || (BaseLevel > 70)) goto LVNG;
- menu "Prontera Arena [" + getmapusers("pvp_y_4-1.gat") + " / 128]",Lpro,
- "Izlude Arena [" + getmapusers("pvp_y_4-2.gat") + " / 128]",Lizu,
- "Payon Arena [" + getmapusers("pvp_y_4-3.gat") + " / 128]",Lpay,
- "Alberta Arena [" + getmapusers("pvp_y_4-4.gat") + " / 128]",Lalb,
- "Morroc Arena [" + getmapusers("pvp_y_4-5.gat") + " / 128]",Lmoc,
- "Quit",Lcancel;
-Lpro:
- if(getmapusers("pvp_y_4-1.gat") >= 128 ) goto LError;
- warp "pvp_y_4-1",0,0;
- break;
-Lizu:
- if(getmapusers("pvp_y_4-2.gat") >= 128 ) goto LError;
- warp "pvp_y_4-2",0,0;
- break;
-Lpay:
- if(getmapusers("pvp_y_4-3.gat") >= 128 ) goto LError;
- warp "pvp_y_4-3",0,0;
- break;
-Lalb:
- if(getmapusers("pvp_y_4-4.gat") >= 128 ) goto LError;
- warp "pvp_y_4-4",0,0;
- break;
-Lmoc:
- if(getmapusers("pvp_y_4-5.gat") >= 128 ) goto LError;
- warp "pvp_y_4-5",0,0;
- break;
-Lcancel:
- close;
-LVNG:
- mes "[PVP Usher]";
- mes "Sorry, this arena is only for levels 61~70";
- close;
-LError:
- mes "[PVP Usher]";
- mes "Sorry, this arena is currently full";
- close;
-OnInit:
- waitingroom "LV 61 ~ LV 70",0;
- break;
-}
-pvp_y_room.gat,62,85,4 script Usher 71~80 105,{
- if ((BaseLevel < 71) || (BaseLevel > 80)) goto LVNG;
- menu "Prontera Arena [" + getmapusers("pvp_y_5-1.gat") + " / 128]",Lpro,
- "Izlude Arena [" + getmapusers("pvp_y_5-2.gat") + " / 128]",Lizu,
- "Payon Arena [" + getmapusers("pvp_y_5-3.gat") + " / 128]",Lpay,
- "Alberta Arena [" + getmapusers("pvp_y_5-4.gat") + " / 128]",Lalb,
- "Morroc Arena [" + getmapusers("pvp_y_5-5.gat") + " / 128]",Lmoc,
- "Quit",Lcancel;
-Lpro:
- if(getmapusers("pvp_y_5-1.gat") >= 128 ) goto LError;
- warp "pvp_y_5-1",0,0;
- break;
-Lizu:
- if(getmapusers("pvp_y_5-2.gat") >= 128 ) goto LError;
- warp "pvp_y_5-2",0,0;
- break;
-Lpay:
- if(getmapusers("pvp_y_5-3.gat") >= 128 ) goto LError;
- warp "pvp_y_5-3",0,0;
- break;
-Lalb:
- if(getmapusers("pvp_y_5-4.gat") >= 128 ) goto LError;
- warp "pvp_y_5-4",0,0;
- break;
-Lmoc:
- if(getmapusers("pvp_y_5-5.gat") >= 128 ) goto LError;
- warp "pvp_y_5-5",0,0;
- break;
-Lcancel:
- close;
-LVNG:
- mes "[PVP Usher]";
- mes "Sorry, this arena is only for levels 71~80";
- close;
-LError:
- mes "[PVP Usher]";
- mes "Sorry, this arena is currently full";
- close;
-OnInit:
- waitingroom "LV 71 ~ LV 80",0;
- break;
-}
-pvp_y_room.gat,70,85,4 script Usher 81~90 105,{
- if ((BaseLevel < 81) || (BaseLevel > 90)) goto LVNG;
- menu "Prontera Arena [" + getmapusers("pvp_y_6-1.gat") + " / 128]",Lpro,
- "Izlude Arena [" + getmapusers("pvp_y_6-2.gat") + " / 128]",Lizu,
- "Payon Arena [" + getmapusers("pvp_y_6-3.gat") + " / 128]",Lpay,
- "Alberta Arena [" + getmapusers("pvp_y_6-4.gat") + " / 128]",Lalb,
- "Morroc Arena [" + getmapusers("pvp_y_6-5.gat") + " / 128]",Lmoc,
- "Quit",Lcancel;
-Lpro:
- if(getmapusers("pvp_y_6-1.gat") >= 128 ) goto LError;
- warp "pvp_y_6-1",0,0;
- break;
-Lizu:
- if(getmapusers("pvp_y_6-2.gat") >= 128 ) goto LError;
- warp "pvp_y_6-2",0,0;
- break;
-Lpay:
- if(getmapusers("pvp_y_6-3.gat") >= 128 ) goto LError;
- warp "pvp_y_6-3",0,0;
- break;
-Lalb:
- if(getmapusers("pvp_y_6-4.gat") >= 128 ) goto LError;
- warp "pvp_y_6-4",0,0;
- break;
-Lmoc:
- if(getmapusers("pvp_y_6-5.gat") >= 128 ) goto LError;
- warp "pvp_y_6-5",0,0;
- break;
-Lcancel:
- close;
-LVNG:
- mes "[PVP Usher]";
- mes "Sorry, this arena is only for levels 81~90";
- close;
-LError:
- mes "[PVP Usher]";
- mes "Sorry, this arena is currently full";
- close;
-OnInit:
- waitingroom "LV 81 ~ LV 90",0;
- break;
-}
-pvp_y_room.gat,78,85,4 script Usher 91~Higher 105,{
- if (BaseLevel < 91) goto LVNG;
- menu "Prontera Arena [" + getmapusers("pvp_y_7-1.gat") + " / 128]",Lpro,
- "Izlude Arena [" + getmapusers("pvp_y_7-2.gat") + " / 128]",Lizu,
- "Payon Arena [" + getmapusers("pvp_y_7-3.gat") + " / 128]",Lpay,
- "Alberta Arena [" + getmapusers("pvp_y_7-4.gat") + " / 128]",Lalb,
- "Morroc Arena [" + getmapusers("pvp_y_7-5.gat") + " / 128]",Lmoc,
- "Quit",Lcancel;
-Lpro:
- if(getmapusers("pvp_y_7-1.gat") >= 128 ) goto LError;
- warp "pvp_y_7-1",0,0;
- break;
-Lizu:
- if(getmapusers("pvp_y_7-2.gat") >= 128 ) goto LError;
- warp "pvp_y_7-2",0,0;
- break;
-Lpay:
- if(getmapusers("pvp_y_7-3.gat") >= 128 ) goto LError;
- warp "pvp_y_7-3",0,0;
- break;
-Lalb:
- if(getmapusers("pvp_y_7-4.gat") >= 128 ) goto LError;
- warp "pvp_y_7-4",0,0;
- break;
-Lmoc:
- if(getmapusers("pvp_y_7-5.gat") >= 128 ) goto LError;
- warp "pvp_y_7-5",0,0;
- break;
-Lcancel:
- close;
-LVNG:
- mes "[PVP Usher]";
- mes "Sorry, this arena is only for levels 91~Higher";
- close;
-LError:
- mes "[PVP Usher]";
- mes "Sorry, this arena is currently full";
- close;
-OnInit:
- waitingroom "LV 91 ~ Higher",0;
- break;
-}
-pvp_y_room.gat,86,85,4 script Usher All Levels 105,{
- menu "Prontera Arena [" + getmapusers("pvp_y_8-1.gat") + " / 128]",Lpro,
- "Izlude Arena [" + getmapusers("pvp_y_8-2.gat") + " / 128]",Lizu,
- "Payon Arena [" + getmapusers("pvp_y_8-3.gat") + " / 128]",Lpay,
- "Alberta Arena [" + getmapusers("pvp_y_8-4.gat") + " / 128]",Lalb,
- "Morroc Arena [" + getmapusers("pvp_y_8-5.gat") + " / 128]",Lmoc,
- "Quit",Lcancel;
-Lpro:
- if(getmapusers("pvp_y_8-1.gat") >= 128 ) goto LError;
- warp "pvp_y_8-1",0,0;
- break;
-Lizu:
- if(getmapusers("pvp_y_8-2.gat") >= 128 ) goto LError;
- warp "pvp_y_8-2",0,0;
- break;
-Lpay:
- if(getmapusers("pvp_y_8-3.gat") >= 128 ) goto LError;
- warp "pvp_y_8-3",0,0;
- break;
-Lalb:
- if(getmapusers("pvp_y_8-4.gat") >= 128 ) goto LError;
- warp "pvp_y_8-4",0,0;
- break;
-Lmoc:
- if(getmapusers("pvp_y_8-5.gat") >= 128 ) goto LError;
- warp "pvp_y_8-5",0,0;
- break;
-Lcancel:
- close;
-LError:
- mes "[PVP Usher]";
- mes "Sorry, this arena is currently full";
- close;
-OnInit:
- waitingroom "All Levels",0;
- break;
-}
-
-// Begin PVP Room N
-pvp_n_room.gat,30,85,4 script Usher 31~40 105,{
- if ((BaseLevel < 31) || (BaseLevel > 40)) goto LVNG;
- menu "Sandwich Arena [" + getmapusers("pvp_n_1-1.gat") + " / 64]",Lsand,
- "Rock Arena [" + getmapusers("pvp_n_1-2.gat") + " / 32]",Llock,
- "Four Arena [" + getmapusers("pvp_n_1-3.gat") + " / 32]",Lpolu,
- "Undercross Arena [" + getmapusers("pvp_n_1-4.gat") + " / 32]",Lunder,
- "Copass Arena [" + getmapusers("pvp_n_1-5.gat") + " / 32]",Lcom,
- "Quit",Lcancel;
-Lsand:
- if(getmapusers("pvp_n_1-1.gat") >= 64 ) goto LError;
- warp "pvp_n_1-1",0,0;
- break;
-Llock:
- if(getmapusers("pvp_n_1-2.gat") >= 32 ) goto LError;
- warp "pvp_n_1-2",0,0;
- break;
-Lpolu:
- if(getmapusers("pvp_n_1-3.gat") >= 32 ) goto LError;
- warp "pvp_n_1-3",0,0;
- break;
-Lunder:
- if(getmapusers("pvp_n_1-4.gat") >= 32 ) goto LError;
- warp "pvp_n_1-4",0,0;
- break;
-Lcom:
- if(getmapusers("pvp_n_1-5.gat") >= 32 ) goto LError;
- warp "pvp_n_1-5",0,0;
- break;
-Lcancel:
- close;
-LVNG:
- mes "[PVP Usher]";
- mes "Sorry, this arena is only for levels 31~40";
- close;
-LError:
- mes "[PVP Usher]";
- mes "Sorry, this arena is currently full";
- close;
-OnInit:
- waitingroom "LV 31 ~ LV 40",0;
- break;
-}
-pvp_n_room.gat,38,85,4 script Usher 41~50 105,{
- if ((BaseLevel < 41) || (BaseLevel > 50)) goto LVNG;
- menu "Sandwich Arena [" + getmapusers("pvp_n_2-1.gat") + " / 64]",Lsand,
- "Rock Arena [" + getmapusers("pvp_n_2-2.gat") + " / 32]",Llock,
- "Four Arena [" + getmapusers("pvp_n_2-3.gat") + " / 32]",Lpolu,
- "Undercross Arena [" + getmapusers("pvp_n_2-4.gat") + " / 32]",Lunder,
- "Copass Arena [" + getmapusers("pvp_n_2-5.gat") + " / 32]",Lcom,
- "Quit",Lcancel;
-Lsand:
- if(getmapusers("pvp_n_2-1.gat") >= 64 ) goto LError;
- warp "pvp_n_2-1",0,0;
- break;
-Llock:
- if(getmapusers("pvp_n_2-2.gat") >= 32 ) goto LError;
- warp "pvp_n_2-2",0,0;
- break;
-Lpolu:
- if(getmapusers("pvp_n_2-3.gat") >= 32 ) goto LError;
- warp "pvp_n_2-3",0,0;
- break;
-Lunder:
- if(getmapusers("pvp_n_2-4.gat") >= 32 ) goto LError;
- warp "pvp_n_2-4",0,0;
- break;
-Lcom:
- if(getmapusers("pvp_n_2-5.gat") >= 32 ) goto LError;
- warp "pvp_n_2-5",0,0;
- break;
-Lcancel:
- close;
-LVNG:
- mes "[PVP Usher]";
- mes "Sorry, this arena is only for levels 41~50";
- close;
-LError:
- mes "[PVP Usher]";
- mes "Sorry, this arena is currently full";
- close;
-OnInit:
- waitingroom "LV 41 ~ LV 50",0;
- break;
-}
-pvp_n_room.gat,46,85,4 script Usher 51~60 105,{
- if ((BaseLevel < 51) || (BaseLevel > 60)) goto LVNG;
- menu "Sandwich Arena [" + getmapusers("pvp_n_3-1.gat") + " / 64]",Lsand,
- "Rock Arena [" + getmapusers("pvp_n_3-2.gat") + " / 32]",Llock,
- "Four Arena [" + getmapusers("pvp_n_3-3.gat") + " / 32]",Lpolu,
- "Undercross Arena [" + getmapusers("pvp_n_3-4.gat") + " / 32]",Lunder,
- "Copass Arena [" + getmapusers("pvp_n_3-5.gat") + " / 32]",Lcom,
- "Quit",Lcancel;
-Lsand:
- if(getmapusers("pvp_n_3-1.gat") >= 64 ) goto LError;
- warp "pvp_n_3-1",0,0;
- break;
-Llock:
- if(getmapusers("pvp_n_3-2.gat") >= 32 ) goto LError;
- warp "pvp_n_3-2",0,0;
- break;
-Lpolu:
- if(getmapusers("pvp_n_3-3.gat") >= 32 ) goto LError;
- warp "pvp_n_3-3",0,0;
- break;
-Lunder:
- if(getmapusers("pvp_n_3-4.gat") >= 32 ) goto LError;
- warp "pvp_n_3-4",0,0;
- break;
-Lcom:
- if(getmapusers("pvp_n_3-5.gat") >= 32 ) goto LError;
- warp "pvp_n_3-5",0,0;
- break;
-Lcancel:
- close;
-LVNG:
- mes "[PVP Usher]";
- mes "Sorry, this arena is only for levels 51~60";
- close;
-LError:
- mes "[PVP Usher]";
- mes "Sorry, this arena is currently full";
- close;
-OnInit:
- waitingroom "LV 51 ~ LV 60",0;
- break;
-}
-pvp_n_room.gat,54,85,4 script Usher 61~70 105,{
- if ((BaseLevel < 61) || (BaseLevel > 70)) goto LVNG;
- menu "Sandwich Arena [" + getmapusers("pvp_n_4-1.gat") + " / 64]",Lsand,
- "Rock Arena [" + getmapusers("pvp_n_4-2.gat") + " / 32]",Llock,
- "Four Arena [" + getmapusers("pvp_n_4-3.gat") + " / 32]",Lpolu,
- "Undercross Arena [" + getmapusers("pvp_n_4-4.gat") + " / 32]",Lunder,
- "Copass Arena [" + getmapusers("pvp_n_4-5.gat") + " / 32]",Lcom,
- "Quit",Lcancel;
-Lsand:
- if(getmapusers("pvp_n_4-1.gat") >= 64 ) goto LError;
- warp "pvp_n_4-1",0,0;
- break;
-Llock:
- if(getmapusers("pvp_n_4-2.gat") >= 32 ) goto LError;
- warp "pvp_n_4-2",0,0;
- break;
-Lpolu:
- if(getmapusers("pvp_n_4-3.gat") >= 32 ) goto LError;
- warp "pvp_n_4-3",0,0;
- break;
-Lunder:
- if(getmapusers("pvp_n_4-4.gat") >= 32 ) goto LError;
- warp "pvp_n_4-4",0,0;
- break;
-Lcom:
- if(getmapusers("pvp_n_4-5.gat") >= 32 ) goto LError;
- warp "pvp_n_4-5",0,0;
- break;
-Lcancel:
- close;
-LVNG:
- mes "[PVP Usher]";
- mes "Sorry, this arena is only for levels 61~70";
- close;
-LError:
- mes "[PVP Usher]";
- mes "Sorry, this arena is currently full";
- close;
-OnInit:
- waitingroom "LV 61 ~ LV 70",0;
- break;
-}
-pvp_n_room.gat,62,85,4 script Usher 71~80 105,{
- if ((BaseLevel < 71) || (BaseLevel > 80)) goto LVNG;
- menu "Sandwich Arena [" + getmapusers("pvp_n_5-1.gat") + " / 64]",Lsand,
- "Rock Arena [" + getmapusers("pvp_n_5-2.gat") + " / 32]",Llock,
- "Four Arena [" + getmapusers("pvp_n_5-3.gat") + " / 32]",Lpolu,
- "Undercross Arena [" + getmapusers("pvp_n_5-4.gat") + " / 32]",Lunder,
- "Copass Arena [" + getmapusers("pvp_n_5-5.gat") + " / 32]",Lcom,
- "Quit",Lcancel;
-Lsand:
- if(getmapusers("pvp_n_5-1.gat") >= 64 ) goto LError;
- warp "pvp_n_5-1",0,0;
- break;
-Llock:
- if(getmapusers("pvp_n_5-2.gat") >= 32 ) goto LError;
- warp "pvp_n_5-2",0,0;
- break;
-Lpolu:
- if(getmapusers("pvp_n_5-3.gat") >= 32 ) goto LError;
- warp "pvp_n_5-3",0,0;
- break;
-Lunder:
- if(getmapusers("pvp_n_5-4.gat") >= 32 ) goto LError;
- warp "pvp_n_5-4",0,0;
- break;
-Lcom:
- if(getmapusers("pvp_n_5-5.gat") >= 32 ) goto LError;
- warp "pvp_n_5-5",0,0;
- break;
-Lcancel:
- close;
-LVNG:
- mes "[PVP Usher]";
- mes "Sorry, this arena is only for levels 71~80";
- close;
-LError:
- mes "[PVP Usher]";
- mes "Sorry, this arena is currently full";
- close;
-OnInit:
- waitingroom "LV 71 ~ LV 80",0;
- break;
-}
-pvp_n_room.gat,70,85,4 script Usher 81~90 105,{
- if ((BaseLevel < 81) || (BaseLevel > 90)) goto LVNG;
- menu "Sandwich Arena [" + getmapusers("pvp_n_6-1.gat") + " / 64]",Lsand,
- "Rock Arena [" + getmapusers("pvp_n_6-2.gat") + " / 32]",Llock,
- "Four Arena [" + getmapusers("pvp_n_6-3.gat") + " / 32]",Lpolu,
- "Undercross Arena [" + getmapusers("pvp_n_6-4.gat") + " / 32]",Lunder,
- "Copass Arena [" + getmapusers("pvp_n_6-5.gat") + " / 32]",Lcom,
- "Quit",Lcancel;
-Lsand:
- if(getmapusers("pvp_n_6-1.gat") >= 64 ) goto LError;
- warp "pvp_n_6-1",0,0;
- break;
-Llock:
- if(getmapusers("pvp_n_6-2.gat") >= 32 ) goto LError;
- warp "pvp_n_6-2",0,0;
- break;
-Lpolu:
- if(getmapusers("pvp_n_6-3.gat") >= 32 ) goto LError;
- warp "pvp_n_6-3",0,0;
- break;
-Lunder:
- if(getmapusers("pvp_n_6-4.gat") >= 32 ) goto LError;
- warp "pvp_n_6-4",0,0;
- break;
-Lcom:
- if(getmapusers("pvp_n_6-5.gat") >= 32 ) goto LError;
- warp "pvp_n_6-5",0,0;
- break;
-Lcancel:
- close;
-LVNG:
- mes "[PVP Usher]";
- mes "Sorry, this arena is only for levels 81~90";
- close;
-LError:
- mes "[PVP Usher]";
- mes "Sorry, this arena is currently full";
- close;
-OnInit:
- waitingroom "LV 81 ~ LV 90",0;
- break;
-}
-pvp_n_room.gat,78,85,4 script Usher 91~Higher 105,{
- if (BaseLevel < 91) goto LVNG;
- menu "Sandwich Arena [" + getmapusers("pvp_n_7-1.gat") + " / 64]",Lsand,
- "Rock Arena [" + getmapusers("pvp_n_7-2.gat") + " / 32]",Llock,
- "Four Arena [" + getmapusers("pvp_n_7-3.gat") + " / 32]",Lpolu,
- "Undercross Arena [" + getmapusers("pvp_n_7-4.gat") + " / 32]",Lunder,
- "Copass Arena [" + getmapusers("pvp_n_7-5.gat") + " / 32]",Lcom,
- "Quit",Lcancel;
-Lsand:
- if(getmapusers("pvp_n_7-1.gat") >= 64 ) goto LError;
- warp "pvp_n_7-1",0,0;
- break;
-Llock:
- if(getmapusers("pvp_n_7-2.gat") >= 32 ) goto LError;
- warp "pvp_n_7-2",0,0;
- break;
-Lpolu:
- if(getmapusers("pvp_n_7-3.gat") >= 32 ) goto LError;
- warp "pvp_n_7-3",0,0;
- break;
-Lunder:
- if(getmapusers("pvp_n_7-4.gat") >= 32 ) goto LError;
- warp "pvp_n_7-4",0,0;
- break;
-Lcom:
- if(getmapusers("pvp_n_7-5.gat") >= 32 ) goto LError;
- warp "pvp_n_7-5",0,0;
- break;
-Lcancel:
- close;
-LVNG:
- mes "[PVP Usher]";
- mes "Sorry, this arena is only for levels 91~Higher0";
- close;
-LError:
- mes "[PVP Usher]";
- mes "Sorry, this arena is currently full";
- close;
-OnInit:
- waitingroom "LV 91 ~ Higher",0;
- break;
-}
-pvp_n_room.gat,86,85,4 script Usher All Levels 105,{
- menu "Sandwich Arena [" + getmapusers("pvp_n_8-1.gat") + " / 64]",Lsand,
- "Rock Arena [" + getmapusers("pvp_n_8-2.gat") + " / 32]",Llock,
- "Four Arena [" + getmapusers("pvp_n_8-3.gat") + " / 32]",Lpolu,
- "Undercross Arena [" + getmapusers("pvp_n_8-4.gat") + " / 32]",Lunder,
- "Copass Arena [" + getmapusers("pvp_n_8-5.gat") + " / 32]",Lcom,
- "Quit",Lcancel;
-Lsand:
- if(getmapusers("pvp_n_8-1.gat") >= 64 ) goto LError;
- warp "pvp_n_8-1",0,0;
- break;
-Llock:
- if(getmapusers("pvp_n_8-2.gat") >= 32 ) goto LError;
- warp "pvp_n_8-2",0,0;
- break;
-Lpolu:
- if(getmapusers("pvp_n_8-3.gat") >= 32 ) goto LError;
- warp "pvp_n_8-3",0,0;
- break;
-Lunder:
- if(getmapusers("pvp_n_8-4.gat") >= 32 ) goto LError;
- warp "pvp_n_8-4",0,0;
- break;
-Lcom:
- if(getmapusers("pvp_n_8-5.gat") >= 32 ) goto LError;
- warp "pvp_n_8-5",0,0;
- break;
-Lcancel:
- close;
-LError:
- mes "[PVP Usher]";
- mes "Sorry, this arena is currently full";
- close;
-OnInit:
- waitingroom "All Levels",0;
- break;
-}
-
-// PvP Representative NPC prontera 164 175
-prontera.gat,164,175,5 script PvP Representative 116,{
- mes "[PvP Representative]";
- mes "Hello there! I'm the PvP Representative!";
- next;
- mes "[PvP Representative]";
- mes "I'm here to advertise our Arena in Izlude! It's specially designed for you players to beat each other up!";
- next;
- menu "Sounds interesting! I'll join!",entrance,"PvP? Whats that?",info,"Nah, maybe later.",quit;
-entrance:
- mes "[PvP Representative]";
- mes "Most excellent! I'll warp you to our Arena's Front Gate!";
- next;
- warp "izlude.gat",128,218;
- close;
-info:
- mes "[PvP Representative]";
- mes "PvP Stands For 'Player versus Player', where you get to choose from a variety of arenas in which to fight in!";
- next;
- mes "[PvP Representative]";
- mes "You don't have to worry about losing items, we have a NO PENALTY rule that states you cannot loose items or EXP!";
- next;
- mes "[PvP Representative]";
- mes "So whadduya think?";
- next;
- menu "Sounds interesting! I'll join!",entrance,"Nah, maybe later.",quit;
-quit:
- mes "[PvP Representative]";
- mes "'Kay - I hope you change your mind in the near future.";
- mes " ";
- mes "Come Again! ^_^";
- close;
-}
-
-// Arena Bulletin Board NPC izlude 125 219
-izlude.gat,125,219,5 script Arena Bulletin Board 111,{
- mes "[Arena Bulletin Board]";
- mes "Welcome to the one and only...";
- mes " ";
- mes "Player Versus Player Arena!";
- close;
-}
-
-// Arena Master NPC prt_are_in 100 84
-prt_are_in.gat,100,84,4 script Arena Master 734,{
- mes "[Arena Master]";
- mes "Aaahh yes! Welcome to my humble and world renown PvP Arena!";
- next;
- mes "[Arena Master]";
- mes "Tell me...do you wish to learn more of my Arena?";
- next;
- menu "Sure",sure,"Maybe later...",later;
-sure:
- mes "[Arena Master]";
- mes "After much boredom that I've went through all my life of killing simple monsters, I decided that it wasn't enough!";
- next;
- mes "[Arena Master]";
- mes "I needed HUMAN FLESH! To satisfy my need to kill...";
- next;
- mes "[Arena Master]";
- mes "And after years of construction and planning ~ it's finally complete for all of Midgard to see and cherish!";
- next;
- mes "[Arena Master]";
- mes "I present you...";
- mes " ";
- mes "MY ARENA!!!";
- close;
-later:
- mes "[Arena Master]";
- mes "Fine fine, please do enjoy your stay.";
- close;
-}
-
-// PvP Attendant NPC prt_are_in 97 86
-prt_are_in.gat,97,86,4 script PvP Attendant 98,{
- mes "[PvP Attendant]";
- mes "Welcome To The PVP ARENA!";
- next;
- mes "[PvP Attendant]";
- mes "The Hall to the Left leads to City simulation Arenas";
- next;
- mes "[PvP Attendant]";
- mes "The Hall to the Right leads to our Special map Arenas";
- close;
-}
-
-// PvP Attendant NPC prt_are_in 102 86
-prt_are_in.gat,102,86,4 script PvP Attendant 98,{
- mes "[PvP Attendant]";
- mes "Welcome To The PVP ARENA!";
- next;
- mes "[PvP Attendant]";
- mes "The Hall to the Left leads to City simulation Arenas";
- next;
- mes "[PvP Attendant]";
- mes "The Hall to the Right are our Special map Arenas";
- close;
-}
-
-// Begin 2v2 pvp Script
-pvp_2vs2.gat,32,22,2 script Bruno 87,{
- mes "[Bruno]";
- mes "You wimpin out already?";
- menu "Yes",goback,"No",stay;
- goback:
- mes "Man!, you don't even got scratches, you wimp.";
- next;
- warp "prt_are_in.gat",167,90;
- close;
- stay:
- mes "Impressive!, I respect your stamina!";
- close;
-}
-
-prt_are_in.gat,167,92,4 script Bruno 87,{
- mes "[Bruno]";
- mes "You sure you wanna goto our underground 2vs2 arena dork?";
- menu "Yes",gopvp,"No",nopvp;
- gopvp:
- mes "Was nice knowin you chump.";
- next;
- warp "pvp_2vs2.gat",36,49;
- close;
- nopvp:
- mes "Didn't think so, wuss!";
- close;
-}
-
-prt_are_in.gat,92,86,4 script Herman 125,{
- mes "[Herman]";
- mes "Welcome to Royal Rumble!";
- mes "Ladies and Gents, my name is Herman from 'Cool Event Corp.'!";
- next;
- menu "What's Royal Rumble?",M0,"Boo~Go Home~",MEnd;
-
- M0:
- mes "[Herman]";
- mes "We, Cool Event Corp., have opened a special event open to everyone visiting the Arena.";
- mes "You can escape your monotonous life with this really great even we are providing you!";
- next;
- mes "[Herman]";
- mes "This event is called ..Rooooooyal Rumbbbbbbble!!";
- mes "*Cough*..*Cough*..*Cough* !!";
- next;
- mes "[Herman]";
- mes ". . . . .";
- mes "Arrggghhh Sooorry...";
- next;
- mes "[Herman]";
- mes "When there are enough players in every 'Stand-By Room',";
- mes "We will guide you to the beautiful Colosseum.";
- next;
- mes "[Herman]";
- mes "In that Colosseum, you have to fight with hard and hostile Monsters within 5 minutes,";
- mes "Using 8 warp zones located in 8 directions.";
- next;
- mes "[Herman]";
- mes "When you strike into the deep inside of Monsters you will see Organ NPCs which control and generate Monsters.";
- mes "You should have to speak them if you want to make an easy way to get a victory. They will release you from enemies.";
- next;
- mes "[Herman]";
- mes "Whatever you eliminate all enemies by yourself or get helped by Organ NPCs, When you kill them all,";
- mes "It is regarded as the Perfect Clear on Royal Rumble!";
- next;
- mes "[Herman]";
- mes "Have some fun in Royal Rumble with your companions.";
- mes "Once again, My name is Herman from Cool Event Corp. Thank you!";
- close;
-
- MEnd:
- mes "[Herman]";
- mes "You go Home, Baby";
- close;
-}
-
-prt_are_in.gat,93,86,4 script Lancelot 125,{
- mes "[Lancelot]";
- mes "Hi Hi! Come on ! Make yourself at Home!";
- mes "My name is Lacelot from Cool Event Corp. I am here to tell you about Time Limit Fight. Do you want to Listen?";
- next;
- menu "Yeah, Cool.",M0,"Sorry, I don't want to.",MEnd;
-
- M0:
- mes "[Lancelot]";
- mes "We, Cool Event Corp., open a Special event to give a fun to everybody visiting Arena.";
- mes "You can slip your monotonous day life for the moment during the event we provide you!";
- next;
- mes "[Lancelot]";
- mes "The Event Called ..Timeeeee-- Limmmmmitttt---Figgggghhtt !!";
- mes "*Aaahchoo* !! *Achoo* !! *Cough**Cough* ..";
- next;
- mes "[Lancelot]";
- mes ". . . . . Whack..";
- mes "Oh Boy.. Really Sorry to make you uncomfortable with this.";
- next;
- mes "[Lancelot]";
- mes "When players gather as many as we need in Each Standbyroom";
- mes "We will guide you to the Labylinth.";
- next;
- mes "[Lancelot]";
- mes "In that Labylinth,you have to terminate all monsters within 5 minutes,";
- mes "Using this Warp zone and that warp zone...";
- next;
- mes "[Lancelot]";
- mes "When you kill all Monsters in one room,another gate will be opened ..and you can go in there.";
- mes "One thing you must know is when you enter the new room door is totally closed to block your exit ..";
- next;
- mes "[Lancelot]";
- mes "You cannot go back to where you're from.";
- next;
- mes "[Lancelot]";
- mes "In case of Level 1 Stage, the door of Boss Stage will be opened when you eliminate all monsters in every room ..";
- mes "But in Level 2 and 3, even though there are many complexed corridors, if you follow the shortcut, you will enter the Boss Room at ease.";
- next;
- mes "[Lancelot]";
- mes "Get some fun with your companions.";
- mes "Thank you for your time, once again my name is Lancelot!";
- close;
- MEnd:
- mes "[Lancelot]";
- mes "Alright, Bye Bye";
- close;
-}
-
-prt_are_in.gat,94,85,4 Zakkie 84,{
- mes "[Zakkie]";
- mes "Welcome to Royal Rumble,the World of Fighters!";
- mes "My name is Zakkie from Cool Event Corp.!";
- mes "If you don't mind let me give you some tips for more fun.";
- next;
- menu "No!i don't mind.Go ahead.",M0,"Errr....I know already.",MEnd;
-
- M0:
- mes "[Zakkie]";
- mes "when get started, You will ecounter many monsters through 8 warp zones.";
- mes "You can choose either way of the Battle. You can find Organ NPCs behind each Warp Zone or You can kill all Enemies by yourself.";
- next;
- mes "[Zakkie]";
- mes "When you satisfy one of them, it is regarded as Clear on that Round.";
- mes "We suggest you to discuss with party members to find out better way of the Battle.";
- close;
- MEnd:
- mes "[Zakkie]";
- mes "Whattt!! Did you say you know the tips?!";
- mes "Wow~Excellent. Then you don't need my help. Well have fun~!";
- close;
-}
-
-prt_are_in.gat,108,86,4 script Boris 84,{
- mes "[Boris]";
- mes "Hmm.. I can easily imagine how frustrated you have been in your life, dear.. Because Common people cannot dare to visit me.";
- mes "Let me introduce myself. My name is Boris and the director of Customer Support Team in Cool Event Corp.";
- mes "I will give you the exceptional tips only for the Bloodthirsty.";
- next;
- menu "Will you please?",M0,"Thank you but I already know about it.",MEnd;
-
- M0:
- mes "[Boris]";
- mes "Before get started, you must work out a strategy considering your members.";
- mes "Then you can warp into the Battle.";
- next;
- mes "[Boris]";
- mes "If 8 men jump into the Warp zone together, You will succeed.";
- mes "Otherwise If a man or two, I don't think you can survive.";
- next;
- mes "[Boris]";
- mes "And let's talk about the Running Time of Royal Rumble and of Time Limit Fight.";
- mes "Although every Battle Time is limitted, but sometimes it is increased by a Bonus when you clear One Round.";
- next;
- mes "[Boris]";
- mes "Bonus Time will be increased by Second.. When you get a Bonus Time";
- mes "Definately you could extent the Limit of Battle. You can check the Time passage with the announcement of our employee.";
- close;
-
- MEnd:
- mes "[Boris]";
- mes ".. Ahh...I need my room in Dark ..";
- mes "Hmm Hmm Nothing, Nothing.";
- close;
-}
-
-// Add missing Warps Begins Here
-prt_are_in.gat,32,95,0 warp areawarpfix1 1,1,pvp_y_room.gat,52,23
-prt_are_in.gat,170,95,0 warp areawarpfix2 1,1,pvp_n_room.gat,52,23
-pvp_y_room.gat,52,18,0 warp areawarpfix3 1,1,prt_are_in.gat,32,92
-pvp_n_room.gat,52,18,0 warp areawarpfix4 1,1,prt_are_in.gat,170,92
-
-// PvP Mapflags
-pvp_y_1-1.gat mapflag nopenalty
-pvp_y_1-2.gat mapflag nopenalty
-pvp_y_1-3.gat mapflag nopenalty
-pvp_y_1-4.gat mapflag nopenalty
-pvp_y_1-5.gat mapflag nopenalty
-pvp_y_2-1.gat mapflag nopenalty
-pvp_y_2-2.gat mapflag nopenalty
-pvp_y_2-3.gat mapflag nopenalty
-pvp_y_2-4.gat mapflag nopenalty
-pvp_y_2-5.gat mapflag nopenalty
-pvp_y_3-1.gat mapflag nopenalty
-pvp_y_3-2.gat mapflag nopenalty
-pvp_y_3-3.gat mapflag nopenalty
-pvp_y_3-4.gat mapflag nopenalty
-pvp_y_3-5.gat mapflag nopenalty
-pvp_y_4-1.gat mapflag nopenalty
-pvp_y_4-2.gat mapflag nopenalty
-pvp_y_4-3.gat mapflag nopenalty
-pvp_y_4-4.gat mapflag nopenalty
-pvp_y_4-5.gat mapflag nopenalty
-pvp_y_5-1.gat mapflag nopenalty
-pvp_y_5-2.gat mapflag nopenalty
-pvp_y_5-3.gat mapflag nopenalty
-pvp_y_5-4.gat mapflag nopenalty
-pvp_y_5-5.gat mapflag nopenalty
-pvp_y_6-1.gat mapflag nopenalty
-pvp_y_6-2.gat mapflag nopenalty
-pvp_y_6-3.gat mapflag nopenalty
-pvp_y_6-4.gat mapflag nopenalty
-pvp_y_6-5.gat mapflag nopenalty
-pvp_y_7-1.gat mapflag nopenalty
-pvp_y_7-2.gat mapflag nopenalty
-pvp_y_7-3.gat mapflag nopenalty
-pvp_y_7-4.gat mapflag nopenalty
-pvp_y_7-5.gat mapflag nopenalty
-pvp_y_8-1.gat mapflag nopenalty
-pvp_y_8-2.gat mapflag nopenalty
-pvp_y_8-3.gat mapflag nopenalty
-pvp_y_8-4.gat mapflag nopenalty
-pvp_y_8-5.gat mapflag nopenalty
-pvp_n_1-1.gat mapflag nopenalty
-pvp_n_1-2.gat mapflag nopenalty
-pvp_n_1-3.gat mapflag nopenalty
-pvp_n_1-4.gat mapflag nopenalty
-pvp_n_1-5.gat mapflag nopenalty
-pvp_n_2-1.gat mapflag nopenalty
-pvp_n_2-2.gat mapflag nopenalty
-pvp_n_2-3.gat mapflag nopenalty
-pvp_n_2-4.gat mapflag nopenalty
-pvp_n_2-5.gat mapflag nopenalty
-pvp_n_3-1.gat mapflag nopenalty
-pvp_n_3-2.gat mapflag nopenalty
-pvp_n_3-3.gat mapflag nopenalty
-pvp_n_3-4.gat mapflag nopenalty
-pvp_n_3-5.gat mapflag nopenalty
-pvp_n_4-1.gat mapflag nopenalty
-pvp_n_4-2.gat mapflag nopenalty
-pvp_n_4-3.gat mapflag nopenalty
-pvp_n_4-4.gat mapflag nopenalty
-pvp_n_4-5.gat mapflag nopenalty
-pvp_n_5-1.gat mapflag nopenalty
-pvp_n_5-2.gat mapflag nopenalty
-pvp_n_5-3.gat mapflag nopenalty
-pvp_n_5-4.gat mapflag nopenalty
-pvp_n_5-5.gat mapflag nopenalty
-pvp_n_6-1.gat mapflag nopenalty
-pvp_n_6-2.gat mapflag nopenalty
-pvp_n_6-3.gat mapflag nopenalty
-pvp_n_6-4.gat mapflag nopenalty
-pvp_n_6-5.gat mapflag nopenalty
-pvp_n_7-1.gat mapflag nopenalty
-pvp_n_7-2.gat mapflag nopenalty
-pvp_n_7-3.gat mapflag nopenalty
-pvp_n_7-4.gat mapflag nopenalty
-pvp_n_7-5.gat mapflag nopenalty
-pvp_n_8-1.gat mapflag nopenalty
-pvp_n_8-2.gat mapflag nopenalty
-pvp_n_8-3.gat mapflag nopenalty
-pvp_n_8-4.gat mapflag nopenalty
-pvp_n_8-5.gat mapflag nopenalty
-pvp_2vs2.gat mapflag nopenalty
-
-pvp_y_1-1.gat mapflag pvp
-pvp_y_1-2.gat mapflag pvp
-pvp_y_1-3.gat mapflag pvp
-pvp_y_1-4.gat mapflag pvp
-pvp_y_1-5.gat mapflag pvp
-pvp_y_2-1.gat mapflag pvp
-pvp_y_2-2.gat mapflag pvp
-pvp_y_2-3.gat mapflag pvp
-pvp_y_2-4.gat mapflag pvp
-pvp_y_2-5.gat mapflag pvp
-pvp_y_3-1.gat mapflag pvp
-pvp_y_3-2.gat mapflag pvp
-pvp_y_3-3.gat mapflag pvp
-pvp_y_3-4.gat mapflag pvp
-pvp_y_3-5.gat mapflag pvp
-pvp_y_4-1.gat mapflag pvp
-pvp_y_4-2.gat mapflag pvp
-pvp_y_4-3.gat mapflag pvp
-pvp_y_4-4.gat mapflag pvp
-pvp_y_4-5.gat mapflag pvp
-pvp_y_5-1.gat mapflag pvp
-pvp_y_5-2.gat mapflag pvp
-pvp_y_5-3.gat mapflag pvp
-pvp_y_5-4.gat mapflag pvp
-pvp_y_5-5.gat mapflag pvp
-pvp_y_6-1.gat mapflag pvp
-pvp_y_6-2.gat mapflag pvp
-pvp_y_6-3.gat mapflag pvp
-pvp_y_6-4.gat mapflag pvp
-pvp_y_6-5.gat mapflag pvp
-pvp_y_7-1.gat mapflag pvp
-pvp_y_7-2.gat mapflag pvp
-pvp_y_7-3.gat mapflag pvp
-pvp_y_7-4.gat mapflag pvp
-pvp_y_7-5.gat mapflag pvp
-pvp_y_8-1.gat mapflag pvp
-pvp_y_8-2.gat mapflag pvp
-pvp_y_8-3.gat mapflag pvp
-pvp_y_8-4.gat mapflag pvp
-pvp_y_8-5.gat mapflag pvp
-pvp_n_1-1.gat mapflag pvp
-pvp_n_1-2.gat mapflag pvp
-pvp_n_1-3.gat mapflag pvp
-pvp_n_1-4.gat mapflag pvp
-pvp_n_1-5.gat mapflag pvp
-pvp_n_2-1.gat mapflag pvp
-pvp_n_2-2.gat mapflag pvp
-pvp_n_2-3.gat mapflag pvp
-pvp_n_2-4.gat mapflag pvp
-pvp_n_2-5.gat mapflag pvp
-pvp_n_3-1.gat mapflag pvp
-pvp_n_3-2.gat mapflag pvp
-pvp_n_3-3.gat mapflag pvp
-pvp_n_3-4.gat mapflag pvp
-pvp_n_3-5.gat mapflag pvp
-pvp_n_4-1.gat mapflag pvp
-pvp_n_4-2.gat mapflag pvp
-pvp_n_4-3.gat mapflag pvp
-pvp_n_4-4.gat mapflag pvp
-pvp_n_4-5.gat mapflag pvp
-pvp_n_5-1.gat mapflag pvp
-pvp_n_5-2.gat mapflag pvp
-pvp_n_5-3.gat mapflag pvp
-pvp_n_5-4.gat mapflag pvp
-pvp_n_5-5.gat mapflag pvp
-pvp_n_6-1.gat mapflag pvp
-pvp_n_6-2.gat mapflag pvp
-pvp_n_6-3.gat mapflag pvp
-pvp_n_6-4.gat mapflag pvp
-pvp_n_6-5.gat mapflag pvp
-pvp_n_7-1.gat mapflag pvp
-pvp_n_7-2.gat mapflag pvp
-pvp_n_7-3.gat mapflag pvp
-pvp_n_7-4.gat mapflag pvp
-pvp_n_7-5.gat mapflag pvp
-pvp_n_8-1.gat mapflag pvp
-pvp_n_8-2.gat mapflag pvp
-pvp_n_8-3.gat mapflag pvp
-pvp_n_8-4.gat mapflag pvp
-pvp_n_8-5.gat mapflag pvp
-pvp_2vs2.gat mapflag pvp
-
-pvp_y_1-1.gat mapflag pvp_noparty
-pvp_y_1-2.gat mapflag pvp_noparty
-pvp_y_1-3.gat mapflag pvp_noparty
-pvp_y_1-4.gat mapflag pvp_noparty
-pvp_y_1-5.gat mapflag pvp_noparty
-pvp_y_2-1.gat mapflag pvp_noparty
-pvp_y_2-2.gat mapflag pvp_noparty
-pvp_y_2-3.gat mapflag pvp_noparty
-pvp_y_2-4.gat mapflag pvp_noparty
-pvp_y_2-5.gat mapflag pvp_noparty
-pvp_y_3-1.gat mapflag pvp_noparty
-pvp_y_3-2.gat mapflag pvp_noparty
-pvp_y_3-3.gat mapflag pvp_noparty
-pvp_y_3-4.gat mapflag pvp_noparty
-pvp_y_3-5.gat mapflag pvp_noparty
-pvp_y_4-1.gat mapflag pvp_noparty
-pvp_y_4-2.gat mapflag pvp_noparty
-pvp_y_4-3.gat mapflag pvp_noparty
-pvp_y_4-4.gat mapflag pvp_noparty
-pvp_y_4-5.gat mapflag pvp_noparty
-pvp_y_5-1.gat mapflag pvp_noparty
-pvp_y_5-2.gat mapflag pvp_noparty
-pvp_y_5-3.gat mapflag pvp_noparty
-pvp_y_5-4.gat mapflag pvp_noparty
-pvp_y_5-5.gat mapflag pvp_noparty
-pvp_y_6-1.gat mapflag pvp_noparty
-pvp_y_6-2.gat mapflag pvp_noparty
-pvp_y_6-3.gat mapflag pvp_noparty
-pvp_y_6-4.gat mapflag pvp_noparty
-pvp_y_6-5.gat mapflag pvp_noparty
-pvp_y_7-1.gat mapflag pvp_noparty
-pvp_y_7-2.gat mapflag pvp_noparty
-pvp_y_7-3.gat mapflag pvp_noparty
-pvp_y_7-4.gat mapflag pvp_noparty
-pvp_y_7-5.gat mapflag pvp_noparty
-pvp_y_8-1.gat mapflag pvp_noparty
-pvp_y_8-2.gat mapflag pvp_noparty
-pvp_y_8-3.gat mapflag pvp_noparty
-pvp_y_8-4.gat mapflag pvp_noparty
-pvp_y_8-5.gat mapflag pvp_noparty
-pvp_n_1-1.gat mapflag pvp_noparty
-pvp_n_1-2.gat mapflag pvp_noparty
-pvp_n_1-3.gat mapflag pvp_noparty
-pvp_n_1-4.gat mapflag pvp_noparty
-pvp_n_1-5.gat mapflag pvp_noparty
-pvp_n_2-1.gat mapflag pvp_noparty
-pvp_n_2-2.gat mapflag pvp_noparty
-pvp_n_2-3.gat mapflag pvp_noparty
-pvp_n_2-4.gat mapflag pvp_noparty
-pvp_n_2-5.gat mapflag pvp_noparty
-pvp_n_3-1.gat mapflag pvp_noparty
-pvp_n_3-2.gat mapflag pvp_noparty
-pvp_n_3-3.gat mapflag pvp_noparty
-pvp_n_3-4.gat mapflag pvp_noparty
-pvp_n_3-5.gat mapflag pvp_noparty
-pvp_n_4-1.gat mapflag pvp_noparty
-pvp_n_4-2.gat mapflag pvp_noparty
-pvp_n_4-3.gat mapflag pvp_noparty
-pvp_n_4-4.gat mapflag pvp_noparty
-pvp_n_4-5.gat mapflag pvp_noparty
-pvp_n_5-1.gat mapflag pvp_noparty
-pvp_n_5-2.gat mapflag pvp_noparty
-pvp_n_5-3.gat mapflag pvp_noparty
-pvp_n_5-4.gat mapflag pvp_noparty
-pvp_n_5-5.gat mapflag pvp_noparty
-pvp_n_6-1.gat mapflag pvp_noparty
-pvp_n_6-2.gat mapflag pvp_noparty
-pvp_n_6-3.gat mapflag pvp_noparty
-pvp_n_6-4.gat mapflag pvp_noparty
-pvp_n_6-5.gat mapflag pvp_noparty
-pvp_n_7-1.gat mapflag pvp_noparty
-pvp_n_7-2.gat mapflag pvp_noparty
-pvp_n_7-3.gat mapflag pvp_noparty
-pvp_n_7-4.gat mapflag pvp_noparty
-pvp_n_7-5.gat mapflag pvp_noparty
-pvp_n_8-1.gat mapflag pvp_noparty
-pvp_n_8-2.gat mapflag pvp_noparty
-pvp_n_8-3.gat mapflag pvp_noparty
-pvp_n_8-4.gat mapflag pvp_noparty
-pvp_n_8-5.gat mapflag pvp_noparty
-
-pvp_y_1-1.gat mapflag nomemo
-pvp_y_1-2.gat mapflag nomemo
-pvp_y_1-3.gat mapflag nomemo
-pvp_y_1-4.gat mapflag nomemo
-pvp_y_1-5.gat mapflag nomemo
-pvp_y_2-1.gat mapflag nomemo
-pvp_y_2-2.gat mapflag nomemo
-pvp_y_2-3.gat mapflag nomemo
-pvp_y_2-4.gat mapflag nomemo
-pvp_y_2-5.gat mapflag nomemo
-pvp_y_3-1.gat mapflag nomemo
-pvp_y_3-2.gat mapflag nomemo
-pvp_y_3-3.gat mapflag nomemo
-pvp_y_3-4.gat mapflag nomemo
-pvp_y_3-5.gat mapflag nomemo
-pvp_y_4-1.gat mapflag nomemo
-pvp_y_4-2.gat mapflag nomemo
-pvp_y_4-3.gat mapflag nomemo
-pvp_y_4-4.gat mapflag nomemo
-pvp_y_4-5.gat mapflag nomemo
-pvp_y_5-1.gat mapflag nomemo
-pvp_y_5-2.gat mapflag nomemo
-pvp_y_5-3.gat mapflag nomemo
-pvp_y_5-4.gat mapflag nomemo
-pvp_y_5-5.gat mapflag nomemo
-pvp_y_6-1.gat mapflag nomemo
-pvp_y_6-2.gat mapflag nomemo
-pvp_y_6-3.gat mapflag nomemo
-pvp_y_6-4.gat mapflag nomemo
-pvp_y_6-5.gat mapflag nomemo
-pvp_y_7-1.gat mapflag nomemo
-pvp_y_7-2.gat mapflag nomemo
-pvp_y_7-3.gat mapflag nomemo
-pvp_y_7-4.gat mapflag nomemo
-pvp_y_7-5.gat mapflag nomemo
-pvp_y_8-1.gat mapflag nomemo
-pvp_y_8-2.gat mapflag nomemo
-pvp_y_8-3.gat mapflag nomemo
-pvp_y_8-4.gat mapflag nomemo
-pvp_y_8-5.gat mapflag nomemo
-pvp_n_1-1.gat mapflag nomemo
-pvp_n_1-2.gat mapflag nomemo
-pvp_n_1-3.gat mapflag nomemo
-pvp_n_1-4.gat mapflag nomemo
-pvp_n_1-5.gat mapflag nomemo
-pvp_n_2-1.gat mapflag nomemo
-pvp_n_2-2.gat mapflag nomemo
-pvp_n_2-3.gat mapflag nomemo
-pvp_n_2-4.gat mapflag nomemo
-pvp_n_2-5.gat mapflag nomemo
-pvp_n_3-1.gat mapflag nomemo
-pvp_n_3-2.gat mapflag nomemo
-pvp_n_3-3.gat mapflag nomemo
-pvp_n_3-4.gat mapflag nomemo
-pvp_n_3-5.gat mapflag nomemo
-pvp_n_4-1.gat mapflag nomemo
-pvp_n_4-2.gat mapflag nomemo
-pvp_n_4-3.gat mapflag nomemo
-pvp_n_4-4.gat mapflag nomemo
-pvp_n_4-5.gat mapflag nomemo
-pvp_n_5-1.gat mapflag nomemo
-pvp_n_5-2.gat mapflag nomemo
-pvp_n_5-3.gat mapflag nomemo
-pvp_n_5-4.gat mapflag nomemo
-pvp_n_5-5.gat mapflag nomemo
-pvp_n_6-1.gat mapflag nomemo
-pvp_n_6-2.gat mapflag nomemo
-pvp_n_6-3.gat mapflag nomemo
-pvp_n_6-4.gat mapflag nomemo
-pvp_n_6-5.gat mapflag nomemo
-pvp_n_7-1.gat mapflag nomemo
-pvp_n_7-2.gat mapflag nomemo
-pvp_n_7-3.gat mapflag nomemo
-pvp_n_7-4.gat mapflag nomemo
-pvp_n_7-5.gat mapflag nomemo
-pvp_n_8-1.gat mapflag nomemo
-pvp_n_8-2.gat mapflag nomemo
-pvp_n_8-3.gat mapflag nomemo
-pvp_n_8-4.gat mapflag nomemo
-pvp_n_8-5.gat mapflag nomemo
-pvp_2vs2.gat mapflag nomemo
-
-pvp_y_1-1.gat mapflag noteleport
-pvp_y_1-2.gat mapflag noteleport
-pvp_y_1-3.gat mapflag noteleport
-pvp_y_1-4.gat mapflag noteleport
-pvp_y_1-5.gat mapflag noteleport
-pvp_y_2-1.gat mapflag noteleport
-pvp_y_2-2.gat mapflag noteleport
-pvp_y_2-3.gat mapflag noteleport
-pvp_y_2-4.gat mapflag noteleport
-pvp_y_2-5.gat mapflag noteleport
-pvp_y_3-1.gat mapflag noteleport
-pvp_y_3-2.gat mapflag noteleport
-pvp_y_3-3.gat mapflag noteleport
-pvp_y_3-4.gat mapflag noteleport
-pvp_y_3-5.gat mapflag noteleport
-pvp_y_4-1.gat mapflag noteleport
-pvp_y_4-2.gat mapflag noteleport
-pvp_y_4-3.gat mapflag noteleport
-pvp_y_4-4.gat mapflag noteleport
-pvp_y_4-5.gat mapflag noteleport
-pvp_y_5-1.gat mapflag noteleport
-pvp_y_5-2.gat mapflag noteleport
-pvp_y_5-3.gat mapflag noteleport
-pvp_y_5-4.gat mapflag noteleport
-pvp_y_5-5.gat mapflag noteleport
-pvp_y_6-1.gat mapflag noteleport
-pvp_y_6-2.gat mapflag noteleport
-pvp_y_6-3.gat mapflag noteleport
-pvp_y_6-4.gat mapflag noteleport
-pvp_y_6-5.gat mapflag noteleport
-pvp_y_7-1.gat mapflag noteleport
-pvp_y_7-2.gat mapflag noteleport
-pvp_y_7-3.gat mapflag noteleport
-pvp_y_7-4.gat mapflag noteleport
-pvp_y_7-5.gat mapflag noteleport
-pvp_y_8-1.gat mapflag noteleport
-pvp_y_8-2.gat mapflag noteleport
-pvp_y_8-3.gat mapflag noteleport
-pvp_y_8-4.gat mapflag noteleport
-pvp_y_8-5.gat mapflag noteleport
-pvp_n_1-1.gat mapflag noteleport
-pvp_n_1-2.gat mapflag noteleport
-pvp_n_1-3.gat mapflag noteleport
-pvp_n_1-4.gat mapflag noteleport
-pvp_n_1-5.gat mapflag noteleport
-pvp_n_2-1.gat mapflag noteleport
-pvp_n_2-2.gat mapflag noteleport
-pvp_n_2-3.gat mapflag noteleport
-pvp_n_2-4.gat mapflag noteleport
-pvp_n_2-5.gat mapflag noteleport
-pvp_n_3-1.gat mapflag noteleport
-pvp_n_3-2.gat mapflag noteleport
-pvp_n_3-3.gat mapflag noteleport
-pvp_n_3-4.gat mapflag noteleport
-pvp_n_3-5.gat mapflag noteleport
-pvp_n_4-1.gat mapflag noteleport
-pvp_n_4-2.gat mapflag noteleport
-pvp_n_4-3.gat mapflag noteleport
-pvp_n_4-4.gat mapflag noteleport
-pvp_n_4-5.gat mapflag noteleport
-pvp_n_5-1.gat mapflag noteleport
-pvp_n_5-2.gat mapflag noteleport
-pvp_n_5-3.gat mapflag noteleport
-pvp_n_5-4.gat mapflag noteleport
-pvp_n_5-5.gat mapflag noteleport
-pvp_n_6-1.gat mapflag noteleport
-pvp_n_6-2.gat mapflag noteleport
-pvp_n_6-3.gat mapflag noteleport
-pvp_n_6-4.gat mapflag noteleport
-pvp_n_6-5.gat mapflag noteleport
-pvp_n_7-1.gat mapflag noteleport
-pvp_n_7-2.gat mapflag noteleport
-pvp_n_7-3.gat mapflag noteleport
-pvp_n_7-4.gat mapflag noteleport
-pvp_n_7-5.gat mapflag noteleport
-pvp_n_8-1.gat mapflag noteleport
-pvp_n_8-2.gat mapflag noteleport
-pvp_n_8-3.gat mapflag noteleport
-pvp_n_8-4.gat mapflag noteleport
-pvp_n_8-5.gat mapflag noteleport
-pvp_2vs2.gat mapflag noteleport
-
-pvp_y_1-1.gat mapflag nosave prt_are_in.gat,100,80
-pvp_y_1-2.gat mapflag nosave prt_are_in.gat,100,80
-pvp_y_1-3.gat mapflag nosave prt_are_in.gat,100,80
-pvp_y_1-4.gat mapflag nosave prt_are_in.gat,100,80
-pvp_y_1-5.gat mapflag nosave prt_are_in.gat,100,80
-pvp_y_2-1.gat mapflag nosave prt_are_in.gat,100,80
-pvp_y_2-2.gat mapflag nosave prt_are_in.gat,100,80
-pvp_y_2-3.gat mapflag nosave prt_are_in.gat,100,80
-pvp_y_2-4.gat mapflag nosave prt_are_in.gat,100,80
-pvp_y_2-5.gat mapflag nosave prt_are_in.gat,100,80
-pvp_y_3-1.gat mapflag nosave prt_are_in.gat,100,80
-pvp_y_3-2.gat mapflag nosave prt_are_in.gat,100,80
-pvp_y_3-3.gat mapflag nosave prt_are_in.gat,100,80
-pvp_y_3-4.gat mapflag nosave prt_are_in.gat,100,80
-pvp_y_3-5.gat mapflag nosave prt_are_in.gat,100,80
-pvp_y_4-1.gat mapflag nosave prt_are_in.gat,100,80
-pvp_y_4-2.gat mapflag nosave prt_are_in.gat,100,80
-pvp_y_4-3.gat mapflag nosave prt_are_in.gat,100,80
-pvp_y_4-4.gat mapflag nosave prt_are_in.gat,100,80
-pvp_y_4-5.gat mapflag nosave prt_are_in.gat,100,80
-pvp_y_5-1.gat mapflag nosave prt_are_in.gat,100,80
-pvp_y_5-2.gat mapflag nosave prt_are_in.gat,100,80
-pvp_y_5-3.gat mapflag nosave prt_are_in.gat,100,80
-pvp_y_5-4.gat mapflag nosave prt_are_in.gat,100,80
-pvp_y_5-5.gat mapflag nosave prt_are_in.gat,100,80
-pvp_y_6-1.gat mapflag nosave prt_are_in.gat,100,80
-pvp_y_6-2.gat mapflag nosave prt_are_in.gat,100,80
-pvp_y_6-3.gat mapflag nosave prt_are_in.gat,100,80
-pvp_y_6-4.gat mapflag nosave prt_are_in.gat,100,80
-pvp_y_6-5.gat mapflag nosave prt_are_in.gat,100,80
-pvp_y_7-1.gat mapflag nosave prt_are_in.gat,100,80
-pvp_y_7-2.gat mapflag nosave prt_are_in.gat,100,80
-pvp_y_7-3.gat mapflag nosave prt_are_in.gat,100,80
-pvp_y_7-4.gat mapflag nosave prt_are_in.gat,100,80
-pvp_y_7-5.gat mapflag nosave prt_are_in.gat,100,80
-pvp_y_8-1.gat mapflag nosave prt_are_in.gat,100,80
-pvp_y_8-2.gat mapflag nosave prt_are_in.gat,100,80
-pvp_y_8-3.gat mapflag nosave prt_are_in.gat,100,80
-pvp_y_8-4.gat mapflag nosave prt_are_in.gat,100,80
-pvp_y_8-5.gat mapflag nosave prt_are_in.gat,100,80
-pvp_n_1-1.gat mapflag nosave prt_are_in.gat,100,80
-pvp_n_1-2.gat mapflag nosave prt_are_in.gat,100,80
-pvp_n_1-3.gat mapflag nosave prt_are_in.gat,100,80
-pvp_n_1-4.gat mapflag nosave prt_are_in.gat,100,80
-pvp_n_1-5.gat mapflag nosave prt_are_in.gat,100,80
-pvp_n_2-1.gat mapflag nosave prt_are_in.gat,100,80
-pvp_n_2-2.gat mapflag nosave prt_are_in.gat,100,80
-pvp_n_2-3.gat mapflag nosave prt_are_in.gat,100,80
-pvp_n_2-4.gat mapflag nosave prt_are_in.gat,100,80
-pvp_n_2-5.gat mapflag nosave prt_are_in.gat,100,80
-pvp_n_3-1.gat mapflag nosave prt_are_in.gat,100,80
-pvp_n_3-2.gat mapflag nosave prt_are_in.gat,100,80
-pvp_n_3-3.gat mapflag nosave prt_are_in.gat,100,80
-pvp_n_3-4.gat mapflag nosave prt_are_in.gat,100,80
-pvp_n_3-5.gat mapflag nosave prt_are_in.gat,100,80
-pvp_n_4-1.gat mapflag nosave prt_are_in.gat,100,80
-pvp_n_4-2.gat mapflag nosave prt_are_in.gat,100,80
-pvp_n_4-3.gat mapflag nosave prt_are_in.gat,100,80
-pvp_n_4-4.gat mapflag nosave prt_are_in.gat,100,80
-pvp_n_4-5.gat mapflag nosave prt_are_in.gat,100,80
-pvp_n_5-1.gat mapflag nosave prt_are_in.gat,100,80
-pvp_n_5-2.gat mapflag nosave prt_are_in.gat,100,80
-pvp_n_5-3.gat mapflag nosave prt_are_in.gat,100,80
-pvp_n_5-4.gat mapflag nosave prt_are_in.gat,100,80
-pvp_n_5-5.gat mapflag nosave prt_are_in.gat,100,80
-pvp_n_6-1.gat mapflag nosave prt_are_in.gat,100,80
-pvp_n_6-2.gat mapflag nosave prt_are_in.gat,100,80
-pvp_n_6-3.gat mapflag nosave prt_are_in.gat,100,80
-pvp_n_6-4.gat mapflag nosave prt_are_in.gat,100,80
-pvp_n_6-5.gat mapflag nosave prt_are_in.gat,100,80
-pvp_n_7-1.gat mapflag nosave prt_are_in.gat,100,80
-pvp_n_7-2.gat mapflag nosave prt_are_in.gat,100,80
-pvp_n_7-3.gat mapflag nosave prt_are_in.gat,100,80
-pvp_n_7-4.gat mapflag nosave prt_are_in.gat,100,80
-pvp_n_7-5.gat mapflag nosave prt_are_in.gat,100,80
-pvp_n_8-1.gat mapflag nosave prt_are_in.gat,100,80
-pvp_n_8-2.gat mapflag nosave prt_are_in.gat,100,80
-pvp_n_8-3.gat mapflag nosave prt_are_in.gat,100,80
-pvp_n_8-4.gat mapflag nosave prt_are_in.gat,100,80
-pvp_n_8-5.gat mapflag nosave prt_are_in.gat,100,80
-pvp_2vs2.gat mapflag nosave prt_are_in.gat,100,80
+// Original Athena Japanese Dev PVP Script +// *With added NPCs, missing Warps, and Warpers* +// *Caution! This is an intended version/addition of the Izlude Arena!* +// +// Additions/Translation By DiaDz +// Jan 24, 2004 +// +//Addition 2v2 script by: Unknown - added + + + +// Begin PVP Room N +pvp_y_room.gat,30,85,4 script Usher 31~40 105,{ + if ((BaseLevel < 31) || (BaseLevel > 40)) goto LVNG; + menu "Prontera Arena [" + getmapusers("pvp_y_1-1.gat") + " / 128]",Lpro, + "Izlude Arena [" + getmapusers("pvp_y_1-2.gat") + " / 128]",Lizu, + "Payon Arena [" + getmapusers("pvp_y_1-3.gat") + " / 128]",Lpay, + "Alberta Arena [" + getmapusers("pvp_y_1-4.gat") + " / 128]",Lalb, + "Morroc Arena [" + getmapusers("pvp_y_1-5.gat") + " / 128]",Lmoc, + "Quit",Lcancel; +Lpro: + if(getmapusers("pvp_y_1-1.gat") >= 128 ) goto LError; + warp "pvp_y_1-1",0,0; + break; +Lizu: + if(getmapusers("pvp_y_1-2.gat") >= 128 ) goto LError; + warp "pvp_y_1-2",0,0; + break; +Lpay: + if(getmapusers("pvp_y_1-3.gat") >= 128 ) goto LError; + warp "pvp_y_1-3",0,0; + break; +Lalb: + if(getmapusers("pvp_y_1-4.gat") >= 128 ) goto LError; + warp "pvp_y_1-4",0,0; + break; +Lmoc: + if(getmapusers("pvp_y_1-5.gat") >= 128 ) goto LError; + warp "pvp_y_1-5",0,0; + break; +Lcancel: + close; +LVNG: + mes "[PVP Usher]"; + mes "Sorry, this arena is only for levels 31~40"; + close; +LError: + mes "[PVP Usher]"; + mes "Sorry, this arena is currently full"; + close; +OnInit: + waitingroom "LV 41 ~ LV 50",0; + break; +} +pvp_y_room.gat,38,85,4 script Usher 41~50 105,{ + if ((BaseLevel < 41) || (BaseLevel > 50)) goto LVNG; + menu "Prontera Arena [" + getmapusers("pvp_y_2-1.gat") + " / 128]",Lpro, + "Izlude Arena [" + getmapusers("pvp_y_2-2.gat") + " / 128]",Lizu, + "Payon Arena [" + getmapusers("pvp_y_2-3.gat") + " / 128]",Lpay, + "Alberta Arena [" + getmapusers("pvp_y_2-4.gat") + " / 128]",Lalb, + "Morroc Arena [" + getmapusers("pvp_y_2-5.gat") + " / 128]",Lmoc, + "Quit",Lcancel; +Lpro: + if(getmapusers("pvp_y_2-1.gat") >= 128 ) goto LError; + warp "pvp_y_2-1",0,0; + break; +Lizu: + if(getmapusers("pvp_y_2-2.gat") >= 128 ) goto LError; + warp "pvp_y_2-2",0,0; + break; +Lpay: + if(getmapusers("pvp_y_2-3.gat") >= 128 ) goto LError; + warp "pvp_y_2-3",0,0; + break; +Lalb: + if(getmapusers("pvp_y_2-4.gat") >= 128 ) goto LError; + warp "pvp_y_2-4",0,0; + break; +Lmoc: + if(getmapusers("pvp_y_2-5.gat") >= 128 ) goto LError; + warp "pvp_y_2-5",0,0; + break; +Lcancel: + close; +LVNG: + mes "[PVP Usher]"; + mes "Sorry, this arena is only for levels 41~50"; + close; +LError: + mes "[PVP Usher]"; + mes "Sorry, this arena is currently full"; + close; +OnInit: + waitingroom "LV 40 ~ LV 50",0; + break; +} +pvp_y_room.gat,46,85,4 script Usher 51~60 105,{ + if ((BaseLevel < 51) || (BaseLevel > 60)) goto LVNG; + menu "Prontera Arena [" + getmapusers("pvp_y_3-1.gat") + " / 128]",Lpro, + "Izlude Arena [" + getmapusers("pvp_y_3-2.gat") + " / 128]",Lizu, + "Payon Arena [" + getmapusers("pvp_y_3-3.gat") + " / 128]",Lpay, + "Alberta Arena [" + getmapusers("pvp_y_3-4.gat") + " / 128]",Lalb, + "Morroc Arena [" + getmapusers("pvp_y_3-5.gat") + " / 128]",Lmoc, + "Quit",Lcancel; +Lpro: + if(getmapusers("pvp_y_3-1.gat") >= 128 ) goto LError; + warp "pvp_y_3-1",0,0; + break; +Lizu: + if(getmapusers("pvp_y_3-2.gat") >= 128 ) goto LError; + warp "pvp_y_3-2",0,0; + break; +Lpay: + if(getmapusers("pvp_y_3-3.gat") >= 128 ) goto LError; + warp "pvp_y_3-3",0,0; + break; +Lalb: + if(getmapusers("pvp_y_3-4.gat") >= 128 ) goto LError; + warp "pvp_y_3-4",0,0; + break; +Lmoc: + if(getmapusers("pvp_y_3-5.gat") >= 128 ) goto LError; + warp "pvp_y_3-5",0,0; + break; +Lcancel: + close; +LVNG: + mes "[PVP Usher]"; + mes "Sorry, this arena is only for levels 51~60"; + close; +LError: + mes "[PVP Usher]"; + mes "Sorry, this arena is currently full"; + close; +OnInit: + waitingroom "LV 51 ~ LV 60",0; + break; +} +pvp_y_room.gat,54,85,4 script Usher 61~70 105,{ + if ((BaseLevel < 61) || (BaseLevel > 70)) goto LVNG; + menu "Prontera Arena [" + getmapusers("pvp_y_4-1.gat") + " / 128]",Lpro, + "Izlude Arena [" + getmapusers("pvp_y_4-2.gat") + " / 128]",Lizu, + "Payon Arena [" + getmapusers("pvp_y_4-3.gat") + " / 128]",Lpay, + "Alberta Arena [" + getmapusers("pvp_y_4-4.gat") + " / 128]",Lalb, + "Morroc Arena [" + getmapusers("pvp_y_4-5.gat") + " / 128]",Lmoc, + "Quit",Lcancel; +Lpro: + if(getmapusers("pvp_y_4-1.gat") >= 128 ) goto LError; + warp "pvp_y_4-1",0,0; + break; +Lizu: + if(getmapusers("pvp_y_4-2.gat") >= 128 ) goto LError; + warp "pvp_y_4-2",0,0; + break; +Lpay: + if(getmapusers("pvp_y_4-3.gat") >= 128 ) goto LError; + warp "pvp_y_4-3",0,0; + break; +Lalb: + if(getmapusers("pvp_y_4-4.gat") >= 128 ) goto LError; + warp "pvp_y_4-4",0,0; + break; +Lmoc: + if(getmapusers("pvp_y_4-5.gat") >= 128 ) goto LError; + warp "pvp_y_4-5",0,0; + break; +Lcancel: + close; +LVNG: + mes "[PVP Usher]"; + mes "Sorry, this arena is only for levels 61~70"; + close; +LError: + mes "[PVP Usher]"; + mes "Sorry, this arena is currently full"; + close; +OnInit: + waitingroom "LV 61 ~ LV 70",0; + break; +} +pvp_y_room.gat,62,85,4 script Usher 71~80 105,{ + if ((BaseLevel < 71) || (BaseLevel > 80)) goto LVNG; + menu "Prontera Arena [" + getmapusers("pvp_y_5-1.gat") + " / 128]",Lpro, + "Izlude Arena [" + getmapusers("pvp_y_5-2.gat") + " / 128]",Lizu, + "Payon Arena [" + getmapusers("pvp_y_5-3.gat") + " / 128]",Lpay, + "Alberta Arena [" + getmapusers("pvp_y_5-4.gat") + " / 128]",Lalb, + "Morroc Arena [" + getmapusers("pvp_y_5-5.gat") + " / 128]",Lmoc, + "Quit",Lcancel; +Lpro: + if(getmapusers("pvp_y_5-1.gat") >= 128 ) goto LError; + warp "pvp_y_5-1",0,0; + break; +Lizu: + if(getmapusers("pvp_y_5-2.gat") >= 128 ) goto LError; + warp "pvp_y_5-2",0,0; + break; +Lpay: + if(getmapusers("pvp_y_5-3.gat") >= 128 ) goto LError; + warp "pvp_y_5-3",0,0; + break; +Lalb: + if(getmapusers("pvp_y_5-4.gat") >= 128 ) goto LError; + warp "pvp_y_5-4",0,0; + break; +Lmoc: + if(getmapusers("pvp_y_5-5.gat") >= 128 ) goto LError; + warp "pvp_y_5-5",0,0; + break; +Lcancel: + close; +LVNG: + mes "[PVP Usher]"; + mes "Sorry, this arena is only for levels 71~80"; + close; +LError: + mes "[PVP Usher]"; + mes "Sorry, this arena is currently full"; + close; +OnInit: + waitingroom "LV 71 ~ LV 80",0; + break; +} +pvp_y_room.gat,70,85,4 script Usher 81~90 105,{ + if ((BaseLevel < 81) || (BaseLevel > 90)) goto LVNG; + menu "Prontera Arena [" + getmapusers("pvp_y_6-1.gat") + " / 128]",Lpro, + "Izlude Arena [" + getmapusers("pvp_y_6-2.gat") + " / 128]",Lizu, + "Payon Arena [" + getmapusers("pvp_y_6-3.gat") + " / 128]",Lpay, + "Alberta Arena [" + getmapusers("pvp_y_6-4.gat") + " / 128]",Lalb, + "Morroc Arena [" + getmapusers("pvp_y_6-5.gat") + " / 128]",Lmoc, + "Quit",Lcancel; +Lpro: + if(getmapusers("pvp_y_6-1.gat") >= 128 ) goto LError; + warp "pvp_y_6-1",0,0; + break; +Lizu: + if(getmapusers("pvp_y_6-2.gat") >= 128 ) goto LError; + warp "pvp_y_6-2",0,0; + break; +Lpay: + if(getmapusers("pvp_y_6-3.gat") >= 128 ) goto LError; + warp "pvp_y_6-3",0,0; + break; +Lalb: + if(getmapusers("pvp_y_6-4.gat") >= 128 ) goto LError; + warp "pvp_y_6-4",0,0; + break; +Lmoc: + if(getmapusers("pvp_y_6-5.gat") >= 128 ) goto LError; + warp "pvp_y_6-5",0,0; + break; +Lcancel: + close; +LVNG: + mes "[PVP Usher]"; + mes "Sorry, this arena is only for levels 81~90"; + close; +LError: + mes "[PVP Usher]"; + mes "Sorry, this arena is currently full"; + close; +OnInit: + waitingroom "LV 81 ~ LV 90",0; + break; +} +pvp_y_room.gat,78,85,4 script Usher 91~Higher 105,{ + if (BaseLevel < 91) goto LVNG; + menu "Prontera Arena [" + getmapusers("pvp_y_7-1.gat") + " / 128]",Lpro, + "Izlude Arena [" + getmapusers("pvp_y_7-2.gat") + " / 128]",Lizu, + "Payon Arena [" + getmapusers("pvp_y_7-3.gat") + " / 128]",Lpay, + "Alberta Arena [" + getmapusers("pvp_y_7-4.gat") + " / 128]",Lalb, + "Morroc Arena [" + getmapusers("pvp_y_7-5.gat") + " / 128]",Lmoc, + "Quit",Lcancel; +Lpro: + if(getmapusers("pvp_y_7-1.gat") >= 128 ) goto LError; + warp "pvp_y_7-1",0,0; + break; +Lizu: + if(getmapusers("pvp_y_7-2.gat") >= 128 ) goto LError; + warp "pvp_y_7-2",0,0; + break; +Lpay: + if(getmapusers("pvp_y_7-3.gat") >= 128 ) goto LError; + warp "pvp_y_7-3",0,0; + break; +Lalb: + if(getmapusers("pvp_y_7-4.gat") >= 128 ) goto LError; + warp "pvp_y_7-4",0,0; + break; +Lmoc: + if(getmapusers("pvp_y_7-5.gat") >= 128 ) goto LError; + warp "pvp_y_7-5",0,0; + break; +Lcancel: + close; +LVNG: + mes "[PVP Usher]"; + mes "Sorry, this arena is only for levels 91~Higher"; + close; +LError: + mes "[PVP Usher]"; + mes "Sorry, this arena is currently full"; + close; +OnInit: + waitingroom "LV 91 ~ Higher",0; + break; +} +pvp_y_room.gat,86,85,4 script Usher All Levels 105,{ + menu "Prontera Arena [" + getmapusers("pvp_y_8-1.gat") + " / 128]",Lpro, + "Izlude Arena [" + getmapusers("pvp_y_8-2.gat") + " / 128]",Lizu, + "Payon Arena [" + getmapusers("pvp_y_8-3.gat") + " / 128]",Lpay, + "Alberta Arena [" + getmapusers("pvp_y_8-4.gat") + " / 128]",Lalb, + "Morroc Arena [" + getmapusers("pvp_y_8-5.gat") + " / 128]",Lmoc, + "Quit",Lcancel; +Lpro: + if(getmapusers("pvp_y_8-1.gat") >= 128 ) goto LError; + warp "pvp_y_8-1",0,0; + break; +Lizu: + if(getmapusers("pvp_y_8-2.gat") >= 128 ) goto LError; + warp "pvp_y_8-2",0,0; + break; +Lpay: + if(getmapusers("pvp_y_8-3.gat") >= 128 ) goto LError; + warp "pvp_y_8-3",0,0; + break; +Lalb: + if(getmapusers("pvp_y_8-4.gat") >= 128 ) goto LError; + warp "pvp_y_8-4",0,0; + break; +Lmoc: + if(getmapusers("pvp_y_8-5.gat") >= 128 ) goto LError; + warp "pvp_y_8-5",0,0; + break; +Lcancel: + close; +LError: + mes "[PVP Usher]"; + mes "Sorry, this arena is currently full"; + close; +OnInit: + waitingroom "All Levels",0; + break; +} + +// Begin PVP Room N +pvp_n_room.gat,30,85,4 script Usher 31~40 105,{ + if ((BaseLevel < 31) || (BaseLevel > 40)) goto LVNG; + menu "Sandwich Arena [" + getmapusers("pvp_n_1-1.gat") + " / 64]",Lsand, + "Rock Arena [" + getmapusers("pvp_n_1-2.gat") + " / 32]",Llock, + "Four Arena [" + getmapusers("pvp_n_1-3.gat") + " / 32]",Lpolu, + "Undercross Arena [" + getmapusers("pvp_n_1-4.gat") + " / 32]",Lunder, + "Copass Arena [" + getmapusers("pvp_n_1-5.gat") + " / 32]",Lcom, + "Quit",Lcancel; +Lsand: + if(getmapusers("pvp_n_1-1.gat") >= 64 ) goto LError; + warp "pvp_n_1-1",0,0; + break; +Llock: + if(getmapusers("pvp_n_1-2.gat") >= 32 ) goto LError; + warp "pvp_n_1-2",0,0; + break; +Lpolu: + if(getmapusers("pvp_n_1-3.gat") >= 32 ) goto LError; + warp "pvp_n_1-3",0,0; + break; +Lunder: + if(getmapusers("pvp_n_1-4.gat") >= 32 ) goto LError; + warp "pvp_n_1-4",0,0; + break; +Lcom: + if(getmapusers("pvp_n_1-5.gat") >= 32 ) goto LError; + warp "pvp_n_1-5",0,0; + break; +Lcancel: + close; +LVNG: + mes "[PVP Usher]"; + mes "Sorry, this arena is only for levels 31~40"; + close; +LError: + mes "[PVP Usher]"; + mes "Sorry, this arena is currently full"; + close; +OnInit: + waitingroom "LV 31 ~ LV 40",0; + break; +} +pvp_n_room.gat,38,85,4 script Usher 41~50 105,{ + if ((BaseLevel < 41) || (BaseLevel > 50)) goto LVNG; + menu "Sandwich Arena [" + getmapusers("pvp_n_2-1.gat") + " / 64]",Lsand, + "Rock Arena [" + getmapusers("pvp_n_2-2.gat") + " / 32]",Llock, + "Four Arena [" + getmapusers("pvp_n_2-3.gat") + " / 32]",Lpolu, + "Undercross Arena [" + getmapusers("pvp_n_2-4.gat") + " / 32]",Lunder, + "Copass Arena [" + getmapusers("pvp_n_2-5.gat") + " / 32]",Lcom, + "Quit",Lcancel; +Lsand: + if(getmapusers("pvp_n_2-1.gat") >= 64 ) goto LError; + warp "pvp_n_2-1",0,0; + break; +Llock: + if(getmapusers("pvp_n_2-2.gat") >= 32 ) goto LError; + warp "pvp_n_2-2",0,0; + break; +Lpolu: + if(getmapusers("pvp_n_2-3.gat") >= 32 ) goto LError; + warp "pvp_n_2-3",0,0; + break; +Lunder: + if(getmapusers("pvp_n_2-4.gat") >= 32 ) goto LError; + warp "pvp_n_2-4",0,0; + break; +Lcom: + if(getmapusers("pvp_n_2-5.gat") >= 32 ) goto LError; + warp "pvp_n_2-5",0,0; + break; +Lcancel: + close; +LVNG: + mes "[PVP Usher]"; + mes "Sorry, this arena is only for levels 41~50"; + close; +LError: + mes "[PVP Usher]"; + mes "Sorry, this arena is currently full"; + close; +OnInit: + waitingroom "LV 41 ~ LV 50",0; + break; +} +pvp_n_room.gat,46,85,4 script Usher 51~60 105,{ + if ((BaseLevel < 51) || (BaseLevel > 60)) goto LVNG; + menu "Sandwich Arena [" + getmapusers("pvp_n_3-1.gat") + " / 64]",Lsand, + "Rock Arena [" + getmapusers("pvp_n_3-2.gat") + " / 32]",Llock, + "Four Arena [" + getmapusers("pvp_n_3-3.gat") + " / 32]",Lpolu, + "Undercross Arena [" + getmapusers("pvp_n_3-4.gat") + " / 32]",Lunder, + "Copass Arena [" + getmapusers("pvp_n_3-5.gat") + " / 32]",Lcom, + "Quit",Lcancel; +Lsand: + if(getmapusers("pvp_n_3-1.gat") >= 64 ) goto LError; + warp "pvp_n_3-1",0,0; + break; +Llock: + if(getmapusers("pvp_n_3-2.gat") >= 32 ) goto LError; + warp "pvp_n_3-2",0,0; + break; +Lpolu: + if(getmapusers("pvp_n_3-3.gat") >= 32 ) goto LError; + warp "pvp_n_3-3",0,0; + break; +Lunder: + if(getmapusers("pvp_n_3-4.gat") >= 32 ) goto LError; + warp "pvp_n_3-4",0,0; + break; +Lcom: + if(getmapusers("pvp_n_3-5.gat") >= 32 ) goto LError; + warp "pvp_n_3-5",0,0; + break; +Lcancel: + close; +LVNG: + mes "[PVP Usher]"; + mes "Sorry, this arena is only for levels 51~60"; + close; +LError: + mes "[PVP Usher]"; + mes "Sorry, this arena is currently full"; + close; +OnInit: + waitingroom "LV 51 ~ LV 60",0; + break; +} +pvp_n_room.gat,54,85,4 script Usher 61~70 105,{ + if ((BaseLevel < 61) || (BaseLevel > 70)) goto LVNG; + menu "Sandwich Arena [" + getmapusers("pvp_n_4-1.gat") + " / 64]",Lsand, + "Rock Arena [" + getmapusers("pvp_n_4-2.gat") + " / 32]",Llock, + "Four Arena [" + getmapusers("pvp_n_4-3.gat") + " / 32]",Lpolu, + "Undercross Arena [" + getmapusers("pvp_n_4-4.gat") + " / 32]",Lunder, + "Copass Arena [" + getmapusers("pvp_n_4-5.gat") + " / 32]",Lcom, + "Quit",Lcancel; +Lsand: + if(getmapusers("pvp_n_4-1.gat") >= 64 ) goto LError; + warp "pvp_n_4-1",0,0; + break; +Llock: + if(getmapusers("pvp_n_4-2.gat") >= 32 ) goto LError; + warp "pvp_n_4-2",0,0; + break; +Lpolu: + if(getmapusers("pvp_n_4-3.gat") >= 32 ) goto LError; + warp "pvp_n_4-3",0,0; + break; +Lunder: + if(getmapusers("pvp_n_4-4.gat") >= 32 ) goto LError; + warp "pvp_n_4-4",0,0; + break; +Lcom: + if(getmapusers("pvp_n_4-5.gat") >= 32 ) goto LError; + warp "pvp_n_4-5",0,0; + break; +Lcancel: + close; +LVNG: + mes "[PVP Usher]"; + mes "Sorry, this arena is only for levels 61~70"; + close; +LError: + mes "[PVP Usher]"; + mes "Sorry, this arena is currently full"; + close; +OnInit: + waitingroom "LV 61 ~ LV 70",0; + break; +} +pvp_n_room.gat,62,85,4 script Usher 71~80 105,{ + if ((BaseLevel < 71) || (BaseLevel > 80)) goto LVNG; + menu "Sandwich Arena [" + getmapusers("pvp_n_5-1.gat") + " / 64]",Lsand, + "Rock Arena [" + getmapusers("pvp_n_5-2.gat") + " / 32]",Llock, + "Four Arena [" + getmapusers("pvp_n_5-3.gat") + " / 32]",Lpolu, + "Undercross Arena [" + getmapusers("pvp_n_5-4.gat") + " / 32]",Lunder, + "Copass Arena [" + getmapusers("pvp_n_5-5.gat") + " / 32]",Lcom, + "Quit",Lcancel; +Lsand: + if(getmapusers("pvp_n_5-1.gat") >= 64 ) goto LError; + warp "pvp_n_5-1",0,0; + break; +Llock: + if(getmapusers("pvp_n_5-2.gat") >= 32 ) goto LError; + warp "pvp_n_5-2",0,0; + break; +Lpolu: + if(getmapusers("pvp_n_5-3.gat") >= 32 ) goto LError; + warp "pvp_n_5-3",0,0; + break; +Lunder: + if(getmapusers("pvp_n_5-4.gat") >= 32 ) goto LError; + warp "pvp_n_5-4",0,0; + break; +Lcom: + if(getmapusers("pvp_n_5-5.gat") >= 32 ) goto LError; + warp "pvp_n_5-5",0,0; + break; +Lcancel: + close; +LVNG: + mes "[PVP Usher]"; + mes "Sorry, this arena is only for levels 71~80"; + close; +LError: + mes "[PVP Usher]"; + mes "Sorry, this arena is currently full"; + close; +OnInit: + waitingroom "LV 71 ~ LV 80",0; + break; +} +pvp_n_room.gat,70,85,4 script Usher 81~90 105,{ + if ((BaseLevel < 81) || (BaseLevel > 90)) goto LVNG; + menu "Sandwich Arena [" + getmapusers("pvp_n_6-1.gat") + " / 64]",Lsand, + "Rock Arena [" + getmapusers("pvp_n_6-2.gat") + " / 32]",Llock, + "Four Arena [" + getmapusers("pvp_n_6-3.gat") + " / 32]",Lpolu, + "Undercross Arena [" + getmapusers("pvp_n_6-4.gat") + " / 32]",Lunder, + "Copass Arena [" + getmapusers("pvp_n_6-5.gat") + " / 32]",Lcom, + "Quit",Lcancel; +Lsand: + if(getmapusers("pvp_n_6-1.gat") >= 64 ) goto LError; + warp "pvp_n_6-1",0,0; + break; +Llock: + if(getmapusers("pvp_n_6-2.gat") >= 32 ) goto LError; + warp "pvp_n_6-2",0,0; + break; +Lpolu: + if(getmapusers("pvp_n_6-3.gat") >= 32 ) goto LError; + warp "pvp_n_6-3",0,0; + break; +Lunder: + if(getmapusers("pvp_n_6-4.gat") >= 32 ) goto LError; + warp "pvp_n_6-4",0,0; + break; +Lcom: + if(getmapusers("pvp_n_6-5.gat") >= 32 ) goto LError; + warp "pvp_n_6-5",0,0; + break; +Lcancel: + close; +LVNG: + mes "[PVP Usher]"; + mes "Sorry, this arena is only for levels 81~90"; + close; +LError: + mes "[PVP Usher]"; + mes "Sorry, this arena is currently full"; + close; +OnInit: + waitingroom "LV 81 ~ LV 90",0; + break; +} +pvp_n_room.gat,78,85,4 script Usher 91~Higher 105,{ + if (BaseLevel < 91) goto LVNG; + menu "Sandwich Arena [" + getmapusers("pvp_n_7-1.gat") + " / 64]",Lsand, + "Rock Arena [" + getmapusers("pvp_n_7-2.gat") + " / 32]",Llock, + "Four Arena [" + getmapusers("pvp_n_7-3.gat") + " / 32]",Lpolu, + "Undercross Arena [" + getmapusers("pvp_n_7-4.gat") + " / 32]",Lunder, + "Copass Arena [" + getmapusers("pvp_n_7-5.gat") + " / 32]",Lcom, + "Quit",Lcancel; +Lsand: + if(getmapusers("pvp_n_7-1.gat") >= 64 ) goto LError; + warp "pvp_n_7-1",0,0; + break; +Llock: + if(getmapusers("pvp_n_7-2.gat") >= 32 ) goto LError; + warp "pvp_n_7-2",0,0; + break; +Lpolu: + if(getmapusers("pvp_n_7-3.gat") >= 32 ) goto LError; + warp "pvp_n_7-3",0,0; + break; +Lunder: + if(getmapusers("pvp_n_7-4.gat") >= 32 ) goto LError; + warp "pvp_n_7-4",0,0; + break; +Lcom: + if(getmapusers("pvp_n_7-5.gat") >= 32 ) goto LError; + warp "pvp_n_7-5",0,0; + break; +Lcancel: + close; +LVNG: + mes "[PVP Usher]"; + mes "Sorry, this arena is only for levels 91~Higher0"; + close; +LError: + mes "[PVP Usher]"; + mes "Sorry, this arena is currently full"; + close; +OnInit: + waitingroom "LV 91 ~ Higher",0; + break; +} +pvp_n_room.gat,86,85,4 script Usher All Levels 105,{ + menu "Sandwich Arena [" + getmapusers("pvp_n_8-1.gat") + " / 64]",Lsand, + "Rock Arena [" + getmapusers("pvp_n_8-2.gat") + " / 32]",Llock, + "Four Arena [" + getmapusers("pvp_n_8-3.gat") + " / 32]",Lpolu, + "Undercross Arena [" + getmapusers("pvp_n_8-4.gat") + " / 32]",Lunder, + "Copass Arena [" + getmapusers("pvp_n_8-5.gat") + " / 32]",Lcom, + "Quit",Lcancel; +Lsand: + if(getmapusers("pvp_n_8-1.gat") >= 64 ) goto LError; + warp "pvp_n_8-1",0,0; + break; +Llock: + if(getmapusers("pvp_n_8-2.gat") >= 32 ) goto LError; + warp "pvp_n_8-2",0,0; + break; +Lpolu: + if(getmapusers("pvp_n_8-3.gat") >= 32 ) goto LError; + warp "pvp_n_8-3",0,0; + break; +Lunder: + if(getmapusers("pvp_n_8-4.gat") >= 32 ) goto LError; + warp "pvp_n_8-4",0,0; + break; +Lcom: + if(getmapusers("pvp_n_8-5.gat") >= 32 ) goto LError; + warp "pvp_n_8-5",0,0; + break; +Lcancel: + close; +LError: + mes "[PVP Usher]"; + mes "Sorry, this arena is currently full"; + close; +OnInit: + waitingroom "All Levels",0; + break; +} + +// PvP Representative NPC prontera 164 175 +prontera.gat,164,175,5 script PvP Representative 116,{ + mes "[PvP Representative]"; + mes "Hello there! I'm the PvP Representative!"; + next; + mes "[PvP Representative]"; + mes "I'm here to advertise our Arena in Izlude! It's specially designed for you players to beat each other up!"; + next; + menu "Sounds interesting! I'll join!",entrance,"PvP? Whats that?",info,"Nah, maybe later.",quit; +entrance: + mes "[PvP Representative]"; + mes "Most excellent! I'll warp you to our Arena's Front Gate!"; + next; + warp "izlude.gat",128,218; + close; +info: + mes "[PvP Representative]"; + mes "PvP Stands For 'Player versus Player', where you get to choose from a variety of arenas in which to fight in!"; + next; + mes "[PvP Representative]"; + mes "You don't have to worry about losing items, we have a NO PENALTY rule that states you cannot loose items or EXP!"; + next; + mes "[PvP Representative]"; + mes "So whadduya think?"; + next; + menu "Sounds interesting! I'll join!",entrance,"Nah, maybe later.",quit; +quit: + mes "[PvP Representative]"; + mes "'Kay - I hope you change your mind in the near future."; + mes " "; + mes "Come Again! ^_^"; + close; +} + +// Arena Bulletin Board NPC izlude 125 219 +izlude.gat,125,219,5 script Arena Bulletin Board 111,{ + mes "[Arena Bulletin Board]"; + mes "Welcome to the one and only..."; + mes " "; + mes "Player Versus Player Arena!"; + close; +} + +// Arena Master NPC prt_are_in 100 84 +prt_are_in.gat,100,84,4 script Arena Master 734,{ + mes "[Arena Master]"; + mes "Aaahh yes! Welcome to my humble and world renown PvP Arena!"; + next; + mes "[Arena Master]"; + mes "Tell me...do you wish to learn more of my Arena?"; + next; + menu "Sure",sure,"Maybe later...",later; +sure: + mes "[Arena Master]"; + mes "After much boredom that I've went through all my life of killing simple monsters, I decided that it wasn't enough!"; + next; + mes "[Arena Master]"; + mes "I needed HUMAN FLESH! To satisfy my need to kill..."; + next; + mes "[Arena Master]"; + mes "And after years of construction and planning ~ it's finally complete for all of Midgard to see and cherish!"; + next; + mes "[Arena Master]"; + mes "I present you..."; + mes " "; + mes "MY ARENA!!!"; + close; +later: + mes "[Arena Master]"; + mes "Fine fine, please do enjoy your stay."; + close; +} + +// PvP Attendant NPC prt_are_in 97 86 +prt_are_in.gat,97,86,4 script PvP Attendant 98,{ + mes "[PvP Attendant]"; + mes "Welcome To The PVP ARENA!"; + next; + mes "[PvP Attendant]"; + mes "The Hall to the Left leads to City simulation Arenas"; + next; + mes "[PvP Attendant]"; + mes "The Hall to the Right leads to our Special map Arenas"; + close; +} + +// PvP Attendant NPC prt_are_in 102 86 +prt_are_in.gat,102,86,4 script PvP Attendant 98,{ + mes "[PvP Attendant]"; + mes "Welcome To The PVP ARENA!"; + next; + mes "[PvP Attendant]"; + mes "The Hall to the Left leads to City simulation Arenas"; + next; + mes "[PvP Attendant]"; + mes "The Hall to the Right are our Special map Arenas"; + close; +} + +// Begin 2v2 pvp Script +pvp_2vs2.gat,32,22,2 script Bruno 87,{ + mes "[Bruno]"; + mes "You wimpin out already?"; + menu "Yes",goback,"No",stay; + goback: + mes "Man!, you don't even got scratches, you wimp."; + next; + warp "prt_are_in.gat",167,90; + close; + stay: + mes "Impressive!, I respect your stamina!"; + close; +} + +prt_are_in.gat,167,92,4 script Bruno 87,{ + mes "[Bruno]"; + mes "You sure you wanna goto our underground 2vs2 arena dork?"; + menu "Yes",gopvp,"No",nopvp; + gopvp: + mes "Was nice knowin you chump."; + next; + warp "pvp_2vs2.gat",36,49; + close; + nopvp: + mes "Didn't think so, wuss!"; + close; +} + +prt_are_in.gat,92,86,4 script Herman 125,{ + mes "[Herman]"; + mes "Welcome to Royal Rumble!"; + mes "Ladies and Gents, my name is Herman from 'Cool Event Corp.'!"; + next; + menu "What's Royal Rumble?",M0,"Boo~Go Home~",MEnd; + + M0: + mes "[Herman]"; + mes "We, Cool Event Corp., have opened a special event open to everyone visiting the Arena."; + mes "You can escape your monotonous life with this really great even we are providing you!"; + next; + mes "[Herman]"; + mes "This event is called ..Rooooooyal Rumbbbbbbble!!"; + mes "*Cough*..*Cough*..*Cough* !!"; + next; + mes "[Herman]"; + mes ". . . . ."; + mes "Arrggghhh Sooorry..."; + next; + mes "[Herman]"; + mes "When there are enough players in every 'Stand-By Room',"; + mes "We will guide you to the beautiful Colosseum."; + next; + mes "[Herman]"; + mes "In that Colosseum, you have to fight with hard and hostile Monsters within 5 minutes,"; + mes "Using 8 warp zones located in 8 directions."; + next; + mes "[Herman]"; + mes "When you strike into the deep inside of Monsters you will see Organ NPCs which control and generate Monsters."; + mes "You should have to speak them if you want to make an easy way to get a victory. They will release you from enemies."; + next; + mes "[Herman]"; + mes "Whatever you eliminate all enemies by yourself or get helped by Organ NPCs, When you kill them all,"; + mes "It is regarded as the Perfect Clear on Royal Rumble!"; + next; + mes "[Herman]"; + mes "Have some fun in Royal Rumble with your companions."; + mes "Once again, My name is Herman from Cool Event Corp. Thank you!"; + close; + + MEnd: + mes "[Herman]"; + mes "You go Home, Baby"; + close; +} + +prt_are_in.gat,93,86,4 script Lancelot 125,{ + mes "[Lancelot]"; + mes "Hi Hi! Come on ! Make yourself at Home!"; + mes "My name is Lacelot from Cool Event Corp. I am here to tell you about Time Limit Fight. Do you want to Listen?"; + next; + menu "Yeah, Cool.",M0,"Sorry, I don't want to.",MEnd; + + M0: + mes "[Lancelot]"; + mes "We, Cool Event Corp., open a Special event to give a fun to everybody visiting Arena."; + mes "You can slip your monotonous day life for the moment during the event we provide you!"; + next; + mes "[Lancelot]"; + mes "The Event Called ..Timeeeee-- Limmmmmitttt---Figgggghhtt !!"; + mes "*Aaahchoo* !! *Achoo* !! *Cough**Cough* .."; + next; + mes "[Lancelot]"; + mes ". . . . . Whack.."; + mes "Oh Boy.. Really Sorry to make you uncomfortable with this."; + next; + mes "[Lancelot]"; + mes "When players gather as many as we need in Each Standbyroom"; + mes "We will guide you to the Labylinth."; + next; + mes "[Lancelot]"; + mes "In that Labylinth,you have to terminate all monsters within 5 minutes,"; + mes "Using this Warp zone and that warp zone..."; + next; + mes "[Lancelot]"; + mes "When you kill all Monsters in one room,another gate will be opened ..and you can go in there."; + mes "One thing you must know is when you enter the new room door is totally closed to block your exit .."; + next; + mes "[Lancelot]"; + mes "You cannot go back to where you're from."; + next; + mes "[Lancelot]"; + mes "In case of Level 1 Stage, the door of Boss Stage will be opened when you eliminate all monsters in every room .."; + mes "But in Level 2 and 3, even though there are many complexed corridors, if you follow the shortcut, you will enter the Boss Room at ease."; + next; + mes "[Lancelot]"; + mes "Get some fun with your companions."; + mes "Thank you for your time, once again my name is Lancelot!"; + close; + MEnd: + mes "[Lancelot]"; + mes "Alright, Bye Bye"; + close; +} + +prt_are_in.gat,94,85,4 Zakkie 84,{ + mes "[Zakkie]"; + mes "Welcome to Royal Rumble,the World of Fighters!"; + mes "My name is Zakkie from Cool Event Corp.!"; + mes "If you don't mind let me give you some tips for more fun."; + next; + menu "No!i don't mind.Go ahead.",M0,"Errr....I know already.",MEnd; + + M0: + mes "[Zakkie]"; + mes "when get started, You will ecounter many monsters through 8 warp zones."; + mes "You can choose either way of the Battle. You can find Organ NPCs behind each Warp Zone or You can kill all Enemies by yourself."; + next; + mes "[Zakkie]"; + mes "When you satisfy one of them, it is regarded as Clear on that Round."; + mes "We suggest you to discuss with party members to find out better way of the Battle."; + close; + MEnd: + mes "[Zakkie]"; + mes "Whattt!! Did you say you know the tips?!"; + mes "Wow~Excellent. Then you don't need my help. Well have fun~!"; + close; +} + +prt_are_in.gat,108,86,4 script Boris 84,{ + mes "[Boris]"; + mes "Hmm.. I can easily imagine how frustrated you have been in your life, dear.. Because Common people cannot dare to visit me."; + mes "Let me introduce myself. My name is Boris and the director of Customer Support Team in Cool Event Corp."; + mes "I will give you the exceptional tips only for the Bloodthirsty."; + next; + menu "Will you please?",M0,"Thank you but I already know about it.",MEnd; + + M0: + mes "[Boris]"; + mes "Before get started, you must work out a strategy considering your members."; + mes "Then you can warp into the Battle."; + next; + mes "[Boris]"; + mes "If 8 men jump into the Warp zone together, You will succeed."; + mes "Otherwise If a man or two, I don't think you can survive."; + next; + mes "[Boris]"; + mes "And let's talk about the Running Time of Royal Rumble and of Time Limit Fight."; + mes "Although every Battle Time is limitted, but sometimes it is increased by a Bonus when you clear One Round."; + next; + mes "[Boris]"; + mes "Bonus Time will be increased by Second.. When you get a Bonus Time"; + mes "Definately you could extent the Limit of Battle. You can check the Time passage with the announcement of our employee."; + close; + + MEnd: + mes "[Boris]"; + mes ".. Ahh...I need my room in Dark .."; + mes "Hmm Hmm Nothing, Nothing."; + close; +} + +// Add missing Warps Begins Here +prt_are_in.gat,32,95,0 warp areawarpfix1 1,1,pvp_y_room.gat,52,23 +prt_are_in.gat,170,95,0 warp areawarpfix2 1,1,pvp_n_room.gat,52,23 +pvp_y_room.gat,52,18,0 warp areawarpfix3 1,1,prt_are_in.gat,32,92 +pvp_n_room.gat,52,18,0 warp areawarpfix4 1,1,prt_are_in.gat,170,92 + +// PvP Mapflags +pvp_y_1-1.gat mapflag nopenalty +pvp_y_1-2.gat mapflag nopenalty +pvp_y_1-3.gat mapflag nopenalty +pvp_y_1-4.gat mapflag nopenalty +pvp_y_1-5.gat mapflag nopenalty +pvp_y_2-1.gat mapflag nopenalty +pvp_y_2-2.gat mapflag nopenalty +pvp_y_2-3.gat mapflag nopenalty +pvp_y_2-4.gat mapflag nopenalty +pvp_y_2-5.gat mapflag nopenalty +pvp_y_3-1.gat mapflag nopenalty +pvp_y_3-2.gat mapflag nopenalty +pvp_y_3-3.gat mapflag nopenalty +pvp_y_3-4.gat mapflag nopenalty +pvp_y_3-5.gat mapflag nopenalty +pvp_y_4-1.gat mapflag nopenalty +pvp_y_4-2.gat mapflag nopenalty +pvp_y_4-3.gat mapflag nopenalty +pvp_y_4-4.gat mapflag nopenalty +pvp_y_4-5.gat mapflag nopenalty +pvp_y_5-1.gat mapflag nopenalty +pvp_y_5-2.gat mapflag nopenalty +pvp_y_5-3.gat mapflag nopenalty +pvp_y_5-4.gat mapflag nopenalty +pvp_y_5-5.gat mapflag nopenalty +pvp_y_6-1.gat mapflag nopenalty +pvp_y_6-2.gat mapflag nopenalty +pvp_y_6-3.gat mapflag nopenalty +pvp_y_6-4.gat mapflag nopenalty +pvp_y_6-5.gat mapflag nopenalty +pvp_y_7-1.gat mapflag nopenalty +pvp_y_7-2.gat mapflag nopenalty +pvp_y_7-3.gat mapflag nopenalty +pvp_y_7-4.gat mapflag nopenalty +pvp_y_7-5.gat mapflag nopenalty +pvp_y_8-1.gat mapflag nopenalty +pvp_y_8-2.gat mapflag nopenalty +pvp_y_8-3.gat mapflag nopenalty +pvp_y_8-4.gat mapflag nopenalty +pvp_y_8-5.gat mapflag nopenalty +pvp_n_1-1.gat mapflag nopenalty +pvp_n_1-2.gat mapflag nopenalty +pvp_n_1-3.gat mapflag nopenalty +pvp_n_1-4.gat mapflag nopenalty +pvp_n_1-5.gat mapflag nopenalty +pvp_n_2-1.gat mapflag nopenalty +pvp_n_2-2.gat mapflag nopenalty +pvp_n_2-3.gat mapflag nopenalty +pvp_n_2-4.gat mapflag nopenalty +pvp_n_2-5.gat mapflag nopenalty +pvp_n_3-1.gat mapflag nopenalty +pvp_n_3-2.gat mapflag nopenalty +pvp_n_3-3.gat mapflag nopenalty +pvp_n_3-4.gat mapflag nopenalty +pvp_n_3-5.gat mapflag nopenalty +pvp_n_4-1.gat mapflag nopenalty +pvp_n_4-2.gat mapflag nopenalty +pvp_n_4-3.gat mapflag nopenalty +pvp_n_4-4.gat mapflag nopenalty +pvp_n_4-5.gat mapflag nopenalty +pvp_n_5-1.gat mapflag nopenalty +pvp_n_5-2.gat mapflag nopenalty +pvp_n_5-3.gat mapflag nopenalty +pvp_n_5-4.gat mapflag nopenalty +pvp_n_5-5.gat mapflag nopenalty +pvp_n_6-1.gat mapflag nopenalty +pvp_n_6-2.gat mapflag nopenalty +pvp_n_6-3.gat mapflag nopenalty +pvp_n_6-4.gat mapflag nopenalty +pvp_n_6-5.gat mapflag nopenalty +pvp_n_7-1.gat mapflag nopenalty +pvp_n_7-2.gat mapflag nopenalty +pvp_n_7-3.gat mapflag nopenalty +pvp_n_7-4.gat mapflag nopenalty +pvp_n_7-5.gat mapflag nopenalty +pvp_n_8-1.gat mapflag nopenalty +pvp_n_8-2.gat mapflag nopenalty +pvp_n_8-3.gat mapflag nopenalty +pvp_n_8-4.gat mapflag nopenalty +pvp_n_8-5.gat mapflag nopenalty +pvp_2vs2.gat mapflag nopenalty + +pvp_y_1-1.gat mapflag pvp +pvp_y_1-2.gat mapflag pvp +pvp_y_1-3.gat mapflag pvp +pvp_y_1-4.gat mapflag pvp +pvp_y_1-5.gat mapflag pvp +pvp_y_2-1.gat mapflag pvp +pvp_y_2-2.gat mapflag pvp +pvp_y_2-3.gat mapflag pvp +pvp_y_2-4.gat mapflag pvp +pvp_y_2-5.gat mapflag pvp +pvp_y_3-1.gat mapflag pvp +pvp_y_3-2.gat mapflag pvp +pvp_y_3-3.gat mapflag pvp +pvp_y_3-4.gat mapflag pvp +pvp_y_3-5.gat mapflag pvp +pvp_y_4-1.gat mapflag pvp +pvp_y_4-2.gat mapflag pvp +pvp_y_4-3.gat mapflag pvp +pvp_y_4-4.gat mapflag pvp +pvp_y_4-5.gat mapflag pvp +pvp_y_5-1.gat mapflag pvp +pvp_y_5-2.gat mapflag pvp +pvp_y_5-3.gat mapflag pvp +pvp_y_5-4.gat mapflag pvp +pvp_y_5-5.gat mapflag pvp +pvp_y_6-1.gat mapflag pvp +pvp_y_6-2.gat mapflag pvp +pvp_y_6-3.gat mapflag pvp +pvp_y_6-4.gat mapflag pvp +pvp_y_6-5.gat mapflag pvp +pvp_y_7-1.gat mapflag pvp +pvp_y_7-2.gat mapflag pvp +pvp_y_7-3.gat mapflag pvp +pvp_y_7-4.gat mapflag pvp +pvp_y_7-5.gat mapflag pvp +pvp_y_8-1.gat mapflag pvp +pvp_y_8-2.gat mapflag pvp +pvp_y_8-3.gat mapflag pvp +pvp_y_8-4.gat mapflag pvp +pvp_y_8-5.gat mapflag pvp +pvp_n_1-1.gat mapflag pvp +pvp_n_1-2.gat mapflag pvp +pvp_n_1-3.gat mapflag pvp +pvp_n_1-4.gat mapflag pvp +pvp_n_1-5.gat mapflag pvp +pvp_n_2-1.gat mapflag pvp +pvp_n_2-2.gat mapflag pvp +pvp_n_2-3.gat mapflag pvp +pvp_n_2-4.gat mapflag pvp +pvp_n_2-5.gat mapflag pvp +pvp_n_3-1.gat mapflag pvp +pvp_n_3-2.gat mapflag pvp +pvp_n_3-3.gat mapflag pvp +pvp_n_3-4.gat mapflag pvp +pvp_n_3-5.gat mapflag pvp +pvp_n_4-1.gat mapflag pvp +pvp_n_4-2.gat mapflag pvp +pvp_n_4-3.gat mapflag pvp +pvp_n_4-4.gat mapflag pvp +pvp_n_4-5.gat mapflag pvp +pvp_n_5-1.gat mapflag pvp +pvp_n_5-2.gat mapflag pvp +pvp_n_5-3.gat mapflag pvp +pvp_n_5-4.gat mapflag pvp +pvp_n_5-5.gat mapflag pvp +pvp_n_6-1.gat mapflag pvp +pvp_n_6-2.gat mapflag pvp +pvp_n_6-3.gat mapflag pvp +pvp_n_6-4.gat mapflag pvp +pvp_n_6-5.gat mapflag pvp +pvp_n_7-1.gat mapflag pvp +pvp_n_7-2.gat mapflag pvp +pvp_n_7-3.gat mapflag pvp +pvp_n_7-4.gat mapflag pvp +pvp_n_7-5.gat mapflag pvp +pvp_n_8-1.gat mapflag pvp +pvp_n_8-2.gat mapflag pvp +pvp_n_8-3.gat mapflag pvp +pvp_n_8-4.gat mapflag pvp +pvp_n_8-5.gat mapflag pvp +pvp_2vs2.gat mapflag pvp + +pvp_y_1-1.gat mapflag pvp_noparty +pvp_y_1-2.gat mapflag pvp_noparty +pvp_y_1-3.gat mapflag pvp_noparty +pvp_y_1-4.gat mapflag pvp_noparty +pvp_y_1-5.gat mapflag pvp_noparty +pvp_y_2-1.gat mapflag pvp_noparty +pvp_y_2-2.gat mapflag pvp_noparty +pvp_y_2-3.gat mapflag pvp_noparty +pvp_y_2-4.gat mapflag pvp_noparty +pvp_y_2-5.gat mapflag pvp_noparty +pvp_y_3-1.gat mapflag pvp_noparty +pvp_y_3-2.gat mapflag pvp_noparty +pvp_y_3-3.gat mapflag pvp_noparty +pvp_y_3-4.gat mapflag pvp_noparty +pvp_y_3-5.gat mapflag pvp_noparty +pvp_y_4-1.gat mapflag pvp_noparty +pvp_y_4-2.gat mapflag pvp_noparty +pvp_y_4-3.gat mapflag pvp_noparty +pvp_y_4-4.gat mapflag pvp_noparty +pvp_y_4-5.gat mapflag pvp_noparty +pvp_y_5-1.gat mapflag pvp_noparty +pvp_y_5-2.gat mapflag pvp_noparty +pvp_y_5-3.gat mapflag pvp_noparty +pvp_y_5-4.gat mapflag pvp_noparty +pvp_y_5-5.gat mapflag pvp_noparty +pvp_y_6-1.gat mapflag pvp_noparty +pvp_y_6-2.gat mapflag pvp_noparty +pvp_y_6-3.gat mapflag pvp_noparty +pvp_y_6-4.gat mapflag pvp_noparty +pvp_y_6-5.gat mapflag pvp_noparty +pvp_y_7-1.gat mapflag pvp_noparty +pvp_y_7-2.gat mapflag pvp_noparty +pvp_y_7-3.gat mapflag pvp_noparty +pvp_y_7-4.gat mapflag pvp_noparty +pvp_y_7-5.gat mapflag pvp_noparty +pvp_y_8-1.gat mapflag pvp_noparty +pvp_y_8-2.gat mapflag pvp_noparty +pvp_y_8-3.gat mapflag pvp_noparty +pvp_y_8-4.gat mapflag pvp_noparty +pvp_y_8-5.gat mapflag pvp_noparty +pvp_n_1-1.gat mapflag pvp_noparty +pvp_n_1-2.gat mapflag pvp_noparty +pvp_n_1-3.gat mapflag pvp_noparty +pvp_n_1-4.gat mapflag pvp_noparty +pvp_n_1-5.gat mapflag pvp_noparty +pvp_n_2-1.gat mapflag pvp_noparty +pvp_n_2-2.gat mapflag pvp_noparty +pvp_n_2-3.gat mapflag pvp_noparty +pvp_n_2-4.gat mapflag pvp_noparty +pvp_n_2-5.gat mapflag pvp_noparty +pvp_n_3-1.gat mapflag pvp_noparty +pvp_n_3-2.gat mapflag pvp_noparty +pvp_n_3-3.gat mapflag pvp_noparty +pvp_n_3-4.gat mapflag pvp_noparty +pvp_n_3-5.gat mapflag pvp_noparty +pvp_n_4-1.gat mapflag pvp_noparty +pvp_n_4-2.gat mapflag pvp_noparty +pvp_n_4-3.gat mapflag pvp_noparty +pvp_n_4-4.gat mapflag pvp_noparty +pvp_n_4-5.gat mapflag pvp_noparty +pvp_n_5-1.gat mapflag pvp_noparty +pvp_n_5-2.gat mapflag pvp_noparty +pvp_n_5-3.gat mapflag pvp_noparty +pvp_n_5-4.gat mapflag pvp_noparty +pvp_n_5-5.gat mapflag pvp_noparty +pvp_n_6-1.gat mapflag pvp_noparty +pvp_n_6-2.gat mapflag pvp_noparty +pvp_n_6-3.gat mapflag pvp_noparty +pvp_n_6-4.gat mapflag pvp_noparty +pvp_n_6-5.gat mapflag pvp_noparty +pvp_n_7-1.gat mapflag pvp_noparty +pvp_n_7-2.gat mapflag pvp_noparty +pvp_n_7-3.gat mapflag pvp_noparty +pvp_n_7-4.gat mapflag pvp_noparty +pvp_n_7-5.gat mapflag pvp_noparty +pvp_n_8-1.gat mapflag pvp_noparty +pvp_n_8-2.gat mapflag pvp_noparty +pvp_n_8-3.gat mapflag pvp_noparty +pvp_n_8-4.gat mapflag pvp_noparty +pvp_n_8-5.gat mapflag pvp_noparty + +pvp_y_1-1.gat mapflag nomemo +pvp_y_1-2.gat mapflag nomemo +pvp_y_1-3.gat mapflag nomemo +pvp_y_1-4.gat mapflag nomemo +pvp_y_1-5.gat mapflag nomemo +pvp_y_2-1.gat mapflag nomemo +pvp_y_2-2.gat mapflag nomemo +pvp_y_2-3.gat mapflag nomemo +pvp_y_2-4.gat mapflag nomemo +pvp_y_2-5.gat mapflag nomemo +pvp_y_3-1.gat mapflag nomemo +pvp_y_3-2.gat mapflag nomemo +pvp_y_3-3.gat mapflag nomemo +pvp_y_3-4.gat mapflag nomemo +pvp_y_3-5.gat mapflag nomemo +pvp_y_4-1.gat mapflag nomemo +pvp_y_4-2.gat mapflag nomemo +pvp_y_4-3.gat mapflag nomemo +pvp_y_4-4.gat mapflag nomemo +pvp_y_4-5.gat mapflag nomemo +pvp_y_5-1.gat mapflag nomemo +pvp_y_5-2.gat mapflag nomemo +pvp_y_5-3.gat mapflag nomemo +pvp_y_5-4.gat mapflag nomemo +pvp_y_5-5.gat mapflag nomemo +pvp_y_6-1.gat mapflag nomemo +pvp_y_6-2.gat mapflag nomemo +pvp_y_6-3.gat mapflag nomemo +pvp_y_6-4.gat mapflag nomemo +pvp_y_6-5.gat mapflag nomemo +pvp_y_7-1.gat mapflag nomemo +pvp_y_7-2.gat mapflag nomemo +pvp_y_7-3.gat mapflag nomemo +pvp_y_7-4.gat mapflag nomemo +pvp_y_7-5.gat mapflag nomemo +pvp_y_8-1.gat mapflag nomemo +pvp_y_8-2.gat mapflag nomemo +pvp_y_8-3.gat mapflag nomemo +pvp_y_8-4.gat mapflag nomemo +pvp_y_8-5.gat mapflag nomemo +pvp_n_1-1.gat mapflag nomemo +pvp_n_1-2.gat mapflag nomemo +pvp_n_1-3.gat mapflag nomemo +pvp_n_1-4.gat mapflag nomemo +pvp_n_1-5.gat mapflag nomemo +pvp_n_2-1.gat mapflag nomemo +pvp_n_2-2.gat mapflag nomemo +pvp_n_2-3.gat mapflag nomemo +pvp_n_2-4.gat mapflag nomemo +pvp_n_2-5.gat mapflag nomemo +pvp_n_3-1.gat mapflag nomemo +pvp_n_3-2.gat mapflag nomemo +pvp_n_3-3.gat mapflag nomemo +pvp_n_3-4.gat mapflag nomemo +pvp_n_3-5.gat mapflag nomemo +pvp_n_4-1.gat mapflag nomemo +pvp_n_4-2.gat mapflag nomemo +pvp_n_4-3.gat mapflag nomemo +pvp_n_4-4.gat mapflag nomemo +pvp_n_4-5.gat mapflag nomemo +pvp_n_5-1.gat mapflag nomemo +pvp_n_5-2.gat mapflag nomemo +pvp_n_5-3.gat mapflag nomemo +pvp_n_5-4.gat mapflag nomemo +pvp_n_5-5.gat mapflag nomemo +pvp_n_6-1.gat mapflag nomemo +pvp_n_6-2.gat mapflag nomemo +pvp_n_6-3.gat mapflag nomemo +pvp_n_6-4.gat mapflag nomemo +pvp_n_6-5.gat mapflag nomemo +pvp_n_7-1.gat mapflag nomemo +pvp_n_7-2.gat mapflag nomemo +pvp_n_7-3.gat mapflag nomemo +pvp_n_7-4.gat mapflag nomemo +pvp_n_7-5.gat mapflag nomemo +pvp_n_8-1.gat mapflag nomemo +pvp_n_8-2.gat mapflag nomemo +pvp_n_8-3.gat mapflag nomemo +pvp_n_8-4.gat mapflag nomemo +pvp_n_8-5.gat mapflag nomemo +pvp_2vs2.gat mapflag nomemo + +pvp_y_1-1.gat mapflag noteleport +pvp_y_1-2.gat mapflag noteleport +pvp_y_1-3.gat mapflag noteleport +pvp_y_1-4.gat mapflag noteleport +pvp_y_1-5.gat mapflag noteleport +pvp_y_2-1.gat mapflag noteleport +pvp_y_2-2.gat mapflag noteleport +pvp_y_2-3.gat mapflag noteleport +pvp_y_2-4.gat mapflag noteleport +pvp_y_2-5.gat mapflag noteleport +pvp_y_3-1.gat mapflag noteleport +pvp_y_3-2.gat mapflag noteleport +pvp_y_3-3.gat mapflag noteleport +pvp_y_3-4.gat mapflag noteleport +pvp_y_3-5.gat mapflag noteleport +pvp_y_4-1.gat mapflag noteleport +pvp_y_4-2.gat mapflag noteleport +pvp_y_4-3.gat mapflag noteleport +pvp_y_4-4.gat mapflag noteleport +pvp_y_4-5.gat mapflag noteleport +pvp_y_5-1.gat mapflag noteleport +pvp_y_5-2.gat mapflag noteleport +pvp_y_5-3.gat mapflag noteleport +pvp_y_5-4.gat mapflag noteleport +pvp_y_5-5.gat mapflag noteleport +pvp_y_6-1.gat mapflag noteleport +pvp_y_6-2.gat mapflag noteleport +pvp_y_6-3.gat mapflag noteleport +pvp_y_6-4.gat mapflag noteleport +pvp_y_6-5.gat mapflag noteleport +pvp_y_7-1.gat mapflag noteleport +pvp_y_7-2.gat mapflag noteleport +pvp_y_7-3.gat mapflag noteleport +pvp_y_7-4.gat mapflag noteleport +pvp_y_7-5.gat mapflag noteleport +pvp_y_8-1.gat mapflag noteleport +pvp_y_8-2.gat mapflag noteleport +pvp_y_8-3.gat mapflag noteleport +pvp_y_8-4.gat mapflag noteleport +pvp_y_8-5.gat mapflag noteleport +pvp_n_1-1.gat mapflag noteleport +pvp_n_1-2.gat mapflag noteleport +pvp_n_1-3.gat mapflag noteleport +pvp_n_1-4.gat mapflag noteleport +pvp_n_1-5.gat mapflag noteleport +pvp_n_2-1.gat mapflag noteleport +pvp_n_2-2.gat mapflag noteleport +pvp_n_2-3.gat mapflag noteleport +pvp_n_2-4.gat mapflag noteleport +pvp_n_2-5.gat mapflag noteleport +pvp_n_3-1.gat mapflag noteleport +pvp_n_3-2.gat mapflag noteleport +pvp_n_3-3.gat mapflag noteleport +pvp_n_3-4.gat mapflag noteleport +pvp_n_3-5.gat mapflag noteleport +pvp_n_4-1.gat mapflag noteleport +pvp_n_4-2.gat mapflag noteleport +pvp_n_4-3.gat mapflag noteleport +pvp_n_4-4.gat mapflag noteleport +pvp_n_4-5.gat mapflag noteleport +pvp_n_5-1.gat mapflag noteleport +pvp_n_5-2.gat mapflag noteleport +pvp_n_5-3.gat mapflag noteleport +pvp_n_5-4.gat mapflag noteleport +pvp_n_5-5.gat mapflag noteleport +pvp_n_6-1.gat mapflag noteleport +pvp_n_6-2.gat mapflag noteleport +pvp_n_6-3.gat mapflag noteleport +pvp_n_6-4.gat mapflag noteleport +pvp_n_6-5.gat mapflag noteleport +pvp_n_7-1.gat mapflag noteleport +pvp_n_7-2.gat mapflag noteleport +pvp_n_7-3.gat mapflag noteleport +pvp_n_7-4.gat mapflag noteleport +pvp_n_7-5.gat mapflag noteleport +pvp_n_8-1.gat mapflag noteleport +pvp_n_8-2.gat mapflag noteleport +pvp_n_8-3.gat mapflag noteleport +pvp_n_8-4.gat mapflag noteleport +pvp_n_8-5.gat mapflag noteleport +pvp_2vs2.gat mapflag noteleport + +pvp_y_1-1.gat mapflag nosave prt_are_in.gat,100,80 +pvp_y_1-2.gat mapflag nosave prt_are_in.gat,100,80 +pvp_y_1-3.gat mapflag nosave prt_are_in.gat,100,80 +pvp_y_1-4.gat mapflag nosave prt_are_in.gat,100,80 +pvp_y_1-5.gat mapflag nosave prt_are_in.gat,100,80 +pvp_y_2-1.gat mapflag nosave prt_are_in.gat,100,80 +pvp_y_2-2.gat mapflag nosave prt_are_in.gat,100,80 +pvp_y_2-3.gat mapflag nosave prt_are_in.gat,100,80 +pvp_y_2-4.gat mapflag nosave prt_are_in.gat,100,80 +pvp_y_2-5.gat mapflag nosave prt_are_in.gat,100,80 +pvp_y_3-1.gat mapflag nosave prt_are_in.gat,100,80 +pvp_y_3-2.gat mapflag nosave prt_are_in.gat,100,80 +pvp_y_3-3.gat mapflag nosave prt_are_in.gat,100,80 +pvp_y_3-4.gat mapflag nosave prt_are_in.gat,100,80 +pvp_y_3-5.gat mapflag nosave prt_are_in.gat,100,80 +pvp_y_4-1.gat mapflag nosave prt_are_in.gat,100,80 +pvp_y_4-2.gat mapflag nosave prt_are_in.gat,100,80 +pvp_y_4-3.gat mapflag nosave prt_are_in.gat,100,80 +pvp_y_4-4.gat mapflag nosave prt_are_in.gat,100,80 +pvp_y_4-5.gat mapflag nosave prt_are_in.gat,100,80 +pvp_y_5-1.gat mapflag nosave prt_are_in.gat,100,80 +pvp_y_5-2.gat mapflag nosave prt_are_in.gat,100,80 +pvp_y_5-3.gat mapflag nosave prt_are_in.gat,100,80 +pvp_y_5-4.gat mapflag nosave prt_are_in.gat,100,80 +pvp_y_5-5.gat mapflag nosave prt_are_in.gat,100,80 +pvp_y_6-1.gat mapflag nosave prt_are_in.gat,100,80 +pvp_y_6-2.gat mapflag nosave prt_are_in.gat,100,80 +pvp_y_6-3.gat mapflag nosave prt_are_in.gat,100,80 +pvp_y_6-4.gat mapflag nosave prt_are_in.gat,100,80 +pvp_y_6-5.gat mapflag nosave prt_are_in.gat,100,80 +pvp_y_7-1.gat mapflag nosave prt_are_in.gat,100,80 +pvp_y_7-2.gat mapflag nosave prt_are_in.gat,100,80 +pvp_y_7-3.gat mapflag nosave prt_are_in.gat,100,80 +pvp_y_7-4.gat mapflag nosave prt_are_in.gat,100,80 +pvp_y_7-5.gat mapflag nosave prt_are_in.gat,100,80 +pvp_y_8-1.gat mapflag nosave prt_are_in.gat,100,80 +pvp_y_8-2.gat mapflag nosave prt_are_in.gat,100,80 +pvp_y_8-3.gat mapflag nosave prt_are_in.gat,100,80 +pvp_y_8-4.gat mapflag nosave prt_are_in.gat,100,80 +pvp_y_8-5.gat mapflag nosave prt_are_in.gat,100,80 +pvp_n_1-1.gat mapflag nosave prt_are_in.gat,100,80 +pvp_n_1-2.gat mapflag nosave prt_are_in.gat,100,80 +pvp_n_1-3.gat mapflag nosave prt_are_in.gat,100,80 +pvp_n_1-4.gat mapflag nosave prt_are_in.gat,100,80 +pvp_n_1-5.gat mapflag nosave prt_are_in.gat,100,80 +pvp_n_2-1.gat mapflag nosave prt_are_in.gat,100,80 +pvp_n_2-2.gat mapflag nosave prt_are_in.gat,100,80 +pvp_n_2-3.gat mapflag nosave prt_are_in.gat,100,80 +pvp_n_2-4.gat mapflag nosave prt_are_in.gat,100,80 +pvp_n_2-5.gat mapflag nosave prt_are_in.gat,100,80 +pvp_n_3-1.gat mapflag nosave prt_are_in.gat,100,80 +pvp_n_3-2.gat mapflag nosave prt_are_in.gat,100,80 +pvp_n_3-3.gat mapflag nosave prt_are_in.gat,100,80 +pvp_n_3-4.gat mapflag nosave prt_are_in.gat,100,80 +pvp_n_3-5.gat mapflag nosave prt_are_in.gat,100,80 +pvp_n_4-1.gat mapflag nosave prt_are_in.gat,100,80 +pvp_n_4-2.gat mapflag nosave prt_are_in.gat,100,80 +pvp_n_4-3.gat mapflag nosave prt_are_in.gat,100,80 +pvp_n_4-4.gat mapflag nosave prt_are_in.gat,100,80 +pvp_n_4-5.gat mapflag nosave prt_are_in.gat,100,80 +pvp_n_5-1.gat mapflag nosave prt_are_in.gat,100,80 +pvp_n_5-2.gat mapflag nosave prt_are_in.gat,100,80 +pvp_n_5-3.gat mapflag nosave prt_are_in.gat,100,80 +pvp_n_5-4.gat mapflag nosave prt_are_in.gat,100,80 +pvp_n_5-5.gat mapflag nosave prt_are_in.gat,100,80 +pvp_n_6-1.gat mapflag nosave prt_are_in.gat,100,80 +pvp_n_6-2.gat mapflag nosave prt_are_in.gat,100,80 +pvp_n_6-3.gat mapflag nosave prt_are_in.gat,100,80 +pvp_n_6-4.gat mapflag nosave prt_are_in.gat,100,80 +pvp_n_6-5.gat mapflag nosave prt_are_in.gat,100,80 +pvp_n_7-1.gat mapflag nosave prt_are_in.gat,100,80 +pvp_n_7-2.gat mapflag nosave prt_are_in.gat,100,80 +pvp_n_7-3.gat mapflag nosave prt_are_in.gat,100,80 +pvp_n_7-4.gat mapflag nosave prt_are_in.gat,100,80 +pvp_n_7-5.gat mapflag nosave prt_are_in.gat,100,80 +pvp_n_8-1.gat mapflag nosave prt_are_in.gat,100,80 +pvp_n_8-2.gat mapflag nosave prt_are_in.gat,100,80 +pvp_n_8-3.gat mapflag nosave prt_are_in.gat,100,80 +pvp_n_8-4.gat mapflag nosave prt_are_in.gat,100,80 +pvp_n_8-5.gat mapflag nosave prt_are_in.gat,100,80 +pvp_2vs2.gat mapflag nosave prt_are_in.gat,100,80 diff --git a/npc/other/platinum_skills.txt b/npc/other/platinum_skills.txt index cd3e06687..765982fe3 100644 --- a/npc/other/platinum_skills.txt +++ b/npc/other/platinum_skills.txt @@ -1,110 +1,110 @@ -//===== eAthena Script ======================================================================
-//= Platinum Skills NPC
-//===== By: =================================================================================
-//= Keichii and edited by DarkChild
-//===== Current Version: ====================================================================
-//= 2.0
-//===== Compatible With: ====================================================================
-//= Any eAthena Version
-//===== Description: ========================================================================
-//= Single NPC that assigns quests skills for all classes.
-//===== Additional Comments: ================================================================
-//= Added advanced classes by ShadowLady.
-//===========================================================================================
-prontera.gat,128,200,6 script Platinum Skill NPC 94,{
-mes "[Platinum Skill NPC]";
-mes "I can give you the special skills available to your job. Would you like these skills now?";
-next;
-menu "Yes",Lgetskills,"No",Lnogetskills;
-
-Lgetskills:
-if ((Class==Job_Novice) || (Class==4001)) goto Lskillsnovice;
-if ((Class==Job_Swordman) || (Class==7) || (Class==Job_Knight2) || (Class==14)|| (Class==Job_Crusader2) || (Class==4002) || (Class==4008) || (Class==Job_Lord_Knight2) || (Class==4015) || (Class==Job_Paladin2)) goto Lskillsswordie;
-if ((Class==Job_Mage) || (Class==9) || (Class==16) || (Class==4003) || (Class==4010) || (Class==4017)) goto Lskillsmage;
-if ((Class==Job_Archer) || (Class==11) || (Class==19) || (Class==20) || (Class==4004) || (Class==4012) || (Class==4020) || (Class==4021)) goto Lskillsarcher;
-if ((Class==Job_Acolyte) || (Class==8) || (Class==15) || (Class==4005) || (Class==4009) || (Class==4016)) goto Lskillsaco;
-if ((Class==Job_Merchant) || (Class==10) || (Class==18) || (Class==4006) || (Class==4011) || (Class==4019)) goto Lskillsmerchie;
-if ((Class==Job_Thief) || (Class==12) || (Class==17) || (Class==4007) || (Class==4013) || (Class==4018)) goto Lskillsthief;
-Lskillsnovice:
-mes "[Platinum Skill NPC]";
-mes "I see that you are a Novice. I will now add the special skills available to the Novice job.";
-skill 142,1,0;
-skill 143,1,0;
-mes " ";
-mes "You now have all the special skills available to the Novice job.";
-next;
-goto LskillsEND;
-Lskillsswordie:
-mes "[Platinum Skill NPC]";
-mes "I see that you are a Swordman, Knight, Crusader, Lord Knight or Paladin. I will now add the special skills available to these jobs.";
-skill 142,1,0;
-skill 144,1,0;
-skill 145,1,0;
-skill 146,1,0;
-mes " ";
-mes "You now have all the special skills available to the these jobs.";
-next;
-goto LskillsEND;
-Lskillsmage:
-mes "[Platinum Skill NPC]";
-mes "I see that you are a Mage Class. I will now add the special skills available to these jobs.";
-skill 142,1,0;
-skill 157,1,0;
-mes " ";
-mes "You now have all the special skills available to the these jobs.";
-next;
-goto LskillsEND;
-Lskillsarcher:
-mes "[Platinum Skill NPC]";
-mes "I see that you are an Archer Class. I will now add the special skills available to these jobs.";
-skill 142,1,0;
-skill 147,1,0;
-skill 148,1,0;
-mes " ";
-mes "You now have all the special skills available to the these jobs.";
-next;
-goto LskillsEND;
-Lskillsaco:
-mes "[Platinum Skill NPC]";
-mes "I see that you are an Acolyte Class. I will now add the special skills available to these jobs.";
-skill 142,1,0;
-skill 156,1,0;
-mes " ";
-mes "You now have all the special skills available to the these jobs.";
-next;
-goto LskillsEND;
-Lskillsmerchie:
-mes "[Platinum Skill NPC]";
-mes "I see that you are a Merchant Class.I will now add the special skills available to these jobs.";
-skill 142,1,0;
-skill 153,1,0;
-skill 154,1,0;
-skill 155,1,0;
-mes " ";
-mes "You now have all the special skills available to the these jobs.";
-next;
-goto LskillsEND;
-Lskillsthief:
-mes "[Platinum Skill NPC]";
-mes "I see that you are a Thief Class. I will now add the special skills available to these jobs.";
-skill 142,1,0;
-skill 149,1,0;
-skill 150,1,0;
-skill 151,1,0;
-skill 152,1,0;
-mes " ";
-mes "You now have all the special skills available to the these jobs.";
-next;
-goto LskillsEND;
-LskillsEND:
-mes "[Platinum Skill NPC]";
-mes "Have a nice day.";
-close;
-Lnogetskills:
-mes "[Platinum Skill NPC]";
-mes "Aww, how come you dont want my special skills?";
-mes "*sob* FINE!";
-mes "Have a nice day... >.>";
-close;
-}
-
+//===== eAthena Script ====================================================================== +//= Platinum Skills NPC +//===== By: ================================================================================= +//= Keichii and edited by DarkChild +//===== Current Version: ==================================================================== +//= 2.0 +//===== Compatible With: ==================================================================== +//= Any eAthena Version +//===== Description: ======================================================================== +//= Single NPC that assigns quests skills for all classes. +//===== Additional Comments: ================================================================ +//= Added advanced classes by ShadowLady. +//=========================================================================================== +prontera.gat,128,200,6 script Platinum Skill NPC 94,{ +mes "[Platinum Skill NPC]"; +mes "I can give you the special skills available to your job. Would you like these skills now?"; +next; +menu "Yes",Lgetskills,"No",Lnogetskills; + +Lgetskills: +if ((Class==Job_Novice) || (Class==4001)) goto Lskillsnovice; +if ((Class==Job_Swordman) || (Class==7) || (Class==Job_Knight2) || (Class==14)|| (Class==Job_Crusader2) || (Class==4002) || (Class==4008) || (Class==Job_Lord_Knight2) || (Class==4015) || (Class==Job_Paladin2)) goto Lskillsswordie; +if ((Class==Job_Mage) || (Class==9) || (Class==16) || (Class==4003) || (Class==4010) || (Class==4017)) goto Lskillsmage; +if ((Class==Job_Archer) || (Class==11) || (Class==19) || (Class==20) || (Class==4004) || (Class==4012) || (Class==4020) || (Class==4021)) goto Lskillsarcher; +if ((Class==Job_Acolyte) || (Class==8) || (Class==15) || (Class==4005) || (Class==4009) || (Class==4016)) goto Lskillsaco; +if ((Class==Job_Merchant) || (Class==10) || (Class==18) || (Class==4006) || (Class==4011) || (Class==4019)) goto Lskillsmerchie; +if ((Class==Job_Thief) || (Class==12) || (Class==17) || (Class==4007) || (Class==4013) || (Class==4018)) goto Lskillsthief; +Lskillsnovice: +mes "[Platinum Skill NPC]"; +mes "I see that you are a Novice. I will now add the special skills available to the Novice job."; +skill 142,1,0; +skill 143,1,0; +mes " "; +mes "You now have all the special skills available to the Novice job."; +next; +goto LskillsEND; +Lskillsswordie: +mes "[Platinum Skill NPC]"; +mes "I see that you are a Swordman, Knight, Crusader, Lord Knight or Paladin. I will now add the special skills available to these jobs."; +skill 142,1,0; +skill 144,1,0; +skill 145,1,0; +skill 146,1,0; +mes " "; +mes "You now have all the special skills available to the these jobs."; +next; +goto LskillsEND; +Lskillsmage: +mes "[Platinum Skill NPC]"; +mes "I see that you are a Mage Class. I will now add the special skills available to these jobs."; +skill 142,1,0; +skill 157,1,0; +mes " "; +mes "You now have all the special skills available to the these jobs."; +next; +goto LskillsEND; +Lskillsarcher: +mes "[Platinum Skill NPC]"; +mes "I see that you are an Archer Class. I will now add the special skills available to these jobs."; +skill 142,1,0; +skill 147,1,0; +skill 148,1,0; +mes " "; +mes "You now have all the special skills available to the these jobs."; +next; +goto LskillsEND; +Lskillsaco: +mes "[Platinum Skill NPC]"; +mes "I see that you are an Acolyte Class. I will now add the special skills available to these jobs."; +skill 142,1,0; +skill 156,1,0; +mes " "; +mes "You now have all the special skills available to the these jobs."; +next; +goto LskillsEND; +Lskillsmerchie: +mes "[Platinum Skill NPC]"; +mes "I see that you are a Merchant Class.I will now add the special skills available to these jobs."; +skill 142,1,0; +skill 153,1,0; +skill 154,1,0; +skill 155,1,0; +mes " "; +mes "You now have all the special skills available to the these jobs."; +next; +goto LskillsEND; +Lskillsthief: +mes "[Platinum Skill NPC]"; +mes "I see that you are a Thief Class. I will now add the special skills available to these jobs."; +skill 142,1,0; +skill 149,1,0; +skill 150,1,0; +skill 151,1,0; +skill 152,1,0; +mes " "; +mes "You now have all the special skills available to the these jobs."; +next; +goto LskillsEND; +LskillsEND: +mes "[Platinum Skill NPC]"; +mes "Have a nice day."; +close; +Lnogetskills: +mes "[Platinum Skill NPC]"; +mes "Aww, how come you dont want my special skills?"; +mes "*sob* FINE!"; +mes "Have a nice day... >.>"; +close; +} + diff --git a/npc/other/pvp.txt b/npc/other/pvp.txt index 0a9542489..b4d2fe583 100644 --- a/npc/other/pvp.txt +++ b/npc/other/pvp.txt @@ -1,420 +1,420 @@ -//===== eAthena Script =======================================
-//= PvP
-//===== By: ==================================================
-//= kobra_k88
-//===== Current Version: =====================================
-//= 1.2a
-//===== Compatible With: =====================================
-//= eAthena 0.5.2 +
-//===== Description: =========================================
-//=
-//===== Additional Comments: =================================
-//= v1.1 Fixed arena names for Nightmare mode. Added room limit
-//= check.[kobra_k88]
-//= v1.2 Fixed the bug that you aways savepoint in geffen.[shadowlady]
-//= v1.2a Added PvP Narrator function. Using args for Fight
-//= Square Helpers. [kobra_k88]
-//============================================================
-
-
-//==========================================================================
-// PvP Narrators
-//==========================================================================
-
-// Alberta -----------------------------------------
-alberta_in.gat, 22, 146,4 script PvP Narrator#1 84,
-{
- callfunc "F_PvPNarr", "alberta_in.gat", 24, 143;
- end;
-}
-// Payon -------------------------------------
-payon_in01.gat,173,109,3 script PvP Narrator#2 84,
-{
- callfunc "F_PvPNarr", "payon_in01.gat", 169, 108;
- end;
-}
-// Prontera -------------------------------------
-prt_in.gat,56,140,4 script PvP Narrator#3 84,
-{
- callfunc "F_PvPNarr", "prt_in.gat", 54, 137;
- end;
-}
-// Morocc --------------------------------------
-morocc_in.gat,144,138,4 script PvP Narrator#4 84,
-{
- callfunc "F_PvPNarr", "morocc_in.gat", 141, 140;
- end;
-}
-// Geffen --------------------------------------
-geffen_in.gat, 67,63,4 script PvP Narrator#5 84,
-{
- callfunc "F_PvPNarr", "geffen_in.gat", 64, 60;
- end;
-}
-
-//******************************************************//
-// Function: PvP Narrator
-//******************************************************//
-// arg(0): mapname
-// arg(1): savepoint x cord.
-// arg(2): savepoint y cord.
-//=============================
-function script F_PvPNarr {
- mes "[PvP Narrator]";
- mes "Hello and welcome! I am in charge of explaining the PvP mode to all of those who inquire. I am the PvP Narrator!";
- M_Menu:
- next;
- menu "What is PvP?",M_0, "What are the PvP modes?",M_1, "What are the rules for PvP?",M_2, "Save position.",M_3;
-
- M_0:
- mes "[PvP Narrator]";
- mes "PvP is short for 'Player versus Player'! It is a unique play mode that allows players to duel other players!";
- next;
- mes "[PvP Narrator]";
- mes "If you're interested just speak with the ^5533FFGate Keeper'^000000. He will let you into the PvP square.";
- next;
- mes "[PvP Narrator]";
- mes "That IS, IF you have at least a base level of 31 and you have 500 zeny to pay for the enterance fee.";
- mes "Those are the requirements to participate in PvP.";
- goto M_Menu;
- M_1:
- mes "[PvP Narrator]";
- mes "There are 2 PvP modes to choose from.";
- mes "One is called ^5533FF'Yoyo'^000000 Mode and the other is called ^5533FF'Nightmare'^000000 Mode.";
- next;
- mes "[PvP Narrator]";
- mes "Yoyo mode essentially lets you play risk free. You can experience the thrill of PvP without any restrictions or penalties.";
- mes "It is recomended that you practice your skills in this mode before you move on.";
- next;
- mes "[PvP Narrator]";
- mes "Nightmare Mode is very dangerous! Please use caution when trying this mode of play.";
- mes "You will lose some of your real EXP if you are defeated. There is also the small chance that you will drop some items and equipment.";
- next;
- mes "[PvP Narrator]";
- mes "Of course if you win, the rewards can be great!! Even so you should really think twice before you attempt Nightmare Mode.";
- mes "Anyways, good luck.";
- goto M_Menu;
- M_2:
- mes "[PvP Narrator]";
- mes "Before you enter any actual PvP areana, you must first choose your level of ability based on your base level.";
- mes "You will do this in the pre-fight room. There will be a row of narrators, each one representing a set of player levels.";
- next;
- mes "[PvP Narrator]";
- mes "Speak to the narrator that represents your base level. You will then be asked to choose from five different fight maps.";
- mes "You will be able to see how many people are currently participating in any given map.";
- next;
- mes "[PvP Narrator]";
- mes "This will be represented by the 'Attendee/Total' figure in the corner of the screen. There is a limit to how many can play on a map.";
- mes "There is a hidden EXP value in PvP mode. This EXP will only apply inside of the PvP zone and not outside.";
- next;
- mes "[PvP Narrator]";
- mes "Every one will recieve a base EXP of 5 points when they first start. If you win a match your EXP with increase by 1 point.";
- mes "If you loose your EXP will drop by 5 points, so be carefull!";
- next;
- mes "[PvP Narrator]";
- mes "If you are defeated and your EXP is equal to or less than 0, you will be removed from the PvP arena.";
- mes "If your EXP is more than 0 than you may continue fighting and even get help from healers.";
- next;
- mes "[PvP Narrator]";
- mes "The fighting commands inside of PvP are the same as outside. Just remember that you won't be able to save inside a PvP arena.";
- next;
- mes "[PvP Narrator]";
- mes "Remember these rules well as they can help to ensure your victory.";
- goto M_Menu;
- M_3:
- savepoint getarg(0), getarg(1), getarg(2);
- mes "[PvP Narrator]";
- mes "Your position has been saved.";
- close;
-}
-
-
-//==========================================================================
-// Gate Keepers
-//==========================================================================
-
-// Alberta -----------------------------------
-alberta_in.gat, 26,146,4 script Gate Keeper#1::GateKeep 83,
-{
- mes "[Gate Keeper]";
- mes "Hi. I'm glad to be of service. I will open the PvP fight square for you!";
- mes "If you have any questions about the PvP modes or rules, please ask the Narrator.....";
- next;
- menu "^5533FF'PvP Yoyo Mode'^000000 Fight Square.",M_0,
- "^FF5533'PvP Nightmare Mode'^000000 Fight Square.",M_1,
- "^5533FF'PvP Duel (Fighting) Mode'^000000 Combat Square.",M_2, "End Conversation.",M_End;
- M_0:
- set @mode$, "Yoyo";
- set @players1, 128;
- set @players2, 128;
- set @room1$, "Prontera";
- set @room2$, "Izlude";
- set @room3$, "Payon";
- set @room4$, "Alberta";
- set @room5$, "Morroc";
- callsub sF_Move;
- warp "pvp_y_room.gat", 51, 23;
- end;
- M_1:
- set @mode$, "Nightmare";
- set @players1, 64;
- set @players2, 32;
- set @room1$, "Sandwhich Arena";
- set @room2$, "Rock Arena";
- set @room3$, "Four Arena";
- set @room4$, "UnderCross Arena";
- set @room5$, "Copass Arena";
- callsub sF_Move;
- warp "pvp_n_room.gat", 51, 23;
- end;
- M_2:
-
- mes "[Gate Keeper]";
- mes "To enter the Duel (Fighting) Mode square you must have an admission ticket. Do you have one?";
- next;
- menu "Yes I do.",-, "No I don't.",sM_1;
-
- if(countitem(7029) < 1) goto sM_1;
- delitem 7029, 1;
- set @mode$, "Fighting";
- callsub sF_Move;
- warp "pvp_y_room.gat", 51, 23;
- end;
-
- sM_1:
- mes "[Gate Keeper]";
- mes "Eh? You don't have one? I'm sorry but this fight square is only for people who have admission or viewing tickets.";
- mes "You cannot come in without one.";
- close;
- M_End:
- mes "[Gate Keeper]";
- mes "In this war between Monsters and Humans this competition between people, PvP, encourages all of us to become stronger.";
- mes "Come again anytime. We welcome your challenge!";
- close;
-
-sF_Move:
- mes "[Gate Keeper]";
- mes "The admission fee is 500 Zeny. Do you want to move to the "+@mode$+" fight square?";
- next;
- menu "Yes",-, "No",M_End;
-
- if(BaseLevel < 31) goto sL_LowLvl;
- if(Zeny < 500) goto sL_NdZeny;
- set Zeny, Zeny - 500;
- mes "[Gate Keeper]";
- mes "Prepare to be warped to the arena.....";
- next;
- return;
-
- sL_LowLvl:
- mes "[Gate Keeper]";
- mes "In order to participate in PvP you must have a base level of at least ^FF4444'31'^000000.";
- close;
- sL_NdZeny:
- mes "[Gate Keeper]";
- mes "As I stated, the admission fee is ^FF4444'500'^000000 Zeny. You seem to be short on Zeny.";
- close;
-}
-
-// Geffen --------------------------------------------
-geffen_in.gat, 63,63,4 duplicate(GateKeep) Gate Keeper#2 83
-// Morroc----------------------------------------------
-morocc_in.gat, 144,142,4 duplicate(GateKeep) Gate Keeper#3 83
-// Payon ----------------------------------------------
-payon_in01.gat,175,106,3 duplicate(GateKeep) Gate Keeper#4 83
-// Prontera -------------------------------------------
-prt_in.gat,52,140,4 duplicate(GateKeep) Gate Keeper#5 83
-
-
-
-//==========================================================================//
-// PvP Yoyo Mode Fight Square Helpers
-//==========================================================================//
-
-// LV31 ~ 40 ---------------------------------
-pvp_y_room.gat,30,85,4 script Fight Square Helper::YHelper1 105,{
- callfunc "F_PvPRoom", "y_1", 31, 40;
-OnInit:
- waitingroom "LV31 ~ LV40",0;
- end;
-}
-
-// LV41 ~ 50 --------------------------------
-pvp_y_room.gat,38,85,4 script Fight Square Helper::YHelper2 105,{
- callfunc "F_PvPRoom", "y_2", 41, 50;
-OnInit:
- waitingroom "LV41 ~ LV50",0;
- end;
-}
-
-// LV51 ~ 60 ---------------------------------
-pvp_y_room.gat,46,85,4 script Fight Square Helper::YHelper3 105,{
- callfunc "F_PvPRoom", "y_3", 51, 60;
-OnInit:
- waitingroom "LV51 ~ LV60", 0;
- end;
-}
-
-// LV61 ~ 70 ------------------------------------
-pvp_y_room.gat,54,85,4 script Fight Square Helper::YHelper4 105,{
- callfunc "F_PvPRoom", "y_4", 61, 70;
-OnInit:
- waitingroom "LV61 ~ LV70", 0;
- end;
-}
-
-// LV71 ~ 80 ------------------------------------
-pvp_y_room.gat,62,85,4 script Fight Square Helper::YHelper5 105,{
- callfunc "F_PvPRoom", "y_5", 71, 80;
-OnInit:
- waitingroom "LV71 ~ LV80", 0;
- end;
-}
-
-// LV81 ~ 90 --------------------------------------
-pvp_y_room.gat,70,85,4 script Fight Square Helper::YHelper6 105,{
- callfunc "F_PvPRoom", "y_6", 81, 90;
-OnInit:
- waitingroom "LV81 ~ LV90", 0;
- end;
-}
-
-// LV91 ~ --------------------------------------------
-pvp_y_room.gat,78,85,4 script Fight Square Helper::YHelper7 105,{
- callfunc "F_PvPRoom", "y_7", 91, 255;
-OnInit:
- waitingroom "LV91 ~ ", 0;
- end;
-}
-
-// No Limit -----------------------------------------
-pvp_y_room.gat,86,85,4 script Fight Square Helper::YHelper8 105,{
- callfunc "F_PvPRoom", "y_8", 0, 255;
-OnInit:
- waitingroom "No Limit", 0;
- end;
-}
-
-
-//==========================================================================//
-// PvP Nightmare Mode Fight Square Helpers
-//==========================================================================//
-// LV31 ~ 40 -------------------------------------
-pvp_n_room.gat,30,85,4 script Fight Square Helper#N1 105,{
- callfunc "F_PvPRoom", "n_1", 31, 40;
-OnInit:
- waitingroom "LV31 ~ LV40",0;
- end;
-}
-
-// LV41 ~ 50 --------------------------------------
-pvp_n_room.gat,38,85,4 script Fight Square Helper#N2 105,{
- callfunc "F_PvPRoom", "n_2", 41, 50;
-OnInit:
- waitingroom "LV41 ~ LV50",0;
- end;
-}
-
-// LV51 ~ 60 -------------------------------------
-pvp_n_room.gat,46,85,4 script Fight Square Helper#N3 105,{
- callfunc "F_PvPRoom", "n_3", 51, 60;
-OnInit:
- waitingroom "LV51 ~ LV60", 0;
- end;
-}
-
-// LV61 ~ 70 ------------------------------------
-pvp_n_room.gat,54,85,4 script Fight Square Helper#N4 105,{
- callfunc "F_PvPRoom", "n_4", 61, 70;
-OnInit:
- waitingroom "LV61 ~ LV70", 0;
- end;
-}
-
-// LV71 ~ 80 -----------------------------------
-pvp_n_room.gat,62,85,4 script Fight Square Helper#N5 105,{
- callfunc "F_PvPRoom", "n_5", 71, 80;
-OnInit:
- waitingroom "LV71 ~ LV80", 0;
- end;
-}
-
-// LV81 ~ 90 ------------------------------------
-pvp_n_room.gat,70,85,4 script Fight Square Helper#N6 105,{
- callfunc "F_PvPRoom", "n_6", 81, 90;
-OnInit:
- waitingroom "LV81 ~ LV90", 0;
- end;
-}
-
-// LV91 ~ ---------------------------------------
-pvp_n_room.gat,78,85,4 script Fight Square Helper#N7 105,{
- callfunc "F_PvPRoom", "n_7", 91, 255;
-OnInit:
- waitingroom "LV91 ~ ", 0;
- end;
-}
-
-// No Limit ----------------------------------
-pvp_n_room.gat,86,85,4 script Fight Square Helper#N8 105,{
- callfunc "F_PvPRoom", "n_8", 0, 255;
-OnInit:
- waitingroom "No Limit", 0;
- end;
-}
-
-
-//***************************************************************//
-// Function: PvP Fight Square Helper
-//***************************************************************//
-// arg(0): pvp room name
-// arg(1): minimum base lvl to enter arena
-// arg(2): maximum base lvl allowed to enter arena
-//===============================================
-function script F_PvPRoom {
-
- mes "[Fight Square Helper]";
- if(BaseLevel < getarg(1)) goto L_LowLvl;
- if(BaseLevel > getarg(2)) goto L_HiLvl;
- mes "Please choose an arena to fight in...";
- M_Menu:
- next;
- menu @room1$ + " [" + getmapusers("pvp_" + getarg(0) + "-1.gat") + "/" +@players1+ "]",M_Rm1,
- @room2$ + " [" + getmapusers("pvp_" + getarg(0) + "-2.gat") + "/" +@players2+ "]",M_Rm2,
- @room3$ + " [" + getmapusers("pvp_" + getarg(0) + "-3.gat") + "/" +@players2+ "]",M_Rm3,
- @room4$ + " [" + getmapusers("pvp_" + getarg(0) + "-4.gat") + "/" +@players2+ "]",M_Rm4,
- @room5$ + " [" + getmapusers("pvp_" + getarg(0) + "-5.gat") + "/" +@players2+ "]",M_Rm5, "Cancel",M_End;
- M_Rm1:
- if (getmapusers("pvp_" + getarg(0) + "-1.gat") == @players1) goto L_Full;
- warp "pvp_" + getarg(0) + "-1.gat",0,0;
- end;
- M_Rm2:
- if (getmapusers("pvp_" + getarg(0) + "-2.gat") == @players2) goto L_Full;
- warp "pvp_" + getarg(0) + "-2.gat",0,0;
- end;
- M_Rm3:
- if (getmapusers("pvp_" + getarg(0) + "-3.gat") == @players2) goto L_Full;
- warp "pvp_" + getarg(0) + "-3.gat",0,0;
- end;
- M_Rm4:
- if (getmapusers("pvp_" + getarg(0) + "-4.gat") == @players2) goto L_Full;
- warp "pvp_" + getarg(0) + "-4.gat",0,0;
- end;
- M_Rm5:
- if (getmapusers("pvp_" + getarg(0) + "-5.gat") == @players2) goto L_Full;
- warp "pvp_" + getarg(0) + "-5.gat",0,0;
- end;
- M_End:
- close;
-
- L_LowLvl:
- mes "I'm sorry but you do not meet the Base Level requirements to enter. Please try a lower level room.";
- close;
- L_HiLvl:
- mes "I'm sorry but you exceed the Base Level requirements to enter. Please try a higher level room.";
- close;
- L_Full:
- mes "[Fight Square Helper]";
- mes "I'm sorry but this arena is full. Please choose another one to participate in....";
- goto M_Menu;
-}
+//===== eAthena Script ======================================= +//= PvP +//===== By: ================================================== +//= kobra_k88 +//===== Current Version: ===================================== +//= 1.2a +//===== Compatible With: ===================================== +//= eAthena 0.5.2 + +//===== Description: ========================================= +//= +//===== Additional Comments: ================================= +//= v1.1 Fixed arena names for Nightmare mode. Added room limit +//= check.[kobra_k88] +//= v1.2 Fixed the bug that you aways savepoint in geffen.[shadowlady] +//= v1.2a Added PvP Narrator function. Using args for Fight +//= Square Helpers. [kobra_k88] +//============================================================ + + +//========================================================================== +// PvP Narrators +//========================================================================== + +// Alberta ----------------------------------------- +alberta_in.gat, 22, 146,4 script PvP Narrator#1 84, +{ + callfunc "F_PvPNarr", "alberta_in.gat", 24, 143; + end; +} +// Payon ------------------------------------- +payon_in01.gat,173,109,3 script PvP Narrator#2 84, +{ + callfunc "F_PvPNarr", "payon_in01.gat", 169, 108; + end; +} +// Prontera ------------------------------------- +prt_in.gat,56,140,4 script PvP Narrator#3 84, +{ + callfunc "F_PvPNarr", "prt_in.gat", 54, 137; + end; +} +// Morocc -------------------------------------- +morocc_in.gat,144,138,4 script PvP Narrator#4 84, +{ + callfunc "F_PvPNarr", "morocc_in.gat", 141, 140; + end; +} +// Geffen -------------------------------------- +geffen_in.gat, 67,63,4 script PvP Narrator#5 84, +{ + callfunc "F_PvPNarr", "geffen_in.gat", 64, 60; + end; +} + +//******************************************************// +// Function: PvP Narrator +//******************************************************// +// arg(0): mapname +// arg(1): savepoint x cord. +// arg(2): savepoint y cord. +//============================= +function script F_PvPNarr { + mes "[PvP Narrator]"; + mes "Hello and welcome! I am in charge of explaining the PvP mode to all of those who inquire. I am the PvP Narrator!"; + M_Menu: + next; + menu "What is PvP?",M_0, "What are the PvP modes?",M_1, "What are the rules for PvP?",M_2, "Save position.",M_3; + + M_0: + mes "[PvP Narrator]"; + mes "PvP is short for 'Player versus Player'! It is a unique play mode that allows players to duel other players!"; + next; + mes "[PvP Narrator]"; + mes "If you're interested just speak with the ^5533FFGate Keeper'^000000. He will let you into the PvP square."; + next; + mes "[PvP Narrator]"; + mes "That IS, IF you have at least a base level of 31 and you have 500 zeny to pay for the enterance fee."; + mes "Those are the requirements to participate in PvP."; + goto M_Menu; + M_1: + mes "[PvP Narrator]"; + mes "There are 2 PvP modes to choose from."; + mes "One is called ^5533FF'Yoyo'^000000 Mode and the other is called ^5533FF'Nightmare'^000000 Mode."; + next; + mes "[PvP Narrator]"; + mes "Yoyo mode essentially lets you play risk free. You can experience the thrill of PvP without any restrictions or penalties."; + mes "It is recomended that you practice your skills in this mode before you move on."; + next; + mes "[PvP Narrator]"; + mes "Nightmare Mode is very dangerous! Please use caution when trying this mode of play."; + mes "You will lose some of your real EXP if you are defeated. There is also the small chance that you will drop some items and equipment."; + next; + mes "[PvP Narrator]"; + mes "Of course if you win, the rewards can be great!! Even so you should really think twice before you attempt Nightmare Mode."; + mes "Anyways, good luck."; + goto M_Menu; + M_2: + mes "[PvP Narrator]"; + mes "Before you enter any actual PvP areana, you must first choose your level of ability based on your base level."; + mes "You will do this in the pre-fight room. There will be a row of narrators, each one representing a set of player levels."; + next; + mes "[PvP Narrator]"; + mes "Speak to the narrator that represents your base level. You will then be asked to choose from five different fight maps."; + mes "You will be able to see how many people are currently participating in any given map."; + next; + mes "[PvP Narrator]"; + mes "This will be represented by the 'Attendee/Total' figure in the corner of the screen. There is a limit to how many can play on a map."; + mes "There is a hidden EXP value in PvP mode. This EXP will only apply inside of the PvP zone and not outside."; + next; + mes "[PvP Narrator]"; + mes "Every one will recieve a base EXP of 5 points when they first start. If you win a match your EXP with increase by 1 point."; + mes "If you loose your EXP will drop by 5 points, so be carefull!"; + next; + mes "[PvP Narrator]"; + mes "If you are defeated and your EXP is equal to or less than 0, you will be removed from the PvP arena."; + mes "If your EXP is more than 0 than you may continue fighting and even get help from healers."; + next; + mes "[PvP Narrator]"; + mes "The fighting commands inside of PvP are the same as outside. Just remember that you won't be able to save inside a PvP arena."; + next; + mes "[PvP Narrator]"; + mes "Remember these rules well as they can help to ensure your victory."; + goto M_Menu; + M_3: + savepoint getarg(0), getarg(1), getarg(2); + mes "[PvP Narrator]"; + mes "Your position has been saved."; + close; +} + + +//========================================================================== +// Gate Keepers +//========================================================================== + +// Alberta ----------------------------------- +alberta_in.gat, 26,146,4 script Gate Keeper#1::GateKeep 83, +{ + mes "[Gate Keeper]"; + mes "Hi. I'm glad to be of service. I will open the PvP fight square for you!"; + mes "If you have any questions about the PvP modes or rules, please ask the Narrator....."; + next; + menu "^5533FF'PvP Yoyo Mode'^000000 Fight Square.",M_0, + "^FF5533'PvP Nightmare Mode'^000000 Fight Square.",M_1, + "^5533FF'PvP Duel (Fighting) Mode'^000000 Combat Square.",M_2, "End Conversation.",M_End; + M_0: + set @mode$, "Yoyo"; + set @players1, 128; + set @players2, 128; + set @room1$, "Prontera"; + set @room2$, "Izlude"; + set @room3$, "Payon"; + set @room4$, "Alberta"; + set @room5$, "Morroc"; + callsub sF_Move; + warp "pvp_y_room.gat", 51, 23; + end; + M_1: + set @mode$, "Nightmare"; + set @players1, 64; + set @players2, 32; + set @room1$, "Sandwhich Arena"; + set @room2$, "Rock Arena"; + set @room3$, "Four Arena"; + set @room4$, "UnderCross Arena"; + set @room5$, "Copass Arena"; + callsub sF_Move; + warp "pvp_n_room.gat", 51, 23; + end; + M_2: + + mes "[Gate Keeper]"; + mes "To enter the Duel (Fighting) Mode square you must have an admission ticket. Do you have one?"; + next; + menu "Yes I do.",-, "No I don't.",sM_1; + + if(countitem(7029) < 1) goto sM_1; + delitem 7029, 1; + set @mode$, "Fighting"; + callsub sF_Move; + warp "pvp_y_room.gat", 51, 23; + end; + + sM_1: + mes "[Gate Keeper]"; + mes "Eh? You don't have one? I'm sorry but this fight square is only for people who have admission or viewing tickets."; + mes "You cannot come in without one."; + close; + M_End: + mes "[Gate Keeper]"; + mes "In this war between Monsters and Humans this competition between people, PvP, encourages all of us to become stronger."; + mes "Come again anytime. We welcome your challenge!"; + close; + +sF_Move: + mes "[Gate Keeper]"; + mes "The admission fee is 500 Zeny. Do you want to move to the "+@mode$+" fight square?"; + next; + menu "Yes",-, "No",M_End; + + if(BaseLevel < 31) goto sL_LowLvl; + if(Zeny < 500) goto sL_NdZeny; + set Zeny, Zeny - 500; + mes "[Gate Keeper]"; + mes "Prepare to be warped to the arena....."; + next; + return; + + sL_LowLvl: + mes "[Gate Keeper]"; + mes "In order to participate in PvP you must have a base level of at least ^FF4444'31'^000000."; + close; + sL_NdZeny: + mes "[Gate Keeper]"; + mes "As I stated, the admission fee is ^FF4444'500'^000000 Zeny. You seem to be short on Zeny."; + close; +} + +// Geffen -------------------------------------------- +geffen_in.gat, 63,63,4 duplicate(GateKeep) Gate Keeper#2 83 +// Morroc---------------------------------------------- +morocc_in.gat, 144,142,4 duplicate(GateKeep) Gate Keeper#3 83 +// Payon ---------------------------------------------- +payon_in01.gat,175,106,3 duplicate(GateKeep) Gate Keeper#4 83 +// Prontera ------------------------------------------- +prt_in.gat,52,140,4 duplicate(GateKeep) Gate Keeper#5 83 + + + +//==========================================================================// +// PvP Yoyo Mode Fight Square Helpers +//==========================================================================// + +// LV31 ~ 40 --------------------------------- +pvp_y_room.gat,30,85,4 script Fight Square Helper::YHelper1 105,{ + callfunc "F_PvPRoom", "y_1", 31, 40; +OnInit: + waitingroom "LV31 ~ LV40",0; + end; +} + +// LV41 ~ 50 -------------------------------- +pvp_y_room.gat,38,85,4 script Fight Square Helper::YHelper2 105,{ + callfunc "F_PvPRoom", "y_2", 41, 50; +OnInit: + waitingroom "LV41 ~ LV50",0; + end; +} + +// LV51 ~ 60 --------------------------------- +pvp_y_room.gat,46,85,4 script Fight Square Helper::YHelper3 105,{ + callfunc "F_PvPRoom", "y_3", 51, 60; +OnInit: + waitingroom "LV51 ~ LV60", 0; + end; +} + +// LV61 ~ 70 ------------------------------------ +pvp_y_room.gat,54,85,4 script Fight Square Helper::YHelper4 105,{ + callfunc "F_PvPRoom", "y_4", 61, 70; +OnInit: + waitingroom "LV61 ~ LV70", 0; + end; +} + +// LV71 ~ 80 ------------------------------------ +pvp_y_room.gat,62,85,4 script Fight Square Helper::YHelper5 105,{ + callfunc "F_PvPRoom", "y_5", 71, 80; +OnInit: + waitingroom "LV71 ~ LV80", 0; + end; +} + +// LV81 ~ 90 -------------------------------------- +pvp_y_room.gat,70,85,4 script Fight Square Helper::YHelper6 105,{ + callfunc "F_PvPRoom", "y_6", 81, 90; +OnInit: + waitingroom "LV81 ~ LV90", 0; + end; +} + +// LV91 ~ -------------------------------------------- +pvp_y_room.gat,78,85,4 script Fight Square Helper::YHelper7 105,{ + callfunc "F_PvPRoom", "y_7", 91, 255; +OnInit: + waitingroom "LV91 ~ ", 0; + end; +} + +// No Limit ----------------------------------------- +pvp_y_room.gat,86,85,4 script Fight Square Helper::YHelper8 105,{ + callfunc "F_PvPRoom", "y_8", 0, 255; +OnInit: + waitingroom "No Limit", 0; + end; +} + + +//==========================================================================// +// PvP Nightmare Mode Fight Square Helpers +//==========================================================================// +// LV31 ~ 40 ------------------------------------- +pvp_n_room.gat,30,85,4 script Fight Square Helper#N1 105,{ + callfunc "F_PvPRoom", "n_1", 31, 40; +OnInit: + waitingroom "LV31 ~ LV40",0; + end; +} + +// LV41 ~ 50 -------------------------------------- +pvp_n_room.gat,38,85,4 script Fight Square Helper#N2 105,{ + callfunc "F_PvPRoom", "n_2", 41, 50; +OnInit: + waitingroom "LV41 ~ LV50",0; + end; +} + +// LV51 ~ 60 ------------------------------------- +pvp_n_room.gat,46,85,4 script Fight Square Helper#N3 105,{ + callfunc "F_PvPRoom", "n_3", 51, 60; +OnInit: + waitingroom "LV51 ~ LV60", 0; + end; +} + +// LV61 ~ 70 ------------------------------------ +pvp_n_room.gat,54,85,4 script Fight Square Helper#N4 105,{ + callfunc "F_PvPRoom", "n_4", 61, 70; +OnInit: + waitingroom "LV61 ~ LV70", 0; + end; +} + +// LV71 ~ 80 ----------------------------------- +pvp_n_room.gat,62,85,4 script Fight Square Helper#N5 105,{ + callfunc "F_PvPRoom", "n_5", 71, 80; +OnInit: + waitingroom "LV71 ~ LV80", 0; + end; +} + +// LV81 ~ 90 ------------------------------------ +pvp_n_room.gat,70,85,4 script Fight Square Helper#N6 105,{ + callfunc "F_PvPRoom", "n_6", 81, 90; +OnInit: + waitingroom "LV81 ~ LV90", 0; + end; +} + +// LV91 ~ --------------------------------------- +pvp_n_room.gat,78,85,4 script Fight Square Helper#N7 105,{ + callfunc "F_PvPRoom", "n_7", 91, 255; +OnInit: + waitingroom "LV91 ~ ", 0; + end; +} + +// No Limit ---------------------------------- +pvp_n_room.gat,86,85,4 script Fight Square Helper#N8 105,{ + callfunc "F_PvPRoom", "n_8", 0, 255; +OnInit: + waitingroom "No Limit", 0; + end; +} + + +//***************************************************************// +// Function: PvP Fight Square Helper +//***************************************************************// +// arg(0): pvp room name +// arg(1): minimum base lvl to enter arena +// arg(2): maximum base lvl allowed to enter arena +//=============================================== +function script F_PvPRoom { + + mes "[Fight Square Helper]"; + if(BaseLevel < getarg(1)) goto L_LowLvl; + if(BaseLevel > getarg(2)) goto L_HiLvl; + mes "Please choose an arena to fight in..."; + M_Menu: + next; + menu @room1$ + " [" + getmapusers("pvp_" + getarg(0) + "-1.gat") + "/" +@players1+ "]",M_Rm1, + @room2$ + " [" + getmapusers("pvp_" + getarg(0) + "-2.gat") + "/" +@players2+ "]",M_Rm2, + @room3$ + " [" + getmapusers("pvp_" + getarg(0) + "-3.gat") + "/" +@players2+ "]",M_Rm3, + @room4$ + " [" + getmapusers("pvp_" + getarg(0) + "-4.gat") + "/" +@players2+ "]",M_Rm4, + @room5$ + " [" + getmapusers("pvp_" + getarg(0) + "-5.gat") + "/" +@players2+ "]",M_Rm5, "Cancel",M_End; + M_Rm1: + if (getmapusers("pvp_" + getarg(0) + "-1.gat") == @players1) goto L_Full; + warp "pvp_" + getarg(0) + "-1.gat",0,0; + end; + M_Rm2: + if (getmapusers("pvp_" + getarg(0) + "-2.gat") == @players2) goto L_Full; + warp "pvp_" + getarg(0) + "-2.gat",0,0; + end; + M_Rm3: + if (getmapusers("pvp_" + getarg(0) + "-3.gat") == @players2) goto L_Full; + warp "pvp_" + getarg(0) + "-3.gat",0,0; + end; + M_Rm4: + if (getmapusers("pvp_" + getarg(0) + "-4.gat") == @players2) goto L_Full; + warp "pvp_" + getarg(0) + "-4.gat",0,0; + end; + M_Rm5: + if (getmapusers("pvp_" + getarg(0) + "-5.gat") == @players2) goto L_Full; + warp "pvp_" + getarg(0) + "-5.gat",0,0; + end; + M_End: + close; + + L_LowLvl: + mes "I'm sorry but you do not meet the Base Level requirements to enter. Please try a lower level room."; + close; + L_HiLvl: + mes "I'm sorry but you exceed the Base Level requirements to enter. Please try a higher level room."; + close; + L_Full: + mes "[Fight Square Helper]"; + mes "I'm sorry but this arena is full. Please choose another one to participate in...."; + goto M_Menu; +} diff --git a/npc/other/tougijou.txt b/npc/other/tougijou.txt index 85d8324a5..af71ce270 100644 --- a/npc/other/tougijou.txt +++ b/npc/other/tougijou.txt @@ -1,372 +1,372 @@ -/===============================================================================
-// “¬‹ZêEVENT
-//===============================================================================
-gonryun.gat,180,117,0 script ƒ\ƒ“ ƒ€ƒh 85,{
- if (Class == 0) goto Lnovice;
- if (event_tougijou == 1) goto LStart2;
- mes "[ƒ\ƒ“ ƒ€ƒh]";
- mes "‚ ‚ `A‰´‚ðŠy‚µ‚Ü‚¹‚é“z‚ª";
- mes "—ˆ‚È‚¢‚©‚È‚ B‚ñHŒNA—Í‚ª";
- mes "‚ ‚é‚悤‚¾‚ÈB‚¿‚å‚Á‚Æ‚µ‚½‚à‚Ì‚ª";
- mes "‚ ‚é‚ñ‚¾‚ªA‚â‚Á‚Ä‚Ý‚é‚©H";
- next;
- menu "‚â‚Á‚Ä‚Ý‚é",L1,"‹»–¡‚È‚¢",L2,"–³Ž‹‚·‚é",L3;
-L1:
- mes "[ƒ\ƒ“ ƒ€ƒh]";
- mes "‚¨‚¨`A‚â‚Á‚ς艴‚Ì–Ú‚É‹¶‚¢‚Í";
- mes "‚È‚©‚Á‚½B‚±‚ê‚ðŽ‚¿ã‚°‚½‚ç";
- mes "‚¢‚¢‚±‚Æ‚ð‹³‚¦‚Ä‚â‚éB";
- mes "‚³‚ A€”õ‚µ‚ëB";
- next;
-//ƒvƒŠƒnƒ“ƒ^[730ƒAƒR690BS770(ATK‚ÅŒˆ‚Ü‚éHܶÝÈ)
- if (checkweight(7049,730)) goto Lweightok;
- mes "^0000ffƒ\ƒ“ ƒ€ƒh‚ÍA‚ ‚È‚½‚æ‚è";
- mes "‚©‚È‚è‘å‚«‚»‚¤‚È΂ðŽw‚µA";
- mes "Ž‚¿ã‚°‚Ä‚Ý‚ë‚ÆŒ¾‚Á‚½B";
- mes "‚¾‚ªAd‚·‚¬‚ÄŽ‚¿ã‚°‚ç‚ê‚È‚©‚Á‚½B^000000";
- next;
- mes "[ƒ\ƒ“ ƒ€ƒh]";
- mes "‚Ü‚¾Cs•s‘«‚¾‚ÈB";
- mes "‚à‚¤‚µCs‚µ‚Ä‚©‚ç—ˆ‚ÈB";
- close;
-Lweightok:
- getitem 7049,730;
- set event_tougijou,1;
- mes "^0000ffƒ\ƒ“ ƒ€ƒh‚ÍA‚ ‚È‚½‚æ‚è";
- mes "‚©‚È‚è‘å‚«‚»‚¤‚È΂ðŽw‚µA";
- mes "Ž‚¿ã‚°‚Ä‚Ý‚ë‚ÆŒ¾‚Á‚½B";
- mes "‚ ‚È‚½‚ÍAŒyX‚ÆÎ‚ðŽ‚¿ã‚°‚½B^000000";
- next;
- emotion 21;
- mes "[ƒ\ƒ“ ƒ€ƒh]";
- mes "‚Í‚Í‚ÁA‚â‚Á‚ς艴‚Ì–Ú‚É";
- mes "‹¶‚¢‚Í‚È‚©‚Á‚½B¡“x—ˆ‚½Žž‚ÉA";
- mes "‚¢‚¢Š‚ð‹³‚¦‚Ä‚â‚é‚æB";
- mes "‚»‚ꂶ‚á‚ ‚ÈI";
- close;
-L2:
- mes "[ƒ\ƒ“ ƒ€ƒh]";
- mes "‚»‚¤‚©B";
- mes "‚¾‚ªA‚¿‚å‚Á‚Æ—Í‚ª‚ ‚ê‚ÎA";
- mes "–Ê”’‚¢‘ÌŒ±‚ª‚Å‚«‚é‚ñ‚¾‚ª‚ËB";
- mes "‚Í‚Í‚ÁA‹C‚ªŒü‚¢‚½‚çA";
- mes "’§í‚µ‚Ä‚Ý‚ÈB";
- close;
-L3:
- emotion 32;
- mes "[ƒ\ƒ“ ƒ€ƒh]";
- mes "‚±‚ê‚ÍAl‚ðŒ©Œë‚Á‚½‚ÈB";
- mes "‚Í‚ ‚ŸccB";
- close;
-LStart2:
- mes "[ƒ\ƒ“ ƒ€ƒh]";
- mes "‚¨`A‚Ü‚½‰ï‚Á‚½‚ÈI";
- mes "–Ê”’‚¢Š‚És‚Á‚Ä‚Ý‚½‚¢‚©H";
- next;
- menu "s‚",-,"‚â‚ß‚é",Lno;
- mes "[ƒ\ƒ“ ƒ€ƒh]";
- mes "‚»‚¤‚±‚È‚‚Á‚¿‚áB";
- mes "‚ ‚Í‚Í‚Í‚Í‚ÁB";
- mes "‚»‚ꂶ‚á‚ AŠy‚µ‚ñ‚Å‚±‚¢I";
- next;
- warp "gon_test.gat",53,6;
- break;
- Lno:
- mes "[ƒ\ƒ“ ƒ€ƒh]";
- mes "‚â‚ß‚é‚Ì‚©B‚Ü‚ A";
- mes "‚»‚ê‚à‚¢‚¢‚©‚à‚ÈB";
- mes "‚»‚ꂶ‚á‚ ‚ÈI";
- close;
-Lnovice:
- mes "[ƒ\ƒ“ ƒ€ƒh]";
- mes "ƒm[ƒrƒX‚ÍAŠX‚Ös‚¯B";
- close;
-}
-//===============================================================================
-gon_test.gat,50,14,4 script TŽºŠÇ—ŽÒ 780,{
- close;
-OnInit:
- waitingroom "“ü‚Á‚Ä‚‚¾‚³‚¢!!",1,"TŽºŠÇ—ŽÒ::Onwarp";
- break;
-Onwarp:
- set @addmon,0;
- set @kengaku,0;
- warp "gon_test.gat",44,86;
- KillMonster "gon_test.gat","All";
- addtimer 120000,"gontimer120000";
- disablenpc "TŽºŠÇ—ŽÒ";
- break;
-}
-//===============================================================================
-gon_test.gat,46,14,4 script “¬‹ZêˆÄ“àˆõ 770,{
- mes "[ƒ\ƒ“ ƒtƒBƒˆƒ“]";
- mes "cc";
- mes "‚ cc‚¢‚ç‚Á‚µ‚á‚¢‚Ü‚¹B";
- mes "‚±‚¿‚ç‚Í“¬‹Zê‚Å‚·B";
- mes "‰½‚©‚²‚´‚¢‚Ü‚·‚©H";
- next;
- menu "“¬‹Zê‚Á‚ÄH",L1,"‚¨ì‚³‚ñA‚¨ŽžŠÔ‚Í‚ ‚è‚Ü‚·‚©H",L2,"ŠÏ——È‚És‚«‚½‚¢",L3,"‹A‚é",L4,"“Á‚É‚È‚¢",L5;
-L1:
- mes "[ƒ\ƒ“ ƒtƒBƒˆƒ“]";
- mes "“¬‹Zê‚ÍAŽš‚Ì‚²‚Æ‚A";
- mes "ƒ‚ƒ“ƒXƒ^[‚Æ키Š‚Å‚·B";
- next;
- mes "[ƒ\ƒ“ ƒtƒBƒˆƒ“]";
- mes "ƒŒƒxƒ‹•Ê‚̃‚ƒ“ƒXƒ^[‚ð—pˆÓ‚µ‚Ä‚ ‚è";
- mes "‚Ü‚·‚Ì‚ÅA“¬‹Zê“üŽºŒãA¢Š«ŽÒ‚É";
- mes "˜b‚µ‚©‚¯A‚¨D‚«‚ȃ‚ƒ“ƒXƒ^[‚ð";
- mes "‚¨ŒÄ‚Ñ‚‚¾‚³‚¢B";
- next;
- mes "[ƒ\ƒ“ ƒtƒBƒˆƒ“]";
- mes "‚Ü‚½A§ŒÀŽžŠÔ‚Í“üê‚©‚ç3•ª‚Å‚·B";
- mes "‚²’ˆÓ‚‚¾‚³‚¢B";
- close;
-L2:
- mes "[ƒ\ƒ“ ƒtƒBƒˆƒ“]";
- mes "‚¦cc‚Í‚¢H";
- mes "¡AŽdŽ–’†‚Å‚·‚©‚çccB";
- mes "\‚µ–󂲂´‚¢‚Ü‚¹‚ñB";
- close;
-L3:
- mes "[ƒ\ƒ“ ƒtƒBƒˆƒ“]";
- mes "‚©‚µ‚±‚Ü‚è‚Ü‚µ‚½B";
- mes "‚ ‚肪‚Æ‚¤‚²‚´‚¢‚Ü‚·B";
- mes "Šy‚µ‚¢ŽžŠÔ‚ð‚¨‰ß‚²‚µ‚‚¾‚³‚¢B";
- next;
- set @kengaku,1;
- warp "gon_test.gat",25,99;
- break;
-L4:
- mes "[ƒ\ƒ“ ƒtƒBƒˆƒ“]";
- mes "‚ ‚肪‚Æ‚¤‚²‚´‚¢‚Ü‚µ‚½B";
- mes "¥”ñAŽŸ‰ñ‚à‚²—˜—p‰º‚³‚¢B";
- next;
- warp "gonryun.gat",177,112;
- break;
-L5:
- mes "[ƒ\ƒ“ ƒtƒBƒˆƒ“]";
- mes "ccB";
- mes "‚³‚悤‚È‚çB";
- close;
-}
-//===============================================================================
-gon_test.gat,42,89,4 script ¢Š«ŽÒ 774,{
- if (@kengaku == 1) goto LError;
- if (@addmon == 1) goto Lalready;
- mes "[ƒ\ƒ“ ƒˆƒ“ƒE]";
- mes "‚¢‚ç‚Á‚µ‚á‚¢‚Ü‚¹B";
- mes "‚ǂ̃‚ƒ“ƒXƒ^[‚𢊫‚µ‚Ü‚·‚©H";
- next;
- menu "ƒOƒ‹[ƒv‚P",L1,"ƒOƒ‹[ƒv‚Q",L2,"ƒOƒ‹[ƒv‚R",L3,"ƒOƒ‹[ƒv‚S",L4,"ƒOƒ‹[ƒv‚T",L5,"ƒOƒ‹[ƒv‚U",L6,"ƒOƒ‹[ƒv‚V",L7,"ƒOƒ‹[ƒv‚W",L8,"ƒOƒ‹[ƒv‚X",L9,"ƒOƒ‹[ƒv‚P‚O",L10,"ƒOƒ‹[ƒv‚P‚P",L11;
- L1:
- menu "‚ß‚Ü‚¢",L1_1,"H’†“Å",L1_2,"•nŒŒ",L1_3,"’Ž‚³‚³‚ê",L1_4,"Ø‚è",L1_5,"‹¶Œ¢•a",L1_6;
- L1_1:
- monster "gon_test.gat",58,87,"‚ß‚Ü‚¢",1419,1,"mobend";set @addmon,1;close;
- L1_2:
- monster "gon_test.gat",58,87,"Hՠҁ",1428,1,"mobend";set @addmon,1;close;
- L1_3:
- monster "gon_test.gat",58,87,"•nŒŒ",1434,1,"mobend";set @addmon,1;close;
- L1_4:
- monster "gon_test.gat",58,87,"’Ž",1430,1,"mobend";set @addmon,1;close;
- L1_5:
- monster "gon_test.gat",58,87,"Ø‚è",1457,1,"mobend";set @addmon,1;close;
- L1_6:
- monster "gon_test.gat",58,87,"‹¶Œ¢•a",1432,1,"mobend";set @addmon,1;close;
- L2:
- menu "ƒTƒ}ƒGƒ‹",L2_1,"ƒgƒƒ‹",L2_2,"ƒJƒ“ƒQƒCƒV",L2_3,"ƒuƒ‰ƒbƒNƒhƒbƒN",L2_4,"ƒƒƒE",L2_5,"ƒLƒ‡ƒEƒV",L2_6;
- L2_1:
- monster "gon_test.gat",58,87,"ƒTƒ}ƒGƒ‹",1462,1,"mobend";set @addmon,1;close;
- L2_2:
- monster "gon_test.gat",58,87,"ƒgƒƒ‹",1442,1,"mobend";set @addmon,1;close;
- L2_3:
- monster "gon_test.gat",58,87,"ƒJƒ“ƒQƒCƒV",1469,1,"mobend";set @addmon,1;close;
- L2_4:
- monster "gon_test.gat",58,87,"ƒuƒ‰ƒbƒNƒhƒbƒN",1460,1,"mobend";set @addmon,1;close;
- L2_5:
- monster "gon_test.gat",58,87,"ƒƒƒE",1425,1,"mobend";set @addmon,1;close;
- L2_6:
- monster "gon_test.gat",58,87,"ƒLƒ‡ƒEƒV",1472,1,"mobend";set @addmon,1;close;
- L3:
- menu "‘«Œ³",L3_1,"I‚Þ",L3_2,"‹ó‚Á‚Û",L3_3,"—₽‚¢",L3_4,"”M‚¢",L3_5,"•…‚é",L3_6;
- L3_1:
- monster "gon_test.gat",58,87,"‘«Œ³",1454,1,"mobend";set @addmon,1;close;
- L3_2:
- monster "gon_test.gat",58,87,"I‚Þ",1443,1,"mobend";set @addmon,1;close;
- L3_3:
- monster "gon_test.gat",58,87,"‹ó‚Á‚Û",1455,1,"mobend";set @addmon,1;close;
- L3_4:
- monster "gon_test.gat",58,87,"—₽‚¢",1426,1,"mobend";set @addmon,1;close;
- L3_5:
- monster "gon_test.gat",58,87,"”M‚¢",1436,1,"mobend";set @addmon,1;close;
- L3_6:
- monster "gon_test.gat",58,87,"•…‚é",1423,1,"mobend";set @addmon,1;close;
- L4:
- menu "ÕŽi",L4_1,"ƒ^ƒ}ƒlƒM",L4_2,"‘å•S‘«",L4_3,"‘€‚èlŒ`",L4_4,"ƒ}ƒbƒ`”„‚è‚Ì—",L4_5,"å¢",L4_6;
- L4_1:
- monster "gon_test.gat",58,87,"ÕŽi",1458,1,"mobend";set @addmon,1;close;
- L4_2:
- monster "gon_test.gat",58,87,"ƒ^ƒ}ƒlƒM",1440,1,"mobend";set @addmon,1;close;
- L4_3:
- monster "gon_test.gat",58,87,"‘å•S‘«",1429,1,"mobend";set @addmon,1;close;
- L4_4:
- monster "gon_test.gat",58,87,"‘€‚èlŒ`",1459,1,"mobend";set @addmon,1;close;
- L4_5:
- monster "gon_test.gat",58,87,"ƒ}ƒbƒ`”„‚è‚Ì—",1444,1,"mobend";set @addmon,1;close;
- L4_6:
- monster "gon_test.gat",58,87,"å¢",1422,1,"mobend";set @addmon,1;close;
- L5:
- menu "—‰Ð",L5_1,"‘§ë",L5_2,"CŽÖ",L5_3,"“Å—´",L5_4,"—³",L5_5,"‰u‹S",L5_6;
- L5_1:
- monster "gon_test.gat",58,87,"—‰Ð",1421,1,"mobend";set @addmon,1;close;
- L5_2:
- monster "gon_test.gat",58,87,"‘§ë",1481,1,"mobend";set @addmon,1;close;
- L5_3:
- monster "gon_test.gat",58,87,"CŽÖ",1424,1,"mobend";set @addmon,1;close;
- L5_4:
- monster "gon_test.gat",58,87,"“Å—´",1465,1,"mobend";set @addmon,1;close;
- L5_5:
- monster "gon_test.gat",58,87,"—³",1466,1,"mobend";set @addmon,1;close;
- L5_6:
- monster "gon_test.gat",58,87,"‰u‹S",1433,1,"mobend";set @addmon,1;close;
- L6:
- menu "àÑ",L6_1,"‚¨‚¢‚Ä‚¯Œ@",L6_2,"—‹_",L6_3,"‰…—ì",L6_4,"•t‘r_",L6_5,"”Ñj",L6_6;
- L6_1:
- monster "gon_test.gat",58,87,"àÑ",1427,1,"mobend";set @addmon,1;close;
- L6_2:
- monster "gon_test.gat",58,87,"‚¨‚¢‚Ä‚¯–x",1473,1,"mobend";set @addmon,1;close;
- L6_3:
- monster "gon_test.gat",58,87,"—‹_",1431,1,"mobend";set @addmon,1;close;
- L6_4:
- monster "gon_test.gat",58,87,"‰…—ì",1446,1,"mobend";set @addmon,1;close;
- L6_5:
- monster "gon_test.gat",58,87,"•t‘r_",1474,1,"mobend";set @addmon,1;close;
- L6_6:
- monster "gon_test.gat",58,87,"ӄj",1471,1,"mobend";set @addmon,1;close;
- L7:
- menu "ñ",L7_1,"•€",L7_2,"‘å’Æ",L7_3,"ŠZ",L7_4,"‹|",L7_5,"“S‹…",L7_6;
- L7_1:
- monster "gon_test.gat",58,87,"ñ",1450,1,"mobend";set @addmon,1;close;
- L7_2:
- monster "gon_test.gat",58,87,"•€",1439,1,"mobend";set @addmon,1;close;
- L7_3:
- monster "gon_test.gat",58,87,"‘å’Æ",1461,1,"mobend";set @addmon,1;close;
- L7_4:
- monster "gon_test.gat",58,87,"ŠZ",1467,1,"mobend";set @addmon,1;close;
- L7_5:
- monster "gon_test.gat",58,87,"‹|",1453,1,"mobend";set @addmon,1;close;
- L7_6:
- monster "gon_test.gat",58,87,"“S‹…",1479,1,"mobend";set @addmon,1;close;
- L8:
- menu "O",L8_1,"Ž•",L8_2,"”¯",L8_3,"Žè",L8_4,"‹Ø“÷",L8_5,"œ",L8_6;
- L8_1:
- monster "gon_test.gat",58,87,"O",1451,1,"mobend";set @addmon,1;close;
- L8_2:
- monster "gon_test.gat",58,87,"Ž•",1475,1,"mobend";set @addmon,1;close;
- L8_3:
- monster "gon_test.gat",58,87,"”¯",1437,1,"mobend";set @addmon,1;close;
- L8_4:
- monster "gon_test.gat",58,87,"Žè",1441,1,"mobend";set @addmon,1;close;
- L8_5:
- monster "gon_test.gat",58,87,"‹Ø“÷",1476,1,"mobend";set @addmon,1;close;
- L8_6:
- monster "gon_test.gat",58,87,"œ",1435,1,"mobend";set @addmon,1;close;
- L9:
- menu "‹…",L9_1,"‹¾",L9_2,"–{",L9_3,"Žè‘Ü",L9_4,"Š“",L9_5,"•ž",L9_6;
- L9_1:
- monster "gon_test.gat",58,87,"‹…",1477,1,"mobend";set @addmon,1;close;
- L9_2:
- monster "gon_test.gat",58,87,"‹¾",1448,1,"mobend";set @addmon,1;close;
- L9_3:
- monster "gon_test.gat",58,87,"–{",1478,1,"mobend";set @addmon,1;close;
- L9_4:
- monster "gon_test.gat",58,87,"Žè‘Ü",1489,1,"mobend";set @addmon,1;close;
- L9_5:
- monster "gon_test.gat",58,87,"Š“",1488,1,"mobend";set @addmon,1;close;
- L9_6:
- monster "gon_test.gat",58,87,"•ž",1438,1,"mobend";set @addmon,1;close;
- L10:
- menu "—‰¤",L10_1,"”MŒŒ’j",L10_2,"Ž€ŒYŽ·sl",L10_3,"“Ë‘R•ÏˆÙ—³",L10_4,"‡¬b",L10_5,"ˆ«–‚",L10_6;
- L10_1:
- monster "gon_test.gat",58,87,"—‰¤",1482,1,"mobend";set @addmon,1;close;
- L10_2:
- monster "gon_test.gat",58,87,"”MŒŒ’j",1464,1,"mobend";set @addmon,1;close;
- L10_3:
- monster "gon_test.gat",58,87,"Ž€ŒYŽ·sl",1487,1,"mobend";set @addmon,1;close;
- L10_4:
- monster "gon_test.gat",58,87,"“Ë‘R•ÏˆÙ—³",1449,1,"mobend";set @addmon,1;close;
- L10_5:
- monster "gon_test.gat",58,87,"‡¬b",1456,1,"mobend";set @addmon,1;close;
- L10_6:
- monster "gon_test.gat",58,87,"ˆ«–‚",1486,1,"mobend";set @addmon,1;close;
- L11:
- menu "Žël",L11_1,"ˆÃŽEŽÒ",L11_2,"Ž˜",L11_3,"•“¹‰Æ",L11_4,"Œ•Žm",L11_5;
- L11_1:
- monster "gon_test.gat",58,87,"Žël",1447,1,"mobend";set @addmon,1;close;
- L11_2:
- monster "gon_test.gat",58,87,"ˆÃŽEŽÒ",1483,1,"mobend";set @addmon,1;close;
- L11_3:
- monster "gon_test.gat",58,87,"Ž˜",1490,1,"mobend";set @addmon,1;close;
- L11_4:
- monster "gon_test.gat",58,87,"•“¹‰Æ",1484,1,"mobend";set @addmon,1;close;
- L11_5:
- monster "gon_test.gat",58,87,"Œ•Žm",1485,1,"mobend";set @addmon,1;close;
-Lalready:
- mes "[ƒ\ƒ“ ƒˆƒ“ƒE]";
- mes "Šù‚Ƀ‚ƒ“ƒXƒ^[‚𢊫‚µ‚Ü‚µ‚½B";
- mes "1‰ñ‚Ƀ‚ƒ“ƒXƒ^[‚ð1•C‚¾‚¯";
- mes "‘¼‚̃‚ƒ“ƒXƒ^[‚𢊫‚·‚é‚È‚ç‚ÎA";
- mes "Ä“üꂵ‚Ä‚‚¾‚³‚¢B";
- close;
-LError:
- mes "[ƒ\ƒ“ ƒˆƒ“ƒE]";
- mes "³Ž®‚É\‚µž‚Ý‚ð‚µ‚Ä‚©‚ç";
- mes "‚²—ˆê‚‚¾‚³‚¢B";
- close;
-}
-//===============================================================================
-gon_test.gat,51,90,0 script gontimer120000 -1,{
- mapannounce "gon_test.gat",": Žc‚è‚P•ª‚Å‚·B",0;
- deltimer "gontimer120000";
- addtimer 60000,"gontimer180000";
- break;
-}
-gon_test.gat,50,90,0 script gontimer180000 -1,{
-Onend:
- mapannounce "gon_test.gat",": §ŒÀŽžŠÔ‚É‚È‚è‚Ü‚µ‚½B",0;
- areawarp "gon_test.gat",42,82,73,91,"gon_test.gat",44,4;
- deltimer "gontimer180000";
- enablenpc "TŽºŠÇ—ŽÒ";
- killmonster "gon_test.gat","All";
- break;
-}
-//===============================================================================
-gon_test.gat,58,87,0 script mobend -1,{
- mapannounce "gon_test.gat","¢Š«ŽÒ : ‚¨‚ß‚Å‚Æ‚¤‚²‚´‚¢‚Ü‚·I‚Ü‚½‚Ì‚²—ˆê‚ð‚¨‘Ò‚¿‚µ‚Ä‚¨‚è‚Ü‚·B",0;
- addtimer 3000,"mobend::OnReturn";
- break;
-OnReturn:
- warp "gon_test.gat",44,4;
- deltimer "mobend";
- deltimer "gontimer180000";
- deltimer "gontimer120000";
- enablenpc "TŽºŠÇ—ŽÒ";
- break;
-}
-//===============================================================================
-gon_test.gat,70,103,4 script oŒûˆÄ“àˆõ 773,{
- mes "[ƒ`ƒF ƒGƒ“ƒGƒ“]";
- mes "‹A‚è‚Ü‚·‚©H";
- next;
- menu "‹A‚é",-,"‹A‚ç‚È‚¢",Lno;
- mes "[ƒ`ƒF ƒGƒ“ƒGƒ“]";
- mes "‚ ‚肪‚Æ‚¤‚²‚´‚¢‚Ü‚µ‚½B";
- mes "‚悯‚ê‚ÎA‚Ü‚½—ˆ‚Ä‚‚¾‚³‚¢‚ËB";
- next;
- warp "gon_test.gat",44,4;
- set @kengaku,0;
- break;
- Lno:
- mes "[ƒ`ƒF ƒGƒ“ƒGƒ“]";
- mes "‚ ‚肪‚Æ‚¤‚²‚´‚¢‚Ü‚µ‚½B";
- close;
-}
+/=============================================================================== +// “¬‹ZêEVENT +//=============================================================================== +gonryun.gat,180,117,0 script ƒ\ƒ“ ƒ€ƒh 85,{ + if (Class == 0) goto Lnovice; + if (event_tougijou == 1) goto LStart2; + mes "[ƒ\ƒ“ ƒ€ƒh]"; + mes "‚ ‚ `A‰´‚ðŠy‚µ‚Ü‚¹‚é“z‚ª"; + mes "—ˆ‚È‚¢‚©‚È‚ B‚ñHŒNA—Í‚ª"; + mes "‚ ‚é‚悤‚¾‚ÈB‚¿‚å‚Á‚Æ‚µ‚½‚à‚Ì‚ª"; + mes "‚ ‚é‚ñ‚¾‚ªA‚â‚Á‚Ä‚Ý‚é‚©H"; + next; + menu "‚â‚Á‚Ä‚Ý‚é",L1,"‹»–¡‚È‚¢",L2,"–³Ž‹‚·‚é",L3; +L1: + mes "[ƒ\ƒ“ ƒ€ƒh]"; + mes "‚¨‚¨`A‚â‚Á‚ς艴‚Ì–Ú‚É‹¶‚¢‚Í"; + mes "‚È‚©‚Á‚½B‚±‚ê‚ðŽ‚¿ã‚°‚½‚ç"; + mes "‚¢‚¢‚±‚Æ‚ð‹³‚¦‚Ä‚â‚éB"; + mes "‚³‚ A€”õ‚µ‚ëB"; + next; +//ƒvƒŠƒnƒ“ƒ^[730ƒAƒR690BS770(ATK‚ÅŒˆ‚Ü‚éHܶÝÈ) + if (checkweight(7049,730)) goto Lweightok; + mes "^0000ffƒ\ƒ“ ƒ€ƒh‚ÍA‚ ‚È‚½‚æ‚è"; + mes "‚©‚È‚è‘å‚«‚»‚¤‚È΂ðŽw‚µA"; + mes "Ž‚¿ã‚°‚Ä‚Ý‚ë‚ÆŒ¾‚Á‚½B"; + mes "‚¾‚ªAd‚·‚¬‚ÄŽ‚¿ã‚°‚ç‚ê‚È‚©‚Á‚½B^000000"; + next; + mes "[ƒ\ƒ“ ƒ€ƒh]"; + mes "‚Ü‚¾Cs•s‘«‚¾‚ÈB"; + mes "‚à‚¤‚µCs‚µ‚Ä‚©‚ç—ˆ‚ÈB"; + close; +Lweightok: + getitem 7049,730; + set event_tougijou,1; + mes "^0000ffƒ\ƒ“ ƒ€ƒh‚ÍA‚ ‚È‚½‚æ‚è"; + mes "‚©‚È‚è‘å‚«‚»‚¤‚È΂ðŽw‚µA"; + mes "Ž‚¿ã‚°‚Ä‚Ý‚ë‚ÆŒ¾‚Á‚½B"; + mes "‚ ‚È‚½‚ÍAŒyX‚ÆÎ‚ðŽ‚¿ã‚°‚½B^000000"; + next; + emotion 21; + mes "[ƒ\ƒ“ ƒ€ƒh]"; + mes "‚Í‚Í‚ÁA‚â‚Á‚ς艴‚Ì–Ú‚É"; + mes "‹¶‚¢‚Í‚È‚©‚Á‚½B¡“x—ˆ‚½Žž‚ÉA"; + mes "‚¢‚¢Š‚ð‹³‚¦‚Ä‚â‚é‚æB"; + mes "‚»‚ꂶ‚á‚ ‚ÈI"; + close; +L2: + mes "[ƒ\ƒ“ ƒ€ƒh]"; + mes "‚»‚¤‚©B"; + mes "‚¾‚ªA‚¿‚å‚Á‚Æ—Í‚ª‚ ‚ê‚ÎA"; + mes "–Ê”’‚¢‘ÌŒ±‚ª‚Å‚«‚é‚ñ‚¾‚ª‚ËB"; + mes "‚Í‚Í‚ÁA‹C‚ªŒü‚¢‚½‚çA"; + mes "’§í‚µ‚Ä‚Ý‚ÈB"; + close; +L3: + emotion 32; + mes "[ƒ\ƒ“ ƒ€ƒh]"; + mes "‚±‚ê‚ÍAl‚ðŒ©Œë‚Á‚½‚ÈB"; + mes "‚Í‚ ‚ŸccB"; + close; +LStart2: + mes "[ƒ\ƒ“ ƒ€ƒh]"; + mes "‚¨`A‚Ü‚½‰ï‚Á‚½‚ÈI"; + mes "–Ê”’‚¢Š‚És‚Á‚Ä‚Ý‚½‚¢‚©H"; + next; + menu "s‚",-,"‚â‚ß‚é",Lno; + mes "[ƒ\ƒ“ ƒ€ƒh]"; + mes "‚»‚¤‚±‚È‚‚Á‚¿‚áB"; + mes "‚ ‚Í‚Í‚Í‚Í‚ÁB"; + mes "‚»‚ꂶ‚á‚ AŠy‚µ‚ñ‚Å‚±‚¢I"; + next; + warp "gon_test.gat",53,6; + break; + Lno: + mes "[ƒ\ƒ“ ƒ€ƒh]"; + mes "‚â‚ß‚é‚Ì‚©B‚Ü‚ A"; + mes "‚»‚ê‚à‚¢‚¢‚©‚à‚ÈB"; + mes "‚»‚ꂶ‚á‚ ‚ÈI"; + close; +Lnovice: + mes "[ƒ\ƒ“ ƒ€ƒh]"; + mes "ƒm[ƒrƒX‚ÍAŠX‚Ös‚¯B"; + close; +} +//=============================================================================== +gon_test.gat,50,14,4 script TŽºŠÇ—ŽÒ 780,{ + close; +OnInit: + waitingroom "“ü‚Á‚Ä‚‚¾‚³‚¢!!",1,"TŽºŠÇ—ŽÒ::Onwarp"; + break; +Onwarp: + set @addmon,0; + set @kengaku,0; + warp "gon_test.gat",44,86; + KillMonster "gon_test.gat","All"; + addtimer 120000,"gontimer120000"; + disablenpc "TŽºŠÇ—ŽÒ"; + break; +} +//=============================================================================== +gon_test.gat,46,14,4 script “¬‹ZêˆÄ“àˆõ 770,{ + mes "[ƒ\ƒ“ ƒtƒBƒˆƒ“]"; + mes "cc"; + mes "‚ cc‚¢‚ç‚Á‚µ‚á‚¢‚Ü‚¹B"; + mes "‚±‚¿‚ç‚Í“¬‹Zê‚Å‚·B"; + mes "‰½‚©‚²‚´‚¢‚Ü‚·‚©H"; + next; + menu "“¬‹Zê‚Á‚ÄH",L1,"‚¨ì‚³‚ñA‚¨ŽžŠÔ‚Í‚ ‚è‚Ü‚·‚©H",L2,"ŠÏ——È‚És‚«‚½‚¢",L3,"‹A‚é",L4,"“Á‚É‚È‚¢",L5; +L1: + mes "[ƒ\ƒ“ ƒtƒBƒˆƒ“]"; + mes "“¬‹Zê‚ÍAŽš‚Ì‚²‚Æ‚A"; + mes "ƒ‚ƒ“ƒXƒ^[‚Æ키Š‚Å‚·B"; + next; + mes "[ƒ\ƒ“ ƒtƒBƒˆƒ“]"; + mes "ƒŒƒxƒ‹•Ê‚̃‚ƒ“ƒXƒ^[‚ð—pˆÓ‚µ‚Ä‚ ‚è"; + mes "‚Ü‚·‚Ì‚ÅA“¬‹Zê“üŽºŒãA¢Š«ŽÒ‚É"; + mes "˜b‚µ‚©‚¯A‚¨D‚«‚ȃ‚ƒ“ƒXƒ^[‚ð"; + mes "‚¨ŒÄ‚Ñ‚‚¾‚³‚¢B"; + next; + mes "[ƒ\ƒ“ ƒtƒBƒˆƒ“]"; + mes "‚Ü‚½A§ŒÀŽžŠÔ‚Í“üê‚©‚ç3•ª‚Å‚·B"; + mes "‚²’ˆÓ‚‚¾‚³‚¢B"; + close; +L2: + mes "[ƒ\ƒ“ ƒtƒBƒˆƒ“]"; + mes "‚¦cc‚Í‚¢H"; + mes "¡AŽdŽ–’†‚Å‚·‚©‚çccB"; + mes "\‚µ–󂲂´‚¢‚Ü‚¹‚ñB"; + close; +L3: + mes "[ƒ\ƒ“ ƒtƒBƒˆƒ“]"; + mes "‚©‚µ‚±‚Ü‚è‚Ü‚µ‚½B"; + mes "‚ ‚肪‚Æ‚¤‚²‚´‚¢‚Ü‚·B"; + mes "Šy‚µ‚¢ŽžŠÔ‚ð‚¨‰ß‚²‚µ‚‚¾‚³‚¢B"; + next; + set @kengaku,1; + warp "gon_test.gat",25,99; + break; +L4: + mes "[ƒ\ƒ“ ƒtƒBƒˆƒ“]"; + mes "‚ ‚肪‚Æ‚¤‚²‚´‚¢‚Ü‚µ‚½B"; + mes "¥”ñAŽŸ‰ñ‚à‚²—˜—p‰º‚³‚¢B"; + next; + warp "gonryun.gat",177,112; + break; +L5: + mes "[ƒ\ƒ“ ƒtƒBƒˆƒ“]"; + mes "ccB"; + mes "‚³‚悤‚È‚çB"; + close; +} +//=============================================================================== +gon_test.gat,42,89,4 script ¢Š«ŽÒ 774,{ + if (@kengaku == 1) goto LError; + if (@addmon == 1) goto Lalready; + mes "[ƒ\ƒ“ ƒˆƒ“ƒE]"; + mes "‚¢‚ç‚Á‚µ‚á‚¢‚Ü‚¹B"; + mes "‚ǂ̃‚ƒ“ƒXƒ^[‚𢊫‚µ‚Ü‚·‚©H"; + next; + menu "ƒOƒ‹[ƒv‚P",L1,"ƒOƒ‹[ƒv‚Q",L2,"ƒOƒ‹[ƒv‚R",L3,"ƒOƒ‹[ƒv‚S",L4,"ƒOƒ‹[ƒv‚T",L5,"ƒOƒ‹[ƒv‚U",L6,"ƒOƒ‹[ƒv‚V",L7,"ƒOƒ‹[ƒv‚W",L8,"ƒOƒ‹[ƒv‚X",L9,"ƒOƒ‹[ƒv‚P‚O",L10,"ƒOƒ‹[ƒv‚P‚P",L11; + L1: + menu "‚ß‚Ü‚¢",L1_1,"H’†“Å",L1_2,"•nŒŒ",L1_3,"’Ž‚³‚³‚ê",L1_4,"Ø‚è",L1_5,"‹¶Œ¢•a",L1_6; + L1_1: + monster "gon_test.gat",58,87,"‚ß‚Ü‚¢",1419,1,"mobend";set @addmon,1;close; + L1_2: + monster "gon_test.gat",58,87,"H’†“Å",1428,1,"mobend";set @addmon,1;close; + L1_3: + monster "gon_test.gat",58,87,"•nŒŒ",1434,1,"mobend";set @addmon,1;close; + L1_4: + monster "gon_test.gat",58,87,"’Ž",1430,1,"mobend";set @addmon,1;close; + L1_5: + monster "gon_test.gat",58,87,"Ø‚è",1457,1,"mobend";set @addmon,1;close; + L1_6: + monster "gon_test.gat",58,87,"‹¶Œ¢•a",1432,1,"mobend";set @addmon,1;close; + L2: + menu "ƒTƒ}ƒGƒ‹",L2_1,"ƒgƒƒ‹",L2_2,"ƒJƒ“ƒQƒCƒV",L2_3,"ƒuƒ‰ƒbƒNƒhƒbƒN",L2_4,"ƒƒƒE",L2_5,"ƒLƒ‡ƒEƒV",L2_6; + L2_1: + monster "gon_test.gat",58,87,"ƒTƒ}ƒGƒ‹",1462,1,"mobend";set @addmon,1;close; + L2_2: + monster "gon_test.gat",58,87,"ƒgƒƒ‹",1442,1,"mobend";set @addmon,1;close; + L2_3: + monster "gon_test.gat",58,87,"ƒJƒ“ƒQƒCƒV",1469,1,"mobend";set @addmon,1;close; + L2_4: + monster "gon_test.gat",58,87,"ƒuƒ‰ƒbƒNƒhƒbƒN",1460,1,"mobend";set @addmon,1;close; + L2_5: + monster "gon_test.gat",58,87,"ƒƒƒE",1425,1,"mobend";set @addmon,1;close; + L2_6: + monster "gon_test.gat",58,87,"ƒLƒ‡ƒEƒV",1472,1,"mobend";set @addmon,1;close; + L3: + menu "‘«Œ³",L3_1,"I‚Þ",L3_2,"‹ó‚Á‚Û",L3_3,"—₽‚¢",L3_4,"”M‚¢",L3_5,"•…‚é",L3_6; + L3_1: + monster "gon_test.gat",58,87,"‘«Œ³",1454,1,"mobend";set @addmon,1;close; + L3_2: + monster "gon_test.gat",58,87,"I‚Þ",1443,1,"mobend";set @addmon,1;close; + L3_3: + monster "gon_test.gat",58,87,"‹ó‚Á‚Û",1455,1,"mobend";set @addmon,1;close; + L3_4: + monster "gon_test.gat",58,87,"—₽‚¢",1426,1,"mobend";set @addmon,1;close; + L3_5: + monster "gon_test.gat",58,87,"”M‚¢",1436,1,"mobend";set @addmon,1;close; + L3_6: + monster "gon_test.gat",58,87,"•…‚é",1423,1,"mobend";set @addmon,1;close; + L4: + menu "ÕŽi",L4_1,"ƒ^ƒ}ƒlƒM",L4_2,"‘å•S‘«",L4_3,"‘€‚èlŒ`",L4_4,"ƒ}ƒbƒ`”„‚è‚Ì—",L4_5,"å¢",L4_6; + L4_1: + monster "gon_test.gat",58,87,"ÕŽi",1458,1,"mobend";set @addmon,1;close; + L4_2: + monster "gon_test.gat",58,87,"ƒ^ƒ}ƒlƒM",1440,1,"mobend";set @addmon,1;close; + L4_3: + monster "gon_test.gat",58,87,"‘å•S‘«",1429,1,"mobend";set @addmon,1;close; + L4_4: + monster "gon_test.gat",58,87,"‘€‚èlŒ`",1459,1,"mobend";set @addmon,1;close; + L4_5: + monster "gon_test.gat",58,87,"ƒ}ƒbƒ`”„‚è‚Ì—",1444,1,"mobend";set @addmon,1;close; + L4_6: + monster "gon_test.gat",58,87,"å¢",1422,1,"mobend";set @addmon,1;close; + L5: + menu "—‰Ð",L5_1,"‘§ë",L5_2,"CŽÖ",L5_3,"“Å—´",L5_4,"—³",L5_5,"‰u‹S",L5_6; + L5_1: + monster "gon_test.gat",58,87,"—‰Ð",1421,1,"mobend";set @addmon,1;close; + L5_2: + monster "gon_test.gat",58,87,"‘§ë",1481,1,"mobend";set @addmon,1;close; + L5_3: + monster "gon_test.gat",58,87,"CŽÖ",1424,1,"mobend";set @addmon,1;close; + L5_4: + monster "gon_test.gat",58,87,"“Å—´",1465,1,"mobend";set @addmon,1;close; + L5_5: + monster "gon_test.gat",58,87,"—³",1466,1,"mobend";set @addmon,1;close; + L5_6: + monster "gon_test.gat",58,87,"‰u‹S",1433,1,"mobend";set @addmon,1;close; + L6: + menu "àÑ",L6_1,"‚¨‚¢‚Ä‚¯Œ@",L6_2,"—‹_",L6_3,"‰…—ì",L6_4,"•t‘r_",L6_5,"”Ñj",L6_6; + L6_1: + monster "gon_test.gat",58,87,"àÑ",1427,1,"mobend";set @addmon,1;close; + L6_2: + monster "gon_test.gat",58,87,"‚¨‚¢‚Ä‚¯–x",1473,1,"mobend";set @addmon,1;close; + L6_3: + monster "gon_test.gat",58,87,"—‹_",1431,1,"mobend";set @addmon,1;close; + L6_4: + monster "gon_test.gat",58,87,"‰…—ì",1446,1,"mobend";set @addmon,1;close; + L6_5: + monster "gon_test.gat",58,87,"•t‘r_",1474,1,"mobend";set @addmon,1;close; + L6_6: + monster "gon_test.gat",58,87,"”Ñj",1471,1,"mobend";set @addmon,1;close; + L7: + menu "ñ",L7_1,"•€",L7_2,"‘å’Æ",L7_3,"ŠZ",L7_4,"‹|",L7_5,"“S‹…",L7_6; + L7_1: + monster "gon_test.gat",58,87,"ñ",1450,1,"mobend";set @addmon,1;close; + L7_2: + monster "gon_test.gat",58,87,"•€",1439,1,"mobend";set @addmon,1;close; + L7_3: + monster "gon_test.gat",58,87,"‘å’Æ",1461,1,"mobend";set @addmon,1;close; + L7_4: + monster "gon_test.gat",58,87,"ŠZ",1467,1,"mobend";set @addmon,1;close; + L7_5: + monster "gon_test.gat",58,87,"‹|",1453,1,"mobend";set @addmon,1;close; + L7_6: + monster "gon_test.gat",58,87,"“S‹…",1479,1,"mobend";set @addmon,1;close; + L8: + menu "O",L8_1,"Ž•",L8_2,"”¯",L8_3,"Žè",L8_4,"‹Ø“÷",L8_5,"œ",L8_6; + L8_1: + monster "gon_test.gat",58,87,"O",1451,1,"mobend";set @addmon,1;close; + L8_2: + monster "gon_test.gat",58,87,"Ž•",1475,1,"mobend";set @addmon,1;close; + L8_3: + monster "gon_test.gat",58,87,"”¯",1437,1,"mobend";set @addmon,1;close; + L8_4: + monster "gon_test.gat",58,87,"Žè",1441,1,"mobend";set @addmon,1;close; + L8_5: + monster "gon_test.gat",58,87,"‹Ø“÷",1476,1,"mobend";set @addmon,1;close; + L8_6: + monster "gon_test.gat",58,87,"œ",1435,1,"mobend";set @addmon,1;close; + L9: + menu "‹…",L9_1,"‹¾",L9_2,"–{",L9_3,"Žè‘Ü",L9_4,"Š“",L9_5,"•ž",L9_6; + L9_1: + monster "gon_test.gat",58,87,"‹…",1477,1,"mobend";set @addmon,1;close; + L9_2: + monster "gon_test.gat",58,87,"‹¾",1448,1,"mobend";set @addmon,1;close; + L9_3: + monster "gon_test.gat",58,87,"–{",1478,1,"mobend";set @addmon,1;close; + L9_4: + monster "gon_test.gat",58,87,"Žè‘Ü",1489,1,"mobend";set @addmon,1;close; + L9_5: + monster "gon_test.gat",58,87,"Š“",1488,1,"mobend";set @addmon,1;close; + L9_6: + monster "gon_test.gat",58,87,"•ž",1438,1,"mobend";set @addmon,1;close; + L10: + menu "—‰¤",L10_1,"”MŒŒ’j",L10_2,"Ž€ŒYŽ·sl",L10_3,"“Ë‘R•ÏˆÙ—³",L10_4,"‡¬b",L10_5,"ˆ«–‚",L10_6; + L10_1: + monster "gon_test.gat",58,87,"—‰¤",1482,1,"mobend";set @addmon,1;close; + L10_2: + monster "gon_test.gat",58,87,"”MŒŒ’j",1464,1,"mobend";set @addmon,1;close; + L10_3: + monster "gon_test.gat",58,87,"Ž€ŒYŽ·sl",1487,1,"mobend";set @addmon,1;close; + L10_4: + monster "gon_test.gat",58,87,"“Ë‘R•ÏˆÙ—³",1449,1,"mobend";set @addmon,1;close; + L10_5: + monster "gon_test.gat",58,87,"‡¬b",1456,1,"mobend";set @addmon,1;close; + L10_6: + monster "gon_test.gat",58,87,"ˆ«–‚",1486,1,"mobend";set @addmon,1;close; + L11: + menu "Žël",L11_1,"ˆÃŽEŽÒ",L11_2,"Ž˜",L11_3,"•“¹‰Æ",L11_4,"Œ•Žm",L11_5; + L11_1: + monster "gon_test.gat",58,87,"Žël",1447,1,"mobend";set @addmon,1;close; + L11_2: + monster "gon_test.gat",58,87,"ˆÃŽEŽÒ",1483,1,"mobend";set @addmon,1;close; + L11_3: + monster "gon_test.gat",58,87,"Ž˜",1490,1,"mobend";set @addmon,1;close; + L11_4: + monster "gon_test.gat",58,87,"•“¹‰Æ",1484,1,"mobend";set @addmon,1;close; + L11_5: + monster "gon_test.gat",58,87,"Œ•Žm",1485,1,"mobend";set @addmon,1;close; +Lalready: + mes "[ƒ\ƒ“ ƒˆƒ“ƒE]"; + mes "Šù‚Ƀ‚ƒ“ƒXƒ^[‚𢊫‚µ‚Ü‚µ‚½B"; + mes "1‰ñ‚Ƀ‚ƒ“ƒXƒ^[‚ð1•C‚¾‚¯"; + mes "‘¼‚̃‚ƒ“ƒXƒ^[‚𢊫‚·‚é‚È‚ç‚ÎA"; + mes "Ä“üꂵ‚Ä‚‚¾‚³‚¢B"; + close; +LError: + mes "[ƒ\ƒ“ ƒˆƒ“ƒE]"; + mes "³Ž®‚É\‚µž‚Ý‚ð‚µ‚Ä‚©‚ç"; + mes "‚²—ˆê‚‚¾‚³‚¢B"; + close; +} +//=============================================================================== +gon_test.gat,51,90,0 script gontimer120000 -1,{ + mapannounce "gon_test.gat",": Žc‚è‚P•ª‚Å‚·B",0; + deltimer "gontimer120000"; + addtimer 60000,"gontimer180000"; + break; +} +gon_test.gat,50,90,0 script gontimer180000 -1,{ +Onend: + mapannounce "gon_test.gat",": §ŒÀŽžŠÔ‚É‚È‚è‚Ü‚µ‚½B",0; + areawarp "gon_test.gat",42,82,73,91,"gon_test.gat",44,4; + deltimer "gontimer180000"; + enablenpc "TŽºŠÇ—ŽÒ"; + killmonster "gon_test.gat","All"; + break; +} +//=============================================================================== +gon_test.gat,58,87,0 script mobend -1,{ + mapannounce "gon_test.gat","¢Š«ŽÒ : ‚¨‚ß‚Å‚Æ‚¤‚²‚´‚¢‚Ü‚·I‚Ü‚½‚Ì‚²—ˆê‚ð‚¨‘Ò‚¿‚µ‚Ä‚¨‚è‚Ü‚·B",0; + addtimer 3000,"mobend::OnReturn"; + break; +OnReturn: + warp "gon_test.gat",44,4; + deltimer "mobend"; + deltimer "gontimer180000"; + deltimer "gontimer120000"; + enablenpc "TŽºŠÇ—ŽÒ"; + break; +} +//=============================================================================== +gon_test.gat,70,103,4 script oŒûˆÄ“àˆõ 773,{ + mes "[ƒ`ƒF ƒGƒ“ƒGƒ“]"; + mes "‹A‚è‚Ü‚·‚©H"; + next; + menu "‹A‚é",-,"‹A‚ç‚È‚¢",Lno; + mes "[ƒ`ƒF ƒGƒ“ƒGƒ“]"; + mes "‚ ‚肪‚Æ‚¤‚²‚´‚¢‚Ü‚µ‚½B"; + mes "‚悯‚ê‚ÎA‚Ü‚½—ˆ‚Ä‚‚¾‚³‚¢‚ËB"; + next; + warp "gon_test.gat",44,4; + set @kengaku,0; + break; + Lno: + mes "[ƒ`ƒF ƒGƒ“ƒGƒ“]"; + mes "‚ ‚肪‚Æ‚¤‚²‚´‚¢‚Ü‚µ‚½B"; + close; +} diff --git a/npc/other/warper.txt b/npc/other/warper.txt index 064cd0728..933dc59ed 100644 --- a/npc/other/warper.txt +++ b/npc/other/warper.txt @@ -1,99 +1,99 @@ -//===== eAthena Script =======================================
-//= Warper Script
-//===== By: ==================================================
-//= Darkchild
-//===== Current Version: =====================================
-//= 1.3
-//===== Compatible With: =====================================
-//= Any eAthena Version;
-//===== Description: =========================================
-//= Generic warper...
-//===== Additional Comments: =================================
-//= 1.0 by Darkchild
-//= 1.1 by jabs
-//= 1.2 by Lupus (placement fixed in Amatsu)
-//= 1.3 fixed Louyang label typo, added warp and WARPRA into
-//= Nifleheim. Also sorted all names in alphabet order [Lupus]
-//= 1.4 fixed morroc warp npc overlaying kafra [Aria]
-//============================================================
-
-- script Warp NPC::warpra 115,{
- mes "[Warp NPC]";
- mes "Hello,";
- mes "I can warp you to any Town and Dungeon!";
- mes "Were do you want to go?";
- next;
- menu "Towns",stadt,"Dungeons",dungeon;
-
- stadt:
- menu "Alberta",walberta,"Aldebaran",waldebaran,"Amatsu",wamatsu,"Comodo",wcomodo,"Geffen",wgeffen,"Gonryun",wgonryun,"Izlude",wizlude,"Louyang",wlouyang,"Lutie",wxmas,"Morroc",wmorroc,"Niflheim",wniflheim,"Payon",wpayon,"Prontera",wprontera,"Umbala",wumbala,"Yuno",wyuno;
-
- dungeon:
- menu "Amatsu Dungeon",damatsu,"Anthell",dant,"Bibilan Dungeon",dbibilan,"Coal Mine (Dead Pit)",dcoal,"Culvert",dculvert,"Glast Heim",dglast,"Gonryun Dungeon",dgonryun,"Magma-Dungeon",dmagma,"Orc-Dungeon",dorc,"Payon-Dungeon",dpayon,"Pyramids",dpyramids,"Sphinx",dsphinx,"Sunken Ship",dsunken,"Turtle Dungeon",dturtle;
-
-
-//----------------Towns----------------\\
-
-walberta: warp "alberta.gat", 27, 236; close;
-waldebaran: warp "aldebaran.gat", 145, 120; close;
-wamatsu: warp "amatsu.gat", 197, 86; close;
-wcomodo: warp "comodo.gat", 188, 161; close;
-wgonryun: warp "gonryun.gat", 150, 130; close;
-wgeffen: warp "geffen.gat", 119, 66; close;
-wizlude: warp "izlude.gat", 128, 111; close;
-wlouyang: warp "louyang.gat", 210, 108; close;
-wmorroc: warp "morocc.gat", 159, 93; close;
-wniflheim: warp "niflheim.gat", 35, 161; close;
-wprontera: warp "prontera.gat", 156, 187; close;
-wpayon: warp "payon.gat", 152, 75; close;
-wumbala: warp "umbala.gat", 130, 130; close;
-wxmas: warp "xmas.gat", 148, 131; close;
-wyuno: warp "yuno.gat", 160, 168; close;
-
-//----------------Dungeons----------------\\
-
-damatsu: warp "ama_fild01.gat", 172, 324; close;
-dant: warp "moc_fild04.gat", 210, 328; close;
-dbibilan: warp "izlu2dun.gat", 106, 88; close;
-dculvert: warp "prt_fild05.gat", 273, 210; close;
-dcoal: warp "mjolnir_02.gat", 81, 359; close;
-dglast: warp "glast_01.gat", 368, 303; close;
-dgonryun: warp "gonryun.gat", 160, 195; close;
-dmagma: warp "yuno_fild03.gat", 39, 140; close;
-dorc: warp "gef_fild10.gat", 70, 332; close;
-dpayon: warp "pay_arche.gat", 43, 132; close;
-dpyramids: warp "moc_ruins.gat", 62, 162; close;
-dsphinx: warp "moc_fild19.gat", 107, 100; close;
-dsunken: warp "alb2trea.gat", 75, 98; close;
-dturtle: warp "tur_dun01.gat", 149, 238; close;
-}
-
-alb2trea.gat,73,101,4 duplicate(warpra) Warp NPC 115
-alberta.gat,31,240,4 duplicate(warpra) Warp NPC 115
-aldebaran.gat,145,118,4 duplicate(warpra) Warp NPC 115
-amatsu.gat,192,81,1 duplicate(warpra) Warp NPC 115
-ama_fild01.gat,178,325,1 duplicate(warpra) Warp NPC 115
-comodo.gat,194,158,4 duplicate(warpra) Warp NPC 115
-gef_fild10.gat,71,339,4 duplicate(warpra) Warp NPC 115
-geffen.gat,115,66,4 duplicate(warpra) Warp NPC 115
-glast_01.gat,370,308,4 duplicate(warpra) Warp NPC 115
-gonryun.gat,151,130,4 duplicate(warpra) Warp NPC 115
-gonryun.gat,164,196,4 duplicate(warpra) Warp NPC 115
-izlude.gat,131,116,4 duplicate(warpra) Warp NPC 115
-izlu2dun.gat,104,82,4 duplicate(warpra) Warp NPC 115
-louyang.gat,210,106,4 duplicate(warpra) Warp NPC 115
-mjolnir_02.gat,85,363,4 duplicate(warpra) Warp NPC 115
-moc_fild04.gat,207,331,4 duplicate(warpra) Warp NPC 115
-moc_fild19.gat,106,97,4 duplicate(warpra) Warp NPC 115
-moc_ruins.gat,64,166,4 duplicate(warpra) Warp NPC 115
-morocc.gat,156,95,4 duplicate(warpra) Warp NPC 115
-niflheim.gat,32,161,4 duplicate(warpra) Warp NPC 115
-pay_arche.gat,39,135,4 duplicate(warpra) Warp NPC 115
-payon.gat,182,110,4 duplicate(warpra) Warp NPC 115
-prontera.gat,161,192,4 duplicate(warpra) Warp NPC 115
-prt_fild05.gat,273,215,4 duplicate(warpra) Warp NPC 115
-tur_dun01.gat,148,239,4 duplicate(warpra) Warp NPC 115
-umbala.gat,132,130,4 duplicate(warpra) Warp NPC 115
-xmas_fild01.gat,115,174,4 duplicate(warpra) Warp NPC 115
-yuno.gat,137,162,4 duplicate(warpra) Warp NPC 115
-yuno_fild03.gat,37,135,4 duplicate(warpra) Warp NPC 115
+//===== eAthena Script ======================================= +//= Warper Script +//===== By: ================================================== +//= Darkchild +//===== Current Version: ===================================== +//= 1.3 +//===== Compatible With: ===================================== +//= Any eAthena Version; +//===== Description: ========================================= +//= Generic warper... +//===== Additional Comments: ================================= +//= 1.0 by Darkchild +//= 1.1 by jabs +//= 1.2 by Lupus (placement fixed in Amatsu) +//= 1.3 fixed Louyang label typo, added warp and WARPRA into +//= Nifleheim. Also sorted all names in alphabet order [Lupus] +//= 1.4 fixed morroc warp npc overlaying kafra [Aria] +//============================================================ + +- script Warp NPC::warpra 115,{ + mes "[Warp NPC]"; + mes "Hello,"; + mes "I can warp you to any Town and Dungeon!"; + mes "Were do you want to go?"; + next; + menu "Towns",stadt,"Dungeons",dungeon; + + stadt: + menu "Alberta",walberta,"Aldebaran",waldebaran,"Amatsu",wamatsu,"Comodo",wcomodo,"Geffen",wgeffen,"Gonryun",wgonryun,"Izlude",wizlude,"Louyang",wlouyang,"Lutie",wxmas,"Morroc",wmorroc,"Niflheim",wniflheim,"Payon",wpayon,"Prontera",wprontera,"Umbala",wumbala,"Yuno",wyuno; + + dungeon: + menu "Amatsu Dungeon",damatsu,"Anthell",dant,"Bibilan Dungeon",dbibilan,"Coal Mine (Dead Pit)",dcoal,"Culvert",dculvert,"Glast Heim",dglast,"Gonryun Dungeon",dgonryun,"Magma-Dungeon",dmagma,"Orc-Dungeon",dorc,"Payon-Dungeon",dpayon,"Pyramids",dpyramids,"Sphinx",dsphinx,"Sunken Ship",dsunken,"Turtle Dungeon",dturtle; + + +//----------------Towns----------------\\ + +walberta: warp "alberta.gat", 27, 236; close; +waldebaran: warp "aldebaran.gat", 145, 120; close; +wamatsu: warp "amatsu.gat", 197, 86; close; +wcomodo: warp "comodo.gat", 188, 161; close; +wgonryun: warp "gonryun.gat", 150, 130; close; +wgeffen: warp "geffen.gat", 119, 66; close; +wizlude: warp "izlude.gat", 128, 111; close; +wlouyang: warp "louyang.gat", 210, 108; close; +wmorroc: warp "morocc.gat", 159, 93; close; +wniflheim: warp "niflheim.gat", 35, 161; close; +wprontera: warp "prontera.gat", 156, 187; close; +wpayon: warp "payon.gat", 152, 75; close; +wumbala: warp "umbala.gat", 130, 130; close; +wxmas: warp "xmas.gat", 148, 131; close; +wyuno: warp "yuno.gat", 160, 168; close; + +//----------------Dungeons----------------\\ + +damatsu: warp "ama_fild01.gat", 172, 324; close; +dant: warp "moc_fild04.gat", 210, 328; close; +dbibilan: warp "izlu2dun.gat", 106, 88; close; +dculvert: warp "prt_fild05.gat", 273, 210; close; +dcoal: warp "mjolnir_02.gat", 81, 359; close; +dglast: warp "glast_01.gat", 368, 303; close; +dgonryun: warp "gonryun.gat", 160, 195; close; +dmagma: warp "yuno_fild03.gat", 39, 140; close; +dorc: warp "gef_fild10.gat", 70, 332; close; +dpayon: warp "pay_arche.gat", 43, 132; close; +dpyramids: warp "moc_ruins.gat", 62, 162; close; +dsphinx: warp "moc_fild19.gat", 107, 100; close; +dsunken: warp "alb2trea.gat", 75, 98; close; +dturtle: warp "tur_dun01.gat", 149, 238; close; +} + +alb2trea.gat,73,101,4 duplicate(warpra) Warp NPC 115 +alberta.gat,31,240,4 duplicate(warpra) Warp NPC 115 +aldebaran.gat,145,118,4 duplicate(warpra) Warp NPC 115 +amatsu.gat,192,81,1 duplicate(warpra) Warp NPC 115 +ama_fild01.gat,178,325,1 duplicate(warpra) Warp NPC 115 +comodo.gat,194,158,4 duplicate(warpra) Warp NPC 115 +gef_fild10.gat,71,339,4 duplicate(warpra) Warp NPC 115 +geffen.gat,115,66,4 duplicate(warpra) Warp NPC 115 +glast_01.gat,370,308,4 duplicate(warpra) Warp NPC 115 +gonryun.gat,151,130,4 duplicate(warpra) Warp NPC 115 +gonryun.gat,164,196,4 duplicate(warpra) Warp NPC 115 +izlude.gat,131,116,4 duplicate(warpra) Warp NPC 115 +izlu2dun.gat,104,82,4 duplicate(warpra) Warp NPC 115 +louyang.gat,210,106,4 duplicate(warpra) Warp NPC 115 +mjolnir_02.gat,85,363,4 duplicate(warpra) Warp NPC 115 +moc_fild04.gat,207,331,4 duplicate(warpra) Warp NPC 115 +moc_fild19.gat,106,97,4 duplicate(warpra) Warp NPC 115 +moc_ruins.gat,64,166,4 duplicate(warpra) Warp NPC 115 +morocc.gat,156,95,4 duplicate(warpra) Warp NPC 115 +niflheim.gat,32,161,4 duplicate(warpra) Warp NPC 115 +pay_arche.gat,39,135,4 duplicate(warpra) Warp NPC 115 +payon.gat,182,110,4 duplicate(warpra) Warp NPC 115 +prontera.gat,161,192,4 duplicate(warpra) Warp NPC 115 +prt_fild05.gat,273,215,4 duplicate(warpra) Warp NPC 115 +tur_dun01.gat,148,239,4 duplicate(warpra) Warp NPC 115 +umbala.gat,132,130,4 duplicate(warpra) Warp NPC 115 +xmas_fild01.gat,115,174,4 duplicate(warpra) Warp NPC 115 +yuno.gat,137,162,4 duplicate(warpra) Warp NPC 115 +yuno_fild03.gat,37,135,4 duplicate(warpra) Warp NPC 115 diff --git a/npc/other/warper2.txt b/npc/other/warper2.txt index 92275d551..3cd601ba1 100644 --- a/npc/other/warper2.txt +++ b/npc/other/warper2.txt @@ -1,263 +1,263 @@ -//===== eAthena Script =======================================
-//= Warp Npc With Warp To Almost Everywhere
-//===== By: ==================================================
-//= Someone(thats his name!) (1.0)
-//===== Current Version: =====================================
-//= 1.4
-//===== Compatible With: =====================================
-//= Any eAthena Version with duplicate; RO Ep6+
-//===== Description: =========================================
-//= -
-//===== Additional Comments: =================================
-//= 1.1 by Darkchild
-//= 1.2 by Darkchild
-//= 1.3 Fixed by x[tsk] Added missing code for Valkyrie + Added
-//= a warp NPC in Valkyrie it self. Checked/Added by Lupus
-//= 1.4 morocc coords overlapping fixed
-//============================================================
-
-- script Warp NPC::warpra 115,{
- mes "[Warp NPC]";
- mes "Hello, I can warp you to any Town and Dungeon! Were do you want to go?";
- next;
- menu "Towns",town,"Dungeons",dungeon;
-town:
- menu "Alberta",walberta,"Aldebaran",waldebaran,"Amatsu",wamatsu,"Comodo",wcomodo,"Gonryun",wgonryun,"Geffen",wgeffen,"Izlude",wizlude,"Lutie",wxmas,"Morroc",wmorroc,"Niflheim",wniflheim,"Payon",wpayon,"Prontera",wprontera,"Yuno",wyuno,"Umbala",wumbala,"Valkyrie",wvalk,"Louyang",wlouyang;
-dungeon:
- menu "Amatsu Dungeon",ama,"Gonryun Dungeon",gon,"Anthell",ant,"Beach Dungeon",beach,"Byalan Dungeon",byalan,"Clock Tower",clock,"Coal Mines",coal,"Culvert",culvert,"Geffen Dungeon",geffen,"Glast Heim",glast,"Hidden Dungeon",hidden,"Magma Dungeon",magma,"Orc Dungeon",orc,"Payon Dungeon",payon,"Pyramids",pyramids,"Sphinx",sphinx,"Sunken Ship",sunken,"Toy Factory",toy,"Turtle Dungeon",turtle,"Gefenia",gefenia;
-ant:
- mes "[Warp NPC]";
- mes "Please select a Level. Beware that you will be warped directly into the dungeon.";
- next;
- menu "Level 1",danthell1,"Level 2",danthell2;
-beach:
- mes "[Warp NPC]";
- mes "Please select a Level. Beware that you will be warped directly into the dungeon.";
- next;
- menu "Level 1",dbeach1,"Level 2",dbeach2,"Level 3",dbeach3;
-byalan:
- mes "[Warp NPC]";
- mes "Please select a Level. Beware that you will be warped directly into the dungeon.";
- next;
- menu "Level 1",dbyalan1,"Level 2",dbyalan2,"Level 3",dbyalan3,"Level 4",dbyalan4,"Level 5",dbyalan5;
-clock:
- mes "[Warp NPC]";
- mes "Please select a Level. Beware that you will be warped directly into the dungeon.";
- next;
- menu "Level 1",dclock1,"Level 2",dclock2,"Level 3",dclock3,"Level 4",dclock4,"Basement 1",dalde1,"Basement 2",dalde2,"Basement 3",dalde3,"Basement 4",dalde4;
-coal:
- mes "[Warp NPC]";
- mes "Please select a Level. Beware that you will be warped directly into the dungeon.";
- next;
- menu "Level 1",dcoal1,"Level 2",dcoal2,"Level 3",dcoal3;
-culvert:
- mes "[Warp NPC]";
- mes "Please select a Level. Beware that you will be warped directly into the dungeon.";
- next;
- menu "Level 1",dculvert1,"Level 2",dculvert2,"Level 3",dculvert3,"Level 4",dculvert4;
-geffen:
- mes "[Warp NPC]";
- mes "Please select a Level. Beware that you will be warped directly into the dungeon.";
- next;
- menu "Level 1",dgeffen1,"Level 2",dgeffen2,"Level 3",dgeffen3,"Level 4",dgeffen4;
-glast:
- mes "[Warp NPC]";
- mes "Please select a Level. Beware that you will be warped directly into the dungeon.";
- next;
- menu "Entrance",dglastent,"Castle 1",dglastcast1,"Castle 2",dglastcast2,"Chivalry 1",dglastchiv1,"Chivalry 2",dglastchiv2,"Churchyard",dglastyard,"Culvert 1",dglastcul1,"Culvert 2",dglastcul1,"Culvert 3",dglastcul3,"Culvert 4",dglastcul4,"St.Abbey",dglastchur,"Staircase Dungeon",dglaststep,"Underground Cave 1",dglastcave1,"Underground Cave 2",dglastcave2,"Underground Prison 1",dglastpris1,"Underground Prison 2",dglastpris2;
-hidden:
- mes "[Warp NPC]";
- mes "Please select a Level. Beware that you will be warped directly into the dungeon.";
- next;
- menu "Level 1",dhidden1,"Level 2",dhidden2,"Level 3",dhidden3;
-magma:
- mes "[Warp NPC]";
- mes "Please select a Level. Beware that you will be warped directly into the dungeon.";
- next;
- menu "Level 1",dmagma1,"Level 2",dmagma2;
-orc:
- mes "[Warp NPC]";
- mes "Please select a Level. Beware that you will be warped directly into the dungeon.";
- next;
- menu "Level 1",dorc1,"Level 2",dorc2;
-payon:
- mes "[Warp NPC]";
- mes "Please select a Level. Beware that you will be warped directly into the dungeon.";
- next;
- menu "Level 1",dpayon1,"Level 2",dpayon2,"Level 3",dpayon3,"Level 4",dpayon4,"Level 5",dpayon5;
-pyramids:
- mes "[Warp NPC]";
- mes "Please select a Level. Beware that you will be warped directly into the dungeon.";
- next;
- menu "Level 1",dpyramids1,"Level 2",dpyramids2,"Level 3",dpyramids3,"Level 4",dpyramids4,"Basement 1",dpyramidsb1,"Basement 2",dpyramidsb2;
-sphinx:
- mes "[Warp NPC]";
- mes "Please select a Level. Beware that you will be warped directly into the dungeon.";
- next;
- menu "Level 1",dsphinx1,"Level 2",dsphinx2,"Level 3",dsphinx3,"Level 4",dsphinx4,"Level 5",dsphinx5;
-sunken:
- mes "[Warp NPC]";
- mes "Please select a Level. Beware that you will be warped directly into the dungeon.";
- next;
- menu "Level 1",dsunken1,"Level 2",dsunken2;
-toy:
- mes "[Warp NPC]";
- mes "Please select a Level. Beware that you will be warped directly into the dungeon.";
- next;
- menu "Level 1",dtoy1,"Level 2",dtoy2;
-turtle:
- mes "[Warp NPC]";
- mes "Please select a Level. Beware that you will be warped directly into the dungeon.";
- next;
- menu "Entrance",dturtleent,"Level 1",dturtle1,"Level 2",dturtle2,"Level 3",dturtle3;
-ama:
- mes "[Warp NPC]";
- mes "Please select a Level. Beware that you will be warped directly into the dungeon.";
- next;
- menu "Level 1",dama1,"Level 2",dama2,"Level 3",dama3;
-gon:
- mes "[Warp NPC]";
- mes "Please select a Level. Beware that you will be warped directly into the dungeon.";
- next;
- menu "Level 1",dgon1,"Level 2",dgon2,"Level 3",dgon3;
-gefenia:
- mes "[Warp NPC]";
- mes "Please select a Level. Beware that you will be warped directly into the dungeon.";
- next;
- menu "Level 1",dgefenia1,"Level 2",dgefenia2,"Level 3",dgefenia3,"Level 4",dgefenia4;
-
-//----------------Towns----------------\\
-
-walberta: warp "alberta.gat",192,147; close;
-waldebaran: warp "aldebaran.gat",140,131; close;
-wamatsu: warp "amatsu.gat",198,84; close;
-wcomodo: warp "comodo.gat",209,143; close;
-wgonryun: warp "gonryun.gat",160,121; close;
-wgeffen: warp "geffen.gat",119,59; close;
-wizlude: warp "izlude.gat",128,114; close;
-wxmas: warp "xmas.gat",147,134; close;
-wmorroc: warp "morocc.gat",156,93; close;
-wniflheim: warp "niflheim.gat",85,154; close;
-wpayon: warp "payon.gat",152,75; close;
-wprontera: warp "prontera.gat",156,191; close;
-wyuno: warp "yuno.gat",157,51; close;
-wumbala: warp "umbala.gat",145,155; close;
-wlouyang: warp "louyang.gat",210,108; close;
-wvalk: warp "valkyrie",48,8; close;
-
-//----------------Dungeons----------------\\
-
-danthell1: warp "anthell01.gat",35,262; close;
-danthell2: warp "anthell02.gat",168,170; close;
-dbeach1: warp "beach_dun.gat",266,67; close;
-dbeach2: warp "beach_dun2.gat",255,244; close;
-dbeach3: warp "beach_dun3.gat",23,260; close;
-dbyalan1: warp "iz_dun00.gat",168,168; close;
-dbyalan2: warp "iz_dun01.gat",253,252; close;
-dbyalan3: warp "iz_dun02.gat",236,204; close;
-dbyalan4: warp "iz_dun03.gat",32,63; close;
-dbyalan5: warp "iz_dun04.gat",26,27; close;
-dalde1: warp "alde_dun01.gat",297,25; close;
-dalde2: warp "alde_dun02.gat",127,169; close;
-dalde3: warp "alde_dun03.gat",277,178; close;
-dalde4: warp "alde_dun04.gat",268,74; close;
-dclock1: warp "c_tower1.gat",199,159; close;
-dclock2: warp "c_tower2.gat",148,283; close;
-dclock3: warp "c_tower3.gat",65,147; close;
-dclock4: warp "c_tower4.gat",56,155; close;
-dcoal1: warp "mjo_dun01.gat",52,17; close;
-dcoal2: warp "mjo_dun02.gat",381,343; close;
-dcoal3: warp "mjo_dun03.gat",302,262; close;
-dculvert1: warp "prt_sewb1.gat",131,247; close;
-dculvert2: warp "prt_sewb2.gat",19,19; close;
-dculvert3: warp "prt_sewb3.gat",180,169; close;
-dculvert4: warp "prt_sewb4.gat",100,92; close;
-dgeffen1: warp "gef_dun00.gat",104,99; close;
-dgeffen2: warp "gef_dun01.gat",115,236; close;
-dgeffen3: warp "gef_dun02.gat",106,132; close;
-dgeffen4: warp "gef_dun03.gat",203,200; close;
-dglastent: warp "glast_01.gat",375,304; close;
-dglastcast1: warp "gl_cas01.gat",199,29; close;
-dglastcast2: warp "gl_cas02.gat",104,25; close;
-dglastchiv1: warp "gl_knt01.gat",150,15; close;
-dglastchiv2: warp "gl_knt02.gat",157,287; close;
-dglastyard: warp "gl_chyard.gat",147,15; close;
-dglastcul1: warp "gl_sew01.gat",258,255; close;
-dglastcul2: warp "gl_sew02.gat",108,291; close;
-dglastcul3: warp "gl_sew03.gat",171,283; close;
-dglastcul4: warp "gl_sew04.gat",68,277; close;
-dglastchur: warp "gl_church.gat",156,7; close;
-dglaststep: warp "gl_step.gat",12,7; close;
-dglastcave1: warp "gl_dun01.gat",133,271; close;
-dglastcave2: warp "gl_dun02.gat",224,274; close;
-dglastpris1: warp "gl_prison.gat",14,70; close;
-dglastpris2: warp "gl_prison1.gat",150,14; close;
-dhidden1: warp "prt_maze01.gat",176,7; close;
-dhidden2: warp "prt_maze02.gat",94,9; close;
-dhidden3: warp "prt_maze03.gat",23,8; close;
-dmagma1: warp "mag_dun01.gat",126,68; close;
-dmagma2: warp "mag_dun02.gat",47,30; close;
-dorc1: warp "orcsdun01.gat",32,170; close;
-dorc2: warp "orcsdun02.gat",21,185; close;
-dpayon1: warp "pay_dun00.gat",21,183; close;
-dpayon2: warp "pay_dun01.gat",19,33; close;
-dpayon3: warp "pay_dun02.gat",19,63; close;
-dpayon4: warp "pay_dun03.gat",155,159; close;
-dpayon5: warp "pay_dun04.gat",201,204; close;
-dpyramids1: warp "moc_pryd01.gat",192,9; close;
-dpyramids2: warp "moc_pryd02.gat",10,192; close;
-dpyramids3: warp "moc_pryd03.gat",100,92; close;
-dpyramids4: warp "moc_pryd04.gat",181,11; close;
-dpyramidsb1: warp "moc_pryd05.gat",94,96; close;
-dpyramidsb2: warp "moc_pryd06.gat",192,8; close;
-dsphinx1: warp "in_sphinx1.gat",288,9; close;
-dsphinx2: warp "in_sphinx2.gat",149,81; close;
-dsphinx3: warp "in_sphinx3.gat",210,54; close;
-dsphinx4: warp "in_sphinx4.gat",10,222; close;
-dsphinx5: warp "in_sphinx5.gat",100,99; close;
-dsunken1: warp "treasure01.gat",69,24; close;
-dsunken2: warp "treasure02.gat",102,27; close;
-dtoy1: warp "xmas_dun01.gat",205,15; close;
-dtoy2: warp "xmas_dun02.gat",129,133; close;
-dturtleent: warp "tur_dun01.gat",154,49; close;
-dturtle1: warp "tur_dun02.gat",148,261; close;
-dturtle2: warp "tur_dun03.gat",132,189; close;
-dturtle3: warp "tur_dun04.gat",100,192; close;
-dama1: warp "ama_dun01.gat",228,11; close;
-dama2: warp "ama_dun02.gat",34,41; close;
-dama3: warp "ama_dun03.gat",119,14; close;
-dgon1: warp "gon_dun01.gat",153,53; close;
-dgon2: warp "gon_dun02.gat",28,113; close;
-dgon3: warp "gon_dun03.gat",68,16; close;
-dgefenia1: warp "gefenia01.gat",40,103; close;
-dgefenia2: warp "gefenia02.gat",203,34; close;
-dgefenia3: warp "gefenia03.gat",266,168; close;
-dgefenia4: warp "gefenia04.gat",130,272; close;
-}
-alberta.gat,31,240,4 duplicate(warpra) Warp NPC 115
-aldebaran.gat,145,118,4 duplicate(warpra) Warp NPC 115
-amatsu.gat,194,79,1 duplicate(warpra) Warp NPC 115
-comodo.gat,194,158,4 duplicate(warpra) Warp NPC 115
-geffen.gat,115,66,4 duplicate(warpra) Warp NPC 115
-izlude.gat,131,116,4 duplicate(warpra) Warp NPC 115
-xmas_fild01.gat,115,174,4 duplicate(warpra) Warp NPC 115
-morocc.gat,156,99,4 duplicate(warpra) Warp NPC 115
-payon.gat,182,110,4 duplicate(warpra) Warp NPC 115
-prontera.gat,153,183,4 duplicate(warpra) Warp NPC 115
-yuno.gat,137,162,4 duplicate(warpra) Warp NPC 115
-moc_fild04.gat,207,331,4 duplicate(warpra) Warp NPC 115
-izlu2dun.gat,104,82,4 duplicate(warpra) Warp NPC 115
-mjolnir_02.gat,85,363,4 duplicate(warpra) Warp NPC 115
-prt_fild05.gat,273,215,4 duplicate(warpra) Warp NPC 115
-glast_01.gat,370,308,4 duplicate(warpra) Warp NPC 115
-yuno_fild03.gat,37,135,4 duplicate(warpra) Warp NPC 115
-gef_fild10.gat,71,339,4 duplicate(warpra) Warp NPC 115
-pay_arche.gat,39,135,4 duplicate(warpra) Warp NPC 115
-moc_ruins.gat,64,166,4 duplicate(warpra) Warp NPC 115
-moc_fild19.gat,106,97,4 duplicate(warpra) Warp NPC 115
-alb2trea.gat,73,101,4 duplicate(warpra) Warp NPC 115
-tur_dun01.gat,148,239,4 duplicate(warpra) Warp NPC 115
-gonryun.gat,151,130,4 duplicate(warpra) Warp NPC 115
-louyang.gat,210,106,4 duplicate(warpra) Warp NPC 115
-umbala.gat,132,130,4 duplicate(warpra) Warp NPC 115
-valkyrie.gat,48,35,8 duplicate(warpra) Warp NPC 115
+//===== eAthena Script ======================================= +//= Warp Npc With Warp To Almost Everywhere +//===== By: ================================================== +//= Someone(thats his name!) (1.0) +//===== Current Version: ===================================== +//= 1.4 +//===== Compatible With: ===================================== +//= Any eAthena Version with duplicate; RO Ep6+ +//===== Description: ========================================= +//= - +//===== Additional Comments: ================================= +//= 1.1 by Darkchild +//= 1.2 by Darkchild +//= 1.3 Fixed by x[tsk] Added missing code for Valkyrie + Added +//= a warp NPC in Valkyrie it self. Checked/Added by Lupus +//= 1.4 morocc coords overlapping fixed +//============================================================ + +- script Warp NPC::warpra 115,{ + mes "[Warp NPC]"; + mes "Hello, I can warp you to any Town and Dungeon! Were do you want to go?"; + next; + menu "Towns",town,"Dungeons",dungeon; +town: + menu "Alberta",walberta,"Aldebaran",waldebaran,"Amatsu",wamatsu,"Comodo",wcomodo,"Gonryun",wgonryun,"Geffen",wgeffen,"Izlude",wizlude,"Lutie",wxmas,"Morroc",wmorroc,"Niflheim",wniflheim,"Payon",wpayon,"Prontera",wprontera,"Yuno",wyuno,"Umbala",wumbala,"Valkyrie",wvalk,"Louyang",wlouyang; +dungeon: + menu "Amatsu Dungeon",ama,"Gonryun Dungeon",gon,"Anthell",ant,"Beach Dungeon",beach,"Byalan Dungeon",byalan,"Clock Tower",clock,"Coal Mines",coal,"Culvert",culvert,"Geffen Dungeon",geffen,"Glast Heim",glast,"Hidden Dungeon",hidden,"Magma Dungeon",magma,"Orc Dungeon",orc,"Payon Dungeon",payon,"Pyramids",pyramids,"Sphinx",sphinx,"Sunken Ship",sunken,"Toy Factory",toy,"Turtle Dungeon",turtle,"Gefenia",gefenia; +ant: + mes "[Warp NPC]"; + mes "Please select a Level. Beware that you will be warped directly into the dungeon."; + next; + menu "Level 1",danthell1,"Level 2",danthell2; +beach: + mes "[Warp NPC]"; + mes "Please select a Level. Beware that you will be warped directly into the dungeon."; + next; + menu "Level 1",dbeach1,"Level 2",dbeach2,"Level 3",dbeach3; +byalan: + mes "[Warp NPC]"; + mes "Please select a Level. Beware that you will be warped directly into the dungeon."; + next; + menu "Level 1",dbyalan1,"Level 2",dbyalan2,"Level 3",dbyalan3,"Level 4",dbyalan4,"Level 5",dbyalan5; +clock: + mes "[Warp NPC]"; + mes "Please select a Level. Beware that you will be warped directly into the dungeon."; + next; + menu "Level 1",dclock1,"Level 2",dclock2,"Level 3",dclock3,"Level 4",dclock4,"Basement 1",dalde1,"Basement 2",dalde2,"Basement 3",dalde3,"Basement 4",dalde4; +coal: + mes "[Warp NPC]"; + mes "Please select a Level. Beware that you will be warped directly into the dungeon."; + next; + menu "Level 1",dcoal1,"Level 2",dcoal2,"Level 3",dcoal3; +culvert: + mes "[Warp NPC]"; + mes "Please select a Level. Beware that you will be warped directly into the dungeon."; + next; + menu "Level 1",dculvert1,"Level 2",dculvert2,"Level 3",dculvert3,"Level 4",dculvert4; +geffen: + mes "[Warp NPC]"; + mes "Please select a Level. Beware that you will be warped directly into the dungeon."; + next; + menu "Level 1",dgeffen1,"Level 2",dgeffen2,"Level 3",dgeffen3,"Level 4",dgeffen4; +glast: + mes "[Warp NPC]"; + mes "Please select a Level. Beware that you will be warped directly into the dungeon."; + next; + menu "Entrance",dglastent,"Castle 1",dglastcast1,"Castle 2",dglastcast2,"Chivalry 1",dglastchiv1,"Chivalry 2",dglastchiv2,"Churchyard",dglastyard,"Culvert 1",dglastcul1,"Culvert 2",dglastcul1,"Culvert 3",dglastcul3,"Culvert 4",dglastcul4,"St.Abbey",dglastchur,"Staircase Dungeon",dglaststep,"Underground Cave 1",dglastcave1,"Underground Cave 2",dglastcave2,"Underground Prison 1",dglastpris1,"Underground Prison 2",dglastpris2; +hidden: + mes "[Warp NPC]"; + mes "Please select a Level. Beware that you will be warped directly into the dungeon."; + next; + menu "Level 1",dhidden1,"Level 2",dhidden2,"Level 3",dhidden3; +magma: + mes "[Warp NPC]"; + mes "Please select a Level. Beware that you will be warped directly into the dungeon."; + next; + menu "Level 1",dmagma1,"Level 2",dmagma2; +orc: + mes "[Warp NPC]"; + mes "Please select a Level. Beware that you will be warped directly into the dungeon."; + next; + menu "Level 1",dorc1,"Level 2",dorc2; +payon: + mes "[Warp NPC]"; + mes "Please select a Level. Beware that you will be warped directly into the dungeon."; + next; + menu "Level 1",dpayon1,"Level 2",dpayon2,"Level 3",dpayon3,"Level 4",dpayon4,"Level 5",dpayon5; +pyramids: + mes "[Warp NPC]"; + mes "Please select a Level. Beware that you will be warped directly into the dungeon."; + next; + menu "Level 1",dpyramids1,"Level 2",dpyramids2,"Level 3",dpyramids3,"Level 4",dpyramids4,"Basement 1",dpyramidsb1,"Basement 2",dpyramidsb2; +sphinx: + mes "[Warp NPC]"; + mes "Please select a Level. Beware that you will be warped directly into the dungeon."; + next; + menu "Level 1",dsphinx1,"Level 2",dsphinx2,"Level 3",dsphinx3,"Level 4",dsphinx4,"Level 5",dsphinx5; +sunken: + mes "[Warp NPC]"; + mes "Please select a Level. Beware that you will be warped directly into the dungeon."; + next; + menu "Level 1",dsunken1,"Level 2",dsunken2; +toy: + mes "[Warp NPC]"; + mes "Please select a Level. Beware that you will be warped directly into the dungeon."; + next; + menu "Level 1",dtoy1,"Level 2",dtoy2; +turtle: + mes "[Warp NPC]"; + mes "Please select a Level. Beware that you will be warped directly into the dungeon."; + next; + menu "Entrance",dturtleent,"Level 1",dturtle1,"Level 2",dturtle2,"Level 3",dturtle3; +ama: + mes "[Warp NPC]"; + mes "Please select a Level. Beware that you will be warped directly into the dungeon."; + next; + menu "Level 1",dama1,"Level 2",dama2,"Level 3",dama3; +gon: + mes "[Warp NPC]"; + mes "Please select a Level. Beware that you will be warped directly into the dungeon."; + next; + menu "Level 1",dgon1,"Level 2",dgon2,"Level 3",dgon3; +gefenia: + mes "[Warp NPC]"; + mes "Please select a Level. Beware that you will be warped directly into the dungeon."; + next; + menu "Level 1",dgefenia1,"Level 2",dgefenia2,"Level 3",dgefenia3,"Level 4",dgefenia4; + +//----------------Towns----------------\\ + +walberta: warp "alberta.gat",192,147; close; +waldebaran: warp "aldebaran.gat",140,131; close; +wamatsu: warp "amatsu.gat",198,84; close; +wcomodo: warp "comodo.gat",209,143; close; +wgonryun: warp "gonryun.gat",160,121; close; +wgeffen: warp "geffen.gat",119,59; close; +wizlude: warp "izlude.gat",128,114; close; +wxmas: warp "xmas.gat",147,134; close; +wmorroc: warp "morocc.gat",156,93; close; +wniflheim: warp "niflheim.gat",85,154; close; +wpayon: warp "payon.gat",152,75; close; +wprontera: warp "prontera.gat",156,191; close; +wyuno: warp "yuno.gat",157,51; close; +wumbala: warp "umbala.gat",145,155; close; +wlouyang: warp "louyang.gat",210,108; close; +wvalk: warp "valkyrie",48,8; close; + +//----------------Dungeons----------------\\ + +danthell1: warp "anthell01.gat",35,262; close; +danthell2: warp "anthell02.gat",168,170; close; +dbeach1: warp "beach_dun.gat",266,67; close; +dbeach2: warp "beach_dun2.gat",255,244; close; +dbeach3: warp "beach_dun3.gat",23,260; close; +dbyalan1: warp "iz_dun00.gat",168,168; close; +dbyalan2: warp "iz_dun01.gat",253,252; close; +dbyalan3: warp "iz_dun02.gat",236,204; close; +dbyalan4: warp "iz_dun03.gat",32,63; close; +dbyalan5: warp "iz_dun04.gat",26,27; close; +dalde1: warp "alde_dun01.gat",297,25; close; +dalde2: warp "alde_dun02.gat",127,169; close; +dalde3: warp "alde_dun03.gat",277,178; close; +dalde4: warp "alde_dun04.gat",268,74; close; +dclock1: warp "c_tower1.gat",199,159; close; +dclock2: warp "c_tower2.gat",148,283; close; +dclock3: warp "c_tower3.gat",65,147; close; +dclock4: warp "c_tower4.gat",56,155; close; +dcoal1: warp "mjo_dun01.gat",52,17; close; +dcoal2: warp "mjo_dun02.gat",381,343; close; +dcoal3: warp "mjo_dun03.gat",302,262; close; +dculvert1: warp "prt_sewb1.gat",131,247; close; +dculvert2: warp "prt_sewb2.gat",19,19; close; +dculvert3: warp "prt_sewb3.gat",180,169; close; +dculvert4: warp "prt_sewb4.gat",100,92; close; +dgeffen1: warp "gef_dun00.gat",104,99; close; +dgeffen2: warp "gef_dun01.gat",115,236; close; +dgeffen3: warp "gef_dun02.gat",106,132; close; +dgeffen4: warp "gef_dun03.gat",203,200; close; +dglastent: warp "glast_01.gat",375,304; close; +dglastcast1: warp "gl_cas01.gat",199,29; close; +dglastcast2: warp "gl_cas02.gat",104,25; close; +dglastchiv1: warp "gl_knt01.gat",150,15; close; +dglastchiv2: warp "gl_knt02.gat",157,287; close; +dglastyard: warp "gl_chyard.gat",147,15; close; +dglastcul1: warp "gl_sew01.gat",258,255; close; +dglastcul2: warp "gl_sew02.gat",108,291; close; +dglastcul3: warp "gl_sew03.gat",171,283; close; +dglastcul4: warp "gl_sew04.gat",68,277; close; +dglastchur: warp "gl_church.gat",156,7; close; +dglaststep: warp "gl_step.gat",12,7; close; +dglastcave1: warp "gl_dun01.gat",133,271; close; +dglastcave2: warp "gl_dun02.gat",224,274; close; +dglastpris1: warp "gl_prison.gat",14,70; close; +dglastpris2: warp "gl_prison1.gat",150,14; close; +dhidden1: warp "prt_maze01.gat",176,7; close; +dhidden2: warp "prt_maze02.gat",94,9; close; +dhidden3: warp "prt_maze03.gat",23,8; close; +dmagma1: warp "mag_dun01.gat",126,68; close; +dmagma2: warp "mag_dun02.gat",47,30; close; +dorc1: warp "orcsdun01.gat",32,170; close; +dorc2: warp "orcsdun02.gat",21,185; close; +dpayon1: warp "pay_dun00.gat",21,183; close; +dpayon2: warp "pay_dun01.gat",19,33; close; +dpayon3: warp "pay_dun02.gat",19,63; close; +dpayon4: warp "pay_dun03.gat",155,159; close; +dpayon5: warp "pay_dun04.gat",201,204; close; +dpyramids1: warp "moc_pryd01.gat",192,9; close; +dpyramids2: warp "moc_pryd02.gat",10,192; close; +dpyramids3: warp "moc_pryd03.gat",100,92; close; +dpyramids4: warp "moc_pryd04.gat",181,11; close; +dpyramidsb1: warp "moc_pryd05.gat",94,96; close; +dpyramidsb2: warp "moc_pryd06.gat",192,8; close; +dsphinx1: warp "in_sphinx1.gat",288,9; close; +dsphinx2: warp "in_sphinx2.gat",149,81; close; +dsphinx3: warp "in_sphinx3.gat",210,54; close; +dsphinx4: warp "in_sphinx4.gat",10,222; close; +dsphinx5: warp "in_sphinx5.gat",100,99; close; +dsunken1: warp "treasure01.gat",69,24; close; +dsunken2: warp "treasure02.gat",102,27; close; +dtoy1: warp "xmas_dun01.gat",205,15; close; +dtoy2: warp "xmas_dun02.gat",129,133; close; +dturtleent: warp "tur_dun01.gat",154,49; close; +dturtle1: warp "tur_dun02.gat",148,261; close; +dturtle2: warp "tur_dun03.gat",132,189; close; +dturtle3: warp "tur_dun04.gat",100,192; close; +dama1: warp "ama_dun01.gat",228,11; close; +dama2: warp "ama_dun02.gat",34,41; close; +dama3: warp "ama_dun03.gat",119,14; close; +dgon1: warp "gon_dun01.gat",153,53; close; +dgon2: warp "gon_dun02.gat",28,113; close; +dgon3: warp "gon_dun03.gat",68,16; close; +dgefenia1: warp "gefenia01.gat",40,103; close; +dgefenia2: warp "gefenia02.gat",203,34; close; +dgefenia3: warp "gefenia03.gat",266,168; close; +dgefenia4: warp "gefenia04.gat",130,272; close; +} +alberta.gat,31,240,4 duplicate(warpra) Warp NPC 115 +aldebaran.gat,145,118,4 duplicate(warpra) Warp NPC 115 +amatsu.gat,194,79,1 duplicate(warpra) Warp NPC 115 +comodo.gat,194,158,4 duplicate(warpra) Warp NPC 115 +geffen.gat,115,66,4 duplicate(warpra) Warp NPC 115 +izlude.gat,131,116,4 duplicate(warpra) Warp NPC 115 +xmas_fild01.gat,115,174,4 duplicate(warpra) Warp NPC 115 +morocc.gat,156,99,4 duplicate(warpra) Warp NPC 115 +payon.gat,182,110,4 duplicate(warpra) Warp NPC 115 +prontera.gat,153,183,4 duplicate(warpra) Warp NPC 115 +yuno.gat,137,162,4 duplicate(warpra) Warp NPC 115 +moc_fild04.gat,207,331,4 duplicate(warpra) Warp NPC 115 +izlu2dun.gat,104,82,4 duplicate(warpra) Warp NPC 115 +mjolnir_02.gat,85,363,4 duplicate(warpra) Warp NPC 115 +prt_fild05.gat,273,215,4 duplicate(warpra) Warp NPC 115 +glast_01.gat,370,308,4 duplicate(warpra) Warp NPC 115 +yuno_fild03.gat,37,135,4 duplicate(warpra) Warp NPC 115 +gef_fild10.gat,71,339,4 duplicate(warpra) Warp NPC 115 +pay_arche.gat,39,135,4 duplicate(warpra) Warp NPC 115 +moc_ruins.gat,64,166,4 duplicate(warpra) Warp NPC 115 +moc_fild19.gat,106,97,4 duplicate(warpra) Warp NPC 115 +alb2trea.gat,73,101,4 duplicate(warpra) Warp NPC 115 +tur_dun01.gat,148,239,4 duplicate(warpra) Warp NPC 115 +gonryun.gat,151,130,4 duplicate(warpra) Warp NPC 115 +louyang.gat,210,106,4 duplicate(warpra) Warp NPC 115 +umbala.gat,132,130,4 duplicate(warpra) Warp NPC 115 +valkyrie.gat,48,35,8 duplicate(warpra) Warp NPC 115 diff --git a/npc/other/wedding.txt b/npc/other/wedding.txt index a2271350f..87a994765 100644 --- a/npc/other/wedding.txt +++ b/npc/other/wedding.txt @@ -1,707 +1,707 @@ -//////////////////////////////////////////////////////////
-// Wedding Script Alpha (v1.4) //
-//////////////////////////////////////////////////////////
-//
-//=====eAthena Script====================================
-// Wedding Script
-//=====By================================================
-// AppleGirl and Evera(version 1.0)
-//=====Current Version===================================
-// 1.4
-//=====Compatible With:==================================
-// Any eAthena Version; RO Episode 6+
-//=====Description=======================================
-// Fully working wedding script for all kind of weddings
-//=====Additional Comments:==============================
-// Tested and debugged by whocares (maybe 1-2 bugs left)(version 1.1)
-//======= Version 1.2 By ShadowLady =====================
-// Same Sex Weddings.
-// Now the script(npcs) tell the players how they must perform exactly.
-//======= Version 1.3 By ShadowLady =====================
-// You might need to update the wedding rings in item_db
-// Same for the tux/dress, so all classes and lvs can use it ^^
-// And check if they are wearing the tux/dress and not only have it on the inventory.
-//======= Version 1.4 By ShadowLady =====================
-// Added some code ideas. Thanks to Jbain for help me debbuging
-// Added @outfit variable, to check if you already bought a tux/dress
-// No need to buy a tuxedo/dress everytime you register anymore, unless you divorce
-// Fixed some of that bugged timers (*stares whocares*) Now it is exactly 5 minutes and not 2
-// Fixed "part" of the divorce npc. The code is bugged by itself -_- Need both chars to be online yet.
-////======= Version 1.45 By ShadowLady =====================
-// Fixed some minor bugs. Same-sex is disabled by default now.
-// Change $progress variable to $@progress, so it dont screw up the ceremony on a server crash.
-// Added a Special GM Menu to enable/disable same-sex weddings and reset most variables.
-//=======================================================
-// Variable Notes:
-//
-// event_wedding - 1 signifies marriage
-// $groom$ - Groom's name storage
-// $bride$ - Bride's name storage
-// $progress - Sets global restriction upon wedding
-// @register - Temporary registration check
-// @zleft - Temporary zeny needed check
-// $name$ - Insert name for bride
-// $name2$ - Insert name for groom
-// $get_ring - Check so you can't get ring twice
-// $reason$ - Objection to wedding
-// @outfit - Check if the char already got a dress or tuxedo from the npc
-// Tristan
-prt_church.gat,99,125,4 script Tristan the Third 108,{
- if($groom$ == strcharinfo(0) && $progress != 3) goto L_GroomCeremony;
- if(@register == 0) goto L_GroomNeedToRegister;
- if($bride$ == strcharinfo(0)) goto L_BrideCeremony;
- menu "Here To Attend",L_Wedding,"Here for another reason",L_OtherReason;
-L_GroomCeremony:
- if(@register == 0) goto L_GroomNeedToRegister;
- if($progress == 1) goto L_BrideNeedToRegister;
- if($progress == 0) goto L_Wedding;
- if(countitem(2613) < 1) goto L_NeedRing;//Items: Diamond_Ring,
- if((getequipid(2) != 2338) && (getequipid(2) != 7170)) goto L_Attire;
- mes "[Tristan the Third]";
- mes "Everything is ready, it's your call now...";
- next;
- menu "Perform Wedding.",-,"Cancel Wedding.",L_CancelWedding;
- set $progress,3;
- mes "[Tristan the Third]";
- mes "Well all you have to do now is the easy part input your bride's name, remember to spell it correctly.";
- input $name2$;
- next;
- if($name2$ != $bride$) goto L_WrongBrideName;
- deltimer "a13";
- marriage $name2$;
- mes "[Tristan the Third]";
- mes "Please tell your wife to speak to me, and then we will start exchanging rings";
- delitem 2613,1;//Items: Diamond_Ring,
- getitem 2635,1;//Items: Wedding_Ring_F,
- set @get_ring,1;
- next;
- mes "[Tristan the Third]";
- mes "Will you and your bride please move onto the stand. I will now preform the Wedding Ceremony!";
- set event_wedding,1;
- deltimer "weddinglimit1";
- deltimer "weddinglimit2";
- announce "The Wedding of "+$groom$+" and "+$bride$+", will now be held at Prontera Church.",5;
- addtimer 50000,"a1";
- addtimer 55000,"a2";
- addtimer 60000,"a3";
- addtimer 65000,"a4";
- addtimer 70000,"a5";
- addtimer 75000,"a6";
- addtimer 80000,"a7";
- addtimer 85000,"a8";
- addtimer 90000,"a9";
- addtimer 95000,"a10";
- addtimer 100000,"a11";
- addtimer 105000,"a12";
- close;
-L_BrideCeremony:
- if(countitem(2613) < 1) goto L_NeedRing;//Items: Diamond_Ring,
- if((getequipid(2) != 2338) && (getequipid(2) != 7170)) goto L_Attire;
- mes "[Tristan the Third]";
- mes "Well all you have to do now is the easy part input your groom's name, remember to spell it correctly.";
- input $name$;
- next;
- if($name$ != $groom$) goto L_WrongGroomName;
- deltimer "a13";
- deltimer "weddinglimit1";
- deltimer "weddinglimit2";
- marriage $name$;
- delitem 2613,1;//Items: Diamond_Ring,
- getitem 2634,1;//Items: Wedding_Ring_M,
- set @get_ring,1;
- close;
-L_CancelWedding:
- mes "[Tristan the Third]";
- mes "The wedding has been cancelled by "+strcharinfo(0)+".";
- set $progress,0;
- set $groom$,"null";
- set $bride$,"null";
- set @register,0;
- set event_wedding,0;
- set @get_ring,0;
- deltimer "a1";
- deltimer "a2";
- deltimer "a3";
- deltimer "a4";
- deltimer "a5";
- deltimer "a6";
- deltimer "a7";
- deltimer "a8";
- deltimer "a9";
- deltimer "a10";
- deltimer "a11";
- deltimer "a12";
- deltimer "a13";
- close;
-L_GroomNeedToRegister:
- mes "[Tristan the Third]";
- mes "Hello, please register with Mary if you want me to perform a marriage for you.";
- close;
-L_Wedding:
- if(event_wedding != 1) goto L_Guest;
- mes "[Tristan the Third]";
- mes "Hello again "+strcharinfo(0)+", I hope wish for the best of luck in your life.";
- close;
-L_BrideNeedToRegister:
- mes "[Tristan the Third]";
- mes "I'm sorry, I cannot start the ceremony if the bride has not registered yet.";
- close;
-L_OtherReason:
- if(@get_ring == 1) goto L_Wedding;
- mes "[Tristan the Third]";
- mes "Do you have a reason why these two should not be bonded in holy matrimony?";
- next;
- menu "Yes I Do.",-,"No",L_NoReason;
- areaannounce "prt_church.gat",0,0,350,350,"Ladies and Gentlemen,"+strcharinfo(0)+" has an objection to this marriage",0;
- mes "[Tristan the Third]";
- mes "Please enter your reason, for this action.";
- input $reason$;
- next;
- areaannounce "prt_church.gat",0,0,350,350,""+$reason$+"",0;
- set $progress,0;
- set $groom$,"null";
- set $bride$,"null";
- set $name$,"null";
- set $name2$,"null";
- set @register,0;
- set event_wedding,0;
- set @get_ring,0;
- deltimer "a1";
- deltimer "a2";
- deltimer "a3";
- deltimer "a4";
- deltimer "a5";
- deltimer "a6";
- deltimer "a7";
- deltimer "a8";
- deltimer "a9";
- deltimer "a10";
- deltimer "a11";
- deltimer "a12";
- mes "The wedding has been called off.";
- close;
-L_NoReason:
- if($groom$ == strcharinfo(0)) goto L_InProgress;
- if($bride$ == strcharinfo(0)) goto L_InProgress;
- mes "[Tristan the Third]";
- mes "Please have a seat than and let me continue the wedding.";
- close;
-L_Guest:
- mes "[Tristan the Third]";
- mes "Enjoy the cerimony.";
- mes "But I must continue the cerimony, so lets talk after.";
- close;
-L_InProgress:
- mes "[Tristan the Third]";
- mes "Your wedding is in progress, please try talking with me later.";
- close;
-L_WrongBrideName:
- mes "[Mary Happy]";
- mes "How come you forgot your wife name!? Sorry come back later when you know who you want to marry.";
- close;
-L_WrongGroomName:
- mes "[Mary Happy]";
- mes "How come you forgot your husband name!? Sorry come back later when you know who you want to marry.";
- close;
-L_NeedRing:
- mes "[Tristan the Third]";
- mes "You need a Diamond Ring in order to perform the wedding.";
- close;
-L_Attire:
- if(sex == 1) goto L_NeedTuxedo;
- if(sex == 0) goto L_NeedDress;
- close;
-L_NeedTuxedo:
- mes "[Tristan the Third]";
- mes "You need a Tuxedo before we can continue the ceremony.";
- close;
-L_NeedDress:
- mes "[Tristan the Third]";
- mes "Oh my is it your wedding day?";
- mes "Well sorry to break it to you, you need a wedding dress to get married.";
- close;
-}
-
-// Mary
-prt_church.gat,95,100,4 script Mary 71,{
- mes "[Mary Happy]";
- mes "Getting married bring a lot of joy.";
- mes "By any chance, you you want to get engaged with someone?";
- next;
- menu "Explain the principles of Marrige",L_Principles,"How does the marrige system work.",L_WeddingSystem,"I want to get married with someone.",L_Marry,"I live solo forever!",L_LiveSolo,"Special Menu",L_GmMenu;
-L_GmMenu:
- set @gmlevel,getgmlevel(50);
- if(@gmlevel < 50) goto L_NotGM;
- mes "Hello " + strcharinfo(0) + " How i can serve you?";
- menu "Enable Same-Sex Weddings",L_EnableSameSex,"Disable Same-Sex Weddings",L_DisableSameSex,"Reset the Variables",L_ResetVariables,"Just Checking...",L_Bye;
-L_NotGM:
- mes "You cant have access to this special menu " + strcharinfo(0) + "";
- mes "Only GMs can change the ceremony options.";
- close;
-L_EnableSameSex:
- set $samesex,1;
- mes "Same-Sex Weddings are enabled now!";
- close;
-L_DisableSameSex:
- set $samesex,0;
- mes "Same-Sex Weddings are disabled now!";
- close;
-L_ResetVariables:
- set $@progress,0;
- set $groom$,"null";
- set $bride$,"null";
- set $name$,"null";
- set $name2$,"null";
- set @register,0;
- set event_wedding,0;
- set @get_ring,0;
- set @outfit,0;
- deltimer "weddinglimit1";
- deltimer "weddinglimit2";
- deltimer "a1";
- deltimer "a2";
- deltimer "a3";
- deltimer "a4";
- deltimer "a5";
- deltimer "a6";
- deltimer "a7";
- deltimer "a8";
- deltimer "a9";
- deltimer "a10";
- deltimer "a11";
- deltimer "a12";
- deltimer "a13";
- mes "All variables are reseted and timers off!";
- close;
-L_Principles:
- mes "[Mary Happy]";
- mes "His Majesty King Tristan III of the Rune Midgard Kingdom will be officiating this wedding, with the intent of blessing all the people through his noble message.";
- next;
- mes "[Mary Happy]";
- mes "Although His Majesty has a rather busy agenda, for the sake of newly married couples, he has personally come here, to the Prontera Church.";
- mes "It is the favor of our King that everyone would live happily ever after.";
- next;
- mes "[Mary Happy]";
- mes "The proposal must be done with prudence and courtesy.";
- mes "Once the wedlocks have been made, they cannot be undone.";
- mes "The two who are united in marriage must be with the other forever until the day they leave this world.";
- next;
- mes "[Mary Happy]";
- mes "Also, males only with females, and females only with males can be wed. Although there may be those who desire a homosexual or bestial marriage... it is approved.";
- next;
- mes "[Mary Happy]";
- mes "If there is a significant other whom you want to spend the rest of your life with, then don't be shy to propose.";
- mes "Wishing for many blessings upon couples who wish to live happily ever after..";
- close;
-L_WeddingSystem:
- mes "[Mary Happy]";
- mes "First make sure both players a registered to get married.";
- mes "Obviously, you must know each other to get married?";
- mes "If both have registered, and you must be on the same party.";
- mes "Then talk to Thristan the Third.";
- next;
- mes "[Mary Happy]";
- mes "You must go to Thristan the Third,";
- mes "and the Groom must talk to him first.";
- mes "And you must tell him the Bride";
- mes "you wish to get married with.";
- mes "Be sure to tell him exactly who you want to marry.";
- next;
- mes "[Mary Happy]";
- mes "After the Groom has spoken, next the Bride must talk.";
- mes "Then when both of you have spoken each others names,";
- mes "Thristan the third will read out both of your names.";
- next;
- mes "[Mary Happy]";
- mes "After you have got married,";
- mes "you will both recive a ring of marrige.";
- mes "And as soon as both of you wear these rings,";
- mes "you will be forever married with each other.";
- mes "You can also be refused of a lasting marrige.";
- mes "But, dont be sad.";
- next;
- mes "[Mary Happy]";
- mes "If there are many people that wish to get married,";
- mes "So please keep to the order you register.";
- mes "Thristan does not do multiple marriges at once.";
- mes "He will only see one couple at a time.";
- next;
- mes "[Mary Happy]";
- mes "Lastly, you must put forth your name quickly";
- mes "to Thristan the third.";
- mes "After the male has said yes to marrage ";
- mes "the female has 3 minutes to reply.";
- mes "Or you shall forever never be able";
- mes "to get married.";
- next;
- mes "[Mary Happy]";
- mes "An easy way to write down the each others name,";
- mes "Send a message to each other";
- mes "then in the private message window press up";
- next;
- mes "[Mary Happy]";
- mes "Then it will show the other persons name.";
- mes "If you press ctrl + C that name will be saved.";
- mes "Next time you need that name";
- mes "you can press shift + insert.";
- mes "Then you will get that name quickly and easily.";
- next;
- mes "[Mary Happy]";
- mes "You should have a go at using this method.";
- mes "Remeber, Press ctrl + C to save that name.";
- next;
- input $nametest$;
- mes "[Mary Happy]";
- mes "Hopefully you will remember this method.";
- mes "If you ever decide to get married.";
- mes "Remember to register.";
- close;
-L_Marry:
- mes "[Mary Happy]";
- mes "If you wish to get married you must first register.";
- mes "Male is ^FF00FF120,000^000000 zeny and female is ^FF00FF100,000^000000 zeny";
- if((countitem(2338) > 0) || (countitem(7170) > 0) || (@outfit == 1)) mes "But only ^FF00FF60,000^000000 zeny for male and ^FF00FF50,000^000000 zeny for female if you already have registered before";
- mes "Both male and female must have registered,";
- mes "and both must have paid fees, have Diamond Rings and be on same party!";
- mes "The Bride will get a Wedding Dress, while the Groom will get a Chinese Tuxedo";
- next;
- mes "[Mary Happy]";
- mes "If both people have paid and meet recquirements";
- mes "you are able to get married strait away.";
- mes "One must be the Groom and the other the Bride.";
- mes "Do you wish to register to get married?";
- if($SameSex == 1) menu "I'm gonna be the Groom",-,"I,m gonna be the Bride",L_BrideRegister,"Never mind",L_Bye;
- if(event_wedding == 1) goto L_Married;
- if(@register >= 1) goto L_AlreadyRegistered;
- if($progress >= 2) goto L_InProgress;
- if(($samesex == 0) && (sex == 0)) goto L_BrideRegister;
- if((countitem(2338) > 0) || (countitem(7170) > 0) || (@outfit == 1)) goto L_GroomRegister2;
- mes "[Mary Happy]";
- if(sex == 1) mes "No problem sir, please fill out your name here.";
- if(sex == 0) mes "No problem miss, please fill out your name here.";
- mes "And I'll need to collect a 120,000z fee for your wedding fees and outfit.";
- next;
- mes "[Mary Happy]";
- mes "Now You Must Insert The Your Bride's Name";
- input $name$;
- next;
- if(zeny < 120000) goto L_NeedZeny1;
- set $groom$,strcharinfo(0);
- set @register,1;
- set zeny,zeny-120000;
- set $progress,1;
- if(sex == 1) getitem 7170,1;
- if(sex == 0) getitem 2338,1;
- set @outfit,1;
- mes "[Mary Happy]";
- mes "You are now registered "+strcharinfo(0)+", I wish you the best of luck with your marriage.";
- addtimer 300000,"weddinglimit1";
- areaannounce "prt_church.gat",0,0,350,350,strcharinfo(0)+" has registered for the wedding.",0;
- next;
- mes "Please hurry to the altar. We have to be ready for another wedding in 5 minutes.";
- deltimer "a13";
- addtimer 300000,"a13";
- close;
-L_BrideRegister:
- if ($name$ != strcharinfo(0)) goto L_NotBride;
- if($groom$ == strcharinfo(0)) goto L_CantMarryYourself;
- if($progress != 1) goto L_GroomNotRegistered;
- if(@register >= 1) goto L_AlreadyRegistered;
- if((countitem(2338) > 0) || (countitem(7170) > 0) || (@outfit == 1)) goto L_BrideRegister2;
- mes "[Mary Happy]";
- if(sex == 1) mes "No problem sir, please fill out your name here.";
- if(sex == 0) mes "No problem mis, please fill out your name here.";
- mes "And I'll need to collect a 100,000z fee for your wedding fees and outfit.";
- next;
- if(zeny < 100000) goto L_NeedZeny2;
- mes "[Mary Happy]";
- mes "Now You Must Insert The Your Groom's Name";
- input $name2$;
- if($name2$ != $groom$) goto L_WrongName;
- set $bride$,strcharinfo(0);
- set @register,1;
- set zeny,zeny-100000;
- set $progress,2;
- set event_wedding,1;
- if(sex == 1) getitem 7170,1;
- if(sex == 0) getitem 2338,1;
- set @outfit,1;
- deltimer "weddinglimit1";
- addtimer 300000,"weddinglimit2";
- next;
- mes "[Mary Happy]";
- mes "You are now registered "+strcharinfo(0)+", I wish you the best of luck with your wedding.";
- areaannounce "prt_church.gat",0,0,350,350,strcharinfo(0)+" has registered for the wedding.",0;
- next;
- mes "Please hurry to the altar. We have to be ready for another wedding in 5 minutes.";
- deltimer "a13";
- addtimer 300000,"a13";
- close;
-
-L_GroomRegister2:
- mes "[Mary Happy]";
- if(sex == 1) mes "No problem sir, please fill out your name here.";
- if(sex == 0) mes "No problem mis, please fill out your name here.";
- mes "And I'll need to collect a 60,000z fee for your wedding fees.";
- next;
- mes "[Mary Happy]";
- mes "Now You Must Insert The Your Bride's Name";
- input $name$;
- next;
- if(zeny < 60000) goto L_NeedZeny3;
- set $groom$,strcharinfo(0);
- set @register,1;
- set zeny,zeny-60000;
- set $progress,1;
- mes "[Mary Happy]";
- mes "You are now registered "+strcharinfo(0)+", I wish you the best of luck with your marriage.";
- addtimer 300000,"weddinglimit1";
- areaannounce "prt_church.gat",0,0,350,350,strcharinfo(0)+" has registered for the wedding.",0;
- next;
- mes "Please hurry to the altar. We have to be ready for another wedding in 5 minutes.";
- deltimer "a13";
- addtimer 300000,"a13";
- close;
-L_BrideRegister2:
- mes "[Mary Happy]";
- if(sex == 1) mes "No problem sir, please fill out your name here.";
- if(sex == 0) mes "No problem mis, please fill out your name here.";
- mes "And I'll need to collect a 50,000z fee for your wedding fees.";
- next;
- if(zeny < 50000) goto L_NeedZeny4;
- mes "[Mary Happy]";
- mes "Now You Must Insert The Your Groom's Name";
- input $name2$;
- if($name2$ != $groom$) goto L_WrongName;
- set $bride$,strcharinfo(0);
- set @register,1;
- set zeny,zeny-50000;
- set $progress,2;
- set event_wedding,1;
- deltimer "weddinglimit1";
- addtimer 300000,"weddinglimit2";
- next;
- mes "[Mary Happy]";
- mes "You are now registered "+strcharinfo(0)+", I wish you the best of luck with your wedding.";
- areaannounce "prt_church.gat",0,0,350,350,strcharinfo(0)+" has registered for the wedding.",0;
- next;
- mes "Please hurry to the altar. We have to be ready for another wedding in 5 minutes.";
- deltimer "a13";
- addtimer 300000,"a13";
- close;
-
-L_NeedZeny1:
- set @zleft,120000-zeny;
- mes "[Mary Happy]";
- mes "I'm terribly sorry, I am unable to register you. You seem to be "+@zleft+"z short.";
- set @zleft,0;
- close;
-L_NeedZeny2:
- set @zleft,100000-zeny;
- mes "[Mary Happy]";
- mes "I'm terribly sorry, I am unable to register you. You seem to be "+@zleft+"z short.";
- set @zleft,0;
- close;
-L_NeedZeny3:
- set @zleft,60000-zeny;
- mes "[Mary Happy]";
- mes "I'm terribly sorry, I am unable to register you. You seem to be "+@zleft+"z short.";
- set @zleft,0;
- close;
-L_NeedZeny4:
- set @zleft,50000-zeny;
- mes "[Mary Happy]";
- mes "I'm terribly sorry, I am unable to register you. You seem to be "+@zleft+"z short.";
- set @zleft,0;
- close;
-L_AlreadyRegistered:
- mes "[Mary Happy]";
- mes "You can't register a second time silly.";
- close;
-
-L_Bye:
- mes "[Mary Happy]";
- mes "Alrighty then, come back soon!";
- close;
-
-L_InProgress:
- mes "[Mary Happy]";
- mes "I cannot accept registrations while a wedding is in progress, try again later.";
- close;
-L_WrongName:
- mes "[Mary Happy]";
- mes "No one have registered with that name. Sorry.";
- close;
-L_GroomNotRegistered:
- mes "[Mary Happy]";
- mes "The groom must register first in order to initiate the wedding.";
- close;
-
-L_Married:
- mes "[Mary Happy]";
- mes "Hello again "+strcharinfo(0)+", I hope wish for the best of luck in your life.";
- close;
-L_LiveSolo:
- mes "[Mary Happy]";
- mes "Well live a happy bachelors life";
- close;
-L_NotBride:
- mes "[Mary Happy]";
- mes "You're not the bride";
- close;
-L_YouCantMarryYourself:
- mes "[Mary Happy]";
- mes "What the hell you trying to do? Marry yourself?O_O";
- close;
-}
-
-prt_church.gat,95,95,4 script Mary 71,{
- mes "[Mary Sad]";
- mes "Getting divorce can bring a lot of sorrow.";
- mes "By any chance, you you want to get divorced?";
- next;
- menu "I came to get a divorce",L_FirstDivorce,"What do I need for a divorce",L_DivorceSystem;
-L_FirstDivorce:
- if(divorce > 0) goto L_AlreadyDivorced;
- mes "[Mary Sad]";
- mes "So you came for a divorce, i have been divorced 2 times myself.";
- mes "Life will continue whoever said you need a partner was wrong.";
- mes "Dont forget that you and your partner must be online!";
- next;
- menu "Are you sure",-,"No i'm not ready",L_No;
- mes "[Mary Sad]";
- mes "You have made your choice,";
- mes "now you must live with it.";
- next;
- mes "You have been divorced!";
- set event_wedding,0;
- set divorce,1;
- set @register,0;
- divorce;
- close;
-L_AlreadyDivorced:
- mes "[Mary Sad]";
- mes "So you came for another divorce,wow you must be trying to find true love.";
- mes "Dont worry about it, it's not you, it's their fault.";
- next;
- menu "Are you sure",-,"No i'm not ready",L_No;
- mes "[Mary Sad]";
- mes "You have made your choice,";
- mes "now you must live with it.";
- next;
- mes "You have been divorced again!";
- set event_wedding,0;
- set divorce,2;
- set @register,0;
- divorce;
- close;
-L_No:
- mes "[Mary Sad]";
- mes "You should always be sure about what step you take in life.";
- close;
-L_DivorceSystem:
- mes "[Mary Sad]";
- mes "You just need to wish to not be married again and i will perform the divorce.";
- mes "Both you and your partner must be online.";
- close;
-}
-prt_church.gat,99,124,0 script weddinglimit1 -1,{
- announce "The bride has not registered within the alotted time frame.",3;
- announce "Your wedding has been cancelled.",3;
- set $progress,0;
- set $groom$,"null";
- set $name$,"null";
- set $name2$,"null";
- set @register,0;
- deltimer "a1";
- deltimer "a2";
- deltimer "a3";
- deltimer "a4";
- deltimer "a5";
- deltimer "a6";
- deltimer "a7";
- deltimer "a8";
- deltimer "a9";
- deltimer "a10";
- deltimer "a11";
- deltimer "a12";
-}
-
-prt_church.gat,99,124,0 script weddinglimit2 -1,{
- announce "The groom has not begun the wedding ceremony by speaking to Tristan the Third.",3;
- announce "Your wedding has been cancelled.",3;
- set $progress,0;
- set $groom$,"null";
- set $bride$,"null";
- set $name$,"null";
- set $name2$,"null";
- set @register,0;
- set event_wedding,0;
- deltimer "a1";
- deltimer "a2";
- deltimer "a3";
- deltimer "a4";
- deltimer "a5";
- deltimer "a6";
- deltimer "a7";
- deltimer "a8";
- deltimer "a9";
- deltimer "a10";
- deltimer "a11";
- deltimer "a12";
-}
-
-prt_church.gat,99,124,0 script a1 -1,{
-areaannounce "prt_church.gat",0,0,350,350,"Ladies and Gentlemen, We will now join in holy matrimony these two lovers.",0;
-}
-prt_church.gat,99,124,0 script a2 -1,{
-areaannounce "prt_church.gat",0,0,350,350,"Now more than ever, will both of your lives be entwined together as so will be your souls.",0;
-}
-prt_church.gat,99,124,0 script a3 -1,{
-areaannounce "prt_church.gat",0,0,350,350,"You will both honor and cherish each other through the best and worst of times.",0;
-}
-prt_church.gat,99,124,0 script a4 -1,{
-areaannounce "prt_church.gat",0,0,350,350,"The safety and well being of your other will now also be your responsibility.",0;
-}
-prt_church.gat,99,124,0 script a5 -1,{
-areaannounce "prt_church.gat",0,0,350,350,"May in sickness or good health, your love will burn bright as no force can extinguish it.",0;
-}
-prt_church.gat,99,124,0 script a6 -1,{
-areaannounce "prt_church.gat",0,0,350,350,"Those here stand witness to these vows bestowed upon you, you must act accordingly to them.",0;
-}
-prt_church.gat,99,124,0 script a7 -1,{
-areaannounce "prt_church.gat",0,0,350,350,"Understanding that, we are nothing more but mortals on this earth, but this is our triumph.",0;
-}
-prt_church.gat,99,124,0 script a8 -1,{
-areaannounce "prt_church.gat",0,0,350,350,"We here will now join these two mortal entities, and create an immortal love.",0;
-}
-prt_church.gat,99,124,0 script a9 -1,{
-areaannounce "prt_church.gat",0,0,350,350,$groom$+", do you you wish to take "+$bride$+" as your lawfully beloved wife?",0;
-}
-prt_church.gat,99,124,0 script a10 -1,{
-areaannounce "prt_church.gat",0,0,350,350,"And do you "+$bride$+", wish to take "+$groom$+" as your lawfully beloved husband?",0;
-}
-prt_church.gat,99,124,0 script a11 -1,{
-areaannounce "prt_church.gat",0,0,350,350,"And so be it, by the powers vested in me...",0;
-}
-prt_church.gat,99,124,0 script a12 -1,{
-areaannounce "prt_church.gat",0,0,350,350,"I pronouce you Husband and Wife, you may kiss the bride.",0;
- wedding;
- set $progress,0;
- set $groom$,"null";
- set $bride$,"null";
- set $name$,"null";
- set $name2$,"null";
-}
-prt_church.gat,99,124,0 script a13 -1,{
-
-areaannounce "prt_church.gat",0,0,350,350,"The wedding has been cancelled.",0;
- set $progress,0;
- set $groom$,"null";
- set $bride$,"null";
- set $name$,"null";
- set $name2$,"null";
- set @register,0;
- set event_wedding,0;
- set @get_ring,0;
+////////////////////////////////////////////////////////// +// Wedding Script Alpha (v1.4) // +////////////////////////////////////////////////////////// +// +//=====eAthena Script==================================== +// Wedding Script +//=====By================================================ +// AppleGirl and Evera(version 1.0) +//=====Current Version=================================== +// 1.4 +//=====Compatible With:================================== +// Any eAthena Version; RO Episode 6+ +//=====Description======================================= +// Fully working wedding script for all kind of weddings +//=====Additional Comments:============================== +// Tested and debugged by whocares (maybe 1-2 bugs left)(version 1.1) +//======= Version 1.2 By ShadowLady ===================== +// Same Sex Weddings. +// Now the script(npcs) tell the players how they must perform exactly. +//======= Version 1.3 By ShadowLady ===================== +// You might need to update the wedding rings in item_db +// Same for the tux/dress, so all classes and lvs can use it ^^ +// And check if they are wearing the tux/dress and not only have it on the inventory. +//======= Version 1.4 By ShadowLady ===================== +// Added some code ideas. Thanks to Jbain for help me debbuging +// Added @outfit variable, to check if you already bought a tux/dress +// No need to buy a tuxedo/dress everytime you register anymore, unless you divorce +// Fixed some of that bugged timers (*stares whocares*) Now it is exactly 5 minutes and not 2 +// Fixed "part" of the divorce npc. The code is bugged by itself -_- Need both chars to be online yet. +////======= Version 1.45 By ShadowLady ===================== +// Fixed some minor bugs. Same-sex is disabled by default now. +// Change $progress variable to $@progress, so it dont screw up the ceremony on a server crash. +// Added a Special GM Menu to enable/disable same-sex weddings and reset most variables. +//======================================================= +// Variable Notes: +// +// event_wedding - 1 signifies marriage +// $groom$ - Groom's name storage +// $bride$ - Bride's name storage +// $progress - Sets global restriction upon wedding +// @register - Temporary registration check +// @zleft - Temporary zeny needed check +// $name$ - Insert name for bride +// $name2$ - Insert name for groom +// $get_ring - Check so you can't get ring twice +// $reason$ - Objection to wedding +// @outfit - Check if the char already got a dress or tuxedo from the npc +// Tristan +prt_church.gat,99,125,4 script Tristan the Third 108,{ + if($groom$ == strcharinfo(0) && $progress != 3) goto L_GroomCeremony; + if(@register == 0) goto L_GroomNeedToRegister; + if($bride$ == strcharinfo(0)) goto L_BrideCeremony; + menu "Here To Attend",L_Wedding,"Here for another reason",L_OtherReason; +L_GroomCeremony: + if(@register == 0) goto L_GroomNeedToRegister; + if($progress == 1) goto L_BrideNeedToRegister; + if($progress == 0) goto L_Wedding; + if(countitem(2613) < 1) goto L_NeedRing;//Items: Diamond_Ring, + if((getequipid(2) != 2338) && (getequipid(2) != 7170)) goto L_Attire; + mes "[Tristan the Third]"; + mes "Everything is ready, it's your call now..."; + next; + menu "Perform Wedding.",-,"Cancel Wedding.",L_CancelWedding; + set $progress,3; + mes "[Tristan the Third]"; + mes "Well all you have to do now is the easy part input your bride's name, remember to spell it correctly."; + input $name2$; + next; + if($name2$ != $bride$) goto L_WrongBrideName; + deltimer "a13"; + marriage $name2$; + mes "[Tristan the Third]"; + mes "Please tell your wife to speak to me, and then we will start exchanging rings"; + delitem 2613,1;//Items: Diamond_Ring, + getitem 2635,1;//Items: Wedding_Ring_F, + set @get_ring,1; + next; + mes "[Tristan the Third]"; + mes "Will you and your bride please move onto the stand. I will now preform the Wedding Ceremony!"; + set event_wedding,1; + deltimer "weddinglimit1"; + deltimer "weddinglimit2"; + announce "The Wedding of "+$groom$+" and "+$bride$+", will now be held at Prontera Church.",5; + addtimer 50000,"a1"; + addtimer 55000,"a2"; + addtimer 60000,"a3"; + addtimer 65000,"a4"; + addtimer 70000,"a5"; + addtimer 75000,"a6"; + addtimer 80000,"a7"; + addtimer 85000,"a8"; + addtimer 90000,"a9"; + addtimer 95000,"a10"; + addtimer 100000,"a11"; + addtimer 105000,"a12"; + close; +L_BrideCeremony: + if(countitem(2613) < 1) goto L_NeedRing;//Items: Diamond_Ring, + if((getequipid(2) != 2338) && (getequipid(2) != 7170)) goto L_Attire; + mes "[Tristan the Third]"; + mes "Well all you have to do now is the easy part input your groom's name, remember to spell it correctly."; + input $name$; + next; + if($name$ != $groom$) goto L_WrongGroomName; + deltimer "a13"; + deltimer "weddinglimit1"; + deltimer "weddinglimit2"; + marriage $name$; + delitem 2613,1;//Items: Diamond_Ring, + getitem 2634,1;//Items: Wedding_Ring_M, + set @get_ring,1; + close; +L_CancelWedding: + mes "[Tristan the Third]"; + mes "The wedding has been cancelled by "+strcharinfo(0)+"."; + set $progress,0; + set $groom$,"null"; + set $bride$,"null"; + set @register,0; + set event_wedding,0; + set @get_ring,0; + deltimer "a1"; + deltimer "a2"; + deltimer "a3"; + deltimer "a4"; + deltimer "a5"; + deltimer "a6"; + deltimer "a7"; + deltimer "a8"; + deltimer "a9"; + deltimer "a10"; + deltimer "a11"; + deltimer "a12"; + deltimer "a13"; + close; +L_GroomNeedToRegister: + mes "[Tristan the Third]"; + mes "Hello, please register with Mary if you want me to perform a marriage for you."; + close; +L_Wedding: + if(event_wedding != 1) goto L_Guest; + mes "[Tristan the Third]"; + mes "Hello again "+strcharinfo(0)+", I hope wish for the best of luck in your life."; + close; +L_BrideNeedToRegister: + mes "[Tristan the Third]"; + mes "I'm sorry, I cannot start the ceremony if the bride has not registered yet."; + close; +L_OtherReason: + if(@get_ring == 1) goto L_Wedding; + mes "[Tristan the Third]"; + mes "Do you have a reason why these two should not be bonded in holy matrimony?"; + next; + menu "Yes I Do.",-,"No",L_NoReason; + areaannounce "prt_church.gat",0,0,350,350,"Ladies and Gentlemen,"+strcharinfo(0)+" has an objection to this marriage",0; + mes "[Tristan the Third]"; + mes "Please enter your reason, for this action."; + input $reason$; + next; + areaannounce "prt_church.gat",0,0,350,350,""+$reason$+"",0; + set $progress,0; + set $groom$,"null"; + set $bride$,"null"; + set $name$,"null"; + set $name2$,"null"; + set @register,0; + set event_wedding,0; + set @get_ring,0; + deltimer "a1"; + deltimer "a2"; + deltimer "a3"; + deltimer "a4"; + deltimer "a5"; + deltimer "a6"; + deltimer "a7"; + deltimer "a8"; + deltimer "a9"; + deltimer "a10"; + deltimer "a11"; + deltimer "a12"; + mes "The wedding has been called off."; + close; +L_NoReason: + if($groom$ == strcharinfo(0)) goto L_InProgress; + if($bride$ == strcharinfo(0)) goto L_InProgress; + mes "[Tristan the Third]"; + mes "Please have a seat than and let me continue the wedding."; + close; +L_Guest: + mes "[Tristan the Third]"; + mes "Enjoy the cerimony."; + mes "But I must continue the cerimony, so lets talk after."; + close; +L_InProgress: + mes "[Tristan the Third]"; + mes "Your wedding is in progress, please try talking with me later."; + close; +L_WrongBrideName: + mes "[Mary Happy]"; + mes "How come you forgot your wife name!? Sorry come back later when you know who you want to marry."; + close; +L_WrongGroomName: + mes "[Mary Happy]"; + mes "How come you forgot your husband name!? Sorry come back later when you know who you want to marry."; + close; +L_NeedRing: + mes "[Tristan the Third]"; + mes "You need a Diamond Ring in order to perform the wedding."; + close; +L_Attire: + if(sex == 1) goto L_NeedTuxedo; + if(sex == 0) goto L_NeedDress; + close; +L_NeedTuxedo: + mes "[Tristan the Third]"; + mes "You need a Tuxedo before we can continue the ceremony."; + close; +L_NeedDress: + mes "[Tristan the Third]"; + mes "Oh my is it your wedding day?"; + mes "Well sorry to break it to you, you need a wedding dress to get married."; + close; +} + +// Mary +prt_church.gat,95,100,4 script Mary 71,{ + mes "[Mary Happy]"; + mes "Getting married bring a lot of joy."; + mes "By any chance, you you want to get engaged with someone?"; + next; + menu "Explain the principles of Marrige",L_Principles,"How does the marrige system work.",L_WeddingSystem,"I want to get married with someone.",L_Marry,"I live solo forever!",L_LiveSolo,"Special Menu",L_GmMenu; +L_GmMenu: + set @gmlevel,getgmlevel(50); + if(@gmlevel < 50) goto L_NotGM; + mes "Hello " + strcharinfo(0) + " How i can serve you?"; + menu "Enable Same-Sex Weddings",L_EnableSameSex,"Disable Same-Sex Weddings",L_DisableSameSex,"Reset the Variables",L_ResetVariables,"Just Checking...",L_Bye; +L_NotGM: + mes "You cant have access to this special menu " + strcharinfo(0) + ""; + mes "Only GMs can change the ceremony options."; + close; +L_EnableSameSex: + set $samesex,1; + mes "Same-Sex Weddings are enabled now!"; + close; +L_DisableSameSex: + set $samesex,0; + mes "Same-Sex Weddings are disabled now!"; + close; +L_ResetVariables: + set $@progress,0; + set $groom$,"null"; + set $bride$,"null"; + set $name$,"null"; + set $name2$,"null"; + set @register,0; + set event_wedding,0; + set @get_ring,0; + set @outfit,0; + deltimer "weddinglimit1"; + deltimer "weddinglimit2"; + deltimer "a1"; + deltimer "a2"; + deltimer "a3"; + deltimer "a4"; + deltimer "a5"; + deltimer "a6"; + deltimer "a7"; + deltimer "a8"; + deltimer "a9"; + deltimer "a10"; + deltimer "a11"; + deltimer "a12"; + deltimer "a13"; + mes "All variables are reseted and timers off!"; + close; +L_Principles: + mes "[Mary Happy]"; + mes "His Majesty King Tristan III of the Rune Midgard Kingdom will be officiating this wedding, with the intent of blessing all the people through his noble message."; + next; + mes "[Mary Happy]"; + mes "Although His Majesty has a rather busy agenda, for the sake of newly married couples, he has personally come here, to the Prontera Church."; + mes "It is the favor of our King that everyone would live happily ever after."; + next; + mes "[Mary Happy]"; + mes "The proposal must be done with prudence and courtesy."; + mes "Once the wedlocks have been made, they cannot be undone."; + mes "The two who are united in marriage must be with the other forever until the day they leave this world."; + next; + mes "[Mary Happy]"; + mes "Also, males only with females, and females only with males can be wed. Although there may be those who desire a homosexual or bestial marriage... it is approved."; + next; + mes "[Mary Happy]"; + mes "If there is a significant other whom you want to spend the rest of your life with, then don't be shy to propose."; + mes "Wishing for many blessings upon couples who wish to live happily ever after.."; + close; +L_WeddingSystem: + mes "[Mary Happy]"; + mes "First make sure both players a registered to get married."; + mes "Obviously, you must know each other to get married?"; + mes "If both have registered, and you must be on the same party."; + mes "Then talk to Thristan the Third."; + next; + mes "[Mary Happy]"; + mes "You must go to Thristan the Third,"; + mes "and the Groom must talk to him first."; + mes "And you must tell him the Bride"; + mes "you wish to get married with."; + mes "Be sure to tell him exactly who you want to marry."; + next; + mes "[Mary Happy]"; + mes "After the Groom has spoken, next the Bride must talk."; + mes "Then when both of you have spoken each others names,"; + mes "Thristan the third will read out both of your names."; + next; + mes "[Mary Happy]"; + mes "After you have got married,"; + mes "you will both recive a ring of marrige."; + mes "And as soon as both of you wear these rings,"; + mes "you will be forever married with each other."; + mes "You can also be refused of a lasting marrige."; + mes "But, dont be sad."; + next; + mes "[Mary Happy]"; + mes "If there are many people that wish to get married,"; + mes "So please keep to the order you register."; + mes "Thristan does not do multiple marriges at once."; + mes "He will only see one couple at a time."; + next; + mes "[Mary Happy]"; + mes "Lastly, you must put forth your name quickly"; + mes "to Thristan the third."; + mes "After the male has said yes to marrage "; + mes "the female has 3 minutes to reply."; + mes "Or you shall forever never be able"; + mes "to get married."; + next; + mes "[Mary Happy]"; + mes "An easy way to write down the each others name,"; + mes "Send a message to each other"; + mes "then in the private message window press up"; + next; + mes "[Mary Happy]"; + mes "Then it will show the other persons name."; + mes "If you press ctrl + C that name will be saved."; + mes "Next time you need that name"; + mes "you can press shift + insert."; + mes "Then you will get that name quickly and easily."; + next; + mes "[Mary Happy]"; + mes "You should have a go at using this method."; + mes "Remeber, Press ctrl + C to save that name."; + next; + input $nametest$; + mes "[Mary Happy]"; + mes "Hopefully you will remember this method."; + mes "If you ever decide to get married."; + mes "Remember to register."; + close; +L_Marry: + mes "[Mary Happy]"; + mes "If you wish to get married you must first register."; + mes "Male is ^FF00FF120,000^000000 zeny and female is ^FF00FF100,000^000000 zeny"; + if((countitem(2338) > 0) || (countitem(7170) > 0) || (@outfit == 1)) mes "But only ^FF00FF60,000^000000 zeny for male and ^FF00FF50,000^000000 zeny for female if you already have registered before"; + mes "Both male and female must have registered,"; + mes "and both must have paid fees, have Diamond Rings and be on same party!"; + mes "The Bride will get a Wedding Dress, while the Groom will get a Chinese Tuxedo"; + next; + mes "[Mary Happy]"; + mes "If both people have paid and meet recquirements"; + mes "you are able to get married strait away."; + mes "One must be the Groom and the other the Bride."; + mes "Do you wish to register to get married?"; + if($SameSex == 1) menu "I'm gonna be the Groom",-,"I,m gonna be the Bride",L_BrideRegister,"Never mind",L_Bye; + if(event_wedding == 1) goto L_Married; + if(@register >= 1) goto L_AlreadyRegistered; + if($progress >= 2) goto L_InProgress; + if(($samesex == 0) && (sex == 0)) goto L_BrideRegister; + if((countitem(2338) > 0) || (countitem(7170) > 0) || (@outfit == 1)) goto L_GroomRegister2; + mes "[Mary Happy]"; + if(sex == 1) mes "No problem sir, please fill out your name here."; + if(sex == 0) mes "No problem miss, please fill out your name here."; + mes "And I'll need to collect a 120,000z fee for your wedding fees and outfit."; + next; + mes "[Mary Happy]"; + mes "Now You Must Insert The Your Bride's Name"; + input $name$; + next; + if(zeny < 120000) goto L_NeedZeny1; + set $groom$,strcharinfo(0); + set @register,1; + set zeny,zeny-120000; + set $progress,1; + if(sex == 1) getitem 7170,1; + if(sex == 0) getitem 2338,1; + set @outfit,1; + mes "[Mary Happy]"; + mes "You are now registered "+strcharinfo(0)+", I wish you the best of luck with your marriage."; + addtimer 300000,"weddinglimit1"; + areaannounce "prt_church.gat",0,0,350,350,strcharinfo(0)+" has registered for the wedding.",0; + next; + mes "Please hurry to the altar. We have to be ready for another wedding in 5 minutes."; + deltimer "a13"; + addtimer 300000,"a13"; + close; +L_BrideRegister: + if ($name$ != strcharinfo(0)) goto L_NotBride; + if($groom$ == strcharinfo(0)) goto L_CantMarryYourself; + if($progress != 1) goto L_GroomNotRegistered; + if(@register >= 1) goto L_AlreadyRegistered; + if((countitem(2338) > 0) || (countitem(7170) > 0) || (@outfit == 1)) goto L_BrideRegister2; + mes "[Mary Happy]"; + if(sex == 1) mes "No problem sir, please fill out your name here."; + if(sex == 0) mes "No problem mis, please fill out your name here."; + mes "And I'll need to collect a 100,000z fee for your wedding fees and outfit."; + next; + if(zeny < 100000) goto L_NeedZeny2; + mes "[Mary Happy]"; + mes "Now You Must Insert The Your Groom's Name"; + input $name2$; + if($name2$ != $groom$) goto L_WrongName; + set $bride$,strcharinfo(0); + set @register,1; + set zeny,zeny-100000; + set $progress,2; + set event_wedding,1; + if(sex == 1) getitem 7170,1; + if(sex == 0) getitem 2338,1; + set @outfit,1; + deltimer "weddinglimit1"; + addtimer 300000,"weddinglimit2"; + next; + mes "[Mary Happy]"; + mes "You are now registered "+strcharinfo(0)+", I wish you the best of luck with your wedding."; + areaannounce "prt_church.gat",0,0,350,350,strcharinfo(0)+" has registered for the wedding.",0; + next; + mes "Please hurry to the altar. We have to be ready for another wedding in 5 minutes."; + deltimer "a13"; + addtimer 300000,"a13"; + close; + +L_GroomRegister2: + mes "[Mary Happy]"; + if(sex == 1) mes "No problem sir, please fill out your name here."; + if(sex == 0) mes "No problem mis, please fill out your name here."; + mes "And I'll need to collect a 60,000z fee for your wedding fees."; + next; + mes "[Mary Happy]"; + mes "Now You Must Insert The Your Bride's Name"; + input $name$; + next; + if(zeny < 60000) goto L_NeedZeny3; + set $groom$,strcharinfo(0); + set @register,1; + set zeny,zeny-60000; + set $progress,1; + mes "[Mary Happy]"; + mes "You are now registered "+strcharinfo(0)+", I wish you the best of luck with your marriage."; + addtimer 300000,"weddinglimit1"; + areaannounce "prt_church.gat",0,0,350,350,strcharinfo(0)+" has registered for the wedding.",0; + next; + mes "Please hurry to the altar. We have to be ready for another wedding in 5 minutes."; + deltimer "a13"; + addtimer 300000,"a13"; + close; +L_BrideRegister2: + mes "[Mary Happy]"; + if(sex == 1) mes "No problem sir, please fill out your name here."; + if(sex == 0) mes "No problem mis, please fill out your name here."; + mes "And I'll need to collect a 50,000z fee for your wedding fees."; + next; + if(zeny < 50000) goto L_NeedZeny4; + mes "[Mary Happy]"; + mes "Now You Must Insert The Your Groom's Name"; + input $name2$; + if($name2$ != $groom$) goto L_WrongName; + set $bride$,strcharinfo(0); + set @register,1; + set zeny,zeny-50000; + set $progress,2; + set event_wedding,1; + deltimer "weddinglimit1"; + addtimer 300000,"weddinglimit2"; + next; + mes "[Mary Happy]"; + mes "You are now registered "+strcharinfo(0)+", I wish you the best of luck with your wedding."; + areaannounce "prt_church.gat",0,0,350,350,strcharinfo(0)+" has registered for the wedding.",0; + next; + mes "Please hurry to the altar. We have to be ready for another wedding in 5 minutes."; + deltimer "a13"; + addtimer 300000,"a13"; + close; + +L_NeedZeny1: + set @zleft,120000-zeny; + mes "[Mary Happy]"; + mes "I'm terribly sorry, I am unable to register you. You seem to be "+@zleft+"z short."; + set @zleft,0; + close; +L_NeedZeny2: + set @zleft,100000-zeny; + mes "[Mary Happy]"; + mes "I'm terribly sorry, I am unable to register you. You seem to be "+@zleft+"z short."; + set @zleft,0; + close; +L_NeedZeny3: + set @zleft,60000-zeny; + mes "[Mary Happy]"; + mes "I'm terribly sorry, I am unable to register you. You seem to be "+@zleft+"z short."; + set @zleft,0; + close; +L_NeedZeny4: + set @zleft,50000-zeny; + mes "[Mary Happy]"; + mes "I'm terribly sorry, I am unable to register you. You seem to be "+@zleft+"z short."; + set @zleft,0; + close; +L_AlreadyRegistered: + mes "[Mary Happy]"; + mes "You can't register a second time silly."; + close; + +L_Bye: + mes "[Mary Happy]"; + mes "Alrighty then, come back soon!"; + close; + +L_InProgress: + mes "[Mary Happy]"; + mes "I cannot accept registrations while a wedding is in progress, try again later."; + close; +L_WrongName: + mes "[Mary Happy]"; + mes "No one have registered with that name. Sorry."; + close; +L_GroomNotRegistered: + mes "[Mary Happy]"; + mes "The groom must register first in order to initiate the wedding."; + close; + +L_Married: + mes "[Mary Happy]"; + mes "Hello again "+strcharinfo(0)+", I hope wish for the best of luck in your life."; + close; +L_LiveSolo: + mes "[Mary Happy]"; + mes "Well live a happy bachelors life"; + close; +L_NotBride: + mes "[Mary Happy]"; + mes "You're not the bride"; + close; +L_YouCantMarryYourself: + mes "[Mary Happy]"; + mes "What the hell you trying to do? Marry yourself?O_O"; + close; +} + +prt_church.gat,95,95,4 script Mary 71,{ + mes "[Mary Sad]"; + mes "Getting divorce can bring a lot of sorrow."; + mes "By any chance, you you want to get divorced?"; + next; + menu "I came to get a divorce",L_FirstDivorce,"What do I need for a divorce",L_DivorceSystem; +L_FirstDivorce: + if(divorce > 0) goto L_AlreadyDivorced; + mes "[Mary Sad]"; + mes "So you came for a divorce, i have been divorced 2 times myself."; + mes "Life will continue whoever said you need a partner was wrong."; + mes "Dont forget that you and your partner must be online!"; + next; + menu "Are you sure",-,"No i'm not ready",L_No; + mes "[Mary Sad]"; + mes "You have made your choice,"; + mes "now you must live with it."; + next; + mes "You have been divorced!"; + set event_wedding,0; + set divorce,1; + set @register,0; + divorce; + close; +L_AlreadyDivorced: + mes "[Mary Sad]"; + mes "So you came for another divorce,wow you must be trying to find true love."; + mes "Dont worry about it, it's not you, it's their fault."; + next; + menu "Are you sure",-,"No i'm not ready",L_No; + mes "[Mary Sad]"; + mes "You have made your choice,"; + mes "now you must live with it."; + next; + mes "You have been divorced again!"; + set event_wedding,0; + set divorce,2; + set @register,0; + divorce; + close; +L_No: + mes "[Mary Sad]"; + mes "You should always be sure about what step you take in life."; + close; +L_DivorceSystem: + mes "[Mary Sad]"; + mes "You just need to wish to not be married again and i will perform the divorce."; + mes "Both you and your partner must be online."; + close; +} +prt_church.gat,99,124,0 script weddinglimit1 -1,{ + announce "The bride has not registered within the alotted time frame.",3; + announce "Your wedding has been cancelled.",3; + set $progress,0; + set $groom$,"null"; + set $name$,"null"; + set $name2$,"null"; + set @register,0; + deltimer "a1"; + deltimer "a2"; + deltimer "a3"; + deltimer "a4"; + deltimer "a5"; + deltimer "a6"; + deltimer "a7"; + deltimer "a8"; + deltimer "a9"; + deltimer "a10"; + deltimer "a11"; + deltimer "a12"; +} + +prt_church.gat,99,124,0 script weddinglimit2 -1,{ + announce "The groom has not begun the wedding ceremony by speaking to Tristan the Third.",3; + announce "Your wedding has been cancelled.",3; + set $progress,0; + set $groom$,"null"; + set $bride$,"null"; + set $name$,"null"; + set $name2$,"null"; + set @register,0; + set event_wedding,0; + deltimer "a1"; + deltimer "a2"; + deltimer "a3"; + deltimer "a4"; + deltimer "a5"; + deltimer "a6"; + deltimer "a7"; + deltimer "a8"; + deltimer "a9"; + deltimer "a10"; + deltimer "a11"; + deltimer "a12"; +} + +prt_church.gat,99,124,0 script a1 -1,{ +areaannounce "prt_church.gat",0,0,350,350,"Ladies and Gentlemen, We will now join in holy matrimony these two lovers.",0; +} +prt_church.gat,99,124,0 script a2 -1,{ +areaannounce "prt_church.gat",0,0,350,350,"Now more than ever, will both of your lives be entwined together as so will be your souls.",0; +} +prt_church.gat,99,124,0 script a3 -1,{ +areaannounce "prt_church.gat",0,0,350,350,"You will both honor and cherish each other through the best and worst of times.",0; +} +prt_church.gat,99,124,0 script a4 -1,{ +areaannounce "prt_church.gat",0,0,350,350,"The safety and well being of your other will now also be your responsibility.",0; +} +prt_church.gat,99,124,0 script a5 -1,{ +areaannounce "prt_church.gat",0,0,350,350,"May in sickness or good health, your love will burn bright as no force can extinguish it.",0; +} +prt_church.gat,99,124,0 script a6 -1,{ +areaannounce "prt_church.gat",0,0,350,350,"Those here stand witness to these vows bestowed upon you, you must act accordingly to them.",0; +} +prt_church.gat,99,124,0 script a7 -1,{ +areaannounce "prt_church.gat",0,0,350,350,"Understanding that, we are nothing more but mortals on this earth, but this is our triumph.",0; +} +prt_church.gat,99,124,0 script a8 -1,{ +areaannounce "prt_church.gat",0,0,350,350,"We here will now join these two mortal entities, and create an immortal love.",0; +} +prt_church.gat,99,124,0 script a9 -1,{ +areaannounce "prt_church.gat",0,0,350,350,$groom$+", do you you wish to take "+$bride$+" as your lawfully beloved wife?",0; +} +prt_church.gat,99,124,0 script a10 -1,{ +areaannounce "prt_church.gat",0,0,350,350,"And do you "+$bride$+", wish to take "+$groom$+" as your lawfully beloved husband?",0; +} +prt_church.gat,99,124,0 script a11 -1,{ +areaannounce "prt_church.gat",0,0,350,350,"And so be it, by the powers vested in me...",0; +} +prt_church.gat,99,124,0 script a12 -1,{ +areaannounce "prt_church.gat",0,0,350,350,"I pronouce you Husband and Wife, you may kiss the bride.",0; + wedding; + set $progress,0; + set $groom$,"null"; + set $bride$,"null"; + set $name$,"null"; + set $name2$,"null"; +} +prt_church.gat,99,124,0 script a13 -1,{ + +areaannounce "prt_church.gat",0,0,350,350,"The wedding has been cancelled.",0; + set $progress,0; + set $groom$,"null"; + set $bride$,"null"; + set $name$,"null"; + set $name2$,"null"; + set @register,0; + set event_wedding,0; + set @get_ring,0; }
\ No newline at end of file diff --git a/npc/other/weddingtxt.txt b/npc/other/weddingtxt.txt index 2caea19d6..1bc3a47c3 100644 --- a/npc/other/weddingtxt.txt +++ b/npc/other/weddingtxt.txt @@ -1,277 +1,277 @@ -//UNFINISHED! need to set names and give rings!
-//Made by AppleGirl and Evera/Lorri.
-//PROPERTY OF eATHENA! OTHER ATHENAS DON'T TOUCH THIS!
-//Note: permanent variables event_marriage. 0=nothing done yet 1=m registered 2=f registered 3=m before ring 4=f before ring 5=m married 6=f married
-
-prt_church.gat,99,125,8 script Tristan the Third 108,{
-mes "[Thristan the Third]";
-if(event_marriage == 0) goto Lreg;
-if(event_marriage == 1) goto Lmale;
-if(event_marriage == 2) goto Lfemale;
-if(event_marriage == 3) && (countitem(2634)<1) || (event_marriage == 3) && (getequipname(136) == 2634) goto Lmcere;
-if(event_marriage == 4) && (countitem(2635)<1) || (event_marriage == 4) && (getequipname(136) == 2635) goto Lfcere;
-if(event_marriage >= 5) goto Lhappy;
-//else goto Lhappy;
-//if(even
-Lreg:
-mes "If you wish to get married you must first register";
-Lmale:
-if (getequipname(16) == 7170) goto Lmale2;
-if (getequipname(16) != 7170) goto Lmale3;
-mes "OmG1! H4X0Rz!1";
-close;
-Lmale2:
-if (zeny >= 30000) goto Lmale4;
-if (zeny <= 29999) goto Lmale3;
-mes "OmG1! H4X0Rz!1";
-close;
-//NOTE! Triggers to save/respond names aren't done!
-Lmale4:
- mes "Hello, how are you doing this wonderful day? Ah. I see you've registered to marry";
- mes "Do you wish to marry?";
-menu
-"yes",Lmyes,"No",Lcancel;
-Lmyes:
-//enable for input; can't be done with current script.c
-// mes"What is your bride's name?";
-// input @namemale;
- next;
- mes "I will now collect your ^FF00FFmoney^000000.";
- set Zeny, Zeny-30000;
- next;
-//enable for input; can't be done with current script.c
-// input @namemale;
- mes "Here is the ring. Please put it on your bride's hand";
- mes "By the holy power invested in me..";
- mes "I now pronounce you husband and wife!";
- mes "you may now kiss the bride.";
- emotion 46;
-//enable for setvariable
- set event_marriage,3;
- getitem 2634,1;
- close;
-Lmale3:
- mes "Hm, have you forgotten to bring your ^FF00FFTuxedo^000000 or ^FF00FFmoney^000000?";
- mes "Have a good look for it.";
- mes "Because you must bring it in order to get married.";
- mes "If you have it right now, please show me";
-close;
-Lfemale:
-if (zeny >= 20000) goto Lfemale4;
-if (zeny <= 19999) goto Lfemale3;
-mes "OmG1! H4X0Rz!1";
-close;
-Lfemale4:
- mes "Hello, how are you doing this wonderful day? Ah. I see you've registered to marry";
- mes "Do you wish to marry?";
-menu
-"yes",Lfyes,"No",Lcancel;
-Lfyes:
-//enable for input; can't be done with current script.c
-// mes "What is your groom's name?";
-// input @namefemale;
- next;
- mes "I will now collect your ^FF00FFmoney^000000.";
- set Zeny, Zeny-20000;
- next;
-//enable for input; can't be done with current script.c
- input @namefemale;
- mes "Here is the ring. Please put it on your groom's hand";
- mes "By the holy power invested in me..";
- mes "I now pronounce you husband and wife!";
-//enable for setvariable
- set event_marriage,4;
- getitem 2635,1;
- close;
-Lfemale3:
- mes "Hm, have you forgotten to bring your ^FF00FFWedding Veil^000000, ^FF00FFWedding Dress^000000, or ^FF00FFMoney^000000?";
- mes "Have a good look for it.";
- mes "Because you must bring it in order to get married.";
- mes "If you have it right now, please show me";
-close;
-Lmcere:
- mes "By the holy power invested in me..";
- mes "I now pronounce you husband and wife!";
- mes "you may now kiss the bride.";
- emotion 46;
- set event_marriage,5;
-close;
-Lfcere:
-
- mes "By the holy power invested in me..";
- mes "I now pronounce you husband and wife!";
- emotion 46;
- set event_marriage,6;
-close;
-Lhappy:
-mes "I hope your marriage is happy and successful!";
-close;
-Lcancel:
-mes "A true pity. I hope to see you another time.";
-close;
-}
-prt_church.gat,95,100,3 script Mary 71,{
-mes "[Mary Happy]";
-if(event_marriage == 0) goto Lstart;
-if(event_marriage != 0) goto Lhappy;
-mes "OmG1! H4X0Rz!1";
-close;
-Lstart:
-mes "Getting married bring a lot of joy.";
-mes "By any chance, you you want to get engaged with someone?";
-next;
-menu "Explain the principles of Marrige",Lprinciples,"How does the marrige system work.",Lsystem,"I want to get married with someone.",Lmarried,"I live solo forever!",Lsolo;
-
-Lprinciples:
- mes "[Mary Happy]";
- mes "His Majesty King Tristan III of the Rune Midgard Kingdom will be officiating this wedding, with the intent of blessing all the people through his noble message.";
- next;
- mes "[Mary Happy]";
- mes "Although His Majesty has a rather busy agenda, for the sake of newly married couples, he has personally come here, to the Prontera Church.";
- mes "It is the favor of our King that everyone would live happily ever after.";
- next;
- mes "[Mary Happy]";
- mes "The proposal must be done with prudence and courtesy.";
- mes "Once the wedlocks have been made, they cannot be undone.";
- mes "The two who are united in marriage must be with the other forever until the day they leave this world.";
- next;
- mes "[Mary Happy]";
- mes "Also, males only with females, and females only with males can be wed. Although there may be those who desire a homosexual or bestial marriage... it is not approved.";
- next;
- mes "[Mary Happy]";
- mes "If there is a significant other whom you want to spend the rest of your life with, then don't be shy to propose.";
- mes "Wishing for many blessings upon couples who wish to live happily ever after..";
- close;
-Lsystem:
- mes "[Mary Happy]";
- mes "First make sure both players a registered to get married.";
- mes "Obviously, you must know each other to get married?";
- mes "If both have registered, and you must be on the same party.";
- mes "Then talk to Thristan the Third.";
- next;
- mes "[Mary Happy]";
- mes "You must go to Thristan the Third,";
- mes "and the male must talk to him first.";
- mes "And you must tell him the girl";
- mes "you wish to get married with.";
- mes "Be sure to tell him exactly who you want to marry.";
- next;
- mes "[Mary Happy]";
- mes "After the male has spoken, next the female must talk.";
- mes "Then when both of you have spoken each others names,";
- mes "Thristan the third will read out both of your names.";
- next;
- mes "[Mary Happy]";
- mes "After you have got married,";
- mes "you will both recive a ring of marrige.";
- mes "And as soon as both of you wear these rings,";
- mes "you will be forever married with each other.";
- mes "You can also be refused of a lasting marrige.";
- mes "But, dont be sad.";
- next;
- mes "[Mary Happy]";
- mes "If there are many people that wish to get married,";
- mes "So please keep to the order you register.";
- mes "Thristan does not do multiple marriges at once.";
- mes "He will only see one couple at a time.";
- next;
- mes "[Mary Happy]";
- mes "Lastly, you must put forth your name quickly";
- mes "to Thristan the third.";
- mes "After the male has said yes to marrage ";
- mes "the female has 3 minutes to reply.";
- mes "Or you shall forever never be able";
- mes "to get married.";
- next;
- mes "[Mary Happy]";
- mes "An easy way to write down the each others name,";
- mes "Send a message to each other";
- mes "then in the private message window press up";
- next;
-//o_O who removed this part? we use a diff system now
-// mes "[Mary Happy]";
-// mes "Then it will show the other persons name.";
-// mes "If you press ctrl + C that name will be saved.";
-// mes "Next time you need that name";
-// mes "you can press shift + insert.";
-// mes "Then you will get that name quickly and easily.";
-// next;
-// mes "[Mary Happy]";
-// mes "You should have a go at using this method.";
-// mes "Remeber, Press ctrl + C to save that name.";
-// next;
-// input @nametest;
- mes "[Mary Happy]";
- mes "Hopefully you will remember this method.";
- mes "If you ever decide to get married.";
- mes "Remember to register.";
-Lmarried:
- mes "[Mary Happy]";
- mes "If you wish to get married you must first register.";
- mes "Male is ^FF00FF30,000^000000 zeny and female is ^FF00FF20,000^000000 zeny";
- mes "Both male and female must have registered,";
- mes "and both must have paid fees,";
- mes "and the female must have a wedding veil.";
- next;
- mes "[Mary Happy]";
- mes "If both people have paid and meet recquirements";
- mes "you are able to get married strait away.";
- mes "Do you wish to register to get married?";
- menu "Yes",LYes,"No",LNo;
-LYes:
-//add check for sex and if veil and tuxedo and wedding dress
-if (Sex == 1) goto Lmale;
-if (Sex == 0) goto Lfemale;
-Lmale:
-if (getequipname(16) == 7170) goto Lmale2;
-if (getequipname(16) != 7170) goto Lmale3;
-mes "[Mary Happy]";
-mes "OmG1! H4X0Rz!1";
-close;
-Lmale2:
-if (zeny >= 30000) goto Lmale4;
-if (zeny <= 29999) goto Lmale3;
-mes "[Mary Happy]";
-mes "OmG1! H4X0Rz!1";
-close;
-Lmale4:
- set event_marriage,1;
- mes "[Mary Happy]";
- mes "You are now registered =) go talk to his majesty, King Tristan III for your marriage.";
-close;
-Lmale3:
- mes "[Mary Happy]";
- mes "Hm, have you forgotten to bring your ^FF00FFTuxedo^000000 or ^FF00FFmoney^000000?";
- mes "Have a good look for it.";
- mes "Because you must bring it in order to get married.";
- mes "If you have it right now, please show me";
-close;
-
-Lfemale:
-if (getequipname(16) == 2338) && (getequipname(256) == 2206) goto Lfemale2;
-if (getequipname(16) != 2338) || (getequipname(256) == 2206) goto Lfemale3;
-mes "[Mary Happy]";
-mes "OmG1! H4X0Rz!1";
-Lfemale2:
-if (zeny >= 20000) goto Lfemale4;
-if (zeny <= 19999) goto Lfemale3;
-mes "[Mary Happy]";
-mes "OmG1! H4X0Rz!1";
-Lfemale4:
- set event_marriage,2;
- mes "[Mary Happy]";
- mes "You are now registered =) go talk to his majesty, King Tristan III for your marriage.";
-Lfemale3:
- mes "[Mary Happy]";
- mes "Hm, have you forgotten to bring your ^FF00FFWedding Veil^000000, ^FF00FFWedding Dress^000000, or ^FF00FFMoney^000000?";
- mes "Have a good look for it.";
- mes "Because you must bring it in order to get married.";
- mes "If you have it right now, please show me";
-close;
-LNo:
- mes "I hope you have a wonderful day!";
-close;
-Lhappy:
- mes "I hope your marriage is happy and successful!";
-close;
+//UNFINISHED! need to set names and give rings! +//Made by AppleGirl and Evera/Lorri. +//PROPERTY OF eATHENA! OTHER ATHENAS DON'T TOUCH THIS! +//Note: permanent variables event_marriage. 0=nothing done yet 1=m registered 2=f registered 3=m before ring 4=f before ring 5=m married 6=f married + +prt_church.gat,99,125,8 script Tristan the Third 108,{ +mes "[Thristan the Third]"; +if(event_marriage == 0) goto Lreg; +if(event_marriage == 1) goto Lmale; +if(event_marriage == 2) goto Lfemale; +if(event_marriage == 3) && (countitem(2634)<1) || (event_marriage == 3) && (getequipname(136) == 2634) goto Lmcere; +if(event_marriage == 4) && (countitem(2635)<1) || (event_marriage == 4) && (getequipname(136) == 2635) goto Lfcere; +if(event_marriage >= 5) goto Lhappy; +//else goto Lhappy; +//if(even +Lreg: +mes "If you wish to get married you must first register"; +Lmale: +if (getequipname(16) == 7170) goto Lmale2; +if (getequipname(16) != 7170) goto Lmale3; +mes "OmG1! H4X0Rz!1"; +close; +Lmale2: +if (zeny >= 30000) goto Lmale4; +if (zeny <= 29999) goto Lmale3; +mes "OmG1! H4X0Rz!1"; +close; +//NOTE! Triggers to save/respond names aren't done! +Lmale4: + mes "Hello, how are you doing this wonderful day? Ah. I see you've registered to marry"; + mes "Do you wish to marry?"; +menu +"yes",Lmyes,"No",Lcancel; +Lmyes: +//enable for input; can't be done with current script.c +// mes"What is your bride's name?"; +// input @namemale; + next; + mes "I will now collect your ^FF00FFmoney^000000."; + set Zeny, Zeny-30000; + next; +//enable for input; can't be done with current script.c +// input @namemale; + mes "Here is the ring. Please put it on your bride's hand"; + mes "By the holy power invested in me.."; + mes "I now pronounce you husband and wife!"; + mes "you may now kiss the bride."; + emotion 46; +//enable for setvariable + set event_marriage,3; + getitem 2634,1; + close; +Lmale3: + mes "Hm, have you forgotten to bring your ^FF00FFTuxedo^000000 or ^FF00FFmoney^000000?"; + mes "Have a good look for it."; + mes "Because you must bring it in order to get married."; + mes "If you have it right now, please show me"; +close; +Lfemale: +if (zeny >= 20000) goto Lfemale4; +if (zeny <= 19999) goto Lfemale3; +mes "OmG1! H4X0Rz!1"; +close; +Lfemale4: + mes "Hello, how are you doing this wonderful day? Ah. I see you've registered to marry"; + mes "Do you wish to marry?"; +menu +"yes",Lfyes,"No",Lcancel; +Lfyes: +//enable for input; can't be done with current script.c +// mes "What is your groom's name?"; +// input @namefemale; + next; + mes "I will now collect your ^FF00FFmoney^000000."; + set Zeny, Zeny-20000; + next; +//enable for input; can't be done with current script.c + input @namefemale; + mes "Here is the ring. Please put it on your groom's hand"; + mes "By the holy power invested in me.."; + mes "I now pronounce you husband and wife!"; +//enable for setvariable + set event_marriage,4; + getitem 2635,1; + close; +Lfemale3: + mes "Hm, have you forgotten to bring your ^FF00FFWedding Veil^000000, ^FF00FFWedding Dress^000000, or ^FF00FFMoney^000000?"; + mes "Have a good look for it."; + mes "Because you must bring it in order to get married."; + mes "If you have it right now, please show me"; +close; +Lmcere: + mes "By the holy power invested in me.."; + mes "I now pronounce you husband and wife!"; + mes "you may now kiss the bride."; + emotion 46; + set event_marriage,5; +close; +Lfcere: + + mes "By the holy power invested in me.."; + mes "I now pronounce you husband and wife!"; + emotion 46; + set event_marriage,6; +close; +Lhappy: +mes "I hope your marriage is happy and successful!"; +close; +Lcancel: +mes "A true pity. I hope to see you another time."; +close; +} +prt_church.gat,95,100,3 script Mary 71,{ +mes "[Mary Happy]"; +if(event_marriage == 0) goto Lstart; +if(event_marriage != 0) goto Lhappy; +mes "OmG1! H4X0Rz!1"; +close; +Lstart: +mes "Getting married bring a lot of joy."; +mes "By any chance, you you want to get engaged with someone?"; +next; +menu "Explain the principles of Marrige",Lprinciples,"How does the marrige system work.",Lsystem,"I want to get married with someone.",Lmarried,"I live solo forever!",Lsolo; + +Lprinciples: + mes "[Mary Happy]"; + mes "His Majesty King Tristan III of the Rune Midgard Kingdom will be officiating this wedding, with the intent of blessing all the people through his noble message."; + next; + mes "[Mary Happy]"; + mes "Although His Majesty has a rather busy agenda, for the sake of newly married couples, he has personally come here, to the Prontera Church."; + mes "It is the favor of our King that everyone would live happily ever after."; + next; + mes "[Mary Happy]"; + mes "The proposal must be done with prudence and courtesy."; + mes "Once the wedlocks have been made, they cannot be undone."; + mes "The two who are united in marriage must be with the other forever until the day they leave this world."; + next; + mes "[Mary Happy]"; + mes "Also, males only with females, and females only with males can be wed. Although there may be those who desire a homosexual or bestial marriage... it is not approved."; + next; + mes "[Mary Happy]"; + mes "If there is a significant other whom you want to spend the rest of your life with, then don't be shy to propose."; + mes "Wishing for many blessings upon couples who wish to live happily ever after.."; + close; +Lsystem: + mes "[Mary Happy]"; + mes "First make sure both players a registered to get married."; + mes "Obviously, you must know each other to get married?"; + mes "If both have registered, and you must be on the same party."; + mes "Then talk to Thristan the Third."; + next; + mes "[Mary Happy]"; + mes "You must go to Thristan the Third,"; + mes "and the male must talk to him first."; + mes "And you must tell him the girl"; + mes "you wish to get married with."; + mes "Be sure to tell him exactly who you want to marry."; + next; + mes "[Mary Happy]"; + mes "After the male has spoken, next the female must talk."; + mes "Then when both of you have spoken each others names,"; + mes "Thristan the third will read out both of your names."; + next; + mes "[Mary Happy]"; + mes "After you have got married,"; + mes "you will both recive a ring of marrige."; + mes "And as soon as both of you wear these rings,"; + mes "you will be forever married with each other."; + mes "You can also be refused of a lasting marrige."; + mes "But, dont be sad."; + next; + mes "[Mary Happy]"; + mes "If there are many people that wish to get married,"; + mes "So please keep to the order you register."; + mes "Thristan does not do multiple marriges at once."; + mes "He will only see one couple at a time."; + next; + mes "[Mary Happy]"; + mes "Lastly, you must put forth your name quickly"; + mes "to Thristan the third."; + mes "After the male has said yes to marrage "; + mes "the female has 3 minutes to reply."; + mes "Or you shall forever never be able"; + mes "to get married."; + next; + mes "[Mary Happy]"; + mes "An easy way to write down the each others name,"; + mes "Send a message to each other"; + mes "then in the private message window press up"; + next; +//o_O who removed this part? we use a diff system now +// mes "[Mary Happy]"; +// mes "Then it will show the other persons name."; +// mes "If you press ctrl + C that name will be saved."; +// mes "Next time you need that name"; +// mes "you can press shift + insert."; +// mes "Then you will get that name quickly and easily."; +// next; +// mes "[Mary Happy]"; +// mes "You should have a go at using this method."; +// mes "Remeber, Press ctrl + C to save that name."; +// next; +// input @nametest; + mes "[Mary Happy]"; + mes "Hopefully you will remember this method."; + mes "If you ever decide to get married."; + mes "Remember to register."; +Lmarried: + mes "[Mary Happy]"; + mes "If you wish to get married you must first register."; + mes "Male is ^FF00FF30,000^000000 zeny and female is ^FF00FF20,000^000000 zeny"; + mes "Both male and female must have registered,"; + mes "and both must have paid fees,"; + mes "and the female must have a wedding veil."; + next; + mes "[Mary Happy]"; + mes "If both people have paid and meet recquirements"; + mes "you are able to get married strait away."; + mes "Do you wish to register to get married?"; + menu "Yes",LYes,"No",LNo; +LYes: +//add check for sex and if veil and tuxedo and wedding dress +if (Sex == 1) goto Lmale; +if (Sex == 0) goto Lfemale; +Lmale: +if (getequipname(16) == 7170) goto Lmale2; +if (getequipname(16) != 7170) goto Lmale3; +mes "[Mary Happy]"; +mes "OmG1! H4X0Rz!1"; +close; +Lmale2: +if (zeny >= 30000) goto Lmale4; +if (zeny <= 29999) goto Lmale3; +mes "[Mary Happy]"; +mes "OmG1! H4X0Rz!1"; +close; +Lmale4: + set event_marriage,1; + mes "[Mary Happy]"; + mes "You are now registered =) go talk to his majesty, King Tristan III for your marriage."; +close; +Lmale3: + mes "[Mary Happy]"; + mes "Hm, have you forgotten to bring your ^FF00FFTuxedo^000000 or ^FF00FFmoney^000000?"; + mes "Have a good look for it."; + mes "Because you must bring it in order to get married."; + mes "If you have it right now, please show me"; +close; + +Lfemale: +if (getequipname(16) == 2338) && (getequipname(256) == 2206) goto Lfemale2; +if (getequipname(16) != 2338) || (getequipname(256) == 2206) goto Lfemale3; +mes "[Mary Happy]"; +mes "OmG1! H4X0Rz!1"; +Lfemale2: +if (zeny >= 20000) goto Lfemale4; +if (zeny <= 19999) goto Lfemale3; +mes "[Mary Happy]"; +mes "OmG1! H4X0Rz!1"; +Lfemale4: + set event_marriage,2; + mes "[Mary Happy]"; + mes "You are now registered =) go talk to his majesty, King Tristan III for your marriage."; +Lfemale3: + mes "[Mary Happy]"; + mes "Hm, have you forgotten to bring your ^FF00FFWedding Veil^000000, ^FF00FFWedding Dress^000000, or ^FF00FFMoney^000000?"; + mes "Have a good look for it."; + mes "Because you must bring it in order to get married."; + mes "If you have it right now, please show me"; +close; +LNo: + mes "I hope you have a wonderful day!"; +close; +Lhappy: + mes "I hope your marriage is happy and successful!"; +close; }
\ No newline at end of file |