-
Posts
8 -
Joined
-
Last visited
Profile Information
-
Gender
Male
-
Location
Philippines
Chopper xD's Achievements
Poring (1/15)
0
Reputation
-
How to fix this? It stops when the map server compile
-
error @ rathena r17341 trunk
-
//Eathena // icabit69 , MrVandalBus //RahulDev Emistry //===set look idea by Goddameit //re-modified by Khayam (Xilence01) //Script starts here: prontera,155,166,4 script Team Wars::teamwar 899,{ if (getgmlevel() >= 99){ menu "standard menu",standard,"reset",lend; } standard: set [email protected],1; // number of party members change this to your party size you want set [email protected],0; getpartymember(getcharid(1)); set @partymembercount,[email protected]; if ( [email protected]==1) { mes "The Sign Ups are currently unavailable because a match is in progress. Don't hesitate to try again in a few minutes!"; close; } if ( @[email protected]) { if ([email protected]==getcharid(1)) { mes "Do you wish to sign out your team?"; next; if (select("I Give up ~.","Never Say Quit !!")==2) close; announce "Team 1 : [ " + getpartyname([email protected]) + " ] has sign out. We need another Party to sign up now!",bc_yellow|bc_map; set [email protected], 0; close; } if ([email protected]==getcharid(1)) { mes "Do you wish to sign out your team?"; next; if (select("I Give up ~.","Never Say Quit !!")==2) close; announce "Team 2 : [ " + getpartyname([email protected]) + " ] has sign out. We need another Party to sign up now!",bc_yellow|bc_map; set [email protected], 0; close; } mes "Hello "+strcharinfo(0)+" what do you want?"; if (([email protected]!=0) && ([email protected]!=0)) { mes "The Sign Ups are currently unavailable because a match is in progress. Don't hesitate to try again in a few minutes!"; close; } if ( getpartyleader(getcharid(1),2) != getcharid(0) ) { mes "Only party leader have the right to sign up / out from the game with me.."; close; } mes "Choose your team to register."; switch(select("White Team - [" + GetPartyName([email protected]) + "] :Black Team - [" + GetPartyName([email protected]) + "]")) { case 1: mes "[ Team War ]"; if ([email protected]==0 || getpartyname([email protected])=="null") { getpartymember(getcharid(1)),1; getpartymember(getcharid(1)),2; copyarray [email protected][0],[email protected][0],[email protected]; copyarray [email protected][0],[email protected][0],[email protected]; for (set [email protected],0; [email protected]<[email protected]; set [email protected],[email protected]+1) { if(isloggedin([email protected][[email protected]],[email protected][[email protected]])) set [email protected],[email protected]+1; } if([email protected] < [email protected]) { mes "You need all your party members to be online to Register"; close; } set [email protected], getcharid(1); initnpctimer; mes "Your Party is now subscribed, good luck!"; announce "White Team : [ " +getpartyname([email protected])+ " ] has sign up For the Team War!",bc_blue|bc_map; doevent "teamwar::OnSubscriptionTeam"; close; } else { mes "I'm sorry! Another Team has sign up before you..."; close; } case 2: mes "[ Team War ]"; if ([email protected]==0 || getpartyname([email protected])=="null") { getpartymember(getcharid(1)),1; getpartymember(getcharid(1)),2; copyarray [email protected][0],[email protected][0],[email protected]; copyarray [email protected][0],[email protected][0],[email protected]; for (set [email protected],0; [email protected]<[email protected]; set [email protected],[email protected]+1) { if(isloggedin([email protected][[email protected]],[email protected][[email protected]])) set [email protected],[email protected]+1; } if([email protected] < [email protected]) { mes "You need all your party members to be online to Register"; close; } set [email protected], getcharid(1); initnpctimer; mes "Your Party is now subscribed, good luck!"; announce "Black Team : [ " +getpartyname([email protected])+ " ] has sign up For the Team War!",bc_blue|bc_map; doevent "teamwar::OnSubscriptionTeam"; close; } else { mes "I'm sorry! Another Team has sign up before you..."; close; } } } else { mes "[Event Handler]"; mes "Please contact your party leader."; mes "Your team must have a party consisting of "[email protected]+" members."; close; } OnSubscriptionTeam: getpartymember([email protected]),1; getpartymember([email protected]),2; copyarray [email protected][0],[email protected][0],[email protected]; copyarray [email protected][0],[email protected][0],[email protected]; for (set [email protected],0; [email protected]<[email protected]; set [email protected],[email protected]+1) { if(isloggedin([email protected][[email protected]],[email protected][[email protected]])) set [email protected],[email protected]+1; attachrid [email protected][[email protected]]; setlook 7,26; } if([email protected] < [email protected]) { announce "Team War : "+getpartyname([email protected])+"are not all online the match has been canceled",0; announce "Team War : registration for 2 new teams are now available",0; goto lend; close; } getpartymember([email protected]),1; getpartymember([email protected]),2; copyarray [email protected][0],[email protected][0],[email protected]; copyarray [email protected][0],[email protected][0],[email protected]; for (set [email protected],0; [email protected]<[email protected]; set [email protected],[email protected]+1) { if(isloggedin([email protected][[email protected]],[email protected][[email protected]])) set [email protected],[email protected]+1; attachrid [email protected][[email protected]]; setlook 7,81; } if([email protected] < [email protected]) { announce "Team War : "+getpartyname([email protected])+"are not all online the match has been canceled",0; announce "Team War : registration for 2 new teams are now available",0; goto lend; close; } if([email protected]!=0 && [email protected]!=0){ announce "Team War : We have 2 Teams signed up now : "+getpartyname([email protected])+" and "+getpartyname([email protected])+".",bc_blue|bc_map; set @win1, 0; set @win2, 0; goto Onstart; } end; OnTimer50000: if (([email protected]!=0) && ([email protected]!=0)) { stopnpctimer; end; } stopnpctimer; set [email protected], 0; set [email protected], 0; announce "Team War : we lack teams to start registration for two teams are now available",0; end; OnStart: warpparty "guild_vs2",89,49,[email protected]; warpparty "guild_vs2",11,49,[email protected]; set [email protected],1; end; lend: stopnpctimer; set [email protected],0; set [email protected],0; set [email protected],0; set @win1,0; set @win2,0; set @partymembercount,[email protected]; announce "Thanks for playing",0; end; OnTimer250000: Announce "Team War : No Party won due to time limit!",0; mapwarp "guild_vs2","prontera",156,191; goto lend; end; OnPCKillEvent: /* Its party Vs party kind of script, then y checking for guilds on the map?? getmapxy([email protected]$,[email protected],[email protected],0); if([email protected]$=="guild_vs2") { set [email protected], getmapguildusers("guild_vs2",getcharid(1)); if ( getcharid(1) == [email protected] ) { if ([email protected]) end; // Checks if 0 guild member of teamid2 left warpparty "bat_b01",390,9,[email protected]; Announce "Team War :"+GetPartyName([email protected])+" won",0; goto lend; } if ( getcharid(1) == [email protected] ) { if ([email protected]) end; // Checks if 0 guild member of teamid1 left warpparty "bat_b01",390,9,[email protected]; Announce "Team War :"+GetPartyName([email protected])+" won",0; goto lend; } } */ end; OnPCDieEvent: OnPCLogoutEvent: if(strcharinfo(3) != "guild_vs2") end; warp "prontera",156,191; for(set [email protected], 0; [email protected] < [email protected]; set [email protected], [email protected] + 1) { if ( [email protected][[email protected]] == getcharid(0)) { deletearray [email protected][[email protected]], 1; if( getarraysize([email protected]) == 0 ) { set @win2,[email protected]; goto onwin; } } if ( [email protected][[email protected]] == getcharid(0) ) { deletearray [email protected][[email protected]], 1; if( getarraysize([email protected]) == 0 ) { set @win1,[email protected]; goto onwin; } } } end; onwin: if (@win1==0) { warpparty "bat_b01",390,9,[email protected]; warpparty "prontera",156,191,[email protected]; Announce "Team War :"+GetPartyName([email protected])+" won",0; goto lend; end; } if (@win2==0) { warpparty "bat_b01",390,9,[email protected]; warpparty "prontera",156,191,[email protected]; Announce "Team War :"+GetPartyName([email protected])+" won",0; goto lend; end; } end; } guild_vs2 mapflag nosave guild_vs2 mapflag nomemo guild_vs2 mapflag nobranch guild_vs2 mapflag pvp_noguild guild_vs2 mapflag nocommand 60 guild_vs2 mapflag noicewall guild_vs2 mapflag pvp bat_b01 mapflag nosave bat_b01 mapflag nomemo bat_b01 mapflag nobranch bat_b01 mapflag pvp_noparty bat_b01 mapflag nocommand bat_b01,390,9,0 script #prizegiver 111,5,5,{ //OnTouch2: OnTouch: getitem 20078,25; // set prize here warp "prontera",156,196; close; } Request to fix the cloths color of white team to white Because when I Choose White team it change to black cloth color, which is the color of 2nd team Black Team
-
Request to be a multiple shop with option
Chopper xD replied to Chopper xD's question in Script Requests
thanks. -
prontera,154,180,5 script Name1 911,{ set [email protected], 100; // Zeny (Default: 1b) setarray [email protected], 23023,23024; // <ItemID1>,<ItemID2>{...} set [email protected]$, "[Valkyrie Helm Changer]"; // NPC Name for ( set [email protected], 0; [email protected] < getarraysize([email protected]); set [email protected], [email protected] + 1 ) { set [email protected]$, [email protected]$ + getitemname([email protected][[email protected]]) + ":"; if ( countitem([email protected][[email protected]]) > 0 ) setarray [email protected][getarraysize([email protected])], [email protected][[email protected]]; } mes [email protected]$; mes "Which Valkyrie Helm would you like to have?"; set [email protected], select ( [email protected]$ ) - 1; set [email protected], 0; if ( getarraysize([email protected]) > 1 ) { set [email protected]$, ""; for ( set [email protected], 0; [email protected] < getarraysize([email protected]); set [email protected], [email protected] + 1 ) set [email protected]$, [email protected]$ + getitemname([email protected][[email protected]]) + ":"; mes [email protected]$; mes "There are more than one Valkyrie Helm in your inventory."; mes "Please select one to be exchanged."; set [email protected], select ( [email protected]$ ) - 1; } next; mes [email protected]$; if ( [email protected] ) { mes "You need a Valkyrie Helm to use my services."; close; } if ( Zeny < [email protected] ) { mes "You need " + [email protected] + "z to use my services."; close; } mes "Thank you!"; close2; delitem [email protected][[email protected]], 1; getitem [email protected][[email protected]], 1; set Zeny, Zeny - [email protected]; end; }
-
TCG Drainer - Very useful to most of the servers (just like Lotti Girl in pRO)
Chopper xD replied to Dvrstle's question in Script Requests
thx.. Euphy this script is great -
TCG Drainer - Very useful to most of the servers (just like Lotti Girl in pRO)
Chopper xD replied to Dvrstle's question in Script Requests
how to change the announcement, that announce only when you get the rare one?