summaryrefslogtreecommitdiff
path: root/npc/custom/mvm.txt
diff options
context:
space:
mode:
Diffstat (limited to 'npc/custom/mvm.txt')
-rw-r--r--npc/custom/mvm.txt1052
1 files changed, 526 insertions, 526 deletions
diff --git a/npc/custom/mvm.txt b/npc/custom/mvm.txt
index 42891324f..251759a7c 100644
--- a/npc/custom/mvm.txt
+++ b/npc/custom/mvm.txt
@@ -1,7 +1,7 @@
//===== rAthena Script =======================================
//= Monster vs Monster
//===== By: ==================================================
-//= acky - god@acky.com
+//= acky
//===== Current Version: =====================================
//= 1.2
//===== Compatible With: =====================================
@@ -21,542 +21,542 @@
//= 1.1.4 Fixed SummonPad syntax. [KarLaeda]
//= 1.1.5 Some cleanup & optimization [KarLaeda]
//= 1.2 Replaced effect numerics with constants. [Samuray22]
-//============================================================
+//============================================================
// Entrance //
prontera,158,193,6 script Monster Arena 702,{
-mes "[Monster Arena]";
-mes "Would you like to enter the Monster Arena?";
-mes "Currently ^FF0000" + getmapusers("gon_test") + "^000000 players";
-mes "^FF0000Note:^000000 Pecos, Falcons and Carts will be lost on entry.";
+ mes "[Monster Arena]";
+ mes "Would you like to enter the Monster Arena?";
+ mes "Currently ^FF0000" + getmapusers("gon_test") + "^000000 players";
+ mes "^FF0000Note:^000000 Pecos, Falcons and Carts will be lost on entry.";
L_Menu:
-next;
-menu "Enter",-,"Information",L_Info,"Cancel",L_Exit;
+ next;
+ menu "Enter",-,"Information",L_Info,"Cancel",L_Exit;
-set @marena,1;
-savepoint "gon_test",56,99;
-set @battle,0;
-warp "gon_test",57,99;
-close;
+ set @marena,1;
+ savepoint "gon_test",56,99;
+ set @battle,0;
+ warp "gon_test",57,99;
+ close;
L_Exit:
-mes "[Monster Arena]";
-mes "Come back any time.";
-close;
+ mes "[Monster Arena]";
+ mes "Come back any time.";
+ close;
L_Info:
-mes "[Monster Arena]";
-mes "You must purchase a pet from the Monster Tamer to start fighting.";
-next;
-mes "[Monster Arena]";
-mes "Then talk to the Usher and tell him you would like to compete.";
-next;
-mes "[Monster Arena]";
-mes "Talk to the referee to summon your monster.";
-mes "Once your monster has fought, you must talk to the Usher again and choose to spectate.";
-next;
-mes "[Monster Arena]";
-mes "Talk to the Monster Trainer, he will ask you to heal your pet.";
-next;
-mes "[Monster Arena]";
-mes "To do this, click the Nurse repearedly until it says your pet is healed.";
-next;
-mes "[Monster Arena]";
-mes "The more monsters you kill, the more exp you get and the quicker you can upgrade.";
-next;
-mes "[Monster Arena]";
-mes "The stronger your monster is, the longer it will take to summon again.";
-
-goto L_Menu;
+ mes "[Monster Arena]";
+ mes "You must purchase a pet from the Monster Tamer to start fighting.";
+ next;
+ mes "[Monster Arena]";
+ mes "Then talk to the Usher and tell him you would like to compete.";
+ next;
+ mes "[Monster Arena]";
+ mes "Talk to the referee to summon your monster.";
+ mes "Once your monster has fought, you must talk to the Usher again and choose to spectate.";
+ next;
+ mes "[Monster Arena]";
+ mes "Talk to the Monster Trainer, he will ask you to heal your pet.";
+ next;
+ mes "[Monster Arena]";
+ mes "To do this, click the Nurse repearedly until it says your pet is healed.";
+ next;
+ mes "[Monster Arena]";
+ mes "The more monsters you kill, the more exp you get and the quicker you can upgrade.";
+ next;
+ mes "[Monster Arena]";
+ mes "The stronger your monster is, the longer it will take to summon again.";
+
+ goto L_Menu;
}
// Monster Summon Function //
function script monstersummon {
-// 1. ---Change to Add Monsters--- //
-if (#monster == 10) summon strcharinfo(0) + "'s Poring",1002, "OnPoringKilled";
-if (#monster == 20) summon strcharinfo(0) + "'s Fabre",1007, "OnFaberKilled";
-if (#monster == 30) summon strcharinfo(0) + "'s Lunatic",1063, "OnLunaticKilled";
-if (#monster == 31) summon strcharinfo(0) + "'s Drops",1113, "OnDropsKilled";
-if (#monster == 32) summon strcharinfo(0) + "'s Picky",1049, "OnPickyKilled";
-if (#monster == 40) summon strcharinfo(0) + "'s ChonChon",1011, "OnChonChonKilled";
-if (#monster == 41) summon strcharinfo(0) + "'s Super Picky",1050, "OnSPickyKilled";
-if (#monster == 42) summon strcharinfo(0) + "'s Willow",1010, "OnWillowKilled";
-if (#monster == 50) summon strcharinfo(0) + "'s Roda Frog",1012, "OnRodaKilled";
-if (#monster == 51) summon strcharinfo(0) + "'s Condor",1009, "OnCondorKilled";
-if (#monster == 60) summon strcharinfo(0) + "'s Thief Bug Larva",1051, "OnThiefKilled";
-if (#monster == 70) summon strcharinfo(0) + "'s Savage Babe",1167, "OnSavageKilled";
-if (#monster == 80) summon strcharinfo(0) + "'s Familiar",1005, "OnFamiliarKilled";
-if (#monster == 81) summon strcharinfo(0) + "'s Hornet",1004, "OnHornetKilled";
-if (#monster == 90) summon strcharinfo(0) + "'s Desert Wolf Puppy",1107, "OnPuppyKilled";
-if (#monster == 91) summon strcharinfo(0) + "'s Spore",1014, "OnSporeKilled";
-if (#monster == 92) summon strcharinfo(0) + "'s Rocker",1052, "OnRockerKilled";
-if (#monster == 100) summon strcharinfo(0) + "'s Skeleton",1076, "OnSkeletonKilled";
-if (#monster == 101) summon strcharinfo(0) + "'s Plankton",1161, "OnPlanktonKilled";
-if (#monster == 102) summon strcharinfo(0) + "'s Antonio",1247, "OnAntonioKilled";
-if (#monster == 103) summon strcharinfo(0) + "'s Thief Bug Female",1053, "OnThiefFemaleKilled";
-close;
+ // 1. ---Change to Add Monsters--- //
+ if (#monster == 10) summon strcharinfo(0) + "'s Poring",1002, "OnPoringKilled";
+ if (#monster == 20) summon strcharinfo(0) + "'s Fabre",1007, "OnFaberKilled";
+ if (#monster == 30) summon strcharinfo(0) + "'s Lunatic",1063, "OnLunaticKilled";
+ if (#monster == 31) summon strcharinfo(0) + "'s Drops",1113, "OnDropsKilled";
+ if (#monster == 32) summon strcharinfo(0) + "'s Picky",1049, "OnPickyKilled";
+ if (#monster == 40) summon strcharinfo(0) + "'s ChonChon",1011, "OnChonChonKilled";
+ if (#monster == 41) summon strcharinfo(0) + "'s Super Picky",1050, "OnSPickyKilled";
+ if (#monster == 42) summon strcharinfo(0) + "'s Willow",1010, "OnWillowKilled";
+ if (#monster == 50) summon strcharinfo(0) + "'s Roda Frog",1012, "OnRodaKilled";
+ if (#monster == 51) summon strcharinfo(0) + "'s Condor",1009, "OnCondorKilled";
+ if (#monster == 60) summon strcharinfo(0) + "'s Thief Bug Larva",1051, "OnThiefKilled";
+ if (#monster == 70) summon strcharinfo(0) + "'s Savage Babe",1167, "OnSavageKilled";
+ if (#monster == 80) summon strcharinfo(0) + "'s Familiar",1005, "OnFamiliarKilled";
+ if (#monster == 81) summon strcharinfo(0) + "'s Hornet",1004, "OnHornetKilled";
+ if (#monster == 90) summon strcharinfo(0) + "'s Desert Wolf Puppy",1107, "OnPuppyKilled";
+ if (#monster == 91) summon strcharinfo(0) + "'s Spore",1014, "OnSporeKilled";
+ if (#monster == 92) summon strcharinfo(0) + "'s Rocker",1052, "OnRockerKilled";
+ if (#monster == 100) summon strcharinfo(0) + "'s Skeleton",1076, "OnSkeletonKilled";
+ if (#monster == 101) summon strcharinfo(0) + "'s Plankton",1161, "OnPlanktonKilled";
+ if (#monster == 102) summon strcharinfo(0) + "'s Antonio",1247, "OnAntonioKilled";
+ if (#monster == 103) summon strcharinfo(0) + "'s Thief Bug Female",1053, "OnThiefFemaleKilled";
+ close;
}
// Referee //
- script monsterreferee 61,{
-if (@fighting == 1) end;
-if (@battle == 1) goto L_Start;
-end;
+ if (@fighting == 1) end;
+ if (@battle == 1) goto L_Start;
+ end;
L_Start:
-mes "[Referee]";
-mes "Your monster is:";
-
-// 2. ---Change to Add Monsters--- //
-if (#monster == 10) mes "Poring";
-if (#monster == 20) mes "Faber";
-if (#monster == 30) mes "Lunatic";
-if (#monster == 31) mes "Drops";
-if (#monster == 32) mes "Picky";
-if (#monster == 40) mes "ChonChon";
-if (#monster == 41) mes "Super Picky";
-if (#monster == 42) mes "Willow";
-if (#monster == 50) mes "Roda Frog";
-if (#monster == 51) mes "Condor";
-if (#monster == 60) mes "Thief Bug Larva";
-if (#monster == 70) mes "Savage Babe";
-if (#monster == 80) mes "Familiar";
-if (#monster == 81) mes "Hornet";
-if (#monster == 90) mes "Desert Wolf Puppy";
-if (#monster == 91) mes "Spore";
-if (#monster == 92) mes "Rocker";
-if (#monster == 100) mes "Skeleton";
-if (#monster == 101) mes "Plankton";
-if (#monster == 102) mes "Antonio";
-if (#monster == 103) mes "Thief Bug Female";
-
-mes "Would you like to fight?";
-next;
-menu "Fight",-,"Cancel",L_Exit;
-
-set @fighting,1;
-set #heal,1;
-set @special,rand (100); // Chance of special summon
-if (@special == 1) goto Special1;
-if (@special == 2) goto Special2;
-if (@special == 3) goto Special3;
-if (@special == 4) goto Special4;
-if (@special == 5) goto Special5;
-
-callfunc "monstersummon";
-close;
-
-// Special Summons //
+ mes "[Referee]";
+ mes "Your monster is:";
+
+ // 2. ---Change to Add Monsters--- //
+ if (#monster == 10) mes "Poring";
+ if (#monster == 20) mes "Faber";
+ if (#monster == 30) mes "Lunatic";
+ if (#monster == 31) mes "Drops";
+ if (#monster == 32) mes "Picky";
+ if (#monster == 40) mes "ChonChon";
+ if (#monster == 41) mes "Super Picky";
+ if (#monster == 42) mes "Willow";
+ if (#monster == 50) mes "Roda Frog";
+ if (#monster == 51) mes "Condor";
+ if (#monster == 60) mes "Thief Bug Larva";
+ if (#monster == 70) mes "Savage Babe";
+ if (#monster == 80) mes "Familiar";
+ if (#monster == 81) mes "Hornet";
+ if (#monster == 90) mes "Desert Wolf Puppy";
+ if (#monster == 91) mes "Spore";
+ if (#monster == 92) mes "Rocker";
+ if (#monster == 100) mes "Skeleton";
+ if (#monster == 101) mes "Plankton";
+ if (#monster == 102) mes "Antonio";
+ if (#monster == 103) mes "Thief Bug Female";
+
+ mes "Would you like to fight?";
+ next;
+ menu "Fight",-,"Cancel",L_Exit;
+
+ set @fighting,1;
+ set #heal,1;
+ set @special,rand (100); // Chance of special summon
+ if (@special == 1) goto Special1;
+ if (@special == 2) goto Special2;
+ if (@special == 3) goto Special3;
+ if (@special == 4) goto Special4;
+ if (@special == 5) goto Special5;
+
+ callfunc "monstersummon";
+ close;
+
+ // Special Summons //
Special1:
-summon strcharinfo(0) + "'s Assault Team",1002, "OnPoringKilled";
-summon strcharinfo(0) + "'s Assault Team",1002, "OnPoringKilled";
-summon strcharinfo(0) + "'s Assault Team",1002, "OnPoringKilled";
-summon strcharinfo(0) + "'s Assault Team",1002, "OnPoringKilled";
-summon strcharinfo(0) + "'s Assault Team",1002, "OnPoringKilled";
-summon strcharinfo(0) + "'s Assault Team",1002, "OnPoringKilled";
-summon strcharinfo(0) + "'s Assault Team",1002, "OnPoringKilled";
-summon strcharinfo(0) + "'s Assault Team",1002, "OnPoringKilled";
-summon strcharinfo(0) + "'s Assault Team",1002, "OnPoringKilled";
-summon strcharinfo(0) + "'s Assault Team",1002, "OnPoringKilled";
-summon strcharinfo(0) + "'s Assault Team",1002, "OnPoringKilled";
-summon strcharinfo(0) + "'s Assault Team",1002, "OnPoringKilled";
-summon strcharinfo(0) + "'s Assault Team",1002, "OnPoringKilled";
-summon strcharinfo(0) + "'s Assault Team",1002, "OnPoringKilled";
-summon strcharinfo(0) + "'s Assault Team",1002, "OnPoringKilled";
-summon strcharinfo(0) + "'s Assault Team",1002, "OnPoringKilled";
-summon strcharinfo(0) + "'s Assault Team",1002, "OnPoringKilled";
-summon strcharinfo(0) + "'s Assault Team",1002, "OnPoringKilled";
-summon strcharinfo(0) + "'s Assault Team",1002, "OnPoringKilled";
-summon strcharinfo(0) + "'s Assault Team",1002, "OnPoringKilled";
-summon strcharinfo(0) + "'s Assault Team",1002, "OnPoringKilled";
-summon strcharinfo(0) + "'s Assault Team",1002, "OnPoringKilled";
-summon strcharinfo(0) + "'s Assault Team",1002, "OnPoringKilled";
-summon strcharinfo(0) + "'s Assault Team",1002, "OnPoringKilled";
-close;
+ summon strcharinfo(0) + "'s Assault Team",1002, "OnPoringKilled";
+ summon strcharinfo(0) + "'s Assault Team",1002, "OnPoringKilled";
+ summon strcharinfo(0) + "'s Assault Team",1002, "OnPoringKilled";
+ summon strcharinfo(0) + "'s Assault Team",1002, "OnPoringKilled";
+ summon strcharinfo(0) + "'s Assault Team",1002, "OnPoringKilled";
+ summon strcharinfo(0) + "'s Assault Team",1002, "OnPoringKilled";
+ summon strcharinfo(0) + "'s Assault Team",1002, "OnPoringKilled";
+ summon strcharinfo(0) + "'s Assault Team",1002, "OnPoringKilled";
+ summon strcharinfo(0) + "'s Assault Team",1002, "OnPoringKilled";
+ summon strcharinfo(0) + "'s Assault Team",1002, "OnPoringKilled";
+ summon strcharinfo(0) + "'s Assault Team",1002, "OnPoringKilled";
+ summon strcharinfo(0) + "'s Assault Team",1002, "OnPoringKilled";
+ summon strcharinfo(0) + "'s Assault Team",1002, "OnPoringKilled";
+ summon strcharinfo(0) + "'s Assault Team",1002, "OnPoringKilled";
+ summon strcharinfo(0) + "'s Assault Team",1002, "OnPoringKilled";
+ summon strcharinfo(0) + "'s Assault Team",1002, "OnPoringKilled";
+ summon strcharinfo(0) + "'s Assault Team",1002, "OnPoringKilled";
+ summon strcharinfo(0) + "'s Assault Team",1002, "OnPoringKilled";
+ summon strcharinfo(0) + "'s Assault Team",1002, "OnPoringKilled";
+ summon strcharinfo(0) + "'s Assault Team",1002, "OnPoringKilled";
+ summon strcharinfo(0) + "'s Assault Team",1002, "OnPoringKilled";
+ summon strcharinfo(0) + "'s Assault Team",1002, "OnPoringKilled";
+ summon strcharinfo(0) + "'s Assault Team",1002, "OnPoringKilled";
+ summon strcharinfo(0) + "'s Assault Team",1002, "OnPoringKilled";
+ close;
Special2:
-summon strcharinfo(0) + "'s Mastering",1090, "OnSpecialKilled";
-close;
+ summon strcharinfo(0) + "'s Mastering",1090, "OnSpecialKilled";
+ close;
Special3:
-summon strcharinfo(0) + "'s Eclipse",1093, "OnSpecialKilled";
-close;
+ summon strcharinfo(0) + "'s Eclipse",1093, "OnSpecialKilled";
+ close;
Special4:
-summon strcharinfo(0) + "'s Dragon Fly",1091, "OnSpecialKilled";
-close;
+ summon strcharinfo(0) + "'s Dragon Fly",1091, "OnSpecialKilled";
+ close;
Special5:
-summon strcharinfo(0) + "'s Toad",1089, "OnSpecialKilled";
-close;
+ summon strcharinfo(0) + "'s Toad",1089, "OnSpecialKilled";
+ close;
L_Exit:
-mes "[Referee]";
-mes "Alright";
-close;
+ mes "[Referee]";
+ mes "Alright";
+ close;
}
gon_test,56,91,6 duplicate(monsterreferee) Referee#01 61
// Usher //
gon_test,58,94,6 script Usher 86,{
-set @marena,1;
-mes "[Usher]";
-mes "What would you like to do?";
-next;
-menu "^0000FFSpectate",L_Spec,"^FF0000Compete^000000",-,"Return to Town",L_Exit,"Cancel",L_Cancel;
+ set @marena,1;
+ mes "[Usher]";
+ mes "What would you like to do?";
+ next;
+ menu "^0000FFSpectate",L_Spec,"^FF0000Compete^000000",-,"Return to Town",L_Exit,"Cancel",L_Cancel;
-if (#monster == 0) goto L_NoMon;
-if (#heal == 1) goto L_Heal;
+ if (#monster == 0) goto L_NoMon;
+ if (#heal == 1) goto L_Heal;
-if (#monster < 40) goto L_Low;
-if (#monster > 30 && #monster < 80) goto L_Med;
-if (#monster > 70) goto L_High;
+ if (#monster < 40) goto L_Low;
+ if (#monster > 30 && #monster < 80) goto L_Med;
+ if (#monster > 70) goto L_High;
L_Low:
-menu "Level 1-3",L_1to3,"^FF0000All Levels",L_High;
-close;
+ menu "Level 1-3",L_1to3,"^FF0000All Levels",L_High;
+ close;
L_Med:
-menu "Level 4-7",L_4to6,"^FF0000All Levels",L_High;
-close;
+ menu "Level 4-7",L_4to6,"^FF0000All Levels",L_High;
+ close;
L_High:
-close2;
-savepoint "gon_test",56,99;
-set @battle,1;
-atcommand strcharinfo(0) + "@option 64 0 64";
-warp "gon_test",72,87;
-end;
+ close2;
+ savepoint "gon_test",56,99;
+ set @battle,1;
+ atcommand strcharinfo(0) + "@option 64 0 64";
+ warp "gon_test",72,87;
+ end;
L_4to6:
-close2;
-savepoint "gon_test",56,99;
-set @battle,1;
-atcommand strcharinfo(0) + "@option 64 0 64";
-warp "gon_test",57,86;
-end;
+ close2;
+ savepoint "gon_test",56,99;
+ set @battle,1;
+ atcommand strcharinfo(0) + "@option 64 0 64";
+ warp "gon_test",57,86;
+ end;
L_1to3:
-close2;
-savepoint "gon_test",56,99;
-set @battle,1;
-atcommand strcharinfo(0) + "@option 64 0 64";
-warp "gon_test",43,87;
-end;
+ close2;
+ savepoint "gon_test",56,99;
+ set @battle,1;
+ atcommand strcharinfo(0) + "@option 64 0 64";
+ warp "gon_test",43,87;
+ end;
L_Exit:
-close2;
-savepoint "prontera",149,186;
-set @battle,0;
-atcommand strcharinfo(0) + "@option 0 0 0";
-warp "prontera",149,186;
-end;
+ close2;
+ savepoint "prontera",149,186;
+ set @battle,0;
+ atcommand strcharinfo(0) + "@option 0 0 0";
+ warp "prontera",149,186;
+ end;
L_Spec:
-close2;
-savepoint "gon_test",56,99;
-set @battle,0;
-atcommand strcharinfo(0) + "@option 0 0 0";
-warp "gon_test",57,99;
-end;
+ close2;
+ savepoint "gon_test",56,99;
+ set @battle,0;
+ atcommand strcharinfo(0) + "@option 0 0 0";
+ warp "gon_test",57,99;
+ end;
L_NoMon:
-mes "[Usher]";
-mes "You haven't got a monster, you can only spectate.";
-close;
+ mes "[Usher]";
+ mes "You haven't got a monster, you can only spectate.";
+ close;
L_Heal:
-mes "[Usher]";
-mes "You have to heal your monster before you can fight again.";
-close;
+ mes "[Usher]";
+ mes "You have to heal your monster before you can fight again.";
+ close;
L_Cancel:
-close;
+ close;
}
// Monster Trainer //
gon_test,52,103,6 script Monster Trainer 87,{
-mes "[Monster Trainer]";
-if (#monster != 0) goto L_Mon;
-
-mes "Welcome to the monster arena, would you like to start training?";
-next;
-menu "Yes",-,"No",L_Exit;
-
-mes "[Monster Trainer]";
-mes "New trainers may only start with Porings.";
-mes "They cost 1000z, Would you like to buy one?";
-next;
-menu "Yes",-,"No",L_Exit;
-
-if (zeny < 1000) goto L_NoZeny;
-set zeny,zeny-1000;
-set #monster,10;
-mes "[Monster Trainer]";
-mes "Congratulations!";
-mes "When your Poring earns enough experience, talk to me to upgrade.";
-close;
+ mes "[Monster Trainer]";
+ if (#monster != 0) goto L_Mon;
+
+ mes "Welcome to the monster arena, would you like to start training?";
+ next;
+ menu "Yes",-,"No",L_Exit;
+
+ mes "[Monster Trainer]";
+ mes "New trainers may only start with Porings.";
+ mes "They cost 1000z, Would you like to buy one?";
+ next;
+ menu "Yes",-,"No",L_Exit;
+
+ if (zeny < 1000) goto L_NoZeny;
+ set zeny,zeny-1000;
+ set #monster,10;
+ mes "[Monster Trainer]";
+ mes "Congratulations!";
+ mes "When your Poring earns enough experience, talk to me to upgrade.";
+ close;
L_Mon:
-mes "Welcome back, " + strcharinfo(0) + ".";
-mes "Your monster has " + #monpoints + " exp points.";
-next;
-if (@fighting == 1) goto L_Heal;
-menu "Upgrade Monster",L_Upgrade,"Sell Experience",L_Sell,"^FF0000Abandon Monster^000000",L_Abandon,"Cancel",L_Exit;
+ mes "Welcome back, " + strcharinfo(0) + ".";
+ mes "Your monster has " + #monpoints + " exp points.";
+ next;
+ if (@fighting == 1) goto L_Heal;
+ menu "Upgrade Monster",L_Upgrade,"Sell Experience",L_Sell,"^FF0000Abandon Monster^000000",L_Abandon,"Cancel",L_Exit;
L_Abandon:
-mes "[Monster Trainer]";
-mes "Are you sure you want to abandon your monster?";
-next;
-menu "Yes",-,"No",L_Exit;
-set #monster,0;
-set #monpoints,0;
-mes "[Monster Trainer]";
-mes "Monster released into the wild.";
-close;
+ mes "[Monster Trainer]";
+ mes "Are you sure you want to abandon your monster?";
+ next;
+ menu "Yes",-,"No",L_Exit;
+ set #monster,0;
+ set #monpoints,0;
+ mes "[Monster Trainer]";
+ mes "Monster released into the wild.";
+ close;
L_Sell:
-mes "[Monster Trainer]";
-mes "You can sell your monster's experience for 100z each.";
-next;
-menu "Sell",-,"Cancel",L_Exit;
-mes "[Monster Trainer]";
-mes "You have: ^FF0000" + #monpoints + "^000000 experience points";
-mes "How many would you like to sell?";
-next;
-input @sellexp;
-if (@sellexp > #monpoints) goto L_NoExp;
-set #monpoints,#monpoints-@sellexp;
-set @sellearn,100*@sellexp; // Price of exp
-set zeny,zeny+@sellearn;
-mes "[Monster Trainer]";
-mes "You earned ^0000FF" + @sellearn + "^000000z.";
-close;
+ mes "[Monster Trainer]";
+ mes "You can sell your monster's experience for 100z each.";
+ next;
+ menu "Sell",-,"Cancel",L_Exit;
+ mes "[Monster Trainer]";
+ mes "You have: ^FF0000" + #monpoints + "^000000 experience points";
+ mes "How many would you like to sell?";
+ next;
+ input @sellexp;
+ if (@sellexp > #monpoints) goto L_NoExp;
+ set #monpoints,#monpoints-@sellexp;
+ set @sellearn,100*@sellexp; // Price of exp
+ set zeny,zeny+@sellearn;
+ mes "[Monster Trainer]";
+ mes "You earned ^0000FF" + @sellearn + "^000000z.";
+ close;
L_NoExp:
-mes "[Monster Trainer]";
-mes "You do not have enough experience.";
-next;
-goto L_Exit;
+ mes "[Monster Trainer]";
+ mes "You do not have enough experience.";
+ next;
+ goto L_Exit;
-// Monster Upgrades //
+ // Monster Upgrades //
L_Upgrade:
-mes "[Monster Trainer]";
-// 3. ---Change to Add Monsters - May not be required--- //
-if (#monster > 1 && #monster < 20) mes "You need 10 exp points to upgrade your monster.";
-if (#monster > 19 && #monster < 30) mes "You need 20 exp points to upgrade your monster.";
-if (#monster > 29 && #monster < 40) mes "You need 40 exp points to upgrade your monster.";
-if (#monster > 39 && #monster < 50) mes "You need 80 exp points to upgrade your monster.";
-if (#monster > 49 && #monster < 60) mes "You need 160 exp points to upgrade your monster.";
-if (#monster > 59 && #monster < 70) mes "You need 320 exp points to upgrade your monster.";
-if (#monster > 69 && #monster < 80) mes "You need 640 exp points to upgrade your monster.";
-if (#monster > 79 && #monster < 90) mes "You need 1280 exp points to upgrade your monster.";
-if (#monster > 89 && #monster < 100) mes "You need 2560 exp points to upgrade your monster.";
-next;
-menu "Continue",-,"Cancel",L_Exit;
-mes "[Monster Trainer]";
-
-// 4. ---Change to Add Monsters - May not be required--- //
-if (#monster > 1 && #monster < 20 && #monpoints > 9) goto L_Up1;
-if (#monster > 19 && #monster < 30 && #monpoints > 19) goto L_Up2;
-if (#monster > 29 && #monster < 40 && #monpoints > 39) goto L_Up3;
-if (#monster > 39 && #monster < 50 && #monpoints > 79) goto L_Up4;
-if (#monster > 49 && #monster < 60 && #monpoints > 159) goto L_Up5;
-if (#monster > 59 && #monster < 70 && #monpoints > 319) goto L_Up6;
-if (#monster > 69 && #monster < 80 && #monpoints > 639) goto L_Up7;
-if (#monster > 79 && #monster < 90 && #monpoints > 1279) goto L_Up8;
-if (#monster > 89 && #monster < 100 && #monpoints > 2559) goto L_Up9;
-
-mes "Unable to upgrade.";
-close;
-
-// 5. ---Change to Add Monsters--- //
- L_Up1:
+ mes "[Monster Trainer]";
+ // 3. ---Change to Add Monsters - May not be required--- //
+ if (#monster > 1 && #monster < 20) mes "You need 10 exp points to upgrade your monster.";
+ if (#monster > 19 && #monster < 30) mes "You need 20 exp points to upgrade your monster.";
+ if (#monster > 29 && #monster < 40) mes "You need 40 exp points to upgrade your monster.";
+ if (#monster > 39 && #monster < 50) mes "You need 80 exp points to upgrade your monster.";
+ if (#monster > 49 && #monster < 60) mes "You need 160 exp points to upgrade your monster.";
+ if (#monster > 59 && #monster < 70) mes "You need 320 exp points to upgrade your monster.";
+ if (#monster > 69 && #monster < 80) mes "You need 640 exp points to upgrade your monster.";
+ if (#monster > 79 && #monster < 90) mes "You need 1280 exp points to upgrade your monster.";
+ if (#monster > 89 && #monster < 100) mes "You need 2560 exp points to upgrade your monster.";
+ next;
+ menu "Continue",-,"Cancel",L_Exit;
+ mes "[Monster Trainer]";
+
+ // 4. ---Change to Add Monsters - May not be required--- //
+ if (#monster > 1 && #monster < 20 && #monpoints > 9) goto L_Up1;
+ if (#monster > 19 && #monster < 30 && #monpoints > 19) goto L_Up2;
+ if (#monster > 29 && #monster < 40 && #monpoints > 39) goto L_Up3;
+ if (#monster > 39 && #monster < 50 && #monpoints > 79) goto L_Up4;
+ if (#monster > 49 && #monster < 60 && #monpoints > 159) goto L_Up5;
+ if (#monster > 59 && #monster < 70 && #monpoints > 319) goto L_Up6;
+ if (#monster > 69 && #monster < 80 && #monpoints > 639) goto L_Up7;
+ if (#monster > 79 && #monster < 90 && #monpoints > 1279) goto L_Up8;
+ if (#monster > 89 && #monster < 100 && #monpoints > 2559) goto L_Up9;
+
+ mes "Unable to upgrade.";
+ close;
+
+ // 5. ---Change to Add Monsters--- //
+L_Up1:
set #monster,20;
set #monpoints,#monpoints-10;
mes "Upgraded to Fabre!";
close;
- L_Up2:
+L_Up2:
mes "Which monster would you like to upgrade to?";
next;
menu "Lunatic",U_Lunatic,"Drops",U_Drops,"Picky",U_Picky;
- U_Drops:
- set #monster,31;
- set #monpoints,#monpoints-20;
- mes "[Monster Trainer]";
- mes "Upgraded to Drops!";
- close;
-
- U_Picky:
- set #monster,32;
- set #monpoints,#monpoints-20;
- mes "[Monster Trainer]";
- mes "Upgraded to Picky!";
- close;
-
- U_Lunatic:
- set #monster,30;
- set #monpoints,#monpoints-20;
- mes "[Monster Trainer]";
- mes "Upgraded to Lunatic!";
- close;
-
- L_Up3:
+U_Drops:
+ set #monster,31;
+ set #monpoints,#monpoints-20;
+ mes "[Monster Trainer]";
+ mes "Upgraded to Drops!";
+ close;
+
+U_Picky:
+ set #monster,32;
+ set #monpoints,#monpoints-20;
+ mes "[Monster Trainer]";
+ mes "Upgraded to Picky!";
+ close;
+
+U_Lunatic:
+ set #monster,30;
+ set #monpoints,#monpoints-20;
+ mes "[Monster Trainer]";
+ mes "Upgraded to Lunatic!";
+ close;
+
+L_Up3:
mes "Which monster would you like to upgrade to?";
next;
menu "ChonChon",U_ChonChon,"Super Picky",U_SPicky,"Willow",U_Willow;
- U_ChonChon:
- set #monster,40;
- set #monpoints,#monpoints-40;
- mes "[Monster Trainer]";
- mes "Upgraded to ChonChon!";
- close;
-
- U_SPicky:
- set #monster,41;
- set #monpoints,#monpoints-40;
- mes "[Monster Trainer]";
- mes "Upgraded to Super Picky!";
- close;
-
- U_Willow:
- set #monster,42;
- set #monpoints,#monpoints-40;
- mes "[Monster Trainer]";
- mes "Upgraded to Willow!";
- close;
-
- L_Up4:
+U_ChonChon:
+ set #monster,40;
+ set #monpoints,#monpoints-40;
+ mes "[Monster Trainer]";
+ mes "Upgraded to ChonChon!";
+ close;
+
+U_SPicky:
+ set #monster,41;
+ set #monpoints,#monpoints-40;
+ mes "[Monster Trainer]";
+ mes "Upgraded to Super Picky!";
+ close;
+
+U_Willow:
+ set #monster,42;
+ set #monpoints,#monpoints-40;
+ mes "[Monster Trainer]";
+ mes "Upgraded to Willow!";
+ close;
+
+L_Up4:
mes "Which monster would you like to upgrade to?";
next;
menu "Condor",U_Condor,"Roda Frog",U_Roda;
- U_Condor:
- set #monster,51;
- set #monpoints,#monpoints-80;
- mes "[Monster Trainer]";
- mes "Upgraded to Condor!";
- close;
-
- U_Roda:
- set #monster,50;
- set #monpoints,#monpoints-80;
- mes "[Monster Trainer]";
- mes "Upgraded to Roda Frog!";
- close;
-
- L_Up5:
+U_Condor:
+ set #monster,51;
+ set #monpoints,#monpoints-80;
+ mes "[Monster Trainer]";
+ mes "Upgraded to Condor!";
+ close;
+
+U_Roda:
+ set #monster,50;
+ set #monpoints,#monpoints-80;
+ mes "[Monster Trainer]";
+ mes "Upgraded to Roda Frog!";
+ close;
+
+L_Up5:
set #monster,60;
set #monpoints,#monpoints-160;
mes "Upgraded to Thief Bug Larva!";
close;
- L_Up6:
+L_Up6:
set #monster,70;
set #monpoints,#monpoints-320;
mes "Upgraded to Savage Babe!";
close;
- L_Up7:
+L_Up7:
mes "Which monster would you like to upgrade to?";
next;
menu "Familiar",U_Familiar,"Hornet",U_Hornet;
- U_Hornet:
- set #monster,81;
- set #monpoints,#monpoints-640;
- mes "[Monster Trainer]";
- mes "Upgraded to Hornet!";
- close;
+U_Hornet:
+ set #monster,81;
+ set #monpoints,#monpoints-640;
+ mes "[Monster Trainer]";
+ mes "Upgraded to Hornet!";
+ close;
- U_Familiar:
- set #monster,80;
- set #monpoints,#monpoints-640;
- mes "[Monster Trainer]";
- mes "Upgraded to Familiar!";
- close;
+U_Familiar:
+ set #monster,80;
+ set #monpoints,#monpoints-640;
+ mes "[Monster Trainer]";
+ mes "Upgraded to Familiar!";
+ close;
- L_Up8:
+L_Up8:
mes "[Monster Trainer]";
mes "Which monster would you like to upgrade to?";
next;
menu "Desert Wolf Puppy",U_Puppy,"Spore",U_Spore,"Rocker",U_Rocker;
- U_Spore:
- set #monster,91;
- set #monpoints,#monpoints-1280;
- mes "[Monster Trainer]";
- mes "Upgraded to Spore!";
- close;
-
- U_Rocker:
- set #monster,92;
- set #monpoints,#monpoints-1280;
- mes "[Monster Trainer]";
- mes "Upgraded to Rocker!";
- close;
-
- U_Puppy:
- set #monster,90;
- set #monpoints,#monpoints-1280;
- mes "[Monster Trainer]";
- mes "Upgraded to Desert Wolf Puppy!";
- close;
-
- L_Up9:
+U_Spore:
+ set #monster,91;
+ set #monpoints,#monpoints-1280;
+ mes "[Monster Trainer]";
+ mes "Upgraded to Spore!";
+ close;
+
+U_Rocker:
+ set #monster,92;
+ set #monpoints,#monpoints-1280;
+ mes "[Monster Trainer]";
+ mes "Upgraded to Rocker!";
+ close;
+
+U_Puppy:
+ set #monster,90;
+ set #monpoints,#monpoints-1280;
+ mes "[Monster Trainer]";
+ mes "Upgraded to Desert Wolf Puppy!";
+ close;
+
+L_Up9:
mes "Which monster would you like to upgrade to?";
next;
menu "Skeleton",U_Skeleton,"Antonio",U_Antonio,"Plankton",U_Plankton,"Thief Bug Female",U_ThiefFemale;
- U_Plankton:
- set #monster,101;
- set #monpoints,#monpoints-2560;
- mes "[Monster Trainer]";
- mes "Upgraded to Plankton!";
- close;
-
- U_Antonio:
- set #monster,102;
- set #monpoints,#monpoints-2560;
- mes "[Monster Trainer]";
- mes "Upgraded to Antonio!";
- close;
-
- U_ThiefFemale:
- set #monster,103;
- set #monpoints,#monpoints-2560;
- mes "[Monster Trainer]";
- mes "Upgraded to Thief Bug Female!";
- close;
-
- U_Skeleton:
- set #monster,100;
- set #monpoints,#monpoints-2560;
- mes "[Monster Trainer]";
- mes "Upgraded to Skeleton!";
- close;
+U_Plankton:
+ set #monster,101;
+ set #monpoints,#monpoints-2560;
+ mes "[Monster Trainer]";
+ mes "Upgraded to Plankton!";
+ close;
+
+U_Antonio:
+ set #monster,102;
+ set #monpoints,#monpoints-2560;
+ mes "[Monster Trainer]";
+ mes "Upgraded to Antonio!";
+ close;
+
+U_ThiefFemale:
+ set #monster,103;
+ set #monpoints,#monpoints-2560;
+ mes "[Monster Trainer]";
+ mes "Upgraded to Thief Bug Female!";
+ close;
+
+U_Skeleton:
+ set #monster,100;
+ set #monpoints,#monpoints-2560;
+ mes "[Monster Trainer]";
+ mes "Upgraded to Skeleton!";
+ close;
L_NoZeny:
-mes "[Monster Trainer]";
-mes "You don't have enough zeny!";
-close;
+ mes "[Monster Trainer]";
+ mes "You don't have enough zeny!";
+ close;
L_Exit:
-mes "[Monster Trainer]";
-mes "Goodbye.";
-close;
+ mes "[Monster Trainer]";
+ mes "Goodbye.";
+ close;
L_Heal:
-mes "[Monster Trainer]";
-mes "Your monster needs to heal.";
-mes "It will heal faster if you click the nurse faster.";
-set #heal,1;
-close;
+ mes "[Monster Trainer]";
+ mes "Your monster needs to heal.";
+ mes "It will heal faster if you click the nurse faster.";
+ set #heal,1;
+ close;
}
// Kill Trigger //
@@ -716,9 +716,9 @@ gon_test,56,91,6 script OnSpecialKilled -1,{
}
function script duelkill {
-if (strcharinfo(0) == $@duelist1$ || strcharinfo(0) == $@duelist2$) goto L_Heal;
-end;
- L_Heal:
+ if (strcharinfo(0) == $@duelist1$ || strcharinfo(0) == $@duelist2$) goto L_Heal;
+ end;
+L_Heal:
announce strcharinfo(0) + " won the Duel",1;
set @fighting,0;
set #heal,0;
@@ -727,38 +727,38 @@ end;
}
function script illegalkill {
-announce "Illegal Kill by " + strcharinfo(0) + " Detected",1;
-percentheal -100,-100;
-end;
+ announce "Illegal Kill by " + strcharinfo(0) + " Detected",1;
+ percentheal -100,-100;
+ end;
}
// Healer //
gon_test,55,103,6 script Nurse 90,{
-if (@battle == 1 || #heal == 0) goto L_NoHeal;
-if (#heal == 1 && @healing < 100) goto L_Heal; //Total healing required
-set @fighting,0;
-set #heal,0;
-set @healing,0;
-specialeffect2 EF_VALLENTINE2;
-announce "Your monster has healed.",19;
-end;
-
- L_Heal:
+ if (@battle == 1 || #heal == 0) goto L_NoHeal;
+ if (#heal == 1 && @healing < 100) goto L_Heal; //Total healing required
+ set @fighting,0;
+ set #heal,0;
+ set @healing,0;
+ specialeffect2 EF_VALLENTINE2;
+ announce "Your monster has healed.",19;
+ end;
+
+L_Heal:
set @healrate,140 / #monster; //Rate of heal per click
set @healing,@healing + @healrate;
end;
- L_NoHeal:
+L_NoHeal:
announce "Your monster does not need healing yet.",19;
end;
}
// Warps players //
gon_test,57,86,5 script Summon Pad 1::SummonPad 111,2,2,{
-end;
+ end;
OnTouch:
-set @marena,1;
-warp "gon_test",57,99;
+ set @marena,1;
+ warp "gon_test",57,99;
}
gon_test,43,87,5 duplicate(SummonPad) Summon Pad 2 111,2,2
gon_test,72,87,5 duplicate(SummonPad) Summon Pad 3 111,2,2
@@ -767,98 +767,98 @@ gon_test,72,87,5 duplicate(SummonPad) Summon Pad 3 111,2,2
// Skill Disabler //
gon_test,57,99,5 script Skill Disable 111,3,3,{
-atcommand strcharinfo(0) + "@skilloff";
-disablenpc "Skill Disable";
-end;
+ atcommand strcharinfo(0) + "@skilloff";
+ disablenpc "Skill Disable";
+ end;
}
// Duel Arena //
gon_test,58,103,5 script Duel Master#01 92,{
-if ($@duelist1$ == "") set @duel,0;
-if ($@monster1 == "") set @duel,0;
-set @marena,1;
-if (#monster == 0) goto L_NoMon;
-mes "[Duel Master]";
-if ($@duel == 1) goto L_Waiting;
-if ($@duel == 2) goto L_Dueling;
-
-mes "There are currently no players dueling.";
-next;
-menu "Join",-,"Spectate",L_Spec,"Cancel",L_Exit;
-
-// Player 1 Enters Duel Area //
-if (#heal == 1) goto L_NeedHeal;
-if ($@duel == 1) goto L_Duel2;
-set $@duel,1;
-if (#monster > 1 && #monster < 20) set $@monster1,1;
-if (#monster > 19 && #monster < 30) set $@monster1,2;
-if (#monster > 29 && #monster < 40) set $@monster1,3;
-if (#monster > 39 && #monster < 50) set $@monster1,4;
-if (#monster > 49 && #monster < 60) set $@monster1,5;
-if (#monster > 59 && #monster < 70) set $@monster1,6;
-if (#monster > 69 && #monster < 80) set $@monster1,7;
-if (#monster > 79 && #monster < 90) set $@monster1,8;
-if (#monster > 89 && #monster < 100) set $@monster1,9;
-if (#monster > 99 && #monster < 110) set $@monster1,10;
-set $@duelist1$,strcharinfo(0);
-set @battle,1;
-announce strcharinfo(0) + " [Monster Level: " + $@monster1 + "] is waiting for a duel",1;
-atcommand strcharinfo(0) + "@option 64 0 64";
-warp "gon_test",49,5;
-close;
+ if ($@duelist1$ == "") set @duel,0;
+ if ($@monster1 == "") set @duel,0;
+ set @marena,1;
+ if (#monster == 0) goto L_NoMon;
+ mes "[Duel Master]";
+ if ($@duel == 1) goto L_Waiting;
+ if ($@duel == 2) goto L_Dueling;
+
+ mes "There are currently no players dueling.";
+ next;
+ menu "Join",-,"Spectate",L_Spec,"Cancel",L_Exit;
+
+ // Player 1 Enters Duel Area //
+ if (#heal == 1) goto L_NeedHeal;
+ if ($@duel == 1) goto L_Duel2;
+ set $@duel,1;
+ if (#monster > 1 && #monster < 20) set $@monster1,1;
+ if (#monster > 19 && #monster < 30) set $@monster1,2;
+ if (#monster > 29 && #monster < 40) set $@monster1,3;
+ if (#monster > 39 && #monster < 50) set $@monster1,4;
+ if (#monster > 49 && #monster < 60) set $@monster1,5;
+ if (#monster > 59 && #monster < 70) set $@monster1,6;
+ if (#monster > 69 && #monster < 80) set $@monster1,7;
+ if (#monster > 79 && #monster < 90) set $@monster1,8;
+ if (#monster > 89 && #monster < 100) set $@monster1,9;
+ if (#monster > 99 && #monster < 110) set $@monster1,10;
+ set $@duelist1$,strcharinfo(0);
+ set @battle,1;
+ announce strcharinfo(0) + " [Monster Level: " + $@monster1 + "] is waiting for a duel",1;
+ atcommand strcharinfo(0) + "@option 64 0 64";
+ warp "gon_test",49,5;
+ close;
L_Waiting:
-mes "^0000FF " + $@duelist1$ + "^000000 [Monster Level: ^FF0000" + $@monster1 + "^000000]";
-mes "Is waiting for an opponent";
-next;
-menu "Join",-,"Spectate",L_Spec,"Cancel",L_Exit;
+ mes "^0000FF " + $@duelist1$ + "^000000 [Monster Level: ^FF0000" + $@monster1 + "^000000]";
+ mes "Is waiting for an opponent";
+ next;
+ menu "Join",-,"Spectate",L_Spec,"Cancel",L_Exit;
-// Player 2 Enters Duel Area //
-if (#heal == 1) goto L_NeedHeal;
+ // Player 2 Enters Duel Area //
+ if (#heal == 1) goto L_NeedHeal;
L_Duel2:
-if ($@duel == 2) goto L_Spec;
-set $@duel,2;
-if (#monster > 1 && #monster < 20) set $@monster2,1;
-if (#monster > 19 && #monster < 30) set $@monster2,2;
-if (#monster > 29 && #monster < 40) set $@monster2,3;
-if (#monster > 39 && #monster < 50) set $@monster2,4;
-if (#monster > 49 && #monster < 60) set $@monster2,5;
-if (#monster > 59 && #monster < 70) set $@monster2,6;
-if (#monster > 69 && #monster < 80) set $@monster2,7;
-if (#monster > 79 && #monster < 90) set $@monster2,8;
-if (#monster > 89 && #monster < 100) set $@monster2,9;
-if (#monster > 99 && #monster < 110) set $@monster2,10;
-set $@duelist2$,strcharinfo(0);
-set @battle,1;
-announce strcharinfo(0) + " [Monster Level: " + $@monster2 + "] has joined the duel",1;
-atcommand strcharinfo(0) + "@option 64 0 64";
-warp "gon_test",49,5;
-close;
-
- L_Dueling:
+ if ($@duel == 2) goto L_Spec;
+ set $@duel,2;
+ if (#monster > 1 && #monster < 20) set $@monster2,1;
+ if (#monster > 19 && #monster < 30) set $@monster2,2;
+ if (#monster > 29 && #monster < 40) set $@monster2,3;
+ if (#monster > 39 && #monster < 50) set $@monster2,4;
+ if (#monster > 49 && #monster < 60) set $@monster2,5;
+ if (#monster > 59 && #monster < 70) set $@monster2,6;
+ if (#monster > 69 && #monster < 80) set $@monster2,7;
+ if (#monster > 79 && #monster < 90) set $@monster2,8;
+ if (#monster > 89 && #monster < 100) set $@monster2,9;
+ if (#monster > 99 && #monster < 110) set $@monster2,10;
+ set $@duelist2$,strcharinfo(0);
+ set @battle,1;
+ announce strcharinfo(0) + " [Monster Level: " + $@monster2 + "] has joined the duel",1;
+ atcommand strcharinfo(0) + "@option 64 0 64";
+ warp "gon_test",49,5;
+ close;
+
+L_Dueling:
mes "^0000FF" + $@duelist1$ + "^000000 [Monster Level: ^0000FF" + $@monster1 + "^000000]";
mes " VS.";
mes "^FF0000" + $@duelist2$ + "^000000 [Monster Level: ^FF0000" + $@monster2 + "^000000]";
next;
menu "Spectate",L_Spec,"Cancel",L_Exit;
- L_Spec:
+L_Spec:
set @battle,0;
atcommand strcharinfo(0) + "@option 64 0 64";
warp "gon_test",49,5;
close;
- L_Exit:
+L_Exit:
mes "[Duel Master]";
mes "Goodbye.";
close;
- L_NoMon:
+L_NoMon:
mes "[Duel Master]";
mes "You haven't got a monster, you can't participate.";
close;
- L_NeedHeal:
+L_NeedHeal:
mes "[Duel Master]";
mes "You need to heal before you can join.";
close;
@@ -866,35 +866,35 @@ close;
// Duel Exit //
gon_test,42,8,5 script Duel Master#02 92,{
-mes "[Duel Master]";
-mes "Would you like to return?";
-menu "Yes",L_Leave,"No",-;
-mes "Alright";
-close;
+ mes "[Duel Master]";
+ mes "Would you like to return?";
+ menu "Yes",L_Leave,"No",-;
+ mes "Alright";
+ close;
- L_Leave:
+L_Leave:
if ($@duelist1$ == strcharinfo(0)) goto L_Leave1;
if ($@duelist2$ == strcharinfo(0)) goto L_Leave2;
- L_Leave3:
- atcommand strcharinfo(0) + "@option 0 0 0";
- set @battle,0;
- warp "gon_test",57,99;
- close;
-
- L_Leave1:
- set $@duelist1$,$@duelist2$;
- set $@monster1,$@monster2;
- set $@duel,$@duel-1;
- announce strcharinfo(0) + " stopped dueling",1;
- goto L_Leave3;
-
- L_Leave2:
- set $@duelist2$,"";
- set $@monster2,0;
- set $@duel,$@duel-1;
- announce strcharinfo(0) + " stopped dueling",1;
- goto L_Leave3;
+L_Leave3:
+ atcommand strcharinfo(0) + "@option 0 0 0";
+ set @battle,0;
+ warp "gon_test",57,99;
+ close;
+
+L_Leave1:
+ set $@duelist1$,$@duelist2$;
+ set $@monster1,$@monster2;
+ set $@duel,$@duel-1;
+ announce strcharinfo(0) + " stopped dueling",1;
+ goto L_Leave3;
+
+L_Leave2:
+ set $@duelist2$,"";
+ set $@monster2,0;
+ set $@duel,$@duel-1;
+ announce strcharinfo(0) + " stopped dueling",1;
+ goto L_Leave3;
}
gon_test,49,5,5 duplicate(SummonPad) Summon Pad 4 111,2,2