I'm new to rathena and scripting. I'm trying to create a party vs party script then warp the party to a random map. Havn't checked my script if its going to work since I'm not at home. Can you please check and test my script. Feedback is very much encourage.
//CUSTOM PARTY VS PARTY SCRIPT
//RANDOM Guild_vs1-5 MAP
//SCRIPT BY JOSAP
prontera,147,175,6 script GVGNPC 90,{
mes "Hi! I'm the GVG dude. Please choose a team";
next;
menu "Team 1",L_Team1,"Team 2",L_Team2;
L_Team1:
if getpartyleader == strcharinfo(0){
//if strcharinfo(1) != 0 { //check if Player is the party leader
if strcharinfo(1) != partyN2{
set partyN1,strcharinfo(1);
mes "Your party is now registered for Team 1";
set PL1,strcharinfo(0);
announce "Team " +partyN1+ " has registered. Teamleader: " +PL1;
goto L_checkTeams;
else
mes "Your team is already registered under Team 2";
end;
}
else
mes "Only party leaders can register";
close;
end;
}
L_Team2:
if getpartyleader == strcharinfo(0){
//if strcharinfo(1) !=0 {
if strcharinfo(1) != partyN1{
set partyN2,strcharinfo(1);
mes "Your party is now registered for Team 2";
set PL2,strcharinfo(0);
announce "Team " +partyN2+ " has registered. Teamleader: " +PL2;
goto L_checkTeams;
else
mes "Your team is already registered under Team 1";
end;
}
else
mes "You need a party to register";
close;
end;
}
L_checkTeams:
if partyN1 != 0 && partyN2 != 0 {
set $@ran, rand(1,5);
announce "Teams have now registered.";
sleep2 2000;
announce "Team " +partyN1+ " vs Team " +partyN2+ "at MAP " +$@ran+ "Will now begin shortly";
sleep2 5000;
announce "Warping both teams now."
switch($@ran){
case 1:
warpparty "guild_vs1",50,50,partyN1;
warpparty "guild_vs1",50,50,partyN2;
break;
case 2:
warpparty "guild_vs2",50,50,partyN1;
warpparty "guild_vs2",50,50,partyN2;
break;
case 3:
warpparty "guild_vs3",50,50,partyN1;
warpparty "guild_vs3",50,50,partyN2;
break;
case 4:
warpparty "guild_vs4",50,50,partyN1;
warpparty "guild_vs4",50,50,partyN2;
break;
case 5:
warpparty "guild_vs5",50,50,partyN1;
warpparty "guild_vs5",50,50,partyN2;
break;
}
sleep2 5000;
announce "BUFFS READY!!!"
sleep2 5000;
announce "Battle will commence in: 3";
sleep2 1500;
announce "Battle will commence in: 2";
sleep2 1500;
announce "Battle will commence in: 1";
sleep2 1500;
announce "GO!!!";
else
mes "We are still waiting for your opponent"
close;
end;
}
close;
}
party vs party script @ random map Feedback
in Scripting Support
Posted
Hi -
I'm new to rathena and scripting. I'm trying to create a party vs party script then warp the party to a random map. Havn't checked my script if its going to work since I'm not at home. Can you please check and test my script. Feedback is very much encourage.
Thanks in advance