summaryrefslogtreecommitdiff
path: root/npc
diff options
context:
space:
mode:
Diffstat (limited to 'npc')
-rw-r--r--npc/battleground/bg_common.txt2516
-rw-r--r--npc/battleground/bg_flavius_01.txt906
-rw-r--r--npc/battleground/bg_flavius_02.txt906
-rw-r--r--npc/battleground/bg_tierra_01.txt976
-rw-r--r--npc/battleground/bg_tierra_02.txt976
-rw-r--r--npc/cities/moscovia.txt270
-rw-r--r--npc/events/MemorialDay_2008.txt1034
-rw-r--r--npc/events/children_week.txt170
-rw-r--r--npc/events/christmas_2008.txt2432
-rw-r--r--npc/events/valentinesday_2009.txt1566
-rw-r--r--npc/guides/guides_mosk.txt180
-rw-r--r--npc/kafras/kafras_mosk.txt304
12 files changed, 6118 insertions, 6118 deletions
diff --git a/npc/battleground/bg_common.txt b/npc/battleground/bg_common.txt
index 21eb9520f..fb33570d7 100644
--- a/npc/battleground/bg_common.txt
+++ b/npc/battleground/bg_common.txt
@@ -1,1258 +1,1258 @@
-// ==============================================================================
-// BattleGround System - Common NPCs
-// ==============================================================================
-
-// MapFlags
-// *********************************************************************
-
-bat_room mapflag nomemo
-bat_room mapflag nowarpto
-bat_room mapflag nobranch
-bat_room mapflag nopenalty
-bat_room mapflag noteleport
-bat_room mapflag nosave SavePoint
-
-// BattleGround Warper - Entrance
-// *********************************************************************
-
-payon,189,104,3 script Maroll Battle Recruiter::BatRecruit 728,{
- mes "[Maroll Battle Recruiter]";
- mes "Good day, adventurer.";
- mes "I'm a knight from a far country called Maroll Kingdom.";
- next;
- mes "[Maroll Battle Recruiter]";
- mes "The two princes of the kingdom are now battling for the throne of Maroll, and are in need of experienced soldiers like you. How would you like to lend your power to one of the princes in the Maroll Kingdom?";
- next;
- if( select("Join:Don't Join") == 2 )
- {
- mes "[Maroll Battle Recruiter]";
- mes "I'll always be stationed here for more soldiers. Fell free to come back whenever you're interested.";
- close;
- }
- mes "[Maroll Battle Recruiter]";
- mes "May the war god bless you.";
- close2;
- warp "bat_room",155,150;
- end;
-}
-
-prontera,123,83,5 duplicate(BatRecruit) Maroll Battle Recruiter::BatRecruit2 728
-rachel,149,138,5 duplicate(BatRecruit) Maroll Battle Recruiter::BatRecruit3 728
-moc_ruins,75,162,5 duplicate(BatRecruit) Maroll Battle Recruiter::BatRecruit4 728
-aldebaran,146,109,5 duplicate(BatRecruit) Maroll Battle Recruiter::BatRecruit5 728
-lighthalzen,153,86,5 duplicate(BatRecruit) Maroll Battle Recruiter::BatRecruit6 728
-
-// BattleGround Warper - Exit
-// *********************************************************************
-
-bat_room,148,150,4 script Teleporter#bat 124,{
- mes "[Teleporter]";
- mes "Do you wish to leave the battlefield? Use my service to return to town.";
- next;
- if( select("Leave:Don't Leave") == 2 )
- {
- mes "[Teleporter]";
- mes "I'll be here whenever you're in need of my service.";
- close;
- }
-
- set .@spoint$, getsavepoint(0);
- set .@x, getsavepoint(1);
- set .@y, getsavepoint(2);
- mes "[Teleporter]";
- mes "You will be sent back to " + .@spoint$ + ".";
- close2;
- warp .@spoint$, .@x, .@y;
- end;
-}
-
-// Kafra
-// *********************************************************************
-bat_room,148,147,4 script Kafra Staff::kaf_bat 861,{
- cutin "kafra_09",2;
- callfunc "F_Kafra",0,2,1,150,0;
-}
-
-// General Guillaume
-// *********************************************************************
-bat_room,160,159,3 script General Guillaume 420,{
- cutin "bat_kiyom2",2;
- mes "[General Guillaume]";
- mes "Hot-blooded adventurer, we need your ability to win this battle.";
- next;
- cutin "bat_kiyom1",2;
- mes "[General Guillaume]";
- mes "Our great king, Marcel Marollo VII, is very sick lately. His Majesty has declared that he chosen either me or Prince Croix as the next king amongst his 9 sons.";
- next;
- mes "[General Guillaume]";
- mes "Two kings can't share a nation!";
- mes "Only the one victorious from His Majesty's appointed battle will be enthroned.";
- next;
- mes "[General Guillaume]";
- mes "This is however, not just a battle between us. This battle will determine the future of this country. I pledge on my honor to prove that I'm the one who can protect this Maroll from outside threats.";
- next;
- if( select("Yes, I want to join you.:End Conversation") == 2 )
- {
- mes "[General Guillaume]";
- mes "I'll be the one who will capture the flag!";
- close2;
- cutin "",255;
- end;
- }
- cutin "bat_kiyom2",2;
- mes "[General Guillaume]";
- mes "Welcome to my army, comrade.";
- mes "Your eyes tell me that you're a soldier that I can trust.";
- set Bat_Team,1;
- next;
- mes "[General Guillaume]";
- mes "Now, go upstairs and apply for battle with your comrades. I'm sure they'll welcome you whole-heartedly!";
- close2;
- cutin "",255;
- end;
-}
-
-// General Croix
-// *********************************************************************
-bat_room,160,140,3 script Prince Croix 416,{
- cutin "bat_crua1",2;
- mes "[Prince Croix]";
- mes "Wise adventurer, why don't you lend us your power for victory?";
- next;
- cutin "bat_crua2",2;
- mes "[Prince Croix]";
- mes "I do not wish to shed blood, but I have no choice but to fight for the possibility of peace and for the sake of my people.";
- next;
- mes "[Prince Croix]";
- mes "General Guillaume may have an advantage in this battle as he is the great general of Maroll, but that doesn't automatically mean he'll win. I want to win this battle so that I can grant a better future for my people.";
- next;
- if( select("Yes, I want to join you!:End Conversation") == 2 )
- {
- mes "[Prince Croix]";
- mes "For Maroll!";
- close2;
- cutin "",255;
- end;
- }
- mes "[Prince Croix]";
- mes "Thank you so much. I feel like I can win with the help of adventurers like you. Now, please go downstairs and join your comrades in sharpening their skills to fight the enemy!";
- set Bat_Team,2;
- close2;
- cutin "",255;
- end;
-}
-
-// Time calculation Function
-// *********************************************************************
-function script Time2Str {
- set .@Time_Left, getarg(0) - gettimetick(2);
-
- set .@Days, .@Time_Left / 86400;
- set .@Time_Left, .@Time_Left - (.@Days * 86400);
- set .@Hours, .@Time_Left / 3600;
- set .@Time_Left, .@Time_Left - (.@Hours * 3600);
- set .@Minutes, .@Time_Left / 60;
- set .@Time_Left, .@Time_Left - (.@Minutes * 60);
-
- set .@Time$, "";
- if( .@Days > 1 )
- set .@Time$, .@Time$ + .@Days + " days, ";
- else if( .@Days > 0 )
- set .@Time$, .@Time$ + .@Days + " day, ";
-
- if( .@Hours > 1 )
- set .@Time$, .@Time$ + .@Hours + " hours, ";
- else if( .@Hours > 0 )
- set .@Time$, .@Time$ + .@Hours + " hour, ";
-
- if( .@Minutes > 1 )
- set .@Time$, .@Time$ + .@Minutes + " minutes, ";
- else if( .@Minutes > 0 )
- set .@Time$, .@Time$ + .@Minutes + " minute, ";
-
- if( .@Time_Left > 1 || .@Time_Left == 0 )
- set .@Time$, .@Time$ + .@Time_Left + " seconds.";
- else if( .@Time_Left == 1 )
- set .@Time$, .@Time$ + .@Time_Left + " second.";
-
- return .@Time$;
-}
-
-// Guillaume Knight - Tierra Valley
-// *********************************************************************
-bat_room,159,178,5 script Guillaume Knight#1 417,{
- mes "[Guillaume Knight]";
- mes "Tierra Gorge is a very steep canyon with two forts residing in the north and south ends of the map.";
- next;
- mes "[Guillaume Knight]";
- mes "There is a ration depot for the Guillaume and Croix armies at the 11 and 8 o'clock directions.";
- next;
- mes "[Guillaume Knight]";
- mes "The battle starts at your army's ship, and the goal is to advance and destroy your enemy's rations depot faster than they can destroy yours.";
- mes "";
- mes "The army that captures the neutral flag in the center of the battlefield will be rewarded with extra regeneration points, meaning their soldiers will resurrect more than the other side, giving them an advantage.";
- next;
- mes "[Guillaume Knight]";
- mes "Are you ready for battle? Then apply with the recruiter next to me!";
- close;
-}
-
-// Tierra Officerer - Guillaume
-// *********************************************************************
-bat_room,156,178,5 script Tierra Valley Officer#1 418,{
- mes "[Tierra Officer]";
- if( Bat_Team == 2 )
- {
- mes "Get out of here you stinky Croix!";
- close;
- }
-
- if( Bat_Team == 0 )
- {
- mes "Please sign up for an army with Prince Croix or General Guillaume!";
- close;
- }
-
- mes "Hello " + strcharinfo(0) + ", let's show the power of the Guillaume Army to those stinky Croixs!";
- next;
- if( select("I want to join your army!:End Conversation") == 2 )
- close;
-
- mes "[Tierra Officer]";
- if( BG_Delay_Tick >= gettimetick(2) )
- {
- mes "You are a Deserter!!";
- mes "Because of running away, you need to wait ^0000FF" + callfunc("Time2Str",BG_Delay_Tick) + "^000000 to join again a BattleGround.";
- close;
- }
- if( Tierra_BG_Tick >= gettimetick(2) )
- {
- mes "Sorry, you can't join the battle right now.";
- mes "You need to wait ^0000FF" + callfunc("Time2Str",Tierra_BG_Tick) + "^000000 to join again Tierra Valley.";
- close;
- }
- if( BaseLevel < 80 )
- {
- mes "I'm very please you want to join our army, but I'm sorry: I can't send a rookie like you to die on the cruel battlefield";
- close;
- }
-
- mes "Good luck!";
- close2;
- warp "bat_room",85,224;
- end;
-}
-
-// Croix Knight - Tierra Valley
-// *********************************************************************
-bat_room,159,121,1 script Croix Knight#1 413,{
- mes "[Croix Knight]";
- mes "Tierra Gorge is a very steep canyon with two forts residing in the north and south ends of the map.";
- next;
- mes "[Croix Knight]";
- mes "There is a ration depot for the Guillaume and Croix armies at the 11 and 8 o'clock directions.";
- next;
- mes "[Croix Knight]";
- mes "The battle starts at your army's ship, and the goal is to advance and destroy your enemy's rations depot faster than they can destroy yours.";
- mes "";
- mes "The army that captures the neutral flag in the center of the battlefield will be rewarded with extra regeneration points, meaning their soldiers will resurrect more than the other side, giving them an advantage.";
- next;
- mes "[Croix Knight]";
- mes "Are you ready for battle? Then apply with the recruiter next to me!";
- close;
-}
-
-// Tierra Officer - Croix
-// *********************************************************************
-bat_room,156,121,1 script Tierra Valley Officer#2 414,{
- mes "[Tierra Officer]";
- if( Bat_Team == 1 )
- {
- mes "Get out of here you stupid Guillaume!";
- close;
- }
-
- if( Bat_Team == 0 )
- {
- mes "Please sign up for an army with Prince Croix or General Guillaume!";
- close;
- }
-
- mes "Hello " + strcharinfo(0) + ", let's show the power of the Croix Army to those stinky Guillaumes!";
- next;
- if( select("I want to join your army!:End Conversation") == 2 )
- close;
-
- mes "[Tierra Officer]";
- if( BG_Delay_Tick >= gettimetick(2) )
- {
- mes "You are a Deserter!!";
- mes "Because of running away, you need to wait ^0000FF" + callfunc("Time2Str",BG_Delay_Tick) + "^000000 to join again a BattleGround.";
- close;
- }
- if( Tierra_BG_Tick >= gettimetick(2) )
- {
- mes "Sorry, you can't join the battle right now.";
- mes "You need to wait ^0000FF" + callfunc("Time2Str",Tierra_BG_Tick) + "^000000 to join again Tierra Valley.";
- close;
- }
- if( BaseLevel < 80 )
- {
- mes "I'm very please you want to join our army, but I'm sorry: I can't send a rookie like you to die on the cruel battlefield";
- close;
- }
-
- mes "Good luck!";
- close2;
- warp "bat_room",85,208;
- end;
-}
-
-// Guillaume Knight - Tierra
-// *********************************************************************
-bat_room,175,178,5 script Guillaume Knight#2 417,{
- mes "[Guillaume Knight]";
- mes "Tierra Gorge is a very steep canyon with two forts residing in the north and south ends of the map.";
- next;
- mes "[Guillaume Knight]";
- mes "There is a ration depot for the Guillaume and Croix armies at the 11 and 8 o'clock directions.";
- next;
- mes "[Guillaume Knight]";
- mes "The battle starts at your army's ship, and the goal is to advance and destroy your enemy's rations depot faster than they can destroy yours.";
- mes "";
- mes "The army that captures the neutral flag in the center of the battlefield will be rewarded with extra regeneration points, meaning their soldiers will resurrect more than the other side, giving them an advantage.";
- next;
- mes "[Guillaume Knight]";
- mes "Are you ready for battle? Then apply with the recruiter next to me!";
- close;
-}
-
-// Tierra Officer - Guillaume
-// *********************************************************************
-bat_room,172,178,5 script Tierra Valley Officer#3 418,{
- mes "[Tierra Officer]";
- if( Bat_Team == 2 )
- {
- mes "Get out of here you stinky Croix!";
- close;
- }
-
- if( Bat_Team == 0 )
- {
- mes "Please sign up for an army with Prince Croix or General Guillaume!";
- close;
- }
-
- mes "Hello " + strcharinfo(0) + ", let's show the power of the Guillaume Army to those stinky Croixs!";
- next;
- if( select("I want to join your army!:End Conversation") == 2 )
- close;
-
- mes "[Tierra Officer]";
- if( BG_Delay_Tick >= gettimetick(2) )
- {
- mes "You are a Deserter!!";
- mes "Because of running away, you need to wait ^0000FF" + callfunc("Time2Str",BG_Delay_Tick) + "^000000 to join again a BattleGround.";
- close;
- }
- if( Tierra_BG_Tick >= gettimetick(2) )
- {
- mes "Sorry, you can't join the battle right now.";
- mes "You need to wait ^0000FF" + callfunc("Time2Str",Tierra_BG_Tick) + "^000000 to join again Tierra Valley.";
- close;
- }
- if( BaseLevel < 80 )
- {
- mes "I'm very please you want to join our army, but I'm sorry: I can't send a rookie like you to die on the cruel battlefield";
- close;
- }
-
- mes "Good luck!";
- close2;
- warp "bat_room",85,94;
- end;
-}
-
-// Croix Knight - Tierra
-// *********************************************************************
-bat_room,175,121,1 script Croix Knight#2 413,{
- mes "[Croix Knight]";
- mes "Tierra Gorge is a very steep canyon with two forts residing in the north and south ends of the map.";
- next;
- mes "[Croix Knight]";
- mes "There is a ration depot for the Guillaume and Croix armies at the 11 and 8 o'clock directions.";
- next;
- mes "[Croix Knight]";
- mes "The battle starts at your army's ship, and the goal is to advance and destroy your enemy's rations depot faster than they can destroy yours.";
- mes "";
- mes "The army that captures the neutral flag in the center of the battlefield will be rewarded with extra regeneration points, meaning their soldiers will resurrect more than the other side, giving them an advantage.";
- next;
- mes "[Croix Knight]";
- mes "Are you ready for battle? Then apply with the recruiter next to me!";
- close;
-}
-
-// Tierra Officer - Croix
-// *********************************************************************
-bat_room,172,121,1 script Tierra Valley Officer#4 414,{
- mes "[Tierra Officer]";
- if( Bat_Team == 1 )
- {
- mes "Get out of here you stupid Guillaume!";
- close;
- }
-
- if( Bat_Team == 0 )
- {
- mes "Please sign up for an army with Prince Croix or General Guillaume!";
- close;
- }
-
- mes "Hello " + strcharinfo(0) + ", let's show the power of the Croix Army to those stinky Guillaumes!";
- next;
- if( select("I want to join your army!:End Conversation") == 2 )
- close;
-
- mes "[Tierra Officer]";
- if( BG_Delay_Tick >= gettimetick(2) )
- {
- mes "You are a Deserter!!";
- mes "Because of running away, you need to wait ^0000FF" + callfunc("Time2Str",BG_Delay_Tick) + "^000000 to join again a BattleGround.";
- close;
- }
- if( Tierra_BG_Tick >= gettimetick(2) )
- {
- mes "Sorry, you can't join the battle right now.";
- mes "You need to wait ^0000FF" + callfunc("Time2Str",Tierra_BG_Tick) + "^000000 to join again Tierra Valley.";
- close;
- }
- if( BaseLevel < 80 )
- {
- mes "I'm very please you want to join our army, but I'm sorry: I can't send a rookie like you to die on the cruel battlefield";
- close;
- }
-
- mes "Good luck!";
- close2;
- warp "bat_room",85,77;
- end;
-}
-
-// Guillaune Knight - Flavius
-// *********************************************************************
-bat_room,151,178,5 script Guillaume Knight#3 417,{
- mes "[Guillaume Knight]";
- mes "The objective of the Flavius Battle is to score 2 points before your enemy by destroying their crystal.";
- next;
- mes "[Guillaume Knight]";
- mes "The crystals for both armies are protected by special barricades that cannot be destroyed by direct attacks.";
- next;
- mes "[Guillaume Knight]";
- mes "But they can be removed by destroying the Guardians that protect the enemy army base.";
- next;
- mes "[Guillaume Knight]";
- mes "The crystals are immune to every type of skill; your physical attacks are the only choice for destroying your enemy's crystal.";
- next;
- mes "[Guillaume Knight]";
- mes "Are you ready for battle? Then apply with the recruiter next to me!";
- close;
-}
-
-// Flavius Officerer - Guillaume
-// *********************************************************************
-bat_room,148,178,5 script Flavius Officer#1 418,{
- mes "[Flavius Officer]";
- if( Bat_Team == 2 )
- {
- mes "Get out of here you stupid Croix!";
- close;
- }
-
- if( Bat_Team == 0 )
- {
- mes "Please sign up for an army with Prince Croix or General Guillaume!";
- close;
- }
-
- mes "Hello " + strcharinfo(0) + ", let's show the power of the Guillaume Army to those stinky Croixs!";
- next;
- if( select("I want to join your army!:End Conversation") == 2 )
- close;
-
- mes "[Flavius Officer]";
- if( BG_Delay_Tick >= gettimetick(2) )
- {
- mes "You are a Deserter!!";
- mes "Because of running away, you need to wait ^0000FF" + callfunc("Time2Str",BG_Delay_Tick) + "^000000 to join again a BattleGround.";
- close;
- }
- if( Flavius_BG_Tick >= gettimetick(2) )
- {
- mes "Sorry, you can't join the battle right now.";
- mes "You need to wait ^0000FF" + callfunc("Time2Str",Flavius_BG_Tick) + "^000000 to join again Flavius.";
- close;
- }
- if( BaseLevel < 80 )
- {
- mes "I'm very please you want to join our army, but I'm sorry: I can't send a rookie like you to die on the cruel battlefield";
- close;
- }
-
- mes "Good luck!";
- close2;
- warp "bat_room",253,94;
- end;
-}
-
-// Croix Knight - Flavius
-// *********************************************************************
-bat_room,151,121,1 script Croix Knight#3 413,{
- mes "[Croix Knight]";
- mes "The objective of the Flavius Battle is to score 2 points before your enemy by destroying their crystal.";
- next;
- mes "[Croix Knight]";
- mes "The crystals for both armies are protected by special barricades that cannot be destroyed by direct attacks.";
- next;
- mes "[Croix Knight]";
- mes "But they can be removed by destroying the Guardians that protect the enemy army base.";
- next;
- mes "[Croix Knight]";
- mes "The crystals are immune to every type of skill; your physical attacks are the only choice for destroying your enemy's crystal.";
- next;
- mes "[Croix Knight]";
- mes "Are you ready for battle? Then apply with the recruiter next to me!";
- close;
-}
-
-// Flavius Officerer - Croix
-// *********************************************************************
-bat_room,148,121,1 script Flavius Officer#2 414,{
- mes "[Flavius Officer]";
- if( Bat_Team == 1 )
- {
- mes "Get out of here you stupid Guillaume!";
- close;
- }
-
- if( Bat_Team == 0 )
- {
- mes "Please sign up for an army with Prince Croix or General Guillaume!";
- close;
- }
-
- mes "Hello " + strcharinfo(0) + ", let's show the power of the Croix Army to those stinky Guillaumes!";
- next;
- if( select("I want to join your army!:End Conversation") == 2 )
- close;
-
- mes "[Flavius Officer]";
- if( BG_Delay_Tick >= gettimetick(2) )
- {
- mes "You are a Deserter!!";
- mes "Because of running away, you need to wait ^0000FF" + callfunc("Time2Str",BG_Delay_Tick) + "^000000 to join again a BattleGround.";
- close;
- }
- if( Flavius_BG_Tick >= gettimetick(2) )
- {
- mes "Sorry, you can't join the battle right now.";
- mes "You need to wait ^0000FF" + callfunc("Time2Str",Flavius_BG_Tick) + "^000000 to join again Flavius.";
- close;
- }
- if( BaseLevel < 80 )
- {
- mes "I'm very please you want to join our army, but I'm sorry: I can't send a rookie like you to die on the cruel battlefield";
- close;
- }
-
- mes "Good luck!";
- close2;
- warp "bat_room",253,77;
- end;
-}
-
-// Guillaune Knight - Flavius
-// *********************************************************************
-bat_room,167,178,5 script Guillaume Knight#4 417,{
- mes "[Guillaume Knight]";
- mes "The objective of the Flavius Battle is to score 2 points before your enemy by destroying their crystal.";
- next;
- mes "[Guillaume Knight]";
- mes "The crystals for both armies are protected by special barricades that cannot be destroyed by direct attacks.";
- next;
- mes "[Guillaume Knight]";
- mes "But they can be removed by destroying the Guardians that protect the enemy army base.";
- next;
- mes "[Guillaume Knight]";
- mes "The crystals are immune to every type of skill; your physical attacks are the only choice for destroying your enemy's crystal.";
- next;
- mes "[Guillaume Knight]";
- mes "Are you ready for battle? Then apply with the recruiter next to me!";
- close;
-}
-
-// Flavius Officerer - Guillaume
-// *********************************************************************
-bat_room,164,178,5 script Flavius Officer#3 418,{
- mes "[Flavius Officer]";
- if( Bat_Team == 2 )
- {
- mes "Get out of here you stupid Croix!";
- close;
- }
-
- if( Bat_Team == 0 )
- {
- mes "Please sign up for an army with Prince Croix or General Guillaume!";
- close;
- }
-
- mes "Hello " + strcharinfo(0) + ", let's show the power of the Guillaume Army to those stinky Croixs!";
- next;
- if( select("I want to join your army!:End Conversation") == 2 )
- close;
-
- mes "[Flavius Officer]";
- if( BG_Delay_Tick >= gettimetick(2) )
- {
- mes "You are a Deserter!!";
- mes "Because of running away, you need to wait ^0000FF" + callfunc("Time2Str",BG_Delay_Tick) + "^000000 to join again a BattleGround.";
- close;
- }
- if( Flavius_BG_Tick >= gettimetick(2) )
- {
- mes "Sorry, you can't join the battle right now.";
- mes "You need to wait ^0000FF" + callfunc("Time2Str",Flavius_BG_Tick) + "^000000 to join again Flavius.";
- close;
- }
- if( BaseLevel < 80 )
- {
- mes "I'm very please you want to join our army, but I'm sorry: I can't send a rookie like you to die on the cruel battlefield";
- close;
- }
-
- mes "Good luck!";
- close2;
- warp "bat_room",57,94;
- end;
-}
-
-// Croix Knight - Flavius
-// *********************************************************************
-bat_room,167,121,1 script Croix Knight#4 413,{
- mes "[Croix Knight]";
- mes "The objective of the Flavius Battle is to score 2 points before your enemy by destroying their crystal.";
- next;
- mes "[Croix Knight]";
- mes "The crystals for both armies are protected by special barricades that cannot be destroyed by direct attacks.";
- next;
- mes "[Croix Knight]";
- mes "But they can be removed by destroying the Guardians that protect the enemy army base.";
- next;
- mes "[Croix Knight]";
- mes "The crystals are immune to every type of skill; your physical attacks are the only choice for destroying your enemy's crystal.";
- next;
- mes "[Croix Knight]";
- mes "Are you ready for battle? Then apply with the recruiter next to me!";
- close;
-}
-
-// Flavius Officerer - Croix
-// *********************************************************************
-bat_room,164,121,1 script Flavius Officer#4 414,{
- mes "[Flavius Officer]";
- if( Bat_Team == 1 )
- {
- mes "Get out of here you stupid Guillaume!";
- close;
- }
-
- if( Bat_Team == 0 )
- {
- mes "Please sign up for an army with Prince Croix or General Guillaume!";
- close;
- }
-
- mes "Hello " + strcharinfo(0) + ", let's show the power of the Croix Army to those stinky Guillaumes!";
- next;
- if( select("I want to join your army!:End Conversation") == 2 )
- close;
-
- mes "[Flavius Officer]";
- if( BG_Delay_Tick >= gettimetick(2) )
- {
- mes "You are a Deserter!!";
- mes "Because of running away, you need to wait ^0000FF" + callfunc("Time2Str",BG_Delay_Tick) + "^000000 to join again a BattleGround.";
- close;
- }
- if( Flavius_BG_Tick >= gettimetick(2) )
- {
- mes "Sorry, you can't join the battle right now.";
- mes "You need to wait ^0000FF" + callfunc("Time2Str",Flavius_BG_Tick) + "^000000 to join again Flavius.";
- close;
- }
- if( BaseLevel < 80 )
- {
- mes "I'm very please you want to join our army, but I'm sorry: I can't send a rookie like you to die on the cruel battlefield";
- close;
- }
-
- mes "Good luck!";
- close2;
- warp "bat_room",57,77;
- end;
-}
-
-// Guillaume Knight - KvM
-// *********************************************************************
-bat_room,143,178,5 script Guillaume Knight#5 417,{
- mes "[Guillaume Knight]";
- mes "To win the Battle of Kriger Von Midgard you and your team must kill all the other opponents before all of you die.";
- next;
- mes "[Guillaume Knight]";
- mes "The first team to lose all their soldiers loses.";
- next;
- mes "[Guillaume Knight]";
- mes "Since you cannot come back to battle after you die, taking care on the battlefield is essential.";
- next;
- mes "[Guillaume Knight]";
- mes "Are you ready for battle? Then apply with the recruiter next to me!";
- close;
-}
-
-// KvM Officerer - Guillaume
-// *********************************************************************
-bat_room,140,178,5 script KVM [80-99] Officer#1 418,{
- mes "[KVM Officer]";
- if( Bat_Team == 2 )
- {
- mes "Get out of here you stinky Croix!";
- close;
- }
-
- if( Bat_Team == 0 )
- {
- mes "Please sign up for an army with Prince Croix or General Guillaume!";
- close;
- }
-
- mes "Hello " + strcharinfo(0) + ", let's show the power of the Guillaume Army to those stinky Croixs!";
- next;
- if( select("I want to join your army!:End Conversation") == 2 )
- close;
-
- mes "[KVM Officer]";
- if( BG_Delay_Tick >= gettimetick(2) )
- {
- mes "You are a Deserter!!";
- mes "Because of running away, you need to wait ^0000FF" + callfunc("Time2Str",BG_Delay_Tick) + "^000000 to join again a BattleGround.";
- close;
- }
- if( KvM_BG_Tick >= gettimetick(2) )
- {
- mes "Sorry, you can't join the battle right now.";
- mes "You need to wait ^0000FF" + callfunc("Time2Str",KvM_BG_Tick) + "^000000 to join KvM.";
- close;
- }
- if( BaseLevel < 80 )
- {
- mes "I'm very please you want to join our army, but I'm sorry: This arena is for players with baselevel from 80 to 99.";
- close;
- }
-
- mes "Good luck!";
- close2;
- warp "bat_room",253,224;
- end;
-}
-
-// Croix Knight - KvM
-// *********************************************************************
-bat_room,143,121,1 script Croix Knight#5 413,{
- mes "[Croix Knight]";
- mes "To win the Battle of Kriger Von Midgard you and your team must kill all the other opponents before all of you die.";
- next;
- mes "[Croix Knight]";
- mes "The first team to lose all their soldiers loses.";
- next;
- mes "[Croix Knight]";
- mes "Since you cannot come back to battle after you die, taking care on the battlefield is essential.";
- next;
- mes "[Croix Knight]";
- mes "Are you ready for battle? Then apply with the recruiter next to me!";
- close;
-}
-
-// KvM Officer - Croix
-// *********************************************************************
-bat_room,140,121,1 script KVM [80-99] Officer#2 414,{
- mes "[KVM Officer]";
- if( Bat_Team == 1 )
- {
- mes "Get out of here you stupid Guillaume!";
- close;
- }
-
- if( Bat_Team == 0 )
- {
- mes "Please sign up for an army with Prince Croix or General Guillaume!";
- close;
- }
-
- mes "Hello " + strcharinfo(0) + ", let's show the power of the Croix Army to those stinky Guillaumes!";
- next;
- if( select("I want to join your army!:End Conversation") == 2 )
- close;
-
- mes "[KVM Officer]";
- if( BG_Delay_Tick >= gettimetick(2) )
- {
- mes "You are a Deserter!!";
- mes "Because of running away, you need to wait ^0000FF" + callfunc("Time2Str",BG_Delay_Tick) + "^000000 to join again a BattleGround.";
- close;
- }
- if( KvM_BG_Tick >= gettimetick(2) )
- {
- mes "Sorry, you can't join the battle right now.";
- mes "You need to wait ^0000FF" + callfunc("Time2Str",KvM_BG_Tick) + "^000000 to join KvM.";
- close;
- }
- if( BaseLevel < 80 )
- {
- mes "I'm very please you want to join our army, but I'm sorry: This arena is for players with baselevel from 80 to 99.";
- close;
- }
-
- mes "Good luck!";
- close2;
- warp "bat_room",253,208;
- end;
-}
-
-// Guillaume Knight - KvM
-// *********************************************************************
-bat_room,135,178,5 script Guillaume Knight#6 417,{
- mes "[Guillaume Knight]";
- mes "To win the Battle of Kriger Von Midgard you and your team must kill all the other opponents before all of you die.";
- next;
- mes "[Guillaume Knight]";
- mes "The first team to lose all their soldiers loses.";
- next;
- mes "[Guillaume Knight]";
- mes "Since you cannot come back to battle after you die, taking care on the battlefield is essential.";
- next;
- mes "[Guillaume Knight]";
- mes "Are you ready for battle? Then apply with the recruiter next to me!";
- close;
-}
-
-// KvM Officerer - Guillaume
-// *********************************************************************
-bat_room,132,178,5 script KVM [60-79] Officer#1 418,{
- mes "[KVM Officer]";
- if( Bat_Team == 2 )
- {
- mes "Get out of here you stinky Croix!";
- close;
- }
-
- if( Bat_Team == 0 )
- {
- mes "Please sign up for an army with Prince Croix or General Guillaume!";
- close;
- }
-
- mes "Hello " + strcharinfo(0) + ", let's show the power of the Guillaume Army to those stinky Croixs!";
- next;
- if( select("I want to join your army!:End Conversation") == 2 )
- close;
-
- mes "[KVM Officer]";
- if( BG_Delay_Tick >= gettimetick(2) )
- {
- mes "You are a Deserter!!";
- mes "Because of running away, you need to wait ^0000FF" + callfunc("Time2Str",BG_Delay_Tick) + "^000000 to join again a BattleGround.";
- close;
- }
- if( KvM_BG_Tick >= gettimetick(2) )
- {
- mes "Sorry, you can't join the battle right now.";
- mes "You need to wait ^0000FF" + callfunc("Time2Str",KvM_BG_Tick) + "^000000 to join KvM.";
- close;
- }
- if( BaseLevel < 60 || BaseLevel > 79 )
- {
- mes "I'm very please you want to join our army, but I'm sorry: This arena is for players with baselevel from 60 to 79.";
- close;
- }
-
- mes "Good luck!";
- close2;
- warp "bat_room",225,224;
- end;
-}
-
-// Croix Knight - KvM
-// *********************************************************************
-bat_room,135,121,1 script Croix Knight#6 413,{
- mes "[Croix Knight]";
- mes "To win the Battle of Kriger Von Midgard you and your team must kill all the other opponents before all of you die.";
- next;
- mes "[Croix Knight]";
- mes "The first team to lose all their soldiers loses.";
- next;
- mes "[Croix Knight]";
- mes "Since you cannot come back to battle after you die, taking care on the battlefield is essential.";
- next;
- mes "[Croix Knight]";
- mes "Are you ready for battle? Then apply with the recruiter next to me!";
- close;
-}
-
-// KvM Officer - Croix
-// *********************************************************************
-bat_room,132,121,1 script KVM [60-79] Officer#2 414,{
- mes "[KVM Officer]";
- if( Bat_Team == 1 )
- {
- mes "Get out of here you stupid Guillaume!";
- close;
- }
-
- if( Bat_Team == 0 )
- {
- mes "Please sign up for an army with Prince Croix or General Guillaume!";
- close;
- }
-
- mes "Hello " + strcharinfo(0) + ", let's show the power of the Croix Army to those stinky Guillaumes!";
- next;
- if( select("I want to join your army!:End Conversation") == 2 )
- close;
-
- mes "[KVM Officer]";
- if( BG_Delay_Tick >= gettimetick(2) )
- {
- mes "You are a Deserter!!";
- mes "Because of running away, you need to wait ^0000FF" + callfunc("Time2Str",BG_Delay_Tick) + "^000000 to join again a BattleGround.";
- close;
- }
- if( KvM_BG_Tick >= gettimetick(2) )
- {
- mes "Sorry, you can't join the battle right now.";
- mes "You need to wait ^0000FF" + callfunc("Time2Str",KvM_BG_Tick) + "^000000 to join KvM.";
- close;
- }
- if( BaseLevel < 60 || BaseLevel > 79 )
- {
- mes "I'm very please you want to join our army, but I'm sorry: This arena is for players with baselevel from 60 to 79.";
- close;
- }
-
- mes "Good luck!";
- close2;
- warp "bat_room",225,208;
- end;
-}
-
-// Guillaume Knight - KvM
-// *********************************************************************
-bat_room,127,178,5 script Guillaume Knight#7 417,{
- mes "[Guillaume Knight]";
- mes "To win the Battle of Kriger Von Midgard you and your team must kill all the other opponents before all of you die.";
- next;
- mes "[Guillaume Knight]";
- mes "The first team to lose all their soldiers loses.";
- next;
- mes "[Guillaume Knight]";
- mes "Since you cannot come back to battle after you die, taking care on the battlefield is essential.";
- next;
- mes "[Guillaume Knight]";
- mes "Are you ready for battle? Then apply with the recruiter next to me!";
- close;
-}
-
-// KvM Officerer - Guillaume
-// *********************************************************************
-bat_room,124,178,5 script KVM [1-59] Officer#1 418,{
- mes "[KVM Officer]";
- if( Bat_Team == 2 )
- {
- mes "Get out of here you stinky Croix!";
- close;
- }
-
- if( Bat_Team == 0 )
- {
- mes "Please sign up for an army with Prince Croix or General Guillaume!";
- close;
- }
-
- mes "Hello " + strcharinfo(0) + ", let's show the power of the Guillaume Army to those stinky Croixs!";
- next;
- if( select("I want to join your army!:End Conversation") == 2 )
- close;
-
- mes "[KVM Officer]";
- if( BG_Delay_Tick >= gettimetick(2) )
- {
- mes "You are a Deserter!!";
- mes "Because of running away, you need to wait ^0000FF" + callfunc("Time2Str",BG_Delay_Tick) + "^000000 to join again a BattleGround.";
- close;
- }
- if( KvM_BG_Tick >= gettimetick(2) )
- {
- mes "Sorry, you can't join the battle right now.";
- mes "You need to wait ^0000FF" + callfunc("Time2Str",KvM_BG_Tick) + "^000000 to join KvM.";
- close;
- }
- if( BaseLevel > 59 )
- {
- mes "I'm very please you want to join our army, but I'm sorry: This arena is for players with baselevel from 1 to 59.";
- close;
- }
-
- mes "Good luck!";
- close2;
- warp "bat_room",197,224;
- end;
-}
-
-// Croix Knight - KvM
-// *********************************************************************
-bat_room,127,121,1 script Croix Knight#7 413,{
- mes "[Croix Knight]";
- mes "To win the Battle of Kriger Von Midgard you and your team must kill all the other opponents before all of you die.";
- next;
- mes "[Croix Knight]";
- mes "The first team to lose all their soldiers loses.";
- next;
- mes "[Croix Knight]";
- mes "Since you cannot come back to battle after you die, taking care on the battlefield is essential.";
- next;
- mes "[Croix Knight]";
- mes "Are you ready for battle? Then apply with the recruiter next to me!";
- close;
-}
-
-// KvM Officer - Croix
-// *********************************************************************
-bat_room,124,121,1 script KVM [1-59] Officer#2 414,{
- mes "[KVM Officer]";
- if( Bat_Team == 1 )
- {
- mes "Get out of here you stupid Guillaume!";
- close;
- }
-
- if( Bat_Team == 0 )
- {
- mes "Please sign up for an army with Prince Croix or General Guillaume!";
- close;
- }
-
- mes "Hello " + strcharinfo(0) + ", let's show the power of the Croix Army to those stinky Guillaumes!";
- next;
- if( select("I want to join your army!:End Conversation") == 2 )
- close;
-
- mes "[KVM Officer]";
- if( BG_Delay_Tick >= gettimetick(2) )
- {
- mes "You are a Deserter!!";
- mes "Because of running away, you need to wait ^0000FF" + callfunc("Time2Str",BG_Delay_Tick) + "^000000 to join again a BattleGround.";
- close;
- }
- if( KvM_BG_Tick >= gettimetick(2) )
- {
- mes "Sorry, you can't join the battle right now.";
- mes "You need to wait ^0000FF" + callfunc("Time2Str",KvM_BG_Tick) + "^000000 to join KvM.";
- close;
- }
- if( BaseLevel > 59 )
- {
- mes "I'm very please you want to join our army, but I'm sorry: This arena is for players with baselevel from 1 to 59.";
- close;
- }
-
- mes "Good luck!";
- close2;
- warp "bat_room",197,208;
- end;
-}
-
-// Guard Dummy
-// *********************************************************************
-
-bat_room,161,141,3 script Prince Croix's Aid::bat_aid 415,{ end; }
-bat_room,161,139,3 duplicate(bat_aid) Prince Croix's Aid::bat_aid2 415
-bat_room,161,160,3 duplicate(bat_aid) General Guillaume's Aid::bat_aid3 419
-bat_room,161,158,3 duplicate(bat_aid) General Guillaume's Aid::bat_aid4 419
-
-// Flags
-// *********************************************************************
-
-- script Guillaume camp#bat 973,{ end; }
-- script Croix camp#bat 974,{ end; }
-
-// Exit from Registration
-// *********************************************************************
-// Flavius bat_b02
-bat_room,57,81,0 warp bat1 2,2,bat_room,154,149
-bat_room,57,90,0 warp bat2 2,2,bat_room,154,149
-// Free BG
-bat_room,57,220,0 warp bat3 2,2,bat_room,154,149
-bat_room,57,211,0 warp bat4 2,2,bat_room,154,149
-// Tierra Valley bat_a02
-bat_room,85,81,0 warp bat5 2,2,bat_room,154,149
-bat_room,85,90,0 warp bat6 2,2,bat_room,154,149
-// Tierra Valley bat_a01
-bat_room,85,220,0 warp bat7 2,2,bat_room,154,149
-bat_room,85,211,0 warp bat8 2,2,bat_room,154,149
-// Free BG
-bat_room,113,81,0 warp bat9 2,2,bat_room,154,149
-bat_room,113,90,0 warp bat10 2,2,bat_room,154,149
-// Free BG
-bat_room,113,220,0 warp bat11 2,2,bat_room,154,149
-bat_room,113,211,0 warp bat12 2,2,bat_room,154,149
-// Free BG
-bat_room,141,81,0 warp bat13 2,2,bat_room,154,149
-bat_room,141,90,0 warp bat14 2,2,bat_room,154,149
-// Free BG
-bat_room,141,220,0 warp bat15 2,2,bat_room,154,149
-bat_room,141,211,0 warp bat16 2,2,bat_room,154,149
-// Free BG
-bat_room,169,81,0 warp bat17 2,2,bat_room,154,149
-bat_room,169,90,0 warp bat18 2,2,bat_room,154,149
-// Free BG
-bat_room,169,220,0 warp bat19 2,2,bat_room,154,149
-bat_room,169,211,0 warp bat20 2,2,bat_room,154,149
-// Free BG
-bat_room,197,81,0 warp bat21 2,2,bat_room,154,149
-bat_room,197,90,0 warp bat22 2,2,bat_room,154,149
-// KvM bat_c03
-bat_room,197,220,0 warp bat23 2,2,bat_room,154,149
-bat_room,197,211,0 warp bat24 2,2,bat_room,154,149
-// Free BG
-bat_room,225,81,0 warp bat25 2,2,bat_room,154,149
-bat_room,225,90,0 warp bat26 2,2,bat_room,154,149
-// KvM bat_c02
-bat_room,225,220,0 warp bat27 2,2,bat_room,154,149
-bat_room,225,211,0 warp bat28 2,2,bat_room,154,149
-// Flavius bat_b01
-bat_room,253,81,0 warp bat29 2,2,bat_room,154,149
-bat_room,253,90,0 warp bat30 2,2,bat_room,154,149
-// KvM bat_c01
-bat_room,253,220,0 warp bat31 2,2,bat_room,154,149
-bat_room,253,211,0 warp bat32 2,2,bat_room,154,149
-
-// Badges Repairman
-// *********************************************************************
-
-bat_room,138,144,5 script Repairman#bg 99,{
- callfunc "repairmain","Repairman";
- end;
-}
-
-// Badges Exchange
-// *********************************************************************
-
-bat_room,160,150,3 script Erundek 109,{
- mes "[Erundek]";
- mes "Welcome, mighty warrior.";
- mes "What can I do for you today ?";
- next;
- switch( select("Check the Catalog","Exchange Bravery Badges","Exchange Valor Badges","Exchange Heroism Badges","Hmm, nothing I guess.") )
- {
- case 1:
- mes "[Erundek]";
- mes "We have many items, so please take a look and purchase deliberately.";
- close2;
- Readbook 11010,1;
- end;
- case 5:
- mes "[Erundek]";
- mes "As you wish.";
- mes "See you later.";
- close;
- case 2: // Bravery Badges
- mes "[Erundek]";
- mes "So you want to exchange ^0000FFBravery Badges^000000 from the Battle of Tierra Valley.";
- mes "What kind of item do you want to exchange?";
- next;
- deletearray .@Item_DB[0],127;
- set .@Badge, 7828;
-
- switch( select("Weapons:Garment:Footgear:Armor:Accessory") )
- {
- case 1: setarray .@Item_DB[0],13036,13411,1425,1632,1634,1543,1924,1978,1574,1824,1183,1380,13305,1279,1739,13108,13172; set .@Value, 100; break;
- case 2: setarray .@Item_DB[0],2538,2539,2540; set .@Value, 50; break;
- case 3: setarray .@Item_DB[0],2435,2436,2437; set .@Value, 50; break;
- case 4: setarray .@Item_DB[0],2376,2377,2378,2379,2380,2381,2382; set .@Value, 80; break;
- case 5: setarray .@Item_DB[0],2720,2721,2722,2723,2724,2725,2733; set .@Value, 500; break;
- }
-
- break;
- case 3: // Valor Badges
- mes "[Erundek]";
- mes "So you want to exchange ^FF0000Valor Badges^000000 from the Battle of Flavius.";
- mes "What kind of item do you want to exchange?";
- next;
- deletearray .@Item_DB[0],127;
- set .@Badge, 7829;
-
- switch( select("Weapons:Garment:Footgear:Armor:Accessory") )
- {
- case 1: setarray .@Item_DB[0],13037,13410,1633,1635,1542,1923,1977,1575,1823,1184,1482,1379,13306,1280,1738,13171,13173,13174; set .@Value, 100; break;
- case 2: setarray .@Item_DB[0],2538,2539,2540; set .@Value, 50; break;
- case 3: setarray .@Item_DB[0],2435,2436,2437; set .@Value, 50; break;
- case 4: setarray .@Item_DB[0],2376,2377,2378,2379,2380,2381,2382; set .@Value, 80; break;
- case 5: setarray .@Item_DB[0],2720,2721,2722,2723,2724,2725,2733; set .@Value, 500; break;
- }
-
- break;
- case 4: // Heroism Badge
- mes "[Erundek]";
- mes "So you want to exchange ^FFA500Heroism Badges^000000 from the Battle of Kriger Von Midgard.";
- mes "This shop is not available at the moment.";
- close;
- }
-
- mes "[Erundek]";
- mes "What item do you want to exchange?";
- mes "If you are not sure, check the catalog.";
- next;
-
- set .@Menu$, "";
- set .@Count, getarraysize(.@Item_DB);
- for( set .@i, 0; .@i < .@Count; set .@i, .@i + 1 )
- set .@Menu$, .@Menu$ + getitemname(.@Item_DB[.@i]) + ":";
-
- set .@Item_ID, .@Item_DB[select(.@Menu$) - 1];
-
- mes "[Erundek]";
- mes "Would you like to exchange ^FF0000" + .@Value + " " + getitemname(.@Badge) + "^000000 for a ^0000FF" + getitemname(.@Item_ID) + "^000000?";
- next;
- mes "Remember, Battleground Reward Items are ^FF0000Character Bound^000000.";
- mes "Are you sure you want this item?";
- next;
-
- if( select("Yes:No") == 2 )
- {
- mes "[Erundek]";
- mes "Do you need more time to check the items?";
- close;
- }
-
- if( countitem(.@Badge) < .@Value )
- {
- mes "[Erundek]";
- mes "I'm sorry, but you don't have enough badges to exchange.";
- close;
- }
-
- delitem .@Badge,.@Value;
- getitem .@Item_ID,1;
- mes "[Erundek]";
- mes "Thank you for exchanging.";
- close;
-}
+// ==============================================================================
+// BattleGround System - Common NPCs
+// ==============================================================================
+
+// MapFlags
+// *********************************************************************
+
+bat_room mapflag nomemo
+bat_room mapflag nowarpto
+bat_room mapflag nobranch
+bat_room mapflag nopenalty
+bat_room mapflag noteleport
+bat_room mapflag nosave SavePoint
+
+// BattleGround Warper - Entrance
+// *********************************************************************
+
+payon,189,104,3 script Maroll Battle Recruiter::BatRecruit 728,{
+ mes "[Maroll Battle Recruiter]";
+ mes "Good day, adventurer.";
+ mes "I'm a knight from a far country called Maroll Kingdom.";
+ next;
+ mes "[Maroll Battle Recruiter]";
+ mes "The two princes of the kingdom are now battling for the throne of Maroll, and are in need of experienced soldiers like you. How would you like to lend your power to one of the princes in the Maroll Kingdom?";
+ next;
+ if( select("Join:Don't Join") == 2 )
+ {
+ mes "[Maroll Battle Recruiter]";
+ mes "I'll always be stationed here for more soldiers. Fell free to come back whenever you're interested.";
+ close;
+ }
+ mes "[Maroll Battle Recruiter]";
+ mes "May the war god bless you.";
+ close2;
+ warp "bat_room",155,150;
+ end;
+}
+
+prontera,123,83,5 duplicate(BatRecruit) Maroll Battle Recruiter::BatRecruit2 728
+rachel,149,138,5 duplicate(BatRecruit) Maroll Battle Recruiter::BatRecruit3 728
+moc_ruins,75,162,5 duplicate(BatRecruit) Maroll Battle Recruiter::BatRecruit4 728
+aldebaran,146,109,5 duplicate(BatRecruit) Maroll Battle Recruiter::BatRecruit5 728
+lighthalzen,153,86,5 duplicate(BatRecruit) Maroll Battle Recruiter::BatRecruit6 728
+
+// BattleGround Warper - Exit
+// *********************************************************************
+
+bat_room,148,150,4 script Teleporter#bat 124,{
+ mes "[Teleporter]";
+ mes "Do you wish to leave the battlefield? Use my service to return to town.";
+ next;
+ if( select("Leave:Don't Leave") == 2 )
+ {
+ mes "[Teleporter]";
+ mes "I'll be here whenever you're in need of my service.";
+ close;
+ }
+
+ set .@spoint$, getsavepoint(0);
+ set .@x, getsavepoint(1);
+ set .@y, getsavepoint(2);
+ mes "[Teleporter]";
+ mes "You will be sent back to " + .@spoint$ + ".";
+ close2;
+ warp .@spoint$, .@x, .@y;
+ end;
+}
+
+// Kafra
+// *********************************************************************
+bat_room,148,147,4 script Kafra Staff::kaf_bat 861,{
+ cutin "kafra_09",2;
+ callfunc "F_Kafra",0,2,1,150,0;
+}
+
+// General Guillaume
+// *********************************************************************
+bat_room,160,159,3 script General Guillaume 420,{
+ cutin "bat_kiyom2",2;
+ mes "[General Guillaume]";
+ mes "Hot-blooded adventurer, we need your ability to win this battle.";
+ next;
+ cutin "bat_kiyom1",2;
+ mes "[General Guillaume]";
+ mes "Our great king, Marcel Marollo VII, is very sick lately. His Majesty has declared that he chosen either me or Prince Croix as the next king amongst his 9 sons.";
+ next;
+ mes "[General Guillaume]";
+ mes "Two kings can't share a nation!";
+ mes "Only the one victorious from His Majesty's appointed battle will be enthroned.";
+ next;
+ mes "[General Guillaume]";
+ mes "This is however, not just a battle between us. This battle will determine the future of this country. I pledge on my honor to prove that I'm the one who can protect this Maroll from outside threats.";
+ next;
+ if( select("Yes, I want to join you.:End Conversation") == 2 )
+ {
+ mes "[General Guillaume]";
+ mes "I'll be the one who will capture the flag!";
+ close2;
+ cutin "",255;
+ end;
+ }
+ cutin "bat_kiyom2",2;
+ mes "[General Guillaume]";
+ mes "Welcome to my army, comrade.";
+ mes "Your eyes tell me that you're a soldier that I can trust.";
+ set Bat_Team,1;
+ next;
+ mes "[General Guillaume]";
+ mes "Now, go upstairs and apply for battle with your comrades. I'm sure they'll welcome you whole-heartedly!";
+ close2;
+ cutin "",255;
+ end;
+}
+
+// General Croix
+// *********************************************************************
+bat_room,160,140,3 script Prince Croix 416,{
+ cutin "bat_crua1",2;
+ mes "[Prince Croix]";
+ mes "Wise adventurer, why don't you lend us your power for victory?";
+ next;
+ cutin "bat_crua2",2;
+ mes "[Prince Croix]";
+ mes "I do not wish to shed blood, but I have no choice but to fight for the possibility of peace and for the sake of my people.";
+ next;
+ mes "[Prince Croix]";
+ mes "General Guillaume may have an advantage in this battle as he is the great general of Maroll, but that doesn't automatically mean he'll win. I want to win this battle so that I can grant a better future for my people.";
+ next;
+ if( select("Yes, I want to join you!:End Conversation") == 2 )
+ {
+ mes "[Prince Croix]";
+ mes "For Maroll!";
+ close2;
+ cutin "",255;
+ end;
+ }
+ mes "[Prince Croix]";
+ mes "Thank you so much. I feel like I can win with the help of adventurers like you. Now, please go downstairs and join your comrades in sharpening their skills to fight the enemy!";
+ set Bat_Team,2;
+ close2;
+ cutin "",255;
+ end;
+}
+
+// Time calculation Function
+// *********************************************************************
+function script Time2Str {
+ set .@Time_Left, getarg(0) - gettimetick(2);
+
+ set .@Days, .@Time_Left / 86400;
+ set .@Time_Left, .@Time_Left - (.@Days * 86400);
+ set .@Hours, .@Time_Left / 3600;
+ set .@Time_Left, .@Time_Left - (.@Hours * 3600);
+ set .@Minutes, .@Time_Left / 60;
+ set .@Time_Left, .@Time_Left - (.@Minutes * 60);
+
+ set .@Time$, "";
+ if( .@Days > 1 )
+ set .@Time$, .@Time$ + .@Days + " days, ";
+ else if( .@Days > 0 )
+ set .@Time$, .@Time$ + .@Days + " day, ";
+
+ if( .@Hours > 1 )
+ set .@Time$, .@Time$ + .@Hours + " hours, ";
+ else if( .@Hours > 0 )
+ set .@Time$, .@Time$ + .@Hours + " hour, ";
+
+ if( .@Minutes > 1 )
+ set .@Time$, .@Time$ + .@Minutes + " minutes, ";
+ else if( .@Minutes > 0 )
+ set .@Time$, .@Time$ + .@Minutes + " minute, ";
+
+ if( .@Time_Left > 1 || .@Time_Left == 0 )
+ set .@Time$, .@Time$ + .@Time_Left + " seconds.";
+ else if( .@Time_Left == 1 )
+ set .@Time$, .@Time$ + .@Time_Left + " second.";
+
+ return .@Time$;
+}
+
+// Guillaume Knight - Tierra Valley
+// *********************************************************************
+bat_room,159,178,5 script Guillaume Knight#1 417,{
+ mes "[Guillaume Knight]";
+ mes "Tierra Gorge is a very steep canyon with two forts residing in the north and south ends of the map.";
+ next;
+ mes "[Guillaume Knight]";
+ mes "There is a ration depot for the Guillaume and Croix armies at the 11 and 8 o'clock directions.";
+ next;
+ mes "[Guillaume Knight]";
+ mes "The battle starts at your army's ship, and the goal is to advance and destroy your enemy's rations depot faster than they can destroy yours.";
+ mes "";
+ mes "The army that captures the neutral flag in the center of the battlefield will be rewarded with extra regeneration points, meaning their soldiers will resurrect more than the other side, giving them an advantage.";
+ next;
+ mes "[Guillaume Knight]";
+ mes "Are you ready for battle? Then apply with the recruiter next to me!";
+ close;
+}
+
+// Tierra Officerer - Guillaume
+// *********************************************************************
+bat_room,156,178,5 script Tierra Valley Officer#1 418,{
+ mes "[Tierra Officer]";
+ if( Bat_Team == 2 )
+ {
+ mes "Get out of here you stinky Croix!";
+ close;
+ }
+
+ if( Bat_Team == 0 )
+ {
+ mes "Please sign up for an army with Prince Croix or General Guillaume!";
+ close;
+ }
+
+ mes "Hello " + strcharinfo(0) + ", let's show the power of the Guillaume Army to those stinky Croixs!";
+ next;
+ if( select("I want to join your army!:End Conversation") == 2 )
+ close;
+
+ mes "[Tierra Officer]";
+ if( BG_Delay_Tick >= gettimetick(2) )
+ {
+ mes "You are a Deserter!!";
+ mes "Because of running away, you need to wait ^0000FF" + callfunc("Time2Str",BG_Delay_Tick) + "^000000 to join again a BattleGround.";
+ close;
+ }
+ if( Tierra_BG_Tick >= gettimetick(2) )
+ {
+ mes "Sorry, you can't join the battle right now.";
+ mes "You need to wait ^0000FF" + callfunc("Time2Str",Tierra_BG_Tick) + "^000000 to join again Tierra Valley.";
+ close;
+ }
+ if( BaseLevel < 80 )
+ {
+ mes "I'm very please you want to join our army, but I'm sorry: I can't send a rookie like you to die on the cruel battlefield";
+ close;
+ }
+
+ mes "Good luck!";
+ close2;
+ warp "bat_room",85,224;
+ end;
+}
+
+// Croix Knight - Tierra Valley
+// *********************************************************************
+bat_room,159,121,1 script Croix Knight#1 413,{
+ mes "[Croix Knight]";
+ mes "Tierra Gorge is a very steep canyon with two forts residing in the north and south ends of the map.";
+ next;
+ mes "[Croix Knight]";
+ mes "There is a ration depot for the Guillaume and Croix armies at the 11 and 8 o'clock directions.";
+ next;
+ mes "[Croix Knight]";
+ mes "The battle starts at your army's ship, and the goal is to advance and destroy your enemy's rations depot faster than they can destroy yours.";
+ mes "";
+ mes "The army that captures the neutral flag in the center of the battlefield will be rewarded with extra regeneration points, meaning their soldiers will resurrect more than the other side, giving them an advantage.";
+ next;
+ mes "[Croix Knight]";
+ mes "Are you ready for battle? Then apply with the recruiter next to me!";
+ close;
+}
+
+// Tierra Officer - Croix
+// *********************************************************************
+bat_room,156,121,1 script Tierra Valley Officer#2 414,{
+ mes "[Tierra Officer]";
+ if( Bat_Team == 1 )
+ {
+ mes "Get out of here you stupid Guillaume!";
+ close;
+ }
+
+ if( Bat_Team == 0 )
+ {
+ mes "Please sign up for an army with Prince Croix or General Guillaume!";
+ close;
+ }
+
+ mes "Hello " + strcharinfo(0) + ", let's show the power of the Croix Army to those stinky Guillaumes!";
+ next;
+ if( select("I want to join your army!:End Conversation") == 2 )
+ close;
+
+ mes "[Tierra Officer]";
+ if( BG_Delay_Tick >= gettimetick(2) )
+ {
+ mes "You are a Deserter!!";
+ mes "Because of running away, you need to wait ^0000FF" + callfunc("Time2Str",BG_Delay_Tick) + "^000000 to join again a BattleGround.";
+ close;
+ }
+ if( Tierra_BG_Tick >= gettimetick(2) )
+ {
+ mes "Sorry, you can't join the battle right now.";
+ mes "You need to wait ^0000FF" + callfunc("Time2Str",Tierra_BG_Tick) + "^000000 to join again Tierra Valley.";
+ close;
+ }
+ if( BaseLevel < 80 )
+ {
+ mes "I'm very please you want to join our army, but I'm sorry: I can't send a rookie like you to die on the cruel battlefield";
+ close;
+ }
+
+ mes "Good luck!";
+ close2;
+ warp "bat_room",85,208;
+ end;
+}
+
+// Guillaume Knight - Tierra
+// *********************************************************************
+bat_room,175,178,5 script Guillaume Knight#2 417,{
+ mes "[Guillaume Knight]";
+ mes "Tierra Gorge is a very steep canyon with two forts residing in the north and south ends of the map.";
+ next;
+ mes "[Guillaume Knight]";
+ mes "There is a ration depot for the Guillaume and Croix armies at the 11 and 8 o'clock directions.";
+ next;
+ mes "[Guillaume Knight]";
+ mes "The battle starts at your army's ship, and the goal is to advance and destroy your enemy's rations depot faster than they can destroy yours.";
+ mes "";
+ mes "The army that captures the neutral flag in the center of the battlefield will be rewarded with extra regeneration points, meaning their soldiers will resurrect more than the other side, giving them an advantage.";
+ next;
+ mes "[Guillaume Knight]";
+ mes "Are you ready for battle? Then apply with the recruiter next to me!";
+ close;
+}
+
+// Tierra Officer - Guillaume
+// *********************************************************************
+bat_room,172,178,5 script Tierra Valley Officer#3 418,{
+ mes "[Tierra Officer]";
+ if( Bat_Team == 2 )
+ {
+ mes "Get out of here you stinky Croix!";
+ close;
+ }
+
+ if( Bat_Team == 0 )
+ {
+ mes "Please sign up for an army with Prince Croix or General Guillaume!";
+ close;
+ }
+
+ mes "Hello " + strcharinfo(0) + ", let's show the power of the Guillaume Army to those stinky Croixs!";
+ next;
+ if( select("I want to join your army!:End Conversation") == 2 )
+ close;
+
+ mes "[Tierra Officer]";
+ if( BG_Delay_Tick >= gettimetick(2) )
+ {
+ mes "You are a Deserter!!";
+ mes "Because of running away, you need to wait ^0000FF" + callfunc("Time2Str",BG_Delay_Tick) + "^000000 to join again a BattleGround.";
+ close;
+ }
+ if( Tierra_BG_Tick >= gettimetick(2) )
+ {
+ mes "Sorry, you can't join the battle right now.";
+ mes "You need to wait ^0000FF" + callfunc("Time2Str",Tierra_BG_Tick) + "^000000 to join again Tierra Valley.";
+ close;
+ }
+ if( BaseLevel < 80 )
+ {
+ mes "I'm very please you want to join our army, but I'm sorry: I can't send a rookie like you to die on the cruel battlefield";
+ close;
+ }
+
+ mes "Good luck!";
+ close2;
+ warp "bat_room",85,94;
+ end;
+}
+
+// Croix Knight - Tierra
+// *********************************************************************
+bat_room,175,121,1 script Croix Knight#2 413,{
+ mes "[Croix Knight]";
+ mes "Tierra Gorge is a very steep canyon with two forts residing in the north and south ends of the map.";
+ next;
+ mes "[Croix Knight]";
+ mes "There is a ration depot for the Guillaume and Croix armies at the 11 and 8 o'clock directions.";
+ next;
+ mes "[Croix Knight]";
+ mes "The battle starts at your army's ship, and the goal is to advance and destroy your enemy's rations depot faster than they can destroy yours.";
+ mes "";
+ mes "The army that captures the neutral flag in the center of the battlefield will be rewarded with extra regeneration points, meaning their soldiers will resurrect more than the other side, giving them an advantage.";
+ next;
+ mes "[Croix Knight]";
+ mes "Are you ready for battle? Then apply with the recruiter next to me!";
+ close;
+}
+
+// Tierra Officer - Croix
+// *********************************************************************
+bat_room,172,121,1 script Tierra Valley Officer#4 414,{
+ mes "[Tierra Officer]";
+ if( Bat_Team == 1 )
+ {
+ mes "Get out of here you stupid Guillaume!";
+ close;
+ }
+
+ if( Bat_Team == 0 )
+ {
+ mes "Please sign up for an army with Prince Croix or General Guillaume!";
+ close;
+ }
+
+ mes "Hello " + strcharinfo(0) + ", let's show the power of the Croix Army to those stinky Guillaumes!";
+ next;
+ if( select("I want to join your army!:End Conversation") == 2 )
+ close;
+
+ mes "[Tierra Officer]";
+ if( BG_Delay_Tick >= gettimetick(2) )
+ {
+ mes "You are a Deserter!!";
+ mes "Because of running away, you need to wait ^0000FF" + callfunc("Time2Str",BG_Delay_Tick) + "^000000 to join again a BattleGround.";
+ close;
+ }
+ if( Tierra_BG_Tick >= gettimetick(2) )
+ {
+ mes "Sorry, you can't join the battle right now.";
+ mes "You need to wait ^0000FF" + callfunc("Time2Str",Tierra_BG_Tick) + "^000000 to join again Tierra Valley.";
+ close;
+ }
+ if( BaseLevel < 80 )
+ {
+ mes "I'm very please you want to join our army, but I'm sorry: I can't send a rookie like you to die on the cruel battlefield";
+ close;
+ }
+
+ mes "Good luck!";
+ close2;
+ warp "bat_room",85,77;
+ end;
+}
+
+// Guillaune Knight - Flavius
+// *********************************************************************
+bat_room,151,178,5 script Guillaume Knight#3 417,{
+ mes "[Guillaume Knight]";
+ mes "The objective of the Flavius Battle is to score 2 points before your enemy by destroying their crystal.";
+ next;
+ mes "[Guillaume Knight]";
+ mes "The crystals for both armies are protected by special barricades that cannot be destroyed by direct attacks.";
+ next;
+ mes "[Guillaume Knight]";
+ mes "But they can be removed by destroying the Guardians that protect the enemy army base.";
+ next;
+ mes "[Guillaume Knight]";
+ mes "The crystals are immune to every type of skill; your physical attacks are the only choice for destroying your enemy's crystal.";
+ next;
+ mes "[Guillaume Knight]";
+ mes "Are you ready for battle? Then apply with the recruiter next to me!";
+ close;
+}
+
+// Flavius Officerer - Guillaume
+// *********************************************************************
+bat_room,148,178,5 script Flavius Officer#1 418,{
+ mes "[Flavius Officer]";
+ if( Bat_Team == 2 )
+ {
+ mes "Get out of here you stupid Croix!";
+ close;
+ }
+
+ if( Bat_Team == 0 )
+ {
+ mes "Please sign up for an army with Prince Croix or General Guillaume!";
+ close;
+ }
+
+ mes "Hello " + strcharinfo(0) + ", let's show the power of the Guillaume Army to those stinky Croixs!";
+ next;
+ if( select("I want to join your army!:End Conversation") == 2 )
+ close;
+
+ mes "[Flavius Officer]";
+ if( BG_Delay_Tick >= gettimetick(2) )
+ {
+ mes "You are a Deserter!!";
+ mes "Because of running away, you need to wait ^0000FF" + callfunc("Time2Str",BG_Delay_Tick) + "^000000 to join again a BattleGround.";
+ close;
+ }
+ if( Flavius_BG_Tick >= gettimetick(2) )
+ {
+ mes "Sorry, you can't join the battle right now.";
+ mes "You need to wait ^0000FF" + callfunc("Time2Str",Flavius_BG_Tick) + "^000000 to join again Flavius.";
+ close;
+ }
+ if( BaseLevel < 80 )
+ {
+ mes "I'm very please you want to join our army, but I'm sorry: I can't send a rookie like you to die on the cruel battlefield";
+ close;
+ }
+
+ mes "Good luck!";
+ close2;
+ warp "bat_room",253,94;
+ end;
+}
+
+// Croix Knight - Flavius
+// *********************************************************************
+bat_room,151,121,1 script Croix Knight#3 413,{
+ mes "[Croix Knight]";
+ mes "The objective of the Flavius Battle is to score 2 points before your enemy by destroying their crystal.";
+ next;
+ mes "[Croix Knight]";
+ mes "The crystals for both armies are protected by special barricades that cannot be destroyed by direct attacks.";
+ next;
+ mes "[Croix Knight]";
+ mes "But they can be removed by destroying the Guardians that protect the enemy army base.";
+ next;
+ mes "[Croix Knight]";
+ mes "The crystals are immune to every type of skill; your physical attacks are the only choice for destroying your enemy's crystal.";
+ next;
+ mes "[Croix Knight]";
+ mes "Are you ready for battle? Then apply with the recruiter next to me!";
+ close;
+}
+
+// Flavius Officerer - Croix
+// *********************************************************************
+bat_room,148,121,1 script Flavius Officer#2 414,{
+ mes "[Flavius Officer]";
+ if( Bat_Team == 1 )
+ {
+ mes "Get out of here you stupid Guillaume!";
+ close;
+ }
+
+ if( Bat_Team == 0 )
+ {
+ mes "Please sign up for an army with Prince Croix or General Guillaume!";
+ close;
+ }
+
+ mes "Hello " + strcharinfo(0) + ", let's show the power of the Croix Army to those stinky Guillaumes!";
+ next;
+ if( select("I want to join your army!:End Conversation") == 2 )
+ close;
+
+ mes "[Flavius Officer]";
+ if( BG_Delay_Tick >= gettimetick(2) )
+ {
+ mes "You are a Deserter!!";
+ mes "Because of running away, you need to wait ^0000FF" + callfunc("Time2Str",BG_Delay_Tick) + "^000000 to join again a BattleGround.";
+ close;
+ }
+ if( Flavius_BG_Tick >= gettimetick(2) )
+ {
+ mes "Sorry, you can't join the battle right now.";
+ mes "You need to wait ^0000FF" + callfunc("Time2Str",Flavius_BG_Tick) + "^000000 to join again Flavius.";
+ close;
+ }
+ if( BaseLevel < 80 )
+ {
+ mes "I'm very please you want to join our army, but I'm sorry: I can't send a rookie like you to die on the cruel battlefield";
+ close;
+ }
+
+ mes "Good luck!";
+ close2;
+ warp "bat_room",253,77;
+ end;
+}
+
+// Guillaune Knight - Flavius
+// *********************************************************************
+bat_room,167,178,5 script Guillaume Knight#4 417,{
+ mes "[Guillaume Knight]";
+ mes "The objective of the Flavius Battle is to score 2 points before your enemy by destroying their crystal.";
+ next;
+ mes "[Guillaume Knight]";
+ mes "The crystals for both armies are protected by special barricades that cannot be destroyed by direct attacks.";
+ next;
+ mes "[Guillaume Knight]";
+ mes "But they can be removed by destroying the Guardians that protect the enemy army base.";
+ next;
+ mes "[Guillaume Knight]";
+ mes "The crystals are immune to every type of skill; your physical attacks are the only choice for destroying your enemy's crystal.";
+ next;
+ mes "[Guillaume Knight]";
+ mes "Are you ready for battle? Then apply with the recruiter next to me!";
+ close;
+}
+
+// Flavius Officerer - Guillaume
+// *********************************************************************
+bat_room,164,178,5 script Flavius Officer#3 418,{
+ mes "[Flavius Officer]";
+ if( Bat_Team == 2 )
+ {
+ mes "Get out of here you stupid Croix!";
+ close;
+ }
+
+ if( Bat_Team == 0 )
+ {
+ mes "Please sign up for an army with Prince Croix or General Guillaume!";
+ close;
+ }
+
+ mes "Hello " + strcharinfo(0) + ", let's show the power of the Guillaume Army to those stinky Croixs!";
+ next;
+ if( select("I want to join your army!:End Conversation") == 2 )
+ close;
+
+ mes "[Flavius Officer]";
+ if( BG_Delay_Tick >= gettimetick(2) )
+ {
+ mes "You are a Deserter!!";
+ mes "Because of running away, you need to wait ^0000FF" + callfunc("Time2Str",BG_Delay_Tick) + "^000000 to join again a BattleGround.";
+ close;
+ }
+ if( Flavius_BG_Tick >= gettimetick(2) )
+ {
+ mes "Sorry, you can't join the battle right now.";
+ mes "You need to wait ^0000FF" + callfunc("Time2Str",Flavius_BG_Tick) + "^000000 to join again Flavius.";
+ close;
+ }
+ if( BaseLevel < 80 )
+ {
+ mes "I'm very please you want to join our army, but I'm sorry: I can't send a rookie like you to die on the cruel battlefield";
+ close;
+ }
+
+ mes "Good luck!";
+ close2;
+ warp "bat_room",57,94;
+ end;
+}
+
+// Croix Knight - Flavius
+// *********************************************************************
+bat_room,167,121,1 script Croix Knight#4 413,{
+ mes "[Croix Knight]";
+ mes "The objective of the Flavius Battle is to score 2 points before your enemy by destroying their crystal.";
+ next;
+ mes "[Croix Knight]";
+ mes "The crystals for both armies are protected by special barricades that cannot be destroyed by direct attacks.";
+ next;
+ mes "[Croix Knight]";
+ mes "But they can be removed by destroying the Guardians that protect the enemy army base.";
+ next;
+ mes "[Croix Knight]";
+ mes "The crystals are immune to every type of skill; your physical attacks are the only choice for destroying your enemy's crystal.";
+ next;
+ mes "[Croix Knight]";
+ mes "Are you ready for battle? Then apply with the recruiter next to me!";
+ close;
+}
+
+// Flavius Officerer - Croix
+// *********************************************************************
+bat_room,164,121,1 script Flavius Officer#4 414,{
+ mes "[Flavius Officer]";
+ if( Bat_Team == 1 )
+ {
+ mes "Get out of here you stupid Guillaume!";
+ close;
+ }
+
+ if( Bat_Team == 0 )
+ {
+ mes "Please sign up for an army with Prince Croix or General Guillaume!";
+ close;
+ }
+
+ mes "Hello " + strcharinfo(0) + ", let's show the power of the Croix Army to those stinky Guillaumes!";
+ next;
+ if( select("I want to join your army!:End Conversation") == 2 )
+ close;
+
+ mes "[Flavius Officer]";
+ if( BG_Delay_Tick >= gettimetick(2) )
+ {
+ mes "You are a Deserter!!";
+ mes "Because of running away, you need to wait ^0000FF" + callfunc("Time2Str",BG_Delay_Tick) + "^000000 to join again a BattleGround.";
+ close;
+ }
+ if( Flavius_BG_Tick >= gettimetick(2) )
+ {
+ mes "Sorry, you can't join the battle right now.";
+ mes "You need to wait ^0000FF" + callfunc("Time2Str",Flavius_BG_Tick) + "^000000 to join again Flavius.";
+ close;
+ }
+ if( BaseLevel < 80 )
+ {
+ mes "I'm very please you want to join our army, but I'm sorry: I can't send a rookie like you to die on the cruel battlefield";
+ close;
+ }
+
+ mes "Good luck!";
+ close2;
+ warp "bat_room",57,77;
+ end;
+}
+
+// Guillaume Knight - KvM
+// *********************************************************************
+bat_room,143,178,5 script Guillaume Knight#5 417,{
+ mes "[Guillaume Knight]";
+ mes "To win the Battle of Kriger Von Midgard you and your team must kill all the other opponents before all of you die.";
+ next;
+ mes "[Guillaume Knight]";
+ mes "The first team to lose all their soldiers loses.";
+ next;
+ mes "[Guillaume Knight]";
+ mes "Since you cannot come back to battle after you die, taking care on the battlefield is essential.";
+ next;
+ mes "[Guillaume Knight]";
+ mes "Are you ready for battle? Then apply with the recruiter next to me!";
+ close;
+}
+
+// KvM Officerer - Guillaume
+// *********************************************************************
+bat_room,140,178,5 script KVM [80-99] Officer#1 418,{
+ mes "[KVM Officer]";
+ if( Bat_Team == 2 )
+ {
+ mes "Get out of here you stinky Croix!";
+ close;
+ }
+
+ if( Bat_Team == 0 )
+ {
+ mes "Please sign up for an army with Prince Croix or General Guillaume!";
+ close;
+ }
+
+ mes "Hello " + strcharinfo(0) + ", let's show the power of the Guillaume Army to those stinky Croixs!";
+ next;
+ if( select("I want to join your army!:End Conversation") == 2 )
+ close;
+
+ mes "[KVM Officer]";
+ if( BG_Delay_Tick >= gettimetick(2) )
+ {
+ mes "You are a Deserter!!";
+ mes "Because of running away, you need to wait ^0000FF" + callfunc("Time2Str",BG_Delay_Tick) + "^000000 to join again a BattleGround.";
+ close;
+ }
+ if( KvM_BG_Tick >= gettimetick(2) )
+ {
+ mes "Sorry, you can't join the battle right now.";
+ mes "You need to wait ^0000FF" + callfunc("Time2Str",KvM_BG_Tick) + "^000000 to join KvM.";
+ close;
+ }
+ if( BaseLevel < 80 )
+ {
+ mes "I'm very please you want to join our army, but I'm sorry: This arena is for players with baselevel from 80 to 99.";
+ close;
+ }
+
+ mes "Good luck!";
+ close2;
+ warp "bat_room",253,224;
+ end;
+}
+
+// Croix Knight - KvM
+// *********************************************************************
+bat_room,143,121,1 script Croix Knight#5 413,{
+ mes "[Croix Knight]";
+ mes "To win the Battle of Kriger Von Midgard you and your team must kill all the other opponents before all of you die.";
+ next;
+ mes "[Croix Knight]";
+ mes "The first team to lose all their soldiers loses.";
+ next;
+ mes "[Croix Knight]";
+ mes "Since you cannot come back to battle after you die, taking care on the battlefield is essential.";
+ next;
+ mes "[Croix Knight]";
+ mes "Are you ready for battle? Then apply with the recruiter next to me!";
+ close;
+}
+
+// KvM Officer - Croix
+// *********************************************************************
+bat_room,140,121,1 script KVM [80-99] Officer#2 414,{
+ mes "[KVM Officer]";
+ if( Bat_Team == 1 )
+ {
+ mes "Get out of here you stupid Guillaume!";
+ close;
+ }
+
+ if( Bat_Team == 0 )
+ {
+ mes "Please sign up for an army with Prince Croix or General Guillaume!";
+ close;
+ }
+
+ mes "Hello " + strcharinfo(0) + ", let's show the power of the Croix Army to those stinky Guillaumes!";
+ next;
+ if( select("I want to join your army!:End Conversation") == 2 )
+ close;
+
+ mes "[KVM Officer]";
+ if( BG_Delay_Tick >= gettimetick(2) )
+ {
+ mes "You are a Deserter!!";
+ mes "Because of running away, you need to wait ^0000FF" + callfunc("Time2Str",BG_Delay_Tick) + "^000000 to join again a BattleGround.";
+ close;
+ }
+ if( KvM_BG_Tick >= gettimetick(2) )
+ {
+ mes "Sorry, you can't join the battle right now.";
+ mes "You need to wait ^0000FF" + callfunc("Time2Str",KvM_BG_Tick) + "^000000 to join KvM.";
+ close;
+ }
+ if( BaseLevel < 80 )
+ {
+ mes "I'm very please you want to join our army, but I'm sorry: This arena is for players with baselevel from 80 to 99.";
+ close;
+ }
+
+ mes "Good luck!";
+ close2;
+ warp "bat_room",253,208;
+ end;
+}
+
+// Guillaume Knight - KvM
+// *********************************************************************
+bat_room,135,178,5 script Guillaume Knight#6 417,{
+ mes "[Guillaume Knight]";
+ mes "To win the Battle of Kriger Von Midgard you and your team must kill all the other opponents before all of you die.";
+ next;
+ mes "[Guillaume Knight]";
+ mes "The first team to lose all their soldiers loses.";
+ next;
+ mes "[Guillaume Knight]";
+ mes "Since you cannot come back to battle after you die, taking care on the battlefield is essential.";
+ next;
+ mes "[Guillaume Knight]";
+ mes "Are you ready for battle? Then apply with the recruiter next to me!";
+ close;
+}
+
+// KvM Officerer - Guillaume
+// *********************************************************************
+bat_room,132,178,5 script KVM [60-79] Officer#1 418,{
+ mes "[KVM Officer]";
+ if( Bat_Team == 2 )
+ {
+ mes "Get out of here you stinky Croix!";
+ close;
+ }
+
+ if( Bat_Team == 0 )
+ {
+ mes "Please sign up for an army with Prince Croix or General Guillaume!";
+ close;
+ }
+
+ mes "Hello " + strcharinfo(0) + ", let's show the power of the Guillaume Army to those stinky Croixs!";
+ next;
+ if( select("I want to join your army!:End Conversation") == 2 )
+ close;
+
+ mes "[KVM Officer]";
+ if( BG_Delay_Tick >= gettimetick(2) )
+ {
+ mes "You are a Deserter!!";
+ mes "Because of running away, you need to wait ^0000FF" + callfunc("Time2Str",BG_Delay_Tick) + "^000000 to join again a BattleGround.";
+ close;
+ }
+ if( KvM_BG_Tick >= gettimetick(2) )
+ {
+ mes "Sorry, you can't join the battle right now.";
+ mes "You need to wait ^0000FF" + callfunc("Time2Str",KvM_BG_Tick) + "^000000 to join KvM.";
+ close;
+ }
+ if( BaseLevel < 60 || BaseLevel > 79 )
+ {
+ mes "I'm very please you want to join our army, but I'm sorry: This arena is for players with baselevel from 60 to 79.";
+ close;
+ }
+
+ mes "Good luck!";
+ close2;
+ warp "bat_room",225,224;
+ end;
+}
+
+// Croix Knight - KvM
+// *********************************************************************
+bat_room,135,121,1 script Croix Knight#6 413,{
+ mes "[Croix Knight]";
+ mes "To win the Battle of Kriger Von Midgard you and your team must kill all the other opponents before all of you die.";
+ next;
+ mes "[Croix Knight]";
+ mes "The first team to lose all their soldiers loses.";
+ next;
+ mes "[Croix Knight]";
+ mes "Since you cannot come back to battle after you die, taking care on the battlefield is essential.";
+ next;
+ mes "[Croix Knight]";
+ mes "Are you ready for battle? Then apply with the recruiter next to me!";
+ close;
+}
+
+// KvM Officer - Croix
+// *********************************************************************
+bat_room,132,121,1 script KVM [60-79] Officer#2 414,{
+ mes "[KVM Officer]";
+ if( Bat_Team == 1 )
+ {
+ mes "Get out of here you stupid Guillaume!";
+ close;
+ }
+
+ if( Bat_Team == 0 )
+ {
+ mes "Please sign up for an army with Prince Croix or General Guillaume!";
+ close;
+ }
+
+ mes "Hello " + strcharinfo(0) + ", let's show the power of the Croix Army to those stinky Guillaumes!";
+ next;
+ if( select("I want to join your army!:End Conversation") == 2 )
+ close;
+
+ mes "[KVM Officer]";
+ if( BG_Delay_Tick >= gettimetick(2) )
+ {
+ mes "You are a Deserter!!";
+ mes "Because of running away, you need to wait ^0000FF" + callfunc("Time2Str",BG_Delay_Tick) + "^000000 to join again a BattleGround.";
+ close;
+ }
+ if( KvM_BG_Tick >= gettimetick(2) )
+ {
+ mes "Sorry, you can't join the battle right now.";
+ mes "You need to wait ^0000FF" + callfunc("Time2Str",KvM_BG_Tick) + "^000000 to join KvM.";
+ close;
+ }
+ if( BaseLevel < 60 || BaseLevel > 79 )
+ {
+ mes "I'm very please you want to join our army, but I'm sorry: This arena is for players with baselevel from 60 to 79.";
+ close;
+ }
+
+ mes "Good luck!";
+ close2;
+ warp "bat_room",225,208;
+ end;
+}
+
+// Guillaume Knight - KvM
+// *********************************************************************
+bat_room,127,178,5 script Guillaume Knight#7 417,{
+ mes "[Guillaume Knight]";
+ mes "To win the Battle of Kriger Von Midgard you and your team must kill all the other opponents before all of you die.";
+ next;
+ mes "[Guillaume Knight]";
+ mes "The first team to lose all their soldiers loses.";
+ next;
+ mes "[Guillaume Knight]";
+ mes "Since you cannot come back to battle after you die, taking care on the battlefield is essential.";
+ next;
+ mes "[Guillaume Knight]";
+ mes "Are you ready for battle? Then apply with the recruiter next to me!";
+ close;
+}
+
+// KvM Officerer - Guillaume
+// *********************************************************************
+bat_room,124,178,5 script KVM [1-59] Officer#1 418,{
+ mes "[KVM Officer]";
+ if( Bat_Team == 2 )
+ {
+ mes "Get out of here you stinky Croix!";
+ close;
+ }
+
+ if( Bat_Team == 0 )
+ {
+ mes "Please sign up for an army with Prince Croix or General Guillaume!";
+ close;
+ }
+
+ mes "Hello " + strcharinfo(0) + ", let's show the power of the Guillaume Army to those stinky Croixs!";
+ next;
+ if( select("I want to join your army!:End Conversation") == 2 )
+ close;
+
+ mes "[KVM Officer]";
+ if( BG_Delay_Tick >= gettimetick(2) )
+ {
+ mes "You are a Deserter!!";
+ mes "Because of running away, you need to wait ^0000FF" + callfunc("Time2Str",BG_Delay_Tick) + "^000000 to join again a BattleGround.";
+ close;
+ }
+ if( KvM_BG_Tick >= gettimetick(2) )
+ {
+ mes "Sorry, you can't join the battle right now.";
+ mes "You need to wait ^0000FF" + callfunc("Time2Str",KvM_BG_Tick) + "^000000 to join KvM.";
+ close;
+ }
+ if( BaseLevel > 59 )
+ {
+ mes "I'm very please you want to join our army, but I'm sorry: This arena is for players with baselevel from 1 to 59.";
+ close;
+ }
+
+ mes "Good luck!";
+ close2;
+ warp "bat_room",197,224;
+ end;
+}
+
+// Croix Knight - KvM
+// *********************************************************************
+bat_room,127,121,1 script Croix Knight#7 413,{
+ mes "[Croix Knight]";
+ mes "To win the Battle of Kriger Von Midgard you and your team must kill all the other opponents before all of you die.";
+ next;
+ mes "[Croix Knight]";
+ mes "The first team to lose all their soldiers loses.";
+ next;
+ mes "[Croix Knight]";
+ mes "Since you cannot come back to battle after you die, taking care on the battlefield is essential.";
+ next;
+ mes "[Croix Knight]";
+ mes "Are you ready for battle? Then apply with the recruiter next to me!";
+ close;
+}
+
+// KvM Officer - Croix
+// *********************************************************************
+bat_room,124,121,1 script KVM [1-59] Officer#2 414,{
+ mes "[KVM Officer]";
+ if( Bat_Team == 1 )
+ {
+ mes "Get out of here you stupid Guillaume!";
+ close;
+ }
+
+ if( Bat_Team == 0 )
+ {
+ mes "Please sign up for an army with Prince Croix or General Guillaume!";
+ close;
+ }
+
+ mes "Hello " + strcharinfo(0) + ", let's show the power of the Croix Army to those stinky Guillaumes!";
+ next;
+ if( select("I want to join your army!:End Conversation") == 2 )
+ close;
+
+ mes "[KVM Officer]";
+ if( BG_Delay_Tick >= gettimetick(2) )
+ {
+ mes "You are a Deserter!!";
+ mes "Because of running away, you need to wait ^0000FF" + callfunc("Time2Str",BG_Delay_Tick) + "^000000 to join again a BattleGround.";
+ close;
+ }
+ if( KvM_BG_Tick >= gettimetick(2) )
+ {
+ mes "Sorry, you can't join the battle right now.";
+ mes "You need to wait ^0000FF" + callfunc("Time2Str",KvM_BG_Tick) + "^000000 to join KvM.";
+ close;
+ }
+ if( BaseLevel > 59 )
+ {
+ mes "I'm very please you want to join our army, but I'm sorry: This arena is for players with baselevel from 1 to 59.";
+ close;
+ }
+
+ mes "Good luck!";
+ close2;
+ warp "bat_room",197,208;
+ end;
+}
+
+// Guard Dummy
+// *********************************************************************
+
+bat_room,161,141,3 script Prince Croix's Aid::bat_aid 415,{ end; }
+bat_room,161,139,3 duplicate(bat_aid) Prince Croix's Aid::bat_aid2 415
+bat_room,161,160,3 duplicate(bat_aid) General Guillaume's Aid::bat_aid3 419
+bat_room,161,158,3 duplicate(bat_aid) General Guillaume's Aid::bat_aid4 419
+
+// Flags
+// *********************************************************************
+
+- script Guillaume camp#bat 973,{ end; }
+- script Croix camp#bat 974,{ end; }
+
+// Exit from Registration
+// *********************************************************************
+// Flavius bat_b02
+bat_room,57,81,0 warp bat1 2,2,bat_room,154,149
+bat_room,57,90,0 warp bat2 2,2,bat_room,154,149
+// Free BG
+bat_room,57,220,0 warp bat3 2,2,bat_room,154,149
+bat_room,57,211,0 warp bat4 2,2,bat_room,154,149
+// Tierra Valley bat_a02
+bat_room,85,81,0 warp bat5 2,2,bat_room,154,149
+bat_room,85,90,0 warp bat6 2,2,bat_room,154,149
+// Tierra Valley bat_a01
+bat_room,85,220,0 warp bat7 2,2,bat_room,154,149
+bat_room,85,211,0 warp bat8 2,2,bat_room,154,149
+// Free BG
+bat_room,113,81,0 warp bat9 2,2,bat_room,154,149
+bat_room,113,90,0 warp bat10 2,2,bat_room,154,149
+// Free BG
+bat_room,113,220,0 warp bat11 2,2,bat_room,154,149
+bat_room,113,211,0 warp bat12 2,2,bat_room,154,149
+// Free BG
+bat_room,141,81,0 warp bat13 2,2,bat_room,154,149
+bat_room,141,90,0 warp bat14 2,2,bat_room,154,149
+// Free BG
+bat_room,141,220,0 warp bat15 2,2,bat_room,154,149
+bat_room,141,211,0 warp bat16 2,2,bat_room,154,149
+// Free BG
+bat_room,169,81,0 warp bat17 2,2,bat_room,154,149
+bat_room,169,90,0 warp bat18 2,2,bat_room,154,149
+// Free BG
+bat_room,169,220,0 warp bat19 2,2,bat_room,154,149
+bat_room,169,211,0 warp bat20 2,2,bat_room,154,149
+// Free BG
+bat_room,197,81,0 warp bat21 2,2,bat_room,154,149
+bat_room,197,90,0 warp bat22 2,2,bat_room,154,149
+// KvM bat_c03
+bat_room,197,220,0 warp bat23 2,2,bat_room,154,149
+bat_room,197,211,0 warp bat24 2,2,bat_room,154,149
+// Free BG
+bat_room,225,81,0 warp bat25 2,2,bat_room,154,149
+bat_room,225,90,0 warp bat26 2,2,bat_room,154,149
+// KvM bat_c02
+bat_room,225,220,0 warp bat27 2,2,bat_room,154,149
+bat_room,225,211,0 warp bat28 2,2,bat_room,154,149
+// Flavius bat_b01
+bat_room,253,81,0 warp bat29 2,2,bat_room,154,149
+bat_room,253,90,0 warp bat30 2,2,bat_room,154,149
+// KvM bat_c01
+bat_room,253,220,0 warp bat31 2,2,bat_room,154,149
+bat_room,253,211,0 warp bat32 2,2,bat_room,154,149
+
+// Badges Repairman
+// *********************************************************************
+
+bat_room,138,144,5 script Repairman#bg 99,{
+ callfunc "repairmain","Repairman";
+ end;
+}
+
+// Badges Exchange
+// *********************************************************************
+
+bat_room,160,150,3 script Erundek 109,{
+ mes "[Erundek]";
+ mes "Welcome, mighty warrior.";
+ mes "What can I do for you today ?";
+ next;
+ switch( select("Check the Catalog","Exchange Bravery Badges","Exchange Valor Badges","Exchange Heroism Badges","Hmm, nothing I guess.") )
+ {
+ case 1:
+ mes "[Erundek]";
+ mes "We have many items, so please take a look and purchase deliberately.";
+ close2;
+ Readbook 11010,1;
+ end;
+ case 5:
+ mes "[Erundek]";
+ mes "As you wish.";
+ mes "See you later.";
+ close;
+ case 2: // Bravery Badges
+ mes "[Erundek]";
+ mes "So you want to exchange ^0000FFBravery Badges^000000 from the Battle of Tierra Valley.";
+ mes "What kind of item do you want to exchange?";
+ next;
+ deletearray .@Item_DB[0],127;
+ set .@Badge, 7828;
+
+ switch( select("Weapons:Garment:Footgear:Armor:Accessory") )
+ {
+ case 1: setarray .@Item_DB[0],13036,13411,1425,1632,1634,1543,1924,1978,1574,1824,1183,1380,13305,1279,1739,13108,13172; set .@Value, 100; break;
+ case 2: setarray .@Item_DB[0],2538,2539,2540; set .@Value, 50; break;
+ case 3: setarray .@Item_DB[0],2435,2436,2437; set .@Value, 50; break;
+ case 4: setarray .@Item_DB[0],2376,2377,2378,2379,2380,2381,2382; set .@Value, 80; break;
+ case 5: setarray .@Item_DB[0],2720,2721,2722,2723,2724,2725,2733; set .@Value, 500; break;
+ }
+
+ break;
+ case 3: // Valor Badges
+ mes "[Erundek]";
+ mes "So you want to exchange ^FF0000Valor Badges^000000 from the Battle of Flavius.";
+ mes "What kind of item do you want to exchange?";
+ next;
+ deletearray .@Item_DB[0],127;
+ set .@Badge, 7829;
+
+ switch( select("Weapons:Garment:Footgear:Armor:Accessory") )
+ {
+ case 1: setarray .@Item_DB[0],13037,13410,1633,1635,1542,1923,1977,1575,1823,1184,1482,1379,13306,1280,1738,13171,13173,13174; set .@Value, 100; break;
+ case 2: setarray .@Item_DB[0],2538,2539,2540; set .@Value, 50; break;
+ case 3: setarray .@Item_DB[0],2435,2436,2437; set .@Value, 50; break;
+ case 4: setarray .@Item_DB[0],2376,2377,2378,2379,2380,2381,2382; set .@Value, 80; break;
+ case 5: setarray .@Item_DB[0],2720,2721,2722,2723,2724,2725,2733; set .@Value, 500; break;
+ }
+
+ break;
+ case 4: // Heroism Badge
+ mes "[Erundek]";
+ mes "So you want to exchange ^FFA500Heroism Badges^000000 from the Battle of Kriger Von Midgard.";
+ mes "This shop is not available at the moment.";
+ close;
+ }
+
+ mes "[Erundek]";
+ mes "What item do you want to exchange?";
+ mes "If you are not sure, check the catalog.";
+ next;
+
+ set .@Menu$, "";
+ set .@Count, getarraysize(.@Item_DB);
+ for( set .@i, 0; .@i < .@Count; set .@i, .@i + 1 )
+ set .@Menu$, .@Menu$ + getitemname(.@Item_DB[.@i]) + ":";
+
+ set .@Item_ID, .@Item_DB[select(.@Menu$) - 1];
+
+ mes "[Erundek]";
+ mes "Would you like to exchange ^FF0000" + .@Value + " " + getitemname(.@Badge) + "^000000 for a ^0000FF" + getitemname(.@Item_ID) + "^000000?";
+ next;
+ mes "Remember, Battleground Reward Items are ^FF0000Character Bound^000000.";
+ mes "Are you sure you want this item?";
+ next;
+
+ if( select("Yes:No") == 2 )
+ {
+ mes "[Erundek]";
+ mes "Do you need more time to check the items?";
+ close;
+ }
+
+ if( countitem(.@Badge) < .@Value )
+ {
+ mes "[Erundek]";
+ mes "I'm sorry, but you don't have enough badges to exchange.";
+ close;
+ }
+
+ delitem .@Badge,.@Value;
+ getitem .@Item_ID,1;
+ mes "[Erundek]";
+ mes "Thank you for exchanging.";
+ close;
+}
diff --git a/npc/battleground/bg_flavius_01.txt b/npc/battleground/bg_flavius_01.txt
index dbfea0873..2017fc073 100644
--- a/npc/battleground/bg_flavius_01.txt
+++ b/npc/battleground/bg_flavius_01.txt
@@ -1,453 +1,453 @@
-// ==============================================================================
-// BattleGround System - Flavius 1
-// ==============================================================================
-
-// Registration NPC's
-// *********************************************************************
-
-bat_room,253,97,4 script Registration::Fl1R_Guillaume 418,{
- end;
-OnInit:
- waitingroom "Battle Station 10 Players",10,"Flavius_BG1::OnGuillaumeJoin",1;
- end;
-OnEnterBG:
- set $@FlaviusBG1_id1, waitingroom2bg("bat_b01",390,10,"Flavius_BG1::OnGuillaumeQuit","");
- end;
-}
-
-bat_room,253,74,0 script Registration::Fl1R_Croix 414,{
- end;
-OnInit:
- waitingroom "Battle Station 10 Players",10,"Flavius_BG1::OnCroixJoin",1;
- end;
-OnEnterBG:
- set $@FlaviusBG1_id2, waitingroom2bg("bat_b01",10,290,"Flavius_BG1::OnCroixQuit","");
- end;
-}
-
-// Battleground Engine
-// *********************************************************************
-
-- script Flavius_BG1 -1,{
- end;
-
-OnInit:
- disablenpc "Guillaume Vintenar#fl1";
- disablenpc "Croix Vintenar#fl1";
- disablenpc "Therapist in battle#fl11";
- disablenpc "Therapist in battle#fl12";
- end;
-
-OnGuillaumeQuit:
-OnCroixQuit:
- set BG_Delay_Tick, gettimetick(2) + 1200;
- end;
-
-OnGuillaumeJoin:
-OnCroixJoin:
- if( $@FlaviusBG1 == 0 )
- donpcevent "Flavius_BG1::OnReadyCheck";
- end;
-
-OnReadyCheck:
- if( $@FlaviusBG1 )
- end;
- set .@Guillaume, getwaitingroomstate(0,"Fl1R_Guillaume");
- set .@Croix, getwaitingroomstate(0,"Fl1R_Croix");
-
- if( .@Guillaume < 10 || .@Croix < 10 )
- {
- mapannounce "bat_room","Battleground -- Flavius [80-99] G: " + .@Guillaume + "/10, C: " + .@Croix + "/10",1,0x006400;
- end;
- }
-
- // BG Variables
- set $@FlaviusBG1, 1;
- set $@FlaviusBG1_Victory, 0;
- set .Guillaume_Score, 0;
- set .Guillaume_Loss, 0;
- set .Croix_Score, 0;
- set .Croix_Loss, 0;
- set .Match, 0;
- // Prepare NPC
- donpcevent "#gfl1_respawn::OnBGStart";
- donpcevent "#cfl1_respawn::OnBGStart";
- enablenpc "Therapist in battle#fl11";
- enablenpc "Therapist in battle#fl12";
- disablenpc "Guillaume Vintenar#fl1";
- disablenpc "Croix Vintenar#fl1";
- // Build and Warp Teams
- donpcevent "Fl1R_Guillaume::OnEnterBG";
- donpcevent "Fl1R_Croix::OnEnterBG";
- announce "Battleground -- Flavius [80-99] has started!",0,0x006400;
- initnpctimer;
- // Start Match!!
-
-OnRoundStart:
- sleep 2000;
- if( $@FlaviusBG1 != 1 ) end;
-
- areapercentheal "bat_b01",382,2,397,17,100,100;
- areapercentheal "bat_b01",2,282,17,297,100,100;
- bg_warp $@FlaviusBG1_id1,"bat_b01",311,224;
- bg_warp $@FlaviusBG1_id2,"bat_b01",87,75;
-
- sleep 2000;
- if( $@FlaviusBG1 != 1 ) end;
-
- set .Match, .Match + 1;
- // Crystal Spawn
- set .Guillaume_Crystal, bg_monster($@FlaviusBG1_id1,"bat_b01",328,150,"Crystal Guillaume",1914,"Flavius_BG1::OnGuillaumeBreak");
- setwall "bat_b01",327,149,2,6,0,"gui_wall1-1";
- setwall "bat_b01",329,149,2,0,0,"gui_wall1-2";
- setwall "bat_b01",329,151,2,2,0,"gui_wall1-3";
- setwall "bat_b01",327,151,2,4,0,"gui_wall1-4";
-
- set .Croix_Crystal, bg_monster($@FlaviusBG1_id2,"bat_b01",62,150,"Crystal Croix",1915,"Flavius_BG1::OnCroixBreak");
- setwall "bat_b01",61,149,2,6,0,"cro_wall1-1";
- setwall "bat_b01",63,149,2,0,0,"cro_wall1-2";
- setwall "bat_b01",63,151,2,2,0,"cro_wall1-3";
- setwall "bat_b01",61,151,2,4,0,"cro_wall1-4";
-
- // Guardian Spawns
- bg_monster $@FlaviusBG1_id1,"bat_b01",328,160,"Guillaume Guardian",1949,"Flavius_BG1::OnGuiGuardian";
- bg_monster $@FlaviusBG1_id1,"bat_b01",328,140,"Guillaume Guardian",1950,"Flavius_BG1::OnGuiGuardian";
- set .Guillaume_Guardian, 2;
- bg_monster $@FlaviusBG1_id2,"bat_b01",62,160,"Croix Guardian",1949,"Flavius_BG1::OnCroGuardian";
- bg_monster $@FlaviusBG1_id2,"bat_b01",61,140,"Croix Guardian",1950,"Flavius_BG1::OnCroGuardian";
- set .Croix_Guardian, 2;
- // Announces
- mapannounce "bat_b01","The Battle of Flavius [ " + .Match + " ] Round has begun!!",1,0x006400;
- end;
-
-OnRoundStop:
- // Remove Monsters
- killmonster "bat_b01","Flavius_BG1::OnGuiGuardian";
- killmonster "bat_b01","Flavius_BG1::OnCroGuardian";
- delwall "gui_wall1-1";
- delwall "gui_wall1-2";
- delwall "gui_wall1-3";
- delwall "gui_wall1-4";
- killmonster "bat_b01","Flavius_BG1::OnGuillaumeBreak";
- delwall "cro_wall1-1";
- delwall "cro_wall1-2";
- delwall "cro_wall1-3";
- delwall "cro_wall1-4";
- killmonster "bat_b01","Flavius_BG1::OnCroixBreak";
- end;
-
-OnGuiGuardian:
- if( set(.Guillaume_Guardian, .Guillaume_Guardian - 1) <= 0 )
- {
- delwall "gui_wall1-1";
- delwall "gui_wall1-2";
- delwall "gui_wall1-3";
- delwall "gui_wall1-4";
- mapannounce "bat_b01","The Guillaume Crystal is vulnerable to attack!",1,0x0000FF;
- }
- end;
-
-OnCroGuardian:
- if( set(.Croix_Guardian, .Croix_Guardian - 1) <= 0 )
- {
- delwall "cro_wall1-1";
- delwall "cro_wall1-2";
- delwall "cro_wall1-3";
- delwall "cro_wall1-4";
- mapannounce "bat_b01","The Croix Crystal is vulnerable to attack!",1,0xFF0000;
- }
- end;
-
-OnGuillaumeBreak:
- donpcevent "Flavius_BG1::OnRoundStop";
- set .Guillaume_Loss, .Guillaume_Loss + 1;
- if( set(.Croix_Score, .Croix_Score + 1) < 2 )
- {
- bg_updatescore "bat_b01",.Guillaume_Score,.Croix_Score;
- mapannounce "bat_b01","The Guillaume Crystal has been destroyed!",1,0x0000FF;
- donpcevent "Flavius_BG1::OnRoundStart";
- }
- else
- {
- bg_updatescore "bat_b01",.Guillaume_Score,.Croix_Score;
- mapannounce "bat_b01","The Croix army has won the Battle of Flavius!",1,0xFF0000;
- set $@FlaviusBG1_Victory, 2;
- donpcevent "Flavius_BG1::OnMatchEnd";
- }
- end;
-
-OnCroixBreak:
- donpcevent "Flavius_BG1::OnRoundStop";
- set .Croix_Loss, .Croix_Loss + 1;
- if( set(.Guillaume_Score, .Guillaume_Score + 1) < 2 )
- {
- bg_updatescore "bat_b01",.Guillaume_Score,.Croix_Score;
- mapannounce "bat_b01","The Croix Crystal has been destroyed!",1,0xFF0000;
- donpcevent "Flavius_BG1::OnRoundStart";
- }
- else
- {
- bg_updatescore "bat_b01",.Guillaume_Score,.Croix_Score;
- mapannounce "bat_b01","The Guillaume army has won the Battle of Flavius!",1,0x0000FF;
- set $@FlaviusBG1_Victory, 1;
- donpcevent "Flavius_BG1::OnMatchEnd";
- }
- end;
-
-OnTimer2400000:
- mapannounce "bat_b01","Battle of Flavius will ends in 5 minutes",1,0x006400;
- end;
-OnTimer2640000:
- mapannounce "bat_b01","Battle of Flavius will ends in 1 minute",1,0x006400;
- end;
-
-OnTimer2700000:
- if( .Croix_Score > .Guillaume_Score )
- {
- mapannounce "bat_b01","The Croix army has won the Battle of Flavius!",1,0xFF0000;
- set $@FlaviusBG1_Victory, 2;
- }
- else if( .Croix_Score < .Guillaume_Score )
- {
- mapannounce "bat_b01","The Guillaume army has won the Battle of Flavius!",1,0x0000FF;
- set $@FlaviusBG1_Victory, 1;
- }
- else
- {
- mapannounce "bat_b01","The Battle of Flavius is over. The time is out, this is a Tie",1,0x006400;
- set $@FlaviusBG1_Victory, 3;
- }
-
-OnMatchEnd:
- set $@FlaviusBG1, 2;
- stopnpctimer;
- donpcevent "#gfl1_respawn::OnBGStop";
- donpcevent "#cfl1_respawn::OnBGStop";
- disablenpc "Therapist in battle#fl11";
- disablenpc "Therapist in battle#fl12";
- enablenpc "Guillaume Vintenar#fl1";
- enablenpc "Croix Vintenar#fl1";
- sleep 2000;
- bg_warp $@FlaviusBG1_id1,"bat_b01",390,10;
- bg_warp $@FlaviusBG1_id2,"bat_b01",10,290;
- sleep 3000;
- mapannounce "bat_b01","Battle of Flavius will close in 1 minute!",1,0x006400;
- initnpctimer;
- end;
-
-OnTimer30000:
- if( $@FlaviusBG1 == 2 )
- mapannounce "bat_b01","Battle of Flavius will close in 30 seconds!",1,0x006400;
- end;
-OnTimer50000:
- if( $@FlaviusBG1 == 2 )
- mapannounce "bat_b01","Battle of Flavius will close in 10 seconds!",1,0x006400;
- end;
-
-OnTimer60000:
- if( $@FlaviusBG1 != 2 )
- end;
-OnReset:
- stopnpctimer;
- donpcevent "Flavius_BG1::OnRoundStop";
- set .Guillaume_Score, 0;
- set .Guillaume_Crystal, 0;
- set .Guillaume_Loss, 0;
- set .Croix_Score, 0;
- set .Croix_Crystal, 0;
- set .Croix_Loss, 0;
- set .Match, 0;
- set $@FlaviusBG1_Victory, 0;
- // NPC's
- disablenpc "Guillaume Vintenar#fl1";
- disablenpc "Croix Vintenar#fl1";
- disablenpc "Therapist in battle#fl11";
- disablenpc "Therapist in battle#fl12";
-
- if( $@FlaviusBG1_id1 ) { bg_destroy $@FlaviusBG1_id1; set $@FlaviusBG1_id1, 0; }
- if( $@FlaviusBG1_id2 ) { bg_destroy $@FlaviusBG1_id2; set $@FlaviusBG1_id2, 0; }
- sleep 1000;
- mapwarp "bat_b01","bat_room",155,150;
- sleep 2000;
- maprespawnguildid "bat_b01",0,3; // Just in case someone else
- sleep 2000;
- bg_updatescore "bat_b01",0,0;
- set $@FlaviusBG1, 0;
- donpcevent "Flavius_BG1::OnReadyCheck";
- end;
-}
-
-// Battleground rewards
-// *********************************************************************
-
-bat_b01,390,13,5 script Guillaume Vintenar#fl1 419,{
- if( $@FlaviusBG1_Victory )
- {
- if( $@FlaviusBG1_Victory == Bat_Team )
- { // Victory
- mes "[Swandery]";
- mes "Blessed Guillaume!!";
- mes "Let's enjoy our glorious victory!";
- mes "" + strcharinfo(0) + ", its a sign reflecting victory";
- close2;
- set .@Reward, 9;
- }
- else
- { //
- mes "[Swandery]";
- mes "You lost, but you're dedicated to this battle.";
- mes "This is a reward for your great dedication by Guillaume Marollo!";
- mes "Just take this defeat a lesson, and later you would definitely learn.";
- close2;
- set .@Reward, 3;
- }
-
- set Flavius_BG_Tick, gettimetick(2) + 300;
- getitem 7829, .@Reward;
- bg_leave;
- warp "bat_room",155,150;
- end;
- }
- end;
-}
-
-bat_b01,10,293,5 script Croix Vintenar#fl1 415,{
- if( $@FlaviusBG1_Victory )
- {
- if( $@FlaviusBG1_Victory == Bat_Team )
- { // Victory
- mes "[Swandery]";
- mes "Blessed Croax!!";
- mes "Let's enjoy our glorious victory!";
- mes "" + strcharinfo(0) + ", its a sign reflecting victory";
- close2;
- set .@Reward, 9;
- }
- else
- { //
- mes "[Swandery]";
- mes "Oh, " + strcharinfo(0) + ". Don't be sad.";
- mes "Even though we didn't win, we did our best.";
- mes "This is a Royal gift from Croix, and please don't forget this battle. We can win the next.";
- close2;
- set .@Reward, 3;
- }
-
- set Flavius_BG_Tick, gettimetick(2) + 300;
- getitem 7829, .@Reward;
- bg_leave;
- warp "bat_room",155,150;
- end;
- }
- end;
-}
-
-// Battleground Therapist
-// *********************************************************************
-
-bat_b01,390,13,5 script Therapist in battle#fl12 95,{
- mes "[Therapist in battle]";
- mes "Just close your eyes, and take a deep breathe.";
- mes "You can be free from pain.";
- specialeffect2 312;
- close;
-}
-
-bat_b01,10,293,5 script Therapist in battle#fl11 95,{
- mes "[Therapist in battle]";
- mes "Just close your eyes, and take a deep breathe.";
- mes "You can be free from pain.";
- specialeffect2 312;
- close;
-}
-
-// Battleground Respawn
-// *********************************************************************
-
-bat_b01,390,10,0 script #gfl1_respawn 139,{
- end;
-
-OnBGStart:
- initnpctimer;
- end;
-
-OnBGStop:
- stopnpctimer;
- end;
-
-OnTimer24000:
- misceffect 83;
- end;
-
-OnTimer25000:
- areapercentheal "bat_b01",382,2,397,17,100,100;
- areawarp "bat_b01",382,2,397,17,"bat_b01",311,224;
- initnpctimer;
- end;
-}
-
-bat_b01,10,290,0 script #cfl1_respawn 139,{
- end;
-
-OnBGStart:
- initnpctimer;
- end;
-
-OnBGStop:
- stopnpctimer;
- end;
-
-OnTimer24000:
- misceffect 83;
- end;
-
-OnTimer25000:
- areapercentheal "bat_b01",2,282,17,297,100,100;
- areawarp "bat_b01",2,282,17,297,"bat_b01",87,75;
- initnpctimer;
- end;
-}
-
-// Flags
-// *********************************************************************
-
-bat_b01,304,231,1 duplicate(Guillaume camp#bat) Guillaume camp#bat1 973
-bat_b01,319,231,1 duplicate(Guillaume camp#bat) Guillaume camp#bat2 973
-bat_b01,304,218,1 duplicate(Guillaume camp#bat) Guillaume camp#bat3 973
-bat_b01,319,218,1 duplicate(Guillaume camp#bat) Guillaume camp#bat4 973
-bat_b01,304,231,1 duplicate(Guillaume camp#bat) Guillaume camp#bat5 973
-bat_b01,304,231,1 duplicate(Guillaume camp#bat) Guillaume camp#bat6 973
-bat_b01,335,142,1 duplicate(Guillaume camp#bat) Guillaume camp#bat7 973
-bat_b01,335,157,1 duplicate(Guillaume camp#bat) Guillaume camp#bat8 973
-bat_b01,390,16,1 duplicate(Guillaume camp#bat) Guillaume camp#bat9 973
-bat_b01,292,163,1 duplicate(Guillaume camp#bat) Guillaume camp#bat19 973
-bat_b01,292,136,1 duplicate(Guillaume camp#bat) Guillaume camp#bat20 973
-bat_b01,241,185,1 duplicate(Guillaume camp#bat) Guillaume camp#bat21 973
-bat_b01,247,179,1 duplicate(Guillaume camp#bat) Guillaume camp#bat22 973
-
-bat_b01,96,81,1 duplicate(Croix camp#bat) Croix camp#bat1 974
-bat_b01,96,68,1 duplicate(Croix camp#bat) Croix camp#bat2 974
-bat_b01,79,81,1 duplicate(Croix camp#bat) Croix camp#bat3 974
-bat_b01,79,68,1 duplicate(Croix camp#bat) Croix camp#bat4 974
-bat_b01,96,81,1 duplicate(Croix camp#bat) Croix camp#bat5 974
-bat_b01,96,81,1 duplicate(Croix camp#bat) Croix camp#bat6 974
-bat_b01,59,164,1 duplicate(Croix camp#bat) Croix camp#bat7 974
-bat_b01,59,137,1 duplicate(Croix camp#bat) Croix camp#bat8 974
-bat_b01,10,296,1 duplicate(Croix camp#bat) Croix camp#bat9 974
-bat_b01,110,162,1 duplicate(Croix camp#bat) Croix camp#bat18 974
-bat_b01,110,137,1 duplicate(Croix camp#bat) Croix camp#bat19 974
-bat_b01,152,120,1 duplicate(Croix camp#bat) Croix camp#bat20 974
-bat_b01,158,114,1 duplicate(Croix camp#bat) Croix camp#bat21 974
-
-// MapFlags
-// *********************************************************************
-
-bat_b01 mapflag battleground 2
-bat_b01 mapflag nomemo
-bat_b01 mapflag nosave SavePoint
-bat_b01 mapflag noteleport
-bat_b01 mapflag nowarp
-bat_b01 mapflag nowarpto
-bat_b01 mapflag noreturn
-bat_b01 mapflag nobranch
-bat_b01 mapflag nopenalty
+// ==============================================================================
+// BattleGround System - Flavius 1
+// ==============================================================================
+
+// Registration NPC's
+// *********************************************************************
+
+bat_room,253,97,4 script Registration::Fl1R_Guillaume 418,{
+ end;
+OnInit:
+ waitingroom "Battle Station 10 Players",10,"Flavius_BG1::OnGuillaumeJoin",1;
+ end;
+OnEnterBG:
+ set $@FlaviusBG1_id1, waitingroom2bg("bat_b01",390,10,"Flavius_BG1::OnGuillaumeQuit","");
+ end;
+}
+
+bat_room,253,74,0 script Registration::Fl1R_Croix 414,{
+ end;
+OnInit:
+ waitingroom "Battle Station 10 Players",10,"Flavius_BG1::OnCroixJoin",1;
+ end;
+OnEnterBG:
+ set $@FlaviusBG1_id2, waitingroom2bg("bat_b01",10,290,"Flavius_BG1::OnCroixQuit","");
+ end;
+}
+
+// Battleground Engine
+// *********************************************************************
+
+- script Flavius_BG1 -1,{
+ end;
+
+OnInit:
+ disablenpc "Guillaume Vintenar#fl1";
+ disablenpc "Croix Vintenar#fl1";
+ disablenpc "Therapist in battle#fl11";
+ disablenpc "Therapist in battle#fl12";
+ end;
+
+OnGuillaumeQuit:
+OnCroixQuit:
+ set BG_Delay_Tick, gettimetick(2) + 1200;
+ end;
+
+OnGuillaumeJoin:
+OnCroixJoin:
+ if( $@FlaviusBG1 == 0 )
+ donpcevent "Flavius_BG1::OnReadyCheck";
+ end;
+
+OnReadyCheck:
+ if( $@FlaviusBG1 )
+ end;
+ set .@Guillaume, getwaitingroomstate(0,"Fl1R_Guillaume");
+ set .@Croix, getwaitingroomstate(0,"Fl1R_Croix");
+
+ if( .@Guillaume < 10 || .@Croix < 10 )
+ {
+ mapannounce "bat_room","Battleground -- Flavius [80-99] G: " + .@Guillaume + "/10, C: " + .@Croix + "/10",1,0x006400;
+ end;
+ }
+
+ // BG Variables
+ set $@FlaviusBG1, 1;
+ set $@FlaviusBG1_Victory, 0;
+ set .Guillaume_Score, 0;
+ set .Guillaume_Loss, 0;
+ set .Croix_Score, 0;
+ set .Croix_Loss, 0;
+ set .Match, 0;
+ // Prepare NPC
+ donpcevent "#gfl1_respawn::OnBGStart";
+ donpcevent "#cfl1_respawn::OnBGStart";
+ enablenpc "Therapist in battle#fl11";
+ enablenpc "Therapist in battle#fl12";
+ disablenpc "Guillaume Vintenar#fl1";
+ disablenpc "Croix Vintenar#fl1";
+ // Build and Warp Teams
+ donpcevent "Fl1R_Guillaume::OnEnterBG";
+ donpcevent "Fl1R_Croix::OnEnterBG";
+ announce "Battleground -- Flavius [80-99] has started!",0,0x006400;
+ initnpctimer;
+ // Start Match!!
+
+OnRoundStart:
+ sleep 2000;
+ if( $@FlaviusBG1 != 1 ) end;
+
+ areapercentheal "bat_b01",382,2,397,17,100,100;
+ areapercentheal "bat_b01",2,282,17,297,100,100;
+ bg_warp $@FlaviusBG1_id1,"bat_b01",311,224;
+ bg_warp $@FlaviusBG1_id2,"bat_b01",87,75;
+
+ sleep 2000;
+ if( $@FlaviusBG1 != 1 ) end;
+
+ set .Match, .Match + 1;
+ // Crystal Spawn
+ set .Guillaume_Crystal, bg_monster($@FlaviusBG1_id1,"bat_b01",328,150,"Crystal Guillaume",1914,"Flavius_BG1::OnGuillaumeBreak");
+ setwall "bat_b01",327,149,2,6,0,"gui_wall1-1";
+ setwall "bat_b01",329,149,2,0,0,"gui_wall1-2";
+ setwall "bat_b01",329,151,2,2,0,"gui_wall1-3";
+ setwall "bat_b01",327,151,2,4,0,"gui_wall1-4";
+
+ set .Croix_Crystal, bg_monster($@FlaviusBG1_id2,"bat_b01",62,150,"Crystal Croix",1915,"Flavius_BG1::OnCroixBreak");
+ setwall "bat_b01",61,149,2,6,0,"cro_wall1-1";
+ setwall "bat_b01",63,149,2,0,0,"cro_wall1-2";
+ setwall "bat_b01",63,151,2,2,0,"cro_wall1-3";
+ setwall "bat_b01",61,151,2,4,0,"cro_wall1-4";
+
+ // Guardian Spawns
+ bg_monster $@FlaviusBG1_id1,"bat_b01",328,160,"Guillaume Guardian",1949,"Flavius_BG1::OnGuiGuardian";
+ bg_monster $@FlaviusBG1_id1,"bat_b01",328,140,"Guillaume Guardian",1950,"Flavius_BG1::OnGuiGuardian";
+ set .Guillaume_Guardian, 2;
+ bg_monster $@FlaviusBG1_id2,"bat_b01",62,160,"Croix Guardian",1949,"Flavius_BG1::OnCroGuardian";
+ bg_monster $@FlaviusBG1_id2,"bat_b01",61,140,"Croix Guardian",1950,"Flavius_BG1::OnCroGuardian";
+ set .Croix_Guardian, 2;
+ // Announces
+ mapannounce "bat_b01","The Battle of Flavius [ " + .Match + " ] Round has begun!!",1,0x006400;
+ end;
+
+OnRoundStop:
+ // Remove Monsters
+ killmonster "bat_b01","Flavius_BG1::OnGuiGuardian";
+ killmonster "bat_b01","Flavius_BG1::OnCroGuardian";
+ delwall "gui_wall1-1";
+ delwall "gui_wall1-2";
+ delwall "gui_wall1-3";
+ delwall "gui_wall1-4";
+ killmonster "bat_b01","Flavius_BG1::OnGuillaumeBreak";
+ delwall "cro_wall1-1";
+ delwall "cro_wall1-2";
+ delwall "cro_wall1-3";
+ delwall "cro_wall1-4";
+ killmonster "bat_b01","Flavius_BG1::OnCroixBreak";
+ end;
+
+OnGuiGuardian:
+ if( set(.Guillaume_Guardian, .Guillaume_Guardian - 1) <= 0 )
+ {
+ delwall "gui_wall1-1";
+ delwall "gui_wall1-2";
+ delwall "gui_wall1-3";
+ delwall "gui_wall1-4";
+ mapannounce "bat_b01","The Guillaume Crystal is vulnerable to attack!",1,0x0000FF;
+ }
+ end;
+
+OnCroGuardian:
+ if( set(.Croix_Guardian, .Croix_Guardian - 1) <= 0 )
+ {
+ delwall "cro_wall1-1";
+ delwall "cro_wall1-2";
+ delwall "cro_wall1-3";
+ delwall "cro_wall1-4";
+ mapannounce "bat_b01","The Croix Crystal is vulnerable to attack!",1,0xFF0000;
+ }
+ end;
+
+OnGuillaumeBreak:
+ donpcevent "Flavius_BG1::OnRoundStop";
+ set .Guillaume_Loss, .Guillaume_Loss + 1;
+ if( set(.Croix_Score, .Croix_Score + 1) < 2 )
+ {
+ bg_updatescore "bat_b01",.Guillaume_Score,.Croix_Score;
+ mapannounce "bat_b01","The Guillaume Crystal has been destroyed!",1,0x0000FF;
+ donpcevent "Flavius_BG1::OnRoundStart";
+ }
+ else
+ {
+ bg_updatescore "bat_b01",.Guillaume_Score,.Croix_Score;
+ mapannounce "bat_b01","The Croix army has won the Battle of Flavius!",1,0xFF0000;
+ set $@FlaviusBG1_Victory, 2;
+ donpcevent "Flavius_BG1::OnMatchEnd";
+ }
+ end;
+
+OnCroixBreak:
+ donpcevent "Flavius_BG1::OnRoundStop";
+ set .Croix_Loss, .Croix_Loss + 1;
+ if( set(.Guillaume_Score, .Guillaume_Score + 1) < 2 )
+ {
+ bg_updatescore "bat_b01",.Guillaume_Score,.Croix_Score;
+ mapannounce "bat_b01","The Croix Crystal has been destroyed!",1,0xFF0000;
+ donpcevent "Flavius_BG1::OnRoundStart";
+ }
+ else
+ {
+ bg_updatescore "bat_b01",.Guillaume_Score,.Croix_Score;
+ mapannounce "bat_b01","The Guillaume army has won the Battle of Flavius!",1,0x0000FF;
+ set $@FlaviusBG1_Victory, 1;
+ donpcevent "Flavius_BG1::OnMatchEnd";
+ }
+ end;
+
+OnTimer2400000:
+ mapannounce "bat_b01","Battle of Flavius will ends in 5 minutes",1,0x006400;
+ end;
+OnTimer2640000:
+ mapannounce "bat_b01","Battle of Flavius will ends in 1 minute",1,0x006400;
+ end;
+
+OnTimer2700000:
+ if( .Croix_Score > .Guillaume_Score )
+ {
+ mapannounce "bat_b01","The Croix army has won the Battle of Flavius!",1,0xFF0000;
+ set $@FlaviusBG1_Victory, 2;
+ }
+ else if( .Croix_Score < .Guillaume_Score )
+ {
+ mapannounce "bat_b01","The Guillaume army has won the Battle of Flavius!",1,0x0000FF;
+ set $@FlaviusBG1_Victory, 1;
+ }
+ else
+ {
+ mapannounce "bat_b01","The Battle of Flavius is over. The time is out, this is a Tie",1,0x006400;
+ set $@FlaviusBG1_Victory, 3;
+ }
+
+OnMatchEnd:
+ set $@FlaviusBG1, 2;
+ stopnpctimer;
+ donpcevent "#gfl1_respawn::OnBGStop";
+ donpcevent "#cfl1_respawn::OnBGStop";
+ disablenpc "Therapist in battle#fl11";
+ disablenpc "Therapist in battle#fl12";
+ enablenpc "Guillaume Vintenar#fl1";
+ enablenpc "Croix Vintenar#fl1";
+ sleep 2000;
+ bg_warp $@FlaviusBG1_id1,"bat_b01",390,10;
+ bg_warp $@FlaviusBG1_id2,"bat_b01",10,290;
+ sleep 3000;
+ mapannounce "bat_b01","Battle of Flavius will close in 1 minute!",1,0x006400;
+ initnpctimer;
+ end;
+
+OnTimer30000:
+ if( $@FlaviusBG1 == 2 )
+ mapannounce "bat_b01","Battle of Flavius will close in 30 seconds!",1,0x006400;
+ end;
+OnTimer50000:
+ if( $@FlaviusBG1 == 2 )
+ mapannounce "bat_b01","Battle of Flavius will close in 10 seconds!",1,0x006400;
+ end;
+
+OnTimer60000:
+ if( $@FlaviusBG1 != 2 )
+ end;
+OnReset:
+ stopnpctimer;
+ donpcevent "Flavius_BG1::OnRoundStop";
+ set .Guillaume_Score, 0;
+ set .Guillaume_Crystal, 0;
+ set .Guillaume_Loss, 0;
+ set .Croix_Score, 0;
+ set .Croix_Crystal, 0;
+ set .Croix_Loss, 0;
+ set .Match, 0;
+ set $@FlaviusBG1_Victory, 0;
+ // NPC's
+ disablenpc "Guillaume Vintenar#fl1";
+ disablenpc "Croix Vintenar#fl1";
+ disablenpc "Therapist in battle#fl11";
+ disablenpc "Therapist in battle#fl12";
+
+ if( $@FlaviusBG1_id1 ) { bg_destroy $@FlaviusBG1_id1; set $@FlaviusBG1_id1, 0; }
+ if( $@FlaviusBG1_id2 ) { bg_destroy $@FlaviusBG1_id2; set $@FlaviusBG1_id2, 0; }
+ sleep 1000;
+ mapwarp "bat_b01","bat_room",155,150;
+ sleep 2000;
+ maprespawnguildid "bat_b01",0,3; // Just in case someone else
+ sleep 2000;
+ bg_updatescore "bat_b01",0,0;
+ set $@FlaviusBG1, 0;
+ donpcevent "Flavius_BG1::OnReadyCheck";
+ end;
+}
+
+// Battleground rewards
+// *********************************************************************
+
+bat_b01,390,13,5 script Guillaume Vintenar#fl1 419,{
+ if( $@FlaviusBG1_Victory )
+ {
+ if( $@FlaviusBG1_Victory == Bat_Team )
+ { // Victory
+ mes "[Swandery]";
+ mes "Blessed Guillaume!!";
+ mes "Let's enjoy our glorious victory!";
+ mes "" + strcharinfo(0) + ", its a sign reflecting victory";
+ close2;
+ set .@Reward, 9;
+ }
+ else
+ { //
+ mes "[Swandery]";
+ mes "You lost, but you're dedicated to this battle.";
+ mes "This is a reward for your great dedication by Guillaume Marollo!";
+ mes "Just take this defeat a lesson, and later you would definitely learn.";
+ close2;
+ set .@Reward, 3;
+ }
+
+ set Flavius_BG_Tick, gettimetick(2) + 300;
+ getitem 7829, .@Reward;
+ bg_leave;
+ warp "bat_room",155,150;
+ end;
+ }
+ end;
+}
+
+bat_b01,10,293,5 script Croix Vintenar#fl1 415,{
+ if( $@FlaviusBG1_Victory )
+ {
+ if( $@FlaviusBG1_Victory == Bat_Team )
+ { // Victory
+ mes "[Swandery]";
+ mes "Blessed Croax!!";
+ mes "Let's enjoy our glorious victory!";
+ mes "" + strcharinfo(0) + ", its a sign reflecting victory";
+ close2;
+ set .@Reward, 9;
+ }
+ else
+ { //
+ mes "[Swandery]";
+ mes "Oh, " + strcharinfo(0) + ". Don't be sad.";
+ mes "Even though we didn't win, we did our best.";
+ mes "This is a Royal gift from Croix, and please don't forget this battle. We can win the next.";
+ close2;
+ set .@Reward, 3;
+ }
+
+ set Flavius_BG_Tick, gettimetick(2) + 300;
+ getitem 7829, .@Reward;
+ bg_leave;
+ warp "bat_room",155,150;
+ end;
+ }
+ end;
+}
+
+// Battleground Therapist
+// *********************************************************************
+
+bat_b01,390,13,5 script Therapist in battle#fl12 95,{
+ mes "[Therapist in battle]";
+ mes "Just close your eyes, and take a deep breathe.";
+ mes "You can be free from pain.";
+ specialeffect2 312;
+ close;
+}
+
+bat_b01,10,293,5 script Therapist in battle#fl11 95,{
+ mes "[Therapist in battle]";
+ mes "Just close your eyes, and take a deep breathe.";
+ mes "You can be free from pain.";
+ specialeffect2 312;
+ close;
+}
+
+// Battleground Respawn
+// *********************************************************************
+
+bat_b01,390,10,0 script #gfl1_respawn 139,{
+ end;
+
+OnBGStart:
+ initnpctimer;
+ end;
+
+OnBGStop:
+ stopnpctimer;
+ end;
+
+OnTimer24000:
+ misceffect 83;
+ end;
+
+OnTimer25000:
+ areapercentheal "bat_b01",382,2,397,17,100,100;
+ areawarp "bat_b01",382,2,397,17,"bat_b01",311,224;
+ initnpctimer;
+ end;
+}
+
+bat_b01,10,290,0 script #cfl1_respawn 139,{
+ end;
+
+OnBGStart:
+ initnpctimer;
+ end;
+
+OnBGStop:
+ stopnpctimer;
+ end;
+
+OnTimer24000:
+ misceffect 83;
+ end;
+
+OnTimer25000:
+ areapercentheal "bat_b01",2,282,17,297,100,100;
+ areawarp "bat_b01",2,282,17,297,"bat_b01",87,75;
+ initnpctimer;
+ end;
+}
+
+// Flags
+// *********************************************************************
+
+bat_b01,304,231,1 duplicate(Guillaume camp#bat) Guillaume camp#bat1 973
+bat_b01,319,231,1 duplicate(Guillaume camp#bat) Guillaume camp#bat2 973
+bat_b01,304,218,1 duplicate(Guillaume camp#bat) Guillaume camp#bat3 973
+bat_b01,319,218,1 duplicate(Guillaume camp#bat) Guillaume camp#bat4 973
+bat_b01,304,231,1 duplicate(Guillaume camp#bat) Guillaume camp#bat5 973
+bat_b01,304,231,1 duplicate(Guillaume camp#bat) Guillaume camp#bat6 973
+bat_b01,335,142,1 duplicate(Guillaume camp#bat) Guillaume camp#bat7 973
+bat_b01,335,157,1 duplicate(Guillaume camp#bat) Guillaume camp#bat8 973
+bat_b01,390,16,1 duplicate(Guillaume camp#bat) Guillaume camp#bat9 973
+bat_b01,292,163,1 duplicate(Guillaume camp#bat) Guillaume camp#bat19 973
+bat_b01,292,136,1 duplicate(Guillaume camp#bat) Guillaume camp#bat20 973
+bat_b01,241,185,1 duplicate(Guillaume camp#bat) Guillaume camp#bat21 973
+bat_b01,247,179,1 duplicate(Guillaume camp#bat) Guillaume camp#bat22 973
+
+bat_b01,96,81,1 duplicate(Croix camp#bat) Croix camp#bat1 974
+bat_b01,96,68,1 duplicate(Croix camp#bat) Croix camp#bat2 974
+bat_b01,79,81,1 duplicate(Croix camp#bat) Croix camp#bat3 974
+bat_b01,79,68,1 duplicate(Croix camp#bat) Croix camp#bat4 974
+bat_b01,96,81,1 duplicate(Croix camp#bat) Croix camp#bat5 974
+bat_b01,96,81,1 duplicate(Croix camp#bat) Croix camp#bat6 974
+bat_b01,59,164,1 duplicate(Croix camp#bat) Croix camp#bat7 974
+bat_b01,59,137,1 duplicate(Croix camp#bat) Croix camp#bat8 974
+bat_b01,10,296,1 duplicate(Croix camp#bat) Croix camp#bat9 974
+bat_b01,110,162,1 duplicate(Croix camp#bat) Croix camp#bat18 974
+bat_b01,110,137,1 duplicate(Croix camp#bat) Croix camp#bat19 974
+bat_b01,152,120,1 duplicate(Croix camp#bat) Croix camp#bat20 974
+bat_b01,158,114,1 duplicate(Croix camp#bat) Croix camp#bat21 974
+
+// MapFlags
+// *********************************************************************
+
+bat_b01 mapflag battleground 2
+bat_b01 mapflag nomemo
+bat_b01 mapflag nosave SavePoint
+bat_b01 mapflag noteleport
+bat_b01 mapflag nowarp
+bat_b01 mapflag nowarpto
+bat_b01 mapflag noreturn
+bat_b01 mapflag nobranch
+bat_b01 mapflag nopenalty
diff --git a/npc/battleground/bg_flavius_02.txt b/npc/battleground/bg_flavius_02.txt
index 57cb79246..9f8b46c00 100644
--- a/npc/battleground/bg_flavius_02.txt
+++ b/npc/battleground/bg_flavius_02.txt
@@ -1,453 +1,453 @@
-// ==============================================================================
-// BattleGround System - Flavius 2
-// ==============================================================================
-
-// Registration NPC's
-// *********************************************************************
-
-bat_room,57,97,4 script Registration::Fl2R_Guillaume 418,{
- end;
-OnInit:
- waitingroom "Battle Station 10 Players",10,"Flavius_BG2::OnGuillaumeJoin",1;
- end;
-OnEnterBG:
- set $@FlaviusBG2_id1, waitingroom2bg("bat_b02",390,10,"Flavius_BG2::OnGuillaumeQuit","");
- end;
-}
-
-bat_room,57,74,0 script Registration::Fl2R_Croix 414,{
- end;
-OnInit:
- waitingroom "Battle Station 10 Players",10,"Flavius_BG2::OnCroixJoin",1;
- end;
-OnEnterBG:
- set $@FlaviusBG2_id2, waitingroom2bg("bat_b02",10,290,"Flavius_BG2::OnCroixQuit","");
- end;
-}
-
-// Battleground Engine
-// *********************************************************************
-
-- script Flavius_BG2 -1,{
- end;
-
-OnInit:
- disablenpc "Guillaume Vintenar#fl2";
- disablenpc "Croix Vintenar#fl2";
- disablenpc "Therapist in battle#fl21";
- disablenpc "Therapist in battle#fl22";
- end;
-
-OnGuillaumeQuit:
-OnCroixQuit:
- set BG_Delay_Tick, gettimetick(2) + 1200;
- end;
-
-OnGuillaumeJoin:
-OnCroixJoin:
- if( $@FlaviusBG2 == 0 )
- donpcevent "Flavius_BG2::OnReadyCheck";
- end;
-
-OnReadyCheck:
- if( $@FlaviusBG2 )
- end;
- set .@Guillaume, getwaitingroomstate(0,"Fl2R_Guillaume");
- set .@Croix, getwaitingroomstate(0,"Fl2R_Croix");
-
- if( .@Guillaume < 10 || .@Croix < 10 )
- {
- mapannounce "bat_room","Battleground -- Flavius [80-99] G: " + .@Guillaume + "/10, C: " + .@Croix + "/10",1,0x808000;
- end;
- }
-
- // BG Variables
- set $@FlaviusBG2, 1;
- set $@FlaviusBG2_Victory, 0;
- set .Guillaume_Score, 0;
- set .Guillaume_Loss, 0;
- set .Croix_Score, 0;
- set .Croix_Loss, 0;
- set .Match, 0;
- // Prepare NPC
- donpcevent "#gfl2_respawn::OnBGStart";
- donpcevent "#cfl2_respawn::OnBGStart";
- enablenpc "Therapist in battle#fl21";
- enablenpc "Therapist in battle#fl22";
- disablenpc "Guillaume Vintenar#fl2";
- disablenpc "Croix Vintenar#fl2";
- // Build and Warp Teams
- donpcevent "Fl2R_Guillaume::OnEnterBG";
- donpcevent "Fl2R_Croix::OnEnterBG";
- announce "Battleground -- Flavius [80-99] has started!",0,0x808000;
- initnpctimer;
- // Start Match!!
-
-OnRoundStart:
- sleep 2000;
- if( $@FlaviusBG2 != 1 ) end;
-
- areapercentheal "bat_b02",382,2,397,17,100,100;
- areapercentheal "bat_b02",2,282,17,297,100,100;
- bg_warp $@FlaviusBG2_id1,"bat_b02",311,224;
- bg_warp $@FlaviusBG2_id2,"bat_b02",87,75;
-
- sleep 2000;
- if( $@FlaviusBG2 != 1 ) end;
-
- set .Match, .Match + 1;
- // Crystal Spawn
- set .Guillaume_Crystal, bg_monster($@FlaviusBG2_id1,"bat_b02",328,150,"Crystal Guillaume",1914,"Flavius_BG2::OnGuillaumeBreak");
- setwall "bat_b02",327,149,2,6,0,"gui_wall2-1";
- setwall "bat_b02",329,149,2,0,0,"gui_wall2-2";
- setwall "bat_b02",329,151,2,2,0,"gui_wall2-3";
- setwall "bat_b02",327,151,2,4,0,"gui_wall2-4";
-
- set .Croix_Crystal, bg_monster($@FlaviusBG2_id2,"bat_b02",62,150,"Crystal Croix",1915,"Flavius_BG2::OnCroixBreak");
- setwall "bat_b02",61,149,2,6,0,"cro_wall2-1";
- setwall "bat_b02",63,149,2,0,0,"cro_wall2-2";
- setwall "bat_b02",63,151,2,2,0,"cro_wall2-3";
- setwall "bat_b02",61,151,2,4,0,"cro_wall2-4";
-
- // Guardian Spawns
- bg_monster $@FlaviusBG2_id1,"bat_b02",328,160,"Guillaume Guardian",1949,"Flavius_BG2::OnGuiGuardian";
- bg_monster $@FlaviusBG2_id1,"bat_b02",328,140,"Guillaume Guardian",1950,"Flavius_BG2::OnGuiGuardian";
- set .Guillaume_Guardian, 2;
- bg_monster $@FlaviusBG2_id2,"bat_b02",62,160,"Croix Guardian",1949,"Flavius_BG2::OnCroGuardian";
- bg_monster $@FlaviusBG2_id2,"bat_b02",61,140,"Croix Guardian",1950,"Flavius_BG2::OnCroGuardian";
- set .Croix_Guardian, 2;
- // Announces
- mapannounce "bat_b02","The Battle of Flavius [ " + .Match + " ] Round has begun!!",1,0x808000;
- end;
-
-OnRoundStop:
- // Remove Monsters
- killmonster "bat_b02","Flavius_BG2::OnGuiGuardian";
- killmonster "bat_b02","Flavius_BG2::OnCroGuardian";
- delwall "gui_wall2-1";
- delwall "gui_wall2-2";
- delwall "gui_wall2-3";
- delwall "gui_wall2-4";
- killmonster "bat_b02","Flavius_BG2::OnGuillaumeBreak";
- delwall "cro_wall2-1";
- delwall "cro_wall2-2";
- delwall "cro_wall2-3";
- delwall "cro_wall2-4";
- killmonster "bat_b02","Flavius_BG2::OnCroixBreak";
- end;
-
-OnGuiGuardian:
- if( set(.Guillaume_Guardian, .Guillaume_Guardian - 1) <= 0 )
- {
- delwall "gui_wall2-1";
- delwall "gui_wall2-2";
- delwall "gui_wall2-3";
- delwall "gui_wall2-4";
- mapannounce "bat_b02","The Guillaume Crystal is vulnerable to attack!",1,0x0000FF;
- }
- end;
-
-OnCroGuardian:
- if( set(.Croix_Guardian, .Croix_Guardian - 1) <= 0 )
- {
- delwall "cro_wall2-1";
- delwall "cro_wall2-2";
- delwall "cro_wall2-3";
- delwall "cro_wall2-4";
- mapannounce "bat_b02","The Croix Crystal is vulnerable to attack!",1,0xFF0000;
- }
- end;
-
-OnGuillaumeBreak:
- donpcevent "Flavius_BG2::OnRoundStop";
- set .Guillaume_Loss, .Guillaume_Loss + 1;
- if( set(.Croix_Score, .Croix_Score + 1) < 2 )
- {
- bg_updatescore "bat_b02",.Guillaume_Score,.Croix_Score;
- mapannounce "bat_b02","The Guillaume Crystal has been destroyed!",1,0x0000FF;
- donpcevent "Flavius_BG2::OnRoundStart";
- }
- else
- {
- bg_updatescore "bat_b02",.Guillaume_Score,.Croix_Score;
- mapannounce "bat_b02","The Croix army has won the Battle of Flavius!",1,0xFF0000;
- set $@FlaviusBG2_Victory, 2;
- donpcevent "Flavius_BG2::OnMatchEnd";
- }
- end;
-
-OnCroixBreak:
- donpcevent "Flavius_BG2::OnRoundStop";
- set .Croix_Loss, .Croix_Loss + 1;
- if( set(.Guillaume_Score, .Guillaume_Score + 1) < 2 )
- {
- bg_updatescore "bat_b02",.Guillaume_Score,.Croix_Score;
- mapannounce "bat_b02","The Croix Crystal has been destroyed!",1,0xFF0000;
- donpcevent "Flavius_BG2::OnRoundStart";
- }
- else
- {
- bg_updatescore "bat_b02",.Guillaume_Score,.Croix_Score;
- mapannounce "bat_b02","The Guillaume army has won the Battle of Flavius!",1,0x0000FF;
- set $@FlaviusBG2_Victory, 1;
- donpcevent "Flavius_BG2::OnMatchEnd";
- }
- end;
-
-OnTimer2400000:
- mapannounce "bat_b02","Battle of Flavius will ends in 5 minutes",1,0x808000;
- end;
-OnTimer2640000:
- mapannounce "bat_b02","Battle of Flavius will ends in 1 minute",1,0x808000;
- end;
-
-OnTimer2700000:
- if( .Croix_Score > .Guillaume_Score )
- {
- mapannounce "bat_b02","The Croix army has won the Battle of Flavius!",1,0xFF0000;
- set $@FlaviusBG2_Victory, 2;
- }
- else if( .Croix_Score < .Guillaume_Score )
- {
- mapannounce "bat_b02","The Guillaume army has won the Battle of Flavius!",1,0x0000FF;
- set $@FlaviusBG2_Victory, 1;
- }
- else
- {
- mapannounce "bat_b02","The Battle of Flavius is over. The time is out, this is a Tie",1,0x808000;
- set $@FlaviusBG2_Victory, 3;
- }
-
-OnMatchEnd:
- set $@FlaviusBG2, 2;
- stopnpctimer;
- donpcevent "#gfl2_respawn::OnBGStop";
- donpcevent "#cfl2_respawn::OnBGStop";
- disablenpc "Therapist in battle#fl21";
- disablenpc "Therapist in battle#fl22";
- enablenpc "Guillaume Vintenar#fl2";
- enablenpc "Croix Vintenar#fl2";
- sleep 2000;
- bg_warp $@FlaviusBG2_id1,"bat_b02",390,10;
- bg_warp $@FlaviusBG2_id2,"bat_b02",10,290;
- sleep 3000;
- mapannounce "bat_b02","Battle of Flavius will close in 1 minute!",1,0x808000;
- initnpctimer;
- end;
-
-OnTimer30000:
- if( $@FlaviusBG2 == 2 )
- mapannounce "bat_b02","Battle of Flavius will close in 30 seconds!",1,0x808000;
- end;
-OnTimer50000:
- if( $@FlaviusBG2 == 2 )
- mapannounce "bat_b02","Battle of Flavius will close in 10 seconds!",1,0x808000;
- end;
-
-OnTimer60000:
- if( $@FlaviusBG2 != 2 )
- end;
-OnReset:
- stopnpctimer;
- donpcevent "Flavius_BG2::OnRoundStop";
- set .Guillaume_Score, 0;
- set .Guillaume_Crystal, 0;
- set .Guillaume_Loss, 0;
- set .Croix_Score, 0;
- set .Croix_Crystal, 0;
- set .Croix_Loss, 0;
- set .Match, 0;
- set $@FlaviusBG2_Victory, 0;
- // NPC's
- disablenpc "Guillaume Vintenar#fl2";
- disablenpc "Croix Vintenar#fl2";
- disablenpc "Therapist in battle#fl21";
- disablenpc "Therapist in battle#fl22";
-
- if( $@FlaviusBG2_id1 ) { bg_destroy $@FlaviusBG2_id1; set $@FlaviusBG2_id1, 0; }
- if( $@FlaviusBG2_id2 ) { bg_destroy $@FlaviusBG2_id2; set $@FlaviusBG2_id2, 0; }
- sleep 1000;
- mapwarp "bat_b02","bat_room",155,150;
- sleep 2000;
- maprespawnguildid "bat_b02",0,3; // Just in case someone else
- sleep 2000;
- bg_updatescore "bat_b02",0,0;
- set $@FlaviusBG2, 0;
- donpcevent "Flavius_BG2::OnReadyCheck";
- end;
-}
-
-// Battleground rewards
-// *********************************************************************
-
-bat_b02,390,13,5 script Guillaume Vintenar#fl2 419,{
- if( $@FlaviusBG2_Victory )
- {
- if( $@FlaviusBG2_Victory == Bat_Team )
- { // Victory
- mes "[Swandery]";
- mes "Blessed Guillaume!!";
- mes "Let's enjoy our glorious victory!";
- mes "" + strcharinfo(0) + ", its a sign reflecting victory";
- close2;
- set .@Reward, 9;
- }
- else
- { //
- mes "[Swandery]";
- mes "You lost, but you're dedicated to this battle.";
- mes "This is a reward for your great dedication by Guillaume Marollo!";
- mes "Just take this defeat a lesson, and later you would definitely learn.";
- close2;
- set .@Reward, 3;
- }
-
- set Flavius_BG_Tick, gettimetick(2) + 300;
- getitem 7829, .@Reward;
- bg_leave;
- warp "bat_room",155,150;
- end;
- }
- end;
-}
-
-bat_b02,10,293,5 script Croix Vintenar#fl2 415,{
- if( $@FlaviusBG2_Victory )
- {
- if( $@FlaviusBG2_Victory == Bat_Team )
- { // Victory
- mes "[Swandery]";
- mes "Blessed Croax!!";
- mes "Let's enjoy our glorious victory!";
- mes "" + strcharinfo(0) + ", its a sign reflecting victory";
- close2;
- set .@Reward, 9;
- }
- else
- { //
- mes "[Swandery]";
- mes "Oh, " + strcharinfo(0) + ". Don't be sad.";
- mes "Even though we didn't win, we did our best.";
- mes "This is a Royal gift from Croix, and please don't forget this battle. We can win the next.";
- close2;
- set .@Reward, 3;
- }
-
- set Flavius_BG_Tick, gettimetick(2) + 300;
- getitem 7829, .@Reward;
- bg_leave;
- warp "bat_room",155,150;
- end;
- }
- end;
-}
-
-// Battleground Therapist
-// *********************************************************************
-
-bat_b02,390,13,5 script Therapist in battle#fl22 95,{
- mes "[Therapist in battle]";
- mes "Just close your eyes, and take a deep breathe.";
- mes "You can be free from pain.";
- specialeffect2 312;
- close;
-}
-
-bat_b02,10,293,5 script Therapist in battle#fl21 95,{
- mes "[Therapist in battle]";
- mes "Just close your eyes, and take a deep breathe.";
- mes "You can be free from pain.";
- specialeffect2 312;
- close;
-}
-
-// Battleground Respawn
-// *********************************************************************
-
-bat_b02,390,10,0 script #gfl2_respawn 139,{
- end;
-
-OnBGStart:
- initnpctimer;
- end;
-
-OnBGStop:
- stopnpctimer;
- end;
-
-OnTimer24000:
- misceffect 83;
- end;
-
-OnTimer25000:
- areapercentheal "bat_b02",382,2,397,17,100,100;
- areawarp "bat_b02",382,2,397,17,"bat_b02",311,224;
- initnpctimer;
- end;
-}
-
-bat_b02,10,290,0 script #cfl2_respawn 139,{
- end;
-
-OnBGStart:
- initnpctimer;
- end;
-
-OnBGStop:
- stopnpctimer;
- end;
-
-OnTimer24000:
- misceffect 83;
- end;
-
-OnTimer25000:
- areapercentheal "bat_b02",2,282,17,297,100,100;
- areawarp "bat_b02",2,282,17,297,"bat_b02",87,75;
- initnpctimer;
- end;
-}
-
-// Flags
-// *********************************************************************
-
-bat_b02,304,231,1 duplicate(Guillaume camp#bat) Guillaume camp#bat32 973
-bat_b02,319,231,1 duplicate(Guillaume camp#bat) Guillaume camp#bat33 973
-bat_b02,304,218,1 duplicate(Guillaume camp#bat) Guillaume camp#bat34 973
-bat_b02,319,218,1 duplicate(Guillaume camp#bat) Guillaume camp#bat35 973
-bat_b02,304,231,1 duplicate(Guillaume camp#bat) Guillaume camp#bat36 973
-bat_b02,304,231,1 duplicate(Guillaume camp#bat) Guillaume camp#bat37 973
-bat_b02,335,142,1 duplicate(Guillaume camp#bat) Guillaume camp#bat38 973
-bat_b02,335,157,1 duplicate(Guillaume camp#bat) Guillaume camp#bat39 973
-bat_b02,390,16,1 duplicate(Guillaume camp#bat) Guillaume camp#bat40 973
-bat_b02,292,163,1 duplicate(Guillaume camp#bat) Guillaume camp#bat41 973
-bat_b02,292,136,1 duplicate(Guillaume camp#bat) Guillaume camp#bat42 973
-bat_b02,241,185,1 duplicate(Guillaume camp#bat) Guillaume camp#bat43 973
-bat_b02,247,179,1 duplicate(Guillaume camp#bat) Guillaume camp#bat44 973
-
-bat_b02,96,81,1 duplicate(Croix camp#bat) Croix camp#bat30 974
-bat_b02,96,68,1 duplicate(Croix camp#bat) Croix camp#bat31 974
-bat_b02,79,81,1 duplicate(Croix camp#bat) Croix camp#bat32 974
-bat_b02,79,68,1 duplicate(Croix camp#bat) Croix camp#bat33 974
-bat_b02,96,81,1 duplicate(Croix camp#bat) Croix camp#bat34 974
-bat_b02,96,81,1 duplicate(Croix camp#bat) Croix camp#bat35 974
-bat_b02,59,164,1 duplicate(Croix camp#bat) Croix camp#bat36 974
-bat_b02,59,137,1 duplicate(Croix camp#bat) Croix camp#bat37 974
-bat_b02,10,296,1 duplicate(Croix camp#bat) Croix camp#bat38 974
-bat_b02,110,162,1 duplicate(Croix camp#bat) Croix camp#bat39 974
-bat_b02,110,137,1 duplicate(Croix camp#bat) Croix camp#bat40 974
-bat_b02,152,120,1 duplicate(Croix camp#bat) Croix camp#bat41 974
-bat_b02,158,114,1 duplicate(Croix camp#bat) Croix camp#bat42 974
-
-// MapFlags
-// *********************************************************************
-
-bat_b02 mapflag battleground
-bat_b02 mapflag nomemo
-bat_b02 mapflag nosave SavePoint
-bat_b02 mapflag noteleport
-bat_b02 mapflag nowarp
-bat_b02 mapflag nowarpto
-bat_b02 mapflag noreturn
-bat_b02 mapflag nobranch
-bat_b02 mapflag nopenalty
+// ==============================================================================
+// BattleGround System - Flavius 2
+// ==============================================================================
+
+// Registration NPC's
+// *********************************************************************
+
+bat_room,57,97,4 script Registration::Fl2R_Guillaume 418,{
+ end;
+OnInit:
+ waitingroom "Battle Station 10 Players",10,"Flavius_BG2::OnGuillaumeJoin",1;
+ end;
+OnEnterBG:
+ set $@FlaviusBG2_id1, waitingroom2bg("bat_b02",390,10,"Flavius_BG2::OnGuillaumeQuit","");
+ end;
+}
+
+bat_room,57,74,0 script Registration::Fl2R_Croix 414,{
+ end;
+OnInit:
+ waitingroom "Battle Station 10 Players",10,"Flavius_BG2::OnCroixJoin",1;
+ end;
+OnEnterBG:
+ set $@FlaviusBG2_id2, waitingroom2bg("bat_b02",10,290,"Flavius_BG2::OnCroixQuit","");
+ end;
+}
+
+// Battleground Engine
+// *********************************************************************
+
+- script Flavius_BG2 -1,{
+ end;
+
+OnInit:
+ disablenpc "Guillaume Vintenar#fl2";
+ disablenpc "Croix Vintenar#fl2";
+ disablenpc "Therapist in battle#fl21";
+ disablenpc "Therapist in battle#fl22";
+ end;
+
+OnGuillaumeQuit:
+OnCroixQuit:
+ set BG_Delay_Tick, gettimetick(2) + 1200;
+ end;
+
+OnGuillaumeJoin:
+OnCroixJoin:
+ if( $@FlaviusBG2 == 0 )
+ donpcevent "Flavius_BG2::OnReadyCheck";
+ end;
+
+OnReadyCheck:
+ if( $@FlaviusBG2 )
+ end;
+ set .@Guillaume, getwaitingroomstate(0,"Fl2R_Guillaume");
+ set .@Croix, getwaitingroomstate(0,"Fl2R_Croix");
+
+ if( .@Guillaume < 10 || .@Croix < 10 )
+ {
+ mapannounce "bat_room","Battleground -- Flavius [80-99] G: " + .@Guillaume + "/10, C: " + .@Croix + "/10",1,0x808000;
+ end;
+ }
+
+ // BG Variables
+ set $@FlaviusBG2, 1;
+ set $@FlaviusBG2_Victory, 0;
+ set .Guillaume_Score, 0;
+ set .Guillaume_Loss, 0;
+ set .Croix_Score, 0;
+ set .Croix_Loss, 0;
+ set .Match, 0;
+ // Prepare NPC
+ donpcevent "#gfl2_respawn::OnBGStart";
+ donpcevent "#cfl2_respawn::OnBGStart";
+ enablenpc "Therapist in battle#fl21";
+ enablenpc "Therapist in battle#fl22";
+ disablenpc "Guillaume Vintenar#fl2";
+ disablenpc "Croix Vintenar#fl2";
+ // Build and Warp Teams
+ donpcevent "Fl2R_Guillaume::OnEnterBG";
+ donpcevent "Fl2R_Croix::OnEnterBG";
+ announce "Battleground -- Flavius [80-99] has started!",0,0x808000;
+ initnpctimer;
+ // Start Match!!
+
+OnRoundStart:
+ sleep 2000;
+ if( $@FlaviusBG2 != 1 ) end;
+
+ areapercentheal "bat_b02",382,2,397,17,100,100;
+ areapercentheal "bat_b02",2,282,17,297,100,100;
+ bg_warp $@FlaviusBG2_id1,"bat_b02",311,224;
+ bg_warp $@FlaviusBG2_id2,"bat_b02",87,75;
+
+ sleep 2000;
+ if( $@FlaviusBG2 != 1 ) end;
+
+ set .Match, .Match + 1;
+ // Crystal Spawn
+ set .Guillaume_Crystal, bg_monster($@FlaviusBG2_id1,"bat_b02",328,150,"Crystal Guillaume",1914,"Flavius_BG2::OnGuillaumeBreak");
+ setwall "bat_b02",327,149,2,6,0,"gui_wall2-1";
+ setwall "bat_b02",329,149,2,0,0,"gui_wall2-2";
+ setwall "bat_b02",329,151,2,2,0,"gui_wall2-3";
+ setwall "bat_b02",327,151,2,4,0,"gui_wall2-4";
+
+ set .Croix_Crystal, bg_monster($@FlaviusBG2_id2,"bat_b02",62,150,"Crystal Croix",1915,"Flavius_BG2::OnCroixBreak");
+ setwall "bat_b02",61,149,2,6,0,"cro_wall2-1";
+ setwall "bat_b02",63,149,2,0,0,"cro_wall2-2";
+ setwall "bat_b02",63,151,2,2,0,"cro_wall2-3";
+ setwall "bat_b02",61,151,2,4,0,"cro_wall2-4";
+
+ // Guardian Spawns
+ bg_monster $@FlaviusBG2_id1,"bat_b02",328,160,"Guillaume Guardian",1949,"Flavius_BG2::OnGuiGuardian";
+ bg_monster $@FlaviusBG2_id1,"bat_b02",328,140,"Guillaume Guardian",1950,"Flavius_BG2::OnGuiGuardian";
+ set .Guillaume_Guardian, 2;
+ bg_monster $@FlaviusBG2_id2,"bat_b02",62,160,"Croix Guardian",1949,"Flavius_BG2::OnCroGuardian";
+ bg_monster $@FlaviusBG2_id2,"bat_b02",61,140,"Croix Guardian",1950,"Flavius_BG2::OnCroGuardian";
+ set .Croix_Guardian, 2;
+ // Announces
+ mapannounce "bat_b02","The Battle of Flavius [ " + .Match + " ] Round has begun!!",1,0x808000;
+ end;
+
+OnRoundStop:
+ // Remove Monsters
+ killmonster "bat_b02","Flavius_BG2::OnGuiGuardian";
+ killmonster "bat_b02","Flavius_BG2::OnCroGuardian";
+ delwall "gui_wall2-1";
+ delwall "gui_wall2-2";
+ delwall "gui_wall2-3";
+ delwall "gui_wall2-4";
+ killmonster "bat_b02","Flavius_BG2::OnGuillaumeBreak";
+ delwall "cro_wall2-1";
+ delwall "cro_wall2-2";
+ delwall "cro_wall2-3";
+ delwall "cro_wall2-4";
+ killmonster "bat_b02","Flavius_BG2::OnCroixBreak";
+ end;
+
+OnGuiGuardian:
+ if( set(.Guillaume_Guardian, .Guillaume_Guardian - 1) <= 0 )
+ {
+ delwall "gui_wall2-1";
+ delwall "gui_wall2-2";
+ delwall "gui_wall2-3";
+ delwall "gui_wall2-4";
+ mapannounce "bat_b02","The Guillaume Crystal is vulnerable to attack!",1,0x0000FF;
+ }
+ end;
+
+OnCroGuardian:
+ if( set(.Croix_Guardian, .Croix_Guardian - 1) <= 0 )
+ {
+ delwall "cro_wall2-1";
+ delwall "cro_wall2-2";
+ delwall "cro_wall2-3";
+ delwall "cro_wall2-4";
+ mapannounce "bat_b02","The Croix Crystal is vulnerable to attack!",1,0xFF0000;
+ }
+ end;
+
+OnGuillaumeBreak:
+ donpcevent "Flavius_BG2::OnRoundStop";
+ set .Guillaume_Loss, .Guillaume_Loss + 1;
+ if( set(.Croix_Score, .Croix_Score + 1) < 2 )
+ {
+ bg_updatescore "bat_b02",.Guillaume_Score,.Croix_Score;
+ mapannounce "bat_b02","The Guillaume Crystal has been destroyed!",1,0x0000FF;
+ donpcevent "Flavius_BG2::OnRoundStart";
+ }
+ else
+ {
+ bg_updatescore "bat_b02",.Guillaume_Score,.Croix_Score;
+ mapannounce "bat_b02","The Croix army has won the Battle of Flavius!",1,0xFF0000;
+ set $@FlaviusBG2_Victory, 2;
+ donpcevent "Flavius_BG2::OnMatchEnd";
+ }
+ end;
+
+OnCroixBreak:
+ donpcevent "Flavius_BG2::OnRoundStop";
+ set .Croix_Loss, .Croix_Loss + 1;
+ if( set(.Guillaume_Score, .Guillaume_Score + 1) < 2 )
+ {
+ bg_updatescore "bat_b02",.Guillaume_Score,.Croix_Score;
+ mapannounce "bat_b02","The Croix Crystal has been destroyed!",1,0xFF0000;
+ donpcevent "Flavius_BG2::OnRoundStart";
+ }
+ else
+ {
+ bg_updatescore "bat_b02",.Guillaume_Score,.Croix_Score;
+ mapannounce "bat_b02","The Guillaume army has won the Battle of Flavius!",1,0x0000FF;
+ set $@FlaviusBG2_Victory, 1;
+ donpcevent "Flavius_BG2::OnMatchEnd";
+ }
+ end;
+
+OnTimer2400000:
+ mapannounce "bat_b02","Battle of Flavius will ends in 5 minutes",1,0x808000;
+ end;
+OnTimer2640000:
+ mapannounce "bat_b02","Battle of Flavius will ends in 1 minute",1,0x808000;
+ end;
+
+OnTimer2700000:
+ if( .Croix_Score > .Guillaume_Score )
+ {
+ mapannounce "bat_b02","The Croix army has won the Battle of Flavius!",1,0xFF0000;
+ set $@FlaviusBG2_Victory, 2;
+ }
+ else if( .Croix_Score < .Guillaume_Score )
+ {
+ mapannounce "bat_b02","The Guillaume army has won the Battle of Flavius!",1,0x0000FF;
+ set $@FlaviusBG2_Victory, 1;
+ }
+ else
+ {
+ mapannounce "bat_b02","The Battle of Flavius is over. The time is out, this is a Tie",1,0x808000;
+ set $@FlaviusBG2_Victory, 3;
+ }
+
+OnMatchEnd:
+ set $@FlaviusBG2, 2;
+ stopnpctimer;
+ donpcevent "#gfl2_respawn::OnBGStop";
+ donpcevent "#cfl2_respawn::OnBGStop";
+ disablenpc "Therapist in battle#fl21";
+ disablenpc "Therapist in battle#fl22";
+ enablenpc "Guillaume Vintenar#fl2";
+ enablenpc "Croix Vintenar#fl2";
+ sleep 2000;
+ bg_warp $@FlaviusBG2_id1,"bat_b02",390,10;
+ bg_warp $@FlaviusBG2_id2,"bat_b02",10,290;
+ sleep 3000;
+ mapannounce "bat_b02","Battle of Flavius will close in 1 minute!",1,0x808000;
+ initnpctimer;
+ end;
+
+OnTimer30000:
+ if( $@FlaviusBG2 == 2 )
+ mapannounce "bat_b02","Battle of Flavius will close in 30 seconds!",1,0x808000;
+ end;
+OnTimer50000:
+ if( $@FlaviusBG2 == 2 )
+ mapannounce "bat_b02","Battle of Flavius will close in 10 seconds!",1,0x808000;
+ end;
+
+OnTimer60000:
+ if( $@FlaviusBG2 != 2 )
+ end;
+OnReset:
+ stopnpctimer;
+ donpcevent "Flavius_BG2::OnRoundStop";
+ set .Guillaume_Score, 0;
+ set .Guillaume_Crystal, 0;
+ set .Guillaume_Loss, 0;
+ set .Croix_Score, 0;
+ set .Croix_Crystal, 0;
+ set .Croix_Loss, 0;
+ set .Match, 0;
+ set $@FlaviusBG2_Victory, 0;
+ // NPC's
+ disablenpc "Guillaume Vintenar#fl2";
+ disablenpc "Croix Vintenar#fl2";
+ disablenpc "Therapist in battle#fl21";
+ disablenpc "Therapist in battle#fl22";
+
+ if( $@FlaviusBG2_id1 ) { bg_destroy $@FlaviusBG2_id1; set $@FlaviusBG2_id1, 0; }
+ if( $@FlaviusBG2_id2 ) { bg_destroy $@FlaviusBG2_id2; set $@FlaviusBG2_id2, 0; }
+ sleep 1000;
+ mapwarp "bat_b02","bat_room",155,150;
+ sleep 2000;
+ maprespawnguildid "bat_b02",0,3; // Just in case someone else
+ sleep 2000;
+ bg_updatescore "bat_b02",0,0;
+ set $@FlaviusBG2, 0;
+ donpcevent "Flavius_BG2::OnReadyCheck";
+ end;
+}
+
+// Battleground rewards
+// *********************************************************************
+
+bat_b02,390,13,5 script Guillaume Vintenar#fl2 419,{
+ if( $@FlaviusBG2_Victory )
+ {
+ if( $@FlaviusBG2_Victory == Bat_Team )
+ { // Victory
+ mes "[Swandery]";
+ mes "Blessed Guillaume!!";
+ mes "Let's enjoy our glorious victory!";
+ mes "" + strcharinfo(0) + ", its a sign reflecting victory";
+ close2;
+ set .@Reward, 9;
+ }
+ else
+ { //
+ mes "[Swandery]";
+ mes "You lost, but you're dedicated to this battle.";
+ mes "This is a reward for your great dedication by Guillaume Marollo!";
+ mes "Just take this defeat a lesson, and later you would definitely learn.";
+ close2;
+ set .@Reward, 3;
+ }
+
+ set Flavius_BG_Tick, gettimetick(2) + 300;
+ getitem 7829, .@Reward;
+ bg_leave;
+ warp "bat_room",155,150;
+ end;
+ }
+ end;
+}
+
+bat_b02,10,293,5 script Croix Vintenar#fl2 415,{
+ if( $@FlaviusBG2_Victory )
+ {
+ if( $@FlaviusBG2_Victory == Bat_Team )
+ { // Victory
+ mes "[Swandery]";
+ mes "Blessed Croax!!";
+ mes "Let's enjoy our glorious victory!";
+ mes "" + strcharinfo(0) + ", its a sign reflecting victory";
+ close2;
+ set .@Reward, 9;
+ }
+ else
+ { //
+ mes "[Swandery]";
+ mes "Oh, " + strcharinfo(0) + ". Don't be sad.";
+ mes "Even though we didn't win, we did our best.";
+ mes "This is a Royal gift from Croix, and please don't forget this battle. We can win the next.";
+ close2;
+ set .@Reward, 3;
+ }
+
+ set Flavius_BG_Tick, gettimetick(2) + 300;
+ getitem 7829, .@Reward;
+ bg_leave;
+ warp "bat_room",155,150;
+ end;
+ }
+ end;
+}
+
+// Battleground Therapist
+// *********************************************************************
+
+bat_b02,390,13,5 script Therapist in battle#fl22 95,{
+ mes "[Therapist in battle]";
+ mes "Just close your eyes, and take a deep breathe.";
+ mes "You can be free from pain.";
+ specialeffect2 312;
+ close;
+}
+
+bat_b02,10,293,5 script Therapist in battle#fl21 95,{
+ mes "[Therapist in battle]";
+ mes "Just close your eyes, and take a deep breathe.";
+ mes "You can be free from pain.";
+ specialeffect2 312;
+ close;
+}
+
+// Battleground Respawn
+// *********************************************************************
+
+bat_b02,390,10,0 script #gfl2_respawn 139,{
+ end;
+
+OnBGStart:
+ initnpctimer;
+ end;
+
+OnBGStop:
+ stopnpctimer;
+ end;
+
+OnTimer24000:
+ misceffect 83;
+ end;
+
+OnTimer25000:
+ areapercentheal "bat_b02",382,2,397,17,100,100;
+ areawarp "bat_b02",382,2,397,17,"bat_b02",311,224;
+ initnpctimer;
+ end;
+}
+
+bat_b02,10,290,0 script #cfl2_respawn 139,{
+ end;
+
+OnBGStart:
+ initnpctimer;
+ end;
+
+OnBGStop:
+ stopnpctimer;
+ end;
+
+OnTimer24000:
+ misceffect 83;
+ end;
+
+OnTimer25000:
+ areapercentheal "bat_b02",2,282,17,297,100,100;
+ areawarp "bat_b02",2,282,17,297,"bat_b02",87,75;
+ initnpctimer;
+ end;
+}
+
+// Flags
+// *********************************************************************
+
+bat_b02,304,231,1 duplicate(Guillaume camp#bat) Guillaume camp#bat32 973
+bat_b02,319,231,1 duplicate(Guillaume camp#bat) Guillaume camp#bat33 973
+bat_b02,304,218,1 duplicate(Guillaume camp#bat) Guillaume camp#bat34 973
+bat_b02,319,218,1 duplicate(Guillaume camp#bat) Guillaume camp#bat35 973
+bat_b02,304,231,1 duplicate(Guillaume camp#bat) Guillaume camp#bat36 973
+bat_b02,304,231,1 duplicate(Guillaume camp#bat) Guillaume camp#bat37 973
+bat_b02,335,142,1 duplicate(Guillaume camp#bat) Guillaume camp#bat38 973
+bat_b02,335,157,1 duplicate(Guillaume camp#bat) Guillaume camp#bat39 973
+bat_b02,390,16,1 duplicate(Guillaume camp#bat) Guillaume camp#bat40 973
+bat_b02,292,163,1 duplicate(Guillaume camp#bat) Guillaume camp#bat41 973
+bat_b02,292,136,1 duplicate(Guillaume camp#bat) Guillaume camp#bat42 973
+bat_b02,241,185,1 duplicate(Guillaume camp#bat) Guillaume camp#bat43 973
+bat_b02,247,179,1 duplicate(Guillaume camp#bat) Guillaume camp#bat44 973
+
+bat_b02,96,81,1 duplicate(Croix camp#bat) Croix camp#bat30 974
+bat_b02,96,68,1 duplicate(Croix camp#bat) Croix camp#bat31 974
+bat_b02,79,81,1 duplicate(Croix camp#bat) Croix camp#bat32 974
+bat_b02,79,68,1 duplicate(Croix camp#bat) Croix camp#bat33 974
+bat_b02,96,81,1 duplicate(Croix camp#bat) Croix camp#bat34 974
+bat_b02,96,81,1 duplicate(Croix camp#bat) Croix camp#bat35 974
+bat_b02,59,164,1 duplicate(Croix camp#bat) Croix camp#bat36 974
+bat_b02,59,137,1 duplicate(Croix camp#bat) Croix camp#bat37 974
+bat_b02,10,296,1 duplicate(Croix camp#bat) Croix camp#bat38 974
+bat_b02,110,162,1 duplicate(Croix camp#bat) Croix camp#bat39 974
+bat_b02,110,137,1 duplicate(Croix camp#bat) Croix camp#bat40 974
+bat_b02,152,120,1 duplicate(Croix camp#bat) Croix camp#bat41 974
+bat_b02,158,114,1 duplicate(Croix camp#bat) Croix camp#bat42 974
+
+// MapFlags
+// *********************************************************************
+
+bat_b02 mapflag battleground
+bat_b02 mapflag nomemo
+bat_b02 mapflag nosave SavePoint
+bat_b02 mapflag noteleport
+bat_b02 mapflag nowarp
+bat_b02 mapflag nowarpto
+bat_b02 mapflag noreturn
+bat_b02 mapflag nobranch
+bat_b02 mapflag nopenalty
diff --git a/npc/battleground/bg_tierra_01.txt b/npc/battleground/bg_tierra_01.txt
index ed1e65120..9d04512e6 100644
--- a/npc/battleground/bg_tierra_01.txt
+++ b/npc/battleground/bg_tierra_01.txt
@@ -1,488 +1,488 @@
-// ==============================================================================
-// BattleGround System - Tierra Valley 1
-// ==============================================================================
-
-// Registration NPC's
-// *********************************************************************
-
-bat_room,85,227,4 script Registration::TV1R_Guillaume 418,{
- end;
-OnInit:
- waitingroom "Battle Station 10 Players",10,"Tierra_BG1::OnGuillaumeJoin",1;
- end;
-OnEnterBG:
- set $@TierraBG1_id1, waitingroom2bg("bat_a01",50,374,"Tierra_BG1::OnGuillaumeQuit","");
- end;
-}
-
-bat_room,85,204,0 script Registration::TV1R_Croix 414,{
- end;
-OnInit:
- waitingroom "Battle Station 10 Players",10,"Tierra_BG1::OnCroixJoin",1;
- end;
-OnEnterBG:
- set $@TierraBG1_id2, waitingroom2bg("bat_a01",42,16,"Tierra_BG1::OnCroixQuit","");
- end;
-}
-
-// Battleground Engine
-// *********************************************************************
-
-- script Tierra_BG1 -1,{
- end;
-
-OnInit:
- disablenpc "Croix Vintenar#tv1";
- disablenpc "Guillaume Vintenar#tv1";
- disablenpc "Therapist in battle#tv11";
- disablenpc "Therapist in battle#tv12";
- end;
-
-OnGuillaumeQuit:
-OnCroixQuit:
- set BG_Delay_Tick, gettimetick(2) + 1200;
- end;
-
-OnGuillaumeJoin:
-OnCroixJoin:
- if( $@TierraBG1 == 0 )
- donpcevent "Tierra_BG1::OnReadyCheck";
- end;
-
-OnReadyCheck:
- if( $@TierraBG1 )
- end;
- set .@Guillaume, getwaitingroomstate(0,"TV1R_Guillaume");
- set .@Croix, getwaitingroomstate(0,"TV1R_Croix");
-
- if( .@Guillaume < 10 || .@Croix < 10 )
- {
- mapannounce "bat_room","Battleground -- Tierra Valley [80-99] G: " + .@Guillaume + "/10, C: " + .@Croix + "/10",1,0xFFA500;
- end;
- }
-
- set $@TierraBG1, 1;
- donpcevent "TV1R_Croix::OnEnterBG";
- donpcevent "TV1R_Guillaume::OnEnterBG";
- donpcevent "Guillaume_TV1B::OnBuild";
- donpcevent "Croix_TV1B::OnBuild";
- bg_monster $@TierraBG1_id1,"bat_a01",176,345,"Food Depot",1909,"Tierra_BG1::OnGuillaumeBreak";
- bg_monster $@TierraBG1_id2,"bat_a01",167,50,"Food Storage",1910,"Tierra_BG1::OnCroixBreak";
- bg_monster 0,"bat_a01",273,204,"Neutrality Flag",1911,"Tierra_BG1::OnNeutralBreak";
-
- set .Neutral_Base, 0;
- set $@TierraBG1_Victory, 0;
-
- set .Guardian_1, 0;
- set .Guardian_2, 0;
- set .Guardian_3, 0;
-
- enablenpc "Therapist in battle#tv11";
- enablenpc "Therapist in battle#tv12";
- disablenpc "Croix Vintenar#tv1";
- disablenpc "Guillaume Vintenar#tv1";
- // Respawner
- donpcevent "#gtv1_respawn::OnBGStart";
- donpcevent "#ctv1_respawn::OnBGStart";
- donpcevent "#ntv1_respawn::OnBGStart";
- // Warp Teams
- announce "Battleground -- Tierra Valley [80-99] has started!",0,0xFFA500;
- bg_warp $@TierraBG1_id1,"bat_a01",353,344;
- bg_warp $@TierraBG1_id2,"bat_a01",353,52;
- // Final Messages
- sleep 6000;
- mapannounce "bat_a01","Guillaume Vintenar Axl Rose : Let's attack to burn down Croix's food storage",1,0x0000FF;
- sleep 2000;
- mapannounce "bat_a01","Croix Vintenar Swandery : Master of Valhalla! Let us be gifted with unfailing faith and courage",1,0xFF0000;
-
- initnpctimer;
- end;
-
-OnNeutralBreak:
- if( getcharid(4) == $@TierraBG1_id1 )
- {
- mapannounce "bat_a01","Guillaume obtained a neurality banner, so they have an advantage.",1,0x0000FF;
- bg_team_setxy $@TierraBG1_id2,42,16;
- areawarp "bat_a01",52,208,61,217,"bat_a01",42,16;
- }
- else if( getcharid(4) == $@TierraBG1_id2 )
- {
- mapannounce "bat_a01","Croix obtained a neutrality banner, so they have an advantage.",1,0xFF0000;
- bg_team_setxy $@TierraBG1_id1,50,374;
- areawarp "bat_a01",52,208,61,217,"bat_a01",50,374;
- }
- else end;
-
- set .Neutral_Base, getcharid(4);
- bg_team_setxy .Neutral_Base,56,212;
-
- if( .Guardian_1 == 0 )
- set .Guardian_1, bg_monster(.Neutral_Base,"bat_a01",280,233,"Guardian",1949,"Tierra_BG1::OnGuardian1");
- else
- bg_monster_set_team .Guardian_1, .Neutral_Base;
-
- if( .Guardian_2 == 0 )
- set .Guardian_2, bg_monster(.Neutral_Base,"bat_a01",287,203,"Guardian",1950,"Tierra_BG1::OnGuardian2");
- else
- bg_monster_set_team .Guardian_2, .Neutral_Base;
-
- if( .Guardian_3 == 0 )
- set .Guardian_3, bg_monster(.Neutral_Base,"bat_a01",268,204,"Guardian",1949,"Tierra_BG1::OnGuardian3");
- else
- bg_monster_set_team .Guardian_3, .Neutral_Base;
-
- sleep 10000;
- if( $@TierraBG1 != 1 ) end;
-
- if( .Neutral_Base == $@TierraBG1_id1 )
- bg_monster .Neutral_Base,"bat_a01",273,204,"Guillaume Flag",1912,"Tierra_BG1::OnNeutralBreak";
- else if( .Neutral_Base == $@TierraBG1_id2 )
- bg_monster .Neutral_Base,"bat_a01",273,204,"Croix Flag",1913,"Tierra_BG1::OnNeutralBreak";
- end;
-
-OnGuardian1: set .Guardian_1, 0; end;
-OnGuardian2: set .Guardian_2, 0; end;
-OnGuardian3: set .Guardian_3, 0; end;
-
-OnGuillaumeBreak:
- set $@TierraBG1_Victory, 2;
- mapannounce "bat_a01","Croix Vintenar Swandery: We destroyed Guillaume's food storehause. We won that! Wow!",1,0xFF0000;
- donpcevent "Tierra_BG1::OnStop";
- end;
-
-OnCroixBreak:
- set $@TierraBG1_Victory, 1;
- mapannounce "bat_a01","Guillaume Vintenar Axl Rose: We destroyed Croix's food storehause. We won that! Wow!",1,0x0000FF;
- donpcevent "Tierra_BG1::OnStop";
- end;
-
-OnTimer2400000:
- mapannounce "bat_a01","Battle of Tierra Gorge will ends in 5 minutes",1,0xFFA500;
- end;
-OnTimer2640000:
- mapannounce "bat_a01","Battle of Tierra Gorge will ends in 1 minute",1,0xFFA500;
- end;
-
-OnTimer2700000:
- set $@TierraBG1_Victory, 3; // Draw Game
- mapannounce "bat_a01","Battle of Tierra Gorge is over. The time is out, this is a Tie",1,0xFFA500;
- donpcevent "Tierra_BG1::OnStop";
- end;
-
-OnStop:
- set $@TierraBG1, 2;
- disablenpc "Therapist in battle#tv11";
- disablenpc "Therapist in battle#tv12";
- donpcevent "#gtv1_respawn::OnBGStop";
- donpcevent "#ctv1_respawn::OnBGStop";
- donpcevent "#ntv1_respawn::OnBGStop";
- enablenpc "Croix Vintenar#tv1";
- enablenpc "Guillaume Vintenar#tv1";
- killmonster "bat_a01","Tierra_BG1::OnGuillaumeBreak";
- killmonster "bat_a01","Tierra_BG1::OnCroixBreak";
- killmonster "bat_a01","Tierra_BG1::OnNeutralBreak";
- killmonster "bat_a01","Tierra_BG1::OnGuardian1";
- killmonster "bat_a01","Tierra_BG1::OnGuardian2";
- killmonster "bat_a01","Tierra_BG1::OnGuardian3";
- stopnpctimer;
- sleep 3000;
- bg_warp $@TierraBG1_id1,"bat_a01",50,374;
- bg_warp $@TierraBG1_id2,"bat_a01",42,16;
- sleep 3000;
- mapannounce "bat_a01","Battle of Tierra Gorge will close in 1 minute!",1,0xFFA500;
- initnpctimer;
- end;
-
-OnTimer30000:
- if( $@TierraBG1 == 2 )
- mapannounce "bat_a01","Battle of Tierra Valley will close in 30 seconds!",1,0xFFA500;
- end;
-OnTimer50000:
- if( $@TierraBG1 == 2 )
- mapannounce "bat_a01","Battle of Tierra Valley will close in 10 seconds!",1,0xFFA500;
- end;
-
-OnTimer60000:
- if( $@TierraBG1 != 2 )
- end;
-OnReset:
- stopnpctimer;
- set .Neutral_Base, 0;
- disablenpc "Croix Vintenar#tv1";
- disablenpc "Guillaume Vintenar#tv1";
- disablenpc "Therapist in battle#tv11";
- disablenpc "Therapist in battle#tv12";
- donpcevent "#gtv1_respawn::OnBGStop";
- donpcevent "#ctv1_respawn::OnBGStop";
- donpcevent "#ntv1_respawn::OnBGStop";
-
- killmonster "bat_a01","Tierra_BG1::OnGuillaumeBreak";
- killmonster "bat_a01","Tierra_BG1::OnCroixBreak";
- killmonster "bat_a01","Tierra_BG1::OnNeutralBreak";
- killmonster "bat_a01","Tierra_BG1::OnGuardian1";
- killmonster "bat_a01","Tierra_BG1::OnGuardian2";
- killmonster "bat_a01","Tierra_BG1::OnGuardian3";
- donpcevent "Guillaume_TV1B::OnDestroy";
- donpcevent "Croix_TV1B::OnDestroy";
-
- set $@TierraBG1_Victory, 0;
- if( $@TierraBG1_id1 ) { bg_destroy $@TierraBG1_id1; set $@TierraBG1_id1, 0; }
- if( $@TierraBG1_id2 ) { bg_destroy $@TierraBG1_id2; set $@TierraBG1_id2, 0; }
- sleep 1000;
- mapwarp "bat_a01","bat_room",155,150;
- sleep 2000;
- maprespawnguildid "bat_a01",0,3; // Just in case someone else
- sleep 2000;
- set $@TierraBG1, 0;
- donpcevent "Tierra_BG1::OnReadyCheck"; // Maybe a game is ready to start
- end;
-}
-
-// MapFlags
-// *********************************************************************
-
-bat_a01 mapflag battleground
-bat_a01 mapflag nomemo
-bat_a01 mapflag nosave SavePoint
-bat_a01 mapflag noteleport
-bat_a01 mapflag nowarp
-bat_a01 mapflag nowarpto
-bat_a01 mapflag noreturn
-bat_a01 mapflag nobranch
-bat_a01 mapflag nopenalty
-
-// Other Flags
-// *********************************************************************
-
-bat_a01,148,85,1 duplicate(Croix camp#bat) Croix camp#bat10 974
-bat_a01,155,85,1 duplicate(Croix camp#bat) Croix camp#bat11 974
-bat_a01,357,75,1 duplicate(Croix camp#bat) Croix camp#bat12 974
-bat_a01,348,74,1 duplicate(Croix camp#bat) Croix camp#bat13 974
-bat_a01,199,49,1 duplicate(Croix camp#bat) Croix camp#bat14 974
-bat_a01,168,16,1 duplicate(Croix camp#bat) Croix camp#bat15 974
-bat_a01,138,12,1 duplicate(Croix camp#bat) Croix camp#bat16 974
-bat_a01,108,35,1 duplicate(Croix camp#bat) Croix camp#bat17 974
-bat_a01,164,308,1 duplicate(Guillaume camp#bat) Guillaume camp#bat10 973
-bat_a01,157,308,1 duplicate(Guillaume camp#bat) Guillaume camp#bat11 973
-bat_a01,359,327,1 duplicate(Guillaume camp#bat) Guillaume camp#bat12 973
-bat_a01,350,326,1 duplicate(Guillaume camp#bat) Guillaume camp#bat13 973
-bat_a01,209,344,1 duplicate(Guillaume camp#bat) Guillaume camp#bat14 973
-bat_a01,173,380,1 duplicate(Guillaume camp#bat) Guillaume camp#bat15 973
-bat_a01,150,380,1 duplicate(Guillaume camp#bat) Guillaume camp#bat16 973
-bat_a01,118,357,1 duplicate(Guillaume camp#bat) Guillaume camp#bat17 973
-bat_a01,119,336,1 duplicate(Guillaume camp#bat) Guillaume camp#bat18 973
-
-// Barricades
-// *********************************************************************
-
-- script Guillaume_TV1B -1,{
- end;
-
-OnBuild:
- for( set .@i, 0; .@i < 16; set .@i, .@i + 1 )
- bg_monster 0,"bat_a01",170+.@i,130,"Barricade",1906,"Guillaume_TV1B::OnWall";
-
- setwall "bat_a01",170,130,16,6,1,"bat_a01_g1";
- set .MyMobCount,16;
- end;
-
-OnDestroy:
- killmonster "bat_a01","Guillaume_TV1B::OnWall";
- delwall "bat_a01_g1";
- set .MyMobCount,0;
- end;
-
-OnWall:
- if( set(.MyMobCount,.MyMobCount - 1) < 1 )
- {
- delwall "bat_a01_g1";
- mapannounce "bat_a01","South Gate : The Gate has been Destroy!!",1,0xFFA500;
- }
- end;
-}
-
-- script Croix_TV1B -1,{
- end;
-
-OnBuild:
- for( set .@i, 0; .@i < 16; set .@i, .@i + 1 )
- bg_monster 0,"bat_a01",186+.@i,266,"Barricade",1906,"Croix_TV1B::OnWall";
-
- setwall "bat_a01",186,266,16,6,1,"bat_a01_c1";
- set .MyMobCount,16;
- end;
-
-OnDestroy:
- killmonster "bat_a01","Croix_TV1B::OnWall";
- delwall "bat_a01_c1";
- set .MyMobCount,0;
- end;
-
-OnWall:
- if( set(.MyMobCount,.MyMobCount - 1) < 1 )
- {
- delwall "bat_a01_c1";
- mapannounce "bat_a01","North Gate : A Gate has been Destroy!!",1,0xFFA500;
- }
- end;
-}
-
-// Battleground rewards
-// *********************************************************************
-
-bat_a01,45,19,3 script Croix Vintenar#tv1 415,{
- if( $@TierraBG1_Victory )
- {
- if( $@TierraBG1_Victory == Bat_Team )
- { // Victory
- set .@Reward, 3;
- mes "[Swandery]";
- mes "Blessed Croax!!";
- mes "Let's enjoy our glorious victory!";
- mes "" + strcharinfo(0) + ", its a sign reflecting victory";
- close2;
- }
- else
- { //
- set .@Reward, 1;
- mes "[Swandery]";
- mes "Oh, " + strcharinfo(0) + ". Don't be sad.";
- mes "Even though we didn't win, we did our best.";
- mes "This is a Royal gift from Croix, and please don't forget this battle. We can win the next.";
- close2;
- }
-
- set Tierra_BG_Tick, gettimetick(2) + 300;
- getitem 7828, .@Reward;
- bg_leave;
- warp "bat_room",155,150;
- end;
- }
- end;
-}
-
-bat_a01,53,377,3 script Guillaume Vintenar#tv1 419,{
- if( $@TierraBG1_Victory )
- {
- if( $@TierraBG1_Victory == Bat_Team )
- { // Victory
- set .@Reward, 3;
- mes "[Swandery]";
- mes "Blessed Guillaume!!";
- mes "Let's enjoy our glorious victory!";
- mes "" + strcharinfo(0) + ", its a sign reflecting victory";
- close2;
- }
- else
- { //
- set .@Reward, 1;
- mes "[Swandery]";
- mes "You lost, but you're dedicated to this battle.";
- mes "This is a reward for your great dedication by Guillaume Marollo!";
- mes "Just take this defeat a lesson, and later you would definitely learn.";
- close2;
- }
-
- set Tierra_BG_Tick, gettimetick(2) + 300;
- getitem 7828, .@Reward;
- bg_leave;
- warp "bat_room",155,150;
- end;
- }
- end;
-}
-
-// Battleground Therapist
-// *********************************************************************
-
-bat_a01,60,216,3 script Ghost#tv13 950,{
- mes "[Ghost in valley]";
- mes "Boo...Boo...";
- specialeffect2 312;
- close;
-}
-
-bat_a01,53,377,3 script Therapist in battle#tv12 95,{
- mes "[Therapist in battle]";
- mes "Just close your eyes, and take a deep breathe.";
- mes "You can be free from pain.";
- specialeffect2 312;
- close;
-}
-
-bat_a01,45,18,3 script Therapist in battle#tv11 95,{
- mes "[Therapist in battle]";
- mes "Just close your eyes, and take a deep breathe.";
- mes "You can be free from pain.";
- specialeffect2 312;
- close;
-}
-
-// Battleground Respawn
-// *********************************************************************
-
-bat_a01,57,213,0 script #ntv1_respawn 139,{
- end;
-
-OnBGStart:
- initnpctimer;
- end;
-
-OnBGStop:
- stopnpctimer;
- end;
-
-OnTimer19000:
- misceffect 83;
- end;
-
-OnTimer20000:
- areapercentheal "bat_a01",52,208,61,217,100,100;
- areawarp "bat_a01",52,208,61,217,"bat_a01",301,208;
- initnpctimer;
- end;
-}
-
-bat_a01,50,374,0 script #gtv1_respawn 139,{
- end;
-
-OnBGStart:
- initnpctimer;
- end;
-
-OnBGStop:
- stopnpctimer;
- end;
-
-OnTimer24000:
- misceffect 83;
- end;
-
-OnTimer25000:
- areapercentheal "bat_a01",46,370,54,378,100,100;
- areawarp "bat_a01",46,370,54,378,"bat_a01",354,340;
- initnpctimer;
- end;
-}
-
-bat_a01,42,16,0 script #ctv1_respawn 139,{
- end;
-
-OnBGStart:
- initnpctimer;
- end;
-
-OnBGStop:
- stopnpctimer;
- end;
-
-OnTimer24000:
- misceffect 83;
- end;
-
-OnTimer25000:
- areapercentheal "bat_a01",38,12,47,21,100,100;
- areawarp "bat_a01",38,12,47,21,"bat_a01",354,57;
- initnpctimer;
- end;
-}
+// ==============================================================================
+// BattleGround System - Tierra Valley 1
+// ==============================================================================
+
+// Registration NPC's
+// *********************************************************************
+
+bat_room,85,227,4 script Registration::TV1R_Guillaume 418,{
+ end;
+OnInit:
+ waitingroom "Battle Station 10 Players",10,"Tierra_BG1::OnGuillaumeJoin",1;
+ end;
+OnEnterBG:
+ set $@TierraBG1_id1, waitingroom2bg("bat_a01",50,374,"Tierra_BG1::OnGuillaumeQuit","");
+ end;
+}
+
+bat_room,85,204,0 script Registration::TV1R_Croix 414,{
+ end;
+OnInit:
+ waitingroom "Battle Station 10 Players",10,"Tierra_BG1::OnCroixJoin",1;
+ end;
+OnEnterBG:
+ set $@TierraBG1_id2, waitingroom2bg("bat_a01",42,16,"Tierra_BG1::OnCroixQuit","");
+ end;
+}
+
+// Battleground Engine
+// *********************************************************************
+
+- script Tierra_BG1 -1,{
+ end;
+
+OnInit:
+ disablenpc "Croix Vintenar#tv1";
+ disablenpc "Guillaume Vintenar#tv1";
+ disablenpc "Therapist in battle#tv11";
+ disablenpc "Therapist in battle#tv12";
+ end;
+
+OnGuillaumeQuit:
+OnCroixQuit:
+ set BG_Delay_Tick, gettimetick(2) + 1200;
+ end;
+
+OnGuillaumeJoin:
+OnCroixJoin:
+ if( $@TierraBG1 == 0 )
+ donpcevent "Tierra_BG1::OnReadyCheck";
+ end;
+
+OnReadyCheck:
+ if( $@TierraBG1 )
+ end;
+ set .@Guillaume, getwaitingroomstate(0,"TV1R_Guillaume");
+ set .@Croix, getwaitingroomstate(0,"TV1R_Croix");
+
+ if( .@Guillaume < 10 || .@Croix < 10 )
+ {
+ mapannounce "bat_room","Battleground -- Tierra Valley [80-99] G: " + .@Guillaume + "/10, C: " + .@Croix + "/10",1,0xFFA500;
+ end;
+ }
+
+ set $@TierraBG1, 1;
+ donpcevent "TV1R_Croix::OnEnterBG";
+ donpcevent "TV1R_Guillaume::OnEnterBG";
+ donpcevent "Guillaume_TV1B::OnBuild";
+ donpcevent "Croix_TV1B::OnBuild";
+ bg_monster $@TierraBG1_id1,"bat_a01",176,345,"Food Depot",1909,"Tierra_BG1::OnGuillaumeBreak";
+ bg_monster $@TierraBG1_id2,"bat_a01",167,50,"Food Storage",1910,"Tierra_BG1::OnCroixBreak";
+ bg_monster 0,"bat_a01",273,204,"Neutrality Flag",1911,"Tierra_BG1::OnNeutralBreak";
+
+ set .Neutral_Base, 0;
+ set $@TierraBG1_Victory, 0;
+
+ set .Guardian_1, 0;
+ set .Guardian_2, 0;
+ set .Guardian_3, 0;
+
+ enablenpc "Therapist in battle#tv11";
+ enablenpc "Therapist in battle#tv12";
+ disablenpc "Croix Vintenar#tv1";
+ disablenpc "Guillaume Vintenar#tv1";
+ // Respawner
+ donpcevent "#gtv1_respawn::OnBGStart";
+ donpcevent "#ctv1_respawn::OnBGStart";
+ donpcevent "#ntv1_respawn::OnBGStart";
+ // Warp Teams
+ announce "Battleground -- Tierra Valley [80-99] has started!",0,0xFFA500;
+ bg_warp $@TierraBG1_id1,"bat_a01",353,344;
+ bg_warp $@TierraBG1_id2,"bat_a01",353,52;
+ // Final Messages
+ sleep 6000;
+ mapannounce "bat_a01","Guillaume Vintenar Axl Rose : Let's attack to burn down Croix's food storage",1,0x0000FF;
+ sleep 2000;
+ mapannounce "bat_a01","Croix Vintenar Swandery : Master of Valhalla! Let us be gifted with unfailing faith and courage",1,0xFF0000;
+
+ initnpctimer;
+ end;
+
+OnNeutralBreak:
+ if( getcharid(4) == $@TierraBG1_id1 )
+ {
+ mapannounce "bat_a01","Guillaume obtained a neurality banner, so they have an advantage.",1,0x0000FF;
+ bg_team_setxy $@TierraBG1_id2,42,16;
+ areawarp "bat_a01",52,208,61,217,"bat_a01",42,16;
+ }
+ else if( getcharid(4) == $@TierraBG1_id2 )
+ {
+ mapannounce "bat_a01","Croix obtained a neutrality banner, so they have an advantage.",1,0xFF0000;
+ bg_team_setxy $@TierraBG1_id1,50,374;
+ areawarp "bat_a01",52,208,61,217,"bat_a01",50,374;
+ }
+ else end;
+
+ set .Neutral_Base, getcharid(4);
+ bg_team_setxy .Neutral_Base,56,212;
+
+ if( .Guardian_1 == 0 )
+ set .Guardian_1, bg_monster(.Neutral_Base,"bat_a01",280,233,"Guardian",1949,"Tierra_BG1::OnGuardian1");
+ else
+ bg_monster_set_team .Guardian_1, .Neutral_Base;
+
+ if( .Guardian_2 == 0 )
+ set .Guardian_2, bg_monster(.Neutral_Base,"bat_a01",287,203,"Guardian",1950,"Tierra_BG1::OnGuardian2");
+ else
+ bg_monster_set_team .Guardian_2, .Neutral_Base;
+
+ if( .Guardian_3 == 0 )
+ set .Guardian_3, bg_monster(.Neutral_Base,"bat_a01",268,204,"Guardian",1949,"Tierra_BG1::OnGuardian3");
+ else
+ bg_monster_set_team .Guardian_3, .Neutral_Base;
+
+ sleep 10000;
+ if( $@TierraBG1 != 1 ) end;
+
+ if( .Neutral_Base == $@TierraBG1_id1 )
+ bg_monster .Neutral_Base,"bat_a01",273,204,"Guillaume Flag",1912,"Tierra_BG1::OnNeutralBreak";
+ else if( .Neutral_Base == $@TierraBG1_id2 )
+ bg_monster .Neutral_Base,"bat_a01",273,204,"Croix Flag",1913,"Tierra_BG1::OnNeutralBreak";
+ end;
+
+OnGuardian1: set .Guardian_1, 0; end;
+OnGuardian2: set .Guardian_2, 0; end;
+OnGuardian3: set .Guardian_3, 0; end;
+
+OnGuillaumeBreak:
+ set $@TierraBG1_Victory, 2;
+ mapannounce "bat_a01","Croix Vintenar Swandery: We destroyed Guillaume's food storehause. We won that! Wow!",1,0xFF0000;
+ donpcevent "Tierra_BG1::OnStop";
+ end;
+
+OnCroixBreak:
+ set $@TierraBG1_Victory, 1;
+ mapannounce "bat_a01","Guillaume Vintenar Axl Rose: We destroyed Croix's food storehause. We won that! Wow!",1,0x0000FF;
+ donpcevent "Tierra_BG1::OnStop";
+ end;
+
+OnTimer2400000:
+ mapannounce "bat_a01","Battle of Tierra Gorge will ends in 5 minutes",1,0xFFA500;
+ end;
+OnTimer2640000:
+ mapannounce "bat_a01","Battle of Tierra Gorge will ends in 1 minute",1,0xFFA500;
+ end;
+
+OnTimer2700000:
+ set $@TierraBG1_Victory, 3; // Draw Game
+ mapannounce "bat_a01","Battle of Tierra Gorge is over. The time is out, this is a Tie",1,0xFFA500;
+ donpcevent "Tierra_BG1::OnStop";
+ end;
+
+OnStop:
+ set $@TierraBG1, 2;
+ disablenpc "Therapist in battle#tv11";
+ disablenpc "Therapist in battle#tv12";
+ donpcevent "#gtv1_respawn::OnBGStop";
+ donpcevent "#ctv1_respawn::OnBGStop";
+ donpcevent "#ntv1_respawn::OnBGStop";
+ enablenpc "Croix Vintenar#tv1";
+ enablenpc "Guillaume Vintenar#tv1";
+ killmonster "bat_a01","Tierra_BG1::OnGuillaumeBreak";
+ killmonster "bat_a01","Tierra_BG1::OnCroixBreak";
+ killmonster "bat_a01","Tierra_BG1::OnNeutralBreak";
+ killmonster "bat_a01","Tierra_BG1::OnGuardian1";
+ killmonster "bat_a01","Tierra_BG1::OnGuardian2";
+ killmonster "bat_a01","Tierra_BG1::OnGuardian3";
+ stopnpctimer;
+ sleep 3000;
+ bg_warp $@TierraBG1_id1,"bat_a01",50,374;
+ bg_warp $@TierraBG1_id2,"bat_a01",42,16;
+ sleep 3000;
+ mapannounce "bat_a01","Battle of Tierra Gorge will close in 1 minute!",1,0xFFA500;
+ initnpctimer;
+ end;
+
+OnTimer30000:
+ if( $@TierraBG1 == 2 )
+ mapannounce "bat_a01","Battle of Tierra Valley will close in 30 seconds!",1,0xFFA500;
+ end;
+OnTimer50000:
+ if( $@TierraBG1 == 2 )
+ mapannounce "bat_a01","Battle of Tierra Valley will close in 10 seconds!",1,0xFFA500;
+ end;
+
+OnTimer60000:
+ if( $@TierraBG1 != 2 )
+ end;
+OnReset:
+ stopnpctimer;
+ set .Neutral_Base, 0;
+ disablenpc "Croix Vintenar#tv1";
+ disablenpc "Guillaume Vintenar#tv1";
+ disablenpc "Therapist in battle#tv11";
+ disablenpc "Therapist in battle#tv12";
+ donpcevent "#gtv1_respawn::OnBGStop";
+ donpcevent "#ctv1_respawn::OnBGStop";
+ donpcevent "#ntv1_respawn::OnBGStop";
+
+ killmonster "bat_a01","Tierra_BG1::OnGuillaumeBreak";
+ killmonster "bat_a01","Tierra_BG1::OnCroixBreak";
+ killmonster "bat_a01","Tierra_BG1::OnNeutralBreak";
+ killmonster "bat_a01","Tierra_BG1::OnGuardian1";
+ killmonster "bat_a01","Tierra_BG1::OnGuardian2";
+ killmonster "bat_a01","Tierra_BG1::OnGuardian3";
+ donpcevent "Guillaume_TV1B::OnDestroy";
+ donpcevent "Croix_TV1B::OnDestroy";
+
+ set $@TierraBG1_Victory, 0;
+ if( $@TierraBG1_id1 ) { bg_destroy $@TierraBG1_id1; set $@TierraBG1_id1, 0; }
+ if( $@TierraBG1_id2 ) { bg_destroy $@TierraBG1_id2; set $@TierraBG1_id2, 0; }
+ sleep 1000;
+ mapwarp "bat_a01","bat_room",155,150;
+ sleep 2000;
+ maprespawnguildid "bat_a01",0,3; // Just in case someone else
+ sleep 2000;
+ set $@TierraBG1, 0;
+ donpcevent "Tierra_BG1::OnReadyCheck"; // Maybe a game is ready to start
+ end;
+}
+
+// MapFlags
+// *********************************************************************
+
+bat_a01 mapflag battleground
+bat_a01 mapflag nomemo
+bat_a01 mapflag nosave SavePoint
+bat_a01 mapflag noteleport
+bat_a01 mapflag nowarp
+bat_a01 mapflag nowarpto
+bat_a01 mapflag noreturn
+bat_a01 mapflag nobranch
+bat_a01 mapflag nopenalty
+
+// Other Flags
+// *********************************************************************
+
+bat_a01,148,85,1 duplicate(Croix camp#bat) Croix camp#bat10 974
+bat_a01,155,85,1 duplicate(Croix camp#bat) Croix camp#bat11 974
+bat_a01,357,75,1 duplicate(Croix camp#bat) Croix camp#bat12 974
+bat_a01,348,74,1 duplicate(Croix camp#bat) Croix camp#bat13 974
+bat_a01,199,49,1 duplicate(Croix camp#bat) Croix camp#bat14 974
+bat_a01,168,16,1 duplicate(Croix camp#bat) Croix camp#bat15 974
+bat_a01,138,12,1 duplicate(Croix camp#bat) Croix camp#bat16 974
+bat_a01,108,35,1 duplicate(Croix camp#bat) Croix camp#bat17 974
+bat_a01,164,308,1 duplicate(Guillaume camp#bat) Guillaume camp#bat10 973
+bat_a01,157,308,1 duplicate(Guillaume camp#bat) Guillaume camp#bat11 973
+bat_a01,359,327,1 duplicate(Guillaume camp#bat) Guillaume camp#bat12 973
+bat_a01,350,326,1 duplicate(Guillaume camp#bat) Guillaume camp#bat13 973
+bat_a01,209,344,1 duplicate(Guillaume camp#bat) Guillaume camp#bat14 973
+bat_a01,173,380,1 duplicate(Guillaume camp#bat) Guillaume camp#bat15 973
+bat_a01,150,380,1 duplicate(Guillaume camp#bat) Guillaume camp#bat16 973
+bat_a01,118,357,1 duplicate(Guillaume camp#bat) Guillaume camp#bat17 973
+bat_a01,119,336,1 duplicate(Guillaume camp#bat) Guillaume camp#bat18 973
+
+// Barricades
+// *********************************************************************
+
+- script Guillaume_TV1B -1,{
+ end;
+
+OnBuild:
+ for( set .@i, 0; .@i < 16; set .@i, .@i + 1 )
+ bg_monster 0,"bat_a01",170+.@i,130,"Barricade",1906,"Guillaume_TV1B::OnWall";
+
+ setwall "bat_a01",170,130,16,6,1,"bat_a01_g1";
+ set .MyMobCount,16;
+ end;
+
+OnDestroy:
+ killmonster "bat_a01","Guillaume_TV1B::OnWall";
+ delwall "bat_a01_g1";
+ set .MyMobCount,0;
+ end;
+
+OnWall:
+ if( set(.MyMobCount,.MyMobCount - 1) < 1 )
+ {
+ delwall "bat_a01_g1";
+ mapannounce "bat_a01","South Gate : The Gate has been Destroy!!",1,0xFFA500;
+ }
+ end;
+}
+
+- script Croix_TV1B -1,{
+ end;
+
+OnBuild:
+ for( set .@i, 0; .@i < 16; set .@i, .@i + 1 )
+ bg_monster 0,"bat_a01",186+.@i,266,"Barricade",1906,"Croix_TV1B::OnWall";
+
+ setwall "bat_a01",186,266,16,6,1,"bat_a01_c1";
+ set .MyMobCount,16;
+ end;
+
+OnDestroy:
+ killmonster "bat_a01","Croix_TV1B::OnWall";
+ delwall "bat_a01_c1";
+ set .MyMobCount,0;
+ end;
+
+OnWall:
+ if( set(.MyMobCount,.MyMobCount - 1) < 1 )
+ {
+ delwall "bat_a01_c1";
+ mapannounce "bat_a01","North Gate : A Gate has been Destroy!!",1,0xFFA500;
+ }
+ end;
+}
+
+// Battleground rewards
+// *********************************************************************
+
+bat_a01,45,19,3 script Croix Vintenar#tv1 415,{
+ if( $@TierraBG1_Victory )
+ {
+ if( $@TierraBG1_Victory == Bat_Team )
+ { // Victory
+ set .@Reward, 3;
+ mes "[Swandery]";
+ mes "Blessed Croax!!";
+ mes "Let's enjoy our glorious victory!";
+ mes "" + strcharinfo(0) + ", its a sign reflecting victory";
+ close2;
+ }
+ else
+ { //
+ set .@Reward, 1;
+ mes "[Swandery]";
+ mes "Oh, " + strcharinfo(0) + ". Don't be sad.";
+ mes "Even though we didn't win, we did our best.";
+ mes "This is a Royal gift from Croix, and please don't forget this battle. We can win the next.";
+ close2;
+ }
+
+ set Tierra_BG_Tick, gettimetick(2) + 300;
+ getitem 7828, .@Reward;
+ bg_leave;
+ warp "bat_room",155,150;
+ end;
+ }
+ end;
+}
+
+bat_a01,53,377,3 script Guillaume Vintenar#tv1 419,{
+ if( $@TierraBG1_Victory )
+ {
+ if( $@TierraBG1_Victory == Bat_Team )
+ { // Victory
+ set .@Reward, 3;
+ mes "[Swandery]";
+ mes "Blessed Guillaume!!";
+ mes "Let's enjoy our glorious victory!";
+ mes "" + strcharinfo(0) + ", its a sign reflecting victory";
+ close2;
+ }
+ else
+ { //
+ set .@Reward, 1;
+ mes "[Swandery]";
+ mes "You lost, but you're dedicated to this battle.";
+ mes "This is a reward for your great dedication by Guillaume Marollo!";
+ mes "Just take this defeat a lesson, and later you would definitely learn.";
+ close2;
+ }
+
+ set Tierra_BG_Tick, gettimetick(2) + 300;
+ getitem 7828, .@Reward;
+ bg_leave;
+ warp "bat_room",155,150;
+ end;
+ }
+ end;
+}
+
+// Battleground Therapist
+// *********************************************************************
+
+bat_a01,60,216,3 script Ghost#tv13 950,{
+ mes "[Ghost in valley]";
+ mes "Boo...Boo...";
+ specialeffect2 312;
+ close;
+}
+
+bat_a01,53,377,3 script Therapist in battle#tv12 95,{
+ mes "[Therapist in battle]";
+ mes "Just close your eyes, and take a deep breathe.";
+ mes "You can be free from pain.";
+ specialeffect2 312;
+ close;
+}
+
+bat_a01,45,18,3 script Therapist in battle#tv11 95,{
+ mes "[Therapist in battle]";
+ mes "Just close your eyes, and take a deep breathe.";
+ mes "You can be free from pain.";
+ specialeffect2 312;
+ close;
+}
+
+// Battleground Respawn
+// *********************************************************************
+
+bat_a01,57,213,0 script #ntv1_respawn 139,{
+ end;
+
+OnBGStart:
+ initnpctimer;
+ end;
+
+OnBGStop:
+ stopnpctimer;
+ end;
+
+OnTimer19000:
+ misceffect 83;
+ end;
+
+OnTimer20000:
+ areapercentheal "bat_a01",52,208,61,217,100,100;
+ areawarp "bat_a01",52,208,61,217,"bat_a01",301,208;
+ initnpctimer;
+ end;
+}
+
+bat_a01,50,374,0 script #gtv1_respawn 139,{
+ end;
+
+OnBGStart:
+ initnpctimer;
+ end;
+
+OnBGStop:
+ stopnpctimer;
+ end;
+
+OnTimer24000:
+ misceffect 83;
+ end;
+
+OnTimer25000:
+ areapercentheal "bat_a01",46,370,54,378,100,100;
+ areawarp "bat_a01",46,370,54,378,"bat_a01",354,340;
+ initnpctimer;
+ end;
+}
+
+bat_a01,42,16,0 script #ctv1_respawn 139,{
+ end;
+
+OnBGStart:
+ initnpctimer;
+ end;
+
+OnBGStop:
+ stopnpctimer;
+ end;
+
+OnTimer24000:
+ misceffect 83;
+ end;
+
+OnTimer25000:
+ areapercentheal "bat_a01",38,12,47,21,100,100;
+ areawarp "bat_a01",38,12,47,21,"bat_a01",354,57;
+ initnpctimer;
+ end;
+}
diff --git a/npc/battleground/bg_tierra_02.txt b/npc/battleground/bg_tierra_02.txt
index a69f65e2b..9cc78a4cc 100644
--- a/npc/battleground/bg_tierra_02.txt
+++ b/npc/battleground/bg_tierra_02.txt
@@ -1,488 +1,488 @@
-// ==============================================================================
-// BattleGround System - Tierra Valley 2
-// ==============================================================================
-
-// Registration NPC's
-// *********************************************************************
-
-bat_room,85,97,4 script Registration::TV2R_Guillaume 418,{
- end;
-OnInit:
- waitingroom "Battle Station 10 Players",10,"Tierra_BG2::OnGuillaumeJoin",1;
- end;
-OnEnterBG:
- set $@TierraBG2_id1, waitingroom2bg("bat_a02",50,374,"Tierra_BG2::OnGuillaumeQuit","");
- end;
-}
-
-bat_room,85,74,0 script Registration::TV2R_Croix 414,{
- end;
-OnInit:
- waitingroom "Battle Station 10 Players",10,"Tierra_BG2::OnCroixJoin",1;
- end;
-OnEnterBG:
- set $@TierraBG2_id2, waitingroom2bg("bat_a02",42,16,"Tierra_BG2::OnCroixQuit","");
- end;
-}
-
-// Battleground Engine
-// *********************************************************************
-
-- script Tierra_BG2 -1,{
- end;
-
-OnInit:
- disablenpc "Croix Vintenar#tv2";
- disablenpc "Guillaume Vintenar#tv2";
- disablenpc "Therapist in battle#tv21";
- disablenpc "Therapist in battle#tv22";
- end;
-
-OnGuillaumeQuit:
-OnCroixQuit:
- set BG_Delay_Tick, gettimetick(2) + 1200;
- end;
-
-OnGuillaumeJoin:
-OnCroixJoin:
- if( $@TierraBG2 == 0 )
- donpcevent "Tierra_BG2::OnReadyCheck";
- end;
-
-OnReadyCheck:
- if( $@TierraBG2 )
- end;
- set .@Guillaume, getwaitingroomstate(0,"TV2R_Guillaume");
- set .@Croix, getwaitingroomstate(0,"TV2R_Croix");
-
- if( .@Guillaume < 10 || .@Croix < 10 )
- {
- mapannounce "bat_room","Battleground -- Tierra Valley [80-99] G: " + .@Guillaume + "/10, C: " + .@Croix + "/10",1,0xF4A460;
- end;
- }
-
- set $@TierraBG2, 1;
- donpcevent "TV2R_Croix::OnEnterBG";
- donpcevent "TV2R_Guillaume::OnEnterBG";
- donpcevent "Guillaume_TV2B::OnBuild";
- donpcevent "Croix_TV2B::OnBuild";
- bg_monster $@TierraBG2_id1,"bat_a02",176,345,"Food Depot",1909,"Tierra_BG2::OnGuillaumeBreak";
- bg_monster $@TierraBG2_id2,"bat_a02",167,50,"Food Storage",1910,"Tierra_BG2::OnCroixBreak";
- bg_monster 0,"bat_a02",273,204,"Neutrality Flag",1911,"Tierra_BG2::OnNeutralBreak";
-
- set .Neutral_Base, 0;
- set $@TierraBG2_Victory, 0;
-
- set .Guardian_1, 0;
- set .Guardian_2, 0;
- set .Guardian_3, 0;
-
- enablenpc "Therapist in battle#tv21";
- enablenpc "Therapist in battle#tv22";
- disablenpc "Croix Vintenar#tv2";
- disablenpc "Guillaume Vintenar#tv2";
- // Respawner
- donpcevent "#gtv2_respawn::OnBGStart";
- donpcevent "#ctv2_respawn::OnBGStart";
- donpcevent "#ntv2_respawn::OnBGStart";
- // Warp Teams
- announce "Battleground -- Tierra Valley [80-99] has started!",0,0xF4A460;
- bg_warp $@TierraBG2_id1,"bat_a02",353,344;
- bg_warp $@TierraBG2_id2,"bat_a02",353,52;
- // Final Messages
- sleep 6000;
- mapannounce "bat_a02","Guillaume Vintenar Axl Rose : Let's attack to burn down Croix's food storage",1,0x0000FF;
- sleep 2000;
- mapannounce "bat_a02","Croix Vintenar Swandery : Master of Valhalla! Let us be gifted with unfailing faith and courage",1,0xFF0000;
-
- initnpctimer;
- end;
-
-OnNeutralBreak:
- if( getcharid(4) == $@TierraBG2_id1 )
- {
- mapannounce "bat_a02","Guillaume obtained a neurality banner, so they have an advantage.",1,0x0000FF;
- bg_team_setxy $@TierraBG2_id2,42,16;
- areawarp "bat_a02",52,208,61,217,"bat_a02",42,16;
- }
- else if( getcharid(4) == $@TierraBG2_id2 )
- {
- mapannounce "bat_a02","Croix obtained a neutrality banner, so they have an advantage.",1,0xFF0000;
- bg_team_setxy $@TierraBG2_id1,50,374;
- areawarp "bat_a02",52,208,61,217,"bat_a02",50,374;
- }
- else end;
-
- set .Neutral_Base, getcharid(4);
- bg_team_setxy .Neutral_Base,56,212;
-
- if( .Guardian_1 == 0 )
- set .Guardian_1, bg_monster(.Neutral_Base,"bat_a02",280,233,"Guardian",1949,"Tierra_BG2::OnGuardian1");
- else
- bg_monster_set_team .Guardian_1, .Neutral_Base;
-
- if( .Guardian_2 == 0 )
- set .Guardian_2, bg_monster(.Neutral_Base,"bat_a02",287,203,"Guardian",1950,"Tierra_BG2::OnGuardian2");
- else
- bg_monster_set_team .Guardian_2, .Neutral_Base;
-
- if( .Guardian_3 == 0 )
- set .Guardian_3, bg_monster(.Neutral_Base,"bat_a02",268,204,"Guardian",1949,"Tierra_BG2::OnGuardian3");
- else
- bg_monster_set_team .Guardian_3, .Neutral_Base;
-
- sleep 10000;
- if( $@TierraBG2 != 1 ) end;
-
- if( .Neutral_Base == $@TierraBG2_id1 )
- bg_monster .Neutral_Base,"bat_a02",273,204,"Guillaume Flag",1912,"Tierra_BG2::OnNeutralBreak";
- else if( .Neutral_Base == $@TierraBG2_id2 )
- bg_monster .Neutral_Base,"bat_a02",273,204,"Croix Flag",1913,"Tierra_BG2::OnNeutralBreak";
- end;
-
-OnGuardian1: set .Guardian_1, 0; end;
-OnGuardian2: set .Guardian_2, 0; end;
-OnGuardian3: set .Guardian_3, 0; end;
-
-OnGuillaumeBreak:
- set $@TierraBG2_Victory, 2;
- mapannounce "bat_a02","Croix Vintenar Swandery: We destroyed Guillaume's food storehause. We won that! Wow!",1,0xFF0000;
- donpcevent "Tierra_BG2::OnStop";
- end;
-
-OnCroixBreak:
- set $@TierraBG2_Victory, 1;
- mapannounce "bat_a02","Guillaume Vintenar Axl Rose: We destroyed Croix's food storehause. We won that! Wow!",1,0x0000FF;
- donpcevent "Tierra_BG2::OnStop";
- end;
-
-OnTimer2400000:
- mapannounce "bat_a02","Battle of Tierra Gorge will ends in 5 minutes",1,0xF4A460;
- end;
-OnTimer2640000:
- mapannounce "bat_a02","Battle of Tierra Gorge will ends in 1 minute",1,0xF4A460;
- end;
-
-OnTimer2700000:
- set $@TierraBG2_Victory, 3; // Draw Game
- mapannounce "bat_a02","Battle of Tierra Gorge is over. The time is out, this is a Tie",1,0xF4A460;
- donpcevent "Tierra_BG2::OnStop";
- end;
-
-OnStop:
- set $@TierraBG2, 2;
- disablenpc "Therapist in battle#tv21";
- disablenpc "Therapist in battle#tv22";
- donpcevent "#gtv2_respawn::OnBGStop";
- donpcevent "#ctv2_respawn::OnBGStop";
- donpcevent "#ntv2_respawn::OnBGStop";
- enablenpc "Croix Vintenar#tv2";
- enablenpc "Guillaume Vintenar#tv2";
- killmonster "bat_a02","Tierra_BG2::OnGuillaumeBreak";
- killmonster "bat_a02","Tierra_BG2::OnCroixBreak";
- killmonster "bat_a02","Tierra_BG2::OnNeutralBreak";
- killmonster "bat_a02","Tierra_BG2::OnGuardian1";
- killmonster "bat_a02","Tierra_BG2::OnGuardian2";
- killmonster "bat_a02","Tierra_BG2::OnGuardian3";
- stopnpctimer;
- sleep 3000;
- bg_warp $@TierraBG2_id1,"bat_a02",50,374;
- bg_warp $@TierraBG2_id2,"bat_a02",42,16;
- sleep 3000;
- mapannounce "bat_a02","Battle of Tierra Gorge will close in 1 minute!",1,0xF4A460;
- initnpctimer;
- end;
-
-OnTimer30000:
- if( $@TierraBG2 == 2 )
- mapannounce "bat_a02","Battle of Tierra Valley will close in 30 seconds!",1,0xF4A460;
- end;
-OnTimer50000:
- if( $@TierraBG2 == 2 )
- mapannounce "bat_a02","Battle of Tierra Valley will close in 10 seconds!",1,0xF4A460;
- end;
-
-OnTimer60000:
- if( $@TierraBG2 != 2 )
- end;
-OnReset:
- stopnpctimer;
- set .Neutral_Base, 0;
- disablenpc "Croix Vintenar#tv2";
- disablenpc "Guillaume Vintenar#tv2";
- disablenpc "Therapist in battle#tv21";
- disablenpc "Therapist in battle#tv22";
- donpcevent "#gtv2_respawn::OnBGStop";
- donpcevent "#gtv2_respawn::OnBGStop";
- donpcevent "#ctv2_respawn::OnBGStop";
-
- killmonster "bat_a02","Tierra_BG2::OnGuillaumeBreak";
- killmonster "bat_a02","Tierra_BG2::OnCroixBreak";
- killmonster "bat_a02","Tierra_BG2::OnNeutralBreak";
- killmonster "bat_a02","Tierra_BG2::OnGuardian1";
- killmonster "bat_a02","Tierra_BG2::OnGuardian2";
- killmonster "bat_a02","Tierra_BG2::OnGuardian3";
- donpcevent "Guillaume_TV2B::OnDestroy";
- donpcevent "Croix_TV2B::OnDestroy";
-
- set $@TierraBG2_Victory, 0;
- if( $@TierraBG2_id1 ) { bg_destroy $@TierraBG2_id1; set $@TierraBG2_id1, 0; }
- if( $@TierraBG2_id2 ) { bg_destroy $@TierraBG2_id2; set $@TierraBG2_id2, 0; }
- sleep 1000;
- mapwarp "bat_a02","bat_room",155,150;
- sleep 2000;
- maprespawnguildid "bat_a02",0,3; // Just in case someone else
- sleep 2000;
- set $@TierraBG2, 0;
- donpcevent "Tierra_BG2::OnReadyCheck"; // Maybe a game is ready to start
- end;
-}
-
-// MapFlags
-// *********************************************************************
-
-bat_a02 mapflag battleground
-bat_a02 mapflag nomemo
-bat_a02 mapflag nosave SavePoint
-bat_a02 mapflag noteleport
-bat_a02 mapflag nowarp
-bat_a02 mapflag nowarpto
-bat_a02 mapflag noreturn
-bat_a02 mapflag nobranch
-bat_a02 mapflag nopenalty
-
-// Other Flags
-// *********************************************************************
-
-bat_a02,148,85,1 duplicate(Croix camp#bat) Croix camp#bat22 974
-bat_a02,155,85,1 duplicate(Croix camp#bat) Croix camp#bat23 974
-bat_a02,357,75,1 duplicate(Croix camp#bat) Croix camp#bat24 974
-bat_a02,348,74,1 duplicate(Croix camp#bat) Croix camp#bat25 974
-bat_a02,199,49,1 duplicate(Croix camp#bat) Croix camp#bat26 974
-bat_a02,168,16,1 duplicate(Croix camp#bat) Croix camp#bat27 974
-bat_a02,138,12,1 duplicate(Croix camp#bat) Croix camp#bat28 974
-bat_a02,108,35,1 duplicate(Croix camp#bat) Croix camp#bat29 974
-bat_a02,164,308,1 duplicate(Guillaume camp#bat) Guillaume camp#bat23 973
-bat_a02,157,308,1 duplicate(Guillaume camp#bat) Guillaume camp#bat24 973
-bat_a02,359,327,1 duplicate(Guillaume camp#bat) Guillaume camp#bat25 973
-bat_a02,350,326,1 duplicate(Guillaume camp#bat) Guillaume camp#bat26 973
-bat_a02,209,344,1 duplicate(Guillaume camp#bat) Guillaume camp#bat27 973
-bat_a02,173,380,1 duplicate(Guillaume camp#bat) Guillaume camp#bat28 973
-bat_a02,150,380,1 duplicate(Guillaume camp#bat) Guillaume camp#bat29 973
-bat_a02,118,357,1 duplicate(Guillaume camp#bat) Guillaume camp#bat30 973
-bat_a02,119,336,1 duplicate(Guillaume camp#bat) Guillaume camp#bat31 973
-
-// Barricades
-// *********************************************************************
-
-- script Guillaume_TV2B -1,{
- end;
-
-OnBuild:
- for( set .@i, 0; .@i < 16; set .@i, .@i + 1 )
- bg_monster 0,"bat_a02",170+.@i,130,"Barricade",1906,"Guillaume_TV2B::OnWall";
-
- setwall "bat_a02",170,130,16,6,1,"bat_a02_g1";
- set .MyMobCount,16;
- end;
-
-OnDestroy:
- killmonster "bat_a02","Guillaume_TV2B::OnWall";
- delwall "bat_a02_g1";
- set .MyMobCount,0;
- end;
-
-OnWall:
- if( set(.MyMobCount,.MyMobCount - 1) < 1 )
- {
- delwall "bat_a02_g1";
- mapannounce "bat_a02","South Gate : The Gate has been Destroy!!",1,0xF4A460;
- }
- end;
-}
-
-- script Croix_TV2B -1,{
- end;
-
-OnBuild:
- for( set .@i, 0; .@i < 16; set .@i, .@i + 1 )
- bg_monster 0,"bat_a02",186+.@i,266,"Barricade",1906,"Croix_TV2B::OnWall";
-
- setwall "bat_a02",186,266,16,6,1,"bat_a02_c1";
- set .MyMobCount,16;
- end;
-
-OnDestroy:
- killmonster "bat_a02","Croix_TV2B::OnWall";
- delwall "bat_a02_c1";
- set .MyMobCount,0;
- end;
-
-OnWall:
- if( set(.MyMobCount,.MyMobCount - 1) < 1 )
- {
- delwall "bat_a02_c1";
- mapannounce "bat_a02","North Gate : A Gate has been Destroy!!",1,0xF4A460;
- }
- end;
-}
-
-// Battleground rewards
-// *********************************************************************
-
-bat_a02,45,19,3 script Croix Vintenar#tv2 415,{
- if( $@TierraBG2_Victory )
- {
- if( $@TierraBG2_Victory == Bat_Team )
- { // Victory
- set .@Reward, 3;
- mes "[Swandery]";
- mes "Blessed Croax!!";
- mes "Let's enjoy our glorious victory!";
- mes "" + strcharinfo(0) + ", its a sign reflecting victory";
- close2;
- }
- else
- { //
- set .@Reward, 1;
- mes "[Swandery]";
- mes "Oh, " + strcharinfo(0) + ". Don't be sad.";
- mes "Even though we didn't win, we did our best.";
- mes "This is a Royal gift from Croix, and please don't forget this battle. We can win the next.";
- close2;
- }
-
- set Tierra_BG_Tick, gettimetick(2) + 300;
- getitem 7828, .@Reward;
- bg_leave;
- warp "bat_room",155,150;
- end;
- }
- end;
-}
-
-bat_a02,53,377,3 script Guillaume Vintenar#tv2 419,{
- if( $@TierraBG2_Victory )
- {
- if( $@TierraBG2_Victory == Bat_Team )
- { // Victory
- set .@Reward, 3;
- mes "[Swandery]";
- mes "Blessed Guillaume!!";
- mes "Let's enjoy our glorious victory!";
- mes "" + strcharinfo(0) + ", its a sign reflecting victory";
- close2;
- }
- else
- { //
- set .@Reward, 1;
- mes "[Swandery]";
- mes "You lost, but you're dedicated to this battle.";
- mes "This is a reward for your great dedication by Guillaume Marollo!";
- mes "Just take this defeat a lesson, and later you would definitely learn.";
- close2;
- }
-
- set Tierra_BG_Tick, gettimetick(2) + 300;
- getitem 7828, .@Reward;
- bg_leave;
- warp "bat_room",155,150;
- end;
- }
- end;
-}
-
-// Battleground Therapist
-// *********************************************************************
-
-bat_a02,60,216,3 script Ghost#tv23 950,{
- mes "[Ghost in valley]";
- mes "Boo...Boo...";
- specialeffect2 312;
- close;
-}
-
-bat_a02,53,377,3 script Therapist in battle#tv22 95,{
- mes "[Therapist in battle]";
- mes "Just close your eyes, and take a deep breathe.";
- mes "You can be free from pain.";
- specialeffect2 312;
- close;
-}
-
-bat_a02,45,18,3 script Therapist in battle#tv21 95,{
- mes "[Therapist in battle]";
- mes "Just close your eyes, and take a deep breathe.";
- mes "You can be free from pain.";
- specialeffect2 312;
- close;
-}
-
-// Battleground Respawn
-// *********************************************************************
-
-bat_a02,57,213,0 script #ntv2_respawn 139,{
- end;
-
-OnBGStart:
- initnpctimer;
- end;
-
-OnBGStop:
- stopnpctimer;
- end;
-
-OnTimer19000:
- misceffect 83;
- end;
-
-OnTimer20000:
- areapercentheal "bat_a02",52,208,61,217,100,100;
- areawarp "bat_a02",52,208,61,217,"bat_a02",301,208;
- initnpctimer;
- end;
-}
-
-bat_a02,50,374,0 script #gtv2_respawn 139,{
- end;
-
-OnBGStart:
- initnpctimer;
- end;
-
-OnBGStop:
- stopnpctimer;
- end;
-
-OnTimer24000:
- misceffect 83;
- end;
-
-OnTimer25000:
- areapercentheal "bat_a02",46,370,54,378,100,100;
- areawarp "bat_a02",46,370,54,378,"bat_a02",354,340;
- initnpctimer;
- end;
-}
-
-bat_a02,42,16,0 script #ctv2_respawn 139,{
- end;
-
-OnBGStart:
- initnpctimer;
- end;
-
-OnBGStop:
- stopnpctimer;
- end;
-
-OnTimer24000:
- misceffect 83;
- end;
-
-OnTimer25000:
- areapercentheal "bat_a02",38,12,47,21,100,100;
- areawarp "bat_a02",38,12,47,21,"bat_a02",354,57;
- initnpctimer;
- end;
-}
+// ==============================================================================
+// BattleGround System - Tierra Valley 2
+// ==============================================================================
+
+// Registration NPC's
+// *********************************************************************
+
+bat_room,85,97,4 script Registration::TV2R_Guillaume 418,{
+ end;
+OnInit:
+ waitingroom "Battle Station 10 Players",10,"Tierra_BG2::OnGuillaumeJoin",1;
+ end;
+OnEnterBG:
+ set $@TierraBG2_id1, waitingroom2bg("bat_a02",50,374,"Tierra_BG2::OnGuillaumeQuit","");
+ end;
+}
+
+bat_room,85,74,0 script Registration::TV2R_Croix 414,{
+ end;
+OnInit:
+ waitingroom "Battle Station 10 Players",10,"Tierra_BG2::OnCroixJoin",1;
+ end;
+OnEnterBG:
+ set $@TierraBG2_id2, waitingroom2bg("bat_a02",42,16,"Tierra_BG2::OnCroixQuit","");
+ end;
+}
+
+// Battleground Engine
+// *********************************************************************
+
+- script Tierra_BG2 -1,{
+ end;
+
+OnInit:
+ disablenpc "Croix Vintenar#tv2";
+ disablenpc "Guillaume Vintenar#tv2";
+ disablenpc "Therapist in battle#tv21";
+ disablenpc "Therapist in battle#tv22";
+ end;
+
+OnGuillaumeQuit:
+OnCroixQuit:
+ set BG_Delay_Tick, gettimetick(2) + 1200;
+ end;
+
+OnGuillaumeJoin:
+OnCroixJoin:
+ if( $@TierraBG2 == 0 )
+ donpcevent "Tierra_BG2::OnReadyCheck";
+ end;
+
+OnReadyCheck:
+ if( $@TierraBG2 )
+ end;
+ set .@Guillaume, getwaitingroomstate(0,"TV2R_Guillaume");
+ set .@Croix, getwaitingroomstate(0,"TV2R_Croix");
+
+ if( .@Guillaume < 10 || .@Croix < 10 )
+ {
+ mapannounce "bat_room","Battleground -- Tierra Valley [80-99] G: " + .@Guillaume + "/10, C: " + .@Croix + "/10",1,0xF4A460;
+ end;
+ }
+
+ set $@TierraBG2, 1;
+ donpcevent "TV2R_Croix::OnEnterBG";
+ donpcevent "TV2R_Guillaume::OnEnterBG";
+ donpcevent "Guillaume_TV2B::OnBuild";
+ donpcevent "Croix_TV2B::OnBuild";
+ bg_monster $@TierraBG2_id1,"bat_a02",176,345,"Food Depot",1909,"Tierra_BG2::OnGuillaumeBreak";
+ bg_monster $@TierraBG2_id2,"bat_a02",167,50,"Food Storage",1910,"Tierra_BG2::OnCroixBreak";
+ bg_monster 0,"bat_a02",273,204,"Neutrality Flag",1911,"Tierra_BG2::OnNeutralBreak";
+
+ set .Neutral_Base, 0;
+ set $@TierraBG2_Victory, 0;
+
+ set .Guardian_1, 0;
+ set .Guardian_2, 0;
+ set .Guardian_3, 0;
+
+ enablenpc "Therapist in battle#tv21";
+ enablenpc "Therapist in battle#tv22";
+ disablenpc "Croix Vintenar#tv2";
+ disablenpc "Guillaume Vintenar#tv2";
+ // Respawner
+ donpcevent "#gtv2_respawn::OnBGStart";
+ donpcevent "#ctv2_respawn::OnBGStart";
+ donpcevent "#ntv2_respawn::OnBGStart";
+ // Warp Teams
+ announce "Battleground -- Tierra Valley [80-99] has started!",0,0xF4A460;
+ bg_warp $@TierraBG2_id1,"bat_a02",353,344;
+ bg_warp $@TierraBG2_id2,"bat_a02",353,52;
+ // Final Messages
+ sleep 6000;
+ mapannounce "bat_a02","Guillaume Vintenar Axl Rose : Let's attack to burn down Croix's food storage",1,0x0000FF;
+ sleep 2000;
+ mapannounce "bat_a02","Croix Vintenar Swandery : Master of Valhalla! Let us be gifted with unfailing faith and courage",1,0xFF0000;
+
+ initnpctimer;
+ end;
+
+OnNeutralBreak:
+ if( getcharid(4) == $@TierraBG2_id1 )
+ {
+ mapannounce "bat_a02","Guillaume obtained a neurality banner, so they have an advantage.",1,0x0000FF;
+ bg_team_setxy $@TierraBG2_id2,42,16;
+ areawarp "bat_a02",52,208,61,217,"bat_a02",42,16;
+ }
+ else if( getcharid(4) == $@TierraBG2_id2 )
+ {
+ mapannounce "bat_a02","Croix obtained a neutrality banner, so they have an advantage.",1,0xFF0000;
+ bg_team_setxy $@TierraBG2_id1,50,374;
+ areawarp "bat_a02",52,208,61,217,"bat_a02",50,374;
+ }
+ else end;
+
+ set .Neutral_Base, getcharid(4);
+ bg_team_setxy .Neutral_Base,56,212;
+
+ if( .Guardian_1 == 0 )
+ set .Guardian_1, bg_monster(.Neutral_Base,"bat_a02",280,233,"Guardian",1949,"Tierra_BG2::OnGuardian1");
+ else
+ bg_monster_set_team .Guardian_1, .Neutral_Base;
+
+ if( .Guardian_2 == 0 )
+ set .Guardian_2, bg_monster(.Neutral_Base,"bat_a02",287,203,"Guardian",1950,"Tierra_BG2::OnGuardian2");
+ else
+ bg_monster_set_team .Guardian_2, .Neutral_Base;
+
+ if( .Guardian_3 == 0 )
+ set .Guardian_3, bg_monster(.Neutral_Base,"bat_a02",268,204,"Guardian",1949,"Tierra_BG2::OnGuardian3");
+ else
+ bg_monster_set_team .Guardian_3, .Neutral_Base;
+
+ sleep 10000;
+ if( $@TierraBG2 != 1 ) end;
+
+ if( .Neutral_Base == $@TierraBG2_id1 )
+ bg_monster .Neutral_Base,"bat_a02",273,204,"Guillaume Flag",1912,"Tierra_BG2::OnNeutralBreak";
+ else if( .Neutral_Base == $@TierraBG2_id2 )
+ bg_monster .Neutral_Base,"bat_a02",273,204,"Croix Flag",1913,"Tierra_BG2::OnNeutralBreak";
+ end;
+
+OnGuardian1: set .Guardian_1, 0; end;
+OnGuardian2: set .Guardian_2, 0; end;
+OnGuardian3: set .Guardian_3, 0; end;
+
+OnGuillaumeBreak:
+ set $@TierraBG2_Victory, 2;
+ mapannounce "bat_a02","Croix Vintenar Swandery: We destroyed Guillaume's food storehause. We won that! Wow!",1,0xFF0000;
+ donpcevent "Tierra_BG2::OnStop";
+ end;
+
+OnCroixBreak:
+ set $@TierraBG2_Victory, 1;
+ mapannounce "bat_a02","Guillaume Vintenar Axl Rose: We destroyed Croix's food storehause. We won that! Wow!",1,0x0000FF;
+ donpcevent "Tierra_BG2::OnStop";
+ end;
+
+OnTimer2400000:
+ mapannounce "bat_a02","Battle of Tierra Gorge will ends in 5 minutes",1,0xF4A460;
+ end;
+OnTimer2640000:
+ mapannounce "bat_a02","Battle of Tierra Gorge will ends in 1 minute",1,0xF4A460;
+ end;
+
+OnTimer2700000:
+ set $@TierraBG2_Victory, 3; // Draw Game
+ mapannounce "bat_a02","Battle of Tierra Gorge is over. The time is out, this is a Tie",1,0xF4A460;
+ donpcevent "Tierra_BG2::OnStop";
+ end;
+
+OnStop:
+ set $@TierraBG2, 2;
+ disablenpc "Therapist in battle#tv21";
+ disablenpc "Therapist in battle#tv22";
+ donpcevent "#gtv2_respawn::OnBGStop";
+ donpcevent "#ctv2_respawn::OnBGStop";
+ donpcevent "#ntv2_respawn::OnBGStop";
+ enablenpc "Croix Vintenar#tv2";
+ enablenpc "Guillaume Vintenar#tv2";
+ killmonster "bat_a02","Tierra_BG2::OnGuillaumeBreak";
+ killmonster "bat_a02","Tierra_BG2::OnCroixBreak";
+ killmonster "bat_a02","Tierra_BG2::OnNeutralBreak";
+ killmonster "bat_a02","Tierra_BG2::OnGuardian1";
+ killmonster "bat_a02","Tierra_BG2::OnGuardian2";
+ killmonster "bat_a02","Tierra_BG2::OnGuardian3";
+ stopnpctimer;
+ sleep 3000;
+ bg_warp $@TierraBG2_id1,"bat_a02",50,374;
+ bg_warp $@TierraBG2_id2,"bat_a02",42,16;
+ sleep 3000;
+ mapannounce "bat_a02","Battle of Tierra Gorge will close in 1 minute!",1,0xF4A460;
+ initnpctimer;
+ end;
+
+OnTimer30000:
+ if( $@TierraBG2 == 2 )
+ mapannounce "bat_a02","Battle of Tierra Valley will close in 30 seconds!",1,0xF4A460;
+ end;
+OnTimer50000:
+ if( $@TierraBG2 == 2 )
+ mapannounce "bat_a02","Battle of Tierra Valley will close in 10 seconds!",1,0xF4A460;
+ end;
+
+OnTimer60000:
+ if( $@TierraBG2 != 2 )
+ end;
+OnReset:
+ stopnpctimer;
+ set .Neutral_Base, 0;
+ disablenpc "Croix Vintenar#tv2";
+ disablenpc "Guillaume Vintenar#tv2";
+ disablenpc "Therapist in battle#tv21";
+ disablenpc "Therapist in battle#tv22";
+ donpcevent "#gtv2_respawn::OnBGStop";
+ donpcevent "#gtv2_respawn::OnBGStop";
+ donpcevent "#ctv2_respawn::OnBGStop";
+
+ killmonster "bat_a02","Tierra_BG2::OnGuillaumeBreak";
+ killmonster "bat_a02","Tierra_BG2::OnCroixBreak";
+ killmonster "bat_a02","Tierra_BG2::OnNeutralBreak";
+ killmonster "bat_a02","Tierra_BG2::OnGuardian1";
+ killmonster "bat_a02","Tierra_BG2::OnGuardian2";
+ killmonster "bat_a02","Tierra_BG2::OnGuardian3";
+ donpcevent "Guillaume_TV2B::OnDestroy";
+ donpcevent "Croix_TV2B::OnDestroy";
+
+ set $@TierraBG2_Victory, 0;
+ if( $@TierraBG2_id1 ) { bg_destroy $@TierraBG2_id1; set $@TierraBG2_id1, 0; }
+ if( $@TierraBG2_id2 ) { bg_destroy $@TierraBG2_id2; set $@TierraBG2_id2, 0; }
+ sleep 1000;
+ mapwarp "bat_a02","bat_room",155,150;
+ sleep 2000;
+ maprespawnguildid "bat_a02",0,3; // Just in case someone else
+ sleep 2000;
+ set $@TierraBG2, 0;
+ donpcevent "Tierra_BG2::OnReadyCheck"; // Maybe a game is ready to start
+ end;
+}
+
+// MapFlags
+// *********************************************************************
+
+bat_a02 mapflag battleground
+bat_a02 mapflag nomemo
+bat_a02 mapflag nosave SavePoint
+bat_a02 mapflag noteleport
+bat_a02 mapflag nowarp
+bat_a02 mapflag nowarpto
+bat_a02 mapflag noreturn
+bat_a02 mapflag nobranch
+bat_a02 mapflag nopenalty
+
+// Other Flags
+// *********************************************************************
+
+bat_a02,148,85,1 duplicate(Croix camp#bat) Croix camp#bat22 974
+bat_a02,155,85,1 duplicate(Croix camp#bat) Croix camp#bat23 974
+bat_a02,357,75,1 duplicate(Croix camp#bat) Croix camp#bat24 974
+bat_a02,348,74,1 duplicate(Croix camp#bat) Croix camp#bat25 974
+bat_a02,199,49,1 duplicate(Croix camp#bat) Croix camp#bat26 974
+bat_a02,168,16,1 duplicate(Croix camp#bat) Croix camp#bat27 974
+bat_a02,138,12,1 duplicate(Croix camp#bat) Croix camp#bat28 974
+bat_a02,108,35,1 duplicate(Croix camp#bat) Croix camp#bat29 974
+bat_a02,164,308,1 duplicate(Guillaume camp#bat) Guillaume camp#bat23 973
+bat_a02,157,308,1 duplicate(Guillaume camp#bat) Guillaume camp#bat24 973
+bat_a02,359,327,1 duplicate(Guillaume camp#bat) Guillaume camp#bat25 973
+bat_a02,350,326,1 duplicate(Guillaume camp#bat) Guillaume camp#bat26 973
+bat_a02,209,344,1 duplicate(Guillaume camp#bat) Guillaume camp#bat27 973
+bat_a02,173,380,1 duplicate(Guillaume camp#bat) Guillaume camp#bat28 973
+bat_a02,150,380,1 duplicate(Guillaume camp#bat) Guillaume camp#bat29 973
+bat_a02,118,357,1 duplicate(Guillaume camp#bat) Guillaume camp#bat30 973
+bat_a02,119,336,1 duplicate(Guillaume camp#bat) Guillaume camp#bat31 973
+
+// Barricades
+// *********************************************************************
+
+- script Guillaume_TV2B -1,{
+ end;
+
+OnBuild:
+ for( set .@i, 0; .@i < 16; set .@i, .@i + 1 )
+ bg_monster 0,"bat_a02",170+.@i,130,"Barricade",1906,"Guillaume_TV2B::OnWall";
+
+ setwall "bat_a02",170,130,16,6,1,"bat_a02_g1";
+ set .MyMobCount,16;
+ end;
+
+OnDestroy:
+ killmonster "bat_a02","Guillaume_TV2B::OnWall";
+ delwall "bat_a02_g1";
+ set .MyMobCount,0;
+ end;
+
+OnWall:
+ if( set(.MyMobCount,.MyMobCount - 1) < 1 )
+ {
+ delwall "bat_a02_g1";
+ mapannounce "bat_a02","South Gate : The Gate has been Destroy!!",1,0xF4A460;
+ }
+ end;
+}
+
+- script Croix_TV2B -1,{
+ end;
+
+OnBuild:
+ for( set .@i, 0; .@i < 16; set .@i, .@i + 1 )
+ bg_monster 0,"bat_a02",186+.@i,266,"Barricade",1906,"Croix_TV2B::OnWall";
+
+ setwall "bat_a02",186,266,16,6,1,"bat_a02_c1";
+ set .MyMobCount,16;
+ end;
+
+OnDestroy:
+ killmonster "bat_a02","Croix_TV2B::OnWall";
+ delwall "bat_a02_c1";
+ set .MyMobCount,0;
+ end;
+
+OnWall:
+ if( set(.MyMobCount,.MyMobCount - 1) < 1 )
+ {
+ delwall "bat_a02_c1";
+ mapannounce "bat_a02","North Gate : A Gate has been Destroy!!",1,0xF4A460;
+ }
+ end;
+}
+
+// Battleground rewards
+// *********************************************************************
+
+bat_a02,45,19,3 script Croix Vintenar#tv2 415,{
+ if( $@TierraBG2_Victory )
+ {
+ if( $@TierraBG2_Victory == Bat_Team )
+ { // Victory
+ set .@Reward, 3;
+ mes "[Swandery]";
+ mes "Blessed Croax!!";
+ mes "Let's enjoy our glorious victory!";
+ mes "" + strcharinfo(0) + ", its a sign reflecting victory";
+ close2;
+ }
+ else
+ { //
+ set .@Reward, 1;
+ mes "[Swandery]";
+ mes "Oh, " + strcharinfo(0) + ". Don't be sad.";
+ mes "Even though we didn't win, we did our best.";
+ mes "This is a Royal gift from Croix, and please don't forget this battle. We can win the next.";
+ close2;
+ }
+
+ set Tierra_BG_Tick, gettimetick(2) + 300;
+ getitem 7828, .@Reward;
+ bg_leave;
+ warp "bat_room",155,150;
+ end;
+ }
+ end;
+}
+
+bat_a02,53,377,3 script Guillaume Vintenar#tv2 419,{
+ if( $@TierraBG2_Victory )
+ {
+ if( $@TierraBG2_Victory == Bat_Team )
+ { // Victory
+ set .@Reward, 3;
+ mes "[Swandery]";
+ mes "Blessed Guillaume!!";
+ mes "Let's enjoy our glorious victory!";
+ mes "" + strcharinfo(0) + ", its a sign reflecting victory";
+ close2;
+ }
+ else
+ { //
+ set .@Reward, 1;
+ mes "[Swandery]";
+ mes "You lost, but you're dedicated to this battle.";
+ mes "This is a reward for your great dedication by Guillaume Marollo!";
+ mes "Just take this defeat a lesson, and later you would definitely learn.";
+ close2;
+ }
+
+ set Tierra_BG_Tick, gettimetick(2) + 300;
+ getitem 7828, .@Reward;
+ bg_leave;
+ warp "bat_room",155,150;
+ end;
+ }
+ end;
+}
+
+// Battleground Therapist
+// *********************************************************************
+
+bat_a02,60,216,3 script Ghost#tv23 950,{
+ mes "[Ghost in valley]";
+ mes "Boo...Boo...";
+ specialeffect2 312;
+ close;
+}
+
+bat_a02,53,377,3 script Therapist in battle#tv22 95,{
+ mes "[Therapist in battle]";
+ mes "Just close your eyes, and take a deep breathe.";
+ mes "You can be free from pain.";
+ specialeffect2 312;
+ close;
+}
+
+bat_a02,45,18,3 script Therapist in battle#tv21 95,{
+ mes "[Therapist in battle]";
+ mes "Just close your eyes, and take a deep breathe.";
+ mes "You can be free from pain.";
+ specialeffect2 312;
+ close;
+}
+
+// Battleground Respawn
+// *********************************************************************
+
+bat_a02,57,213,0 script #ntv2_respawn 139,{
+ end;
+
+OnBGStart:
+ initnpctimer;
+ end;
+
+OnBGStop:
+ stopnpctimer;
+ end;
+
+OnTimer19000:
+ misceffect 83;
+ end;
+
+OnTimer20000:
+ areapercentheal "bat_a02",52,208,61,217,100,100;
+ areawarp "bat_a02",52,208,61,217,"bat_a02",301,208;
+ initnpctimer;
+ end;
+}
+
+bat_a02,50,374,0 script #gtv2_respawn 139,{
+ end;
+
+OnBGStart:
+ initnpctimer;
+ end;
+
+OnBGStop:
+ stopnpctimer;
+ end;
+
+OnTimer24000:
+ misceffect 83;
+ end;
+
+OnTimer25000:
+ areapercentheal "bat_a02",46,370,54,378,100,100;
+ areawarp "bat_a02",46,370,54,378,"bat_a02",354,340;
+ initnpctimer;
+ end;
+}
+
+bat_a02,42,16,0 script #ctv2_respawn 139,{
+ end;
+
+OnBGStart:
+ initnpctimer;
+ end;
+
+OnBGStop:
+ stopnpctimer;
+ end;
+
+OnTimer24000:
+ misceffect 83;
+ end;
+
+OnTimer25000:
+ areapercentheal "bat_a02",38,12,47,21,100,100;
+ areawarp "bat_a02",38,12,47,21,"bat_a02",354,57;
+ initnpctimer;
+ end;
+}
diff --git a/npc/cities/moscovia.txt b/npc/cities/moscovia.txt
index 8f23acdad..456ce2851 100644
--- a/npc/cities/moscovia.txt
+++ b/npc/cities/moscovia.txt
@@ -1,136 +1,136 @@
-//===== eAthena Script =======================================
-//= Moscovia Town
-//===== By: ==================================================
-//= Kisuka
-//===== Current Version: =====================================
-//= 1.1
-//===== Compatible With: =====================================
-//= eAthena SVN
-//===== Description: =========================================
-//= Moscovia Town Script
-//===== Additional Comments: =================================
-//= 1.0 First Version. [Kisuka]
-//= 1.1 Removed villagers (they are part of a quest). [Kisuka]
-//============================================================
-
-// Moscovia Transportation
-//============================================================
-alberta,245,66,4 script Moscovia P.R. Officer#1 960,{
- mes "[Moscovia P.R. Officer]";
- mes "Moscovia! Do you know Moscovia?";
- mes "the paradise spreading on the endless seas...";
- mes "Welcome to Moscovia";
- mes "It's adventurous and mystic.";
- next;
- switch(select("About Moscovia...:Go to Moscovia.:Cancel")) {
- case 1:
- mes "[Moscovia P.R. Officer]";
- mes "Moscovia is a beautiful kingdom";
- mes "on an island located north of Rune";
- mes "Midgarts.";
- next;
- mes "[Moscovia P.R. Officer]";
- mes "I'm sure that you will be";
- mes "absolutely fascinated";
- mes "by Moscovia's beautiful scenery";
- mes "and gorgeous palace.";
- next;
- mes "[Moscovia P.R. Officer]";
- mes "Now that our long winter has";
- mes "passed,";
- mes "I'm happy that I can now show you";
- mes "our gorgeous hometown.";
- next;
- mes "[Moscovia P.R. Officer]";
- mes "If you feel like visiting Moscovia";
- mes "take the chance now!";
- mes "I'll help you to have a nice trip";
- mes "to Moscovia!";
- close;
-
- case 2:
- mes "[Moscovia P.R. Officer]";
- mes "Ok then, let us start now.";
- mes "You should pay me 10,000 zeny";
- mes "to go to Moscovia.";
- mes "But when you come back,";
- mes "you don't have to pay.";
- next;
- mes "[Moscovia P.R. Officer]";
- mes "Can we leave now?";
- next;
- if (select("Let's go!:Cancel") == 2) {
- mes "[Moscovia P.R. Officer]";
- mes "If you're too busy now,";
- mes "please tell me again whenever you want.";
- mes "I'm always ready to guide anyone to Moscovia.";
- close;
- }
- if (Zeny < 10000) {
- mes "[Moscovia P.R. Officer]";
- mes "I'm sorry but you don't have";
- mes "enough zeny now";
- mes "You need 10,000 zeny";
- mes "to go to Moscovia";
- mes "Thank you.";
- close;
- }else{
- mes "[Moscovia P.R. Officer]";
- mes "Ok then, we're leaving now.";
- close2;
- set Zeny,Zeny - 10000;
- warp "moscovia",163,55;
- end;
- }
- case 3:
- mes "[Moscovia P.R. Officer]";
- mes "If you're too busy now,";
- mes "please tell me again whenever you want.";
- mes "I'm always ready to guide anyone to Moscovia.";
- close;
- }
-}
-
-moscovia,166,53,4 script Moscovia P.R. Officer#2 960,{
- mes "[Moscovia P.R. Officer]";
- mes "How was your trip?";
- mes "Do you have good memories from Moscovia?";
- mes "A ship is now leaving";
- mes "for Rune Midgarts.";
- next;
- if (select("Return to Alberta:Cancel") == 2) {
- mes "[Moscovia P.R. Officer]";
- mes "If you want to see more";
- mes "please take your time.";
- close;
- }
- mes "[Moscovia P.R. Officer]";
- mes "Please come and visit soon.";
- mes "Ok then, Let's get going.";
- close2;
- warp "alberta",243,67;
- end;
-}
-
-// Generic Moscovia NPCs
-//============================================================
-moscovia,253,166,4 script Soldier#mosk1 966,{
- mes "[Soldier]";
- mes "Our dear Csar Alexsay III is in the palace.";
- mes "He rules over Moscovia.";
- mes "Please be careful not to cause him any trouble.";
- close;
-}
-
-// Moscovia Palace
-//============================================================
-- script Soldier#mosk::MoscSoldier 966,{
- mes "[Soldier]";
- mes "Please be silent or the Csar will be angry.";
- close;
-}
-
-mosk_in,118,66,5 duplicate(MoscSoldier) Soldier#mosk02 966
-mosk_in,133,110,3 duplicate(MoscSoldier) Soldier#mosk03 966
-mosk_in,133,73,3 duplicate(MoscSoldier) Soldier#mosk04 966
+//===== eAthena Script =======================================
+//= Moscovia Town
+//===== By: ==================================================
+//= Kisuka
+//===== Current Version: =====================================
+//= 1.1
+//===== Compatible With: =====================================
+//= eAthena SVN
+//===== Description: =========================================
+//= Moscovia Town Script
+//===== Additional Comments: =================================
+//= 1.0 First Version. [Kisuka]
+//= 1.1 Removed villagers (they are part of a quest). [Kisuka]
+//============================================================
+
+// Moscovia Transportation
+//============================================================
+alberta,245,66,4 script Moscovia P.R. Officer#1 960,{
+ mes "[Moscovia P.R. Officer]";
+ mes "Moscovia! Do you know Moscovia?";
+ mes "the paradise spreading on the endless seas...";
+ mes "Welcome to Moscovia";
+ mes "It's adventurous and mystic.";
+ next;
+ switch(select("About Moscovia...:Go to Moscovia.:Cancel")) {
+ case 1:
+ mes "[Moscovia P.R. Officer]";
+ mes "Moscovia is a beautiful kingdom";
+ mes "on an island located north of Rune";
+ mes "Midgarts.";
+ next;
+ mes "[Moscovia P.R. Officer]";
+ mes "I'm sure that you will be";
+ mes "absolutely fascinated";
+ mes "by Moscovia's beautiful scenery";
+ mes "and gorgeous palace.";
+ next;
+ mes "[Moscovia P.R. Officer]";
+ mes "Now that our long winter has";
+ mes "passed,";
+ mes "I'm happy that I can now show you";
+ mes "our gorgeous hometown.";
+ next;
+ mes "[Moscovia P.R. Officer]";
+ mes "If you feel like visiting Moscovia";
+ mes "take the chance now!";
+ mes "I'll help you to have a nice trip";
+ mes "to Moscovia!";
+ close;
+
+ case 2:
+ mes "[Moscovia P.R. Officer]";
+ mes "Ok then, let us start now.";
+ mes "You should pay me 10,000 zeny";
+ mes "to go to Moscovia.";
+ mes "But when you come back,";
+ mes "you don't have to pay.";
+ next;
+ mes "[Moscovia P.R. Officer]";
+ mes "Can we leave now?";
+ next;
+ if (select("Let's go!:Cancel") == 2) {
+ mes "[Moscovia P.R. Officer]";
+ mes "If you're too busy now,";
+ mes "please tell me again whenever you want.";
+ mes "I'm always ready to guide anyone to Moscovia.";
+ close;
+ }
+ if (Zeny < 10000) {
+ mes "[Moscovia P.R. Officer]";
+ mes "I'm sorry but you don't have";
+ mes "enough zeny now";
+ mes "You need 10,000 zeny";
+ mes "to go to Moscovia";
+ mes "Thank you.";
+ close;
+ }else{
+ mes "[Moscovia P.R. Officer]";
+ mes "Ok then, we're leaving now.";
+ close2;
+ set Zeny,Zeny - 10000;
+ warp "moscovia",163,55;
+ end;
+ }
+ case 3:
+ mes "[Moscovia P.R. Officer]";
+ mes "If you're too busy now,";
+ mes "please tell me again whenever you want.";
+ mes "I'm always ready to guide anyone to Moscovia.";
+ close;
+ }
+}
+
+moscovia,166,53,4 script Moscovia P.R. Officer#2 960,{
+ mes "[Moscovia P.R. Officer]";
+ mes "How was your trip?";
+ mes "Do you have good memories from Moscovia?";
+ mes "A ship is now leaving";
+ mes "for Rune Midgarts.";
+ next;
+ if (select("Return to Alberta:Cancel") == 2) {
+ mes "[Moscovia P.R. Officer]";
+ mes "If you want to see more";
+ mes "please take your time.";
+ close;
+ }
+ mes "[Moscovia P.R. Officer]";
+ mes "Please come and visit soon.";
+ mes "Ok then, Let's get going.";
+ close2;
+ warp "alberta",243,67;
+ end;
+}
+
+// Generic Moscovia NPCs
+//============================================================
+moscovia,253,166,4 script Soldier#mosk1 966,{
+ mes "[Soldier]";
+ mes "Our dear Csar Alexsay III is in the palace.";
+ mes "He rules over Moscovia.";
+ mes "Please be careful not to cause him any trouble.";
+ close;
+}
+
+// Moscovia Palace
+//============================================================
+- script Soldier#mosk::MoscSoldier 966,{
+ mes "[Soldier]";
+ mes "Please be silent or the Csar will be angry.";
+ close;
+}
+
+mosk_in,118,66,5 duplicate(MoscSoldier) Soldier#mosk02 966
+mosk_in,133,110,3 duplicate(MoscSoldier) Soldier#mosk03 966
+mosk_in,133,73,3 duplicate(MoscSoldier) Soldier#mosk04 966
mosk_in,113,124,5 duplicate(MoscSoldier) Soldier#mosk05 966 \ No newline at end of file
diff --git a/npc/events/MemorialDay_2008.txt b/npc/events/MemorialDay_2008.txt
index cf8eaa8ad..cbecbdae8 100644
--- a/npc/events/MemorialDay_2008.txt
+++ b/npc/events/MemorialDay_2008.txt
@@ -1,518 +1,518 @@
-//===== eAthena Script =======================================
-//= In Memory of Heroes (iRO Memorial Day 2008)
-//===== By: ==================================================
-//= Kisuka
-//===== Current Version: =====================================
-//= 1.1
-//===== Compatible With: =====================================
-//= eAthena SVN
-//===== Description: =========================================
-//
-//===== Additional Comments: =================================
-//= 1.0 First version. [Kisuka]
-//= 1.1 Many Many Fixes. [Kisuka]
-//============================================================
-
-// ================== Lauds ======================
-// ===============================================
-prontera,182,214,4 script Lauds#Memorial 58,{
- if(Memorial08 < 1) {
- mes "[Mad Sago Lauds]";
- mes "Hey, yo!";
- mes "What are you doing there!?";
- next;
- mes "[Mad Sago Lauds]";
- mes "Do you know what day it is!?";
- mes "It's a very important date!";
- mes "A very important date to remember!";
- next;
- mes "[Mad Sago Lauds]";
- mes "What is this!?";
- emotion 0;
- next;
- mes "[Mad Sago Lauds]";
- mes "Where is your towel!?";
- next;
- mes "[" + strcharinfo(0) + "]";
- mes "My what?";
- next;
- mes "[Mad Sago Lauds]";
- mes "How are you supposed to go on your trip";
- mes "without your towel!?";
- next;
- mes "[Mad Sago Lauds]";
- mes "If you think this is just another";
- mes "holiday,";
- mes "I'm not going to waste my breath.";
- mes "But if you like to pay a tribute to";
- mes "great soldiers,";
- mes "I will help you ready yourself";
- next;
- if (select("I guess so...:Are you crazy or something?") == 2) {
- mes "[Mad Sago Lauds]";
- mes "Fine, be unprepared!";
- next;
- mes "[Mad Sago Lauds]";
- mes "";
- mes "^FF0000YOU WILL RUE THE DAY!^000000";
- close;
- }
- mes "[Mad Sago Lauds]";
- mes "Great!";
- mes "Then listen to me carefully.";
- next;
- mes "[Mad Sago Lauds]";
- mes "Now before you can pay tribute to";
- mes "the fallen soldiers";
- mes "you must be properly equipped";
- mes "Without your towel you will be";
- mes "lost!";
- mes "If you bring me the materials, I can make you a towel.";
- next;
- mes "[Mad Sago Lauds]";
- mes "Listen closely.";
- mes "Bring me ^FF000030 Fabric and 20 Fluffs^000000.";
- set Memorial08,1;
- close;
- }
-
- else if(Memorial08 == 1) {
- if (countitem(1059) < 30 || countitem(914) < 20) {
- mes "[Mad Sago Lauds]";
- mes "What are these? They aren't";
- mes "enough?!";
- mes "*Sigh* Do I really have to tell you";
- mes "again?!";
- mes "Bring me ^FF000030 Fabric and 20 Fluffs^000000.";
- close;
- }else{
- mes "***Mad Sago Lauds appears to be";
- mes "muttering to himself***";
- next;
- mes "[Mad Sago Lauds]";
- mes "So, did you bring the towel";
- mes "materials?";
- next;
- mes "[Mad Sago Lauds]";
- mes "Excellent; you've brought them";
- mes "all.";
- mes "Then I shall make you a Towel of";
- mes "Memory as I promised.";
- mes "Give me a moment.";
- next;
- mes "[Mad Sago Lauds]";
- mes "There you go!";
- delitem 1059,30;
- delitem 914,20;
- getitem 6025,1;
- getnameditem 6025," + strcharinfo(0) + ";
- set Memorial08,2;
- close;
- }
- }
-
- else if(Memorial08 == 2) {
- mes "[Mad Sago Lauds]";
- mes "Ah, you have fluffy new towel now";
- mes "I even put your name on it";
- next;
- mes "[Mad Sago Lauds]";
- mes "Say, how do you like to go";
- mes "on a journey to pay a tribute to";
- mes "Memorial Day?";
- next;
- if (select("Sure.:No, I'm Busy.") == 2) {
- mes "[Mad Sago Lauds]";
- mes "Don't come crying to me";
- mes "if someone decides to";
- mes "build a highway through";
- mes "your home!";
- close;
- }
- mes "[Mad Sago Lauds]";
- mes "Good. By the way, do you even know";
- mes "what the towel is for?";
- next;
- mes "[Mad Sago Lauds]";
- mes "It seems you're just carrying it";
- mes "without understanding its meaning.";
- mes "What a shame! You should go speak";
- mes "to ^FF0000Grast in Prontera^000000.";
- set Memorial08,3;
- close;
- }
-
- else if(Memorial08 == 3) {
- mes "[Mad Sago Lauds]";
- mes "What are you still doing here? I";
- mes "told you to go speak to Grast in";
- mes "Prontera!";
- close;
- }
-
- else if(Memorial08 == 4 || Memorial08 == 5 || Memorial08 == 6) {
- mes "[Mad Sago Lauds]";
- mes "Go help Grast, and then come back.";
- close;
- }
-
- else if(Memorial08 == 7) {
- mes "[Mad Sago Lauds]";
- mes "Oh, you've brought them all.";
- mes "Hahaha!";
- mes "HAHAHAHAHAHA!!!! cough cough";
- next;
- mes "[Mad Sago Lauds]";
- mes "Please give them to me. Thank you";
- mes "for your hard work, by the way.";
- mes "Say, have you learned anything from the journey?";
- mes "Now is to go visit the plaque at 12";
- mes "o'clock direction in Prontera.";
- next;
- mes "[Mad Sago Lauds]";
- mes "What do you mean you were just";
- mes "there?";
- next;
- mes "[Mad Sago Lauds]";
- mes "What? Why are you giving me your";
- mes "garbage!";
- mes "Those items are not useful to me at all";
- mes "You should be going to the plaque!";
- set Memorial08,8;
- close;
- }
-
- else if(Memorial08 == 8) {
- mes "[Mad Sago Lauds]";
- mes "Stop trying to give me your garbage!";
- mes "Go to the plaque at 12 o'clock";
- mes "direction in Prontera for your journey!";
- close;
- }
-
- else if(Memorial08 >= 9) {
- set .@RandomMsg, rand(1,5);
- if(.@RandomMsg == 1) {
- mes "[Mad Sago Lauds]";
- mes "Don't panic!";
- emotion 0;
- close;
- }
- else if(.@RandomMsg == 2) {
- mes "[Mad Sago Lauds]";
- mes "Life... is like a grapefruit.";
- mes "It's orange and squishy, and has a";
- mes "few pips in it,";
- mes "and some folks have half a one for";
- mes "breakfast.";
- close;
- }
- else if(.@RandomMsg == 3) {
- mes "[Mad Sago Lauds]";
- mes "There was a point to this story,";
- mes "but it has temporarily escaped the";
- mes "chronicler's mind.";
- close;
- }
- else if(.@RandomMsg == 4) {
- mes "[Mad Sago Lauds]";
- mes "42!";
- close;
- }
- else if(.@RandomMsg == 5) {
- mes "[Mad Sago Lauds]";
- mes "It is a mistake to think you can";
- mes "solve any major problems just with";
- mes "potatoes.";
- close;
- }
- }
-}
-
-// ============== Memorial Plaque ================
-// ===============================================
-prontera,153,286,4 script Memorial Plaque#Memorial 857,{
- if(Memorial08 < 8) {
- mes "[" + strcharinfo(0) + "]";
- mes "- It's a dusty old plaque.-";
- close;
- }
-
- else if(Memorial08 == 8) {
- mes "[" + strcharinfo(0) + "]";
- mes "- It's a dusty old plaque.-";
- mes "'This must be what Lauds was talking about.'";
- mes "'Let's dust it off with the towel.'";
- next;
- set Memorial08,9;
- getexp 93750,43750;
- goto L_CleanPlaque;
- }
-
- else if(Memorial08 >= 9) {
- goto L_CleanPlaque;
- }
-
- L_CleanPlaque:
- mes "- You see a message from the cleaned plaque.";
- next;
- mes "-Although no sculptured marble";
- mes "should rise to their memory,-";
- mes "-nor engraved stone bear record of";
- mes "their deeds,-";
- mes "-yet will their remembrance be as";
- mes "lasting as the land they honored.-";
- mes "-Daniel Webster-";
- if(Memorial08 == 9) {
- getexp 93750,43750;
- }
- next;
- mes "-There's another message.-";
- next;
- mes "-I may not have gone where I";
- mes "intended to go,-";
- mes "-but I think I have ended up where";
- mes "I needed to be.-";
- mes "- Douglas Adams.-";
- if(Memorial08 == 9) {
- getexp 93750,43750;
- }
- next;
- mes "-This is the last message.-";
- next;
- mes "-True heroism is remarkably sober,";
- mes "very undramatic.-";
- mes "-It is not the urge to surpass all";
- mes "others at whatever cost,-";
- mes "- but the urge to serve others at";
- mes "whatever cost. -";
- mes "- Arthur Ashe -";
- if(Memorial08 == 9) {
- getexp 93750,43750;
- set Memorial08,10;
- }
- close;
-}
-
-
-// ==================== Grast ====================
-// ===============================================
-prontera,150,270,4 script Grast#Memorial 900,{
- if(Memorial08 < 3) {
- mes "[Grast]";
- mes "Memorial Day is a sad and yet";
- mes "glorious day.";
- mes "I wonder how many people remember";
- mes "them...";
- close;
- }
-
- else if(Memorial08 == 3) {
- mes "[Grast]";
- mes "Oh, isn't that a Towel of Memory?";
- mes "I'm so glad to meet someone who";
- mes "understands the meaning of Memorial Day.";
- next;
- mes "[Grast]";
- mes "It is very important to know what";
- mes "we're celebrating today, don't you think?";
- next;
- mes "[Grast]";
- mes "If you like to go on a journey to";
- mes "pay a tribute to Memorial Day,";
- mes "you should bring me some materials";
- mes "I ask.";
- next;
- mes "[Grast]";
- mes "Please bring me ^FF0000one of each Red";
- mes "Potion, Green Potion, Awakening";
- mes "Potion, and Butterfly Wing^000000.";
- mes "I'll be waiting for your return.";
- set Memorial08,4;
- close;
- }
-
- else if(Memorial08 == 4) {
- if (countitem(501) < 1 || countitem(506) < 1 || countitem(656) < 1 || countitem(602) < 1) {
- mes "[Grast]";
- mes "Oops, you haven't brought all";
- mes "materials.";
- mes "Please make sure you need to bring me";
- mes " ^FF0000one of each Red Potion, Green";
- mes "Potion, Awakening Potion, and";
- mes "Butteryfly Wing^000000.";
- next;
- mes "[Grast]";
- mes "You'll have to bring me more";
- mes "materials afterwards.";
- mes "If you feel too burdened to gather";
- mes "them all,";
- mes "I can provide you all the";
- mes "materials.";
- next;
- if (select("I'll gather the rest.:Give me the materials.") == 2) {
- goto L_GiveUp;
- }
- goto L_Continue;
- }else{
- mes "[Grast]";
- mes "Oh, you've brought the materials I asked.";
- next;
- mes "[Grast]";
- mes "Hmm, you will need some more things still...";
- next;
- mes "[Grast]";
- mes "Please bring me ^FF0000one of each Trap,";
- mes "Yggdrasil Leaf, Blue Gemstone,";
- mes "Crystal Mirror, Meat, and Carrot.^000000";
- mes "I'll be waiting for your return.";
- set Memorial08,5;
- close;
- }
- }
-
- else if(Memorial08 == 5) {
- if (countitem(1065) < 1 || countitem(610) < 1 || countitem(717) < 1 || countitem(747) < 1 || countitem(517) < 1 || countitem(515) < 1) {
- mes "[Grast]";
- mes "Oops, you haven't brought all materials.";
- mes "Please make sure you'll have to bring me";
- mes " ^FF0000one of each Trap, Yggdrasil Leaf,";
- mes "Blue Gemstone, Crystal Mirror,";
- mes "Meat, and Carrot^000000.";
- next;
- mes "[Grast]";
- mes "You'll have to bring me more";
- mes "materials afterwards.";
- mes "If you feel too burdened to gather them all,";
- mes "I can provide you all the materials.";
- next;
- if (select("I'll gather the rest.:Give me the materials.") == 2) {
- goto L_GiveUp;
- }
- goto L_Continue;
- }else{
- mes "[Grast]";
- mes "Oh, you've brought everything I asked.";
- mes "Hmm, I think you need just a little bit more.";
- next;
- mes "[Grast]";
- mes "Please bring me ^FF0000one of each Pet";
- mes "Incubator, Firecracker, Poring";
- mes "Doll, and Bouquet^000000.";
- set Memorial08,6;
- close;
- }
- }
-
- else if(Memorial08 == 6) {
- if (countitem(643) < 1 || countitem(12018) < 1 || countitem(741) < 1 || countitem(745) < 1) {
- mes "[Grast]";
- mes "Oops, you haven't brought all materials.";
- mes "Please make sure you need to bring me";
- mes " ^FF0000one of each Pet Incubator,";
- mes "Firecracker, Poring Doll and Bouquet";
- next;
- mes "[Grast]";
- mes "They are the last batch of materials.";
- mes "If you feel too burdened to gather them all,";
- mes "I can provide you all the materials.";
- next;
- mes "[Grast]";
- mes "If I provide you all materials, however,";
- mes "I won't have to thank you for your service.";
- mes "It's your call, " + strcharinfo(0) + ".";
- next;
- if (select("I'll gather the rest.:Give me the materials.") == 2) {
- goto L_GiveUp;
- }
- goto L_Continue;
- }else{
- mes "[Grast]";
- mes "Have you brought the materials I asked?";
- mes "Ah, thank you for your hard work;";
- mes "you've brought all of them.";
- next;
- mes "[Grast]";
- mes "I hope you'll learn a valuable";
- mes "lesson while gathering these materials.";
- mes "I like to give you a small gift for your service.";
- next;
- mes "[Grast]";
- mes "You see, I have two different gifts";
- mes "in my each hand.";
- mes "A best thing would be giving you";
- mes "both of them, but...";
- mes "How do you like to test your luck, " + strcharinfo(0) + "?";
- next;
- mes "[Grast]";
- mes "Okay, which hand would you like to pick?";
- next;
- if (select("Left hand.:Right hand.") == 2) {
- mes "[Grast]";
- mes "You've selected my right hand.";
- mes "Here's the gift for you.";
- mes "Now, please bring all these";
- mes "materials to Lauds.";
- set Memorial08, 7;
- getitem 617,1;
- close;
- }
- mes "[Grast]";
- mes "You've selected my left hand.";
- mes "Here's the gift for you.";
- mes "Now, please bring all these";
- mes "materials to Lauds.";
- set Memorial08, 7;
- getitem 12109,1;
- close;
- }
- }
-
- else if(Memorial08 == 7) {
- mes "[Grast]";
- mes "Have you met Lauds?";
- mes "I hope you'll remember your freedom";
- mes "and happiness";
- mes "are built on thousands of lives";
- mes "sacrificed in war.";
- close;
- }
-
- else if(Memorial08 >= 8) {
- mes "[Grast]";
- mes "A towel is about the most massively";
- mes "useful thing an adventurer can have.";
- close;
- }
-
- L_GiveUp:
- mes "[Grast]";
- mes "Oh, I see. I guess you're quite";
- mes "busy nowadays, huh?";
- mes "No problem; I'll give you all the";
- mes "supplies...";
- next;
- mes "[Grast]";
- mes "There you go.";
- mes "I crushed all the items together";
- mes "into a more compact form for you";
- mes "You can thank me later for that";
- mes "extra service.";
- mes "Please bring them to Lauds.";
- set Memorial08,7;
- getitem 7126,1;
- next;
- mes "[Grast]";
- mes "By the way, he had an unfortunate";
- mes "accident, and has kind of lost his";
- mes "mind.";
- mes "Please don't be alarmed even if he";
- mes "starts babbling.";
- close;
-
- L_Continue:
- mes "[Grast]";
- mes "That's a good idea.";
- mes "Then I'll be waiting for your return.";
- close;
+//===== eAthena Script =======================================
+//= In Memory of Heroes (iRO Memorial Day 2008)
+//===== By: ==================================================
+//= Kisuka
+//===== Current Version: =====================================
+//= 1.1
+//===== Compatible With: =====================================
+//= eAthena SVN
+//===== Description: =========================================
+//
+//===== Additional Comments: =================================
+//= 1.0 First version. [Kisuka]
+//= 1.1 Many Many Fixes. [Kisuka]
+//============================================================
+
+// ================== Lauds ======================
+// ===============================================
+prontera,182,214,4 script Lauds#Memorial 58,{
+ if(Memorial08 < 1) {
+ mes "[Mad Sago Lauds]";
+ mes "Hey, yo!";
+ mes "What are you doing there!?";
+ next;
+ mes "[Mad Sago Lauds]";
+ mes "Do you know what day it is!?";
+ mes "It's a very important date!";
+ mes "A very important date to remember!";
+ next;
+ mes "[Mad Sago Lauds]";
+ mes "What is this!?";
+ emotion 0;
+ next;
+ mes "[Mad Sago Lauds]";
+ mes "Where is your towel!?";
+ next;
+ mes "[" + strcharinfo(0) + "]";
+ mes "My what?";
+ next;
+ mes "[Mad Sago Lauds]";
+ mes "How are you supposed to go on your trip";
+ mes "without your towel!?";
+ next;
+ mes "[Mad Sago Lauds]";
+ mes "If you think this is just another";
+ mes "holiday,";
+ mes "I'm not going to waste my breath.";
+ mes "But if you like to pay a tribute to";
+ mes "great soldiers,";
+ mes "I will help you ready yourself";
+ next;
+ if (select("I guess so...:Are you crazy or something?") == 2) {
+ mes "[Mad Sago Lauds]";
+ mes "Fine, be unprepared!";
+ next;
+ mes "[Mad Sago Lauds]";
+ mes "";
+ mes "^FF0000YOU WILL RUE THE DAY!^000000";
+ close;
+ }
+ mes "[Mad Sago Lauds]";
+ mes "Great!";
+ mes "Then listen to me carefully.";
+ next;
+ mes "[Mad Sago Lauds]";
+ mes "Now before you can pay tribute to";
+ mes "the fallen soldiers";
+ mes "you must be properly equipped";
+ mes "Without your towel you will be";
+ mes "lost!";
+ mes "If you bring me the materials, I can make you a towel.";
+ next;
+ mes "[Mad Sago Lauds]";
+ mes "Listen closely.";
+ mes "Bring me ^FF000030 Fabric and 20 Fluffs^000000.";
+ set Memorial08,1;
+ close;
+ }
+
+ else if(Memorial08 == 1) {
+ if (countitem(1059) < 30 || countitem(914) < 20) {
+ mes "[Mad Sago Lauds]";
+ mes "What are these? They aren't";
+ mes "enough?!";
+ mes "*Sigh* Do I really have to tell you";
+ mes "again?!";
+ mes "Bring me ^FF000030 Fabric and 20 Fluffs^000000.";
+ close;
+ }else{
+ mes "***Mad Sago Lauds appears to be";
+ mes "muttering to himself***";
+ next;
+ mes "[Mad Sago Lauds]";
+ mes "So, did you bring the towel";
+ mes "materials?";
+ next;
+ mes "[Mad Sago Lauds]";
+ mes "Excellent; you've brought them";
+ mes "all.";
+ mes "Then I shall make you a Towel of";
+ mes "Memory as I promised.";
+ mes "Give me a moment.";
+ next;
+ mes "[Mad Sago Lauds]";
+ mes "There you go!";
+ delitem 1059,30;
+ delitem 914,20;
+ getitem 6025,1;
+ getnameditem 6025," + strcharinfo(0) + ";
+ set Memorial08,2;
+ close;
+ }
+ }
+
+ else if(Memorial08 == 2) {
+ mes "[Mad Sago Lauds]";
+ mes "Ah, you have fluffy new towel now";
+ mes "I even put your name on it";
+ next;
+ mes "[Mad Sago Lauds]";
+ mes "Say, how do you like to go";
+ mes "on a journey to pay a tribute to";
+ mes "Memorial Day?";
+ next;
+ if (select("Sure.:No, I'm Busy.") == 2) {
+ mes "[Mad Sago Lauds]";
+ mes "Don't come crying to me";
+ mes "if someone decides to";
+ mes "build a highway through";
+ mes "your home!";
+ close;
+ }
+ mes "[Mad Sago Lauds]";
+ mes "Good. By the way, do you even know";
+ mes "what the towel is for?";
+ next;
+ mes "[Mad Sago Lauds]";
+ mes "It seems you're just carrying it";
+ mes "without understanding its meaning.";
+ mes "What a shame! You should go speak";
+ mes "to ^FF0000Grast in Prontera^000000.";
+ set Memorial08,3;
+ close;
+ }
+
+ else if(Memorial08 == 3) {
+ mes "[Mad Sago Lauds]";
+ mes "What are you still doing here? I";
+ mes "told you to go speak to Grast in";
+ mes "Prontera!";
+ close;
+ }
+
+ else if(Memorial08 == 4 || Memorial08 == 5 || Memorial08 == 6) {
+ mes "[Mad Sago Lauds]";
+ mes "Go help Grast, and then come back.";
+ close;
+ }
+
+ else if(Memorial08 == 7) {
+ mes "[Mad Sago Lauds]";
+ mes "Oh, you've brought them all.";
+ mes "Hahaha!";
+ mes "HAHAHAHAHAHA!!!! cough cough";
+ next;
+ mes "[Mad Sago Lauds]";
+ mes "Please give them to me. Thank you";
+ mes "for your hard work, by the way.";
+ mes "Say, have you learned anything from the journey?";
+ mes "Now is to go visit the plaque at 12";
+ mes "o'clock direction in Prontera.";
+ next;
+ mes "[Mad Sago Lauds]";
+ mes "What do you mean you were just";
+ mes "there?";
+ next;
+ mes "[Mad Sago Lauds]";
+ mes "What? Why are you giving me your";
+ mes "garbage!";
+ mes "Those items are not useful to me at all";
+ mes "You should be going to the plaque!";
+ set Memorial08,8;
+ close;
+ }
+
+ else if(Memorial08 == 8) {
+ mes "[Mad Sago Lauds]";
+ mes "Stop trying to give me your garbage!";
+ mes "Go to the plaque at 12 o'clock";
+ mes "direction in Prontera for your journey!";
+ close;
+ }
+
+ else if(Memorial08 >= 9) {
+ set .@RandomMsg, rand(1,5);
+ if(.@RandomMsg == 1) {
+ mes "[Mad Sago Lauds]";
+ mes "Don't panic!";
+ emotion 0;
+ close;
+ }
+ else if(.@RandomMsg == 2) {
+ mes "[Mad Sago Lauds]";
+ mes "Life... is like a grapefruit.";
+ mes "It's orange and squishy, and has a";
+ mes "few pips in it,";
+ mes "and some folks have half a one for";
+ mes "breakfast.";
+ close;
+ }
+ else if(.@RandomMsg == 3) {
+ mes "[Mad Sago Lauds]";
+ mes "There was a point to this story,";
+ mes "but it has temporarily escaped the";
+ mes "chronicler's mind.";
+ close;
+ }
+ else if(.@RandomMsg == 4) {
+ mes "[Mad Sago Lauds]";
+ mes "42!";
+ close;
+ }
+ else if(.@RandomMsg == 5) {
+ mes "[Mad Sago Lauds]";
+ mes "It is a mistake to think you can";
+ mes "solve any major problems just with";
+ mes "potatoes.";
+ close;
+ }
+ }
+}
+
+// ============== Memorial Plaque ================
+// ===============================================
+prontera,153,286,4 script Memorial Plaque#Memorial 857,{
+ if(Memorial08 < 8) {
+ mes "[" + strcharinfo(0) + "]";
+ mes "- It's a dusty old plaque.-";
+ close;
+ }
+
+ else if(Memorial08 == 8) {
+ mes "[" + strcharinfo(0) + "]";
+ mes "- It's a dusty old plaque.-";
+ mes "'This must be what Lauds was talking about.'";
+ mes "'Let's dust it off with the towel.'";
+ next;
+ set Memorial08,9;
+ getexp 93750,43750;
+ goto L_CleanPlaque;
+ }
+
+ else if(Memorial08 >= 9) {
+ goto L_CleanPlaque;
+ }
+
+ L_CleanPlaque:
+ mes "- You see a message from the cleaned plaque.";
+ next;
+ mes "-Although no sculptured marble";
+ mes "should rise to their memory,-";
+ mes "-nor engraved stone bear record of";
+ mes "their deeds,-";
+ mes "-yet will their remembrance be as";
+ mes "lasting as the land they honored.-";
+ mes "-Daniel Webster-";
+ if(Memorial08 == 9) {
+ getexp 93750,43750;
+ }
+ next;
+ mes "-There's another message.-";
+ next;
+ mes "-I may not have gone where I";
+ mes "intended to go,-";
+ mes "-but I think I have ended up where";
+ mes "I needed to be.-";
+ mes "- Douglas Adams.-";
+ if(Memorial08 == 9) {
+ getexp 93750,43750;
+ }
+ next;
+ mes "-This is the last message.-";
+ next;
+ mes "-True heroism is remarkably sober,";
+ mes "very undramatic.-";
+ mes "-It is not the urge to surpass all";
+ mes "others at whatever cost,-";
+ mes "- but the urge to serve others at";
+ mes "whatever cost. -";
+ mes "- Arthur Ashe -";
+ if(Memorial08 == 9) {
+ getexp 93750,43750;
+ set Memorial08,10;
+ }
+ close;
+}
+
+
+// ==================== Grast ====================
+// ===============================================
+prontera,150,270,4 script Grast#Memorial 900,{
+ if(Memorial08 < 3) {
+ mes "[Grast]";
+ mes "Memorial Day is a sad and yet";
+ mes "glorious day.";
+ mes "I wonder how many people remember";
+ mes "them...";
+ close;
+ }
+
+ else if(Memorial08 == 3) {
+ mes "[Grast]";
+ mes "Oh, isn't that a Towel of Memory?";
+ mes "I'm so glad to meet someone who";
+ mes "understands the meaning of Memorial Day.";
+ next;
+ mes "[Grast]";
+ mes "It is very important to know what";
+ mes "we're celebrating today, don't you think?";
+ next;
+ mes "[Grast]";
+ mes "If you like to go on a journey to";
+ mes "pay a tribute to Memorial Day,";
+ mes "you should bring me some materials";
+ mes "I ask.";
+ next;
+ mes "[Grast]";
+ mes "Please bring me ^FF0000one of each Red";
+ mes "Potion, Green Potion, Awakening";
+ mes "Potion, and Butterfly Wing^000000.";
+ mes "I'll be waiting for your return.";
+ set Memorial08,4;
+ close;
+ }
+
+ else if(Memorial08 == 4) {
+ if (countitem(501) < 1 || countitem(506) < 1 || countitem(656) < 1 || countitem(602) < 1) {
+ mes "[Grast]";
+ mes "Oops, you haven't brought all";
+ mes "materials.";
+ mes "Please make sure you need to bring me";
+ mes " ^FF0000one of each Red Potion, Green";
+ mes "Potion, Awakening Potion, and";
+ mes "Butteryfly Wing^000000.";
+ next;
+ mes "[Grast]";
+ mes "You'll have to bring me more";
+ mes "materials afterwards.";
+ mes "If you feel too burdened to gather";
+ mes "them all,";
+ mes "I can provide you all the";
+ mes "materials.";
+ next;
+ if (select("I'll gather the rest.:Give me the materials.") == 2) {
+ goto L_GiveUp;
+ }
+ goto L_Continue;
+ }else{
+ mes "[Grast]";
+ mes "Oh, you've brought the materials I asked.";
+ next;
+ mes "[Grast]";
+ mes "Hmm, you will need some more things still...";
+ next;
+ mes "[Grast]";
+ mes "Please bring me ^FF0000one of each Trap,";
+ mes "Yggdrasil Leaf, Blue Gemstone,";
+ mes "Crystal Mirror, Meat, and Carrot.^000000";
+ mes "I'll be waiting for your return.";
+ set Memorial08,5;
+ close;
+ }
+ }
+
+ else if(Memorial08 == 5) {
+ if (countitem(1065) < 1 || countitem(610) < 1 || countitem(717) < 1 || countitem(747) < 1 || countitem(517) < 1 || countitem(515) < 1) {
+ mes "[Grast]";
+ mes "Oops, you haven't brought all materials.";
+ mes "Please make sure you'll have to bring me";
+ mes " ^FF0000one of each Trap, Yggdrasil Leaf,";
+ mes "Blue Gemstone, Crystal Mirror,";
+ mes "Meat, and Carrot^000000.";
+ next;
+ mes "[Grast]";
+ mes "You'll have to bring me more";
+ mes "materials afterwards.";
+ mes "If you feel too burdened to gather them all,";
+ mes "I can provide you all the materials.";
+ next;
+ if (select("I'll gather the rest.:Give me the materials.") == 2) {
+ goto L_GiveUp;
+ }
+ goto L_Continue;
+ }else{
+ mes "[Grast]";
+ mes "Oh, you've brought everything I asked.";
+ mes "Hmm, I think you need just a little bit more.";
+ next;
+ mes "[Grast]";
+ mes "Please bring me ^FF0000one of each Pet";
+ mes "Incubator, Firecracker, Poring";
+ mes "Doll, and Bouquet^000000.";
+ set Memorial08,6;
+ close;
+ }
+ }
+
+ else if(Memorial08 == 6) {
+ if (countitem(643) < 1 || countitem(12018) < 1 || countitem(741) < 1 || countitem(745) < 1) {
+ mes "[Grast]";
+ mes "Oops, you haven't brought all materials.";
+ mes "Please make sure you need to bring me";
+ mes " ^FF0000one of each Pet Incubator,";
+ mes "Firecracker, Poring Doll and Bouquet";
+ next;
+ mes "[Grast]";
+ mes "They are the last batch of materials.";
+ mes "If you feel too burdened to gather them all,";
+ mes "I can provide you all the materials.";
+ next;
+ mes "[Grast]";
+ mes "If I provide you all materials, however,";
+ mes "I won't have to thank you for your service.";
+ mes "It's your call, " + strcharinfo(0) + ".";
+ next;
+ if (select("I'll gather the rest.:Give me the materials.") == 2) {
+ goto L_GiveUp;
+ }
+ goto L_Continue;
+ }else{
+ mes "[Grast]";
+ mes "Have you brought the materials I asked?";
+ mes "Ah, thank you for your hard work;";
+ mes "you've brought all of them.";
+ next;
+ mes "[Grast]";
+ mes "I hope you'll learn a valuable";
+ mes "lesson while gathering these materials.";
+ mes "I like to give you a small gift for your service.";
+ next;
+ mes "[Grast]";
+ mes "You see, I have two different gifts";
+ mes "in my each hand.";
+ mes "A best thing would be giving you";
+ mes "both of them, but...";
+ mes "How do you like to test your luck, " + strcharinfo(0) + "?";
+ next;
+ mes "[Grast]";
+ mes "Okay, which hand would you like to pick?";
+ next;
+ if (select("Left hand.:Right hand.") == 2) {
+ mes "[Grast]";
+ mes "You've selected my right hand.";
+ mes "Here's the gift for you.";
+ mes "Now, please bring all these";
+ mes "materials to Lauds.";
+ set Memorial08, 7;
+ getitem 617,1;
+ close;
+ }
+ mes "[Grast]";
+ mes "You've selected my left hand.";
+ mes "Here's the gift for you.";
+ mes "Now, please bring all these";
+ mes "materials to Lauds.";
+ set Memorial08, 7;
+ getitem 12109,1;
+ close;
+ }
+ }
+
+ else if(Memorial08 == 7) {
+ mes "[Grast]";
+ mes "Have you met Lauds?";
+ mes "I hope you'll remember your freedom";
+ mes "and happiness";
+ mes "are built on thousands of lives";
+ mes "sacrificed in war.";
+ close;
+ }
+
+ else if(Memorial08 >= 8) {
+ mes "[Grast]";
+ mes "A towel is about the most massively";
+ mes "useful thing an adventurer can have.";
+ close;
+ }
+
+ L_GiveUp:
+ mes "[Grast]";
+ mes "Oh, I see. I guess you're quite";
+ mes "busy nowadays, huh?";
+ mes "No problem; I'll give you all the";
+ mes "supplies...";
+ next;
+ mes "[Grast]";
+ mes "There you go.";
+ mes "I crushed all the items together";
+ mes "into a more compact form for you";
+ mes "You can thank me later for that";
+ mes "extra service.";
+ mes "Please bring them to Lauds.";
+ set Memorial08,7;
+ getitem 7126,1;
+ next;
+ mes "[Grast]";
+ mes "By the way, he had an unfortunate";
+ mes "accident, and has kind of lost his";
+ mes "mind.";
+ mes "Please don't be alarmed even if he";
+ mes "starts babbling.";
+ close;
+
+ L_Continue:
+ mes "[Grast]";
+ mes "That's a good idea.";
+ mes "Then I'll be waiting for your return.";
+ close;
} \ No newline at end of file
diff --git a/npc/events/children_week.txt b/npc/events/children_week.txt
index 9a8933be5..e8fcd770e 100644
--- a/npc/events/children_week.txt
+++ b/npc/events/children_week.txt
@@ -1,86 +1,86 @@
-//===== eAthena Script =======================================
-//= Children Week Event
-//===== By: ==================================================
-//= Samuray22
-//===== Current Version: =====================================
-//= 1.1
-//===== Compatible With: =====================================
-//= eAthena SVN
-//===== Description: =========================================
-//= [Aegis Conversion]
-//= Indian Ro: Children Week Event
-//===== Additional Comments: =================================
-//= 1.1 First Beta. [Samuray22]
-//============================================================
-
-prontera,146,91,5 script Pandit chacha#child07 61,{
- if(BaseLevel > 50) {
- mes "[Pandit chacha]";
- mes "Hahaha.";
- mes "It is special day, comes only one time in a year.";
- mes "If you see little adventurers around you send to me~";
- mes "I will give the special gift.";
- close;
- } else if(BaseLevel < 20) {
- mes "[Pandit chacha]";
- mes "Hahaha.";
- mes "You are a baby adventurer not little adventurer.";
- mes "When you more grow up, come back again. hahaha.";
- close;
- } else if(oversea_event9 < 1) {
- mes "[Pandit chacha]";
- mes "Hahaha.";
- mes "Welcome, little adventurers!";
- mes "Today is special day, isn't it~?";
- mes "I would like to give the small gift to little adventurer...";
- mes "What about you? Do you want to take it?";
- next;
- if(select("No. I will take it later.","Sure, i want.") == 1) {
- mes "[Pandit chacha]";
- mes "That's too bad.... hum...";
- mes "I gathered some stuffs from far a way world to make it....";
- mes "Whenever come back again if you want it...";
- close;
- }
- set oversea_event9,1;
- getitem 11705,10; //Children's Potion
- mes "[Pandit chacha]";
- mes "Look. This is a child Potion.";
- mes "The weight is just 1 but recover much HP.";
- mes "If you want to get more, bring the 1 Wedding Bouquet and 1 Witherless Rose.";
- close;
- } else if(oversea_event9 == 1) {
- if(countitem(745) > 0 && countitem(748) > 0) {
- mes "[Pandit chacha]";
- mes "Ahha!!";
- mes "You have remembered my beautiful composition.";
- mes "You did good work.";
- mes "Could you give me 1 Wedding Bouquet and 1 Witherless Rose? ";
- next;
- if(select("Not yet.","Sure, take it.") == 1) {
- mes "[Pandit chacha]";
- mes "If you are not prepared yet, call me when you ready.";
- close;
- }
- mes "[Pandit chacha]";
- mes "Hahaha.";
- mes "Oh~ you get it.";
- mes "Here, I will exchange to the 50 child potion.";
- mes "Once you get this 50 child potion, I won't give any more.";
- close2;
- delitem 745,1; //Wedding Bouquet
- delitem 748,1; //Witherless Rose
- set oversea_event9,2;
- getitem 11705,50; //Children's Potion
- end;
- }
- mes "[Pandit chacha]";
- mes "Little adventurers, you should bring the 1 Wedding Bouquet and 1 Witherless Rose.";
- mes "If you bring these stuffs I will exchange them for child Potion. ";
- close;
- }
- mes "[Pandit chacha]";
- mes "Hahaha.";
- mes "Are you enjoying children week~? ";
- close;
+//===== eAthena Script =======================================
+//= Children Week Event
+//===== By: ==================================================
+//= Samuray22
+//===== Current Version: =====================================
+//= 1.1
+//===== Compatible With: =====================================
+//= eAthena SVN
+//===== Description: =========================================
+//= [Aegis Conversion]
+//= Indian Ro: Children Week Event
+//===== Additional Comments: =================================
+//= 1.1 First Beta. [Samuray22]
+//============================================================
+
+prontera,146,91,5 script Pandit chacha#child07 61,{
+ if(BaseLevel > 50) {
+ mes "[Pandit chacha]";
+ mes "Hahaha.";
+ mes "It is special day, comes only one time in a year.";
+ mes "If you see little adventurers around you send to me~";
+ mes "I will give the special gift.";
+ close;
+ } else if(BaseLevel < 20) {
+ mes "[Pandit chacha]";
+ mes "Hahaha.";
+ mes "You are a baby adventurer not little adventurer.";
+ mes "When you more grow up, come back again. hahaha.";
+ close;
+ } else if(oversea_event9 < 1) {
+ mes "[Pandit chacha]";
+ mes "Hahaha.";
+ mes "Welcome, little adventurers!";
+ mes "Today is special day, isn't it~?";
+ mes "I would like to give the small gift to little adventurer...";
+ mes "What about you? Do you want to take it?";
+ next;
+ if(select("No. I will take it later.","Sure, i want.") == 1) {
+ mes "[Pandit chacha]";
+ mes "That's too bad.... hum...";
+ mes "I gathered some stuffs from far a way world to make it....";
+ mes "Whenever come back again if you want it...";
+ close;
+ }
+ set oversea_event9,1;
+ getitem 11705,10; //Children's Potion
+ mes "[Pandit chacha]";
+ mes "Look. This is a child Potion.";
+ mes "The weight is just 1 but recover much HP.";
+ mes "If you want to get more, bring the 1 Wedding Bouquet and 1 Witherless Rose.";
+ close;
+ } else if(oversea_event9 == 1) {
+ if(countitem(745) > 0 && countitem(748) > 0) {
+ mes "[Pandit chacha]";
+ mes "Ahha!!";
+ mes "You have remembered my beautiful composition.";
+ mes "You did good work.";
+ mes "Could you give me 1 Wedding Bouquet and 1 Witherless Rose? ";
+ next;
+ if(select("Not yet.","Sure, take it.") == 1) {
+ mes "[Pandit chacha]";
+ mes "If you are not prepared yet, call me when you ready.";
+ close;
+ }
+ mes "[Pandit chacha]";
+ mes "Hahaha.";
+ mes "Oh~ you get it.";
+ mes "Here, I will exchange to the 50 child potion.";
+ mes "Once you get this 50 child potion, I won't give any more.";
+ close2;
+ delitem 745,1; //Wedding Bouquet
+ delitem 748,1; //Witherless Rose
+ set oversea_event9,2;
+ getitem 11705,50; //Children's Potion
+ end;
+ }
+ mes "[Pandit chacha]";
+ mes "Little adventurers, you should bring the 1 Wedding Bouquet and 1 Witherless Rose.";
+ mes "If you bring these stuffs I will exchange them for child Potion. ";
+ close;
+ }
+ mes "[Pandit chacha]";
+ mes "Hahaha.";
+ mes "Are you enjoying children week~? ";
+ close;
} \ No newline at end of file
diff --git a/npc/events/christmas_2008.txt b/npc/events/christmas_2008.txt
index 8e3e4e788..bb08b13a3 100644
--- a/npc/events/christmas_2008.txt
+++ b/npc/events/christmas_2008.txt
@@ -1,1217 +1,1217 @@
-//===== eAthena Script =======================================
-//= iRO 2008 Christmas Event
-//===== By: ==================================================
-//= Kisuka
-//===== Current Version: =====================================
-//= 1.0
-//===== Compatible With: =====================================
-//= eAthena SVN
-//===== Description: =========================================
-//= iRO Christmas Event. (2008)
-//= Create Music Box and Cake.
-//= Play card game with Santa.
-//= Create Santa Suits.
-//==========================================
-//= Must enable X-mas08 items in item_db2 (not in databases).
-//= Must have 'Christmas Carol' skill (not in databases).
-//= Must enable X-mas08 mobs in mob_avail (not in databases).
-//===== Additional Comments: =================================
-//= 1.0 First version. [Kisuka]
-//============================================================
-
-// ============== Carolling - Music Box ================
-// =====================================================
-prontera,226,306,4 script Carolling#iROxmas08 79,{
- if (iROxmas08carol < 1 || iROxmas08carol == 3) {
- if (iROxmas08carol == 3) {
- mes "[Carolling]";
- mes "Jingle Bells! Jingle Bells! Jingle";
- mes "all the way!";
- mes "O' what fun it is to ride in a";
- mes "one-horse open sleeeigh, Hey!";
- next;
- mes "[Carolling]";
- mes "Merry Christmas!";
- mes "Hey! You! What comes to mind when";
- mes "you think about Christmas?";
- next;
- }else{
- mes "[Carolling]";
- mes "Jingle Bells! Jingle Bells! Jingle all the way!";
- next;
- specialeffect 75;
- mes "[Carolling]";
- mes "O' what fun it is to ride in a one-horse open sleigh!";
- next;
- mes "[Carolling]";
- mes "Merry Christmas!";
- if (Sex) {
- mes "Hey, boy! What comes to mind when";
- }else{
- mes "Hey, girl! What comes to mind when";
- }
- mes "you think about Christmas?";
- next;
- }
- switch(select("Santa Claus:Gift Boxes:Carols:Santa Costumes:Fake Santa Antonio")) {
-
- case 1:
- mes "[Carolling]";
- mes "Santa Claus!";
- mes "You're so innocent!!";
- mes "Ah!";
- next;
- mes "[Carolling]";
- mes "Here's a secret!";
- mes "There's a rumor that Santa Claus";
- mes "lives in a certain village all";
- mes "throughout the year.";
- next;
- mes "[Carolling]";
- mes "But now!!!";
- mes "In this Christmas season!!";
- mes "You guys can meet Santa on either";
- mes "of the five possible villages";
- mes "throughout Rune-Midgerts!";
- next;
- mes "[Carolling]";
- mes "If you win over Santa, you can get";
- mes "a gift. Would you go for it?";
- next;
- emotion 18;
- mes "[Carolling]";
- mes "Carolling's hot news! Ha!";
- mes "Isn't that big news?";
- close;
-
- case 2:
- mes "[Carolling]";
- mes "Gift boxes?! All right!";
- mes "Isn't it thrilling to open gifts";
- mes "over your head!!";
- next;
- mes "[Carolling]";
- mes "Anyway, did you know...";
- mes "Some villain, a fake Santa robbed";
- mes "some gifts from the good Santa!";
- next;
- mes "[Carolling]";
- mes "Furthermore, he has put bad magic";
- mes "on the gifts so that they become";
- mes "monsters!";
- next;
- emotion 18;
- mes "[Carolling]";
- mes "Carolling's hot news! Ha!";
- mes "Isn't it amazing?";
- close;
-
- case 3:
- if (iROxmas08carol == 3) {
- mes "[Carolling]";
- mes "Ah, a music box is useful.";
- next;
- mes "[Carolling]";
- mes "Though we can't all play it around";
- mes "the village as we planned, it's";
- mes "cool that you carry it.";
- next;
- mes "[Carolling]";
- mes "We want to enjoy carols all";
- mes "together... I hope to get Crystal";
- mes "Pieces!";
- next;
- mes "[Carolling]";
- mes "If you can get ^0000FFSinging Crystal";
- mes "Pieces^000000, give them to me please?";
- next;
- select("Why not? Sure, I can give you some.");
- if (countitem(6092) < 6) {
- mes "[Carolling]";
- mes "Yes, please.";
- next;
- mes "[Carolling]";
- mes "If you can get ^0000FFSinging Crystal";
- mes "Pieces^000000, give them to me please?";
- close;
- }else{
- mes "[Carolling]";
- mes "Wow, you have them.";
- next;
- mes "[Carolling]";
- mes "I can bake you a cake,";
- mes "and I can carve your name on the";
- mes "cake, if you want!";
- next;
- if (select("No, thanks.:Please name it for me.") == 2) {
- mes "[Carolling]";
- mes "Thank for your help!";
- next;
- mes "[Carolling]";
- mes "Many people live in the giant";
- mes "world!";
- mes "So many people hope to hear";
- mes "carolling, yet I always lack";
- mes "Crystal pieces.";
- next;
- mes "[Carolling]";
- mes "If you can get ^0000FFSinging Crystal Pieces^000000, give them to me please?";
- next;
- emotion 18;
- delitem 6092,6;
- getnameditem 12354,"+strcharinfo(0)+";
- mes "[Carolling]";
- mes "Let's care about others around you";
- mes "on this Christmas season!";
- close;
- }else{
- mes "[Carolling]";
- mes "Oh!";
- mes "Shyness!";
- next;
- mes "[Carolling]";
- mes "Anyway, thanks a lot for your";
- mes "help.";
- next;
- mes "[Carolling]";
- mes "Many people live in the giant";
- mes "world!";
- mes "So many people hope to hear";
- mes "carolling, yet I always lack";
- mes "Crystal pieces.";
- next;
- mes "[Carolling]";
- mes "If you can get ^0000FFSinging Crystal Pieces^000000, give them to me please?";
- next;
- emotion 18;
- delitem 6092,6;
- getitem 12354,1;
- mes "[Carolling]";
- mes "Let's care about others around you";
- mes "on this Christmas season!";
- close;
- }
- }
- }
- mes "[Carolling]";
- mes "You know about Christmas!";
- mes "Talking about Christmas...";
- mes "...it's carols!!!";
- mes "I've been waiting for this for when";
- mes "Christmas comes around!";
- next;
- mes "[Carolling]";
- mes "But there's been no caroling here";
- mes "and there like before, so we can't";
- mes "feel the Christmas spirit.";
- next;
- mes "[Carolling]";
- mes "So, I installed a Singing Crystal";
- mes "in Prontera...";
- next;
- mes "[Carolling]";
- mes "but that jerk Antonio broke the";
- mes "crystal!";
- next;
- mes "[Carolling]";
- mes "The gift boxes have been changing";
- mes "into monsters since Antonio placed";
- mes "some magic on them, so the monsters";
- mes "ate up the crystal fragments!";
- next;
- mes "[Carolling]";
- mes "I am so devastated, since the";
- mes "Singing Crystal has been the hope";
- mes "of many children around the villages.";
- next;
- if (select("There's no other way to carol?:You can hear carols in Lutie.") == 2) {
- mes "[Carolling]";
- mes "And just stay there, every";
- mes "Christmas, for your whole life?";
- next;
- mes "["+strcharinfo(0)+"]";
- mes "What? What do you mean?";
- next;
- mes "[Carolling]";
- mes "Oh, nevermind.";
- mes "Ah...";
- close;
- }
- mes "[Carolling]";
- mes "Maybe, it's quite hard to make a";
- mes "jukebox for the villages, but a";
- mes "music box might be possible.";
- next;
- mes "[Carolling]";
- mes "We need the ^0000FFSinging Crystal Pieces^000000";
- mes "that the monsters ate up.";
- next;
- mes "[Carolling]";
- mes "Please bring me ^0000FF6 Singing Crystal";
- mes "Pieces^000000, and you will be rewarded";
- mes "with presents!";
- next;
- mes "[Carolling]";
- mes "Sounds cool, huh!!";
- next;
- select("........................");
- mes "[Carolling]";
- mes "...Why are you staring at me like";
- mes "that?";
- next;
- mes "[Carolling]";
- mes "You're thinking that we are always";
- mes "getting our plans spoiled, aren't";
- mes "you?";
- next;
- mes "[Carolling]";
- mes "I know that we are not good at";
- mes "controlling stuff, but our rewards";
- mes "are good, right?";
- next;
- select("........................");
- mes "[Carolling]";
- mes "Hey, we treat you good...";
- next;
- select("........................");
- mes "[Carolling]";
- mes "You are so cruel to me!";
- mes "Bad! Bad!";
- next;
- mes "[Carolling]";
- mes "Please, for our children's";
- mes "hope!!!?";
- mes "Please bring me 6 Singing Crystal";
- mes "Pieces from ^0000FFViolent Gift Boxes^000000!";
- next;
- emotion 33;
- mes "[Carolling]";
- mes "They're definitely as";
- mes "harsh as their name.";
- mes "Go on please!";
- set iROxmas08carol,1;
- close;
-
- case 4:
- mes "[Carolling]";
- mes "Santa costumes!!";
- mes "You know, the santa costumes that";
- mes "the monsters are wearing now aren't";
- mes "genuine!";
- next;
- mes "[Carolling]";
- mes "The rumor 'round here is, Lutie's";
- mes "designer made these costumes.";
- next;
- mes "[Carolling]";
- mes "Every year, adventurers challenge";
- mes "to attack Antonio the fake Santa,";
- mes "but there's no way to catch up to";
- mes "him due to his hat and costume!";
- next;
- mes "[Carolling]";
- mes "Are there some spcial abilities";
- mes "within them?";
- mes "There's still the designer in the";
- mes "Christmas village... How about";
- mes "asking her to make that costume?";
- next;
- emotion 18;
- mes "[Carolling]";
- mes "Carolling's hot news! Ha!";
- mes "It's hot, huh?";
- close;
-
-
- case 5:
- mes "[Carolling]";
- mes "A-N-T-O-N-I-O!!!";
- mes "As I heard, this Antonio is quite";
- mes "different from before.";
- next;
- mes "[Carolling]";
- mes "He seems to be quite resolved with";
- mes "himself since he ran away from";
- mes "people before.";
- next;
- mes "[Carolling]";
- mes "And he isn't alone anymore... is";
- mes "what I heard...";
- next;
- emotion 18;
- mes "[Carolling]";
- mes "Carolling's hot news! Ha!";
- mes "Hotness, right?";
- close;
- }
- }
-
- if (iROxmas08carol == 1) {
- if (countitem(6092) < 6) {
- mes "[Carolling]";
- mes "Maybe, it's quite hard to make a";
- mes "jukebox for the villages, but a";
- mes "music box might be possible.";
- next;
- mes "[Carolling]";
- mes "We need the ^0000FFSinging Crystal Pieces^000000";
- mes "that the monsters ate up.";
- next;
- mes "[Carolling]";
- mes "Please bring me ^0000FF6 Singing Crystal Pieces^000000, and you will be rewarded with presents!";
- next;
- mes "[Carolling]";
- mes "For all of the children of this";
- mes "world!!!";
- mes "Please bring me ^0000FF6Singing Crystal";
- mes "Pieces^000000 from ^0000FFViolent Gift Boxes^000000!";
- next;
- emotion 33;
- mes "[Carolling]";
- mes "Be careful!";
- mes "They're definitely as";
- mes "harsh as their name.";
- mes "Take care!!!";
- close;
- }else{
- specialeffect 75;
- mes "[Carolling]";
- mes "Don't cry, don't cry!";
- mes "Santa won't give you a";
- mes "gift if you're crying.";
- next;
- mes "[Carolling]";
- select("I got them!");
- mes "[Carolling]";
- mes "Wow, you got them!";
- mes "They are so cruel, aren't they?";
- mes "I'm happy to see you again.";
- next;
- mes "[Carolling]";
- mes "Let's count together!";
- mes "... ...";
- mes "Six!!";
- next;
- mes "[Carolling]";
- mes "All right! We can start to make our";
- mes "music box with crystal fragments.";
- next;
- mes "[Carolling]";
- mes "We would amplify the sounds of the";
- mes "crystal fragments to sound through";
- mes "the music box.";
- next;
- mes "[Carolling]";
- mes "You know, a music box that sounds";
- mes "like a jukebox!";
- next;
- mes "[Carolling]";
- mes "It's handy. You can carry it, as";
- mes "well as listen to sweet carols";
- mes "anywhere. Doesn't that sound";
- mes "cool!?";
- next;
- mes "[Carolling]";
- mes "So, we need more of some";
- mes "materials.";
- mes "^0000FF10 Wooden Block, 1 Hammer Of";
- mes "Blacksmith, 1 Jubilee, 10 Sticky";
- mes "Mucus, 3-karat Diamond^000000!";
- next;
- delitem 6092,6;
- emotion 33;
- set iROxmas08carol,2;
- mes "[Carolling]";
- mes "Those are all needed.";
- mes "Isn't that easy?";
- close;
- }
- }
-
- if (iROxmas08carol == 2) {
- if (countitem(1019) < 10 || countitem(1005) < 1 || countitem(7312) < 1 || countitem(938) < 10 || countitem(732) < 1) {
- mes "[Carolling]";
- mes "We can make a music box";
- mes "with Singing Crystal Pieces.";
- mes "It's handy, you can hear carols";
- mes "anywhere. Sounds cool?";
- next;
- mes "[Carolling]";
- mes "So, we need more of some materials.";
- mes "^0000FF10 Wooden Block, 1 Hammer Of";
- mes "Blacksmith, 1 Jubilee, 10 Sticky";
- mes "Mucus, 3-karat Diamond^000000!";
- next;
- emotion 33;
- mes "[Carolling]";
- mes "That's all we need.";
- mes "Isn't that easy?";
- close;
- }else{
- specialeffect 75;
- mes "[Carolling]";
- mes "Jingle bells, jingle bells,";
- mes "jingle all the way!";
- mes "O what fun it is to ride, in a";
- mes "one... horse... o-pen... sleigh!!!";
- next;
- mes "[Carolling]";
- mes "Wow!";
- mes "You came back!";
- mes "Did you bring all the";
- mes "materials?";
- next;
- mes "[Carolling]";
- mes "Good!";
- mes "No need to hesitate! Let's get";
- mes "started to make our music box.";
- next;
- mes "[Carolling]";
- specialeffect 101;
- mes "Blacksmith hammers on wooden";
- mes "block... and we shape the frame.";
- next;
- mes "[Carolling]";
- //(effect - stones from ground?)
- mes "Please use the Singing Crystal";
- mes "Pieces for a column, the Diamond as";
- mes "a prop, and the Sticky Mucus as";
- mes "glue.";
- next;
- mes "[Carolling]";
- specialeffect 1;
- mes "And now...";
- mes "we decorate with a Jubilee...";
- next;
- mes "[Carolling]";
- specialeffect 88;
- mes "The last step...!";
- mes "Breating life into it!";
- next;
- mes "[Carolling]";
- mes "It's done now!!!";
- next;
- mes "[Carolling]";
- mes "It's so cool! Isn't it cute!!?!";
- next;
- mes "[Carolling]";
- mes "You did as I requested, so I will";
- mes "give you gifts, as promised.";
- next;
- mes "[Carolling]";
- mes "One, is this music box.";
- mes "Please play this music box all over";
- mes "the villages!";
- next;
- mes "[Carolling]";
- mes "Another present is a Christmas cake";
- mes "especially shaped like your name!";
- mes "I made this cake shaped like your";
- mes "name!";
- next;
- mes "[Carolling]";
- mes "Don't worry, it tastes good.";
- next;
- emotion 33;
- getitem 2784,1;
- getnameditem 12354,"+strcharinfo(0)+";
- delitem 1019,10;
- delitem 1005,1;
- delitem 7312,1;
- delitem 938,10;
- delitem 732,1;
- set iROxmas08carol,3;
- mes "[Carolling]";
- mes "Thanks a lot.";
- mes "Merry Christmas!";
- mes "Have a good holiday season!";
- close;
- }
- }
-}
-
-// ============= Santa Claus - Card Game ===============
-// =====================================================
-- script Santa Claus#iROxmas08::08santa 718,{
- mes "[Santa Claus]";
- mes "Wow! Were you naughty or nice this";
- mes "year?";
- mes "All right, what comes to your mind";
- mes "when you think about Christmas?";
- next;
- switch(select("Carolling:Santa Claus:Gift Boxes:Santa Costume:Not much really...")) {
-
- case 1:
- mes "[Santa Claus]";
- mes "Carolling! That's good!";
- mes "A sweet carol always makes";
- mes "Christmas more happy!!!";
- next;
- mes "[Santa Claus]";
- mes "Yes indeed Carolling spreads Joy";
- mes "throughout the world?";
- close;
-
- case 2:
- mes "[Santa Claus]";
- if (Sex) {
- mes "Ho ho ho! What a good boy!";
- }else{
- mes "Ho ho ho! What a good girl!";
- }
- next;
- mes "[Santa Claus]";
- mes "But you should be wary of a fake";
- mes "Santa romaing around.";
- mes "Have you heard of Antonio, who";
- mes "invades villages every Christmas?";
- next;
- mes "[Santa Claus]";
- mes "He has stolen my gifts, as well as";
- mes "attacked adventurers around Toy and";
- mes "Lutie field.";
- next;
- mes "[Santa Claus]";
- mes "A bad Santa ruins us good Santa's";
- mes "reputations!";
- mes "The World Santa Organization is";
- mes "considering this a grave";
- mes "situation.";
- close;
-
- case 3:
- mes "[Santa Claus]";
- mes "A gift box! That sounds good!";
- mes "It's so exciting to open gift boxes";
- mes "when you wake up on Christmas";
- mes "morning!!!";
- next;
- mes "[Santa Claus]";
- mes "But we have very little gifts now,";
- mes "since Santa Antonio has stolen my";
- mes "gift bag.";
- next;
- mes "[Santa Claus]";
- mes "Many adventurers try to catch up";
- mes "to him, but he is not easy to catch.";
- next;
- mes "[Santa Claus]";
- mes "Anyway let those adventurers try to";
- mes "catch him, I have a small game for";
- mes "you.";
- next;
- mes "[Santa Claus]";
- mes "I will give you a small gift if you";
- mes "beat me!";
- next;
- mes "[Santa Claus]";
- mes "Do you want to play a game with";
- mes "me?";
- next;
- if (select("No, thanks.:Yes, I would.") == 1) {
- mes "[Santa Claus]";
- mes "Aww, don't be afraid. If you've";
- mes "been a little naughty this year I";
- mes "won't stuff your stockings with";
- mes "coal.";
- next;
- mes "[Santa Claus]";
- mes "I will stay here throughout the";
- mes "Christmas season, just visit me";
- mes "when you change your mind.";
- close;
- }
- if (gettimetick(2) < SantaCardTime) {
- mes "[Santa Claus]";
- mes "Um... You've played the game";
- mes "recently haven't you?";
- next;
- mes "[Santa Claus]";
- mes "You can try the game once a hour.";
- mes "Please visit me after the one hour";
- mes "has passed.";
- close;
- }
- set .@SantaCardTurn,0;
- set .@SantaCardWins,0;
- mes "[Santa Claus]";
- mes "Wow! You're so cool!";
- next;
- mes "[Santa Claus]";
- mes "Let me explain how to play this";
- mes "game.";
- next;
- mes "[Santa Claus]";
- mes "It's quite simple. I will pick one";
- mes "of three cards: Poring Card,";
- mes "Ghostring Card, and Angeling Card.";
- mes "Guess which card I pick and";
- mes "you're a winner!";
- next;
- mes "[Santa Claus]";
- mes "If you guess right 3 times out of";
- mes "5, I will give you a gift.";
- mes "Let's get started!";
- next;
- while(.@SantaCardTurn != 5) {
- emotion 56;
- mes "[Santa Claus]";
- mes "First let me shuffle up these";
- mes "cards... Ok!!!";
- next;
- specialeffect 0;
- mes "[Santa Claus]";
- mes "One!";
- next;
- specialeffect 1;
- mes "[Santa Claus]";
- mes "Two!";
- next;
- specialeffect 2;
- mes "[Santa Claus]";
- mes "Three!";
- next;
- specialeffect 18;
- mes "[Santa Claus]";
- mes "I'm picking up only one!";
- next;
- cutin "sorry",4;
- mes "[Santa Claus]";
- mes "I'm picking up only one!";
- mes "Please guess what is is.";
- next;
- switch(select("Poring:Angeling:Ghostring")) {
- case 1:
- mes "["+strcharinfo(0)+"]";
- mes "Um...I choose Poring!";
- set .@SantaCardP,1;
- next;
- break;
-
- case 2:
- mes "["+strcharinfo(0)+"]";
- mes "Um...I choose Angeling!";
- set .@SantaCardP,2;
- next;
- break;
-
- case 3:
- mes "["+strcharinfo(0)+"]";
- mes "Um...I choose Ghostring!";
- set .@SantaCardP,3;
- next;
- }
- mes "[Santa Claus]";
- mes "Let's see!!";
- mes "One! Two! Three!";
- set .@SantaCardNpc, rand(1,3);
- next;
- mes "[Santa Claus]";
- mes "Let's see!!";
- mes "One! Two! Three!";
- if (.@SantaCardNpc == 1) {
- cutin "Æ÷¸µÄ«µå",4;
- }
- else if (.@SantaCardNpc == 2) {
- cutin "¿£Á©¸µÄ«µå",4;
- }
- else if (.@SantaCardNpc == 3) {
- cutin "°í½ºÆ®¸µÄ«µå",4;
- }
- next;
- set .@SantaCardTurn,.@SantaCardTurn+1;
- if (.@SantaCardP == .@SantaCardNpc) {
- set .@SantaCardWins,.@SantaCardWins+1;
- emotion 0;
- emotion 5,1;
- cutin "",255;
- mes "[Santa Claus]";
- mes "You're lucky.";
- mes "Can you guess the right card the";
- mes "next time around?";
- next;
- }else{
- emotion 0;
- emotion 23,1;
- cutin "",255;
- mes "[Santa Claus]";
- mes "Aww maybe next time...";
- next;
- }
- }
- if (.@SantaCardWins < 3) {
- mes "["+strcharinfo(0)+"]";
- mes "This is just luck. Let me try";
- mes "again!!";
- next;
- mes "[Santa Claus]";
- mes "Whenever you want.";
- close;
- }else{
- mes "[Santa Claus]";
- mes "You're so good!";
- next;
- mes "[Santa Claus]";
- mes "Now this gift is for you. Put your";
- mes "hand into the bag and pick only";
- mes "one.";
- set .@SantaCardPrize, rand(1,12);
- next;
- if (.@SantaCardPrize == 1) {
- getitem 12354,2;
- }
- else if (.@SantaCardPrize == 2) {
- getitem 595,3;
- }
- else if (.@SantaCardPrize == 3) {
- getitem 593,3;
- }
- else if (.@SantaCardPrize == 4) {
- getitem 12236,3;
- }
- else if (.@SantaCardPrize == 5) {
- getitem 538,10;
- }
- else if (.@SantaCardPrize == 6) {
- getitem 14546,10;
- }
- else if (.@SantaCardPrize == 7) {
- getitem 5136,1;
- }
- else if (.@SantaCardPrize == 8) {
- getitem 603,1;
- }
- else if (.@SantaCardPrize == 9) {
- getitem 12130,1;
- }
- else if (.@SantaCardPrize == 10) {
- getitem 14550,10;
- }
- else if (.@SantaCardPrize == 11) {
- getitem 12132,3;
- }
- else if (.@SantaCardPrize == 12) {
- getitem 594,3;
- }
- set SantaCardTime,gettimetick(2)+3600;
- mes "[Santa Claus]";
- mes "Good job! Thanks for playing the";
- mes "card game with me! Merry";
- mes "Christmas!";
- close;
- }
-
- case 4:
- mes "[Santa Claus]";
- mes "Do you mean that ever so";
- mes "fashionable costume for Santa's and";
- mes "youngsters!?!";
- mes "Light-weight, fashionable, and";
- mes "keeps you warm!";
- next;
- mes "[Santa Claus]";
- mes "There used to be designer who";
- mes "visited my house to make my Santa";
- mes "costumes. Do you have any ideas?";
- close;
-
- case 5:
- mes "[Santa Claus]";
- mes "........................";
- next;
- mes "[Santa Claus]";
- mes "........................";
- if (Sex) {
- mes "Oh! Poor boy...";
- }else{
- mes "Oh! Poor girl...";
- }
- next;
- mes "[Santa Claus]";
- mes "........................";
- if (Sex) {
- mes "Oh! Poor boy...";
- }else{
- mes "Oh! Poor girl...";
- }
- mes "...";
- next;
- mes "[Santa Claus]";
- mes "You should open your heart to the";
- mes "spirit of Christmas!";
- mes "Once you do, I know you'll be able";
- mes "to think of something.";
- close;
- }
-}
-
-payon,171,109,4 duplicate(08santa) Santa Claus#0801 718
-prontera,156,285,4 duplicate(08santa) Santa Claus#0802 718
-alberta,117,66,4 duplicate(08santa) Santa Claus#0803 718
-geffen,119,70,4 duplicate(08santa) Santa Claus#0804 718
-morocc,158,104,4 duplicate(08santa) Santa Claus#0805 718
-
-
-// ============= Louise Kim - Santa Suit ===============
-// =====================================================
-xmas_in,89,92,4 script Louise Kim#iROxmas08 714,{
- mes "[Louise Kim]";
- mes "I always thought about how boring";
- mes "Santa Claus is wearing a too boring";
- mes "costume. Too boring!";
- next;
- mes "[Louise Kim]";
- mes "I could make a glamorous style for";
- mes "him!";
- next;
- mes "[Louise Kim]";
- mes "I once made a costume for";
- mes "the notorious figure Antonio!";
- mes "The reason catching up to him";
- mes "is so hard, is that his clothes";
- mes "have been given strong power!";
- mes "I blessed them with good luck!";
- next;
- emotion 3;
- mes "[Louise Kim]";
- mes "Preta Porter!!";
- mes "Which is quite luxurious";
- mes "but sold at good price ~";
- next;
- mes "[Louise Kim]";
- mes "Hey loosers! You can share my sense";
- mes "of fashion and wear my look if you";
- mes "run a light mission for me.";
- next;
- mes "[Louise Kim]";
- mes "Are you interested?";
- next;
- if (select("Nope.:Yes, please.") == 1) {
- mes "[Louise Kim]";
- mes "Ah!";
- mes "You're silly! You lost your big";
- mes "chance!";
- next;
- emotion 18;
- mes "[Louise Kim]";
- mes "Come to me later if you";
- mes "want to get the mission.";
- mes "I, Louise Kim, am generous";
- mes "enough to accept you next time.";
- close;
- }
- mes "[Louise Kim]";
- mes "You're so cool.";
- next;
- mes "[Louise Kim]";
- mes "Don't worry about this mission.";
- mes "It's not that difficult.";
- mes "I'm only in need of some";
- mes "materials. Things that are";
- mes "beyond my ability...";
- next;
- mes "[Louise Kim]";
- mes "Anyway, can you bring me some";
- mes "stuff?";
- next;
- if (select("Why not? What do you need?:Sorry, no time.") == 2) {
- emotion 18;
- mes "[Louise Kim]";
- mes "What?";
- mes "You will definitely regret it.";
- mes "No more chances later.";
- close;
- }
- mes "[Louise Kim]";
- mes "All right, you're cool!!";
- mes "You need to bring me: ^0000FFCotton Shirt,";
- mes "3 Red Potion, Holy Water, 4 Wrapping";
- mes "Paper, Wrapping Lace^000000..";
- next;
- mes "[Louise Kim]";
- mes "If you bring me all that stuff, I";
- mes "can make you a glamorous Santa";
- mes "costume.";
- next;
- if (countitem(2301) < 1 || countitem(501) < 3 || countitem(523) < 1 || countitem(7175) < 4 || countitem(7174) < 1) {
- mes "[Louise Kim]";
- mes "If you were to bring me all the";
- mes "stuff, I would make you a wonderful";
- mes "costume, for free...";
- next;
- emotion 3;
- mes "[Louise Kim]";
- mes "Please see me again if you are";
- mes "interested.";
- close;
- }else{
- select("Here you are.");
- emotion 33;
- mes "[Louise Kim]";
- mes "Oh! Good!";
- mes "Let's not delay.";
- mes "I will show you my limitless";
- mes "ability.";
- next;
- mes "-She pours everything in a pot-";
- mes "-even the shirt goes in!-";
- mes "-She takes it out with skill-";
- mes "-and many blessings she sings.-";
- next;
- specialeffect 42;
- emotion 2;
- mes "[Louise Kim]";
- mes "By artist, Louise Kim!";
- mes "All over the world will be blessed";
- mes "tonight!";
- next;
- mes "-Pour red potion in another pot-";
- mes "-then stir all of its parts.-";
- mes "-Put the cotton shirts in-";
- mes "-and dye it for grateful hearts.-";
- mes "-Thread by thread-";
- mes "-String by string-";
- mes "-Count your blessings and sing!-";
- next;
- specialeffect 75;
- emotion 2;
- mes "[Louise Kim]";
- mes "By artist, Louise Kim!";
- mes "All over the world will be blessed";
- mes "tonight!";
- next;
- mes "-She is knitting clothes-";
- mes "-with a hooked needle-";
- mes "-with her great skill.-";
- mes "Spread your blessings,-";
- mes "cheer and goodwill!-";
- next;
- specialeffect 91;
- emotion 3;
- mes "[Louise Kim]";
- mes "This is miraculous!";
- mes "I am a genius of the world.";
- mes "Artist, Louise Kim!!!";
- next;
- mes "[Louise Kim]";
- mes "All right! Isn't it wonderful?";
- mes "You can call it what you wish.";
- mes "My fashion is radiant.";
- mes "I ain't envious of Designer";
- mes "Pierre.";
- next;
- emotion 18;
- mes "[Louise Kim]";
- mes "I am supposed to get paid well,";
- mes "however I will just let it";
- mes "be free, since this is Christmas!";
- next;
- delitem 2301,1;
- delitem 501,3;
- delitem 523,1;
- delitem 7175,4;
- delitem 7174,1;
- getitem 12132,1;
- mes "[Louise Kim]";
- mes "Go brag about these wonderful";
- mes "clothes. There wouldn't be";
- mes "any without me, Louise Kim.";
- close;
- }
-}
-
-//XMAS MOBS
-prt_fild00,0,0,0,0 monster Christmas Jakk 1244,5,0,0,0
-prt_fild00,0,0,0,0 monster Christmas Goblin 1245,5,0,0,0
-prt_fild00,0,0,0,0 monster Christmas Cookie 1246,5,0,0,0
-prt_fild00,0,0,0,0 monster Antonio 1247,1,0,0,0
-
-prt_fild01,0,0,0,0 monster Christmas Jakk 1244,5,0,0,0
-prt_fild01,0,0,0,0 monster Christmas Goblin 1245,5,0,0,0
-prt_fild01,0,0,0,0 monster Christmas Cookie 1246,5,0,0,0
-prt_fild01,0,0,0,0 monster Antonio 1247,1,0,0,0
-
-prt_fild02,0,0,0,0 monster Christmas Jakk 1244,5,0,0,0
-prt_fild02,0,0,0,0 monster Christmas Goblin 1245,5,0,0,0
-prt_fild02,0,0,0,0 monster Christmas Cookie 1246,5,0,0,0
-prt_fild02,0,0,0,0 monster Antonio 1247,1,0,0,0
-
-prt_fild03,0,0,0,0 monster Christmas Jakk 1244,5,0,0,0
-prt_fild03,0,0,0,0 monster Christmas Goblin 1245,5,0,0,0
-prt_fild03,0,0,0,0 monster Christmas Cookie 1246,5,0,0,0
-prt_fild03,0,0,0,0 monster Antonio 1247,1,0,0,0
-
-prt_fild04,0,0,0,0 monster Christmas Jakk 1244,5,0,0,0
-prt_fild04,0,0,0,0 monster Christmas Goblin 1245,5,0,0,0
-prt_fild04,0,0,0,0 monster Christmas Cookie 1246,5,0,0,0
-prt_fild04,0,0,0,0 monster Antonio 1247,1,0,0,0
-
-prt_fild05,0,0,0,0 monster Christmas Jakk 1244,5,0,0,0
-prt_fild05,0,0,0,0 monster Christmas Goblin 1245,5,0,0,0
-prt_fild05,0,0,0,0 monster Christmas Cookie 1246,5,0,0,0
-prt_fild05,0,0,0,0 monster Antonio 1247,1,0,0,0
-
-prt_fild06,0,0,0,0 monster Christmas Jakk 1244,5,0,0,0
-prt_fild06,0,0,0,0 monster Christmas Goblin 1245,5,0,0,0
-prt_fild06,0,0,0,0 monster Christmas Cookie 1246,5,0,0,0
-prt_fild06,0,0,0,0 monster Antonio 1247,1,0,0,0
-
-prt_fild07,0,0,0,0 monster Christmas Jakk 1244,5,0,0,0
-prt_fild07,0,0,0,0 monster Christmas Goblin 1245,5,0,0,0
-prt_fild07,0,0,0,0 monster Christmas Cookie 1246,5,0,0,0
-prt_fild07,0,0,0,0 monster Antonio 1247,1,0,0,0
-
-prt_fild08,0,0,0,0 monster Christmas Jakk 1244,5,0,0,0
-prt_fild08,0,0,0,0 monster Christmas Goblin 1245,5,0,0,0
-prt_fild08,0,0,0,0 monster Christmas Cookie 1246,5,0,0,0
-prt_fild08,0,0,0,0 monster Antonio 1247,1,0,0,0
-
-prt_fild09,0,0,0,0 monster Christmas Jakk 1244,5,0,0,0
-prt_fild09,0,0,0,0 monster Christmas Goblin 1245,5,0,0,0
-prt_fild09,0,0,0,0 monster Christmas Cookie 1246,5,0,0,0
-prt_fild09,0,0,0,0 monster Antonio 1247,1,0,0,0
-
-prt_fild10,0,0,0,0 monster Christmas Jakk 1244,5,0,0,0
-prt_fild10,0,0,0,0 monster Christmas Goblin 1245,5,0,0,0
-prt_fild10,0,0,0,0 monster Christmas Cookie 1246,5,0,0,0
-prt_fild10,0,0,0,0 monster Antonio 1247,1,0,0,0
-
-prt_fild11,0,0,0,0 monster Christmas Jakk 1244,5,0,0,0
-prt_fild11,0,0,0,0 monster Christmas Goblin 1245,5,0,0,0
-prt_fild11,0,0,0,0 monster Christmas Cookie 1246,5,0,0,0
-prt_fild11,0,0,0,0 monster Antonio 1247,1,0,0,0
-
-pay_fild01,0,0,0,0 monster Christmas Jakk 1244,5,0,0,0
-pay_fild01,0,0,0,0 monster Christmas Goblin 1245,5,0,0,0
-pay_fild01,0,0,0,0 monster Christmas Cookie 1246,5,0,0,0
-pay_fild01,0,0,0,0 monster Antonio 1247,1,0,0,0
-
-pay_fild02,0,0,0,0 monster Christmas Jakk 1244,5,0,0,0
-pay_fild02,0,0,0,0 monster Christmas Goblin 1245,5,0,0,0
-pay_fild02,0,0,0,0 monster Christmas Cookie 1246,5,0,0,0
-pay_fild02,0,0,0,0 monster Antonio 1247,1,0,0,0
-
-pay_fild03,0,0,0,0 monster Christmas Jakk 1244,5,0,0,0
-pay_fild03,0,0,0,0 monster Christmas Goblin 1245,5,0,0,0
-pay_fild03,0,0,0,0 monster Christmas Cookie 1246,5,0,0,0
-pay_fild03,0,0,0,0 monster Antonio 1247,1,0,0,0
-
-pay_fild04,0,0,0,0 monster Christmas Jakk 1244,5,0,0,0
-pay_fild04,0,0,0,0 monster Christmas Goblin 1245,5,0,0,0
-pay_fild04,0,0,0,0 monster Christmas Cookie 1246,5,0,0,0
-pay_fild04,0,0,0,0 monster Antonio 1247,1,0,0,0
-
-pay_fild05,0,0,0,0 monster Christmas Jakk 1244,5,0,0,0
-pay_fild05,0,0,0,0 monster Christmas Goblin 1245,5,0,0,0
-pay_fild05,0,0,0,0 monster Christmas Cookie 1246,5,0,0,0
-pay_fild05,0,0,0,0 monster Antonio 1247,1,0,0,0
-
-pay_fild06,0,0,0,0 monster Christmas Jakk 1244,5,0,0,0
-pay_fild06,0,0,0,0 monster Christmas Goblin 1245,5,0,0,0
-pay_fild06,0,0,0,0 monster Christmas Cookie 1246,5,0,0,0
-pay_fild06,0,0,0,0 monster Antonio 1247,1,0,0,0
-
-pay_fild07,0,0,0,0 monster Christmas Jakk 1244,5,0,0,0
-pay_fild07,0,0,0,0 monster Christmas Goblin 1245,5,0,0,0
-pay_fild07,0,0,0,0 monster Christmas Cookie 1246,5,0,0,0
-pay_fild07,0,0,0,0 monster Antonio 1247,1,0,0,0
-
-pay_fild08,0,0,0,0 monster Christmas Jakk 1244,5,0,0,0
-pay_fild08,0,0,0,0 monster Christmas Goblin 1245,5,0,0,0
-pay_fild08,0,0,0,0 monster Christmas Cookie 1246,5,0,0,0
-pay_fild08,0,0,0,0 monster Antonio 1247,1,0,0,0
-
-pay_fild09,0,0,0,0 monster Christmas Jakk 1244,5,0,0,0
-pay_fild09,0,0,0,0 monster Christmas Goblin 1245,5,0,0,0
-pay_fild09,0,0,0,0 monster Christmas Cookie 1246,5,0,0,0
-pay_fild09,0,0,0,0 monster Antonio 1247,1,0,0,0
-
-pay_fild10,0,0,0,0 monster Christmas Jakk 1244,5,0,0,0
-pay_fild10,0,0,0,0 monster Christmas Goblin 1245,5,0,0,0
-pay_fild10,0,0,0,0 monster Christmas Cookie 1246,5,0,0,0
-pay_fild10,0,0,0,0 monster Antonio 1247,1,0,0,0
-
-pay_fild11,0,0,0,0 monster Christmas Jakk 1244,5,0,0,0
-pay_fild11,0,0,0,0 monster Christmas Goblin 1245,5,0,0,0
-pay_fild11,0,0,0,0 monster Christmas Cookie 1246,5,0,0,0
-pay_fild11,0,0,0,0 monster Antonio 1247,1,0,0,0
-
-gef_fild00,0,0,0,0 monster Christmas Jakk 1244,5,0,0,0
-gef_fild00,0,0,0,0 monster Christmas Goblin 1245,5,0,0,0
-gef_fild00,0,0,0,0 monster Christmas Cookie 1246,5,0,0,0
-gef_fild00,0,0,0,0 monster Antonio 1247,1,0,0,0
-
-gef_fild01,0,0,0,0 monster Christmas Jakk 1244,5,0,0,0
-gef_fild01,0,0,0,0 monster Christmas Goblin 1245,5,0,0,0
-gef_fild01,0,0,0,0 monster Christmas Cookie 1246,5,0,0,0
-gef_fild01,0,0,0,0 monster Antonio 1247,1,0,0,0
-
-gef_fild02,0,0,0,0 monster Christmas Jakk 1244,5,0,0,0
-gef_fild02,0,0,0,0 monster Christmas Goblin 1245,5,0,0,0
-gef_fild02,0,0,0,0 monster Christmas Cookie 1246,5,0,0,0
-gef_fild02,0,0,0,0 monster Antonio 1247,1,0,0,0
-
-gef_fild03,0,0,0,0 monster Christmas Jakk 1244,5,0,0,0
-gef_fild03,0,0,0,0 monster Christmas Goblin 1245,5,0,0,0
-gef_fild03,0,0,0,0 monster Christmas Cookie 1246,5,0,0,0
-gef_fild03,0,0,0,0 monster Antonio 1247,1,0,0,0
-
-gef_fild04,0,0,0,0 monster Christmas Jakk 1244,5,0,0,0
-gef_fild04,0,0,0,0 monster Christmas Goblin 1245,5,0,0,0
-gef_fild04,0,0,0,0 monster Christmas Cookie 1246,5,0,0,0
-gef_fild04,0,0,0,0 monster Antonio 1247,1,0,0,0
-
-gef_fild05,0,0,0,0 monster Christmas Jakk 1244,5,0,0,0
-gef_fild05,0,0,0,0 monster Christmas Goblin 1245,5,0,0,0
-gef_fild05,0,0,0,0 monster Christmas Cookie 1246,5,0,0,0
-gef_fild05,0,0,0,0 monster Antonio 1247,1,0,0,0
-
-gef_fild06,0,0,0,0 monster Christmas Jakk 1244,5,0,0,0
-gef_fild06,0,0,0,0 monster Christmas Goblin 1245,5,0,0,0
-gef_fild06,0,0,0,0 monster Christmas Cookie 1246,5,0,0,0
-gef_fild06,0,0,0,0 monster Antonio 1247,1,0,0,0
-
-gef_fild07,0,0,0,0 monster Christmas Jakk 1244,5,0,0,0
-gef_fild07,0,0,0,0 monster Christmas Goblin 1245,5,0,0,0
-gef_fild07,0,0,0,0 monster Christmas Cookie 1246,5,0,0,0
-gef_fild07,0,0,0,0 monster Antonio 1247,1,0,0,0
-
-gef_fild08,0,0,0,0 monster Christmas Jakk 1244,5,0,0,0
-gef_fild08,0,0,0,0 monster Christmas Goblin 1245,5,0,0,0
-gef_fild08,0,0,0,0 monster Christmas Cookie 1246,5,0,0,0
-gef_fild08,0,0,0,0 monster Antonio 1247,1,0,0,0
-
-gef_fild09,0,0,0,0 monster Christmas Jakk 1244,5,0,0,0
-gef_fild09,0,0,0,0 monster Christmas Goblin 1245,5,0,0,0
-gef_fild09,0,0,0,0 monster Christmas Cookie 1246,5,0,0,0
-gef_fild09,0,0,0,0 monster Antonio 1247,1,0,0,0
-
-gef_fild10,0,0,0,0 monster Christmas Jakk 1244,5,0,0,0
-gef_fild10,0,0,0,0 monster Christmas Goblin 1245,5,0,0,0
-gef_fild10,0,0,0,0 monster Christmas Cookie 1246,5,0,0,0
-gef_fild10,0,0,0,0 monster Antonio 1247,1,0,0,0
-
-gef_fild11,0,0,0,0 monster Christmas Jakk 1244,5,0,0,0
-gef_fild11,0,0,0,0 monster Christmas Goblin 1245,5,0,0,0
-gef_fild11,0,0,0,0 monster Christmas Cookie 1246,5,0,0,0
-gef_fild11,0,0,0,0 monster Antonio 1247,1,0,0,0
-
-gef_fild12,0,0,0,0 monster Christmas Jakk 1244,5,0,0,0
-gef_fild12,0,0,0,0 monster Christmas Goblin 1245,5,0,0,0
-gef_fild12,0,0,0,0 monster Christmas Cookie 1246,5,0,0,0
-gef_fild12,0,0,0,0 monster Antonio 1247,1,0,0,0
-
-gef_fild13,0,0,0,0 monster Christmas Jakk 1244,5,0,0,0
-gef_fild13,0,0,0,0 monster Christmas Goblin 1245,5,0,0,0
-gef_fild13,0,0,0,0 monster Christmas Cookie 1246,5,0,0,0
-gef_fild13,0,0,0,0 monster Antonio 1247,1,0,0,0
-
-gef_fild14,0,0,0,0 monster Christmas Jakk 1244,5,0,0,0
-gef_fild14,0,0,0,0 monster Christmas Goblin 1245,5,0,0,0
-gef_fild14,0,0,0,0 monster Christmas Cookie 1246,5,0,0,0
-gef_fild14,0,0,0,0 monster Antonio 1247,1,0,0,0
-
-xmas_fild01,0,0,0,0 monster Christmas Jakk 1244,5,0,0,0
-xmas_fild01,0,0,0,0 monster Christmas Goblin 1245,5,0,0,0
-xmas_fild01,0,0,0,0 monster Christmas Cookie 1246,5,0,0,0
+//===== eAthena Script =======================================
+//= iRO 2008 Christmas Event
+//===== By: ==================================================
+//= Kisuka
+//===== Current Version: =====================================
+//= 1.0
+//===== Compatible With: =====================================
+//= eAthena SVN
+//===== Description: =========================================
+//= iRO Christmas Event. (2008)
+//= Create Music Box and Cake.
+//= Play card game with Santa.
+//= Create Santa Suits.
+//==========================================
+//= Must enable X-mas08 items in item_db2 (not in databases).
+//= Must have 'Christmas Carol' skill (not in databases).
+//= Must enable X-mas08 mobs in mob_avail (not in databases).
+//===== Additional Comments: =================================
+//= 1.0 First version. [Kisuka]
+//============================================================
+
+// ============== Carolling - Music Box ================
+// =====================================================
+prontera,226,306,4 script Carolling#iROxmas08 79,{
+ if (iROxmas08carol < 1 || iROxmas08carol == 3) {
+ if (iROxmas08carol == 3) {
+ mes "[Carolling]";
+ mes "Jingle Bells! Jingle Bells! Jingle";
+ mes "all the way!";
+ mes "O' what fun it is to ride in a";
+ mes "one-horse open sleeeigh, Hey!";
+ next;
+ mes "[Carolling]";
+ mes "Merry Christmas!";
+ mes "Hey! You! What comes to mind when";
+ mes "you think about Christmas?";
+ next;
+ }else{
+ mes "[Carolling]";
+ mes "Jingle Bells! Jingle Bells! Jingle all the way!";
+ next;
+ specialeffect 75;
+ mes "[Carolling]";
+ mes "O' what fun it is to ride in a one-horse open sleigh!";
+ next;
+ mes "[Carolling]";
+ mes "Merry Christmas!";
+ if (Sex) {
+ mes "Hey, boy! What comes to mind when";
+ }else{
+ mes "Hey, girl! What comes to mind when";
+ }
+ mes "you think about Christmas?";
+ next;
+ }
+ switch(select("Santa Claus:Gift Boxes:Carols:Santa Costumes:Fake Santa Antonio")) {
+
+ case 1:
+ mes "[Carolling]";
+ mes "Santa Claus!";
+ mes "You're so innocent!!";
+ mes "Ah!";
+ next;
+ mes "[Carolling]";
+ mes "Here's a secret!";
+ mes "There's a rumor that Santa Claus";
+ mes "lives in a certain village all";
+ mes "throughout the year.";
+ next;
+ mes "[Carolling]";
+ mes "But now!!!";
+ mes "In this Christmas season!!";
+ mes "You guys can meet Santa on either";
+ mes "of the five possible villages";
+ mes "throughout Rune-Midgerts!";
+ next;
+ mes "[Carolling]";
+ mes "If you win over Santa, you can get";
+ mes "a gift. Would you go for it?";
+ next;
+ emotion 18;
+ mes "[Carolling]";
+ mes "Carolling's hot news! Ha!";
+ mes "Isn't that big news?";
+ close;
+
+ case 2:
+ mes "[Carolling]";
+ mes "Gift boxes?! All right!";
+ mes "Isn't it thrilling to open gifts";
+ mes "over your head!!";
+ next;
+ mes "[Carolling]";
+ mes "Anyway, did you know...";
+ mes "Some villain, a fake Santa robbed";
+ mes "some gifts from the good Santa!";
+ next;
+ mes "[Carolling]";
+ mes "Furthermore, he has put bad magic";
+ mes "on the gifts so that they become";
+ mes "monsters!";
+ next;
+ emotion 18;
+ mes "[Carolling]";
+ mes "Carolling's hot news! Ha!";
+ mes "Isn't it amazing?";
+ close;
+
+ case 3:
+ if (iROxmas08carol == 3) {
+ mes "[Carolling]";
+ mes "Ah, a music box is useful.";
+ next;
+ mes "[Carolling]";
+ mes "Though we can't all play it around";
+ mes "the village as we planned, it's";
+ mes "cool that you carry it.";
+ next;
+ mes "[Carolling]";
+ mes "We want to enjoy carols all";
+ mes "together... I hope to get Crystal";
+ mes "Pieces!";
+ next;
+ mes "[Carolling]";
+ mes "If you can get ^0000FFSinging Crystal";
+ mes "Pieces^000000, give them to me please?";
+ next;
+ select("Why not? Sure, I can give you some.");
+ if (countitem(6092) < 6) {
+ mes "[Carolling]";
+ mes "Yes, please.";
+ next;
+ mes "[Carolling]";
+ mes "If you can get ^0000FFSinging Crystal";
+ mes "Pieces^000000, give them to me please?";
+ close;
+ }else{
+ mes "[Carolling]";
+ mes "Wow, you have them.";
+ next;
+ mes "[Carolling]";
+ mes "I can bake you a cake,";
+ mes "and I can carve your name on the";
+ mes "cake, if you want!";
+ next;
+ if (select("No, thanks.:Please name it for me.") == 2) {
+ mes "[Carolling]";
+ mes "Thank for your help!";
+ next;
+ mes "[Carolling]";
+ mes "Many people live in the giant";
+ mes "world!";
+ mes "So many people hope to hear";
+ mes "carolling, yet I always lack";
+ mes "Crystal pieces.";
+ next;
+ mes "[Carolling]";
+ mes "If you can get ^0000FFSinging Crystal Pieces^000000, give them to me please?";
+ next;
+ emotion 18;
+ delitem 6092,6;
+ getnameditem 12354,"+strcharinfo(0)+";
+ mes "[Carolling]";
+ mes "Let's care about others around you";
+ mes "on this Christmas season!";
+ close;
+ }else{
+ mes "[Carolling]";
+ mes "Oh!";
+ mes "Shyness!";
+ next;
+ mes "[Carolling]";
+ mes "Anyway, thanks a lot for your";
+ mes "help.";
+ next;
+ mes "[Carolling]";
+ mes "Many people live in the giant";
+ mes "world!";
+ mes "So many people hope to hear";
+ mes "carolling, yet I always lack";
+ mes "Crystal pieces.";
+ next;
+ mes "[Carolling]";
+ mes "If you can get ^0000FFSinging Crystal Pieces^000000, give them to me please?";
+ next;
+ emotion 18;
+ delitem 6092,6;
+ getitem 12354,1;
+ mes "[Carolling]";
+ mes "Let's care about others around you";
+ mes "on this Christmas season!";
+ close;
+ }
+ }
+ }
+ mes "[Carolling]";
+ mes "You know about Christmas!";
+ mes "Talking about Christmas...";
+ mes "...it's carols!!!";
+ mes "I've been waiting for this for when";
+ mes "Christmas comes around!";
+ next;
+ mes "[Carolling]";
+ mes "But there's been no caroling here";
+ mes "and there like before, so we can't";
+ mes "feel the Christmas spirit.";
+ next;
+ mes "[Carolling]";
+ mes "So, I installed a Singing Crystal";
+ mes "in Prontera...";
+ next;
+ mes "[Carolling]";
+ mes "but that jerk Antonio broke the";
+ mes "crystal!";
+ next;
+ mes "[Carolling]";
+ mes "The gift boxes have been changing";
+ mes "into monsters since Antonio placed";
+ mes "some magic on them, so the monsters";
+ mes "ate up the crystal fragments!";
+ next;
+ mes "[Carolling]";
+ mes "I am so devastated, since the";
+ mes "Singing Crystal has been the hope";
+ mes "of many children around the villages.";
+ next;
+ if (select("There's no other way to carol?:You can hear carols in Lutie.") == 2) {
+ mes "[Carolling]";
+ mes "And just stay there, every";
+ mes "Christmas, for your whole life?";
+ next;
+ mes "["+strcharinfo(0)+"]";
+ mes "What? What do you mean?";
+ next;
+ mes "[Carolling]";
+ mes "Oh, nevermind.";
+ mes "Ah...";
+ close;
+ }
+ mes "[Carolling]";
+ mes "Maybe, it's quite hard to make a";
+ mes "jukebox for the villages, but a";
+ mes "music box might be possible.";
+ next;
+ mes "[Carolling]";
+ mes "We need the ^0000FFSinging Crystal Pieces^000000";
+ mes "that the monsters ate up.";
+ next;
+ mes "[Carolling]";
+ mes "Please bring me ^0000FF6 Singing Crystal";
+ mes "Pieces^000000, and you will be rewarded";
+ mes "with presents!";
+ next;
+ mes "[Carolling]";
+ mes "Sounds cool, huh!!";
+ next;
+ select("........................");
+ mes "[Carolling]";
+ mes "...Why are you staring at me like";
+ mes "that?";
+ next;
+ mes "[Carolling]";
+ mes "You're thinking that we are always";
+ mes "getting our plans spoiled, aren't";
+ mes "you?";
+ next;
+ mes "[Carolling]";
+ mes "I know that we are not good at";
+ mes "controlling stuff, but our rewards";
+ mes "are good, right?";
+ next;
+ select("........................");
+ mes "[Carolling]";
+ mes "Hey, we treat you good...";
+ next;
+ select("........................");
+ mes "[Carolling]";
+ mes "You are so cruel to me!";
+ mes "Bad! Bad!";
+ next;
+ mes "[Carolling]";
+ mes "Please, for our children's";
+ mes "hope!!!?";
+ mes "Please bring me 6 Singing Crystal";
+ mes "Pieces from ^0000FFViolent Gift Boxes^000000!";
+ next;
+ emotion 33;
+ mes "[Carolling]";
+ mes "They're definitely as";
+ mes "harsh as their name.";
+ mes "Go on please!";
+ set iROxmas08carol,1;
+ close;
+
+ case 4:
+ mes "[Carolling]";
+ mes "Santa costumes!!";
+ mes "You know, the santa costumes that";
+ mes "the monsters are wearing now aren't";
+ mes "genuine!";
+ next;
+ mes "[Carolling]";
+ mes "The rumor 'round here is, Lutie's";
+ mes "designer made these costumes.";
+ next;
+ mes "[Carolling]";
+ mes "Every year, adventurers challenge";
+ mes "to attack Antonio the fake Santa,";
+ mes "but there's no way to catch up to";
+ mes "him due to his hat and costume!";
+ next;
+ mes "[Carolling]";
+ mes "Are there some spcial abilities";
+ mes "within them?";
+ mes "There's still the designer in the";
+ mes "Christmas village... How about";
+ mes "asking her to make that costume?";
+ next;
+ emotion 18;
+ mes "[Carolling]";
+ mes "Carolling's hot news! Ha!";
+ mes "It's hot, huh?";
+ close;
+
+
+ case 5:
+ mes "[Carolling]";
+ mes "A-N-T-O-N-I-O!!!";
+ mes "As I heard, this Antonio is quite";
+ mes "different from before.";
+ next;
+ mes "[Carolling]";
+ mes "He seems to be quite resolved with";
+ mes "himself since he ran away from";
+ mes "people before.";
+ next;
+ mes "[Carolling]";
+ mes "And he isn't alone anymore... is";
+ mes "what I heard...";
+ next;
+ emotion 18;
+ mes "[Carolling]";
+ mes "Carolling's hot news! Ha!";
+ mes "Hotness, right?";
+ close;
+ }
+ }
+
+ if (iROxmas08carol == 1) {
+ if (countitem(6092) < 6) {
+ mes "[Carolling]";
+ mes "Maybe, it's quite hard to make a";
+ mes "jukebox for the villages, but a";
+ mes "music box might be possible.";
+ next;
+ mes "[Carolling]";
+ mes "We need the ^0000FFSinging Crystal Pieces^000000";
+ mes "that the monsters ate up.";
+ next;
+ mes "[Carolling]";
+ mes "Please bring me ^0000FF6 Singing Crystal Pieces^000000, and you will be rewarded with presents!";
+ next;
+ mes "[Carolling]";
+ mes "For all of the children of this";
+ mes "world!!!";
+ mes "Please bring me ^0000FF6Singing Crystal";
+ mes "Pieces^000000 from ^0000FFViolent Gift Boxes^000000!";
+ next;
+ emotion 33;
+ mes "[Carolling]";
+ mes "Be careful!";
+ mes "They're definitely as";
+ mes "harsh as their name.";
+ mes "Take care!!!";
+ close;
+ }else{
+ specialeffect 75;
+ mes "[Carolling]";
+ mes "Don't cry, don't cry!";
+ mes "Santa won't give you a";
+ mes "gift if you're crying.";
+ next;
+ mes "[Carolling]";
+ select("I got them!");
+ mes "[Carolling]";
+ mes "Wow, you got them!";
+ mes "They are so cruel, aren't they?";
+ mes "I'm happy to see you again.";
+ next;
+ mes "[Carolling]";
+ mes "Let's count together!";
+ mes "... ...";
+ mes "Six!!";
+ next;
+ mes "[Carolling]";
+ mes "All right! We can start to make our";
+ mes "music box with crystal fragments.";
+ next;
+ mes "[Carolling]";
+ mes "We would amplify the sounds of the";
+ mes "crystal fragments to sound through";
+ mes "the music box.";
+ next;
+ mes "[Carolling]";
+ mes "You know, a music box that sounds";
+ mes "like a jukebox!";
+ next;
+ mes "[Carolling]";
+ mes "It's handy. You can carry it, as";
+ mes "well as listen to sweet carols";
+ mes "anywhere. Doesn't that sound";
+ mes "cool!?";
+ next;
+ mes "[Carolling]";
+ mes "So, we need more of some";
+ mes "materials.";
+ mes "^0000FF10 Wooden Block, 1 Hammer Of";
+ mes "Blacksmith, 1 Jubilee, 10 Sticky";
+ mes "Mucus, 3-karat Diamond^000000!";
+ next;
+ delitem 6092,6;
+ emotion 33;
+ set iROxmas08carol,2;
+ mes "[Carolling]";
+ mes "Those are all needed.";
+ mes "Isn't that easy?";
+ close;
+ }
+ }
+
+ if (iROxmas08carol == 2) {
+ if (countitem(1019) < 10 || countitem(1005) < 1 || countitem(7312) < 1 || countitem(938) < 10 || countitem(732) < 1) {
+ mes "[Carolling]";
+ mes "We can make a music box";
+ mes "with Singing Crystal Pieces.";
+ mes "It's handy, you can hear carols";
+ mes "anywhere. Sounds cool?";
+ next;
+ mes "[Carolling]";
+ mes "So, we need more of some materials.";
+ mes "^0000FF10 Wooden Block, 1 Hammer Of";
+ mes "Blacksmith, 1 Jubilee, 10 Sticky";
+ mes "Mucus, 3-karat Diamond^000000!";
+ next;
+ emotion 33;
+ mes "[Carolling]";
+ mes "That's all we need.";
+ mes "Isn't that easy?";
+ close;
+ }else{
+ specialeffect 75;
+ mes "[Carolling]";
+ mes "Jingle bells, jingle bells,";
+ mes "jingle all the way!";
+ mes "O what fun it is to ride, in a";
+ mes "one... horse... o-pen... sleigh!!!";
+ next;
+ mes "[Carolling]";
+ mes "Wow!";
+ mes "You came back!";
+ mes "Did you bring all the";
+ mes "materials?";
+ next;
+ mes "[Carolling]";
+ mes "Good!";
+ mes "No need to hesitate! Let's get";
+ mes "started to make our music box.";
+ next;
+ mes "[Carolling]";
+ specialeffect 101;
+ mes "Blacksmith hammers on wooden";
+ mes "block... and we shape the frame.";
+ next;
+ mes "[Carolling]";
+ //(effect - stones from ground?)
+ mes "Please use the Singing Crystal";
+ mes "Pieces for a column, the Diamond as";
+ mes "a prop, and the Sticky Mucus as";
+ mes "glue.";
+ next;
+ mes "[Carolling]";
+ specialeffect 1;
+ mes "And now...";
+ mes "we decorate with a Jubilee...";
+ next;
+ mes "[Carolling]";
+ specialeffect 88;
+ mes "The last step...!";
+ mes "Breating life into it!";
+ next;
+ mes "[Carolling]";
+ mes "It's done now!!!";
+ next;
+ mes "[Carolling]";
+ mes "It's so cool! Isn't it cute!!?!";
+ next;
+ mes "[Carolling]";
+ mes "You did as I requested, so I will";
+ mes "give you gifts, as promised.";
+ next;
+ mes "[Carolling]";
+ mes "One, is this music box.";
+ mes "Please play this music box all over";
+ mes "the villages!";
+ next;
+ mes "[Carolling]";
+ mes "Another present is a Christmas cake";
+ mes "especially shaped like your name!";
+ mes "I made this cake shaped like your";
+ mes "name!";
+ next;
+ mes "[Carolling]";
+ mes "Don't worry, it tastes good.";
+ next;
+ emotion 33;
+ getitem 2784,1;
+ getnameditem 12354,"+strcharinfo(0)+";
+ delitem 1019,10;
+ delitem 1005,1;
+ delitem 7312,1;
+ delitem 938,10;
+ delitem 732,1;
+ set iROxmas08carol,3;
+ mes "[Carolling]";
+ mes "Thanks a lot.";
+ mes "Merry Christmas!";
+ mes "Have a good holiday season!";
+ close;
+ }
+ }
+}
+
+// ============= Santa Claus - Card Game ===============
+// =====================================================
+- script Santa Claus#iROxmas08::08santa 718,{
+ mes "[Santa Claus]";
+ mes "Wow! Were you naughty or nice this";
+ mes "year?";
+ mes "All right, what comes to your mind";
+ mes "when you think about Christmas?";
+ next;
+ switch(select("Carolling:Santa Claus:Gift Boxes:Santa Costume:Not much really...")) {
+
+ case 1:
+ mes "[Santa Claus]";
+ mes "Carolling! That's good!";
+ mes "A sweet carol always makes";
+ mes "Christmas more happy!!!";
+ next;
+ mes "[Santa Claus]";
+ mes "Yes indeed Carolling spreads Joy";
+ mes "throughout the world?";
+ close;
+
+ case 2:
+ mes "[Santa Claus]";
+ if (Sex) {
+ mes "Ho ho ho! What a good boy!";
+ }else{
+ mes "Ho ho ho! What a good girl!";
+ }
+ next;
+ mes "[Santa Claus]";
+ mes "But you should be wary of a fake";
+ mes "Santa romaing around.";
+ mes "Have you heard of Antonio, who";
+ mes "invades villages every Christmas?";
+ next;
+ mes "[Santa Claus]";
+ mes "He has stolen my gifts, as well as";
+ mes "attacked adventurers around Toy and";
+ mes "Lutie field.";
+ next;
+ mes "[Santa Claus]";
+ mes "A bad Santa ruins us good Santa's";
+ mes "reputations!";
+ mes "The World Santa Organization is";
+ mes "considering this a grave";
+ mes "situation.";
+ close;
+
+ case 3:
+ mes "[Santa Claus]";
+ mes "A gift box! That sounds good!";
+ mes "It's so exciting to open gift boxes";
+ mes "when you wake up on Christmas";
+ mes "morning!!!";
+ next;
+ mes "[Santa Claus]";
+ mes "But we have very little gifts now,";
+ mes "since Santa Antonio has stolen my";
+ mes "gift bag.";
+ next;
+ mes "[Santa Claus]";
+ mes "Many adventurers try to catch up";
+ mes "to him, but he is not easy to catch.";
+ next;
+ mes "[Santa Claus]";
+ mes "Anyway let those adventurers try to";
+ mes "catch him, I have a small game for";
+ mes "you.";
+ next;
+ mes "[Santa Claus]";
+ mes "I will give you a small gift if you";
+ mes "beat me!";
+ next;
+ mes "[Santa Claus]";
+ mes "Do you want to play a game with";
+ mes "me?";
+ next;
+ if (select("No, thanks.:Yes, I would.") == 1) {
+ mes "[Santa Claus]";
+ mes "Aww, don't be afraid. If you've";
+ mes "been a little naughty this year I";
+ mes "won't stuff your stockings with";
+ mes "coal.";
+ next;
+ mes "[Santa Claus]";
+ mes "I will stay here throughout the";
+ mes "Christmas season, just visit me";
+ mes "when you change your mind.";
+ close;
+ }
+ if (gettimetick(2) < SantaCardTime) {
+ mes "[Santa Claus]";
+ mes "Um... You've played the game";
+ mes "recently haven't you?";
+ next;
+ mes "[Santa Claus]";
+ mes "You can try the game once a hour.";
+ mes "Please visit me after the one hour";
+ mes "has passed.";
+ close;
+ }
+ set .@SantaCardTurn,0;
+ set .@SantaCardWins,0;
+ mes "[Santa Claus]";
+ mes "Wow! You're so cool!";
+ next;
+ mes "[Santa Claus]";
+ mes "Let me explain how to play this";
+ mes "game.";
+ next;
+ mes "[Santa Claus]";
+ mes "It's quite simple. I will pick one";
+ mes "of three cards: Poring Card,";
+ mes "Ghostring Card, and Angeling Card.";
+ mes "Guess which card I pick and";
+ mes "you're a winner!";
+ next;
+ mes "[Santa Claus]";
+ mes "If you guess right 3 times out of";
+ mes "5, I will give you a gift.";
+ mes "Let's get started!";
+ next;
+ while(.@SantaCardTurn != 5) {
+ emotion 56;
+ mes "[Santa Claus]";
+ mes "First let me shuffle up these";
+ mes "cards... Ok!!!";
+ next;
+ specialeffect 0;
+ mes "[Santa Claus]";
+ mes "One!";
+ next;
+ specialeffect 1;
+ mes "[Santa Claus]";
+ mes "Two!";
+ next;
+ specialeffect 2;
+ mes "[Santa Claus]";
+ mes "Three!";
+ next;
+ specialeffect 18;
+ mes "[Santa Claus]";
+ mes "I'm picking up only one!";
+ next;
+ cutin "sorry",4;
+ mes "[Santa Claus]";
+ mes "I'm picking up only one!";
+ mes "Please guess what is is.";
+ next;
+ switch(select("Poring:Angeling:Ghostring")) {
+ case 1:
+ mes "["+strcharinfo(0)+"]";
+ mes "Um...I choose Poring!";
+ set .@SantaCardP,1;
+ next;
+ break;
+
+ case 2:
+ mes "["+strcharinfo(0)+"]";
+ mes "Um...I choose Angeling!";
+ set .@SantaCardP,2;
+ next;
+ break;
+
+ case 3:
+ mes "["+strcharinfo(0)+"]";
+ mes "Um...I choose Ghostring!";
+ set .@SantaCardP,3;
+ next;
+ }
+ mes "[Santa Claus]";
+ mes "Let's see!!";
+ mes "One! Two! Three!";
+ set .@SantaCardNpc, rand(1,3);
+ next;
+ mes "[Santa Claus]";
+ mes "Let's see!!";
+ mes "One! Two! Three!";
+ if (.@SantaCardNpc == 1) {
+ cutin "Æ÷¸µÄ«µå",4;
+ }
+ else if (.@SantaCardNpc == 2) {
+ cutin "¿£Á©¸µÄ«µå",4;
+ }
+ else if (.@SantaCardNpc == 3) {
+ cutin "°í½ºÆ®¸µÄ«µå",4;
+ }
+ next;
+ set .@SantaCardTurn,.@SantaCardTurn+1;
+ if (.@SantaCardP == .@SantaCardNpc) {
+ set .@SantaCardWins,.@SantaCardWins+1;
+ emotion 0;
+ emotion 5,1;
+ cutin "",255;
+ mes "[Santa Claus]";
+ mes "You're lucky.";
+ mes "Can you guess the right card the";
+ mes "next time around?";
+ next;
+ }else{
+ emotion 0;
+ emotion 23,1;
+ cutin "",255;
+ mes "[Santa Claus]";
+ mes "Aww maybe next time...";
+ next;
+ }
+ }
+ if (.@SantaCardWins < 3) {
+ mes "["+strcharinfo(0)+"]";
+ mes "This is just luck. Let me try";
+ mes "again!!";
+ next;
+ mes "[Santa Claus]";
+ mes "Whenever you want.";
+ close;
+ }else{
+ mes "[Santa Claus]";
+ mes "You're so good!";
+ next;
+ mes "[Santa Claus]";
+ mes "Now this gift is for you. Put your";
+ mes "hand into the bag and pick only";
+ mes "one.";
+ set .@SantaCardPrize, rand(1,12);
+ next;
+ if (.@SantaCardPrize == 1) {
+ getitem 12354,2;
+ }
+ else if (.@SantaCardPrize == 2) {
+ getitem 595,3;
+ }
+ else if (.@SantaCardPrize == 3) {
+ getitem 593,3;
+ }
+ else if (.@SantaCardPrize == 4) {
+ getitem 12236,3;
+ }
+ else if (.@SantaCardPrize == 5) {
+ getitem 538,10;
+ }
+ else if (.@SantaCardPrize == 6) {
+ getitem 14546,10;
+ }
+ else if (.@SantaCardPrize == 7) {
+ getitem 5136,1;
+ }
+ else if (.@SantaCardPrize == 8) {
+ getitem 603,1;
+ }
+ else if (.@SantaCardPrize == 9) {
+ getitem 12130,1;
+ }
+ else if (.@SantaCardPrize == 10) {
+ getitem 14550,10;
+ }
+ else if (.@SantaCardPrize == 11) {
+ getitem 12132,3;
+ }
+ else if (.@SantaCardPrize == 12) {
+ getitem 594,3;
+ }
+ set SantaCardTime,gettimetick(2)+3600;
+ mes "[Santa Claus]";
+ mes "Good job! Thanks for playing the";
+ mes "card game with me! Merry";
+ mes "Christmas!";
+ close;
+ }
+
+ case 4:
+ mes "[Santa Claus]";
+ mes "Do you mean that ever so";
+ mes "fashionable costume for Santa's and";
+ mes "youngsters!?!";
+ mes "Light-weight, fashionable, and";
+ mes "keeps you warm!";
+ next;
+ mes "[Santa Claus]";
+ mes "There used to be designer who";
+ mes "visited my house to make my Santa";
+ mes "costumes. Do you have any ideas?";
+ close;
+
+ case 5:
+ mes "[Santa Claus]";
+ mes "........................";
+ next;
+ mes "[Santa Claus]";
+ mes "........................";
+ if (Sex) {
+ mes "Oh! Poor boy...";
+ }else{
+ mes "Oh! Poor girl...";
+ }
+ next;
+ mes "[Santa Claus]";
+ mes "........................";
+ if (Sex) {
+ mes "Oh! Poor boy...";
+ }else{
+ mes "Oh! Poor girl...";
+ }
+ mes "...";
+ next;
+ mes "[Santa Claus]";
+ mes "You should open your heart to the";
+ mes "spirit of Christmas!";
+ mes "Once you do, I know you'll be able";
+ mes "to think of something.";
+ close;
+ }
+}
+
+payon,171,109,4 duplicate(08santa) Santa Claus#0801 718
+prontera,156,285,4 duplicate(08santa) Santa Claus#0802 718
+alberta,117,66,4 duplicate(08santa) Santa Claus#0803 718
+geffen,119,70,4 duplicate(08santa) Santa Claus#0804 718
+morocc,158,104,4 duplicate(08santa) Santa Claus#0805 718
+
+
+// ============= Louise Kim - Santa Suit ===============
+// =====================================================
+xmas_in,89,92,4 script Louise Kim#iROxmas08 714,{
+ mes "[Louise Kim]";
+ mes "I always thought about how boring";
+ mes "Santa Claus is wearing a too boring";
+ mes "costume. Too boring!";
+ next;
+ mes "[Louise Kim]";
+ mes "I could make a glamorous style for";
+ mes "him!";
+ next;
+ mes "[Louise Kim]";
+ mes "I once made a costume for";
+ mes "the notorious figure Antonio!";
+ mes "The reason catching up to him";
+ mes "is so hard, is that his clothes";
+ mes "have been given strong power!";
+ mes "I blessed them with good luck!";
+ next;
+ emotion 3;
+ mes "[Louise Kim]";
+ mes "Preta Porter!!";
+ mes "Which is quite luxurious";
+ mes "but sold at good price ~";
+ next;
+ mes "[Louise Kim]";
+ mes "Hey loosers! You can share my sense";
+ mes "of fashion and wear my look if you";
+ mes "run a light mission for me.";
+ next;
+ mes "[Louise Kim]";
+ mes "Are you interested?";
+ next;
+ if (select("Nope.:Yes, please.") == 1) {
+ mes "[Louise Kim]";
+ mes "Ah!";
+ mes "You're silly! You lost your big";
+ mes "chance!";
+ next;
+ emotion 18;
+ mes "[Louise Kim]";
+ mes "Come to me later if you";
+ mes "want to get the mission.";
+ mes "I, Louise Kim, am generous";
+ mes "enough to accept you next time.";
+ close;
+ }
+ mes "[Louise Kim]";
+ mes "You're so cool.";
+ next;
+ mes "[Louise Kim]";
+ mes "Don't worry about this mission.";
+ mes "It's not that difficult.";
+ mes "I'm only in need of some";
+ mes "materials. Things that are";
+ mes "beyond my ability...";
+ next;
+ mes "[Louise Kim]";
+ mes "Anyway, can you bring me some";
+ mes "stuff?";
+ next;
+ if (select("Why not? What do you need?:Sorry, no time.") == 2) {
+ emotion 18;
+ mes "[Louise Kim]";
+ mes "What?";
+ mes "You will definitely regret it.";
+ mes "No more chances later.";
+ close;
+ }
+ mes "[Louise Kim]";
+ mes "All right, you're cool!!";
+ mes "You need to bring me: ^0000FFCotton Shirt,";
+ mes "3 Red Potion, Holy Water, 4 Wrapping";
+ mes "Paper, Wrapping Lace^000000..";
+ next;
+ mes "[Louise Kim]";
+ mes "If you bring me all that stuff, I";
+ mes "can make you a glamorous Santa";
+ mes "costume.";
+ next;
+ if (countitem(2301) < 1 || countitem(501) < 3 || countitem(523) < 1 || countitem(7175) < 4 || countitem(7174) < 1) {
+ mes "[Louise Kim]";
+ mes "If you were to bring me all the";
+ mes "stuff, I would make you a wonderful";
+ mes "costume, for free...";
+ next;
+ emotion 3;
+ mes "[Louise Kim]";
+ mes "Please see me again if you are";
+ mes "interested.";
+ close;
+ }else{
+ select("Here you are.");
+ emotion 33;
+ mes "[Louise Kim]";
+ mes "Oh! Good!";
+ mes "Let's not delay.";
+ mes "I will show you my limitless";
+ mes "ability.";
+ next;
+ mes "-She pours everything in a pot-";
+ mes "-even the shirt goes in!-";
+ mes "-She takes it out with skill-";
+ mes "-and many blessings she sings.-";
+ next;
+ specialeffect 42;
+ emotion 2;
+ mes "[Louise Kim]";
+ mes "By artist, Louise Kim!";
+ mes "All over the world will be blessed";
+ mes "tonight!";
+ next;
+ mes "-Pour red potion in another pot-";
+ mes "-then stir all of its parts.-";
+ mes "-Put the cotton shirts in-";
+ mes "-and dye it for grateful hearts.-";
+ mes "-Thread by thread-";
+ mes "-String by string-";
+ mes "-Count your blessings and sing!-";
+ next;
+ specialeffect 75;
+ emotion 2;
+ mes "[Louise Kim]";
+ mes "By artist, Louise Kim!";
+ mes "All over the world will be blessed";
+ mes "tonight!";
+ next;
+ mes "-She is knitting clothes-";
+ mes "-with a hooked needle-";
+ mes "-with her great skill.-";
+ mes "Spread your blessings,-";
+ mes "cheer and goodwill!-";
+ next;
+ specialeffect 91;
+ emotion 3;
+ mes "[Louise Kim]";
+ mes "This is miraculous!";
+ mes "I am a genius of the world.";
+ mes "Artist, Louise Kim!!!";
+ next;
+ mes "[Louise Kim]";
+ mes "All right! Isn't it wonderful?";
+ mes "You can call it what you wish.";
+ mes "My fashion is radiant.";
+ mes "I ain't envious of Designer";
+ mes "Pierre.";
+ next;
+ emotion 18;
+ mes "[Louise Kim]";
+ mes "I am supposed to get paid well,";
+ mes "however I will just let it";
+ mes "be free, since this is Christmas!";
+ next;
+ delitem 2301,1;
+ delitem 501,3;
+ delitem 523,1;
+ delitem 7175,4;
+ delitem 7174,1;
+ getitem 12132,1;
+ mes "[Louise Kim]";
+ mes "Go brag about these wonderful";
+ mes "clothes. There wouldn't be";
+ mes "any without me, Louise Kim.";
+ close;
+ }
+}
+
+//XMAS MOBS
+prt_fild00,0,0,0,0 monster Christmas Jakk 1244,5,0,0,0
+prt_fild00,0,0,0,0 monster Christmas Goblin 1245,5,0,0,0
+prt_fild00,0,0,0,0 monster Christmas Cookie 1246,5,0,0,0
+prt_fild00,0,0,0,0 monster Antonio 1247,1,0,0,0
+
+prt_fild01,0,0,0,0 monster Christmas Jakk 1244,5,0,0,0
+prt_fild01,0,0,0,0 monster Christmas Goblin 1245,5,0,0,0
+prt_fild01,0,0,0,0 monster Christmas Cookie 1246,5,0,0,0
+prt_fild01,0,0,0,0 monster Antonio 1247,1,0,0,0
+
+prt_fild02,0,0,0,0 monster Christmas Jakk 1244,5,0,0,0
+prt_fild02,0,0,0,0 monster Christmas Goblin 1245,5,0,0,0
+prt_fild02,0,0,0,0 monster Christmas Cookie 1246,5,0,0,0
+prt_fild02,0,0,0,0 monster Antonio 1247,1,0,0,0
+
+prt_fild03,0,0,0,0 monster Christmas Jakk 1244,5,0,0,0
+prt_fild03,0,0,0,0 monster Christmas Goblin 1245,5,0,0,0
+prt_fild03,0,0,0,0 monster Christmas Cookie 1246,5,0,0,0
+prt_fild03,0,0,0,0 monster Antonio 1247,1,0,0,0
+
+prt_fild04,0,0,0,0 monster Christmas Jakk 1244,5,0,0,0
+prt_fild04,0,0,0,0 monster Christmas Goblin 1245,5,0,0,0
+prt_fild04,0,0,0,0 monster Christmas Cookie 1246,5,0,0,0
+prt_fild04,0,0,0,0 monster Antonio 1247,1,0,0,0
+
+prt_fild05,0,0,0,0 monster Christmas Jakk 1244,5,0,0,0
+prt_fild05,0,0,0,0 monster Christmas Goblin 1245,5,0,0,0
+prt_fild05,0,0,0,0 monster Christmas Cookie 1246,5,0,0,0
+prt_fild05,0,0,0,0 monster Antonio 1247,1,0,0,0
+
+prt_fild06,0,0,0,0 monster Christmas Jakk 1244,5,0,0,0
+prt_fild06,0,0,0,0 monster Christmas Goblin 1245,5,0,0,0
+prt_fild06,0,0,0,0 monster Christmas Cookie 1246,5,0,0,0
+prt_fild06,0,0,0,0 monster Antonio 1247,1,0,0,0
+
+prt_fild07,0,0,0,0 monster Christmas Jakk 1244,5,0,0,0
+prt_fild07,0,0,0,0 monster Christmas Goblin 1245,5,0,0,0
+prt_fild07,0,0,0,0 monster Christmas Cookie 1246,5,0,0,0
+prt_fild07,0,0,0,0 monster Antonio 1247,1,0,0,0
+
+prt_fild08,0,0,0,0 monster Christmas Jakk 1244,5,0,0,0
+prt_fild08,0,0,0,0 monster Christmas Goblin 1245,5,0,0,0
+prt_fild08,0,0,0,0 monster Christmas Cookie 1246,5,0,0,0
+prt_fild08,0,0,0,0 monster Antonio 1247,1,0,0,0
+
+prt_fild09,0,0,0,0 monster Christmas Jakk 1244,5,0,0,0
+prt_fild09,0,0,0,0 monster Christmas Goblin 1245,5,0,0,0
+prt_fild09,0,0,0,0 monster Christmas Cookie 1246,5,0,0,0
+prt_fild09,0,0,0,0 monster Antonio 1247,1,0,0,0
+
+prt_fild10,0,0,0,0 monster Christmas Jakk 1244,5,0,0,0
+prt_fild10,0,0,0,0 monster Christmas Goblin 1245,5,0,0,0
+prt_fild10,0,0,0,0 monster Christmas Cookie 1246,5,0,0,0
+prt_fild10,0,0,0,0 monster Antonio 1247,1,0,0,0
+
+prt_fild11,0,0,0,0 monster Christmas Jakk 1244,5,0,0,0
+prt_fild11,0,0,0,0 monster Christmas Goblin 1245,5,0,0,0
+prt_fild11,0,0,0,0 monster Christmas Cookie 1246,5,0,0,0
+prt_fild11,0,0,0,0 monster Antonio 1247,1,0,0,0
+
+pay_fild01,0,0,0,0 monster Christmas Jakk 1244,5,0,0,0
+pay_fild01,0,0,0,0 monster Christmas Goblin 1245,5,0,0,0
+pay_fild01,0,0,0,0 monster Christmas Cookie 1246,5,0,0,0
+pay_fild01,0,0,0,0 monster Antonio 1247,1,0,0,0
+
+pay_fild02,0,0,0,0 monster Christmas Jakk 1244,5,0,0,0
+pay_fild02,0,0,0,0 monster Christmas Goblin 1245,5,0,0,0
+pay_fild02,0,0,0,0 monster Christmas Cookie 1246,5,0,0,0
+pay_fild02,0,0,0,0 monster Antonio 1247,1,0,0,0
+
+pay_fild03,0,0,0,0 monster Christmas Jakk 1244,5,0,0,0
+pay_fild03,0,0,0,0 monster Christmas Goblin 1245,5,0,0,0
+pay_fild03,0,0,0,0 monster Christmas Cookie 1246,5,0,0,0
+pay_fild03,0,0,0,0 monster Antonio 1247,1,0,0,0
+
+pay_fild04,0,0,0,0 monster Christmas Jakk 1244,5,0,0,0
+pay_fild04,0,0,0,0 monster Christmas Goblin 1245,5,0,0,0
+pay_fild04,0,0,0,0 monster Christmas Cookie 1246,5,0,0,0
+pay_fild04,0,0,0,0 monster Antonio 1247,1,0,0,0
+
+pay_fild05,0,0,0,0 monster Christmas Jakk 1244,5,0,0,0
+pay_fild05,0,0,0,0 monster Christmas Goblin 1245,5,0,0,0
+pay_fild05,0,0,0,0 monster Christmas Cookie 1246,5,0,0,0
+pay_fild05,0,0,0,0 monster Antonio 1247,1,0,0,0
+
+pay_fild06,0,0,0,0 monster Christmas Jakk 1244,5,0,0,0
+pay_fild06,0,0,0,0 monster Christmas Goblin 1245,5,0,0,0
+pay_fild06,0,0,0,0 monster Christmas Cookie 1246,5,0,0,0
+pay_fild06,0,0,0,0 monster Antonio 1247,1,0,0,0
+
+pay_fild07,0,0,0,0 monster Christmas Jakk 1244,5,0,0,0
+pay_fild07,0,0,0,0 monster Christmas Goblin 1245,5,0,0,0
+pay_fild07,0,0,0,0 monster Christmas Cookie 1246,5,0,0,0
+pay_fild07,0,0,0,0 monster Antonio 1247,1,0,0,0
+
+pay_fild08,0,0,0,0 monster Christmas Jakk 1244,5,0,0,0
+pay_fild08,0,0,0,0 monster Christmas Goblin 1245,5,0,0,0
+pay_fild08,0,0,0,0 monster Christmas Cookie 1246,5,0,0,0
+pay_fild08,0,0,0,0 monster Antonio 1247,1,0,0,0
+
+pay_fild09,0,0,0,0 monster Christmas Jakk 1244,5,0,0,0
+pay_fild09,0,0,0,0 monster Christmas Goblin 1245,5,0,0,0
+pay_fild09,0,0,0,0 monster Christmas Cookie 1246,5,0,0,0
+pay_fild09,0,0,0,0 monster Antonio 1247,1,0,0,0
+
+pay_fild10,0,0,0,0 monster Christmas Jakk 1244,5,0,0,0
+pay_fild10,0,0,0,0 monster Christmas Goblin 1245,5,0,0,0
+pay_fild10,0,0,0,0 monster Christmas Cookie 1246,5,0,0,0
+pay_fild10,0,0,0,0 monster Antonio 1247,1,0,0,0
+
+pay_fild11,0,0,0,0 monster Christmas Jakk 1244,5,0,0,0
+pay_fild11,0,0,0,0 monster Christmas Goblin 1245,5,0,0,0
+pay_fild11,0,0,0,0 monster Christmas Cookie 1246,5,0,0,0
+pay_fild11,0,0,0,0 monster Antonio 1247,1,0,0,0
+
+gef_fild00,0,0,0,0 monster Christmas Jakk 1244,5,0,0,0
+gef_fild00,0,0,0,0 monster Christmas Goblin 1245,5,0,0,0
+gef_fild00,0,0,0,0 monster Christmas Cookie 1246,5,0,0,0
+gef_fild00,0,0,0,0 monster Antonio 1247,1,0,0,0
+
+gef_fild01,0,0,0,0 monster Christmas Jakk 1244,5,0,0,0
+gef_fild01,0,0,0,0 monster Christmas Goblin 1245,5,0,0,0
+gef_fild01,0,0,0,0 monster Christmas Cookie 1246,5,0,0,0
+gef_fild01,0,0,0,0 monster Antonio 1247,1,0,0,0
+
+gef_fild02,0,0,0,0 monster Christmas Jakk 1244,5,0,0,0
+gef_fild02,0,0,0,0 monster Christmas Goblin 1245,5,0,0,0
+gef_fild02,0,0,0,0 monster Christmas Cookie 1246,5,0,0,0
+gef_fild02,0,0,0,0 monster Antonio 1247,1,0,0,0
+
+gef_fild03,0,0,0,0 monster Christmas Jakk 1244,5,0,0,0
+gef_fild03,0,0,0,0 monster Christmas Goblin 1245,5,0,0,0
+gef_fild03,0,0,0,0 monster Christmas Cookie 1246,5,0,0,0
+gef_fild03,0,0,0,0 monster Antonio 1247,1,0,0,0
+
+gef_fild04,0,0,0,0 monster Christmas Jakk 1244,5,0,0,0
+gef_fild04,0,0,0,0 monster Christmas Goblin 1245,5,0,0,0
+gef_fild04,0,0,0,0 monster Christmas Cookie 1246,5,0,0,0
+gef_fild04,0,0,0,0 monster Antonio 1247,1,0,0,0
+
+gef_fild05,0,0,0,0 monster Christmas Jakk 1244,5,0,0,0
+gef_fild05,0,0,0,0 monster Christmas Goblin 1245,5,0,0,0
+gef_fild05,0,0,0,0 monster Christmas Cookie 1246,5,0,0,0
+gef_fild05,0,0,0,0 monster Antonio 1247,1,0,0,0
+
+gef_fild06,0,0,0,0 monster Christmas Jakk 1244,5,0,0,0
+gef_fild06,0,0,0,0 monster Christmas Goblin 1245,5,0,0,0
+gef_fild06,0,0,0,0 monster Christmas Cookie 1246,5,0,0,0
+gef_fild06,0,0,0,0 monster Antonio 1247,1,0,0,0
+
+gef_fild07,0,0,0,0 monster Christmas Jakk 1244,5,0,0,0
+gef_fild07,0,0,0,0 monster Christmas Goblin 1245,5,0,0,0
+gef_fild07,0,0,0,0 monster Christmas Cookie 1246,5,0,0,0
+gef_fild07,0,0,0,0 monster Antonio 1247,1,0,0,0
+
+gef_fild08,0,0,0,0 monster Christmas Jakk 1244,5,0,0,0
+gef_fild08,0,0,0,0 monster Christmas Goblin 1245,5,0,0,0
+gef_fild08,0,0,0,0 monster Christmas Cookie 1246,5,0,0,0
+gef_fild08,0,0,0,0 monster Antonio 1247,1,0,0,0
+
+gef_fild09,0,0,0,0 monster Christmas Jakk 1244,5,0,0,0
+gef_fild09,0,0,0,0 monster Christmas Goblin 1245,5,0,0,0
+gef_fild09,0,0,0,0 monster Christmas Cookie 1246,5,0,0,0
+gef_fild09,0,0,0,0 monster Antonio 1247,1,0,0,0
+
+gef_fild10,0,0,0,0 monster Christmas Jakk 1244,5,0,0,0
+gef_fild10,0,0,0,0 monster Christmas Goblin 1245,5,0,0,0
+gef_fild10,0,0,0,0 monster Christmas Cookie 1246,5,0,0,0
+gef_fild10,0,0,0,0 monster Antonio 1247,1,0,0,0
+
+gef_fild11,0,0,0,0 monster Christmas Jakk 1244,5,0,0,0
+gef_fild11,0,0,0,0 monster Christmas Goblin 1245,5,0,0,0
+gef_fild11,0,0,0,0 monster Christmas Cookie 1246,5,0,0,0
+gef_fild11,0,0,0,0 monster Antonio 1247,1,0,0,0
+
+gef_fild12,0,0,0,0 monster Christmas Jakk 1244,5,0,0,0
+gef_fild12,0,0,0,0 monster Christmas Goblin 1245,5,0,0,0
+gef_fild12,0,0,0,0 monster Christmas Cookie 1246,5,0,0,0
+gef_fild12,0,0,0,0 monster Antonio 1247,1,0,0,0
+
+gef_fild13,0,0,0,0 monster Christmas Jakk 1244,5,0,0,0
+gef_fild13,0,0,0,0 monster Christmas Goblin 1245,5,0,0,0
+gef_fild13,0,0,0,0 monster Christmas Cookie 1246,5,0,0,0
+gef_fild13,0,0,0,0 monster Antonio 1247,1,0,0,0
+
+gef_fild14,0,0,0,0 monster Christmas Jakk 1244,5,0,0,0
+gef_fild14,0,0,0,0 monster Christmas Goblin 1245,5,0,0,0
+gef_fild14,0,0,0,0 monster Christmas Cookie 1246,5,0,0,0
+gef_fild14,0,0,0,0 monster Antonio 1247,1,0,0,0
+
+xmas_fild01,0,0,0,0 monster Christmas Jakk 1244,5,0,0,0
+xmas_fild01,0,0,0,0 monster Christmas Goblin 1245,5,0,0,0
+xmas_fild01,0,0,0,0 monster Christmas Cookie 1246,5,0,0,0
xmas_fild01,0,0,0,0 monster Antonio 1247,1,0,0,0 \ No newline at end of file
diff --git a/npc/events/valentinesday_2009.txt b/npc/events/valentinesday_2009.txt
index 0ecb45896..02845d3e2 100644
--- a/npc/events/valentinesday_2009.txt
+++ b/npc/events/valentinesday_2009.txt
@@ -1,784 +1,784 @@
-//===== eAthena Script =======================================
-//= iRO Valentine's Day Event (2009)
-//===== By: ==================================================
-//= Kisuka
-//===== Current Version: =====================================
-//= 1.2
-//===== Compatible With: =====================================
-//= eAthena SVN
-//===== Description: =========================================
-//= iRO Valentine's Day Event. (2009)
-//= Make Chocolate/Chocolate Boxes/Home-Made Chocolate.
-//= Make Valentine's Rings/Boxes.
-//= Trade rings to those of opposite gender.
-//= Register rings you have gotten for votes.
-//=
-//= The male and female with the most votes at the end of
-//= the event will receive item (14466) from GM team.
-//=
-//= Must enable the event items in item_db2 and item_trade!
-//===== Additional Comments: =================================
-//= 1.0 First version. [Kisuka]
-//= 1.1-1.2 Fixed exploits with unlimited rings and non deleting choco [Lupus]
-//============================================================
-
-// Marco Bassinio (Chocolate/Chocolate Box maker)
-prontera,164,174,4 script Trader#Val09 58,{
- mes "[Marco Bassinio]";
- mes "Hey, folks! Here's something you don't see everyday!";
- mes "Something you can never find in Rune-Midgarts!";
- mes "Something that makes you happy with just one bite!";
- next;
- mes "[Marco Bassinio]";
- mes "It's the perfect dessert and the perfect gift for loved ones.";
- mes "High-quality, traditional homemade chocolate only 5000z each!";
- next;
- switch(select("I'll take it, please!:I want to wrap the chocolate!:End trading.")) {
- case 1:
- mes "[Marco Bassinio]";
- mes "Ahaha, my dear.";
- mes "This chocolate is";
- mes "nothing like others.";
- mes "Every piece bears the";
- mes "devotion of the person";
- mes "who made it!";
- next;
- mes "[Marco Bassinio]";
- mes "So, that's why I can't sell";
- mes "more than 5 of them at a time.";
- mes "If you really really want more,";
- mes "then talk to me again.";
- mes "How many do you want anyway?";
- next;
- while(.@input <= 0 || .@input > 5) {
- input .@input;
- if (.@input < 1) {
- mes "[Marco Bassinio]";
- mes "Oh, it's such a shame!";
- mes "I'm sure you'll miss";
- mes "this opportunity and";
- mes "regret you didn't buy it.";
- next;
- mes "[Marco Bassinio]";
- mes "Remember, you can never";
- mes "find this anywhere else!";
- mes "Come back anytime,";
- mes "when you change your mind.";
- close;
- }
- if (.@val09choco > 5) {
- mes "[Marco Bassinio]";
- mes "Ugh.. Didn't I tell you?";
- mes "5 is the maximum!";
- mes "I can't sell more than";
- mes "that to the same person.";
- next;
- mes "[Marco Bassinio]";
- mes "And you know it's not";
- mes "like an everyday meal.";
- mes "Eating too much is not";
- mes "really good for you.";
- next;
- }
- }
- if (!checkweight(558, .@input)) {
- mes "[Marco Bassinio]";
- mes "You're carrying too many items.";
- mes "Please use the Kafra Services.";
- close;
- }
- set .@price, .@input * 5000;
- if (Zeny < .@price) {
- mes "[Marco Bassinio]";
- mes "Looks like you don't have";
- mes "enough zeny with ya.";
- mes "Maybe you should borrow";
- mes "some zeny from a friend.";
- mes "Cuz, I'm not gonna";
- mes "be here everyday.";
- close;
- }else{
- mes "[Marco Bassinio]";
- mes "Good for you!";
- mes "It's also perfect as a gift!";
- mes "You know you can't get this";
- mes "kind of chocolate normally.";
- next;
- mes "[Marco Bassinio]";
- mes "If you want more,";
- mes "you should come back.";
- mes "Might be a good idea to";
- mes "buy some more while";
- mes "you have a chance...!";
- set Zeny,Zeny - .@price;
- getitem 558,.@input;
- close;
- }
- case 2:
- mes "[Marco Bassinio]";
- mes "If you want to gift-wrap";
- mes "the chocolate, of course,";
- mes "you need chocolate,";
- mes "plus, wrapping paper,";
- mes "wrapping strap and a box.";
- next;
- mes "[Marco Bassinio]";
- mes "You also need to pay";
- mes "500 zeny to carve your";
- mes "name on the box.";
- mes "Are you all prepared...?";
- next;
- if(countitem(7175) < 1 || countitem(7174) < 1 || countitem(7948) < 1 || Zeny < 500) {
- mes "[Marco Bassinio]";
- mes "Hmm.. Looks like you don't";
- mes "have enough materials to";
- mes "decorate the gift box..";
- mes "You can't just put your gift";
- mes "into some plain looking box..";
- mes "Don't you think?";
- next;
- mes "[Marco Bassinio]";
- mes "You need to bring some";
- mes "wrapping paper,";
- mes "wrapping strap, and a box.";
- mes "Oh, also bring 500 zeny,";
- mes "and don't forget to bring your";
- mes "true loving heart with you!!";
- close;
- }
- if(countitem(558) < 1) {
- mes "[Marco Bassinio]";
- mes "Hey, look, adventurer!";
- mes "I can't create something right away!";
- mes "You know I'm not an alchemist or anything.";
- next;
- mes "[Marco Bassinio]";
- mes "You're not saying that you";
- mes "want an empty chocolate box";
- mes "without any chocolate in it,";
- mes "am I right?";
- close;
- }
- if (!checkweight(12744,1)) {
- mes "[Marco Bassinio]";
- mes "You're carrying too many items.";
- mes "Please use the Kafra Services.";
- close;
- }
- mes "[Marco Bassinio]";
- mes "Here, look!";
- mes "It's your chocolate box";
- mes "with your name on it.";
- mes "Isn't it fabulous?";
- mes "See, your name looks";
- mes "great on the box!";
- next;
- delitem 558,1;
- delitem 7175,1;
- delitem 7174,1;
- delitem 7948,1;
- set Zeny,Zeny-500;
- getnameditem 12744,strcharinfo(0);
- mes "[Marco Bassinio]";
- mes "Happy Valentine's Day!";
- mes "Valentine's the reason I came back.";
- close;
- case 3:
- mes "[Marco Bassinio]";
- mes "Oh, it's such a shame!";
- mes "I'm sure you'll miss";
- mes "this opportunity and";
- mes "regret you didn't buy it.";
- next;
- mes "[Marco Bassinio]";
- mes "Remember, you can never";
- mes "find this anywhere else!";
- mes "Come back anytime,";
- mes "when you change your mind.";
- close;
- }
-}
-
-// Packs Trader (Sells Wrapping Paper, Lace, and Box)
-prontera,147,171,5 script Packs Trader#Val09 58,{
- mes "[Packs Trader]";
- mes "Hello.";
- mes "I am a Packs Trader,";
- mes "I sell paper boxes and";
- mes "supplies for packing presents.";
- next;
- while(1) {
- mes "[Packs Trader]";
- mes "Do you have something to buy?";
- next;
- switch(select("Packing Paper:Packing Ribbon:Box:Cancel.")) {
- case 1:
- mes "[Packs Trader]";
- mes "It's 200 zeny for";
- mes "1 Packing Paper.";
- mes "How many do you want?";
- mes "You can't buy more";
- mes "than 10 items at once.";
- next;
- input .@input;
- if (.@input <= 0) {
- mes "[Packs Trader]";
- mes "Nothing to buy.";
- mes "Come back when";
- mes "you need something.";
- close;
- }
- if (.@input > 10) {
- mes "[Packs Trader]";
- mes "I told you not to buy more than 10...";
- next;
- break;
- }
- if (!checkweight(7175,.@input)) {
- mes "[Packs Trader]";
- mes "You're carrying too many items.";
- mes "Please use the Kafra Services.";
- close;
- }
- set .@price, .@input * 200;
- if (Zeny < .@price) {
- mes "[Packs Trader]";
- mes "You don't have enough money.";
- mes "Please check your wallet.";
- next;
- break;
- }else{
- mes "[Packs Trader]";
- mes "Here they are.";
- mes "Hope it makes your";
- mes "Valentine's Day";
- mes "more pleasing!";
- set Zeny,Zeny-.@price;
- getitem 7175,.@input;
- next;
- break;
- }
- case 2:
- mes "[Packs Trader]";
- mes "It's 200 zeny for";
- mes "1 Packing Ribbon.";
- mes "How many do you want?";
- mes "You can't buy more";
- mes "than 10 items at once.";
- next;
- input .@input;
- if (.@input <= 0) {
- mes "[Packs Trader]";
- mes "Nothing to buy.";
- mes "Come back when";
- mes "you need something.";
- close;
- }
- if (.@input > 10) {
- mes "[Packs Trader]";
- mes "I told you not to buy more than 10...";
- next;
- break;
- }
- if (!checkweight(7174,.@input)) {
- mes "[Packs Trader]";
- mes "You're carrying too many items.";
- mes "Please use the Kafra Services.";
- close;
- }
- set .@price, .@input * 200;
- if (Zeny < .@price) {
- mes "[Packs Trader]";
- mes "You don't have enough money.";
- mes "Please check your wallet.";
- next;
- break;
- }else{
- mes "[Packs Trader]";
- mes "Here they are.";
- mes "Hope it makes your";
- mes "Valentine's Day";
- mes "more pleasing!";
- set Zeny,Zeny-.@price;
- getitem 7174,.@input;
- next;
- break;
- }
- case 3:
- mes "[Packs Trader]";
- mes "It's 600 zeny for";
- mes "1 Box.";
- mes "How many do you want?";
- mes "You can't buy more";
- mes "than 10 items at once.";
- next;
- input .@input;
- if (.@input <= 0) {
- mes "[Packs Trader]";
- mes "Nothing to buy.";
- mes "Come back when";
- mes "you need something.";
- close;
- }
- if (.@input > 10) {
- mes "[Packs Trader]";
- mes "I told you not to buy more than 10...";
- next;
- break;
- }
- if (!checkweight(7948,.@input)) {
- mes "[Packs Trader]";
- mes "You're carrying too many items.";
- mes "Please use the Kafra Services.";
- close;
- }
- set .@price, .@input * 600;
- if (Zeny < .@price) {
- mes "[Packs Trader]";
- mes "You don't have enough money.";
- mes "Please check your wallet.";
- next;
- break;
- }else{
- mes "[Packs Trader]";
- mes "Here they are.";
- mes "Hope it makes your";
- mes "Valentine's Day";
- mes "more pleasing!";
- set Zeny,Zeny-.@price;
- getitem 7948,.@input;
- next;
- break;
- }
- case 4:
- mes "[Packs Trader]";
- mes "Goodbye!";
- mes "And enjoy your";
- mes "Valentine's Day.";
- close;
- }
- }
-}
-
-// Event Ring Maker (Makes ring for players)
-prontera,154,185,5 script Event Ring Maker#Val09 721,{
- if (BaseLevel < 75) {
- mes "[Event Ring Maker]";
- mes "Hello, I only make the";
- mes "Valentine rings to those";
- mes "experienced adventurers";
- mes "Level 75 or above.";
- next;
- mes "[Event Ring Maker]";
- mes "You're not fully";
- mes "experienced yet.";
- mes "Come back when you're";
- mes "experienced enough to";
- mes "handle the quests.";
- close;
- }
-
- if (iROval09ring >= 1) {
- mes "[Event Ring Maker]";
- mes "The box with the ring,";
- mes "carved with your name,";
- mes "is for the one you love.";
- next;
- mes "[Event Ring Maker]";
- mes "As for the rings that you";
- mes "receive from others, they";
- mes "should all be registered";
- mes "with the Vote Manager.";
- mes "She is standing near";
- mes "the Prontera Fountain.";
- next;
- mes "[Event Ring Maker]";
- mes "Only the most popular";
- mes "male and female are";
- mes "subjected to getting rewards.";
- mes "Be aware, and always";
- mes "try to stay popular!";
- close;
- }
-
- mes "[Event Ring Maker]";
- mes "Hi, there, how are ya?";
- mes "Come to me if you're";
- mes "interested in the event,";
- mes "'Who's Valentine's Hottest?'";
- next;
- mes "[Event Ring Maker]";
- mes "I make the most precious";
- mes "rings that you can give";
- mes "to your sweethearts.";
- mes "Those rings are very special";
- mes "because I carve";
- mes "your names on them!";
- next;
- mes "[Event Ring Maker]";
- mes "Isn't it exciting?";
- mes "Isn't it such a brilliant idea?";
- mes "Give these special rings";
- mes "to your sweethearts!";
- next;
- mes "[Event Ring Maker]";
- mes "You should hurry 'cuz";
- mes "this event will only";
- mes "last for two weeks.";
- mes "Give that special someone";
- mes "a gift of a Valentine's ring.";
- next;
- mes "[Event Ring Maker]";
- mes "Remember, you can only";
- mes "generate the ring once.";
- mes "You also need Wrapping Paper,";
- mes "Wrapping Strap and a Box";
- mes "to make the ring.";
- next;
- mes "[Event Ring Maker]";
- mes "So you better be sure";
- mes "of who you give this to.";
- mes "By the way,";
- mes "It costs 1,000 zeny.";
- mes "Would you like to make one?";
- next;
- if(select("Hmm.. I gotta give it a second thought...:Sure.") == 1) {
- mes "[Event Ring Maker]";
- mes "Alrighty!";
- mes "You can't put a rush";
- mes "on such a thing like this.";
- mes "Think about what";
- mes "you truly want.";
- mes "Just follow your heart!";
- close;
- }
- if(countitem(7175) < 1 || countitem(7174) < 1 || countitem(7948) < 1 || Zeny < 1000) {
- mes "[Event Ring Maker]";
- mes "Well, you don't have";
- mes "enough materials";
- mes "to make a gift box.";
- mes "Check what you have,";
- mes "and come back later";
- mes "with all the materials.";
- close;
- }
- mes "[Event Ring Maker]";
- mes "Okie Dokie!";
- mes "I'll make it right away.";
- next;
- delitem 7175,1;
- delitem 7174,1;
- delitem 7948,1;
- set Zeny,Zeny-1000;
- set iROval09ring,1;
- if (Sex) {
- getnameditem 12742,strcharinfo(0);
- }else{
- getnameditem 12743,strcharinfo(0);
- }
- mes "[Event Ring Maker]";
- mes "Here, the most precious";
- mes "ring in the world!";
- mes "Don't forget, you can never";
- mes "make this ring again.";
- next;
- mes "[Event Ring Maker]";
- mes "You must pick out the one";
- mes "that you really really love,";
- mes "and give this ring";
- mes "to that person.";
- next;
- mes "[Event Ring Maker]";
- mes "Of course, you've got to";
- mes "get rings from others,";
- mes "that's the way you can";
- mes "participate in the voting, right?";
- mes "Challenge yourself to become";
- mes "Valentine's Hottest!";
- close;
-}
-
-// Valentine Vote Manager (Registers votes)
-prontera,157,185,4 script Valentine Vote Manager#v 113,{
- mes "[Valentine Vote Manager]";
- mes "Hello, I'm the Valentine's";
- mes "Vote Manager.";
- mes "I'm in charge of collecting";
- mes "rings for this event!";
- next;
- mes "[Valentine Vote Manager]";
- mes "I register the rings";
- mes "you get from others";
- mes "and I calculate the";
- mes "total number of rings.";
- next;
- mes "[Valentine Vote Manager]";
- mes "You know what I do besides";
- mes "just counting those rings?";
- mes "I can tell you the adventurer's";
- mes "name who's got the";
- mes "most number of votes.";
- next;
- mes "[Valentine Vote Manager]";
- mes "Plus, you can also find out how";
- mes "many votes he/she got.";
- next;
- while (1) {
- mes "[Valentine Vote Manager]";
- mes "So, what do you want?";
- next;
- switch(select("Please register my rings.:Please count my votes.:Nothing, for now.")) {
- case 1:
- mes "[Valentine Vote Manager]";
- mes "Please tell me how many";
- mes "rings you want to register.";
- next;
- mes "[Valentine Vote Manager]";
- mes "When you write the";
- mes "number of the rings,";
- mes "the number shouldn't be";
- mes "larger than the number of";
- mes "rings you actually have.";
- mes "'0', cancels everything.";
- next;
- input .@input;
-
- if (.@input <= 0) {
- mes "[Valentine Vote Manager]";
- mes "You have entered 0.";
- mes "Registration is cancelled.";
- next;
- break;
- }
-
- if (Sex) {
- if (countitem(7947) > .@input) {
- mes "[Valentine Vote Manager]";
- mes "Seems like the value you entered is too small.";
- mes "I know you've got more. Be honest, dear.";
- next;
- break;
- }
-
- if (countitem(7947) < .@input) {
- mes "[Valentine Vote Manager]";
- mes "Seems like the value you entered is too large.";
- mes "I know you've got less. Be honest, dear.";
- next;
- break;
- }
-
- mes "[Valentine Vote Manager]";
- mes "I'll take those silver rings,";
- mes "and count the votes for you.";
- mes "Thank you for participating.";
- delitem 7947,.@input;
- set Val09Rings,Val09Rings+.@input;
- if (Val09Rings > $Val09votes_M) {
- set $Val09votes_M,Val09Rings;
- set $Val09name_M$,strcharinfo(0);
- }
- next;
- break;
- }else{
- if (countitem(7946) > .@input) {
- mes "[Valentine Vote Manager]";
- mes "Seems like the value you entered is too small.";
- mes "I know you've got more. Be honest, dear.";
- next;
- break;
- }
-
- if (countitem(7946) < .@input) {
- mes "[Valentine Vote Manager]";
- mes "Seems like the value you entered is too large.";
- mes "I know you've got less. Be honest, dear.";
- next;
- break;
- }
-
- mes "[Valentine Vote Manager]";
- mes "I'll take those gold rings,";
- mes "and count the votes for you.";
- mes "Thank you for participating.";
- delitem 7946,.@input;
- set Val09Rings,Val09Rings+.@input;
- if (Val09Rings > $Val09votes_F) {
- set $Val09votes_F,Val09Rings;
- set $Val09name_F$,strcharinfo(0);
- }
- next;
- break;
- }
- case 2:
- mes "[Valentine Vote Manager]";
- mes "Let's see...";
- mes "You have registered..";
- mes ".."+Val09Rings+" rings so far.";
- mes "and...";
- next;
- mes "[Valentine Vote Manager]";
- mes "The current record shows... "+$Val09name_M$+" is the male vote leader who's registered the total of "+$Val09votes_M+" rings.";
- next;
- mes "[Valentine Vote Manager]";
- mes "The current record shows... "+$Val09name_F$+" is the female vote leader who's registered the total of "+$Val09votes_F+" rings.";
- next;
- break;
-
- case 3:
- mes "[Valentine Vote Manager]";
- mes "Hey, you can be popular too!";
- mes "Anyone can... really!";
- mes "Though you have to try a lot";
- mes "harder, but still~ Hahaha!";
- close;
- }
- }
-}
-
-// Charles Orleans (Makes Home-Made Chocolates)
-prt_castle,42,35,3 script Dessert Manager#Val09 47,{
- if (Sex) {
- mes "[Charles Orleans]";
- mes "Monsieur~! What brings";
- mes "you to my beautiful atelier?";
- mes "What is it that you want?";
- mes "Well, my sparkling eyes";
- mes "get dried and lose their shine";
- mes "if not for the pretty little lady.";
- next;
- mes "[Charles Orleans]";
- mes "Please leave me alone unless";
- mes "you have business with me.";
- mes "Haaaa~ I'm a busy person.";
- mes "Don't bother me....";
- mes "Annoying, annoying, annoying~~!";
- close;
- }
-
- mes "[Charles Orleans]";
- mes "Oh, Mademoiselle!";
- mes "This little trifling space";
- mes "felt like heaven the";
- mes "minute you walked in!";
- mes "Can I help you with";
- mes "anything, if it's alright?";
- next;
- if(select("Please, make me some chocolate.:Don't bother. I'm just passing by.") == 2) {
- mes "[Charles Orleans]";
- mes "Ahhh, this is so heartbreaking.";
- mes "How could you say that?";
- mes "You're just so mean.";
- mes "Don't bother? Just passing by?";
- next;
- mes "[Charles Orleans]";
- mes "What can I do to make you";
- mes "pay a little attention to me?";
- mes "Please.. I feel like my soul is lost..";
- close;
- }
- if(countitem(558) < 3) {
- mes "[Charles Orleans]";
- mes "Ahhh, Mademoiselle.";
- mes "I'm not an alchemist,";
- mes "or a magician.";
- mes "I don't just make chocolate";
- mes "out of anything.";
- next;
- mes "[Charles Orleans]";
- mes "I always think of making";
- mes "chocolate as artistic work.";
- mes "You see, I'm no ordinary cook...";
- mes "I make chocolate with feelings..";
- mes "messages of loving hearts..";
- next;
- mes "[Charles Orleans]";
- mes "I make masterpieces.";
- mes "No one can imitate";
- mes "the looks and the taste.";
- mes "Yes, it's nothing like";
- mes "ordinary chocolate!";
- next;
- mes "[Charles Orleans]";
- mes "I'm afraid I can't make it";
- mes "and prove it to you now.";
- mes "This is really a shame!";
- next;
- mes "[Charles Orleans]";
- mes "I really want to thank";
- mes "you for visiting me";
- mes "and if you only bring";
- mes "^3152ff3 Chocolates^000000,";
- mes "I'll make you chocolate";
- mes "like you've never seen...";
- next;
- mes "[Charles Orleans]";
- mes "never tasted before...";
- mes "Mademoiselle, with your spirit,";
- mes "I'm sure you can bring";
- mes "3 pieces of chocolate.";
- mes "I have no doubt at all.";
- next;
- mes "[Charles Orleans]";
- mes "So... what do you think?";
- mes "Can you bring ^3152ff3 Chocolates^000000?";
- mes "I could get them myself,";
- mes "but I'm tied up with so much";
- mes "work as you see right now.";
- next;
- mes "[Charles Orleans]";
- mes "Adios, Mademoiselle.....";
- mes "I'll be waiting for you.";
- close;
- }else{
- if (!checkweight(559,1)) {
- mes "[Charles Orleans]";
- mes "You're carrying too many items.";
- mes "Please use the Kafra Services.";
- close;
- }
- mes "[Charles Orleans]";
- mes "Oh, Mademoiselle!";
- mes "I'll make the best chocolate";
- mes "with the pieces you've brought.";
- mes "I'm going to put the light of";
- mes "your eyes into this chocolate";
- mes "that no one can resist.";
- next;
- mes "[Charles Orleans]";
- mes "It'll be stronger than a";
- mes "sweet sweet love potion.....";
- next;
- mes "[Charles Orleans]";
- mes "Un, Deux, Trois, Quatre.....";
- mes "Just like the ugly duckling that";
- mes "turned to a beautiful swan-";
- mes "Ordinary chocolate pieces are";
- mes "becoming a piece of art!";
- next;
- mes "[Charles Orleans]";
- mes "They're changing!";
- mes "They're getting warm,";
- mes "softly changing the shape,";
- mes "getting stronger again!";
- mes "Oh, is it a master piece or";
- mes "what...!!";
- next;
- mes "[Charles Orleans]";
- mes "Here you go, Mademoiselle!";
- mes "Ahahahaha, just look at this!";
- mes "I can't believe I made this.";
- mes "Oh, I can't take my eyes off..!!";
- delitem 558,3;
- getitem 559,1;
- next;
- mes "[Charles Orleans]";
- mes "Alright. Mademoiselle,";
- mes "I hope this is just";
- mes "what you wanted,";
- mes "for it bears your";
- mes "beautiful heart inside.";
- close;
- }
-
+//===== eAthena Script =======================================
+//= iRO Valentine's Day Event (2009)
+//===== By: ==================================================
+//= Kisuka
+//===== Current Version: =====================================
+//= 1.2
+//===== Compatible With: =====================================
+//= eAthena SVN
+//===== Description: =========================================
+//= iRO Valentine's Day Event. (2009)
+//= Make Chocolate/Chocolate Boxes/Home-Made Chocolate.
+//= Make Valentine's Rings/Boxes.
+//= Trade rings to those of opposite gender.
+//= Register rings you have gotten for votes.
+//=
+//= The male and female with the most votes at the end of
+//= the event will receive item (14466) from GM team.
+//=
+//= Must enable the event items in item_db2 and item_trade!
+//===== Additional Comments: =================================
+//= 1.0 First version. [Kisuka]
+//= 1.1-1.2 Fixed exploits with unlimited rings and non deleting choco [Lupus]
+//============================================================
+
+// Marco Bassinio (Chocolate/Chocolate Box maker)
+prontera,164,174,4 script Trader#Val09 58,{
+ mes "[Marco Bassinio]";
+ mes "Hey, folks! Here's something you don't see everyday!";
+ mes "Something you can never find in Rune-Midgarts!";
+ mes "Something that makes you happy with just one bite!";
+ next;
+ mes "[Marco Bassinio]";
+ mes "It's the perfect dessert and the perfect gift for loved ones.";
+ mes "High-quality, traditional homemade chocolate only 5000z each!";
+ next;
+ switch(select("I'll take it, please!:I want to wrap the chocolate!:End trading.")) {
+ case 1:
+ mes "[Marco Bassinio]";
+ mes "Ahaha, my dear.";
+ mes "This chocolate is";
+ mes "nothing like others.";
+ mes "Every piece bears the";
+ mes "devotion of the person";
+ mes "who made it!";
+ next;
+ mes "[Marco Bassinio]";
+ mes "So, that's why I can't sell";
+ mes "more than 5 of them at a time.";
+ mes "If you really really want more,";
+ mes "then talk to me again.";
+ mes "How many do you want anyway?";
+ next;
+ while(.@input <= 0 || .@input > 5) {
+ input .@input;
+ if (.@input < 1) {
+ mes "[Marco Bassinio]";
+ mes "Oh, it's such a shame!";
+ mes "I'm sure you'll miss";
+ mes "this opportunity and";
+ mes "regret you didn't buy it.";
+ next;
+ mes "[Marco Bassinio]";
+ mes "Remember, you can never";
+ mes "find this anywhere else!";
+ mes "Come back anytime,";
+ mes "when you change your mind.";
+ close;
+ }
+ if (.@val09choco > 5) {
+ mes "[Marco Bassinio]";
+ mes "Ugh.. Didn't I tell you?";
+ mes "5 is the maximum!";
+ mes "I can't sell more than";
+ mes "that to the same person.";
+ next;
+ mes "[Marco Bassinio]";
+ mes "And you know it's not";
+ mes "like an everyday meal.";
+ mes "Eating too much is not";
+ mes "really good for you.";
+ next;
+ }
+ }
+ if (!checkweight(558, .@input)) {
+ mes "[Marco Bassinio]";
+ mes "You're carrying too many items.";
+ mes "Please use the Kafra Services.";
+ close;
+ }
+ set .@price, .@input * 5000;
+ if (Zeny < .@price) {
+ mes "[Marco Bassinio]";
+ mes "Looks like you don't have";
+ mes "enough zeny with ya.";
+ mes "Maybe you should borrow";
+ mes "some zeny from a friend.";
+ mes "Cuz, I'm not gonna";
+ mes "be here everyday.";
+ close;
+ }else{
+ mes "[Marco Bassinio]";
+ mes "Good for you!";
+ mes "It's also perfect as a gift!";
+ mes "You know you can't get this";
+ mes "kind of chocolate normally.";
+ next;
+ mes "[Marco Bassinio]";
+ mes "If you want more,";
+ mes "you should come back.";
+ mes "Might be a good idea to";
+ mes "buy some more while";
+ mes "you have a chance...!";
+ set Zeny,Zeny - .@price;
+ getitem 558,.@input;
+ close;
+ }
+ case 2:
+ mes "[Marco Bassinio]";
+ mes "If you want to gift-wrap";
+ mes "the chocolate, of course,";
+ mes "you need chocolate,";
+ mes "plus, wrapping paper,";
+ mes "wrapping strap and a box.";
+ next;
+ mes "[Marco Bassinio]";
+ mes "You also need to pay";
+ mes "500 zeny to carve your";
+ mes "name on the box.";
+ mes "Are you all prepared...?";
+ next;
+ if(countitem(7175) < 1 || countitem(7174) < 1 || countitem(7948) < 1 || Zeny < 500) {
+ mes "[Marco Bassinio]";
+ mes "Hmm.. Looks like you don't";
+ mes "have enough materials to";
+ mes "decorate the gift box..";
+ mes "You can't just put your gift";
+ mes "into some plain looking box..";
+ mes "Don't you think?";
+ next;
+ mes "[Marco Bassinio]";
+ mes "You need to bring some";
+ mes "wrapping paper,";
+ mes "wrapping strap, and a box.";
+ mes "Oh, also bring 500 zeny,";
+ mes "and don't forget to bring your";
+ mes "true loving heart with you!!";
+ close;
+ }
+ if(countitem(558) < 1) {
+ mes "[Marco Bassinio]";
+ mes "Hey, look, adventurer!";
+ mes "I can't create something right away!";
+ mes "You know I'm not an alchemist or anything.";
+ next;
+ mes "[Marco Bassinio]";
+ mes "You're not saying that you";
+ mes "want an empty chocolate box";
+ mes "without any chocolate in it,";
+ mes "am I right?";
+ close;
+ }
+ if (!checkweight(12744,1)) {
+ mes "[Marco Bassinio]";
+ mes "You're carrying too many items.";
+ mes "Please use the Kafra Services.";
+ close;
+ }
+ mes "[Marco Bassinio]";
+ mes "Here, look!";
+ mes "It's your chocolate box";
+ mes "with your name on it.";
+ mes "Isn't it fabulous?";
+ mes "See, your name looks";
+ mes "great on the box!";
+ next;
+ delitem 558,1;
+ delitem 7175,1;
+ delitem 7174,1;
+ delitem 7948,1;
+ set Zeny,Zeny-500;
+ getnameditem 12744,strcharinfo(0);
+ mes "[Marco Bassinio]";
+ mes "Happy Valentine's Day!";
+ mes "Valentine's the reason I came back.";
+ close;
+ case 3:
+ mes "[Marco Bassinio]";
+ mes "Oh, it's such a shame!";
+ mes "I'm sure you'll miss";
+ mes "this opportunity and";
+ mes "regret you didn't buy it.";
+ next;
+ mes "[Marco Bassinio]";
+ mes "Remember, you can never";
+ mes "find this anywhere else!";
+ mes "Come back anytime,";
+ mes "when you change your mind.";
+ close;
+ }
+}
+
+// Packs Trader (Sells Wrapping Paper, Lace, and Box)
+prontera,147,171,5 script Packs Trader#Val09 58,{
+ mes "[Packs Trader]";
+ mes "Hello.";
+ mes "I am a Packs Trader,";
+ mes "I sell paper boxes and";
+ mes "supplies for packing presents.";
+ next;
+ while(1) {
+ mes "[Packs Trader]";
+ mes "Do you have something to buy?";
+ next;
+ switch(select("Packing Paper:Packing Ribbon:Box:Cancel.")) {
+ case 1:
+ mes "[Packs Trader]";
+ mes "It's 200 zeny for";
+ mes "1 Packing Paper.";
+ mes "How many do you want?";
+ mes "You can't buy more";
+ mes "than 10 items at once.";
+ next;
+ input .@input;
+ if (.@input <= 0) {
+ mes "[Packs Trader]";
+ mes "Nothing to buy.";
+ mes "Come back when";
+ mes "you need something.";
+ close;
+ }
+ if (.@input > 10) {
+ mes "[Packs Trader]";
+ mes "I told you not to buy more than 10...";
+ next;
+ break;
+ }
+ if (!checkweight(7175,.@input)) {
+ mes "[Packs Trader]";
+ mes "You're carrying too many items.";
+ mes "Please use the Kafra Services.";
+ close;
+ }
+ set .@price, .@input * 200;
+ if (Zeny < .@price) {
+ mes "[Packs Trader]";
+ mes "You don't have enough money.";
+ mes "Please check your wallet.";
+ next;
+ break;
+ }else{
+ mes "[Packs Trader]";
+ mes "Here they are.";
+ mes "Hope it makes your";
+ mes "Valentine's Day";
+ mes "more pleasing!";
+ set Zeny,Zeny-.@price;
+ getitem 7175,.@input;
+ next;
+ break;
+ }
+ case 2:
+ mes "[Packs Trader]";
+ mes "It's 200 zeny for";
+ mes "1 Packing Ribbon.";
+ mes "How many do you want?";
+ mes "You can't buy more";
+ mes "than 10 items at once.";
+ next;
+ input .@input;
+ if (.@input <= 0) {
+ mes "[Packs Trader]";
+ mes "Nothing to buy.";
+ mes "Come back when";
+ mes "you need something.";
+ close;
+ }
+ if (.@input > 10) {
+ mes "[Packs Trader]";
+ mes "I told you not to buy more than 10...";
+ next;
+ break;
+ }
+ if (!checkweight(7174,.@input)) {
+ mes "[Packs Trader]";
+ mes "You're carrying too many items.";
+ mes "Please use the Kafra Services.";
+ close;
+ }
+ set .@price, .@input * 200;
+ if (Zeny < .@price) {
+ mes "[Packs Trader]";
+ mes "You don't have enough money.";
+ mes "Please check your wallet.";
+ next;
+ break;
+ }else{
+ mes "[Packs Trader]";
+ mes "Here they are.";
+ mes "Hope it makes your";
+ mes "Valentine's Day";
+ mes "more pleasing!";
+ set Zeny,Zeny-.@price;
+ getitem 7174,.@input;
+ next;
+ break;
+ }
+ case 3:
+ mes "[Packs Trader]";
+ mes "It's 600 zeny for";
+ mes "1 Box.";
+ mes "How many do you want?";
+ mes "You can't buy more";
+ mes "than 10 items at once.";
+ next;
+ input .@input;
+ if (.@input <= 0) {
+ mes "[Packs Trader]";
+ mes "Nothing to buy.";
+ mes "Come back when";
+ mes "you need something.";
+ close;
+ }
+ if (.@input > 10) {
+ mes "[Packs Trader]";
+ mes "I told you not to buy more than 10...";
+ next;
+ break;
+ }
+ if (!checkweight(7948,.@input)) {
+ mes "[Packs Trader]";
+ mes "You're carrying too many items.";
+ mes "Please use the Kafra Services.";
+ close;
+ }
+ set .@price, .@input * 600;
+ if (Zeny < .@price) {
+ mes "[Packs Trader]";
+ mes "You don't have enough money.";
+ mes "Please check your wallet.";
+ next;
+ break;
+ }else{
+ mes "[Packs Trader]";
+ mes "Here they are.";
+ mes "Hope it makes your";
+ mes "Valentine's Day";
+ mes "more pleasing!";
+ set Zeny,Zeny-.@price;
+ getitem 7948,.@input;
+ next;
+ break;
+ }
+ case 4:
+ mes "[Packs Trader]";
+ mes "Goodbye!";
+ mes "And enjoy your";
+ mes "Valentine's Day.";
+ close;
+ }
+ }
+}
+
+// Event Ring Maker (Makes ring for players)
+prontera,154,185,5 script Event Ring Maker#Val09 721,{
+ if (BaseLevel < 75) {
+ mes "[Event Ring Maker]";
+ mes "Hello, I only make the";
+ mes "Valentine rings to those";
+ mes "experienced adventurers";
+ mes "Level 75 or above.";
+ next;
+ mes "[Event Ring Maker]";
+ mes "You're not fully";
+ mes "experienced yet.";
+ mes "Come back when you're";
+ mes "experienced enough to";
+ mes "handle the quests.";
+ close;
+ }
+
+ if (iROval09ring >= 1) {
+ mes "[Event Ring Maker]";
+ mes "The box with the ring,";
+ mes "carved with your name,";
+ mes "is for the one you love.";
+ next;
+ mes "[Event Ring Maker]";
+ mes "As for the rings that you";
+ mes "receive from others, they";
+ mes "should all be registered";
+ mes "with the Vote Manager.";
+ mes "She is standing near";
+ mes "the Prontera Fountain.";
+ next;
+ mes "[Event Ring Maker]";
+ mes "Only the most popular";
+ mes "male and female are";
+ mes "subjected to getting rewards.";
+ mes "Be aware, and always";
+ mes "try to stay popular!";
+ close;
+ }
+
+ mes "[Event Ring Maker]";
+ mes "Hi, there, how are ya?";
+ mes "Come to me if you're";
+ mes "interested in the event,";
+ mes "'Who's Valentine's Hottest?'";
+ next;
+ mes "[Event Ring Maker]";
+ mes "I make the most precious";
+ mes "rings that you can give";
+ mes "to your sweethearts.";
+ mes "Those rings are very special";
+ mes "because I carve";
+ mes "your names on them!";
+ next;
+ mes "[Event Ring Maker]";
+ mes "Isn't it exciting?";
+ mes "Isn't it such a brilliant idea?";
+ mes "Give these special rings";
+ mes "to your sweethearts!";
+ next;
+ mes "[Event Ring Maker]";
+ mes "You should hurry 'cuz";
+ mes "this event will only";
+ mes "last for two weeks.";
+ mes "Give that special someone";
+ mes "a gift of a Valentine's ring.";
+ next;
+ mes "[Event Ring Maker]";
+ mes "Remember, you can only";
+ mes "generate the ring once.";
+ mes "You also need Wrapping Paper,";
+ mes "Wrapping Strap and a Box";
+ mes "to make the ring.";
+ next;
+ mes "[Event Ring Maker]";
+ mes "So you better be sure";
+ mes "of who you give this to.";
+ mes "By the way,";
+ mes "It costs 1,000 zeny.";
+ mes "Would you like to make one?";
+ next;
+ if(select("Hmm.. I gotta give it a second thought...:Sure.") == 1) {
+ mes "[Event Ring Maker]";
+ mes "Alrighty!";
+ mes "You can't put a rush";
+ mes "on such a thing like this.";
+ mes "Think about what";
+ mes "you truly want.";
+ mes "Just follow your heart!";
+ close;
+ }
+ if(countitem(7175) < 1 || countitem(7174) < 1 || countitem(7948) < 1 || Zeny < 1000) {
+ mes "[Event Ring Maker]";
+ mes "Well, you don't have";
+ mes "enough materials";
+ mes "to make a gift box.";
+ mes "Check what you have,";
+ mes "and come back later";
+ mes "with all the materials.";
+ close;
+ }
+ mes "[Event Ring Maker]";
+ mes "Okie Dokie!";
+ mes "I'll make it right away.";
+ next;
+ delitem 7175,1;
+ delitem 7174,1;
+ delitem 7948,1;
+ set Zeny,Zeny-1000;
+ set iROval09ring,1;
+ if (Sex) {
+ getnameditem 12742,strcharinfo(0);
+ }else{
+ getnameditem 12743,strcharinfo(0);
+ }
+ mes "[Event Ring Maker]";
+ mes "Here, the most precious";
+ mes "ring in the world!";
+ mes "Don't forget, you can never";
+ mes "make this ring again.";
+ next;
+ mes "[Event Ring Maker]";
+ mes "You must pick out the one";
+ mes "that you really really love,";
+ mes "and give this ring";
+ mes "to that person.";
+ next;
+ mes "[Event Ring Maker]";
+ mes "Of course, you've got to";
+ mes "get rings from others,";
+ mes "that's the way you can";
+ mes "participate in the voting, right?";
+ mes "Challenge yourself to become";
+ mes "Valentine's Hottest!";
+ close;
+}
+
+// Valentine Vote Manager (Registers votes)
+prontera,157,185,4 script Valentine Vote Manager#v 113,{
+ mes "[Valentine Vote Manager]";
+ mes "Hello, I'm the Valentine's";
+ mes "Vote Manager.";
+ mes "I'm in charge of collecting";
+ mes "rings for this event!";
+ next;
+ mes "[Valentine Vote Manager]";
+ mes "I register the rings";
+ mes "you get from others";
+ mes "and I calculate the";
+ mes "total number of rings.";
+ next;
+ mes "[Valentine Vote Manager]";
+ mes "You know what I do besides";
+ mes "just counting those rings?";
+ mes "I can tell you the adventurer's";
+ mes "name who's got the";
+ mes "most number of votes.";
+ next;
+ mes "[Valentine Vote Manager]";
+ mes "Plus, you can also find out how";
+ mes "many votes he/she got.";
+ next;
+ while (1) {
+ mes "[Valentine Vote Manager]";
+ mes "So, what do you want?";
+ next;
+ switch(select("Please register my rings.:Please count my votes.:Nothing, for now.")) {
+ case 1:
+ mes "[Valentine Vote Manager]";
+ mes "Please tell me how many";
+ mes "rings you want to register.";
+ next;
+ mes "[Valentine Vote Manager]";
+ mes "When you write the";
+ mes "number of the rings,";
+ mes "the number shouldn't be";
+ mes "larger than the number of";
+ mes "rings you actually have.";
+ mes "'0', cancels everything.";
+ next;
+ input .@input;
+
+ if (.@input <= 0) {
+ mes "[Valentine Vote Manager]";
+ mes "You have entered 0.";
+ mes "Registration is cancelled.";
+ next;
+ break;
+ }
+
+ if (Sex) {
+ if (countitem(7947) > .@input) {
+ mes "[Valentine Vote Manager]";
+ mes "Seems like the value you entered is too small.";
+ mes "I know you've got more. Be honest, dear.";
+ next;
+ break;
+ }
+
+ if (countitem(7947) < .@input) {
+ mes "[Valentine Vote Manager]";
+ mes "Seems like the value you entered is too large.";
+ mes "I know you've got less. Be honest, dear.";
+ next;
+ break;
+ }
+
+ mes "[Valentine Vote Manager]";
+ mes "I'll take those silver rings,";
+ mes "and count the votes for you.";
+ mes "Thank you for participating.";
+ delitem 7947,.@input;
+ set Val09Rings,Val09Rings+.@input;
+ if (Val09Rings > $Val09votes_M) {
+ set $Val09votes_M,Val09Rings;
+ set $Val09name_M$,strcharinfo(0);
+ }
+ next;
+ break;
+ }else{
+ if (countitem(7946) > .@input) {
+ mes "[Valentine Vote Manager]";
+ mes "Seems like the value you entered is too small.";
+ mes "I know you've got more. Be honest, dear.";
+ next;
+ break;
+ }
+
+ if (countitem(7946) < .@input) {
+ mes "[Valentine Vote Manager]";
+ mes "Seems like the value you entered is too large.";
+ mes "I know you've got less. Be honest, dear.";
+ next;
+ break;
+ }
+
+ mes "[Valentine Vote Manager]";
+ mes "I'll take those gold rings,";
+ mes "and count the votes for you.";
+ mes "Thank you for participating.";
+ delitem 7946,.@input;
+ set Val09Rings,Val09Rings+.@input;
+ if (Val09Rings > $Val09votes_F) {
+ set $Val09votes_F,Val09Rings;
+ set $Val09name_F$,strcharinfo(0);
+ }
+ next;
+ break;
+ }
+ case 2:
+ mes "[Valentine Vote Manager]";
+ mes "Let's see...";
+ mes "You have registered..";
+ mes ".."+Val09Rings+" rings so far.";
+ mes "and...";
+ next;
+ mes "[Valentine Vote Manager]";
+ mes "The current record shows... "+$Val09name_M$+" is the male vote leader who's registered the total of "+$Val09votes_M+" rings.";
+ next;
+ mes "[Valentine Vote Manager]";
+ mes "The current record shows... "+$Val09name_F$+" is the female vote leader who's registered the total of "+$Val09votes_F+" rings.";
+ next;
+ break;
+
+ case 3:
+ mes "[Valentine Vote Manager]";
+ mes "Hey, you can be popular too!";
+ mes "Anyone can... really!";
+ mes "Though you have to try a lot";
+ mes "harder, but still~ Hahaha!";
+ close;
+ }
+ }
+}
+
+// Charles Orleans (Makes Home-Made Chocolates)
+prt_castle,42,35,3 script Dessert Manager#Val09 47,{
+ if (Sex) {
+ mes "[Charles Orleans]";
+ mes "Monsieur~! What brings";
+ mes "you to my beautiful atelier?";
+ mes "What is it that you want?";
+ mes "Well, my sparkling eyes";
+ mes "get dried and lose their shine";
+ mes "if not for the pretty little lady.";
+ next;
+ mes "[Charles Orleans]";
+ mes "Please leave me alone unless";
+ mes "you have business with me.";
+ mes "Haaaa~ I'm a busy person.";
+ mes "Don't bother me....";
+ mes "Annoying, annoying, annoying~~!";
+ close;
+ }
+
+ mes "[Charles Orleans]";
+ mes "Oh, Mademoiselle!";
+ mes "This little trifling space";
+ mes "felt like heaven the";
+ mes "minute you walked in!";
+ mes "Can I help you with";
+ mes "anything, if it's alright?";
+ next;
+ if(select("Please, make me some chocolate.:Don't bother. I'm just passing by.") == 2) {
+ mes "[Charles Orleans]";
+ mes "Ahhh, this is so heartbreaking.";
+ mes "How could you say that?";
+ mes "You're just so mean.";
+ mes "Don't bother? Just passing by?";
+ next;
+ mes "[Charles Orleans]";
+ mes "What can I do to make you";
+ mes "pay a little attention to me?";
+ mes "Please.. I feel like my soul is lost..";
+ close;
+ }
+ if(countitem(558) < 3) {
+ mes "[Charles Orleans]";
+ mes "Ahhh, Mademoiselle.";
+ mes "I'm not an alchemist,";
+ mes "or a magician.";
+ mes "I don't just make chocolate";
+ mes "out of anything.";
+ next;
+ mes "[Charles Orleans]";
+ mes "I always think of making";
+ mes "chocolate as artistic work.";
+ mes "You see, I'm no ordinary cook...";
+ mes "I make chocolate with feelings..";
+ mes "messages of loving hearts..";
+ next;
+ mes "[Charles Orleans]";
+ mes "I make masterpieces.";
+ mes "No one can imitate";
+ mes "the looks and the taste.";
+ mes "Yes, it's nothing like";
+ mes "ordinary chocolate!";
+ next;
+ mes "[Charles Orleans]";
+ mes "I'm afraid I can't make it";
+ mes "and prove it to you now.";
+ mes "This is really a shame!";
+ next;
+ mes "[Charles Orleans]";
+ mes "I really want to thank";
+ mes "you for visiting me";
+ mes "and if you only bring";
+ mes "^3152ff3 Chocolates^000000,";
+ mes "I'll make you chocolate";
+ mes "like you've never seen...";
+ next;
+ mes "[Charles Orleans]";
+ mes "never tasted before...";
+ mes "Mademoiselle, with your spirit,";
+ mes "I'm sure you can bring";
+ mes "3 pieces of chocolate.";
+ mes "I have no doubt at all.";
+ next;
+ mes "[Charles Orleans]";
+ mes "So... what do you think?";
+ mes "Can you bring ^3152ff3 Chocolates^000000?";
+ mes "I could get them myself,";
+ mes "but I'm tied up with so much";
+ mes "work as you see right now.";
+ next;
+ mes "[Charles Orleans]";
+ mes "Adios, Mademoiselle.....";
+ mes "I'll be waiting for you.";
+ close;
+ }else{
+ if (!checkweight(559,1)) {
+ mes "[Charles Orleans]";
+ mes "You're carrying too many items.";
+ mes "Please use the Kafra Services.";
+ close;
+ }
+ mes "[Charles Orleans]";
+ mes "Oh, Mademoiselle!";
+ mes "I'll make the best chocolate";
+ mes "with the pieces you've brought.";
+ mes "I'm going to put the light of";
+ mes "your eyes into this chocolate";
+ mes "that no one can resist.";
+ next;
+ mes "[Charles Orleans]";
+ mes "It'll be stronger than a";
+ mes "sweet sweet love potion.....";
+ next;
+ mes "[Charles Orleans]";
+ mes "Un, Deux, Trois, Quatre.....";
+ mes "Just like the ugly duckling that";
+ mes "turned to a beautiful swan-";
+ mes "Ordinary chocolate pieces are";
+ mes "becoming a piece of art!";
+ next;
+ mes "[Charles Orleans]";
+ mes "They're changing!";
+ mes "They're getting warm,";
+ mes "softly changing the shape,";
+ mes "getting stronger again!";
+ mes "Oh, is it a master piece or";
+ mes "what...!!";
+ next;
+ mes "[Charles Orleans]";
+ mes "Here you go, Mademoiselle!";
+ mes "Ahahahaha, just look at this!";
+ mes "I can't believe I made this.";
+ mes "Oh, I can't take my eyes off..!!";
+ delitem 558,3;
+ getitem 559,1;
+ next;
+ mes "[Charles Orleans]";
+ mes "Alright. Mademoiselle,";
+ mes "I hope this is just";
+ mes "what you wanted,";
+ mes "for it bears your";
+ mes "beautiful heart inside.";
+ close;
+ }
+
} \ No newline at end of file
diff --git a/npc/guides/guides_mosk.txt b/npc/guides/guides_mosk.txt
index 92d246d09..b4b0fc655 100644
--- a/npc/guides/guides_mosk.txt
+++ b/npc/guides/guides_mosk.txt
@@ -1,91 +1,91 @@
-//===== eAthena Script =======================================
-//= Moscovia Guides
-//===== By: ==================================================
-//= Kisuka
-//===== Current Version: =====================================
-//= 1.0
-//===== Compatible With: =====================================
-//= eAthena SVN
-//===== Description: =========================================
-//= Guides for the town of Moscovia.
-//===== Additional Comments: =================================
-//= 1.0 First Version. [Kisuka]
-//============================================================
-
-moscovia,161,76,4 script Moscovia Guide#mosk 959,{
- mes "[Moscovia Guide]";
- mes "Welcome to Moscovia";
- mes "Here is the paradise spreading on";
- mes "the endless seas";
- mes "You'll be happy with the beautiful";
- mes "scenery and the sunlight!";
- next;
- mes "[Moscovia Guide]";
- mes "I was sent from Moscovia Palace";
- mes "to guide tourists and to give them";
- mes "information on this town.";
- mes "If you have some questions, please ask me.";
- next;
- switch(select("Ask where you can go.:Delete all the marks on the mini-map.:Cancel.")) {
- case 1:
- mes "[Moscovia Guide]";
- mes "Where would you like to go?";
- next;
- switch(select("The Palace:Armor Shop:Tool Shop:An Inn:Cancel")) {
- case 1:
- mes "[Moscovia Guide]";
- mes "The Palace can be found ^ff0000+^000000 at the";
- mes "end of the North sea from";
- mes "Rune-Midgarts.";
- mes "There resides our Lord the Czar of";
- mes "Moscovia and his retainers.";
- close2;
- viewpoint 1,257,138,1,0xFF0000;
- end;
- case 2:
- viewpoint 1,185,187,2,0x00FF00;
- mes "[Moscovia Guide]";
- mes "The Armor Shop is located at the";
- mes "southwest corner of town..";
- mes "You can buy armor made by the best";
- mes "craftsmen of Moscovia there.";
- close;
- case 3:
- mes "[Moscovia Guide]";
- mes "The Tool Shop is located just south";
- mes "from the center of town.";
- mes "You can find all sorts of things";
- mes "you need for your travels.";
- close2;
- viewpoint 1,223,174,3,0x00FF00;
- end;
- case 4:
- mes "[Moscovia Guide]";
- mes "The Inn 'Sticky Herb Tree' is just";
- mes "north from the center of town.";
- mes "If you need to rest, there is no";
- mes "better place to stay.";
- close2;
- viewpoint 1,229,208,4,0x3355FF;
- end;
- case 5:
- close;
- }
- case 2:
- mes "[Moscovia Guide]";
- mes "I've deleted all marks on the mini-map.";
- mes "Whenever you'd like to put marks";
- mes "there, you can ask me.";
- viewpoint 2,257,138,1,0xFF0000;
- viewpoint 2,185,187,2,0x00FF00;
- viewpoint 2,223,174,3,0x00FF00;
- viewpoint 2,229,208,4,0x3355FF;
- close;
-
- case 3:
- mes "[Moscovia Guide]";
- mes "It'd be great to walk about alone.";
- mes "Take care.";
- close;
- }
+//===== eAthena Script =======================================
+//= Moscovia Guides
+//===== By: ==================================================
+//= Kisuka
+//===== Current Version: =====================================
+//= 1.0
+//===== Compatible With: =====================================
+//= eAthena SVN
+//===== Description: =========================================
+//= Guides for the town of Moscovia.
+//===== Additional Comments: =================================
+//= 1.0 First Version. [Kisuka]
+//============================================================
+
+moscovia,161,76,4 script Moscovia Guide#mosk 959,{
+ mes "[Moscovia Guide]";
+ mes "Welcome to Moscovia";
+ mes "Here is the paradise spreading on";
+ mes "the endless seas";
+ mes "You'll be happy with the beautiful";
+ mes "scenery and the sunlight!";
+ next;
+ mes "[Moscovia Guide]";
+ mes "I was sent from Moscovia Palace";
+ mes "to guide tourists and to give them";
+ mes "information on this town.";
+ mes "If you have some questions, please ask me.";
+ next;
+ switch(select("Ask where you can go.:Delete all the marks on the mini-map.:Cancel.")) {
+ case 1:
+ mes "[Moscovia Guide]";
+ mes "Where would you like to go?";
+ next;
+ switch(select("The Palace:Armor Shop:Tool Shop:An Inn:Cancel")) {
+ case 1:
+ mes "[Moscovia Guide]";
+ mes "The Palace can be found ^ff0000+^000000 at the";
+ mes "end of the North sea from";
+ mes "Rune-Midgarts.";
+ mes "There resides our Lord the Czar of";
+ mes "Moscovia and his retainers.";
+ close2;
+ viewpoint 1,257,138,1,0xFF0000;
+ end;
+ case 2:
+ viewpoint 1,185,187,2,0x00FF00;
+ mes "[Moscovia Guide]";
+ mes "The Armor Shop is located at the";
+ mes "southwest corner of town..";
+ mes "You can buy armor made by the best";
+ mes "craftsmen of Moscovia there.";
+ close;
+ case 3:
+ mes "[Moscovia Guide]";
+ mes "The Tool Shop is located just south";
+ mes "from the center of town.";
+ mes "You can find all sorts of things";
+ mes "you need for your travels.";
+ close2;
+ viewpoint 1,223,174,3,0x00FF00;
+ end;
+ case 4:
+ mes "[Moscovia Guide]";
+ mes "The Inn 'Sticky Herb Tree' is just";
+ mes "north from the center of town.";
+ mes "If you need to rest, there is no";
+ mes "better place to stay.";
+ close2;
+ viewpoint 1,229,208,4,0x3355FF;
+ end;
+ case 5:
+ close;
+ }
+ case 2:
+ mes "[Moscovia Guide]";
+ mes "I've deleted all marks on the mini-map.";
+ mes "Whenever you'd like to put marks";
+ mes "there, you can ask me.";
+ viewpoint 2,257,138,1,0xFF0000;
+ viewpoint 2,185,187,2,0x00FF00;
+ viewpoint 2,223,174,3,0x00FF00;
+ viewpoint 2,229,208,4,0x3355FF;
+ close;
+
+ case 3:
+ mes "[Moscovia Guide]";
+ mes "It'd be great to walk about alone.";
+ mes "Take care.";
+ close;
+ }
} \ No newline at end of file
diff --git a/npc/kafras/kafras_mosk.txt b/npc/kafras/kafras_mosk.txt
index 5d4710087..eef44d058 100644
--- a/npc/kafras/kafras_mosk.txt
+++ b/npc/kafras/kafras_mosk.txt
@@ -1,153 +1,153 @@
-//===== eAthena Script =======================================
-//= Moscovia Kafras
-//===== By: ==================================================
-//= Kisuka
-//===== Current Version: =====================================
-//= 1.0
-//===== Compatible With: =====================================
-//= eAthena SVN
-//===== Description: =========================================
-//= Kafras for the town of Moscovia.
-//===== Additional Comments: =================================
-//= 1.0 First Version. [Kisuka]
-//============================================================
-
-moscovia,223,191,4 script Kafra Staff#mosk 114,{
- cutin "kafra_04",2;
- mes "[Kafra Staff]";
- mes "Welcome to the";
- mes "Kafra Corporation.";
- mes "The Kafra services";
- mes "are always on your side.";
- mes "How may I assist you?";
- next;
- switch(select("Save:Use Storage:Rent a Pushcart:Check Other Information:Cancel")) {
- case 1:
- mes "[Kafra Staff]";
- mes "Your Respawn Point has";
- mes "been saved in the city of";
- mes "Moscovia. Thank you for";
- mes "using the Kafra Service.";
- savepoint "moscovia",221,194;
- close2;
- cutin "", 255;
- end;
- case 2:
- if(basicskillcheck() && getskilllv("NV_BASIC") < 6){
- mes "[Kafra Staff]";
- mes "I'm sorry, but you";
- mes "need the Novice's";
- mes "Basic Skill Level 6 to";
- mes "use the Storage Service.";
- close2;
- cutin "", 255;
- end;
- }
- if(countitem(7059)) delitem 7059,1;
- else {
- if(Zeny<80){
- mes "[Kafra Staff]";
- mes "I'm sorry, but you don't";
- mes "have enough zeny to use";
- mes "the Storage Service. Our";
- mes "Storage access fee is 80 zeny.";
- close2;
- cutin "", 255;
- end;
- }
- set Zeny, Zeny-80;
- set RESRVPTS, RESRVPTS + (80/5);
- }
- mes "[Kafra Staff]";
- mes "Here, let me open";
- mes "your Storage for you.";
- mes "Thank you for using";
- mes "the Kafra Service.";
-
- callfunc("F_CheckKafCode"); //check your storage password, if set
-
- close2;
- openstorage;
- cutin "", 255;
- end;
- case 3:
- if(baseClass != Job_Merchant){
- mes "[Kafra Staff]";
- mes "I'm sorry, but the";
- mes "Pushcart rental service";
- mes "is only available to Merchants,";
- mes "Blacksmiths, Master Smiths,";
- mes "Alchemists and Biochemists.";
- close2;
- cutin "", 255;
- end;
- }
-
- else if(checkcart() == 1){
- mes "[Kafra Staff]";
- mes "You already have";
- mes "a Pushcart equipped.";
- mes "Unfortunately, we can't";
- mes "rent more than one to";
- mes "each customer at a time.";
- close2;
- cutin "", 255;
- end;
- }
-
- if(countitem(7061) > 0) delitem 7061,1;
- else {
- mes "[Kafra Staff]";
- mes "The Pushcart rental";
- mes "fee is 700 zeny. Would";
- mes "you like to rent a Pushcart?";
- next;
- if(select("Rent a Pushcart.:Cancel.") == 1) {
- if(Zeny<700){
- mes "[Kafra Staff]";
- mes "I'm sorry, but you";
- mes "don't have enough";
- mes "zeny to pay the Pushcart";
- mes "rental fee of 700 zeny.";
- close2;
- cutin "", 255;
- end;
- }
- set Zeny,Zeny-700;
- set RESRVPTS, RESRVPTS + 48;
- }else{
- close2;
- cutin "", 255;
- end;
- }
- }
- setcart;
- close2;
- cutin "", 255;
- end;
- case 4:
- if(select("Check Special Reserve Points.:Cancel") == 2) {
- cutin "", 255;
- close;
- }
- mes "[Kafra Staff]";
- mes strcharinfo(0) + ", you have a total of";
- mes RESRVPTS+ " Special Reserve Points.";
- next;
- mes "[Kafra Staff]";
- mes "You can exchange your";
- mes "Special Reserve Points for";
- mes "rewards at the Kafra Main Office in Al De Baran. Please use our";
- mes "convenient services to see the benefits of our rewards program.";
- close2;
- cutin "", 255;
- end;
- case 5:
- mes "[Kafra Staff]";
- mes "We, here at Kafra Corporation,";
- mes "are always endeavoring to provide you with the best services. We hope that we meet your adventuring needs and standards of excellence.";
- close2;
- cutin "", 255;
- end;
- }
+//===== eAthena Script =======================================
+//= Moscovia Kafras
+//===== By: ==================================================
+//= Kisuka
+//===== Current Version: =====================================
+//= 1.0
+//===== Compatible With: =====================================
+//= eAthena SVN
+//===== Description: =========================================
+//= Kafras for the town of Moscovia.
+//===== Additional Comments: =================================
+//= 1.0 First Version. [Kisuka]
+//============================================================
+
+moscovia,223,191,4 script Kafra Staff#mosk 114,{
+ cutin "kafra_04",2;
+ mes "[Kafra Staff]";
+ mes "Welcome to the";
+ mes "Kafra Corporation.";
+ mes "The Kafra services";
+ mes "are always on your side.";
+ mes "How may I assist you?";
+ next;
+ switch(select("Save:Use Storage:Rent a Pushcart:Check Other Information:Cancel")) {
+ case 1:
+ mes "[Kafra Staff]";
+ mes "Your Respawn Point has";
+ mes "been saved in the city of";
+ mes "Moscovia. Thank you for";
+ mes "using the Kafra Service.";
+ savepoint "moscovia",221,194;
+ close2;
+ cutin "", 255;
+ end;
+ case 2:
+ if(basicskillcheck() && getskilllv("NV_BASIC") < 6){
+ mes "[Kafra Staff]";
+ mes "I'm sorry, but you";
+ mes "need the Novice's";
+ mes "Basic Skill Level 6 to";
+ mes "use the Storage Service.";
+ close2;
+ cutin "", 255;
+ end;
+ }
+ if(countitem(7059)) delitem 7059,1;
+ else {
+ if(Zeny<80){
+ mes "[Kafra Staff]";
+ mes "I'm sorry, but you don't";
+ mes "have enough zeny to use";
+ mes "the Storage Service. Our";
+ mes "Storage access fee is 80 zeny.";
+ close2;
+ cutin "", 255;
+ end;
+ }
+ set Zeny, Zeny-80;
+ set RESRVPTS, RESRVPTS + (80/5);
+ }
+ mes "[Kafra Staff]";
+ mes "Here, let me open";
+ mes "your Storage for you.";
+ mes "Thank you for using";
+ mes "the Kafra Service.";
+
+ callfunc("F_CheckKafCode"); //check your storage password, if set
+
+ close2;
+ openstorage;
+ cutin "", 255;
+ end;
+ case 3:
+ if(baseClass != Job_Merchant){
+ mes "[Kafra Staff]";
+ mes "I'm sorry, but the";
+ mes "Pushcart rental service";
+ mes "is only available to Merchants,";
+ mes "Blacksmiths, Master Smiths,";
+ mes "Alchemists and Biochemists.";
+ close2;
+ cutin "", 255;
+ end;
+ }
+
+ else if(checkcart() == 1){
+ mes "[Kafra Staff]";
+ mes "You already have";
+ mes "a Pushcart equipped.";
+ mes "Unfortunately, we can't";
+ mes "rent more than one to";
+ mes "each customer at a time.";
+ close2;
+ cutin "", 255;
+ end;
+ }
+
+ if(countitem(7061) > 0) delitem 7061,1;
+ else {
+ mes "[Kafra Staff]";
+ mes "The Pushcart rental";
+ mes "fee is 700 zeny. Would";
+ mes "you like to rent a Pushcart?";
+ next;
+ if(select("Rent a Pushcart.:Cancel.") == 1) {
+ if(Zeny<700){
+ mes "[Kafra Staff]";
+ mes "I'm sorry, but you";
+ mes "don't have enough";
+ mes "zeny to pay the Pushcart";
+ mes "rental fee of 700 zeny.";
+ close2;
+ cutin "", 255;
+ end;
+ }
+ set Zeny,Zeny-700;
+ set RESRVPTS, RESRVPTS + 48;
+ }else{
+ close2;
+ cutin "", 255;
+ end;
+ }
+ }
+ setcart;
+ close2;
+ cutin "", 255;
+ end;
+ case 4:
+ if(select("Check Special Reserve Points.:Cancel") == 2) {
+ cutin "", 255;
+ close;
+ }
+ mes "[Kafra Staff]";
+ mes strcharinfo(0) + ", you have a total of";
+ mes RESRVPTS+ " Special Reserve Points.";
+ next;
+ mes "[Kafra Staff]";
+ mes "You can exchange your";
+ mes "Special Reserve Points for";
+ mes "rewards at the Kafra Main Office in Al De Baran. Please use our";
+ mes "convenient services to see the benefits of our rewards program.";
+ close2;
+ cutin "", 255;
+ end;
+ case 5:
+ mes "[Kafra Staff]";
+ mes "We, here at Kafra Corporation,";
+ mes "are always endeavoring to provide you with the best services. We hope that we meet your adventuring needs and standards of excellence.";
+ close2;
+ cutin "", 255;
+ end;
+ }
} \ No newline at end of file