Random Party vs Party

[realRO]

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;
        }
}

 

Edited November 26, 2016 by realRO

[Bringer]

lol same my request i'm just missing how to run my script

Spoiler

 

 

[realRO]

@Bringer yo dude, let's beep each other if you have the script. I'll beep you too. Thanks in advance.