Mechanics:
Has GM controller (GM can trigger on/off debugging purposes)
NPC Automated (can be changed)
Announces that "PVP vs PVP will happen"
NPC will announce that you have XXmins to register
Click the NPC to register/leave (2 choices)
After registering, players will warp to a certain map and will randomize them to join 50% chance on Team A(Can be changed; ex cloth color blue) & TeamB(cloth Color Red)
Warps to the room, change cloth color of player when he's in Red Team or Green Team
Inside the Room area:
Players can't move until the event time starts.
Two NPCs where Team A and Team B are separated. (own room for TEAM A and TEAM B )
NPCs has this option: Can quit and warp back to savepoint.
NPCs can shower what's the current status of the game:
Their Kills , Deaths , and scores of Red and Green Team
Event starts:
NPC will chose a KING(Cloth Color can be changed) from both TEAMS [will be announced on the map]
If the king is killed, killer will receive xx item (can be changed or points) [announce if killed and the killer]
If the king is killed, NPC will choose a new King. [announce again the new king]
King cannot use skill. unless he's killed.
If the king will not die on the whole event, he will receive xxitem(can be changed or points)
If they die, they will instantly back to their "own" room, where they were separated at first.
If players kill their own Team 5x(can change or decrease points every teamkill), they will instantly warped to savepoint.
Event ends:
All players inside the map will be warped on a certain location with the NPC to click and get them out of the room.
Winning team gets (xxx item / points) and Losing team gets (xxx item / points.)
This is the sample script. So i posted in the script request section. thanks
//Registration NPC
jupe_ele,46,57,4 script LMS Trigger 106,{
if (getgmlevel() >= 30) goto wor_Admin;
mes "[Minion]";
mes "Hello " + strcharinfo(0) + ", my master is busy.";
mes "*sigh*";
close;
wor_Admin:
mes "[WoR Trigger]";
mes "Hello " + strcharinfo(0) + ", would you like me to call my Boss?";
mes "He is the only one who can start it!";
menu "Start Event",startlmsevent2,"No Thanks",leave;
startlmsevent2:
next;
mes "[WoR Trigger]";
mes "Ok, I'll call him this instant.";
close2;
goto startworevent;
leave:
next;
mes "[WoR Trigger]";
mes "Ok " + strcharinfo(0) +", nice seeing you.";
close;
OnClock0000:
OnClock0300:
OnClock0600:
OnClock0900:
goto startworevent;
startworevent:
announce "War over Rune: War Of Rune Registration will start at 5 minutes",0;
sleep2 10000;
announce "War over Rune: War Of Rune Registration will start at 4 minutes",0;
sleep2 10000;
announce "War over Rune: War Of Rune Registration will start at 3 minutes",0;
sleep2 10000;
announce "War over Rune: War Of Rune Registration will start at 2 minutes",0;
sleep2 10000;
announce "War over Rune: War Of Rune Registration will start at 1 minutes",0;
sleep2 10000;
announce "War over Rune: War Of Rune registration has been started you may now register! in 5 minutes.",0;
sleep2 10000;
announce "War over Rune: After 3 Minute the Registration will close.",0;
sleep2 10000;
announce "War over Rune: Please go to Prontera and Register now if you want to join.",0;
initnpctimer;
end;
OnTimer30000:
announce "War over Rune: Last 30 seconds.",0;
sleep2 5000;
announce "War over Rune: If you want to join please Register in Prontera.",0;
end;
OnTimer50000:
announce "War over Rune: Last 10 seconds.",0;
end;
OnTimer55000:
announce "War over Rune: 5.",0;
end;
OnTimer56000:
announce "War over Rune: 4.",0;
end;
OnTimer57000:
announce "War over Rune: 3.",0;
end;
OnTimer58000:
announce "War over Rune: 2.",0;
end;
OnTimer59000:
announce "War over Rune: 1.",0;
end;
OnTimer60000:
announce "War over Rune: Time's up.",0;
end;
OnTimer61000:
donpcevent "weRO NPC::OnEnable";
stopnpctimer;
end;
}
//Registration NPC
prontera,142,178,5 script WoR Manager 734,{
set look,rand(1,2);
set .@name$,"[WoR Manager]";
mes .@name$;
mes "Greetings, how can be any help for you today?";
menu "Register",register,"What is WoR?",what_is_wor,"WoR Schedules",wor_schedules,"I'm just passing by",im_just_passing_by;
register:
if ( look == 1 ) {
mes .@name$;
mes "You will be participating in the '^0000FFBlue Team^000000'.";
close2;
setlook 7,374;
warp "prt_are01",47,149;
set woralready,1;
end;
mes .@name$;
mes "You will be participating in the '^FF0000Red Team^000000'.";
close2;
setlook 7,407;
warp "prt_are01",251,149;
set woralready,1;
end;
}
if ( woralready == 1 ) {
mes .@name$;
mes "I'm sorry adventurer, but leaving the arena means quitting the entire event. Please try again next time.";
close;
}
wor_schedules:
next;
mes .@name$;
mes "The current WoR Schedules are:";
mes "^0000FF12:00^000000";
mes "^0000FF21:00^000000";
mes "^0000FF03:00^000000";
close;
what_is_wor:
next;
mes .@name$;
mes "WoR is the short term for 'War over Rune'.";
next;
mes .@name$;
mes "WoR is a PvP-Based Event where in you have 20 minutes to kill anyone in the opposing team.";
next;
mes .@name$;
mes "There are two teams in the event: The ^0000FFBlue Team^000000 and The ^FF0000Red Team^000000";
next;
mes .@name$;
mes "The Goal of the event is to gain points by killing other team's members.";
next;
mes .@name$;
mes "After 20 minutes, an NPC will appear in the middle of the map to give rewards to players.";
next;
mes .@name$;
mes "The reward for the winning team is 100 PvP Points and 20 PvP Points for the losing team.";
close;
im_just_passing_by:
next;
mes .@name$;
mes "Okay, see yah later.";
close;
}
//Team NPC (Red Team)
prt_are01,75,228,5 script Red Team Manager 733,{
mes "[Team Manager]";
mes "What do you want to know?";
menu "Standings",standings_red;
standings_red:
next;
mes "[ WoR Score ]";
mes "Red Team: "+red_score+"";
mes "Blue Team: "+blue_score+"";
mes "Death(s): "+deaths_player_red+"";
close;
}
//Team NPC (Blue Team)
prt_are01,223,80,5 script Blue Team Manager 733,{
mes "[Team Manager]";
mes "What do you want to know?";
menu "Standings",standings_blue;
standings_blue:
next;
mes "[ WoR Score ]";
mes "Red Team: "+red_score+"";
mes "Blue Team: "+blue_score+"";
mes "Death(s): "+deaths_player_red+"";
close;
}
//Player Dies in the event
- script wordie -1,{
set red_score,0;
set blue_score,0;
set deaths_player_red,0;
OnPCDieEvent:
if( strcharinfo(3) == "prt_are01" && getlook(7) == 374 ) {
set red_score,red_score+1;
set deaths_player_red,deaths_player_red+1;
warp "prt_are01",76,223;
sleep2 1000;
repair(1);
repair(2);
repair(3);
repair(4);
repair(5);
repair(6);
repair(7);
repair(8);
repair(9);
repair(10);
sleep2 10000;
warp "prt_are01",90,149;
end;
}
if( strcharinfo(3) == "prt_are01" && getlook(7) == 407 ) {
set blue_score,blue_score+1;
set deaths_player_blue,deaths_player_blue+1;
warp "prt_are01",223,75;
sleep2 1000;
repair(1);
repair(2);
repair(3);
repair(4);
repair(5);
repair(6);
repair(7);
repair(8);
repair(9);
repair(10);
sleep2 10000;
warp "prt_are01",208,149;
end;
}
}
