realRO

March 20, 2014

Good day. I'm following this guide(http://rathena.org/board/topic/87120-transitioning-from-svn-to-git/) Windows I'm now at #9 but I ended up like this:

Kindly help me to fix this. Thanks

February 9, 2014

Help me fix this. Please. Thanks.

//===== eAthena Script =======================================================
//= PVP ladder script with dota announcement ( SQL only )
//===== By: ==================================================================
//= ~AnnieRuru~
//===== Current Version: =====================================================
//= 2.9
//===== Compatible With: =====================================================
//= eAthena SQL 14279, with MySQL 5.1
//===== Description: =========================================================
//= PVP ladder store in SQL table
//= plus anti-sit-killer feature
//===== Topic ================================================================
//= http://www.eathena.ws/board/index.php?showtopic=177918
//===== Additional Comments: =================================================
//= still don't have modify value option, will be done ... in next year ...
//============================================================================

//	add all the maps that you want this script to trigger ... all pvp and event maps perhaps ?
//	but if you already enable "all" maps, then can comment all these
cell_game	mapflag	loadevent


-	script	DOTAPVP	-1,{
OnInit:
// Config
	set .sound, 1; // soundeffect : 0 - disable, 1 - play soundeffect to all players on map, 2 - play soundeffect to an area around the killer, 3 - play soundeffect to killer only
	set .announce, 0; // announce to : 0 - global, 1 - map
	set .announcemap, 1; // announce the map name in the announcement ? : 0 - off, 1 - on

	set .announcekill, 1; // announce who pawn who's head : 0 - off, 1 - on
	set .msg_die, 1; // show message who kill you when die : 0 - off, 1 - on
	set .msg_kill, 0; // show message you kill who when killed someone : 0 - off, 1 - on

	set .gmnokill, 0; // GMs are not suppose to kill players. A GM with <this number> level or higher will do nothing. IF set to 60, GM60 and above kill any player will not get anything : 0 - off

	set .killingspree, 3;
	set .dominating, 4;
	set .megakill, 5;
	set .unstoppable, 6;
	set .wickedsick, 7;
	set .monsterkill, 8;
	set .godlike, 9;
	set .holyshit, 10;
	set .continue, 1; // after beyond-godlike, every <this number> kills will make announcement again

	set .owned, 5; // how many times the party/guild has to kill to announce ownage
	set .owncontinue, 1; // after ownage, every <this number> party/guild cumulative kills will make ownage announce again

	set .min_gm_menu, 99; // minimum level of GM can use the GM menu on ladder npc

	set .showtotal, 20; // show the length of ladder. Note : Maximum value = 128
	set .showpage, 10;	// set the views per page. Note : Maximum value = 128
	set .loweststreak, 3; // mininum streak count allow to show in highest streak ladder. Default 3 means must at least have killing spree streak to display in ladder
	set .lowestownage, 5; // mininum ownage count allow to show in longest ownage ladder. Default 5 means must at least have 5 ownage counts to display in ladder

	setarray .maptrigger$, // only these maps will trigger this script
	//	"all", // uncomment this to allow load all maps
		"prtg_cas01",
		"payg_cas04",
		"gefg_cas02",
		"prtg_cas02",
		"aldeg_cas02",
		"guild_vs1",
		"cell_game";
        
//	anti-sit-killer system
	// a player must kill another player with this minimum <this number> base level to get the announcement and in the ladder.
	// Otherwise only have streak ended announcement and killed player's streak reset.
	// Its possible for a level 1 novice to kill a level 99 player and he/she will still get in the ladder
	// but a level 99 kill a level 1 player will get nothing
	// 0 - off this system ( default is 55, pk setting )
	set .lvltokill, 0;

	// when a player kill another same player <this number> times in a row, the player is warp back to save point.
	// and the player's streak, kills, and ownage count will deduct accordingly
	// 0 - off this system
	set .counttopunish, 6;

	// minimum level range to kill another player
	// eg. when set to 20, player level 99 needs to kill another player with minimum level of 79 to get announcement and increase the kill rank.
	// but a player with base level 50 kills a level 99 will also get the announcement
	// higher base level cannot kill lower level, but lower level can kill higher level
	// 0 - off this system
	set .minlvlrange, 0;


// Config ends ------------------------------------------------------------------------------------------

//	to prevent bug happen
	if ( .announce < 0 || .announce > 1 ) set .announce, 0;
	if ( .continue < 1 ) set .continue, 1;
	if ( .owncontinue < 1 ) set .owncontinue, 1;
	if ( .gmnokill <= 0 ) set .gmnokill, 100;
	if ( .lvltokill <= 1 ) set .lvltokill, 0;
	if ( .counttopunish <= 1 ) set .counttopunish, 0;
	set .maptriggersize, getarraysize(.maptrigger$);
	end;

//	script start.
OnPCKillEvent:
	if ( getgmlevel() >= .gmnokill ) end;
	getmapxy .@map$, .@x, .@y, 0;
	if ( .maptrigger$ != "all" ) {
		for ( set .@i, 0; .@i < .maptriggersize; set .@i, .@i +1 ) {
			if ( .@map$ == .maptrigger$[.@i] ) break;
		}
		if ( .@i == .maptriggersize ) end;
	}
	attachrid killedrid;
	if ( killerrid != getcharid(3) && ( .msg_die || .msg_kill ) ) {
		if ( .msg_die ) message strcharinfo(0),"You have been killed by "+ rid2name(killerrid);
		if ( .msg_kill ) message rid2name(killerrid),"You just killed "+ strcharinfo(0);
	}
	if ( @PlayersKilledStreak >= .holyshit )
		set .@streakname$,"Beyond Godlike";
	else if ( @PlayersKilledStreak >= .godlike )
		set .@streakname$,"Godlike";
	else if ( @PlayersKilledStreak >= .monsterkill )
		set .@streakname$,"Monster Kill";
	else if ( @PlayersKilledStreak >= .wickedsick )
		set .@streakname$,"Wicked Sick";
	else if ( @PlayersKilledStreak >= .unstoppable )
		set .@streakname$,"Unstoppable";
	else if ( @PlayersKilledStreak >= .megakill )
		set .@streakname$,"Mega-kill";
	else if ( @PlayersKilledStreak >= .dominating )
		set .@streakname$,"Dominating";
	else if ( @PlayersKilledStreak >= .killingspree )
		set .@streakname$,"Killing Spree";
	if ( @PlayersKilledStreak >= .killingspree && killerrid == getcharid(3) )
		announce strcharinfo(0) +" has ended "+( (sex)?"him":"her" )+" own "+ .@streakname$ +"["+ @PlayersKilledStreak +"] streak "+( (.announcemap)?("at "+ .@map$):""),16|.announce;
	else if ( @PlayersKilledStreak >= .killingspree )
		announce rid2name(killerrid) +" has ended "+ strcharinfo(0) +"'s "+ .@streakname$ +"["+ @PlayersKilledStreak +"] streak "+( (.announcemap)?("at "+ .@map$):""),16|.announce;
	else if ( .announcekill && killerrid != getcharid(3) )
		announce rid2name(killerrid) +" has pawned "+ strcharinfo(0) +"'s head "+( (.announcemap)?("at "+ .@map$):""),16|.announce;
	set @PlayersKilledStreak,0;
	set @dota_sql_deaths, @dota_sql_deaths +1;
	set @dota_multikills,0;
	query_sql "replace into pvpladder values ( "+ getcharid(0) +", '"+ escape_sql(strcharinfo(0)) +"', "+ @dota_sql_streaks +", "+ @dota_sql_kills +", "+ @dota_sql_deaths +", from_unixtime("+ @dota_sql_streaktime +") )";
	set .@killed_gid, getcharid(2);
	if ( .@killed_gid ) {
		setd ".dota_sql_"+ .@killed_gid +"_c", 0;
		if ( getd(".dota_sql_"+ .@killed_gid +"_h") )
			query_sql "replace into ownladder values ( "+ .@killed_gid +", '"+ escape_sql(getguildname(.@killed_gid)) +"', "+ getd(".dota_sql_"+ .@killed_gid +"_c") +", "+ getd(".dota_sql_"+ .@killed_gid +"_h") +", from_unixtime("+ getd(".dota_sql_"+ .@killed_gid +"_t") +") )";
	}
	if ( killerrid == getcharid(3) || baselevel < .lvltokill ) end;
	if ( .minlvlrange ) set .@killedlvl, baselevel;
	attachrid killerrid;
	if ( .minlvlrange && .@killedlvl + .minlvlrange < baselevel ) end;
	if ( .counttopunish ) {
		if ( @sitkillminute != gettime(2) ) {
			deletearray @sitkillid, 128;
			deletearray @sitkilltimes, 128;
			set @sitkillminute, gettime(2);
		}
		set .@sitkillsize, getarraysize(@sitkillid);
		for ( set .@i,0; .@i < .@sitkillsize; set .@i, .@i +1 ) {
			if ( @sitkillid[.@i] != killedrid ) continue;
			else {
				set @sitkilltimes[.@i], @sitkilltimes[.@i] +1 ;
				if ( @sitkilltimes[.@i] >= .counttopunish ) {
					warp "SavePoint",0,0;
					announce strcharinfo(0) +" , Stop killing "+ rid2name(killedrid) + " !!!",0;
					debugmes strcharinfo(0) +" is sit-killing "+ rid2name(killedrid) +" for "+ @sitkilltimes[.@i] + " times";
					logmes "is sit-killing "+ rid2name(killedrid) +" for "+ @sitkilltimes[.@i] +" times";
					if ( @PlayersKilledStreak == @dota_sql_streaks ) {
						set @dota_sql_streaks, @dota_sql_streaks +1 - .counttopunish;
						set @dota_sql_streaktime, gettimetick(2);
					}
					set @PlayersKilledStreak, @PlayersKilledStreak +1 - .counttopunish;
					set @dota_sql_kills, @dota_sql_kills +1 - .counttopunish;
					query_sql "replace into pvpladder values ( "+ getcharid(0) +", '"+ escape_sql(strcharinfo(0)) +"', "+ @dota_sql_streaks +", "+ @dota_sql_kills +", "+ @dota_sql_deaths +", from_unixtime("+ @dota_sql_streaktime +") )";
					set .@killer_gid, getcharid(2);
					if ( .@killer_gid ) {
						if ( getd(".dota_sql_"+ .@killer_gid +"_c") == getd(".dota_sql_"+ .@killer_gid +"_h") ) {
							setd ".dota_sql_"+ .@killer_gid +"_h", getd(".dota_sql_"+ .@killer_gid +"_h") +1 - .counttopunish;
							setd ".dota_sql_"+ .@killer_gid +"_t", gettimetick(2);
						}
						setd (".dota_sql_"+ .@killer_gid +"_c"), getd(".dota_sql_"+ .@killer_gid +"_c") +1 - .counttopunish;
						query_sql "replace into ownladder values ( "+ .@killer_gid +", '"+ escape_sql(getguildname(.@killer_gid)) +"', "+ getd(".dota_sql_"+ .@killer_gid +"_c") +", "+ getd(".dota_sql_"+ .@killer_gid +"_h") +", from_unixtime("+ getd(".dota_sql_"+ .@killer_gid +"_t") +") )";
					}
					end;
				}
				break;
			}
		}
		if ( .@i == .@sitkillsize ) {
			set @sitkillid[.@i], killedrid;
			set @sitkilltimes[.@i], 1;
		}
	}
	set @PlayersKilledStreak, @PlayersKilledStreak +1 ;
	set @dota_sql_kills, @dota_sql_kills +1 ;
	if ( @PlayersKilledStreak > @dota_sql_streaks ) {
		set @dota_sql_streaks, @PlayersKilledStreak;
		set @dota_sql_streaktime, gettimetick(2);
	}
	query_sql "replace into pvpladder values ( "+ getcharid(0) +", '"+ escape_sql(strcharinfo(0)) +"', "+ @dota_sql_streaks +", "+ @dota_sql_kills +", "+ @dota_sql_deaths +", from_unixtime("+ @dota_sql_streaktime +") )";
	if ( @PlayersKilledStreak == .killingspree )
		setarray .@streakname$,"killingspree.wav","is on a KILLING SPREE","!";
	else if ( @PlayersKilledStreak == .dominating )
		setarray .@streakname$,"dominating.wav","is DOMINATING","!";
	else if ( @PlayersKilledStreak == .megakill )
		setarray .@streakname$,"megakill.wav","has a MEGA KILL","!";
	else if ( @PlayersKilledStreak == .unstoppable )
		setarray .@streakname$,"unstoppable.wav","is UNSTOPPABLE","!!";
	else if ( @PlayersKilledStreak == .wickedsick )
		setarray .@streakname$,"wickedsick.wav","is WICKED SICK","!!";
	else if ( @PlayersKilledStreak == .monsterkill )
		setarray .@streakname$,"monsterkill.wav","has a MONSTER KILL","!!";
	else if ( @PlayersKilledStreak == .godlike )
		setarray .@streakname$,"godlike.wav","is GODLIKE","!!!";
	else if ( @PlayersKilledStreak >= .holyshit && ( (@PlayersKilledStreak - .holyshit) % .continue == 0 ) )
		setarray .@streakname$,"holyshit.wav","is BEYOND GODLIKE",". Someone KILL "+( (sex)?"HIM":"HER" ) +"!!!!!!";
	if ( .@streakname$[1] != "" ) {
		announce strcharinfo(0) +" "+ .@streakname$[1] +"["+ @PlayersKilledStreak +"] "+( (.announcemap)?("at "+ .@map$):"") + .@streakname$[2],16|.announce;
		if ( .sound == 1 ) soundeffectall .@streakname$[0],0,.@map$;
		else if ( .sound == 2 ) soundeffectall .@streakname$[0],0;
		else if ( .sound == 3 ) soundeffect .@streakname$[0],0;
	}
	set @dota_multikills, @dota_multikills + 1;
	deltimer "DOTAPVP::OnStreakReset";
	addtimer 18000,"DOTAPVP::OnStreakReset";
	set .@killer_gid, getcharid(2);
	if ( .@killer_gid && .@killer_gid != .@killed_gid ) {
		setd ".dota_sql_"+ .@killer_gid +"_c", getd(".dota_sql_"+ .@killer_gid +"_c") +1 ;
		if ( getd(".dota_sql_"+ .@killer_gid +"_c") > getd(".dota_sql_"+ .@killer_gid +"_h") ) {
			setd ".dota_sql_"+ .@killer_gid +"_h", getd(".dota_sql_"+ .@killer_gid +"_c");
			setd ".dota_sql_"+ .@killer_gid +"_t", gettimetick(2);
		}
		query_sql "replace into ownladder values ( "+ .@killer_gid +", '"+ escape_sql(getguildname(.@killer_gid)) +"', "+ getd(".dota_sql_"+ .@killer_gid +"_c") +", "+ getd(".dota_sql_"+ .@killer_gid +"_h") +", from_unixtime("+ getd(".dota_sql_"+ .@killer_gid +"_t") +") )";
	}
	set .@dota_multikills, @dota_multikills;
	set .@origin, getcharid(3);
	sleep 1500;
	if ( .@killer_gid && .@killer_gid != .@killed_gid && getd(".dota_sql_"+ .@killer_gid +"_c") >= .owned && ( ( getd(".dota_sql_"+ .@killer_gid +"_c") - .owned ) % .owncontinue == 0 ) ) {
		if ( .announce ) mapannounce .@map$, "The guild ["+ getguildname(.@killer_gid) +"] is OWNING["+ getd(".dota_sql_"+ .@killer_gid +"_c") +"] !!!",16;
		else announce "The guild ["+ getguildname(.@killer_gid) +"] is OWNING["+ getd(".dota_sql_"+ .@killer_gid +"_c") +"] !!!",16;
		if ( .sound == 1 ) soundeffectall "ownage.wav",0,.@map$;
		else if ( .sound == 2 ) soundeffectall "ownage.wav",0;
		else if ( .sound == 3 && attachrid(.@origin) ) soundeffect "ownage.wav",0;
	}
	sleep 1250;
	if ( !attachrid(.@origin) ) end;
	if ( .@dota_multikills == 2 ) {
		if ( .announce ) mapannounce .@map$, strcharinfo(0) +" just got a Double Kill !",16;
		else announce strcharinfo(0) +" just got a Double Kill !",16;
		if ( .sound == 1 ) soundeffectall "doublekill.wav",0,.@map$;
		else if ( .sound == 2 ) soundeffectall "doublekill.wav",0;
		else if ( .sound == 3 ) soundeffect "doublekill.wav",0;
	}
	else if ( .@dota_multikills == 3 ) {
		if ( .announce ) mapannounce .@map$, strcharinfo(0) +" just got a Triple Kill !!!",16;
		else announce strcharinfo(0) +" just got a Triple Kill !!!",16;
		if ( .sound == 1 ) soundeffectall "triplekill.wav",0,.@map$;
		else if ( .sound == 2 ) soundeffectall "triplekill.wav",0;
		else if ( .sound == 3 ) soundeffect "triplekill.wav",0;
	}
	else if ( .@dota_multikills == 4 ) {
		if ( .announce ) mapannounce .@map$, strcharinfo(0) +" just got a Ultra Kill !!!",16;
		else announce strcharinfo(0) +" just got a Ultra Kill !!!",16;
		if ( .sound == 1 ) soundeffectall "ultrakill.wav",0,.@map$;
		else if ( .sound == 2 ) soundeffectall "ultrakill.wav",0;
		else if ( .sound == 3 ) soundeffect "ultrakill.wav",0;
	}
	else if ( .@dota_multikills >= 5 ) {
		if ( .announce ) mapannounce .@map$, strcharinfo(0) +" is on a Rampage !!!",16;
		else announce strcharinfo(0) +" is on a Rampage !!!",16;
		if ( .sound == 1 ) soundeffectall "rampage.wav",0,.@map$;
		else if ( .sound == 2 ) soundeffectall "rampage.wav",0;
		else if ( .sound == 3 ) soundeffect "rampage.wav",0;
	}
	end;
OnStreakReset:
	set @dota_multikills, 0;
	end;
OnWhisperGlobal:
	if ( @spam_dotapvp + 3 >= gettimetick(2) ) // 3 seconds interval so player don spam this command
		end;
	set @spam_dotapvp, gettimetick(2);
	if ( @dota_sql_kills == 0 && @dota_sql_deaths == 0 )
		query_sql "select kills, deaths, streaks, unix_timestamp(streaktime) from pvpladder where char_id = "+ getcharid(0), @dota_sql_kills, @dota_sql_deaths, @dota_sql_streaks, @dota_sql_streaktime;
	if ( @dota_sql_kills || @dota_sql_deaths ) {
		dispbottom "Your current Streak      : "+ @PlayersKilledStreak;
		dispbottom "Your total Kills               : "+ @dota_sql_kills;
		dispbottom "Your total Deaths          : "+ @dota_sql_deaths;
		dispbottom "Your highest Streak      : "+ @dota_sql_streaks;
		query_sql "select date_format( from_unixtime("+ @dota_sql_streaktime +"),'%a %e/%c/%y %r')", .@time1$;
		dispbottom "Your highest Streak on : "+ .@time1$;
	}
	else
		dispbottom "You are not in the pvp ladder yet.";
	if ( getcharid(2) ) {
		if ( getd(".dota_sql_"+ getcharid(2) +"_h") == 0 ) {
			query_sql "select currentown, highestown, unix_timestamp(owntime) from ownladder where guild_id = "+ getcharid(2), .@c, .@h, .@t;
			setd ".dota_sql_"+ getcharid(2) +"_c", .@c;
			setd ".dota_sql_"+ getcharid(2) +"_h", .@h;
			setd ".dota_sql_"+ getcharid(2) +"_t", .@t;
		}
		if ( getd(".dota_sql_"+ getcharid(2) +"_h") ) {
			dispbottom "Your guild current Own      : "+ getd(".dota_sql_"+ getcharid(2) +"_c");
			dispbottom "Your guild highest Own      : "+ getd(".dota_sql_"+ getcharid(2) +"_h");
			query_sql "select date_format( from_unixtime("+ getvariableofnpc( getd(".dota_sql_"+ getcharid(2) +"_t"), "DOTAPVP" ) +"),'%a %e/%c/%y %r')", .@time2$;
			dispbottom "Your guild highest Own on : "+ .@time2$;
		}
		else
			dispbottom "Your guild is not in the ladder yet.";
	}
	end;
OnPCLoginEvent:
	if ( .maptrigger$ != "all" ) end;
OnPCLoadMapEvent:
	if ( @dota_sql_kills == 0 && @dota_sql_deaths == 0 ) {
		if ( .maptrigger$ != "all" ) {
			getmapxy .@map$, .@x, .@y, 0;
			for ( set .@i, 0; .@i < .maptriggersize; set .@i, .@i +1 ) {
				if ( .@map$ == .maptrigger$[.@i] ) break;
			}
			if ( .@i == .maptriggersize ) end;
		}
		query_sql "select kills, deaths, streaks, unix_timestamp(streaktime) from pvpladder where char_id = "+ getcharid(0), @dota_sql_kills, @dota_sql_deaths, @dota_sql_streaks, @dota_sql_streaktime;
	}
	if ( getcharid(2) && getd(".dota_sql_"+ getcharid(2) +"_h") == 0 ) {
		query_sql "select currentown, highestown, unix_timestamp(owntime) from ownladder where guild_id = "+ getcharid(2), .@c, .@h, .@t;
		setd ".dota_sql_"+ getcharid(2) +"_c", .@c;
		setd ".dota_sql_"+ getcharid(2) +"_h", .@h;
		setd ".dota_sql_"+ getcharid(2) +"_t", .@t;
	}
	end;
}

izlude,133,155,3	script	PvP-StatsViewer	57,{
	set .@npcname$, strnpcinfo(0);
	while (1) {
		mes "["+ .@npcname$ +"]";
		mes "Hello "+ strcharinfo(0) +"...";
		mes "If you want to I can show you your PVP stats.";
		next;
		switch ( select ( "Most Kills","Highest Streak","Longest Ownage","Own Information","Explanation" ) ) {
			case 1:
				set .@nb, query_sql("select name, kills, deaths from pvpladder order by kills desc limit "+ getvariableofnpc(.showtotal,"DOTAPVP"), .@name$, .@kills, .@deaths);
				if ( .@nb == 0 ) {
					mes "["+ .@npcname$ +"]";
					mes "The ladder currently is empty.";
					next;
				}
				for ( set .@j,0; .@j < .@nb; set .@j, .@j + getvariableofnpc(.showpage,"DOTAPVP") ) {
					mes "["+ .@npcname$ +"]";
					for ( set .@i, .@j; .@i < (getvariableofnpc(.showpage,"DOTAPVP") + .@j) && .@i < .@nb; set .@i, .@i + 1 ) {
						mes "^996600"+ (.@i+1) +": ^006699"+ .@name$[.@i] +" ^00AA00["+ .@kills[.@i] +"] ^FF0000<"+ .@deaths[.@i] +">^000000";
					}
					next;
				}
				break;
			case 2:
				set .@nb, query_sql("select name, streaks, date_format(streaktime,'%a %e/%c/%y %r') from pvpladder where streaks >= "+ getvariableofnpc(.loweststreak,"DOTAPVP") +" order by streaks desc limit "+ getvariableofnpc(.showtotal,"DOTAPVP"), .@name$, .@streak, .@time$);
				if ( .@nb == 0 ) {
					mes "["+ .@npcname$ +"]";
					mes "The ladder currently is empty.";
					next;
				}
				for ( set .@j,0; .@j < .@nb; set .@j, .@j + getvariableofnpc(.showpage,"DOTAPVP") ) {
					mes "["+ .@npcname$ +"]";
					for ( set .@i, .@j; .@i < (getvariableofnpc(.showpage,"DOTAPVP") + .@j) && .@i < .@nb; set .@i, .@i + 1 ) {
						mes "^996600"+ (.@i+1) +": ^006699"+ .@name$[.@i] +" ^70AC11{"+ .@streak[.@i] +"} ^000000on :";
						mes "    ^EE8800"+ .@time$[.@i] +"^000000";
					}
					next;
				}
				break;
			case 3:
				set .@nb, query_sql("select name, highestown, date_format(owntime,'%a %e/%c/%y %r') from ownladder where highestown >= "+ getvariableofnpc(.lowestownage,"DOTAPVP") +" order by highestown desc limit "+ getvariableofnpc(.showtotal,"DOTAPVP"), .@name$, .@owned, .@time$);
				if ( .@nb == 0 ) {
					mes "["+ .@npcname$ +"]";
					mes "The ladder currently is empty.";
					next;
				}
				for ( set .@j,0; .@j < .@nb; set .@j, .@j + getvariableofnpc(.showpage,"DOTAPVP") ) {
					mes "["+ .@npcname$ +"]";
					for ( set .@i, .@j; .@i < (getvariableofnpc(.showpage,"DOTAPVP") + .@j) && .@i < .@nb; set .@i, .@i + 1 ) {
						mes "^996600"+ (.@i+1) +": ^006699"+ .@name$[.@i] +" ^00AAAA("+ .@owned[.@i] +") ^000000on :";
						mes "    ^EE8800"+ .@time$[.@i] +"^000000";
					}
					next;
				}
				break;
			case 4:
				if ( @dota_sql_kills == 0 && @dota_sql_deaths == 0 )
					query_sql "select kills, deaths, streaks, unix_timestamp(streaktime), date_format(streaktime,'%a %e/%c/%y %r') from pvpladder where char_id = "+ getcharid(0), @dota_sql_kills, @dota_sql_deaths, @dota_sql_streaks, @dota_sql_streaktime, .@time1$;
				mes "["+ .@npcname$ +"]";
				if ( @dota_sql_kills == 0 && @dota_sql_deaths == 0 )
					mes "You not yet kill any player.";
				else {
					mes "Your Current Streak : ^70AC11{"+ @PlayersKilledStreak +"}^000000";
					mes "Your Total Kills : ^00AA00["+ @dota_sql_kills +"]^000000";
					mes "Your Death Counts : ^FF0000<"+ @dota_sql_deaths +">^000000";
					if ( @dota_sql_kills || @dota_sql_streaks ) {
						mes "Highest Streak was ^70AC11{"+ @dota_sql_streaks +"}^000000 on :";
						query_sql "select date_format( from_unixtime("+ @dota_sql_streaktime +"),'%a %e/%c/%y %r')", .@time1$;
						mes "    ^EE8800"+ .@time1$ +"^000000";
					}
				}
				next;
				if ( getcharid(2) ) {
					if ( getvariableofnpc( getd(".dota_sql_"+ getcharid(2) +"_h"), "DOTAPVP" ) == 0 ) {
						query_sql "select currentown, highestown, unix_timestamp(owntime) from ownladder where guild_id = "+ getcharid(2), .@c, .@h, .@t;
						set getvariableofnpc( getd(".dota_sql_"+ getcharid(2) +"_c"), "DOTAPVP" ), .@c;
						set getvariableofnpc( getd(".dota_sql_"+ getcharid(2) +"_h"), "DOTAPVP" ), .@h;
						set getvariableofnpc( getd(".dota_sql_"+ getcharid(2) +"_t"), "DOTAPVP" ), .@t;
					}
					mes "["+ .@npcname$ +"]";
					if ( getvariableofnpc( getd(".dota_sql_"+ getcharid(2) +"_h"), "DOTAPVP" ) == 0 ) {
						mes "Your guild not yet kill any player.";
					} else {
						mes "Your guild name : ^006699"+ strcharinfo(2) +"^000000";
						mes "Current Owning  : ^00AAAA("+ getvariableofnpc( getd(".dota_sql_"+ getcharid(2) +"_c"), "DOTAPVP" ) +")^000000";
						mes "Longest Ownage was ^00AAAA("+ getvariableofnpc( getd(".dota_sql_"+ getcharid(2) +"_h"), "DOTAPVP" ) + ")^000000 on :";
						query_sql "select date_format( from_unixtime("+ getvariableofnpc( getd(".dota_sql_"+ getcharid(2) +"_t"), "DOTAPVP" ) +"),'%a %e/%c/%y %r')", .@time2$;
						mes "    ^EE8800"+ .@time2$ +"^000000";
					}
					next;
				}
				break;
			case 5:
				mes "["+ .@npcname$ +"]";
				mes "Explanation for Most Kills:";
				mes " ";
				mes "^996600Rank. ^006699NAME ^00AA00[Total Kills] ^FF0000<Deaths>^000000";
				mes " ";
				mes "--------------------------------";
				mes " ";
				mes "The ^00AA00Kills^000000 added when a player kills another player.";
				mes " ";
				mes "^FF0000Deaths^000000 count increase when a player killed by another player, or suicide (eg: Grand Cross).";
				mes " ";
				mes "A player killed by monsters, homunculus or pets will not add the kills or deaths count.";
				next;
				mes "["+ .@npcname$ +"]";
				mes "Explanation for Highest Streak:";
				mes " ";
				mes "^996600Rank. ^006699NAME ^70AC11{Highest Streak} ^000000on :";
				mes "    ^EE8800TIME^000000";
				mes " ";
				mes "--------------------------------";
				mes " ";
				mes "The ^70AC11Streak^000000 are added every time a player kills another player. It will reset upon log out, killed by another player, or suicide (eg: Sacrifice).";
				mes " ";
				mes "Then it record in the server the ^EE8800TIME^000000 when that player got that highest streak.";
				mes " ";
				mes "A player killed by monsters, homunculus or pets will not reset the streak.";
				mes " ";
				mes "--------------------------------";
				mes " ";
				mes "The numbers of straight kills to get these announcements are :";
				mes "^70AC11"+ getvariableofnpc(.killingspree,"DOTAPVP") +"^000000 : Killing Spree";
				mes "^70AC11"+ getvariableofnpc(.dominating,"DOTAPVP") +"^000000 : Dominating";
				mes "^70AC11"+ getvariableofnpc(.megakill,"DOTAPVP") +"^000000 : Mega Kill";
				mes "^70AC11"+ getvariableofnpc(.unstoppable,"DOTAPVP") +"^000000 : Unstoppable";
				mes "^70AC11"+ getvariableofnpc(.wickedsick,"DOTAPVP") +"^000000 : Wicked Sick";
				mes "^70AC11"+ getvariableofnpc(.monsterkill,"DOTAPVP") +"^000000 : Monster Kill";
				mes "^70AC11"+ getvariableofnpc(.godlike,"DOTAPVP") +"^000000 : Godlike";
				mes "^70AC11"+ getvariableofnpc(.holyshit,"DOTAPVP") +"^000000 : Beyond Godlike";
				next;
				mes "["+ .@npcname$ +"]";
				mes "Explanation for Longest Ownage:";
				mes " ";
				mes "^996600Rank. ^006699NAME ^00AAAA(Longest Ownage) ^000000on :";
				mes "    ^EE8800TIME^000000";
				mes " ";
				mes "--------------------------------";
				mes " ";
				mes "The ^00AAAAOwnage^000000 added every time any guild members killed another player that doesn't belong to his/her guild. It will reset when any of the guild member was killed by ANY player, including his/her guild member.";
				mes " ";
				mes "Then it record in the server the ^EE8800TIME^000000 when the guild got that longest ownage.";
				mes " ";
				mes "If the server went under maintainance, the current ownage will survive after the server restart.";
				mes " ";
				mes "Any guild member killed by monster, homunculus or pets will not reset the ownage count.";
				next;
				if ( getvariableofnpc(.lvltokill,"DOTAPVP") ) {
					mes "["+ .@npcname$ +"]";
					mes "You must kill another player with minimum base level of "+ getvariableofnpc(.lvltokill,"DOTAPVP") +", in order to get an announcement or get in the ladder.";
					mes " ";
					mes "It's possible for a base level 1 novice kills a base level 99 player and still can get in the ladder.";
					mes "However when a player level 99 kills a level 1 novice will get nothing.";
					next;
				}
				if ( getvariableofnpc(.counttopunish,"DOTAPVP") ) {
					mes "["+ .@npcname$ +"]";
					mes "Some noob players try to kill the same person over and over again in hope of getting his/her name appear in the ladder.";
					mes "However if you trying to do the same thing on this ladder, your name will announce to the public, and your action will be recorded into the server to notify the GMs.";
					next;
				}
				if ( getvariableofnpc(.minlvlrange,"DOTAPVP") ) {
					mes "["+ .@npcname$ +"]";
					mes "When you kill another player thats lower base level than you, the base level gap between you and that player must not more than "+ getvariableofnpc(.minlvlrange,"DOTAPVP") +".";
					mes " ";
					if ( getvariableofnpc(.minlvlrange,"DOTAPVP") >= 200)
						mes "In other words, if your base level is 500, the player you killed must be at least level "+( 500 - getvariableofnpc(.minlvlrange,"DOTAPVP") )+" then only you will get the announcement and in the ladder.";
					else if ( getvariableofnpc(.minlvlrange,"DOTAPVP") >= 70)
						mes "In other words, if your base level is 255, the player you killed must be at least level "+( 255 - getvariableofnpc(.minlvlrange,"DOTAPVP") )+" then only you will get the announcement and in the ladder.";
					else
						mes "In other words, if your base level is 99, the player you killed must be at least level "+( 99 - getvariableofnpc(.minlvlrange,"DOTAPVP") )+" then only you will get the announcement and in the ladder.";
					mes "Higher base level kills lower level gets nothing, however lower level player kills higher level will get the announcement.";
					next;
				}
				break;
		}
	}
}

January 20, 2014

bump?

January 14, 2014

I'm 'sir' btw, so you mean sir, I will change all 5 files that's linked to annieruru's post?

January 14, 2014

Kindly please help me how to apply this patch:

http://rathena.org/board/tracker/issue-8459-addtimer-command-should-report-an-error-if-it-hits-max-eventtimer/

I can't understand where and what to put/apply.. /sob

Help me please. Thank you.

January 13, 2014

Dota Sound ( Put these on your data/wav folder ) :

wav.rar

Warper :

prontera,150,150,0    script    Warper    100,{
    warp <map>,<x>,<y>;
    end;
}

Ladder :

//===== eAthena Script =======================================
//= eAthena PVP-Ladder
//===== By: ==================================================
//= Terces
//===== Current Version: =====================================
//= 1.7.2
//===== Compatible With: =====================================
//= Any Athena Version that has "for" implemented
//===== Credits: =============================================
//= The whole eAthena Board and the eAthena Chat
//===== Notes: ===============================================
//= Note 1:
//= Experience gain works like this formula:
//= ($@LadderLength-(<new position>-1))*$@LadderExp
//= so if someone gets the first place he'll get
//= $@LadderLength*$@LadderExp experience points.
//============================================================
//= Fixxed by Dante
//= V1.7.2
//= Hosted by Dant3 aka Dante
// HAFE FUN! READ THE TOPIC! IT DONT WORKS MAYBE ON OLDER REV
//
//
//  LAST UPDATE: 12th,February.2008
//
// Main Script - Terces (Main Thanks to Terces )
// V1.7.0 - Dant3
// v1.7.1 - AnnieRuRu
// v1.7.2 - Dant3
 
// THIS SCRIPT WORKS ONLY ON THE NEW EATHENA REVISIONS! ENJOY!
 
-    script    PVPLADDEROPTIONS    -1,{
end;
OnInit:
// 0 = Disabled (NO)
// 1 = Enable   (YES)
set $@languageselect, 0;    //Enable/Disable language selection [English/German] (Default: 1)
set $@LadderAnnounce, 0;    //Enable/Disable the announcement when a char reaches a new position in the ladder (Default: 1)
 
set $@LadderLength, 30;        //Set the length of the Ladder [!Not higher than 128!] (Default: 30)
set $@LadderSteps, 10;        //Set the views per page (Default: 10)
 
set $@LadderExpGain, 100;        //Enable/Disable experience gain when reaching a new position in the ladder (*Note1)
set $@LadderExp, 150;        //Set Experience gain value (*Note1)
 
// Update v1.7.0
set $@LadderZenyGain, 1;    //Enable/Disable zeny gain when reaching a new position in the ladder
set $@LadderZeny, 100;        //Set Zeny gain value 
set $@LadderChatRoom, 1;    //Enable/Disable an Chat Room over the NPC with the message "PvP Ladder" (Users can not enter the Chat room) 
 
// Update v1.7.1 (Thanks to AnnieRuRu)
// Added GM PvP Ladder Reset Function
 
// Update v1.7.2
// Thanks to for the Feedback
set $@LadderAskLogin, 1;    //Enable/Disable that the NPC asks about the Broadcast when a Player logins / or  with the Npc Chat (0 = Login Ask , 1 = Npc Chat) Related: 0
}
 
-    script    PVPLADDERS    -1,{
OnPCKillEvent:
if (terces_PVP_resets != $terces_PVP_resets) {
    dispbottom "Please relog your character, in order to get the correct kills for you in the PVP ladder.";
    dispbottom "Because a GM just reset the ladder.";
    end;
}
if ( killedrid == getcharid(3) ) {
    set PVPDeaths, PVPDeaths +1;
    set #PVPDeathsAccount, #PVPDeathsAccount +1;
    set @PVPDeathstoday, @PVPDeathstoday +1;
    end;
}
set $@PVPcounter,$@PVPcounter+1;
set getd("$@PVPKill"+$@PVPcounter),getcharid(3);    //getd to avoid errors when more than 1 people kill someone
attachrid(killedrid);
set PVPDeaths,PVPDeaths+1;
set @PVPDeathstoday,@PVPDeathstoday+1;
set #PVPDeathsAccount,#PVPDeathsAccount+1;
set getd("$@PVPkilledplayer"+$@PVPcounter+"$"), strcharinfo(0);    //again, getd to avoid possible glitches
detachrid;
 
attachrid(getd("$@PVPKill"+$@PVPcounter));
CountKills:
    set PVPKills,PVPKills+1;
    set @PVPKillstoday,@PVPKillstoday+1;
    set #PVPKillsAccount,#PVPKillsAccount+1;
    setarray @playerstats[0],@PVPKillstoday,@PVPDeathstoday,PVPKills,PVPDeaths,#PVPKillsAccount,#PVPDeathsAccount;
 
l_ladder:
    set @considerdeath,0;
    for (set @PosinLadder, 0; @PosinLadder < $@LadderLength; set @PosinLadder, @PosinLadder + 1){
        if (PVPKills >= $terces_PVP_kills[@PosinLadder]){    //Player deserves to be in the ladder
            //Check if Death plays a role on the position
            if ((PVPKills == $terces_PVP_kills[@PosinLadder]) && (PVPDeaths > $terces_PVP_deaths[@PosinLadder])) set @considerdeath,1; //Consider Deaths
            //Check if the player only topped his own scores
            if ($terces_PVP_names$[@PosinLadder] == strcharinfo(0)){
                set $terces_PVP_kills[@PosinLadder],PVPKills;
                set $terces_PVP_deaths[@PosinLadder],PVPDeaths;
                end;
            }
            //Moves all characters in the Ladder
            for (set @beginmoving, $@LadderLength; @beginmoving >= (@PosinLadder+@considerdeath); set @beginmoving, @beginmoving - 1){
                if ($terces_PVP_names$[@beginmoving] == strcharinfo(0)){
                    //If the player already is in the Ladder it only has to move players between characters new position and characters old position
                    callsub L_LadderMove,0;
                    end;
                }
                else if (@beginmoving == (@PosinLadder+@considerdeath)){
                    //Player is not in the Ladder and therefor it has to move all players from characters new position downwards
                    callsub L_LadderMove,1;
                    end;
                }
            }
            end;
        }
    }
 
 
L_LadderMove:
    if (getarg(0) == 0) set @length,@beginmoving;
    if (getarg(0) == 1) set @length,$@LadderLength;
    for (set @movecycle, @length; @movecycle > (@PosinLadder+@considerdeath);
     set @movecycle, @movecycle - 1){
 
        set $terces_PVP_names$[@movecycle],$terces_PVP_names$[(@movecycle-1)];
        set $terces_PVP_kills[@movecycle],$terces_PVP_kills[(@movecycle-1)];
        set $terces_PVP_deaths[@movecycle],$terces_PVP_deaths[(@movecycle-1)];
        set $terces_PVP_times[@movecycle],$terces_PVP_times[(@movecycle-1)];
    }
    //sets the character's stats in the new position
    set $terces_PVP_names$[(@PosinLadder+@considerdeath)],strcharinfo(0);
    set $terces_PVP_kills[(@PosinLadder+@considerdeath)],PVPKills;
    set $terces_PVP_deaths[(@PosinLadder+@considerdeath)],PVPDeaths;
    set $terces_PVP_times[(@PosinLadder+@considerdeath)],gettimetick(2);
    //Experience Gain
    if ($@LadderExpGain == 1){
        set BaseExp,BaseExp+(($@LadderLength-((@PosinLadder+@considerdeath)-1))*$@LadderExp);
        dispbottom "You have just been rewarded with "+(($@LadderLength-((@PosinLadder+@considerdeath)-1))*$@LadderExp)+" base experience points";
    }
    //Zeny Gain
    if ($@LadderZenyGain == 1){
        set Zeny,Zeny+(($@LadderLength-((@PosinLadder+@considerdeath)-1))*$@LadderZeny);
        dispbottom "You have just been rewarded with "+(($@LadderLength-((@PosinLadder+@considerdeath)-1))*$@LadderZeny)+" Zeny";
    }
    //Announcement (Setting for Char)
    if (pvpbroadcast == 2){
    announce strcharinfo(0)+" just claimed the "+((@PosinLadder+@considerdeath)+1)+". Position in the Top "+$@LadderLength+" after killing "+getd("$@PVPkilledplayer"+$@PVPcounter+"$")+".",16;
    }
    //Announcement (Setting for Account)
    if (#pvpbroadcast == 2){
    announce strcharinfo(0)+" just claimed the "+((@PosinLadder+@considerdeath)+1)+". Position in the Top "+$@LadderLength+" after killing "+getd("$@PVPkilledplayer"+$@PVPcounter+"$")+".",16;
    }
    end;
 
OnPCLoginEvent:
if (terces_PVP_resets != $terces_PVP_resets){
        set PVPDeaths,0;
        set @PVPDeathstoday,0;
        set #PVPDeathsAccount,0;
        set PVPKills,0;
        set @PVPKillstoday,0;
        set #PVPKillsAccount,0;
        set terces_PVP_resets,$terces_PVP_resets;
    }
if ($@LadderAskLogin == 0){
    if (#pvpbroadcast == 2) goto L_ignore;
    if (pvpbroadcast == 2) goto L_ignore;
    if (#pvpbroadcast == 1) goto L_ignore;
    if (pvpbroadcast == 1) goto L_ignore;
 
    if (pvpbroadcast == 0)
    mes "Hi, "+strcharinfo(0)+"";
    mes "Me is the PvP Top Management!";
    mes "Let me ask you one Question and i will let you play!";
    menu "Later please",L_close,"Okay, fine",L_fine;
 
    L_fine:
    next;
    mes "Well, do you want read Broadcast Messages when a Player reach a new position on the PvP Ranglist?";
    menu "Yeah, why not",L_accept,"No, thanks",L_accept_2,"Wtf is Broadcast?",L_broadcast;
 
    L_accept:
    next;
    mes "Yay, thank you! ^_^";
    mes "Will this Setting work on all your Chars on this account or only this char?";
    menu "Account",L_account,"Only this char",L_char;
 
    L_account:
    set #pvpbroadcast,2;
    next;
    mes "Okay, "+strcharinfo(0)+"";
    mes "Thank you for your time and have fun!";
    close;
 
    L_char:
    set pvpbroadcast,2;
    next;
    mes "Okay, "+strcharinfo(0)+"";
    mes "Thank you for your time and have fun!";
    goto access_eng;
    close;
    
    L_accept_2:
    next;
    mes "Yay, thank you! ^_^";
    mes "Will this Setting work on all your Chars on this account or only this char?";
    menu "Account",L_account_2,"Only this char",L_char_2;
 
    L_close:
    close;
 
    L_account_2:
    set #pvpbroadcast,1;
    next;
    mes "Okay, "+strcharinfo(0)+"";
    mes "Thank you for your time and have fun!";
    close;
 
    L_char_2:
    set pvpbroadcast,1;
    next;
    mes "Okay, "+strcharinfo(0)+"";
    mes "Thank you for your time and have fun!";
    goto access_eng;
    close;
 
 
    L_broadcast:
    mes "Broadcasts are this yellow messages from  the GMs";
    goto L_fine;
    }
}
 
prontera,168,178,1    script    PvP Ladder    57,{
if ($@LadderChatRoom == 1) {
        waitingroom "Top "+$@LadderLength+" Players!",0;   // Look on the configuration!
}
    set @name$,"[PvP-Ladder]";
    //Colour of:            Position    Name        Kills        Deaths        Time
    setarray @colour$[0],    "^996600",    "^006699",    "^00AA00",    "^FF0000",    "^EE8800";
if ($@LadderAskLogin == 1){
    if (#pvpbroadcast == 2) goto     access_eng;
    if (pvpbroadcast == 2) goto     access_eng;
    if (#pvpbroadcast == 1) goto     access_eng;
    if (pvpbroadcast == 1) goto     access_eng;
    if (pvpbroadcast == 0)
    mes "Hi, "+strcharinfo(0)+"";
    mes "Me is the PvP Top Management!";
    mes "Let me ask you one Question and i will let you play!";
    menu "Later please",L_close,"Okay, fine",L_fine;
 
    L_fine:
    next;
    mes "Well, do you want read Broadcast Messages when a Player reach a new position on the PvP Ranglist?";
    menu "Yeah, why not",L_accept,"No, thanks",L_accept_2,"Wtf is Broadcast?",L_broadcast;
 
    L_accept:
    next;
    mes "Yay, thank you! ^_^";
    mes "Will this Setting work on all your Chars on this account or only this char?";
    menu "Account",L_account,"Only this char",L_char;
 
    L_account:
    set #pvpbroadcast,2;
    next;
    mes "Okay, "+strcharinfo(0)+"";
    mes "Thank you for your time and have fun!";
    close;
 
    L_char:
    set pvpbroadcast,2;
    next;
    mes "Okay, "+strcharinfo(0)+"";
    mes "Thank you for your time and have fun!";
    goto access_eng;
    close;
    
    L_accept_2:
    next;
    mes "Yay, thank you! ^_^";
    mes "Will this Setting work on all your Chars on this account or only this char?";
    menu "Account",L_account_2,"Only this char",L_char_2;
 
    L_close:
    close;
 
    L_account_2:
    set #pvpbroadcast,1;
    next;
    mes "Okay, "+strcharinfo(0)+"";
    mes "Thank you for your time and have fun!";
    close;
 
    L_char_2:
    set pvpbroadcast,1;
    next;
    mes "Okay, "+strcharinfo(0)+"";
    mes "Thank you for your time and have fun!";
    goto access_eng;
    close;
 
 
    L_broadcast:
    mes "Broadcasts are this yellow messages from  the GMs";
    goto L_fine;
}
    access_eng:
    mes @name$;
    mes "Hello "+strcharinfo(0)+"";
    mes "If you want to I can show you your PVP stats.";
    next;
    M_selection_eng:
    if ( getgmlevel () < 99 )
        menu "Show me the PVP Ladder",M_Ladder_eng,"PvP stats since my login",M_seitLogin_eng,"PvP stats of this Char",M_dieserChar_eng,"Stats of the whole account",M_vomAccount_eng,"Cancel",M_abbrechen_eng;
    else
        menu "Show me the PVP Ladder",M_Ladder_eng,"PvP stats since my login",M_seitLogin_eng,"PvP stats of this Char",M_dieserChar_eng,"Stats of the whole account",M_vomAccount_eng,"Reset Ladder",L_reset,"Cancel",M_abbrechen_eng;
 
    M_Ladder_eng:
    mes "Alright...I'll show you the Top "+ $@LadderLength +" with "+$@LadderSteps+" entries per page.";
    mes "It'll be viewed like this:";
    mes @colour$[0]+"Place^000000: "+@colour$[1]+"<name>^000000 :"+@colour$[2]+"<kills>^000000:"+@colour$[3]+"<deaths>^000000 "+@colour$[4]+"<time>";
    next;
    callsub L_Ladder;
    goto M_selection_eng;
 
    M_seitLogin_eng:
    mes @name$;
    mes "Your stats since your login:";
    mes @PVPKillstoday+"/"+@PVPDeathstoday+"(Kills/Deaths)";
    next;
    goto M_selection_eng;
 
    M_dieserChar_eng:
    mes @name$;
    mes "Your stats of this Char:";
    mes PVPKills+"/"+PVPDeaths+"(Kills/Deaths)";
    next;
    goto M_selection_eng;
 
    M_vomAccount_eng:
    mes @name$;
    mes "Your stats of the whole account:";
    mes #PVPKillsAccount+"/"+#PVPDeathsAccount+"(Kills/Deaths)";
    next;
    goto M_selection_eng;
 
    M_abbrechen_eng:
    mes @name$;
    mes "OK. You can come back to me and see your stats whenever you want.";
    close;
 
L_reset:
    if (getgmlevel() < 99) end;
    mes "Do you want to reset the ladder?";
    if (select ("Yes","No") == 2) goto L_end;
    mes "Are you really really sure you want to reset it?";
    menu "Yes, ffs!!",-,"No",L_end;
    deletearray $terces_PVP_kills,128;
    deletearray $terces_PVP_deaths,128;
    deletearray $terces_PVP_names$,128;
    deletearray $terces_PVP_times,128;
    set $terces_PVP_resets,$terces_PVP_resets +1;
 
    L_end:
    mes "Okay...cya";
    close;
    
    L_Ladder:
    for (set @y,0; @y < $@LadderLength; set @y,@y+$@LadderSteps){
        for (set @x,@y; (@x < (@y+$@LadderSteps)) && (@x < ($@LadderLength)); set @x,@x+1){
            if ($terces_PVP_names$[@x] != ""){
                mes @colour$[0]+(@x+1)+"^000000: "+@colour$[1]+$terces_PVP_names$[@x]+"^000000 "+@colour$[2]+$terces_PVP_kills[@x]+"^000000:"+@colour$[3]+$terces_PVP_deaths[@x]+"^000000 ~ "+@colour$[4]+callfunc ("Gettime",$terces_PVP_times[@x])+"^000000";
            } else {
                mes "^DD0000"+(@x+1)+": ^006699None^000000 ";
            }
        }
        next;
    }
    return;
}
 
function    script    Gettime    {
if (getarg(0)==0) return;
 
set @difftimedays,(gettimetick(2) - getarg(0));
set @difftimehours,@difftimedays%86400;
set @difftimeminutes,@difftimehours%3600;
set @difftimeseconds,@difftimeminutes%60;
 
set @days,@difftimedays/86400;
set @hours,@difftimehours/3600;
set @minutes,@difftimeminutes/60;
set @seconds,@difftimeseconds;
set @result$,"";
if(@days != 0) set @result$,@result$+@days+"d ";
if(@hours != 0) set @result$,@result$+@hours+"h ";
if(@minutes != 0) set @result$,@result$+@minutes+"m ";
if(@seconds != 0) set @result$,@result$+@seconds+"s";
 
return (@result$);
}

Enjoy! /ok

If I put the wav sounds to data/wav and use the script you've provided, DotA sounds will be heard after killing a player? thanks

January 11, 2014

just for fun ...

how about you try to apply this latest fix

http://rathena.org/board/tracker/issue-8459-addtimer-command-should-report-an-error-if-it-hits-max-eventtimer/

and give me some ~~laugh~~ screenshot how your map-server.exe looks like ?

I got a feeling you must have some custom src mod to pile up max_eventtimer already

Here's my screenshot, its okay, i'm still newbie, learning to file scripts.. so feel free to laugh at it ma'am. /sob

January 11, 2014

1201,Knife,Knife,4,50,,400,17,,1,3,0xFE9F7EEF,7,2,2,1,1,1,1,{ Oven_Effect::OnTock },{},{}
where is the doevent command ?
shouldn't your test server *beep* telling you there's error on the line ?
[Error]:
script error on item_db_re line 538
    parse_simpleexpr: unexpected character
*  538 : Oven_Effect
well I'm using sql db,
but there must still be an error on your map-server.exe

should be something like this
1201,Knife,Knife,5,50,,400,17,,1,3,0xFE9F7EEF,63,2,2,1,1,1,1,{},{  doevent "Oven_Effect::OnTock"; },{}

Thank you ma'am AnnieRuru, I fixed it.

But, I still have the other NPCs having error with the addtimer. -__-

Now it errors the 'DOTAPVP' script. Where specifically do I need to put the 'sleep2' timer command? After the addtimer?

So I can do this to my other script that will show errors. Sorry for being to persistent here. :< /sry

January 11, 2014

1. what is your emulator version ?

maybe not using rathena ?

2. how about show the whole line of that item ?

I use SQL database so here's my line
1201,"Knife","Knife",5,50,,400,"17",,1,3,4271865583,63,2,2,1,"1",1,1,"","doevent ""Oven_Effect::OnTock"";",""
3. how about change doevent into addtimer ?
I have encounter several issue where some server having problems with doevent script command, its getting buggy
// OnEquip{ addtimer 1,"Oven_Effect::OnTock"; } OnUnEquip{}
OR ...

4. maybe your test server just sucks

1. rAthena. 17454

2.

1201,Knife,Knife,4,50,,400,17,,1,3,0xFE9F7EEF,7,2,2,1,1,1,1,{ Oven_Effect::OnTock },{},{}

3. I will just follow what you did at the top, please help me to make this work on my test server. xD

4. Awww. /sob

January 11, 2014

Offtopic: I think this is the other bug report problem from addtimer (scanned bug tracker)

http://rathena.org/board/tracker/issue-7979-addtimer-not-resetting-properly-when-reloading-scripts-while-a-timer-is-still-running/

I think this has nothing to do with that one
and addtimer command mustn't be remove with @reloadscript, it was purposely coded this way
-	script	Oven_Effect	-1,{
OnTock:
	while ( isequipped(1201) ) { // change 1201 to your custom item ID from where it came from
		if ( getstatus( SC_FREEZE ) ) {
			message strcharinfo(0), "Frozen status detected";
			sleep2 4000; // 4 seconds delay
			if ( getstatus( SC_FREEZE ) ) {
				unittalk getcharid(3), "Break the ICE !!";
				sc_end SC_FREEZE;
			}
		}
		sleep2 250; // delay in miliseconds
	}
	end;
}

prontera,155,185,5	script	dkfhsdkfj	100,{
	sc_start sc_freeze, 10000000, 1;
}
how come its bug ?
why I got it working just fine

screenrAthena018.jpg screenrAthena019.jpg

I even test with REAL storm gust

storm gust.jpg

/wah How come that script works on you? o.O I copy-pasted that script on my test server, the whole script don't work on me. -__-

Do I need to put "on tock" on my item db of 1201 (for testing with knife). T_T

The only script that only showing is the Prontera NPC script << this one works, but the freezing script doesn't.

January 10, 2014

haha, I got some stress off after complete whole endless tower

( honestly I have to say its my 1st time complete official endless tower quest )

anyways
-	script	Oven_Effect	-1,{
OnTock:
	while ( isequipped(1201) ) { // change 1201 to your custom item ID from where it came from
		dispbottom @a++ +"";
		if ( getstatus( SC_FREEZE ) ) {
			sleep2 100; // seems like you have a slight delay in timer if the player getting freezed
			dispbottom "Break the ICE !!";
			sc_end SC_FREEZE;
		}
		sleep2 100; // delay in miliseconds
	}
	end;
}

prontera,156,187,5	script	kjdhfksdjf	100,{
	sc_start sc_freeze, 10000, 1;
	end;
}
I tested it actually works
screenrAthena017.jpg

apparently your script has sleep2 and addtimer command together

so I added it up into 6 seconds

you can remove the sleep2 2000; if you don't want a delay to break the ice

Congrats on the endless tower. XD

Offtopic: I think this is the other bug report problem from addtimer (scanned bug tracker)

http://rathena.org/board/tracker/issue-7979-addtimer-not-resetting-properly-when-reloading-scripts-while-a-timer-is-still-running/

@topic, can you kindly help me to execute it properly?

My above script (that gives error) works like this:

When you are frozen (while wearing the item ID from above error script) you will just be frozen for just 4 seconds.

Example, like above when wearing knife, you will be just frozen just for only 4 seconds.

Kindly please help me. XDDD So that we can move on from this topic. LOL XDD

January 10, 2014

weird, when I read that script, I didn't expect it to cause this problem

and I just test it right now in my test server,

it also doesn't display this error (I compile with report addtimer error)

no idea how you can get those error

but whatever, at least we have pinpointed this problem

this is the script which doesn't use addtimer command and uses sleep2 instead
// OnEquip{ doevent("Oven_Effect::OnTock"); } OnUnEquip{}
 
-	script	Oven_Effect	-1,{
OnTock:
	while ( isequipped(1201) ) { // change 1201 to your custom item ID from where it came from
//		dispbottom @a++ +"";
		if ( getstatus( SC_FREEZE ) ) {
			sleep2 2000; // seems like you have a slight delay in timer if the player getting freezed
			sc_end SC_FREEZE;
		}
		sleep2 4000; // delay in miliseconds
	}
	end;
}
I reported this in bug tracker to ensure this problem never happens again
http://rathena.org/board/tracker/issue-8459-addtimer-command-should-report-an-error-if-it-hits-max-eventtimer/

Yes, thank you.

Hmm, the script you gave me ma'am doesn't work fine. I tried freezeing the character using stormgust, the froze doesn't break after 4seconds. Hmm..

January 10, 2014

you know what ?

I start to feel I am a noob somehow

actually there is a quickest way to determine where your error comes from

search this line inside script.c inside (addtimer) function
	pc_addeventtimer(sd,tick,event);
change into
	if ( !pc_addeventtimer(sd,tick,event) )
		return 1;
recompile !
then wait for the error ....

EDIT:

those 3 scripts looks ok to me ....

maybe something else =/

anyway try to make the addtimer command report the error and see

I'm sorry if I'm making you feel that. /sry /sry

I'll wait for the error. Thank you for the reply Ma'am AnnieRuru.

Finally, this showed the error!!!!

This is the script:

http://pastebin.com/0Bhy67x3 << because this script, I put this as an item_dbscript. Kindly help me.

January 10, 2014

1st ... post out the script which has OnxxxxxEvent: and a *mes command together ...

2nd ... after you have confirm it is caused by OnPCLoginEvent or OnNPCKillEvent, then post that script with that label along

euphy quest shop shouldn't cause this ... because it doesn't have OnxxxxEvent inside

even 1000 doesn't work ? wtf ... what kind of botkiller script you have ?

I can only think of 1 possible reason, which is your botkiller script tried to rotate the image by addtimer+cutin

I remember myzter's script did that before, but his script is clean and doesn't cause that bug

1. The script are not identical, but it hit 3 scripts (1 short, 1 made by you, 1 from eathena)

1. http://pastebin.com/2FpfPzyE

2. http://pastebin.com/qUBfAfM4

3. http://pastebin.com/tWK7yYYf ( the anti bot)

yes, 1000 doesn't work. I'm sorry for being clingy on rathena forums, I'm still newbie trying to learn scripts. This is the first time I encountered this error. -__- /sry

January 10, 2014

huh ? nope, they are saying that they can't help you to fix issues with the source because they are no experienced with that, and that they recommend you to contact your developer to help you to fix that instead

Haha sorry, I forgot to put it on the other bar, I'm referring to Light post because I can't understand what he said, and I'm asking if map.h compiles properly or not even it shows at the end of the compile logs.

Thank you for that link, about this, Running the command ./configure && make clean && make sql. << I'll run this through putty right?

January 10, 2014

If he building the conf the compilation went fine.

Not about the newline error you can open the specified file and add a line at the end of it if you feel more secure about this.

He need to leave each subdirectory of src to build them all.

Say our serv is in /home/rathena

When you do 'make sql' in that directory we start here :

/home/rathena/Makefile

Then see target sql: => sql: $(SQL_DEPENDS)

SQL_DEPENDS=common_sql login char map import

So he will do target common_sql login char map import.

common_sql: $(COMMON_SQL_DEPENDS)

@$(MAKE) -C src/common sql

@$(MAKE) -C src/common sql => this mean go in src/common directory and execute 'make sql'

login: $(LOGIN_SQL_DEPENDS)

@$(MAKE) -C src/login sql

@$(MAKE) -C src/common sql => this mean go in src/login directory and execute 'make sql'

etc...

So yeah he leaving and entering lot of directory to build the whole binary.

"Because my trunk is Windows, i just transferred to a linux VPS. Is that okay?" ??

As long as you didn't transfered Windows binary and expect them to run into your linux vps it's fine. But I don't see why you didn't fetch the content into your linux host directly..

My hosting said that: "Unfortunately, we are not experienced with fixing source code issues; I can only recommend that you look for a developer to help you with that instead."

So does this mean that it is not compiling my map.h properly?

January 10, 2014

By the way this is an image of the error:

(I also added at my first post at the top)

actually I'm thinking ... why not just compile your server as

#define MAX_EVENTQUEUE 1000
#define MAX_EVENTTIMER 1000
something like this lol
then you can continue your way with poorly made scripts ...

Okay ma'am first I'll try that '1000'

This is current map.h

#define MAX_EVENTQUEUE 100
#define MAX_EVENTTIMER 32

I'll just bump this topic when this solution is fix. Thank you.

And the other solution, I'll just add 'sleep2 1;' every after 'OnPCLoginEvent'.

I'll try one by one.

@AnnieRuru

ma'am, I guess putting 1000 don't work. /sob

I'll do the manual changing of addtimer.

Kindly please give me 1 example on what I must change and where shall I put the sleep2 command from this script:

This script is identical to my other 18scripts(euphy quest script) just the items are different though. XD

http://pastebin.com/LrV6w0N5

January 10, 2014

@Lighta

i believe he thinks that its map.h is not getting compiled for this

itemdb.h:240:24: warning: no newline at end of file

CC mapreg_sql.c

LD map-server_sql

make[1]: Leaving directory `/root/Desktop/trunk/src/map'

building conf/import and conf/msg_conf/import folder...

if your server is running after that we can say the compilation is good, let's wait for lighta o:

Yes you are correct, because it is stated "leaving directory" blah blah. XDD That's why I feel that map.h is not compiling.

January 10, 2014

I think the compilation does not compiling my 'map.h' lol (not quite sure)
Because my trunk is Windows, i just transferred to a linux VPS. Is that okay?

January 9, 2014

then if it runs it should be ok

the error you say is to the queue, like Annie said, it should end the error by increasing it

may i ask for a screen shot? maybe there is something missing

Screenshot from the NPC error? This one:

Centos 32bit

make clean

./configure

make sql

./athena-start start or restart

Centos 64bit

make clean

./configure --enable-64bit

make sql

./athena-start start or restart

Wrong since uh lot of revision: 1-jun-2012 => d81154b

should be :

32bit : ./configure --disable-64bit && make clean sql

64bit : ./configure ** make clean sql

I'm sorry sir, but I'm still new at using Linux, what do you mean by "make clean". (very noob question. /sry )

January 9, 2014

4. the npc chat box shows up only once

NPC to me showed 4 times. XD

so, do you have any npc scripts that execute OnxxxxEvent has a npc dialog ?

Yes, I do have one, an antibot script. OnPCloginevent.

I still have 3 custom scripts here with "addtimer" command.

Script1: http://pastebin.com/0Bhy67x3 line 6.

And the two credits to you ma'am. They are old scripts I found at eathena

Script2: http://pastebin.com/9UpBD0cE line 223.

Script3: http://pastebin.com/08JZUY2H Line 42

Plus the 18 other scripts(Euphy's Quest Shop)

lower down the value of addtimer, and use sleep2 to queue up the timer you want

Basically ma'am, the best thing I can do is make the 18scripts'(euphy'sscript) "addtimer" in 1 and add "sleep2" command every after function? Correct me if I'm wrong, newbie /sry . :<

January 9, 2014

dunno why he can gives wrong answer

#define MAX_EVENTTIMER 32
change this value higher like 100

Hey thanks for the reply AnnieRuru, I changed it to 100, error still shows up. Hmm.

and, don't use addtimer command too much

its exactly like this to happen, better switch your script to use sleep2 command

About this, I can't quite understand this, what would specific 'command' should I replace with the command 'sleep2'.

Is this the one? http://rathena.org/wiki/Addtimer

If that is what you're referring too ma'am, I have 18 scripts of that with this command http://rathena.org/wiki/Addtimer

The script that I'm using is from Euphy's Quest Shop = http://pastebin.com/raw.php?i=Y4HP1NNM

Addtimer is on line 82 ma'am. Kindly help me how or what to edit on that command please.

January 9, 2014

well a way to know if it let's you run the server with
./athena-start start
o:

any errors there?

Actually sir, when I'm starting the server, it runs, the only error is this:

http://rathena.org/board/topic/91248-npc-event-error/

I followed AnnieRuru's reply, error still shows up.

January 8, 2014

I'm using centos. I have this, is this compilation okay or this is worst?

Kindly help me thanks.

This is the logs:

make[1]: Entering directory `/root/Desktop/trunk/3rdparty/mt19937ar'
	CC	mt19937ar.c
make[1]: Leaving directory `/root/Desktop/trunk/3rdparty/mt19937ar'
make[1]: Entering directory `/root/Desktop/trunk/3rdparty/libconfig'
	CC	libconfig.c
	CC	grammar.c
	CC	scanctx.c
	CC	scanner.c
	CC	strbuf.c
make[1]: Leaving directory `/root/Desktop/trunk/3rdparty/libconfig'
make[1]: Entering directory `/root/Desktop/trunk/src/common'
	MKDIR	obj_all
	CC	core.c
	CC	socket.c
	CC	timer.c
	CC	db.c
	CC	nullpo.c
	CC	malloc.c
	CC	showmsg.c
	CC	strlib.c
	CC	utils.c
	CC	grfio.c
	CC	mapindex.c
	CC	ers.c
	CC	md5calc.c
	CC	core.c
	CC	socket.c
	CC	malloc.c
	CC	random.c
	CC	des.c
	CC	conf.c
	CC	thread.c
	CC	mutex.c
	CC	raconf.c
	CC	mempool.c
	CC	msg_conf.c
	CC	cli.c
	AR	obj_all/common.a
	MKDIR	obj_sql
	CC	sql.c
	AR	obj_sql/common_sql.a
make[1]: Leaving directory `/root/Desktop/trunk/src/common'
make[1]: Entering directory `/root/Desktop/trunk/src/login'
	MKDIR	obj_sql
	CC	login.c
	CC	account_sql.c
	CC	ipban_sql.c
	CC	loginlog_sql.c
	LD	login-server_sql
make[1]: Leaving directory `/root/Desktop/trunk/src/login'
make[1]: Entering directory `/root/Desktop/trunk/src/char'
	MKDIR	obj_sql
	CC	char.c
char.c:5356:2: warning: no newline at end of file
	CC	inter.c
	CC	int_party.c
	CC	int_guild.c
	CC	int_storage.c
	CC	int_pet.c
	CC	int_homun.c
	CC	int_mail.c
	CC	int_auction.c
	CC	int_quest.c
	CC	int_mercenary.c
	CC	int_elemental.c
	LD	char-server_sql
make[1]: Leaving directory `/root/Desktop/trunk/src/char'
make[1]: Entering directory `/root/Desktop/trunk/src/map'
	MKDIR	obj_sql
	CC	map.c
In file included from pc.h:12,
                 from map.c:25:
itemdb.h:240:24: warning: no newline at end of file
	CC	chrif.c
In file included from pc.h:12,
                 from chrif.c:18:
itemdb.h:240:24: warning: no newline at end of file
	CC	clif.c
In file included from pc.h:12,
                 from clif.c:19:
itemdb.h:240:24: warning: no newline at end of file
	CC	pc.c
In file included from pc.h:12,
                 from channel.h:7,
                 from pc.c:19:
itemdb.h:240:24: warning: no newline at end of file
pc.c: In function ‘pc_getitem_map’:
pc.c:4135: warning: suggest parentheses around assignment used as truth value
	CC	status.c
In file included from pc.h:12,
                 from status.c:16:
itemdb.h:240:24: warning: no newline at end of file
	CC	npc.c
In file included from pc.h:12,
                 from npc.c:18:
itemdb.h:240:24: warning: no newline at end of file
	CC	npc_chat.c
In file included from pc.h:12,
                 from npc_chat.c:14:
itemdb.h:240:24: warning: no newline at end of file
	CC	chat.c
In file included from pc.h:12,
                 from chat.c:15:
itemdb.h:240:24: warning: no newline at end of file
	CC	path.c
	CC	itemdb.c
In file included from itemdb.c:10:
itemdb.h:240:24: warning: no newline at end of file
	CC	mob.c
In file included from pc.h:12,
                 from mob.c:20:
itemdb.h:240:24: warning: no newline at end of file
mob.c:4632:2: warning: no newline at end of file
	CC	script.c
In file included from script.c:25:
itemdb.h:240:24: warning: no newline at end of file
script.c: In function ‘buildin_getitem_map_sub’:
script.c:6476: warning: unused variable ‘p’
script.c:6475: warning: unused variable ‘g’
	CC	storage.c
In file included from storage.c:13:
itemdb.h:240:24: warning: no newline at end of file
	CC	skill.c
In file included from pc.h:12,
                 from skill.c:17:
itemdb.h:240:24: warning: no newline at end of file
	CC	atcommand.c
In file included from pc.h:12,
                 from channel.h:7,
                 from atcommand.c:20:
itemdb.h:240:24: warning: no newline at end of file
	CC	battle.c
In file included from pc.h:12,
                 from battle.c:17:
itemdb.h:240:24: warning: no newline at end of file
	CC	battleground.c
In file included from pc.h:12,
                 from battleground.c:17:
itemdb.h:240:24: warning: no newline at end of file
	CC	intif.c
In file included from pc.h:12,
                 from intif.c:14:
itemdb.h:240:24: warning: no newline at end of file
	CC	trade.c
In file included from trade.c:7:
itemdb.h:240:24: warning: no newline at end of file
	CC	party.c
In file included from pc.h:12,
                 from party.c:16:
itemdb.h:240:24: warning: no newline at end of file
	CC	vending.c
In file included from vending.c:8:
itemdb.h:240:24: warning: no newline at end of file
	CC	guild.c
In file included from pc.h:12,
                 from guild.c:19:
itemdb.h:240:24: warning: no newline at end of file
	CC	pet.c
In file included from pc.h:12,
                 from pet.c:14:
itemdb.h:240:24: warning: no newline at end of file
	CC	log.c
In file included from log.c:10:
itemdb.h:240:24: warning: no newline at end of file
	CC	mail.c
In file included from mail.c:9:
itemdb.h:240:24: warning: no newline at end of file
	CC	date.c
	CC	unit.c
In file included from pc.h:12,
                 from unit.c:14:
itemdb.h:240:24: warning: no newline at end of file
	CC	homunculus.c
In file included from homunculus.c:19:
itemdb.h:240:24: warning: no newline at end of file
	CC	mercenary.c
In file included from mercenary.c:19:
itemdb.h:240:24: warning: no newline at end of file
	CC	quest.c
In file included from pc.h:12,
                 from quest.c:14:
itemdb.h:240:24: warning: no newline at end of file
	CC	instance.c
In file included from pc.h:12,
                 from instance.c:19:
itemdb.h:240:24: warning: no newline at end of file
	CC	buyingstore.c
In file included from pc.h:12,
                 from buyingstore.c:14:
itemdb.h:240:24: warning: no newline at end of file
	CC	searchstore.c
In file included from pc.h:12,
                 from searchstore.c:10:
itemdb.h:240:24: warning: no newline at end of file
	CC	duel.c
In file included from pc.h:12,
                 from duel.c:10:
itemdb.h:240:24: warning: no newline at end of file
	CC	pc_groups.c
In file included from pc.h:12,
                 from pc_groups.c:14:
itemdb.h:240:24: warning: no newline at end of file
	CC	elemental.c
In file included from elemental.c:19:
itemdb.h:240:24: warning: no newline at end of file
	CC	cashshop.c
In file included from pc.h:12,
                 from cashshop.h:8,
                 from cashshop.c:9:
itemdb.h:240:24: warning: no newline at end of file
	CC	channel.c
In file included from pc.h:12,
                 from channel.h:7,
                 from channel.c:14:
itemdb.h:240:24: warning: no newline at end of file
	CC	mapreg_sql.c
	LD	map-server_sql
make[1]: Leaving directory `/root/Desktop/trunk/src/map'
building conf/import and conf/msg_conf/import folder...

bump

January 7, 2014

I have this error. Kindly help me with this one, thanks.
My old map.h (error below still shows up)

#define MAX_EVENTQUEUE 50

This is my latest map.h (error below still shows up)

 #define MAX_EVENTQUEUE 20

This is the error message:

[Warning]: npc_event_dequeue: event timer is full !
[Warning]: npc_event_dequeue: event timer is full !
[Warning]: npc_event_dequeue: event timer is full !

Sign In

Profiles

Forums

Downloads

Jobs Available

Server Database

Third-Party Services

Top Guides

Store

Crowdfunding

Posts posted by realRO