diff options
author | brianluau <brianluau@54d463be-8e91-2dee-dedb-b68131a5f0ec> | 2010-06-02 01:00:52 +0000 |
---|---|---|
committer | brianluau <brianluau@54d463be-8e91-2dee-dedb-b68131a5f0ec> | 2010-06-02 01:00:52 +0000 |
commit | 5bc4a89f162a2bc89e14f554da450311287c7d86 (patch) | |
tree | d365c1ddb5a5671475e4e2d16e6342460df78bd1 /npc/battleground | |
parent | f1c4780376953eae3c5e38b7615c06e07b178431 (diff) | |
download | hercules-5bc4a89f162a2bc89e14f554da450311287c7d86.tar.gz hercules-5bc4a89f162a2bc89e14f554da450311287c7d86.tar.bz2 hercules-5bc4a89f162a2bc89e14f554da450311287c7d86.tar.xz hercules-5bc4a89f162a2bc89e14f554da450311287c7d86.zip |
- Fixed item script of Chicken_Hat (5431). (bugreport:4174)
- Fixed a typo in script_commands.txt (bugreport:4270)
- Fixed some links in the README html files.
- Fixed the range of 'max_guild_alliance' in battle.c (0 to 3).
- Set svn:eol-style=native for some recently added text files.
git-svn-id: https://rathena.svn.sourceforge.net/svnroot/rathena/trunk@14328 54d463be-8e91-2dee-dedb-b68131a5f0ec
Diffstat (limited to 'npc/battleground')
-rw-r--r-- | npc/battleground/bg_kvm01.txt | 782 | ||||
-rw-r--r-- | npc/battleground/bg_kvm02.txt | 782 | ||||
-rw-r--r-- | npc/battleground/bg_kvm03.txt | 782 |
3 files changed, 1173 insertions, 1173 deletions
diff --git a/npc/battleground/bg_kvm01.txt b/npc/battleground/bg_kvm01.txt index 4f7f21eea..efc5c12fb 100644 --- a/npc/battleground/bg_kvm01.txt +++ b/npc/battleground/bg_kvm01.txt @@ -1,391 +1,391 @@ -// ==============================================================================
-// BattleGround System - KvM 80~99
-// ==============================================================================
-
-// Registration NPC's
-// *********************************************************************
-
-bat_room,253,227,4 script Registration::KvM01R_Guillaume 418,{ // KvM Guillaume
- end;
-
-OnInit:
- waitingroom "Battle Station 5 Players",5,"KvM01_BG::OnGuillaumeJoin",1;
- end;
-
-OnEnterBG:
- set $@KvM01BG_id1, waitingroom2bg("bat_c01",53,128,"KvM01_BG::OnGuillaumeQuit","KvM01_BG::OnGuillaumeDie");
- end;
-}
-
-bat_room,253,204,0 script Registration::KvM01R_Croix 414,{ // KvM Croix
- end;
-
-OnInit:
- waitingroom "Battle Station 5 Players",5,"KvM01_BG::OnCroixJoin",1;
- end;
-
-OnEnterBG:
- set $@KvM01BG_id2, waitingroom2bg("bat_c01",146,55,"KvM01_BG::OnCroixQuit","KvM01_BG::OnCroixDie");
- end;
-}
-
-// Light Effects
-// *********************************************************************
-
-bat_c01,54,123,0 script #bat_c01a 111,{
- end;
-
-OnKvM01LightA: misceffect 54; end;
-OnKvM01LightB: misceffect 55; end;
-OnKvM01LightC: misceffect 56; end;
-}
-
-bat_c01,56,125,0 duplicate(#bat_c01a) #bat_c01b 111
-bat_c01,58,127,0 duplicate(#bat_c01a) #bat_c01c 111
-bat_c01,141,56,0 duplicate(#bat_c01a) #bat_c01d 111
-bat_c01,143,58,0 duplicate(#bat_c01a) #bat_c01e 111
-bat_c01,145,60,0 duplicate(#bat_c01a) #bat_c01f 111
-
-// Battleground Engine
-// *********************************************************************
-
-- script KvM01_BG -1,{
- end;
-
-OnInit:
- setwall "bat_c01",54,122,6,7,0,"batc01wall_a";
- setwall "bat_c01",55,122,5,7,0,"batc01wall_b";
- setwall "bat_c01",140,56,6,7,0,"batc01wall_c";
- setwall "bat_c01",140,57,5,7,0,"batc01wall_d";
- disablenpc "TherapistKvM01a";
- disablenpc "TherapistKvM01b";
- disablenpc "VintenarKvM01a";
- disablenpc "VintenarKvM01b";
- end;
-
-OnGuillaumeJoin:
-OnCroixJoin:
- donpcevent "KvM01_BG::OnReadyCheck";
- end;
-
-OnGuillaumeQuit:
- set BG_Delay_Tick, gettimetick(2) + 1200;
-OnGuillaumeDie:
- if( $@KvM01BG == 2 )
- {
- set .Guillaume_Count, .Guillaume_Count - 1;
- set .Croix_Score, .Croix_Score + 1;
- bg_updatescore "bat_c01",.Guillaume_Score,.Croix_Score;
- if( .Guillaume_Count < 1 ) donpcevent "KvM01_BG::OnCroixWin";
- }
- end;
-
-OnCroixQuit:
- set BG_Delay_Tick, gettimetick(2) + 1200;
-OnCroixDie:
- if( $@KvM01BG == 2 )
- {
- set .Croix_Count, .Croix_Count - 1;
- set .Guillaume_Score, .Guillaume_Score + 1;
- bg_updatescore "bat_c01",.Guillaume_Score,.Croix_Score;
- if( .Croix_Count < 1 ) donpcevent "KvM01_BG::OnGuillaumeWin";
- }
- end;
-
-OnReadyCheck:
- if( $@KvM01BG )
- end;
- set .@Guillaume, getwaitingroomstate(0,"KvM01R_Guillaume");
- set .@Croix, getwaitingroomstate(0,"KvM01R_Croix");
-
- if( .@Guillaume < 5 || .@Croix < 5 )
- {
- if( .@Guillaume > 3 && .@Croix > 3 && !agitcheck() && $@KvM_Flood < gettimetick(2) )
- {
- announce "Battleground -- Kreiger Von Midgard [80-99] G: " + .@Guillaume + "/5, C: " + .@Croix + "/5",0,0x696969;
- set $@KvM_Flood, gettimetick(2) + 15;
- }
- else
- mapannounce "bat_room","Battleground -- Kreiger Von Midgard [80-99] G: " + .@Guillaume + "/5, C: " + .@Croix + "/5",1,0x696969;
- end;
- }
-
- set $@KvM01BG, 1; // Starting
- donpcevent "KvM01R_Croix::OnEnterBG";
- donpcevent "KvM01R_Guillaume::OnEnterBG";
- donpcevent "KvM01_BG::OnStart";
- end;
-
-OnStart:
- announce "Battleground -- Kreiger Von Midgard [80-99] has started!",0,0x696969;
- enablenpc "TherapistKvM01a";
- enablenpc "TherapistKvM01b";
- disablenpc "VintenarKvM01a";
- disablenpc "VintenarKvM01b";
- set $@KvM01BG_Victory, 0;
- sleep 2000;
- // Warp Teams
- bg_warp $@KvM01BG_id1,"bat_c01",53,128;
- bg_warp $@KvM01BG_id2,"bat_c01",146,55;
- // ScoreBoard
- set .Guillaume_Score, 0;
- set .Croix_Score, 0;
- initnpctimer;
- end;
-
-OnTimer5000:
- areapercentheal "bat_c01",50,123,58,131,100,100;
- areapercentheal "bat_c01",141,52,149,60,100,100;
- mapannounce "bat_c01","The Battle will start in 25 seconds!!",1,0x696969;
- end;
-
-OnTimer26000:
- mapannounce "bat_c01","The Battle will start in 4 seconds!!",1,0x696969;
- end;
-
-OnTimer27000:
- donpcevent "::OnKvM01LightA";
- end;
-
-OnTimer28000:
- donpcevent "::OnKvM01LightB";
- end;
-
-OnTimer29000:
- donpcevent "::OnKvM01LightC";
- end;
-
-OnTimer30000:
- // Team Members
- set .Guillaume_Count, bg_get_data($@KvM01BG_id1, 0);
- set .Croix_Count, bg_get_data($@KvM01BG_id2, 0);
- if( .Guillaume_Count < 5 || .Croix_Count < 5 )
- {
- set $@KvM01BG_Victory, 3;
- set $@KvM01BG, 3;
- mapannounce "bat_c01","There are not enough players to start the battle",1,0x696969;
- stopnpctimer;
- sleep 2000;
- donpcevent "KvM01_BG::OnStop";
- end;
- }
-
- set $@KvM01BG, 2; // Playing
- areapercentheal "bat_c01",50,123,58,131,100,100;
- bg_warp $@KvM01BG_id1,"bat_c01",62,119;
- areapercentheal "bat_c01",141,52,149,60,100,100;
- bg_warp $@KvM01BG_id2,"bat_c01",137,64;
- end;
-
-OnTimer32000:
- mapannounce "bat_c01","The Battle of Kreiger Von Midgard has begun!!",1,0x696969;
- end;
-
-OnTimer300000:
- mapannounce "bat_c01","The Battle will ends in 30 seconds!!",1,0x696969;
- end;
-
-OnTimer330000:
- if( .Croix_Count > .Guillaume_Count )
- donpcevent "KvM01_BG::OnCroixWin";
- else if( .Croix_Count < .Guillaume_Count )
- donpcevent "KvM01_BG::OnGuillaumeWin";
- else
- { // Draw Game
- set $@KvM01BG, 3;
- set $@KvM01BG_Victory, 3;
-
- stopnpctimer;
- sleep 2000;
- mapannounce "bat_c01","The time is out! This is a Tie...",1,0x696969;
- donpcevent "KvM01_BG::OnStop";
- }
- end;
-
-OnGuillaumeWin:
- set $@KvM01BG, 3;
- set $@KvM01BG_Victory, 1;
-
- stopnpctimer;
- sleep 2000;
- mapannounce "bat_c01","The Guillaume Army has won the Battle of Kreiger Von Midgard",1,0x0000FF;
- donpcevent "KvM01_BG::OnStop";
- end;
-
-OnCroixWin:
- set $@KvM01BG, 3;
- set $@KvM01BG_Victory, 2;
-
- stopnpctimer;
- sleep 2000;
- mapannounce "bat_c01","The Croix Army has won the Battle of Kreiger Von Midgard",1,0xFF0000;
- donpcevent "KvM01_BG::OnStop";
- end;
-
-OnStop:
- disablenpc "TherapistKvM01a";
- disablenpc "TherapistKvM01b";
- enablenpc "VintenarKvM01a";
- enablenpc "VintenarKvM01b";
- // Warp Teams
- bg_warp $@KvM01BG_id1,"bat_c01",53,128;
- bg_warp $@KvM01BG_id2,"bat_c01",146,55;
- donpcevent "KvM01_BG_Out::OnBegin";
- end;
-
-OnReset:
- stopnpctimer;
- stopnpctimer "KvM01_BG_Out";
- set .Croix_Count, 0;
- set .Guillaume_Count, 0;
- set .Croix_Score, 0;
- set .Guillaume_Score, 0;
- set $@KvM01BG_Victory, 0;
- if( $@KvM01BG_id1 ) { bg_destroy $@KvM01BG_id1; set $@KvM01BG_id1, 0; }
- if( $@KvM01BG_id2 ) { bg_destroy $@KvM01BG_id2; set $@KvM01BG_id2, 0; }
- disablenpc "TherapistKvM01a";
- disablenpc "TherapistKvM01b";
- disablenpc "VintenarKvM01a";
- disablenpc "VintenarKvM01b";
- sleep 1000;
- mapwarp "bat_c01","bat_room",155,150;
- sleep 2000;
- maprespawnguildid "bat_c01",0,3; // Just in case someone else
- bg_updatescore "bat_c01",0,0;
- sleep 2000;
- set $@KvM01BG, 0;
- donpcevent "KvM01_BG::OnReadyCheck"; // Maybe a game is ready to start
- end;
-}
-
-- script KvM01_BG_Out -1,{
- end;
-
-OnBegin:
- initnpctimer;
- end;
-
-OnTimer3000:
- mapannounce "bat_c01","Battle of Kreiger Von Midgard will close in 1 minute!",1,0x696969;
- end;
-OnTimer30000:
- mapannounce "bat_c01","Battle of Kreiger Von Midgard will close in 30 seconds!",1,0x696969;
- end;
-OnTimer50000:
- mapannounce "bat_c01","Battle of Kreiger Von Midgard will close in 10 seconds!",1,0x696969;
- end;
-OnTimer60000:
- donpcevent "KvM01_BG::OnReset";
- end;
-}
-
-// Battleground Therapist
-// *********************************************************************
-
-bat_c01,51,130,5 script Therapist in battle::TherapistKvM01a 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_c01,148,53,1 script Therapist in battle::TherapistKvM01b 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 rewards
-// *********************************************************************
-
-bat_c01,51,130,5 script Guillaume Vintenar::VintenarKvM01a 419,{
- if( $@KvM01BG_Victory )
- {
- if( $@KvM01BG_Victory == 3 )
- {
- setquest 6025;
- bg_leave;
- warp "bat_room",155,150;
- end;
- }
- else if( $@KvM01BG_Victory == Bat_Team )
- { // Victory
- set .@Reward, 5;
- 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;
- }
-
- setquest 6025;
- getitem 7773, .@Reward;
- bg_leave;
- warp "bat_room",155,150;
- end;
- }
- end;
-}
-
-bat_c01,148,53,1 script Croix Vintenar::VintenarKvM01b 415,{
- if( $@KvM01BG_Victory )
- {
- if( $@KvM01BG_Victory == 3 )
- {
- setquest 6025;
- bg_leave;
- warp "bat_room",155,150;
- end;
- }
- else if( $@KvM01BG_Victory == Bat_Team )
- { // Victory
- set .@Reward, 5;
- 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;
- }
-
- setquest 6025;
- getitem 7773, .@Reward;
- bg_leave;
- warp "bat_room",155,150;
- end;
- }
- end;
-}
-
-// MapFlags
-// *********************************************************************
-
-bat_c01 mapflag battleground 2
-bat_c01 mapflag nomemo
-bat_c01 mapflag nosave SavePoint
-bat_c01 mapflag noteleport
-bat_c01 mapflag nowarp
-bat_c01 mapflag nowarpto
-bat_c01 mapflag noreturn
-bat_c01 mapflag nobranch
-bat_c01 mapflag nopenalty
+// ============================================================================== +// BattleGround System - KvM 80~99 +// ============================================================================== + +// Registration NPC's +// ********************************************************************* + +bat_room,253,227,4 script Registration::KvM01R_Guillaume 418,{ // KvM Guillaume + end; + +OnInit: + waitingroom "Battle Station 5 Players",5,"KvM01_BG::OnGuillaumeJoin",1; + end; + +OnEnterBG: + set $@KvM01BG_id1, waitingroom2bg("bat_c01",53,128,"KvM01_BG::OnGuillaumeQuit","KvM01_BG::OnGuillaumeDie"); + end; +} + +bat_room,253,204,0 script Registration::KvM01R_Croix 414,{ // KvM Croix + end; + +OnInit: + waitingroom "Battle Station 5 Players",5,"KvM01_BG::OnCroixJoin",1; + end; + +OnEnterBG: + set $@KvM01BG_id2, waitingroom2bg("bat_c01",146,55,"KvM01_BG::OnCroixQuit","KvM01_BG::OnCroixDie"); + end; +} + +// Light Effects +// ********************************************************************* + +bat_c01,54,123,0 script #bat_c01a 111,{ + end; + +OnKvM01LightA: misceffect 54; end; +OnKvM01LightB: misceffect 55; end; +OnKvM01LightC: misceffect 56; end; +} + +bat_c01,56,125,0 duplicate(#bat_c01a) #bat_c01b 111 +bat_c01,58,127,0 duplicate(#bat_c01a) #bat_c01c 111 +bat_c01,141,56,0 duplicate(#bat_c01a) #bat_c01d 111 +bat_c01,143,58,0 duplicate(#bat_c01a) #bat_c01e 111 +bat_c01,145,60,0 duplicate(#bat_c01a) #bat_c01f 111 + +// Battleground Engine +// ********************************************************************* + +- script KvM01_BG -1,{ + end; + +OnInit: + setwall "bat_c01",54,122,6,7,0,"batc01wall_a"; + setwall "bat_c01",55,122,5,7,0,"batc01wall_b"; + setwall "bat_c01",140,56,6,7,0,"batc01wall_c"; + setwall "bat_c01",140,57,5,7,0,"batc01wall_d"; + disablenpc "TherapistKvM01a"; + disablenpc "TherapistKvM01b"; + disablenpc "VintenarKvM01a"; + disablenpc "VintenarKvM01b"; + end; + +OnGuillaumeJoin: +OnCroixJoin: + donpcevent "KvM01_BG::OnReadyCheck"; + end; + +OnGuillaumeQuit: + set BG_Delay_Tick, gettimetick(2) + 1200; +OnGuillaumeDie: + if( $@KvM01BG == 2 ) + { + set .Guillaume_Count, .Guillaume_Count - 1; + set .Croix_Score, .Croix_Score + 1; + bg_updatescore "bat_c01",.Guillaume_Score,.Croix_Score; + if( .Guillaume_Count < 1 ) donpcevent "KvM01_BG::OnCroixWin"; + } + end; + +OnCroixQuit: + set BG_Delay_Tick, gettimetick(2) + 1200; +OnCroixDie: + if( $@KvM01BG == 2 ) + { + set .Croix_Count, .Croix_Count - 1; + set .Guillaume_Score, .Guillaume_Score + 1; + bg_updatescore "bat_c01",.Guillaume_Score,.Croix_Score; + if( .Croix_Count < 1 ) donpcevent "KvM01_BG::OnGuillaumeWin"; + } + end; + +OnReadyCheck: + if( $@KvM01BG ) + end; + set .@Guillaume, getwaitingroomstate(0,"KvM01R_Guillaume"); + set .@Croix, getwaitingroomstate(0,"KvM01R_Croix"); + + if( .@Guillaume < 5 || .@Croix < 5 ) + { + if( .@Guillaume > 3 && .@Croix > 3 && !agitcheck() && $@KvM_Flood < gettimetick(2) ) + { + announce "Battleground -- Kreiger Von Midgard [80-99] G: " + .@Guillaume + "/5, C: " + .@Croix + "/5",0,0x696969; + set $@KvM_Flood, gettimetick(2) + 15; + } + else + mapannounce "bat_room","Battleground -- Kreiger Von Midgard [80-99] G: " + .@Guillaume + "/5, C: " + .@Croix + "/5",1,0x696969; + end; + } + + set $@KvM01BG, 1; // Starting + donpcevent "KvM01R_Croix::OnEnterBG"; + donpcevent "KvM01R_Guillaume::OnEnterBG"; + donpcevent "KvM01_BG::OnStart"; + end; + +OnStart: + announce "Battleground -- Kreiger Von Midgard [80-99] has started!",0,0x696969; + enablenpc "TherapistKvM01a"; + enablenpc "TherapistKvM01b"; + disablenpc "VintenarKvM01a"; + disablenpc "VintenarKvM01b"; + set $@KvM01BG_Victory, 0; + sleep 2000; + // Warp Teams + bg_warp $@KvM01BG_id1,"bat_c01",53,128; + bg_warp $@KvM01BG_id2,"bat_c01",146,55; + // ScoreBoard + set .Guillaume_Score, 0; + set .Croix_Score, 0; + initnpctimer; + end; + +OnTimer5000: + areapercentheal "bat_c01",50,123,58,131,100,100; + areapercentheal "bat_c01",141,52,149,60,100,100; + mapannounce "bat_c01","The Battle will start in 25 seconds!!",1,0x696969; + end; + +OnTimer26000: + mapannounce "bat_c01","The Battle will start in 4 seconds!!",1,0x696969; + end; + +OnTimer27000: + donpcevent "::OnKvM01LightA"; + end; + +OnTimer28000: + donpcevent "::OnKvM01LightB"; + end; + +OnTimer29000: + donpcevent "::OnKvM01LightC"; + end; + +OnTimer30000: + // Team Members + set .Guillaume_Count, bg_get_data($@KvM01BG_id1, 0); + set .Croix_Count, bg_get_data($@KvM01BG_id2, 0); + if( .Guillaume_Count < 5 || .Croix_Count < 5 ) + { + set $@KvM01BG_Victory, 3; + set $@KvM01BG, 3; + mapannounce "bat_c01","There are not enough players to start the battle",1,0x696969; + stopnpctimer; + sleep 2000; + donpcevent "KvM01_BG::OnStop"; + end; + } + + set $@KvM01BG, 2; // Playing + areapercentheal "bat_c01",50,123,58,131,100,100; + bg_warp $@KvM01BG_id1,"bat_c01",62,119; + areapercentheal "bat_c01",141,52,149,60,100,100; + bg_warp $@KvM01BG_id2,"bat_c01",137,64; + end; + +OnTimer32000: + mapannounce "bat_c01","The Battle of Kreiger Von Midgard has begun!!",1,0x696969; + end; + +OnTimer300000: + mapannounce "bat_c01","The Battle will ends in 30 seconds!!",1,0x696969; + end; + +OnTimer330000: + if( .Croix_Count > .Guillaume_Count ) + donpcevent "KvM01_BG::OnCroixWin"; + else if( .Croix_Count < .Guillaume_Count ) + donpcevent "KvM01_BG::OnGuillaumeWin"; + else + { // Draw Game + set $@KvM01BG, 3; + set $@KvM01BG_Victory, 3; + + stopnpctimer; + sleep 2000; + mapannounce "bat_c01","The time is out! This is a Tie...",1,0x696969; + donpcevent "KvM01_BG::OnStop"; + } + end; + +OnGuillaumeWin: + set $@KvM01BG, 3; + set $@KvM01BG_Victory, 1; + + stopnpctimer; + sleep 2000; + mapannounce "bat_c01","The Guillaume Army has won the Battle of Kreiger Von Midgard",1,0x0000FF; + donpcevent "KvM01_BG::OnStop"; + end; + +OnCroixWin: + set $@KvM01BG, 3; + set $@KvM01BG_Victory, 2; + + stopnpctimer; + sleep 2000; + mapannounce "bat_c01","The Croix Army has won the Battle of Kreiger Von Midgard",1,0xFF0000; + donpcevent "KvM01_BG::OnStop"; + end; + +OnStop: + disablenpc "TherapistKvM01a"; + disablenpc "TherapistKvM01b"; + enablenpc "VintenarKvM01a"; + enablenpc "VintenarKvM01b"; + // Warp Teams + bg_warp $@KvM01BG_id1,"bat_c01",53,128; + bg_warp $@KvM01BG_id2,"bat_c01",146,55; + donpcevent "KvM01_BG_Out::OnBegin"; + end; + +OnReset: + stopnpctimer; + stopnpctimer "KvM01_BG_Out"; + set .Croix_Count, 0; + set .Guillaume_Count, 0; + set .Croix_Score, 0; + set .Guillaume_Score, 0; + set $@KvM01BG_Victory, 0; + if( $@KvM01BG_id1 ) { bg_destroy $@KvM01BG_id1; set $@KvM01BG_id1, 0; } + if( $@KvM01BG_id2 ) { bg_destroy $@KvM01BG_id2; set $@KvM01BG_id2, 0; } + disablenpc "TherapistKvM01a"; + disablenpc "TherapistKvM01b"; + disablenpc "VintenarKvM01a"; + disablenpc "VintenarKvM01b"; + sleep 1000; + mapwarp "bat_c01","bat_room",155,150; + sleep 2000; + maprespawnguildid "bat_c01",0,3; // Just in case someone else + bg_updatescore "bat_c01",0,0; + sleep 2000; + set $@KvM01BG, 0; + donpcevent "KvM01_BG::OnReadyCheck"; // Maybe a game is ready to start + end; +} + +- script KvM01_BG_Out -1,{ + end; + +OnBegin: + initnpctimer; + end; + +OnTimer3000: + mapannounce "bat_c01","Battle of Kreiger Von Midgard will close in 1 minute!",1,0x696969; + end; +OnTimer30000: + mapannounce "bat_c01","Battle of Kreiger Von Midgard will close in 30 seconds!",1,0x696969; + end; +OnTimer50000: + mapannounce "bat_c01","Battle of Kreiger Von Midgard will close in 10 seconds!",1,0x696969; + end; +OnTimer60000: + donpcevent "KvM01_BG::OnReset"; + end; +} + +// Battleground Therapist +// ********************************************************************* + +bat_c01,51,130,5 script Therapist in battle::TherapistKvM01a 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_c01,148,53,1 script Therapist in battle::TherapistKvM01b 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 rewards +// ********************************************************************* + +bat_c01,51,130,5 script Guillaume Vintenar::VintenarKvM01a 419,{ + if( $@KvM01BG_Victory ) + { + if( $@KvM01BG_Victory == 3 ) + { + setquest 6025; + bg_leave; + warp "bat_room",155,150; + end; + } + else if( $@KvM01BG_Victory == Bat_Team ) + { // Victory + set .@Reward, 5; + 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; + } + + setquest 6025; + getitem 7773, .@Reward; + bg_leave; + warp "bat_room",155,150; + end; + } + end; +} + +bat_c01,148,53,1 script Croix Vintenar::VintenarKvM01b 415,{ + if( $@KvM01BG_Victory ) + { + if( $@KvM01BG_Victory == 3 ) + { + setquest 6025; + bg_leave; + warp "bat_room",155,150; + end; + } + else if( $@KvM01BG_Victory == Bat_Team ) + { // Victory + set .@Reward, 5; + 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; + } + + setquest 6025; + getitem 7773, .@Reward; + bg_leave; + warp "bat_room",155,150; + end; + } + end; +} + +// MapFlags +// ********************************************************************* + +bat_c01 mapflag battleground 2 +bat_c01 mapflag nomemo +bat_c01 mapflag nosave SavePoint +bat_c01 mapflag noteleport +bat_c01 mapflag nowarp +bat_c01 mapflag nowarpto +bat_c01 mapflag noreturn +bat_c01 mapflag nobranch +bat_c01 mapflag nopenalty diff --git a/npc/battleground/bg_kvm02.txt b/npc/battleground/bg_kvm02.txt index 9d38a290d..521192f07 100644 --- a/npc/battleground/bg_kvm02.txt +++ b/npc/battleground/bg_kvm02.txt @@ -1,391 +1,391 @@ -// ==============================================================================
-// BattleGround System - KvM 60~79
-// ==============================================================================
-
-// Registration NPC's
-// *********************************************************************
-
-bat_room,225,227,4 script Registration::KvM02R_Guillaume 418,{ // KvM Guillaume
- end;
-
-OnInit:
- waitingroom "Battle Station 5 Players",5,"KvM02_BG::OnGuillaumeJoin",1;
- end;
-
-OnEnterBG:
- set $@KvM02BG_id1, waitingroom2bg("bat_c02",53,128,"KvM02_BG::OnGuillaumeQuit","KvM02_BG::OnGuillaumeDie");
- end;
-}
-
-bat_room,225,204,0 script Registration::KvM02R_Croix 414,{ // KvM Croix
- end;
-
-OnInit:
- waitingroom "Battle Station 5 Players",5,"KvM02_BG::OnCroixJoin",1;
- end;
-
-OnEnterBG:
- set $@KvM02BG_id2, waitingroom2bg("bat_c02",146,55,"KvM02_BG::OnCroixQuit","KvM02_BG::OnCroixDie");
- end;
-}
-
-// Light Effects
-// *********************************************************************
-
-bat_c02,54,123,0 script #bat_c02a 111,{
- end;
-
-OnKvM02LightA: misceffect 54; end;
-OnKvM02LightB: misceffect 55; end;
-OnKvM02LightC: misceffect 56; end;
-}
-
-bat_c02,56,125,0 duplicate(#bat_c02a) #bat_c02b 111
-bat_c02,58,127,0 duplicate(#bat_c02a) #bat_c02c 111
-bat_c02,141,56,0 duplicate(#bat_c02a) #bat_c02d 111
-bat_c02,143,58,0 duplicate(#bat_c02a) #bat_c02e 111
-bat_c02,145,60,0 duplicate(#bat_c02a) #bat_c02f 111
-
-// Battleground Engine
-// *********************************************************************
-
-- script KvM02_BG -1,{
- end;
-
-OnInit:
- setwall "bat_c02",54,122,6,7,0,"batc02wall_a";
- setwall "bat_c02",55,122,5,7,0,"batc02wall_b";
- setwall "bat_c02",140,56,6,7,0,"batc02wall_c";
- setwall "bat_c02",140,57,5,7,0,"batc02wall_d";
- disablenpc "TherapistKvM02a";
- disablenpc "TherapistKvM02b";
- disablenpc "VintenarKvM02a";
- disablenpc "VintenarKvM02b";
- end;
-
-OnGuillaumeJoin:
-OnCroixJoin:
- donpcevent "KvM02_BG::OnReadyCheck";
- end;
-
-OnGuillaumeQuit:
- set BG_Delay_Tick, gettimetick(2) + 1200;
-OnGuillaumeDie:
- if( $@KvM02BG == 2 )
- {
- set .Guillaume_Count, .Guillaume_Count - 1;
- set .Croix_Score, .Croix_Score + 1;
- bg_updatescore "bat_c02",.Guillaume_Score,.Croix_Score;
- if( .Guillaume_Count < 1 ) donpcevent "KvM02_BG::OnCroixWin";
- }
- end;
-
-OnCroixQuit:
- set BG_Delay_Tick, gettimetick(2) + 1200;
-OnCroixDie:
- if( $@KvM02BG == 2 )
- {
- set .Croix_Count, .Croix_Count - 1;
- set .Guillaume_Score, .Guillaume_Score + 1;
- bg_updatescore "bat_c02",.Guillaume_Score,.Croix_Score;
- if( .Croix_Count < 1 ) donpcevent "KvM02_BG::OnGuillaumeWin";
- }
- end;
-
-OnReadyCheck:
- if( $@KvM02BG )
- end;
- set .@Guillaume, getwaitingroomstate(0,"KvM02R_Guillaume");
- set .@Croix, getwaitingroomstate(0,"KvM02R_Croix");
-
- if( .@Guillaume < 5 || .@Croix < 5 )
- {
- if( .@Guillaume > 3 && .@Croix > 3 && !agitcheck() && $@KvM_Flood < gettimetick(2) )
- {
- announce "Battleground -- Kreiger Von Midgard [60-79] G: " + .@Guillaume + "/5, C: " + .@Croix + "/5",0,0x808080;
- set $@KvM_Flood, gettimetick(2) + 15;
- }
- else
- mapannounce "bat_room","Battleground -- Kreiger Von Midgard [60-79] G: " + .@Guillaume + "/5, C: " + .@Croix + "/5",1,0x808080;
- end;
- }
-
- set $@KvM02BG, 1; // Starting
- donpcevent "KvM02R_Croix::OnEnterBG";
- donpcevent "KvM02R_Guillaume::OnEnterBG";
- donpcevent "KvM02_BG::OnStart";
- end;
-
-OnStart:
- announce "Battleground -- Kreiger Von Midgard [60-79] has started!",0,0x808080;
- enablenpc "TherapistKvM02a";
- enablenpc "TherapistKvM02b";
- disablenpc "VintenarKvM02a";
- disablenpc "VintenarKvM02b";
- set $@KvM02BG_Victory, 0;
- sleep 2000;
- // Warp Teams
- bg_warp $@KvM02BG_id1,"bat_c02",53,128;
- bg_warp $@KvM02BG_id2,"bat_c02",146,55;
- // ScoreBoard
- set .Guillaume_Score, 0;
- set .Croix_Score, 0;
- initnpctimer;
- end;
-
-OnTimer5000:
- areapercentheal "bat_c02",50,123,58,131,100,100;
- areapercentheal "bat_c02",141,52,149,60,100,100;
- mapannounce "bat_c02","The Battle will start in 25 seconds!!",1,0x808080;
- end;
-
-OnTimer26000:
- mapannounce "bat_c02","The Battle will start in 4 seconds!!",1,0x808080;
- end;
-
-OnTimer27000:
- donpcevent "::OnKvM02LightA";
- end;
-
-OnTimer28000:
- donpcevent "::OnKvM02LightB";
- end;
-
-OnTimer29000:
- donpcevent "::OnKvM02LightC";
- end;
-
-OnTimer30000:
- // Team Members
- set .Guillaume_Count, bg_get_data($@KvM02BG_id1, 0);
- set .Croix_Count, bg_get_data($@KvM02BG_id2, 0);
- if( .Guillaume_Count < 5 || .Croix_Count < 5 )
- {
- set $@KvM02BG_Victory, 3;
- set $@KvM02BG, 3;
- mapannounce "bat_c02","There are not enough players to start the battle",1,0x808080;
- stopnpctimer;
- sleep 2000;
- donpcevent "KvM02_BG::OnStop";
- end;
- }
-
- set $@KvM02BG, 2; // Playing
- areapercentheal "bat_c02",50,123,58,131,100,100;
- bg_warp $@KvM02BG_id1,"bat_c02",62,119;
- areapercentheal "bat_c02",141,52,149,60,100,100;
- bg_warp $@KvM02BG_id2,"bat_c02",137,64;
- end;
-
-OnTimer32000:
- mapannounce "bat_c02","The Battle of Kreiger Von Midgard has begun!!",1,0x808080;
- end;
-
-OnTimer300000:
- mapannounce "bat_c02","The Battle will ends in 30 seconds!!",1,0x808080;
- end;
-
-OnTimer330000:
- if( .Croix_Count > .Guillaume_Count )
- donpcevent "KvM02_BG::OnCroixWin";
- else if( .Croix_Count < .Guillaume_Count )
- donpcevent "KvM02_BG::OnGuillaumeWin";
- else
- { // Draw Game
- set $@KvM02BG, 3;
- set $@KvM02BG_Victory, 3;
-
- stopnpctimer;
- sleep 2000;
- mapannounce "bat_c02","The time is out! This is a Tie...",1,0x808080;
- donpcevent "KvM02_BG::OnStop";
- }
- end;
-
-OnGuillaumeWin:
- set $@KvM02BG, 3;
- set $@KvM02BG_Victory, 1;
-
- stopnpctimer;
- sleep 2000;
- mapannounce "bat_c02","The Guillaume Army has won the Battle of Kreiger Von Midgard",1,0x0000FF;
- donpcevent "KvM02_BG::OnStop";
- end;
-
-OnCroixWin:
- set $@KvM02BG, 3;
- set $@KvM02BG_Victory, 2;
-
- stopnpctimer;
- sleep 2000;
- mapannounce "bat_c02","The Croix Army has won the Battle of Kreiger Von Midgard",1,0xFF0000;
- donpcevent "KvM02_BG::OnStop";
- end;
-
-OnStop:
- disablenpc "TherapistKvM02a";
- disablenpc "TherapistKvM02b";
- enablenpc "VintenarKvM02a";
- enablenpc "VintenarKvM02b";
- // Warp Teams
- bg_warp $@KvM02BG_id1,"bat_c02",53,128;
- bg_warp $@KvM02BG_id2,"bat_c02",146,55;
- donpcevent "KvM02_BG_Out::OnBegin";
- end;
-
-OnReset:
- stopnpctimer;
- stopnpctimer "KvM02_BG_Out";
- set .Croix_Count, 0;
- set .Guillaume_Count, 0;
- set .Croix_Score, 0;
- set .Guillaume_Score, 0;
- set $@KvM02BG_Victory, 0;
- if( $@KvM02BG_id1 ) { bg_destroy $@KvM02BG_id1; set $@KvM02BG_id1, 0; }
- if( $@KvM02BG_id2 ) { bg_destroy $@KvM02BG_id2; set $@KvM02BG_id2, 0; }
- disablenpc "TherapistKvM02a";
- disablenpc "TherapistKvM02b";
- disablenpc "VintenarKvM02a";
- disablenpc "VintenarKvM02b";
- sleep 1000;
- mapwarp "bat_c02","bat_room",155,150;
- sleep 2000;
- maprespawnguildid "bat_c02",0,3; // Just in case someone else
- bg_updatescore "bat_c02",0,0;
- sleep 2000;
- set $@KvM02BG, 0;
- donpcevent "KvM02_BG::OnReadyCheck"; // Maybe a game is ready to start
- end;
-}
-
-- script KvM02_BG_Out -1,{
- end;
-
-OnBegin:
- initnpctimer;
- end;
-
-OnTimer3000:
- mapannounce "bat_c02","Battle of Kreiger Von Midgard will close in 1 minute!",1,0x808080;
- end;
-OnTimer30000:
- mapannounce "bat_c02","Battle of Kreiger Von Midgard will close in 30 seconds!",1,0x808080;
- end;
-OnTimer50000:
- mapannounce "bat_c02","Battle of Kreiger Von Midgard will close in 10 seconds!",1,0x808080;
- end;
-OnTimer60000:
- donpcevent "KvM02_BG::OnReset";
- end;
-}
-
-// Battleground Therapist
-// *********************************************************************
-
-bat_c02,51,130,5 script Therapist in battle::TherapistKvM02a 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_c02,148,53,1 script Therapist in battle::TherapistKvM02b 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 rewards
-// *********************************************************************
-
-bat_c02,51,130,5 script Guillaume Vintenar::VintenarKvM02a 419,{
- if( $@KvM02BG_Victory )
- {
- if( $@KvM02BG_Victory == 3 )
- {
- setquest 6025;
- bg_leave;
- warp "bat_room",155,150;
- end;
- }
- else if( $@KvM02BG_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;
- }
-
- setquest 6025;
- getitem 7773, .@Reward;
- bg_leave;
- warp "bat_room",155,150;
- end;
- }
- end;
-}
-
-bat_c02,148,53,1 script Croix Vintenar::VintenarKvM02b 415,{
- if( $@KvM02BG_Victory )
- {
- if( $@KvM02BG_Victory == 3 )
- {
- setquest 6025;
- bg_leave;
- warp "bat_room",155,150;
- end;
- }
- else if( $@KvM02BG_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;
- }
-
- setquest 6025;
- getitem 7773, .@Reward;
- bg_leave;
- warp "bat_room",155,150;
- end;
- }
- end;
-}
-
-// MapFlags
-// *********************************************************************
-
-bat_c02 mapflag battleground 2
-bat_c02 mapflag nomemo
-bat_c02 mapflag nosave SavePoint
-bat_c02 mapflag noteleport
-bat_c02 mapflag nowarp
-bat_c02 mapflag nowarpto
-bat_c02 mapflag noreturn
-bat_c02 mapflag nobranch
-bat_c02 mapflag nopenalty
+// ============================================================================== +// BattleGround System - KvM 60~79 +// ============================================================================== + +// Registration NPC's +// ********************************************************************* + +bat_room,225,227,4 script Registration::KvM02R_Guillaume 418,{ // KvM Guillaume + end; + +OnInit: + waitingroom "Battle Station 5 Players",5,"KvM02_BG::OnGuillaumeJoin",1; + end; + +OnEnterBG: + set $@KvM02BG_id1, waitingroom2bg("bat_c02",53,128,"KvM02_BG::OnGuillaumeQuit","KvM02_BG::OnGuillaumeDie"); + end; +} + +bat_room,225,204,0 script Registration::KvM02R_Croix 414,{ // KvM Croix + end; + +OnInit: + waitingroom "Battle Station 5 Players",5,"KvM02_BG::OnCroixJoin",1; + end; + +OnEnterBG: + set $@KvM02BG_id2, waitingroom2bg("bat_c02",146,55,"KvM02_BG::OnCroixQuit","KvM02_BG::OnCroixDie"); + end; +} + +// Light Effects +// ********************************************************************* + +bat_c02,54,123,0 script #bat_c02a 111,{ + end; + +OnKvM02LightA: misceffect 54; end; +OnKvM02LightB: misceffect 55; end; +OnKvM02LightC: misceffect 56; end; +} + +bat_c02,56,125,0 duplicate(#bat_c02a) #bat_c02b 111 +bat_c02,58,127,0 duplicate(#bat_c02a) #bat_c02c 111 +bat_c02,141,56,0 duplicate(#bat_c02a) #bat_c02d 111 +bat_c02,143,58,0 duplicate(#bat_c02a) #bat_c02e 111 +bat_c02,145,60,0 duplicate(#bat_c02a) #bat_c02f 111 + +// Battleground Engine +// ********************************************************************* + +- script KvM02_BG -1,{ + end; + +OnInit: + setwall "bat_c02",54,122,6,7,0,"batc02wall_a"; + setwall "bat_c02",55,122,5,7,0,"batc02wall_b"; + setwall "bat_c02",140,56,6,7,0,"batc02wall_c"; + setwall "bat_c02",140,57,5,7,0,"batc02wall_d"; + disablenpc "TherapistKvM02a"; + disablenpc "TherapistKvM02b"; + disablenpc "VintenarKvM02a"; + disablenpc "VintenarKvM02b"; + end; + +OnGuillaumeJoin: +OnCroixJoin: + donpcevent "KvM02_BG::OnReadyCheck"; + end; + +OnGuillaumeQuit: + set BG_Delay_Tick, gettimetick(2) + 1200; +OnGuillaumeDie: + if( $@KvM02BG == 2 ) + { + set .Guillaume_Count, .Guillaume_Count - 1; + set .Croix_Score, .Croix_Score + 1; + bg_updatescore "bat_c02",.Guillaume_Score,.Croix_Score; + if( .Guillaume_Count < 1 ) donpcevent "KvM02_BG::OnCroixWin"; + } + end; + +OnCroixQuit: + set BG_Delay_Tick, gettimetick(2) + 1200; +OnCroixDie: + if( $@KvM02BG == 2 ) + { + set .Croix_Count, .Croix_Count - 1; + set .Guillaume_Score, .Guillaume_Score + 1; + bg_updatescore "bat_c02",.Guillaume_Score,.Croix_Score; + if( .Croix_Count < 1 ) donpcevent "KvM02_BG::OnGuillaumeWin"; + } + end; + +OnReadyCheck: + if( $@KvM02BG ) + end; + set .@Guillaume, getwaitingroomstate(0,"KvM02R_Guillaume"); + set .@Croix, getwaitingroomstate(0,"KvM02R_Croix"); + + if( .@Guillaume < 5 || .@Croix < 5 ) + { + if( .@Guillaume > 3 && .@Croix > 3 && !agitcheck() && $@KvM_Flood < gettimetick(2) ) + { + announce "Battleground -- Kreiger Von Midgard [60-79] G: " + .@Guillaume + "/5, C: " + .@Croix + "/5",0,0x808080; + set $@KvM_Flood, gettimetick(2) + 15; + } + else + mapannounce "bat_room","Battleground -- Kreiger Von Midgard [60-79] G: " + .@Guillaume + "/5, C: " + .@Croix + "/5",1,0x808080; + end; + } + + set $@KvM02BG, 1; // Starting + donpcevent "KvM02R_Croix::OnEnterBG"; + donpcevent "KvM02R_Guillaume::OnEnterBG"; + donpcevent "KvM02_BG::OnStart"; + end; + +OnStart: + announce "Battleground -- Kreiger Von Midgard [60-79] has started!",0,0x808080; + enablenpc "TherapistKvM02a"; + enablenpc "TherapistKvM02b"; + disablenpc "VintenarKvM02a"; + disablenpc "VintenarKvM02b"; + set $@KvM02BG_Victory, 0; + sleep 2000; + // Warp Teams + bg_warp $@KvM02BG_id1,"bat_c02",53,128; + bg_warp $@KvM02BG_id2,"bat_c02",146,55; + // ScoreBoard + set .Guillaume_Score, 0; + set .Croix_Score, 0; + initnpctimer; + end; + +OnTimer5000: + areapercentheal "bat_c02",50,123,58,131,100,100; + areapercentheal "bat_c02",141,52,149,60,100,100; + mapannounce "bat_c02","The Battle will start in 25 seconds!!",1,0x808080; + end; + +OnTimer26000: + mapannounce "bat_c02","The Battle will start in 4 seconds!!",1,0x808080; + end; + +OnTimer27000: + donpcevent "::OnKvM02LightA"; + end; + +OnTimer28000: + donpcevent "::OnKvM02LightB"; + end; + +OnTimer29000: + donpcevent "::OnKvM02LightC"; + end; + +OnTimer30000: + // Team Members + set .Guillaume_Count, bg_get_data($@KvM02BG_id1, 0); + set .Croix_Count, bg_get_data($@KvM02BG_id2, 0); + if( .Guillaume_Count < 5 || .Croix_Count < 5 ) + { + set $@KvM02BG_Victory, 3; + set $@KvM02BG, 3; + mapannounce "bat_c02","There are not enough players to start the battle",1,0x808080; + stopnpctimer; + sleep 2000; + donpcevent "KvM02_BG::OnStop"; + end; + } + + set $@KvM02BG, 2; // Playing + areapercentheal "bat_c02",50,123,58,131,100,100; + bg_warp $@KvM02BG_id1,"bat_c02",62,119; + areapercentheal "bat_c02",141,52,149,60,100,100; + bg_warp $@KvM02BG_id2,"bat_c02",137,64; + end; + +OnTimer32000: + mapannounce "bat_c02","The Battle of Kreiger Von Midgard has begun!!",1,0x808080; + end; + +OnTimer300000: + mapannounce "bat_c02","The Battle will ends in 30 seconds!!",1,0x808080; + end; + +OnTimer330000: + if( .Croix_Count > .Guillaume_Count ) + donpcevent "KvM02_BG::OnCroixWin"; + else if( .Croix_Count < .Guillaume_Count ) + donpcevent "KvM02_BG::OnGuillaumeWin"; + else + { // Draw Game + set $@KvM02BG, 3; + set $@KvM02BG_Victory, 3; + + stopnpctimer; + sleep 2000; + mapannounce "bat_c02","The time is out! This is a Tie...",1,0x808080; + donpcevent "KvM02_BG::OnStop"; + } + end; + +OnGuillaumeWin: + set $@KvM02BG, 3; + set $@KvM02BG_Victory, 1; + + stopnpctimer; + sleep 2000; + mapannounce "bat_c02","The Guillaume Army has won the Battle of Kreiger Von Midgard",1,0x0000FF; + donpcevent "KvM02_BG::OnStop"; + end; + +OnCroixWin: + set $@KvM02BG, 3; + set $@KvM02BG_Victory, 2; + + stopnpctimer; + sleep 2000; + mapannounce "bat_c02","The Croix Army has won the Battle of Kreiger Von Midgard",1,0xFF0000; + donpcevent "KvM02_BG::OnStop"; + end; + +OnStop: + disablenpc "TherapistKvM02a"; + disablenpc "TherapistKvM02b"; + enablenpc "VintenarKvM02a"; + enablenpc "VintenarKvM02b"; + // Warp Teams + bg_warp $@KvM02BG_id1,"bat_c02",53,128; + bg_warp $@KvM02BG_id2,"bat_c02",146,55; + donpcevent "KvM02_BG_Out::OnBegin"; + end; + +OnReset: + stopnpctimer; + stopnpctimer "KvM02_BG_Out"; + set .Croix_Count, 0; + set .Guillaume_Count, 0; + set .Croix_Score, 0; + set .Guillaume_Score, 0; + set $@KvM02BG_Victory, 0; + if( $@KvM02BG_id1 ) { bg_destroy $@KvM02BG_id1; set $@KvM02BG_id1, 0; } + if( $@KvM02BG_id2 ) { bg_destroy $@KvM02BG_id2; set $@KvM02BG_id2, 0; } + disablenpc "TherapistKvM02a"; + disablenpc "TherapistKvM02b"; + disablenpc "VintenarKvM02a"; + disablenpc "VintenarKvM02b"; + sleep 1000; + mapwarp "bat_c02","bat_room",155,150; + sleep 2000; + maprespawnguildid "bat_c02",0,3; // Just in case someone else + bg_updatescore "bat_c02",0,0; + sleep 2000; + set $@KvM02BG, 0; + donpcevent "KvM02_BG::OnReadyCheck"; // Maybe a game is ready to start + end; +} + +- script KvM02_BG_Out -1,{ + end; + +OnBegin: + initnpctimer; + end; + +OnTimer3000: + mapannounce "bat_c02","Battle of Kreiger Von Midgard will close in 1 minute!",1,0x808080; + end; +OnTimer30000: + mapannounce "bat_c02","Battle of Kreiger Von Midgard will close in 30 seconds!",1,0x808080; + end; +OnTimer50000: + mapannounce "bat_c02","Battle of Kreiger Von Midgard will close in 10 seconds!",1,0x808080; + end; +OnTimer60000: + donpcevent "KvM02_BG::OnReset"; + end; +} + +// Battleground Therapist +// ********************************************************************* + +bat_c02,51,130,5 script Therapist in battle::TherapistKvM02a 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_c02,148,53,1 script Therapist in battle::TherapistKvM02b 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 rewards +// ********************************************************************* + +bat_c02,51,130,5 script Guillaume Vintenar::VintenarKvM02a 419,{ + if( $@KvM02BG_Victory ) + { + if( $@KvM02BG_Victory == 3 ) + { + setquest 6025; + bg_leave; + warp "bat_room",155,150; + end; + } + else if( $@KvM02BG_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; + } + + setquest 6025; + getitem 7773, .@Reward; + bg_leave; + warp "bat_room",155,150; + end; + } + end; +} + +bat_c02,148,53,1 script Croix Vintenar::VintenarKvM02b 415,{ + if( $@KvM02BG_Victory ) + { + if( $@KvM02BG_Victory == 3 ) + { + setquest 6025; + bg_leave; + warp "bat_room",155,150; + end; + } + else if( $@KvM02BG_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; + } + + setquest 6025; + getitem 7773, .@Reward; + bg_leave; + warp "bat_room",155,150; + end; + } + end; +} + +// MapFlags +// ********************************************************************* + +bat_c02 mapflag battleground 2 +bat_c02 mapflag nomemo +bat_c02 mapflag nosave SavePoint +bat_c02 mapflag noteleport +bat_c02 mapflag nowarp +bat_c02 mapflag nowarpto +bat_c02 mapflag noreturn +bat_c02 mapflag nobranch +bat_c02 mapflag nopenalty diff --git a/npc/battleground/bg_kvm03.txt b/npc/battleground/bg_kvm03.txt index 7a8f82e0a..7765cebff 100644 --- a/npc/battleground/bg_kvm03.txt +++ b/npc/battleground/bg_kvm03.txt @@ -1,391 +1,391 @@ -// ==============================================================================
-// BattleGround System - KvM 1~59
-// ==============================================================================
-
-// Registration NPC's
-// *********************************************************************
-
-bat_room,197,227,4 script Registration::KvM03R_Guillaume 418,{ // KvM Guillaume
- end;
-
-OnInit:
- waitingroom "Battle Station 5 Players",5,"KvM03_BG::OnGuillaumeJoin",1;
- end;
-
-OnEnterBG:
- set $@KvM03BG_id1, waitingroom2bg("bat_c03",53,128,"KvM03_BG::OnGuillaumeQuit","KvM03_BG::OnGuillaumeDie");
- end;
-}
-
-bat_room,197,204,0 script Registration::KvM03R_Croix 414,{ // KvM Croix
- end;
-
-OnInit:
- waitingroom "Battle Station 5 Players",5,"KvM03_BG::OnCroixJoin",1;
- end;
-
-OnEnterBG:
- set $@KvM03BG_id2, waitingroom2bg("bat_c03",146,55,"KvM03_BG::OnCroixQuit","KvM03_BG::OnCroixDie");
- end;
-}
-
-// Light Effects
-// *********************************************************************
-
-bat_c03,54,123,0 script #bat_c03a 111,{
- end;
-
-OnKvM03LightA: misceffect 54; end;
-OnKvM03LightB: misceffect 55; end;
-OnKvM03LightC: misceffect 56; end;
-}
-
-bat_c03,56,125,0 duplicate(#bat_c03a) #bat_c03b 111
-bat_c03,58,127,0 duplicate(#bat_c03a) #bat_c03c 111
-bat_c03,141,56,0 duplicate(#bat_c03a) #bat_c03d 111
-bat_c03,143,58,0 duplicate(#bat_c03a) #bat_c03e 111
-bat_c03,145,60,0 duplicate(#bat_c03a) #bat_c03f 111
-
-// Battleground Engine
-// *********************************************************************
-
-- script KvM03_BG -1,{
- end;
-
-OnInit:
- setwall "bat_c03",54,122,6,7,0,"batc03wall_a";
- setwall "bat_c03",55,122,5,7,0,"batc03wall_b";
- setwall "bat_c03",140,56,6,7,0,"batc03wall_c";
- setwall "bat_c03",140,57,5,7,0,"batc03wall_d";
- disablenpc "TherapistKvM03a";
- disablenpc "TherapistKvM03b";
- disablenpc "VintenarKvM03a";
- disablenpc "VintenarKvM03b";
- end;
-
-OnGuillaumeJoin:
-OnCroixJoin:
- donpcevent "KvM03_BG::OnReadyCheck";
- end;
-
-OnGuillaumeQuit:
- set BG_Delay_Tick, gettimetick(2) + 1200;
-OnGuillaumeDie:
- if( $@KvM03BG == 2 )
- {
- set .Guillaume_Count, .Guillaume_Count - 1;
- set .Croix_Score, .Croix_Score + 1;
- bg_updatescore "bat_c03",.Guillaume_Score,.Croix_Score;
- if( .Guillaume_Count < 1 ) donpcevent "KvM03_BG::OnCroixWin";
- }
- end;
-
-OnCroixQuit:
- set BG_Delay_Tick, gettimetick(2) + 1200;
-OnCroixDie:
- if( $@KvM03BG == 2 )
- {
- set .Croix_Count, .Croix_Count - 1;
- set .Guillaume_Score, .Guillaume_Score + 1;
- bg_updatescore "bat_c03",.Guillaume_Score,.Croix_Score;
- if( .Croix_Count < 1 ) donpcevent "KvM03_BG::OnGuillaumeWin";
- }
- end;
-
-OnReadyCheck:
- if( $@KvM03BG )
- end;
- set .@Guillaume, getwaitingroomstate(0,"KvM03R_Guillaume");
- set .@Croix, getwaitingroomstate(0,"KvM03R_Croix");
-
- if( .@Guillaume < 5 || .@Croix < 5 )
- {
- if( .@Guillaume > 3 && .@Croix > 3 && !agitcheck() && $@KvM_Flood < gettimetick(2) )
- {
- announce "Battleground -- Kreiger Von Midgard [1-59] G: " + .@Guillaume + "/5, C: " + .@Croix + "/5",0,0xC0C0C0;
- set $@KvM_Flood, gettimetick(2) + 15;
- }
- else
- mapannounce "bat_room","Battleground -- Kreiger Von Midgard [1-59] G: " + .@Guillaume + "/5, C: " + .@Croix + "/5",1,0xC0C0C0;
- end;
- }
-
- set $@KvM03BG, 1; // Starting
- donpcevent "KvM03R_Croix::OnEnterBG";
- donpcevent "KvM03R_Guillaume::OnEnterBG";
- donpcevent "KvM03_BG::OnStart";
- end;
-
-OnStart:
- announce "Battleground -- Kreiger Von Midgard [1-59] has started!",0,0xC0C0C0;
- enablenpc "TherapistKvM03a";
- enablenpc "TherapistKvM03b";
- disablenpc "VintenarKvM03a";
- disablenpc "VintenarKvM03b";
- set $@KvM03BG_Victory, 0;
- sleep 2000;
- // Warp Teams
- bg_warp $@KvM03BG_id1,"bat_c03",53,128;
- bg_warp $@KvM03BG_id2,"bat_c03",146,55;
- // ScoreBoard
- set .Guillaume_Score, 0;
- set .Croix_Score, 0;
- initnpctimer;
- end;
-
-OnTimer5000:
- areapercentheal "bat_c03",50,123,58,131,100,100;
- areapercentheal "bat_c03",141,52,149,60,100,100;
- mapannounce "bat_c03","The Battle will start in 25 seconds!!",1,0xC0C0C0;
- end;
-
-OnTimer26000:
- mapannounce "bat_c03","The Battle will start in 4 seconds!!",1,0xC0C0C0;
- end;
-
-OnTimer27000:
- donpcevent "::OnKvM03LightA";
- end;
-
-OnTimer28000:
- donpcevent "::OnKvM03LightB";
- end;
-
-OnTimer29000:
- donpcevent "::OnKvM03LightC";
- end;
-
-OnTimer30000:
- // Team Members
- set .Guillaume_Count, bg_get_data($@KvM03BG_id1, 0);
- set .Croix_Count, bg_get_data($@KvM03BG_id2, 0);
- if( .Guillaume_Count < 5 || .Croix_Count < 5 )
- {
- set $@KvM03BG_Victory, 3;
- set $@KvM03BG, 3;
- mapannounce "bat_c03","There are not enough players to start the battle",1,0xC0C0C0;
- stopnpctimer;
- sleep 2000;
- donpcevent "KvM03_BG::OnStop";
- end;
- }
-
- set $@KvM03BG, 2; // Playing
- areapercentheal "bat_c03",50,123,58,131,100,100;
- bg_warp $@KvM03BG_id1,"bat_c03",62,119;
- areapercentheal "bat_c03",141,52,149,60,100,100;
- bg_warp $@KvM03BG_id2,"bat_c03",137,64;
- end;
-
-OnTimer32000:
- mapannounce "bat_c03","The Battle of Kreiger Von Midgard has begun!!",1,0xC0C0C0;
- end;
-
-OnTimer300000:
- mapannounce "bat_c03","The Battle will ends in 30 seconds!!",1,0xC0C0C0;
- end;
-
-OnTimer330000:
- if( .Croix_Count > .Guillaume_Count )
- donpcevent "KvM03_BG::OnCroixWin";
- else if( .Croix_Count < .Guillaume_Count )
- donpcevent "KvM03_BG::OnGuillaumeWin";
- else
- { // Draw Game
- set $@KvM03BG, 3;
- set $@KvM03BG_Victory, 3;
-
- stopnpctimer;
- sleep 2000;
- mapannounce "bat_c03","The time is out! This is a Tie...",1,0xC0C0C0;
- donpcevent "KvM03_BG::OnStop";
- }
- end;
-
-OnGuillaumeWin:
- set $@KvM03BG, 3;
- set $@KvM03BG_Victory, 1;
-
- stopnpctimer;
- sleep 2000;
- mapannounce "bat_c03","The Guillaume Army has won the Battle of Kreiger Von Midgard",1,0x0000FF;
- donpcevent "KvM03_BG::OnStop";
- end;
-
-OnCroixWin:
- set $@KvM03BG, 3;
- set $@KvM03BG_Victory, 2;
-
- stopnpctimer;
- sleep 2000;
- mapannounce "bat_c03","The Croix Army has won the Battle of Kreiger Von Midgard",1,0xFF0000;
- donpcevent "KvM03_BG::OnStop";
- end;
-
-OnStop:
- disablenpc "TherapistKvM03a";
- disablenpc "TherapistKvM03b";
- enablenpc "VintenarKvM03a";
- enablenpc "VintenarKvM03b";
- // Warp Teams
- bg_warp $@KvM03BG_id1,"bat_c03",53,128;
- bg_warp $@KvM03BG_id2,"bat_c03",146,55;
- donpcevent "KvM03_BG_Out::OnBegin";
- end;
-
-OnReset:
- stopnpctimer;
- stopnpctimer "KvM03_BG_Out";
- set .Croix_Count, 0;
- set .Guillaume_Count, 0;
- set .Croix_Score, 0;
- set .Guillaume_Score, 0;
- set $@KvM03BG_Victory, 0;
- if( $@KvM03BG_id1 ) { bg_destroy $@KvM03BG_id1; set $@KvM03BG_id1, 0; }
- if( $@KvM03BG_id2 ) { bg_destroy $@KvM03BG_id2; set $@KvM03BG_id2, 0; }
- disablenpc "TherapistKvM03a";
- disablenpc "TherapistKvM03b";
- disablenpc "VintenarKvM03a";
- disablenpc "VintenarKvM03b";
- sleep 1000;
- mapwarp "bat_c03","bat_room",155,150;
- sleep 2000;
- maprespawnguildid "bat_c03",0,3; // Just in case someone else
- bg_updatescore "bat_c03",0,0;
- sleep 2000;
- set $@KvM03BG, 0;
- donpcevent "KvM03_BG::OnReadyCheck"; // Maybe a game is ready to start
- end;
-}
-
-- script KvM03_BG_Out -1,{
- end;
-
-OnBegin:
- initnpctimer;
- end;
-
-OnTimer3000:
- mapannounce "bat_c03","Battle of Kreiger Von Midgard will close in 1 minute!",1,0xC0C0C0;
- end;
-OnTimer30000:
- mapannounce "bat_c03","Battle of Kreiger Von Midgard will close in 30 seconds!",1,0xC0C0C0;
- end;
-OnTimer50000:
- mapannounce "bat_c03","Battle of Kreiger Von Midgard will close in 10 seconds!",1,0xC0C0C0;
- end;
-OnTimer60000:
- donpcevent "KvM03_BG::OnReset";
- end;
-}
-
-// Battleground Therapist
-// *********************************************************************
-
-bat_c03,51,130,5 script Therapist in battle::TherapistKvM03a 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_c03,148,53,1 script Therapist in battle::TherapistKvM03b 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 rewards
-// *********************************************************************
-
-bat_c03,51,130,5 script Guillaume Vintenar::VintenarKvM03a 419,{
- if( $@KvM03BG_Victory )
- {
- if( $@KvM03BG_Victory == 3 )
- {
- setquest 6025;
- bg_leave;
- warp "bat_room",155,150;
- end;
- }
- else if( $@KvM03BG_Victory == Bat_Team )
- { // Victory
- set .@Reward, 1;
- mes "[Swandery]";
- mes "Blessed Guillaume!!";
- mes "Let's enjoy our glorious victory!";
- mes "" + strcharinfo(0) + ", its a sign reflecting victory";
- close2;
- }
- else
- { //
- set .@Reward, 0;
- 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;
- }
-
- setquest 6025;
- getitem 7773, .@Reward;
- bg_leave;
- warp "bat_room",155,150;
- end;
- }
- end;
-}
-
-bat_c03,148,53,1 script Croix Vintenar::VintenarKvM03b 415,{
- if( $@KvM03BG_Victory )
- {
- if( $@KvM03BG_Victory == 3 )
- {
- setquest 6025;
- bg_leave;
- warp "bat_room",155,150;
- end;
- }
- else if( $@KvM03BG_Victory == Bat_Team )
- { // Victory
- set .@Reward, 1;
- mes "[Swandery]";
- mes "Blessed Croax!!";
- mes "Let's enjoy our glorious victory!";
- mes "" + strcharinfo(0) + ", its a sign reflecting victory";
- close2;
- }
- else
- { //
- set .@Reward, 0;
- mes "[Swandery]";
- mes "Oh, " + strcharinfo(0) + ". Don't be sad.";
- mes "Even though we didn't win, we did our best.";
- mes "Please don't forget this battle. We can win the next.";
- close2;
- }
-
- setquest 6025;
- getitem 7773, .@Reward;
- bg_leave;
- warp "bat_room",155,150;
- end;
- }
- end;
-}
-
-// MapFlags
-// *********************************************************************
-
-bat_c03 mapflag battleground 2
-bat_c03 mapflag nomemo
-bat_c03 mapflag nosave SavePoint
-bat_c03 mapflag noteleport
-bat_c03 mapflag nowarp
-bat_c03 mapflag nowarpto
-bat_c03 mapflag noreturn
-bat_c03 mapflag nobranch
-bat_c03 mapflag nopenalty
+// ============================================================================== +// BattleGround System - KvM 1~59 +// ============================================================================== + +// Registration NPC's +// ********************************************************************* + +bat_room,197,227,4 script Registration::KvM03R_Guillaume 418,{ // KvM Guillaume + end; + +OnInit: + waitingroom "Battle Station 5 Players",5,"KvM03_BG::OnGuillaumeJoin",1; + end; + +OnEnterBG: + set $@KvM03BG_id1, waitingroom2bg("bat_c03",53,128,"KvM03_BG::OnGuillaumeQuit","KvM03_BG::OnGuillaumeDie"); + end; +} + +bat_room,197,204,0 script Registration::KvM03R_Croix 414,{ // KvM Croix + end; + +OnInit: + waitingroom "Battle Station 5 Players",5,"KvM03_BG::OnCroixJoin",1; + end; + +OnEnterBG: + set $@KvM03BG_id2, waitingroom2bg("bat_c03",146,55,"KvM03_BG::OnCroixQuit","KvM03_BG::OnCroixDie"); + end; +} + +// Light Effects +// ********************************************************************* + +bat_c03,54,123,0 script #bat_c03a 111,{ + end; + +OnKvM03LightA: misceffect 54; end; +OnKvM03LightB: misceffect 55; end; +OnKvM03LightC: misceffect 56; end; +} + +bat_c03,56,125,0 duplicate(#bat_c03a) #bat_c03b 111 +bat_c03,58,127,0 duplicate(#bat_c03a) #bat_c03c 111 +bat_c03,141,56,0 duplicate(#bat_c03a) #bat_c03d 111 +bat_c03,143,58,0 duplicate(#bat_c03a) #bat_c03e 111 +bat_c03,145,60,0 duplicate(#bat_c03a) #bat_c03f 111 + +// Battleground Engine +// ********************************************************************* + +- script KvM03_BG -1,{ + end; + +OnInit: + setwall "bat_c03",54,122,6,7,0,"batc03wall_a"; + setwall "bat_c03",55,122,5,7,0,"batc03wall_b"; + setwall "bat_c03",140,56,6,7,0,"batc03wall_c"; + setwall "bat_c03",140,57,5,7,0,"batc03wall_d"; + disablenpc "TherapistKvM03a"; + disablenpc "TherapistKvM03b"; + disablenpc "VintenarKvM03a"; + disablenpc "VintenarKvM03b"; + end; + +OnGuillaumeJoin: +OnCroixJoin: + donpcevent "KvM03_BG::OnReadyCheck"; + end; + +OnGuillaumeQuit: + set BG_Delay_Tick, gettimetick(2) + 1200; +OnGuillaumeDie: + if( $@KvM03BG == 2 ) + { + set .Guillaume_Count, .Guillaume_Count - 1; + set .Croix_Score, .Croix_Score + 1; + bg_updatescore "bat_c03",.Guillaume_Score,.Croix_Score; + if( .Guillaume_Count < 1 ) donpcevent "KvM03_BG::OnCroixWin"; + } + end; + +OnCroixQuit: + set BG_Delay_Tick, gettimetick(2) + 1200; +OnCroixDie: + if( $@KvM03BG == 2 ) + { + set .Croix_Count, .Croix_Count - 1; + set .Guillaume_Score, .Guillaume_Score + 1; + bg_updatescore "bat_c03",.Guillaume_Score,.Croix_Score; + if( .Croix_Count < 1 ) donpcevent "KvM03_BG::OnGuillaumeWin"; + } + end; + +OnReadyCheck: + if( $@KvM03BG ) + end; + set .@Guillaume, getwaitingroomstate(0,"KvM03R_Guillaume"); + set .@Croix, getwaitingroomstate(0,"KvM03R_Croix"); + + if( .@Guillaume < 5 || .@Croix < 5 ) + { + if( .@Guillaume > 3 && .@Croix > 3 && !agitcheck() && $@KvM_Flood < gettimetick(2) ) + { + announce "Battleground -- Kreiger Von Midgard [1-59] G: " + .@Guillaume + "/5, C: " + .@Croix + "/5",0,0xC0C0C0; + set $@KvM_Flood, gettimetick(2) + 15; + } + else + mapannounce "bat_room","Battleground -- Kreiger Von Midgard [1-59] G: " + .@Guillaume + "/5, C: " + .@Croix + "/5",1,0xC0C0C0; + end; + } + + set $@KvM03BG, 1; // Starting + donpcevent "KvM03R_Croix::OnEnterBG"; + donpcevent "KvM03R_Guillaume::OnEnterBG"; + donpcevent "KvM03_BG::OnStart"; + end; + +OnStart: + announce "Battleground -- Kreiger Von Midgard [1-59] has started!",0,0xC0C0C0; + enablenpc "TherapistKvM03a"; + enablenpc "TherapistKvM03b"; + disablenpc "VintenarKvM03a"; + disablenpc "VintenarKvM03b"; + set $@KvM03BG_Victory, 0; + sleep 2000; + // Warp Teams + bg_warp $@KvM03BG_id1,"bat_c03",53,128; + bg_warp $@KvM03BG_id2,"bat_c03",146,55; + // ScoreBoard + set .Guillaume_Score, 0; + set .Croix_Score, 0; + initnpctimer; + end; + +OnTimer5000: + areapercentheal "bat_c03",50,123,58,131,100,100; + areapercentheal "bat_c03",141,52,149,60,100,100; + mapannounce "bat_c03","The Battle will start in 25 seconds!!",1,0xC0C0C0; + end; + +OnTimer26000: + mapannounce "bat_c03","The Battle will start in 4 seconds!!",1,0xC0C0C0; + end; + +OnTimer27000: + donpcevent "::OnKvM03LightA"; + end; + +OnTimer28000: + donpcevent "::OnKvM03LightB"; + end; + +OnTimer29000: + donpcevent "::OnKvM03LightC"; + end; + +OnTimer30000: + // Team Members + set .Guillaume_Count, bg_get_data($@KvM03BG_id1, 0); + set .Croix_Count, bg_get_data($@KvM03BG_id2, 0); + if( .Guillaume_Count < 5 || .Croix_Count < 5 ) + { + set $@KvM03BG_Victory, 3; + set $@KvM03BG, 3; + mapannounce "bat_c03","There are not enough players to start the battle",1,0xC0C0C0; + stopnpctimer; + sleep 2000; + donpcevent "KvM03_BG::OnStop"; + end; + } + + set $@KvM03BG, 2; // Playing + areapercentheal "bat_c03",50,123,58,131,100,100; + bg_warp $@KvM03BG_id1,"bat_c03",62,119; + areapercentheal "bat_c03",141,52,149,60,100,100; + bg_warp $@KvM03BG_id2,"bat_c03",137,64; + end; + +OnTimer32000: + mapannounce "bat_c03","The Battle of Kreiger Von Midgard has begun!!",1,0xC0C0C0; + end; + +OnTimer300000: + mapannounce "bat_c03","The Battle will ends in 30 seconds!!",1,0xC0C0C0; + end; + +OnTimer330000: + if( .Croix_Count > .Guillaume_Count ) + donpcevent "KvM03_BG::OnCroixWin"; + else if( .Croix_Count < .Guillaume_Count ) + donpcevent "KvM03_BG::OnGuillaumeWin"; + else + { // Draw Game + set $@KvM03BG, 3; + set $@KvM03BG_Victory, 3; + + stopnpctimer; + sleep 2000; + mapannounce "bat_c03","The time is out! This is a Tie...",1,0xC0C0C0; + donpcevent "KvM03_BG::OnStop"; + } + end; + +OnGuillaumeWin: + set $@KvM03BG, 3; + set $@KvM03BG_Victory, 1; + + stopnpctimer; + sleep 2000; + mapannounce "bat_c03","The Guillaume Army has won the Battle of Kreiger Von Midgard",1,0x0000FF; + donpcevent "KvM03_BG::OnStop"; + end; + +OnCroixWin: + set $@KvM03BG, 3; + set $@KvM03BG_Victory, 2; + + stopnpctimer; + sleep 2000; + mapannounce "bat_c03","The Croix Army has won the Battle of Kreiger Von Midgard",1,0xFF0000; + donpcevent "KvM03_BG::OnStop"; + end; + +OnStop: + disablenpc "TherapistKvM03a"; + disablenpc "TherapistKvM03b"; + enablenpc "VintenarKvM03a"; + enablenpc "VintenarKvM03b"; + // Warp Teams + bg_warp $@KvM03BG_id1,"bat_c03",53,128; + bg_warp $@KvM03BG_id2,"bat_c03",146,55; + donpcevent "KvM03_BG_Out::OnBegin"; + end; + +OnReset: + stopnpctimer; + stopnpctimer "KvM03_BG_Out"; + set .Croix_Count, 0; + set .Guillaume_Count, 0; + set .Croix_Score, 0; + set .Guillaume_Score, 0; + set $@KvM03BG_Victory, 0; + if( $@KvM03BG_id1 ) { bg_destroy $@KvM03BG_id1; set $@KvM03BG_id1, 0; } + if( $@KvM03BG_id2 ) { bg_destroy $@KvM03BG_id2; set $@KvM03BG_id2, 0; } + disablenpc "TherapistKvM03a"; + disablenpc "TherapistKvM03b"; + disablenpc "VintenarKvM03a"; + disablenpc "VintenarKvM03b"; + sleep 1000; + mapwarp "bat_c03","bat_room",155,150; + sleep 2000; + maprespawnguildid "bat_c03",0,3; // Just in case someone else + bg_updatescore "bat_c03",0,0; + sleep 2000; + set $@KvM03BG, 0; + donpcevent "KvM03_BG::OnReadyCheck"; // Maybe a game is ready to start + end; +} + +- script KvM03_BG_Out -1,{ + end; + +OnBegin: + initnpctimer; + end; + +OnTimer3000: + mapannounce "bat_c03","Battle of Kreiger Von Midgard will close in 1 minute!",1,0xC0C0C0; + end; +OnTimer30000: + mapannounce "bat_c03","Battle of Kreiger Von Midgard will close in 30 seconds!",1,0xC0C0C0; + end; +OnTimer50000: + mapannounce "bat_c03","Battle of Kreiger Von Midgard will close in 10 seconds!",1,0xC0C0C0; + end; +OnTimer60000: + donpcevent "KvM03_BG::OnReset"; + end; +} + +// Battleground Therapist +// ********************************************************************* + +bat_c03,51,130,5 script Therapist in battle::TherapistKvM03a 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_c03,148,53,1 script Therapist in battle::TherapistKvM03b 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 rewards +// ********************************************************************* + +bat_c03,51,130,5 script Guillaume Vintenar::VintenarKvM03a 419,{ + if( $@KvM03BG_Victory ) + { + if( $@KvM03BG_Victory == 3 ) + { + setquest 6025; + bg_leave; + warp "bat_room",155,150; + end; + } + else if( $@KvM03BG_Victory == Bat_Team ) + { // Victory + set .@Reward, 1; + mes "[Swandery]"; + mes "Blessed Guillaume!!"; + mes "Let's enjoy our glorious victory!"; + mes "" + strcharinfo(0) + ", its a sign reflecting victory"; + close2; + } + else + { // + set .@Reward, 0; + 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; + } + + setquest 6025; + getitem 7773, .@Reward; + bg_leave; + warp "bat_room",155,150; + end; + } + end; +} + +bat_c03,148,53,1 script Croix Vintenar::VintenarKvM03b 415,{ + if( $@KvM03BG_Victory ) + { + if( $@KvM03BG_Victory == 3 ) + { + setquest 6025; + bg_leave; + warp "bat_room",155,150; + end; + } + else if( $@KvM03BG_Victory == Bat_Team ) + { // Victory + set .@Reward, 1; + mes "[Swandery]"; + mes "Blessed Croax!!"; + mes "Let's enjoy our glorious victory!"; + mes "" + strcharinfo(0) + ", its a sign reflecting victory"; + close2; + } + else + { // + set .@Reward, 0; + mes "[Swandery]"; + mes "Oh, " + strcharinfo(0) + ". Don't be sad."; + mes "Even though we didn't win, we did our best."; + mes "Please don't forget this battle. We can win the next."; + close2; + } + + setquest 6025; + getitem 7773, .@Reward; + bg_leave; + warp "bat_room",155,150; + end; + } + end; +} + +// MapFlags +// ********************************************************************* + +bat_c03 mapflag battleground 2 +bat_c03 mapflag nomemo +bat_c03 mapflag nosave SavePoint +bat_c03 mapflag noteleport +bat_c03 mapflag nowarp +bat_c03 mapflag nowarpto +bat_c03 mapflag noreturn +bat_c03 mapflag nobranch +bat_c03 mapflag nopenalty |