diff options
Diffstat (limited to 'npc/004-1')
| -rw-r--r-- | npc/004-1/_import.txt | 1 | ||||
| -rw-r--r-- | npc/004-1/bgmaster.txt | 354 |
2 files changed, 0 insertions, 355 deletions
diff --git a/npc/004-1/_import.txt b/npc/004-1/_import.txt index 123369a47..d8897b37d 100644 --- a/npc/004-1/_import.txt +++ b/npc/004-1/_import.txt @@ -2,5 +2,4 @@ // This file is generated automatically. All manually added changes will be removed when running the Converter. "npc/004-1/_mobs.txt", "npc/004-1/_warps.txt", -"npc/004-1/bgmaster.txt", "npc/004-1/elanore.txt", diff --git a/npc/004-1/bgmaster.txt b/npc/004-1/bgmaster.txt deleted file mode 100644 index 7df29e8c1..000000000 --- a/npc/004-1/bgmaster.txt +++ /dev/null @@ -1,354 +0,0 @@ -// TMW2 Scripts. -// Author: -// Jesusalva - -// Original File - -004-1,119,96,0 script Cassia NPC_FEMALE,{ - mesn; - /* - //if ($@BattleOn) goto L_Busy; - mesq l("Hello! I am @@, currently in charge of the Desert Pass.", .name$); - next; - atcommand("@time"); - mesq l("The Fallen Kings challenge ownership of this pass at ##B08:00##b, ##B16:00##b and ##B00:00##b."); - next; - mesq l("Right click on one of their representatives, and choose to join a \'Chat\' when it is close of the time!"); - next; - mesq l("Just as a warning, main chat will change. Use it to discuss the strategy!"); - if (!getgmlevel()) goto L_Close; - mes ""; - menu - l("Join team 1."), L_T1, - l("Join team 2."), L_T2; - */ - if ($@BGMaster1) goto L_Busy; - mesq l("Hello! I am Cassia, Ambassator. During the Monster War outbreak, Frostia and Halinarzo felt."); - next; - mesq l("To train their soldiers, they frequently face one against other in duels. Adventurers are welcome to join their drills."); - next; - mesq l("To join a drill, right click on one of the lieutenants and join their Battle Stations. The drill can last up to 10 minutes."); - next; - mesq l("The sides accept only one adventurer. You'll also lose access to General Chat upon joining, and will have to use #world."); - next; - mesq l("Be sure to have a friend before joining, or you may have to logout in order to be able to move again!"); - close; - -L_T1: - mesn; - if (bg_join_team($@FK_Team1)) - goto L_SuccessJoin; - mes "An error happened."; - goto L_Close; - -L_T2: - mesn; - if (bg_join_team($@FK_Team1)) - goto L_SuccessJoin; - mes "An error happened."; - goto L_Close; - -L_SuccessJoin: - mesq l("Done!"); - next; - warp "001-2", 0, 0; - close; - -L_Close: - close; - -L_Busy: - if ($@BGMaster1 == 2) { - mesq l("The soldiers are resting. You can join them starting at ##B07:00, 15:00 and 23:00##b in UTC."); - } else { - mesq l("People are challenging now."); - } - close; - -OnPcQuit: - warp "002-4", 0, 0; - bg_leave(); - end; - -OnPcDeath: - warp "002-4", 0, 0; - bg_leave(); - end; - -OnTimer60000: - if (getmapusers("001-2") < 2 || .BGC > 10) goto L_Cancel; - - mapannounce("001-2", "Reinforcements raise!", bc_map); - $@FKing_T1 = bg_monster($@FK_Team1, "001-2", 125, 38, "FallenGuard1", 1081, "Cassia::OnSkip"); - $@FKing_T2 = bg_monster($@FK_Team2, "001-2",124, 213, "FallenGuard2", 1082, "Cassia::OnSkip"); - .BGC+=1; - stopnpctimer(); - initnpctimer(); - end; - -// Arena Cooldown (every 8 hours) (CET time) -OnClock0000: -OnClock0800: -OnClock1600: - if ($@BGMaster1 == 2) $@BGMaster1=0; - end; - -OnSkip: - end; - -L_Skip: - end; - -L_RestartTimer: - stopnpctimer(); - initnpctimer(); - end; - -L_Cancel: - stopnpctimer(); - announce "The Fallen Kings Duel ended in a draw!", bc_all; - killmonsterall "001-2"; - - mapwarp "001-2", "004-2", 29, 23; - bg_destroy($@FK_Team1); - bg_destroy($@FK_Team2); - $@BGMaster1=2; - end; - -OnVictor1: - if (!$@BGMaster1) goto L_Skip; - stopnpctimer(); - announce "Team 1 raises victorious at the Fallen Kings Duel!", bc_all; // TODO: Give players a reward - killmonsterall "001-2"; - - mapwarp "001-2", "004-2", 29, 23; - bg_destroy($@FK_Team1); - bg_destroy($@FK_Team2); - $@BGMaster1=2; - end; - -OnVictor2: - if (!$@BGMaster1) goto L_Skip; - stopnpctimer(); - announce "Team 2 raises victorious at the Fallen Kings Duel!", bc_all; - killmonsterall "001-2"; - - mapwarp "001-2", "004-2", 29, 23; - bg_destroy($@FK_Team1); - bg_destroy($@FK_Team2); - $@BGMaster1=2; - end; - -OnInit: - .@npcId = getnpcid(0, .name$); - setunitdata(.@npcId, UDT_HEADTOP, 1322); // Dress - setunitdata(.@npcId, UDT_HEADMIDDLE, 2204); // Not needed - setunitdata(.@npcId, UDT_HEADBOTTOM, 1800); // Shoes - setunitdata(.@npcId, UDT_WEAPON, 3501); - setunitdata(.@npcId, UDT_HAIRSTYLE, 12); - setunitdata(.@npcId, UDT_HAIRCOLOR, 5); - npcsit; - - .sex = G_FEMALE; - .distance = 7; - /* - // This script is TODO - if (!debug) { - disablenpc "Cassia"; - }*/ - end; - -OnDoEvent: - .BGC=0; - mapannounce("001-2", "May the fight begin!", bc_map); - $@FKing_T1 = bg_monster($@FK_Team1, "001-2", 125, 38, "FallenKing1", 1079, "Cassia::OnVictor2"); - $@FKing_T2 = bg_monster($@FK_Team2, "001-2", 124, 213, "FallenKing2", 1080, "Cassia::OnVictor1"); - initnpctimer(); - end; -} - - - - - - -// This script is TODO WIP -/* -004-1,115,93,0 script Emissary#1 NPC_ELF,{ - hello; - -OnSendToBattle: - $@FK_Team1=waitingroom2bg("testbg", 13, 4, "Cassia::OnPcQuit", "Cassia::OnPcDeath"); - setbgteam $@FK_Team1, 1; - bg_warp $@FK_Team1, "testbg", 13, 4; - end; - -OnInit: - .@npcId = getnpcid(0, .name$); - setunitdata(.@npcId, UDT_HEADTOP, 1312); // Light armor - setunitdata(.@npcId, UDT_HEADMIDDLE, 2212); // Pants - setunitdata(.@npcId, UDT_HEADBOTTOM, 1800); // Shoes - setunitdata(.@npcId, UDT_WEAPON, 3501); - setunitdata(.@npcId, UDT_HAIRSTYLE, 13); - setunitdata(.@npcId, UDT_HAIRCOLOR, 7); - - waitingroom("Winterfall", 30, "Cassia::OnSkip", 1); - .sex = G_OTHER; - .distance = 5; - end; -} - - -004-1,117,93,0 script Emissary#2 NPC_ELF,{ - hello; - -OnSendToBattle: - $@FK_Team2=waitingroom2bg("testbg", 13, 26, "Cassia::OnPcQuit", "Cassia::OnPcDeath"); - setbgteam $@FK_Team2, 2; - bg_warp $@FK_Team2, "testbg", 13, 26; - end; - -OnInit: - .@npcId = getnpcid(0, .name$); - setunitdata(.@npcId, UDT_HEADTOP, 1311); // Terran armor - setunitdata(.@npcId, UDT_HEADMIDDLE, 2212); // Pants - setunitdata(.@npcId, UDT_HEADBOTTOM, 1800); // Shoes - setunitdata(.@npcId, UDT_WEAPON, 3501); - setunitdata(.@npcId, UDT_HAIRSTYLE, 13); - setunitdata(.@npcId, UDT_HAIRCOLOR, 7); - - waitingroom("Summerfall", 30, "Cassia::OnSkip", 1); - .sex = G_OTHER; - .distance = 5; - end; - -} -*/ - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -004-1,115,93,0 script Lt. Randy NPC_ELF,{ - hello; - -OnInit: - .@npcId = getnpcid(0, .name$); - setunitdata(.@npcId, UDT_HEADTOP, 1312); // Light armor - setunitdata(.@npcId, UDT_HEADMIDDLE, 2212); // Pants - setunitdata(.@npcId, UDT_HEADBOTTOM, 1800); // Shoes - setunitdata(.@npcId, UDT_WEAPON, 3501); - setunitdata(.@npcId, UDT_HAIRSTYLE, 13); - setunitdata(.@npcId, UDT_HAIRCOLOR, 7); - - waitingroom("Battle Station", 2, "start#bat_a02::OnReadyCheck", 1); - end; - -OnEnterBG: - $@FK_Team1 = waitingroom2bg("001-2",126, 38,"start#bat_a02::OnSide1Quit",""); - end; -} - -001-2,0,0,0 script Lt. Gerry NPC_ELF,{ - hello; - -OnInit: - .@npcId = getnpcid(0, .name$); - setunitdata(.@npcId, UDT_HEADTOP, 1311); // Terranite armor - setunitdata(.@npcId, UDT_HEADMIDDLE, 2212); // Pants - setunitdata(.@npcId, UDT_HEADBOTTOM, 1800); // Shoes - setunitdata(.@npcId, UDT_WEAPON, 3501); - setunitdata(.@npcId, UDT_HAIRSTYLE, 13); - setunitdata(.@npcId, UDT_HAIRCOLOR, 7); - - waitingroom("Battle Station", 2, "start#bat_a02::OnReadyCheck", 1); - end; - -OnEnterBG: - $@FK_Team2 = waitingroom2bg("001-2",124,213,"start#bat_a02::OnSide2Quit",""); - end; -} - -//== Tierra Gorge Battleground Engine ====================== -001-2,0,0,3 script start#bat_a02 NPC_HIDDEN,{ -OnInit: - //mapwarp "bat_a02","bat_room",154,150; - end; - -OnEnable: - end; - -OnSide1Quit: -OnSide2Quit: - bg_leave; - end; - -OnReadyCheck: - if( $@BGMaster1 ) - end; - .@Guillaume = getwaitingroomstate(0,"Lt. Randy"); - .@Croix = getwaitingroomstate(0,"Lt. Gerry"); - if( !.@Guillaume && !.@Croix ) { - donpcevent "#bat_a02_timer::OnStop"; - end; - } - else if( .@Guillaume < 1 || .@Croix < 1 ) - end; - $@BGMaster1 = 1; - donpcevent "Lt. Randy::OnEnterBG"; - donpcevent "Lt. Gerry::OnEnterBG"; - donpcevent "Cassia::OnDoEvent"; - bg_warp $@FK_Team1,"001-2",126,38; - bg_warp $@FK_Team2,"001-2",125,213; - //initnpctimer; - end; -} - |