Leaderboard

*getareausers("<map name>",<x1>,<y1>,<x2>,<y2>) This function will return the count of connected characters which are located within the specified area - an x1/y1-x2/y2 square on the specified map. This is useful for maps that are split into many buildings, such as all the "*_in" maps, due to all the shops and houses.

yes

- script FloatingRates -1,{ OnInit: OnClock0001: if(gettime(4)==6 || gettime(4)==0 ) { set .br,getbattleflag("base_exp_rate")*2; set .jr,getbattleflag("job_exp_rate")*2; setbattleflag("base_exp_rate"), .br; setbattleflag("job_exp_rate"), .jr; atcommand "@reloadmobdb"; end; } if(gettime(4) == 1) { announce "Weekend Exp Event is finished",bc_all,0xFF6060; atcommand "@reloadbattleconf"; atcommand "@reloadmobdb"; } end; OnMinute02: if(gettime(4)==6 || gettime(4)==0 ) { announce "Weekend Exp Event(Base:"+.br/100+"x, Job:"+.jr/100+"x) is active!!",bc_all,0xFF6060; } end; }

Replace sd = script_rid2sd(st); by sd = map_id2sd(st->rid);

Did you update your emulator?

Just change your System/ItemInfo.lua/lub. Download here: https://github.com/zackdreaver/ROenglishRE

- script DayNight -1,{ OnClock0600: announce "Disgusting morning!",bc_blue|bc_all; day; setbattleflag "base_exp_rate", .bexp_rate*100; end; OnClock2300: announce "Disgusting night!",bc_blue|bc_all; night; setbattleflag "base_exp_rate", .bexp_rate*100 * 2; end; OnInit: set .bexp_rate, 300; //Change that 300 to your server exp rate if(gettime(3)>=6 && gettime(3)<23) end; else night; end; } try that

Hello guy i know how to solve this problem . open your setup file and uncheck the hardware acceleration and change the direct to Direct Hal

prontera,134,169,6 script 7v7 Team Wars::teamwar 469,{ if (getgmlevel() >= 99){ menu "standard menu",standard,"reset",lend; } standard: if ( getcharid(1) == 0 ) { mes "your are not in a party"; close; } set $@members,2; // number of party members change this to your party size you want set $@start,0; getpartymember(getcharid(1)); set @partymembercount,$@partymembercount; if ( $@start == 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 ( @partymembercount == $@members ) { if ( $@TeamID1 == 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($@TeamID1) + " ] has sign out. We need another Party to sign up now!",bc_yellow|bc_map; set $@TeamID1, 0; close; } if ($@TeamID2==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($@TeamID2) + " ] has sign out. We need another Party to sign up now!",bc_yellow|bc_map; set $@TeamID2, 0; close; } mes "Hello "+strcharinfo(0)+" what do you want?"; if (($@TeamID1!=0) && ($@TeamID2!=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("Red Team - [" + GetPartyName($@TeamID1) + "] :Blue Team - [" + GetPartyName($@TeamID2) + "]")) { case 1: mes "[ Team War ]"; if ($@TeamID1==0 || getpartyname($@TeamID1)=="null") { getpartymember(getcharid(1)),0; getpartymember(getcharid(1)),1; getpartymember(getcharid(1)),2; copyarray $@partymembercidt1[0],$@partymembercid[0],$@members; copyarray $@partymemberaidt1[0],$@partymemberaid[0],$@members; for (set .@i,0; .@i<$@members; set .@i,.@i+1) { if(isloggedin($@partymemberaidt1[.@i],$@partymembercidt1[.@i])){ set .@count,.@count+1; .@class = readparam( 19,$@partymembername$[.@i] ); if ( getd( ".@checkclass3_"+ .@class ) == 1 ){ .@duplicate_job3$ = .@duplicate_job3$ + ( getstrlen( .@duplicate_job3$ ) ? "," : "" ) + jobname( .@class ) ); setd ".@checkclass3_"+ .@class, 999; } else if ( getd( ".@checkclass3_"+ .@class ) == 0 ) setd ".@checkclass3_"+ .@class, 1; } } if(.@count < $@members) { mes "You need all your party members to be online to Register"; close; } else if( getstrlen( .@duplicate_job3$ ) ){ mes "You can't have more than 1 class of "+ .@duplicate_job3$; close; } set $@TeamID1, getcharid(1); initnpctimer; mes "Your Party is now subscribed, good luck!"; announce "Team 1 : [ " +getpartyname($@TeamID1)+ " ] 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 ($@TeamID2==0 || getpartyname($@TeamID2)=="null") { getpartymember(getcharid(1)),1; getpartymember(getcharid(1)),2; copyarray $@partymembercidt2[0],$@partymembercid[0],$@members; copyarray $@partymemberaidt2[0],$@partymemberaid[0],$@members; for (set .@i,0; .@i<$@members; set .@i,.@i+1) { if(isloggedin($@partymemberaidt2[.@i],$@partymembercidt2[.@i])) set .@count,.@count+1; } if(.@count < $@members) { mes "You need all your party members to be online to Register"; close; } set $@TeamID2, getcharid(1); initnpctimer; mes "Your Party is now subscribed, good luck!"; announce "Team 2 : [ " +getpartyname($@TeamID2)+ " ] 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 "+$@members+" members."; close; } OnSubscriptionTeam: getpartymember($@TeamID2),1; getpartymember($@TeamID2),2; copyarray $@partymembercidtc2[0],$@partymembercid[0],$@members; copyarray $@partymemberaidc2[0],$@partymemberaid[0],$@members; for (set .@i,0; .@i<$@members; set .@i,.@i+1) { if(isloggedin($@partymemberaidc2[.@i],$@partymembercidtc2[.@i])) { set .@countx,.@countx+1; .@class = readparam( 19,$@partymembername$[.@i] ); if ( getd( ".@checkclass_"+ .@class ) == 1 ){ .@duplicate_job$ = .@duplicate_job$ + ( getstrlen( .@duplicate_job$ ) ? "," : "" ) + jobname( .@class ) ); setd ".@checkclass_"+ .@class, 999; } else if ( getd( ".@checkclass_"+ .@class ) == 0 ) setd ".@checkclass_"+ .@class, 1; } } if(.@countx < $@members) { announce "Team War : "+getpartyname($@TeamID2)+"are not all online the match has been canceled",0; announce "Team War : registration for 2 new teams are now available",0; goto lend; } if ( $@TeamID2 && $@partymembercount != $@members ) { announce getpartyname($@TeamID2) +" has extra party members !", 0; goto lend; } else if( getstrlen( .@duplicate_job$ ) ){ announce getpartyname($@TeamID2) +" more than 1 class of "+ .@duplicate_job$ +" !", 0; goto lend; } getpartymember($@TeamID1),1; getpartymember($@TeamID1),2; copyarray $@partymembercidtc1[0],$@partymembercid[0],$@members; copyarray $@partymemberaidc1[0],$@partymemberaid[0],$@members; for (set .@i,0; .@i<$@members; set .@i,.@i+1) { if(isloggedin($@partymemberaidc1[.@i],$@partymembercidtc1[.@i])) { set .@countz,.@countz+1; .@class = readparam( 19,$@partymembername$[.@i] ); if ( getd( ".@checkclass2_"+ .@class ) == 1 ){ .@duplicate_job2$ = .@duplicate_job2$ + ( getstrlen( .@duplicate_job2$ ) ? "," : "" ) + jobname( .@class ) ); setd ".@checkclass2_"+ .@class, 999; } else if ( getd( ".@checkclass2_"+ .@class ) == 0 ) setd ".@checkclass2_"+ .@class, 1; } } if(.@countz < $@members) { announce "Team War : "+getpartyname($@TeamID1)+"are not all online the match has been canceled",0; announce "Team War : registration for 2 new teams are now available",0; goto lend; } if ( $@TeamID1 && $@partymembercount != $@members ) { announce getpartyname($@TeamID1) +" has extra party members !", 0; goto lend; } else if( getstrlen( .@duplicate_job2$ ) ){ announce getpartyname($@TeamID1) +" more than 1 class of "+ .@duplicate_job2$ +" !", 0; goto lend; } if($@TeamID1!=0 && $@TeamID2!=0){ announce "Team War : We have 2 Teams signed up now : "+getpartyname($@TeamID1)+" and "+getpartyname($@TeamID2)+".",bc_blue|bc_map; set @win1, 0; set @win2, 0; goto Onstart; } end; OnTimer50000: if (($@TeamID1!=0) && ($@TeamID2!=0)) { stopnpctimer; end; } stopnpctimer; set $@TeamID1, 0; set $@TeamID1, 0; announce "Team War : we lack teams to start registration for two teams are now available",0; end; OnStart: warpparty "guild_vs2",89,49,$@TeamID1; warpparty "guild_vs2",11,49,$@TeamID2; set $@start,1; end; lend: stopnpctimer; set $@TeamID1,0; set $@TeamID2,0; set $@start,0; set @win1,0; set @win2,0; set @partymembercount,$@members; announce "Thanks for joining!",0; end; OnTimer250000: Announce "Team War : No Party won due to time limit!",0; mapwarp "guild_vs2","prontera",156,191; goto lend; end; OnPCDieEvent: OnPCLogoutEvent: if(strcharinfo(3) != "guild_vs2") end; warp "prontera",156,191; for(set .@i, 0; .@i < $@members; set .@i, .@i + 1) { if ( $@partymembercidt1[.@i] == getcharid(0)) { deletearray $@partymembercidt1[.@i], 1; deletearray $@partymemberaidt1[.@i], 1; if( getarraysize($@partymembercidt1) == 0 ) { set @win2,getarraysize($@partymembercidt2); goto onwin; } } if ( $@partymembercidt2[.@i] == getcharid(0) ) { deletearray $@partymembercidt2[.@i], 1; deletearray $@partymemberaidt2[.@i], 1; if( getarraysize($@partymembercidt2) == 0 ) { set @win1,getarraysize($@partymembercidt1); goto onwin; } } } end; onwin: if (@win1==0) { warpparty "prontera",156,191,$@TeamID1; warpparty "prontera",156,191,$@TeamID2; Announce "Team War :"+GetPartyName($@TeamID2)+" won and got 3 RoK Star Badges!",0; for ( .@i = 0; .@i < @win2; .@i++ ) getitem 7905, rand(3,3), $@partymemberaidt2[.@i]; goto lend; } if (@win2==0) { warpparty "prontera",156,191,$@TeamID1; warpparty "prontera",156,191,$@TeamID2; Announce "Team War :"+GetPartyName($@TeamID1)+" won and got 3 RoK Star Badges!",0; for ( .@i = 0; .@i < @win1; .@i++ ) getitem 7905, rand(3,3), $@partymemberaidt1[.@i]; goto lend; } end; } guild_vs2 mapflag nosave SavePoint 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 guild_vs2 mapflag partylock I did't test it... give feedback