Jump to content

YuliChenz

Members
  • Posts

    40
  • Joined

  • Last visited

Posts posted by YuliChenz

  1. thank you Capuche, it works, now only 1 prob left..

    my exit npc doesnt disabled when the event started.. here is the script

    OnClock2127:
    	if(agitcheck() == 1) end;
    	.start = 1;
    	disablenpc "Exit#DS";
    	mapannounce "ordeal_3-1","Devil Square is now closed", bc_map;
    	getmapxy .@map$, .@x, .@y, 1;
    	mapwarp "ordeal_3-1", .@map$, .@x, .@y;
    	killmonsterall "ordeal_3-1";
    	announce "Devil Square is OPENED NOW!! 5 Minutes until it starts..!!", bc_all;
    	sleep 60000;
    
    Onboxdead:
    	.mob--;
    	announce "Devil Square : "+ strcharinfo(0) +" has opened the treasure box at Devil Square", bc_all;
    	if ( !.mob )
    		goto L_End;
    	end;
    
    L_End:
    	killmonsterall "ordeal_3-1";
    	enablenpc "Exit#DS";
    	deletearray .register_aid;
    	.start = .round = .mob = .register_num = 0;
    	end;
    
    ordeal_3-1,246,246,4	script	Exit#DS	51,{
    	mes "[Exit]";
    	mes "See ya";
    	next;
    	warp "SavePoint", 0,0 ;
    	removemapflag "ordeal_3-1",mf_noskill;
    	close;
    }
    

    please check

  2. please check this script, treasure chests not spawn after killing devil square bos.

    //   Made:By Kirlein (Tyirial Script Concept)  //
    // Devil Square based off the mmorpg Muonline  //
    // Have Fun and feel free to leave suggestions //
    //          Leave This intacted                //
    // +   Translated by Stillhard aka Dewa        //
    // +  Add times for 24 hours of play         //
    // +  Add a little bit infos for newbie users  //
    //      Completely rewrite by ~AnnieRuru~      //
    // +  Tested with rAthena 17101                //
    // http://rathena.org/board/topic/77632-devil-square/
    /////////////////////////////////////////////////
    
    ayothaya,170,153,5	script	Devil Square	100,{
    	mes "[Devil Square Guardian]";
    	mes "Welcome to the entrance door to ^FF0000Devil Square^000000";
    	mes "If you failed or die, the door will be closed and you have to wait until it start to open again";
    	next;
    	if ( select ( "Enter", "Info", "Cancel " ) == 3 ) {
    		mes "[Devil Square Guardian]";
    		mes "See ya";
    		close;
    	}
    	else if ( @menu == 2 ) { // Info
    		mes "[Devil Square Guardian]";
    		mes "There are 3 level monster you'll encounter";
    		mes "Each level the enemies will grow stronger";
    		mes "If you succeded to win all 3 level monster, you'll get the opportunity to open 10 Treasure Box with items, equips, and rare cards inside!!";
    		close;
    	}
    	else if ( .start != 1 ) { // time
    		mes "[Devil Square Guardian]";
    		mes "Devil Square is now closed";
    		mes "It'll be open again at:";
    		mes "00:00 , 02:00 , 04:00 , 06:00"; // display your time here
    		mes "08:00 , 10:00 , 12:00 , 14:00";
    		mes "16:00 , 18:00 , 20:00 , 22:00";
    		close;
    	}
    	else if ( baselevel < 70 || zeny < 500000 ) { // requirement
    		mes "[Devil Square Guardian]";
    		mes "Minimum base level to enter is 70";
    		mes "The registration fee is 500,000z";
    		close;
    	}
    	else if ( .register_num >= .register_limit ) { // room FULL
    		mes "[Devil Square Guardian]";
    		mes "I'm sorry but the Devil Square is FULL";
    		mes "Maximum users to enter is "+ .register_limit +" players";
    		close;
    	}
    	zeny = zeny - 500000;
    	announce strcharinfo(0)+" has entered the Devil Square", bc_npc;
    	percentheal 100,100;
    	warp "ordeal_3-1",184,184;
    	.register_aid[ .register_num ] = getcharid(3);
    	.register_num++;
    	end;
    
    OnInit:
    	.register_limit = 10; // maximum amount of players can play in this event
    	.ann_survive = 30000; // the rate at which announce the players that still survive in devil square, in mili-seconds
    	bindatcmd "devilsquare", strnpcinfo(0)+"::Onatcmd", 99,100;
    	end;
    
    Onatcmd:
    	if ( compare( .@atcmd_parameters$, "on" ) || compare( .@atcmd_parameters$, "start" ) ) {
    		if ( .start )
    			dispbottom "Devil Square Event already started.";
    		else
    			goto L_Start;
    	}
    	else if ( compare( .@atcmd_parameters$, "off" ) || compare( .@atcmd_parameters$, "end" ) ) {
    		if ( !.start )
    			dispbottom "Devil Square Event not yet start.";
    		else
    			goto L_End;
    	}
    	else if ( !.start ) {
    		dispbottom "Devil Square Event is currently not running.";
    		dispbottom "Use "+ .@atcmd_command$ +" on | start to start the event.";
    		dispbottom "Use "+ .@atcmd_command$ +" off | end to end this event";
    	}
    	else if ( .start == 1 )
    		dispbottom "Devil Square Event is currently accepting participations.";
    	else
    		dispbottom "Devil Square Event is currently running. Currently on Round "+ .round +" with "+ .mob +" mobs left.";
    	end;
    
    L_Start:
    OnClock0000: // yeah I know about OnMinute ... it just that more people knows better using OnClock
    OnClock0200:
    OnClock0400:
    OnClock0600:
    OnClock0800:
    OnClock1000:
    OnClock1200:
    OnClock1400:
    OnClock1600:
    OnClock1800:
    OnClock2000:
    OnClock2200:
    	if(agitcheck() == 1) end;
    	.start = 1;
    	disablenpc "Exit#DS";
    	mapannounce "ordeal_3-1","Devil Square is now closed", bc_map;
    	getmapxy .@map$, .@x, .@y, 1;
    	mapwarp "ordeal_3-1", .@map$, .@x, .@y;
    	killmonsterall "ordeal_3-1";
    	announce "Devil Square is OPENED NOW!! 5 Minutes until it starts..!!", bc_all;
    	sleep 60000;
    	announce "Devil Square will begin in 4 minutes..!!", bc_all;
    	sleep 60000;
    	announce "Devil Square will begin in 3 minutes..!!", bc_all;
    	sleep 60000;
    	announce "Devil Square will begin in 2 minutes..!!", bc_all;
    	sleep 60000;
    	announce "Devil Square will begin in 1 minutes..!!", bc_all;
    	sleep 60000;
    	announce "Devil Square is STARTED NOW !!", bc_all;
    	if ( !.register_num )
    		goto L_End;
    	.start = 2;
    	donpcevent strnpcinfo(0)+"::OnSurvive";
    	.round = 1;
    	.mob = 100;
    	areamonster "ordeal_3-1",183,180,248,249,"Devil Square Mob",1652,15,strnpcinfo(0)+"::Ondevildead";
    	areamonster "ordeal_3-1",183,180,248,249,"Devil Square Mob",1653,20,strnpcinfo(0)+"::Ondevildead";
    	areamonster "ordeal_3-1",183,180,248,249,"Devil Square Mob",1654,15,strnpcinfo(0)+"::Ondevildead";
    	areamonster "ordeal_3-1",183,180,248,249,"Devil Square Mob",1655,20,strnpcinfo(0)+"::Ondevildead";
    	areamonster "ordeal_3-1",183,180,248,249,"Devil Square Mob",1656,15,strnpcinfo(0)+"::Ondevildead";
    	areamonster "ordeal_3-1",183,180,248,249,"Devil Square Mob",1657,15,strnpcinfo(0)+"::Ondevildead";
    	end;
    
    Ondevildead:
    	.mob--;
    	if ( .mob == 25 || .mob == 5 )
    		announce "Devil Square : "+ .mob +" mobs to enter the 2nd round", bc_map;
    	else if ( !.mob ) {
    		announce "Devil Square will enter to 2nd round", bc_map;
    		sleep 5000;
    		goto Ondevil2;
    	}
    	end;
    
    Ondevil2:
    	.round = 2;
    	.mob = 75;
    	areamonster "ordeal_3-1",183,180,248,249,"Devil Square Mob",1634,15,strnpcinfo(0)+"::Ondevildead2";
    	areamonster "ordeal_3-1",183,180,248,249,"Devil Square Mob",1635,15,strnpcinfo(0)+"::Ondevildead2";
    	areamonster "ordeal_3-1",183,180,248,249,"Devil Square Mob",1636,10,strnpcinfo(0)+"::Ondevildead2";
    	areamonster "ordeal_3-1",183,180,248,249,"Devil Square Mob",1637,10,strnpcinfo(0)+"::Ondevildead2";
    	areamonster "ordeal_3-1",183,180,248,249,"Devil Square Mob",1638,15,strnpcinfo(0)+"::Ondevildead2";
    	areamonster "ordeal_3-1",183,180,248,249,"Devil Square Mob",1639,10,strnpcinfo(0)+"::Ondevildead2";
    	end;
    
    Ondevildead2:
    	.mob--;
    	if ( .mob == 25 || .mob == 5 )
    		announce "Devil Square : "+ .mob +" mobs left to enter the 3rd round", bc_map;
    	else if ( !.mob ) {
    		announce "Devil Square will enter to 3rd round", bc_map;
    		sleep 5000;
    		goto Ondevil3;
    	}
    	end;
    
    Ondevil3:
    	.round = 3;
    	.mob = 1;
    	areamonster "ordeal_3-1",183,180,248,249,"Devil Square Boss",1832,1,strnpcinfo(0)+"::Ondevildead3";
    	end;
    
    Ondevildead3:
    	.mob--;
    	if ( .mob == 25 || .mob == 5 )
    		announce "Devil Square : "+ .mob +" mobs left to VICTORY", bc_map;
    	else if ( !.mob ) {
    		setmapflag "ordeal_3-1",mf_noskill;
    		announce "Devil Square : CONGRATULATION - 10 Treasure Boxs will be yours now", bc_map;
    		sleep 2000;
    		announce "Devil Square : Treasure Box Spawn Has Been Delayed To Prevent Stealing", bc_map;
    		sleep 13000;
    		goto Ondevil4;
    	}
    	end;
    
    Ondevil4:
    	.round = 4;
    	.mob = 10;
    	monster "ordeal_3-1",231,250,"Treasure Box",2500,1,strnpcinfo(0)+"::Onboxdead";
    	monster "ordeal_3-1",234,247,"Treasure Box",2500,1,strnpcinfo(0)+"::Onboxdead";
    	monster "ordeal_3-1",237,244,"Treasure Box",2500,1,strnpcinfo(0)+"::Onboxdead";
    	monster "ordeal_3-1",240,241,"Treasure Box",2500,1,strnpcinfo(0)+"::Onboxdead";
    	monster "ordeal_3-1",243,238,"Treasure Box",2500,1,strnpcinfo(0)+"::Onboxdead";
    	monster "ordeal_3-1",246,235,"Treasure Box",2500,1,strnpcinfo(0)+"::Onboxdead";
    	monster "ordeal_3-1",249,232,"Treasure Box",2500,1,strnpcinfo(0)+"::Onboxdead";
    	monster "ordeal_3-1",252,229,"Treasure Box",2500,1,strnpcinfo(0)+"::Onboxdead";
    	monster "ordeal_3-1",249,241,"Treasure Box",2500,1,strnpcinfo(0)+"::Onboxdead";
    	monster "ordeal_3-1",240,249,"Treasure Box",2500,1,strnpcinfo(0)+"::Onboxdead";
    	end;
    
    Onboxdead:
    	.mob--;
    	announce "Devil Square : "+ strcharinfo(0) +" has opened the treasure box at Devil Square", bc_all;
    	if ( !.mob )
    		goto L_End;
    	end;
    
    L_End:
    	killmonsterall "ordeal_3-1";
    	enablenpc "Exit#DS";
    	deletearray .register_aid;
    	.start = .round = .mob = .register_num = 0;
    	end;
    
    OnPCDieEvent:
    OnPCLogoutEvent:
    	if ( .start && strcharinfo(3) == "ordeal_3-1" ) {
    		while ( .register_aid[.@i] != getcharid(3) && .@i < .register_num ) .@i++;
    		deletearray .register_aid[.@i], 1;
    		.register_num--;
    		if ( !.register_num ) {
    			announce "All players failed to survive at Devil Square", bc_all;
    			killmonsterall "ordeal_3-1";
    			goto L_End;
    		}
    	}
    	end;
    
    OnSurvive:
    	while ( .start == 2 ) {
    		mapannounce "ordeal_3-1", .register_num +" players is still survive at Devil Square", bc_map;
    		sleep .ann_survive;
    	}
    	end;
    }
    
    ordeal_3-1,246,246,4	script	Exit#DS	51,{
    	mes "[Exit]";
    	mes "See ya";
    	next;
    	warp "SavePoint", 0,0 ;
    	removemapflag "ordeal_3-1",mf_noskill;
    	close;
    }
    
    ordeal_3-1	mapflag	nowarp
    ordeal_3-1	mapflag	nowarpto
    ordeal_3-1	mapflag	noteleport
    ordeal_3-1	mapflag	nosave	SavePoint
    ordeal_3-1	mapflag	nomemo
    ordeal_3-1	mapflag	nobranch
    ordeal_3-1	mapflag	nopenalty
    ordeal_3-1	mapflag	noicewall
    ordeal_3-1	mapflag nocommand	80
    

     

  3. i also got problem after updating my svn, all skill description became alien language -_-"

    my SVN now version 16864

    post-10100-0-87711000-1364703677_thumb.jpg

     

    my current SVN doesnt has reign of mount (id 12622) on item_db.txt

    help pls

     

    also sprite doesnt show up

    post-10100-0-16548700-1364704210_thumb.jpg

     

     

    all things messed... PLEASE HELPPPPPPP

  4. i got this script from my friend, i installed it, pvp warper works but pvp ladder still empty.

    my friend said that might be because there is no table on my sql yet, he doesnt know how to add it -_-"

    here is the script

    ayothaya,140,162,5	script	PvP Warper	730,{
    	mes "[PvP Warper]";
    	mes "Would you like to enter the PvP Arena?";
    	menu "Yes",-,"No",L_no;
    	next;
    	warp "pvp_y_2-2",0,0;
    	close;
     
    
    L_no:
    close;
    }
    
    -	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, 1; // announce to : 0 - global, 1 - map
    	set .announcemap, 1; // announce the map name in the announcement ? : 0 - off, 1 - on
    
    	set .announcekill, 0; // 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, 1; // 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 .firstblood, 1;
    	set .doublekill, 2;
    	set .triplekill, 3;
    	set .killingspree, 5;
    	set .dominating, 10;
    	set .megakill, 15;
    	set .unstoppable, 20;
    	set .wickedsick, 25;
    	set .monsterkill, 30;
    	set .godlike, 40;
    	set .holyshit, 50;
    	set .continue, 5; // after beyond-godlike, every <this number> kills will make announcement again
    
    	set .owned, 15; // how many times the party/guild has to kill to announce ownage
    	set .owncontinue, 15; // after ownage, every <this number> party/guild cumulative kills will make ownage announce again
    
    	set .min_gm_menu, 90; // 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, 10; // 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, 15; // mininum ownage count allow to show in longest ownage ladder. Default 5 means must at least have 5 ownage counts to display in ladder
    
    //	*NEW* 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, 55;
    
    	// 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;
    
    	// The maps to activate the dota pvp ladder
    	// at default this is set to "all" meaning all maps will be used.
    	// If you want specific maps only then put the map names separated with coma.
    	// Ex. setarray .mapallow$[0],"prontera","prt_fild01","payon";
    	setarray .mapallow$[0],"pvp_y_8-2","ars_dun06","ars_dun09";
    
    	// if .mapdeny$[0] is set to "all" this settings block this
        	// script in all maps specify in this array
        	// Ex. setarray .mapdeny$[0],"prontera","prt_fild01","payon";
        	setarray .mapdeny$[0],"guild_vs3";
    
    
    // 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;
    	end;
    
    //	script start
    OnPCKillEvent:
    	if ( getgmlevel() >= .gmnokill ) end;
    	getmapxy .@map$,.@x,.@y,0;
    	for( set .@i,0; .@i < getarraysize(.mapallow$); set .@i,.@i + 1 )
        		{
            		if( .mapallow$[.@i] == "all" ) {
                			for ( set .@j,0; .@j < getarraysize(.mapdeny$); set .@j, .@j+1 )
                    			if ( .@map$ == .mapdeny$[.@j] )
                       				 end;
                			goto L_ok;
            		}		
            		if( .@map$ == .mapallow$[.@i] ) goto L_ok;
        	}
    
    L_ok:
    	if ( !attachrid(killedrid) ) end;
    		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";
    		else if ( @PlayersKilledStreak >= .triplekill )
    			set .@streakname$,"Triple Kill";
    		else if ( @PlayersKilledStreak >= .doublekill )
    			set .@streakname$,"Double Kill";
    		else if ( @PlayersKilledStreak >= .firstblood )
    			set .@streakname$,"First Blood";
    	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 )
    		announce rid2name(killerrid) +" has pawned "+ strcharinfo(0) +"'s head "+( (.announcemap)?("at "+ .@map$):""),16|.announce;
    	set @PlayersKilledStreak,0;
    	if ( query_sql("select char_id from pvpladder where char_id = "+ getcharid(0), .@d_cid ) )
    		query_sql "update pvpladder set deaths = deaths + 1 where char_id = "+ getcharid(0);
    	set @dota_multikills,0;
    	if ( getcharid(2) ) {
    		if ( query_sql("select guild_id from ownladder where guild_id = "+ getcharid(2), .@d_gid ) )
    			query_sql "update ownladder set currentown = 0 where guild_id = "+ getcharid(2);
    		set .@killedgroup, getcharid(2);
    	}
    	if ( killerrid == getcharid(3) || baselevel < .lvltokill ) end;
    	if ( .minlvlrange ) set .@killedlvl, baselevel;
    	if ( !attachrid(killerrid) ) end;
    	if ( .minlvlrange && .@killedlvl + .minlvlrange < baselevel ) end;
    	if ( .counttopunish ) {
    		for ( set .@i,0; .@i < 60; set .@i, .@i +1 ) {
    			if ( .@i == gettime(2) ) continue;
    			deletearray getd("@sitkillid"+ .@i), 128;
    			deletearray getd("@sitkilltimes"+ .@i), 128;
    		}
    		for ( set .@i,0; .@i < getarraysize( getd("@sitkillid"+ gettime(2)) ); set .@i, .@i +1 ) {
    			if ( getd("@sitkillid"+ gettime(2) +"["+ .@i +"]") != killedrid ) 
    				continue;
    			else {
    				set .@sitkillfound, 1;
    				setd "@sitkilltimes"+ gettime(2) +"["+ .@i +"]", getd("@sitkilltimes"+ gettime(2) +"["+ .@i +"]") +1 ;
    				if ( getd("@sitkilltimes"+ gettime(2) +"["+ .@i +"]") >= .counttopunish ) {
    					warp "SavePoint",0,0;
    					announce strcharinfo(0) +" , Stop killing "+ rid2name(killedrid) + " !!!",0;
    					debugmes strcharinfo(0) +" is sit-killing "+ rid2name(killedrid) +" for "+ getd("@sitkilltimes"+ gettime(2) +"["+ .@i +"]") + " times";
    					logmes "is sit-killing "+ rid2name(killedrid) +" for "+ getd("@sitkilltimes"+ gettime(2) +"["+ .@i +"]") +" times";
    					query_sql "update pvpladder set kills = kills - "+ ( .counttopunish -1 ) +" where char_id = "+ getcharid(0);
    					query_sql "select streaks from pvpladder where char_id = "+ getcharid(0), .@streak;
    					if ( @PlayersKilledStreak == .@streak )
    						query_sql "update pvpladder set streaks = "+( @PlayersKilledStreak +1 - .counttopunish )+" where char_id = "+  getcharid(0);
    					set @PlayersKilledStreak, @PlayersKilledStreak +1 - .counttopunish;
    					if ( getcharid(2) ) {
    						query_sql "select currentown, highestown from ownladder where guild_id = "+ getcharid(2), .@currentown, .@highestown;
    						query_sql "update ownladder set currentown = currentown - "+ ( .counttopunish -1 ) +" where guild_id = "+ getcharid(2);
    						if ( .@currentown == .@highestown )
    							query_sql "update ownladder set highestown = currentown where guild_id = "+ getcharid(2);
    					}
    					end;
    				}
    			}
    		}
    		if ( !.@sitkillfound ) {
    			setd "@sitkillid"+ gettime(2) +"["+ .@i +"]", killedrid;
    			setd "@sitkilltimes"+ gettime(2) +"["+ .@i +"]", 1;
    		}
    	}
    	set @PlayersKilledStreak, @PlayersKilledStreak + 1;
    	if ( query_sql("select streaks from pvpladder where char_id = "+ getcharid(0), .@streaks) )
    		query_sql "update pvpladder set kills = kills + 1 where char_id = "+ getcharid(0);
    	else
    		query_sql "insert into pvpladder ( char_id, name, kills , streaktime ) values ( "+ getcharid(0) +", '"+ escape_sql( strcharinfo(0) ) +"', 1, now() )";
    	if ( @PlayersKilledStreak > .@streaks ) {
    		query_sql "update pvpladder set streaks = "+ @PlayersKilledStreak +" where char_id = "+  getcharid(0);
    		query_sql "update pvpladder set streaktime = now() where char_id = "+ getcharid(0);
    	}
    	if ( @PlayersKilledStreak == .killingspree )
    		setarray .@streakname$,"killingspree.wav","is on a KILLING SPREE",".";
    	else if ( @PlayersKilledStreak == .firstblood )
    		setarray .@streakname$,"First Blood.wav","just got a FIRST BLOOD!",".";
    	else if ( @PlayersKilledStreak == .doublekill )
    		setarray .@streakname$,"doublekill.wav","just got a DOUBLE KILL!",".";
    	else if ( @PlayersKilledStreak == .triplekill )
    		setarray .@streakname$,"triplekill.wav","just got a TRIPLE KILL!",".";
    	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!",". Will someone ever stop "+( (sex)?"him":"her" ) +"?";
    	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 11500,"DOTAPVP::OnStreakReset";
    	if ( getcharid(2) ) {
    		set .@sideid, getcharid(2);
    		if ( .@sideid != .@killedgroup ) {
    			if ( query_sql("select currentown, highestown from ownladder where guild_id = "+ getcharid(2), .@currentown, .@highestown) ) {
    				set .@currentown, .@currentown + 1;
    				query_sql "update ownladder set currentown = "+ .@currentown +" where guild_id = "+ getcharid(2);
    				if ( .@currentown > .@highestown ) {
    					query_sql "update ownladder set highestown = "+ .@currentown +" where guild_id = "+  getcharid(2);
    					query_sql "update ownladder set owntime = now() where guild_id = "+ getcharid(2);
    				}
    			} else
    				query_sql "insert into ownladder ( guild_id, name, currentown, highestown ) values ( "+ getcharid(2) +", '"+ escape_sql( strcharinfo(2) ) +"', 1 , 1 )";
    		}
    	}
    	set .@dota_multikills, @dota_multikills;
    	set .@origin, getcharid(3);
    	sleep 1500;
    	if ( .@sideid && .@sideid != .@killedgroup && .@currentown >= .owned && ( ( .@currentown - .owned ) % .owncontinue == 0 ) ) {
    		if ( .announce ) mapannounce .@map$, "The guild ["+ getguildname(.@sideid) +"] is OWNING["+ .@currentown +"] !!!",16;
    		else announce "The guild ["+ getguildname(.@sideid) +"] is OWNING["+ .@currentown +"] !!!",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;
    	}
    	end;
    OnWhisperGlobal:
    	dispbottom "Your current Streak : "+ @PlayersKilledStreak;
    	if ( query_sql("select kills from pvpladder where char_id = "+ getcharid(0), .@kills) )
    		dispbottom "Your total Kills          : "+ .@kills;
    	else
    		dispbottom "You are not in the pvp ladder yet";
    	if ( !getcharid(2) ) end;
    	if ( query_sql("select currentown from ownladder where guild_id = "+ getcharid(2), .@currentown) )
    		dispbottom "Your guild Own        : "+ .@currentown;
    	else
    		dispbottom "Your guild is not in the ladder yet.";
    	end;
    OnStreakReset:
    	set @dota_multikills,0;
    	end;
    }
    
    ayothaya,140,159,5	script	PvP Ranking::PvP Ladder	721,{
    	//waitingroom "PvP Top 20",0;
    	set .@npcname$, "PvP-StatsViewer";
    	do {
    		deletearray .@name$, 128;
    		deletearray .@kills, 128;
    		deletearray .@deaths, 128;
    		deletearray .@streak, 128;
    		deletearray .@owned, 128;
    		deletearray .@time$, 128;
    		set .@gid, 0;
    		set .@cid, 0;
    		set .@currentown, 0;
    		mes "["+ .@npcname$ +"]";
    		mes "Hello "+ strcharinfo(0) +"...";
    		mes "If you want to I can show you your PVP stats.";
    		if ( getgmlevel() >= getvariableofnpc(.min_gm_menu,"DOTAPVP") ) mes "And GM option for you.";
    		next;
    		if ( getgmlevel() >= getvariableofnpc(.min_gm_menu,"DOTAPVP") )
    			select "Most Kills","Highest Streak","Longest Ownage","Own Information","Explanation","Reset Table","Modify a ladder value";
    		else
    			select "Most Kills","Highest Streak","Longest Ownage","Own Information","Explanation";
    		switch (@menu) {
    			case 1:
    				query_sql "select name, kills, deaths from pvpladder order by kills desc limit "+ getvariableofnpc(.showtotal,"DOTAPVP"), .@name$, .@kills, .@deaths;
    				if ( !getarraysize(.@name$) ) {
    					mes "["+ .@npcname$ +"]";
    					mes "The ladder currently is empty";
    					next;
    				}
    				for ( set .@j,0; .@j < getarraysize(.@name$); set .@j, .@j + getvariableofnpc(.showpage,"DOTAPVP") ) {
    					mes "["+ .@npcname$ +"]";
    					for ( set .@i, .@j; .@i < (getvariableofnpc(.showpage,"DOTAPVP") + .@j) && .@i < getarraysize(.@name$); set .@i, .@i + 1 ) {
    						mes "^996600"+ (.@i+1) +": ^006699"+ .@name$[.@i] +" ^00AA00["+ .@kills[.@i] +"] ^FF0000<"+ .@deaths[.@i] +">^000000";
    					}
    					next;
    				}
    				break;
    			case 2:
    				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 ( !getarraysize(.@name$) ) {
    					mes "["+ .@npcname$ +"]";
    					mes "The ladder currently is empty";
    					next;
    				}
    				for ( set .@j,0; .@j < getarraysize(.@name$); set .@j, .@j + getvariableofnpc(.showpage,"DOTAPVP") ) {
    					mes "["+ .@npcname$ +"]";
    					for ( set .@i, .@j; .@i < (getvariableofnpc(.showpage,"DOTAPVP") + .@j) && .@i < getarraysize(.@name$); set .@i, .@i + 1 ) {
    						mes "^996600"+ (.@i+1) +": ^006699"+ .@name$[.@i] +" ^70AC11{"+ .@streak[.@i] +"} ^000000on :";
    						mes "    ^EE8800"+ .@time$[.@i] +"^000000";
    					}
    					next;
    				}
    				break;
    			case 3:
    				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 ( !getarraysize(.@name$) ) {
    					mes "["+ .@npcname$ +"]";
    					mes "The ladder currently is empty";
    					next;
    				}
    				for ( set .@j,0; .@j < getarraysize(.@name$); set .@j, .@j + getvariableofnpc(.showpage,"DOTAPVP") ) {
    					mes "["+ .@npcname$ +"]";
    					for ( set .@i, .@j; .@i < (getvariableofnpc(.showpage,"DOTAPVP") + .@j) && .@i < getarraysize(.@name$); set .@i, .@i + 1 ) {
    						mes "^996600"+ (.@i+1) +": ^006699"+ .@name$[.@i] +" ^00AAAA("+ .@owned[.@i] +") ^000000on :";
    						mes "    ^EE8800"+ .@time$[.@i] +"^000000";
    					}
    					next;
    				}
    				break;
    			case 4:
    				query_sql "select char_id, streaks, kills, deaths, date_format(streaktime,'%a %e/%c/%y %r') from pvpladder where char_id = "+ getcharid(0), .@cid, .@streak, .@kills, .@deaths, .@time$;
    				mes "["+ .@npcname$ +"]";
    				if ( !.@cid && !@PlayersKilledStreak )
    					mes "You not yet kill any player";
    				else {
    					mes "Your Current Streak : ^70AC11{"+ @PlayersKilledStreak +"}^000000";
    					mes "Your Total Kills : ^00AA00["+ .@kills +"]^000000";
    					mes "Your Death Counts : ^FF0000<"+ .@deaths +">^000000";
    					mes "Highest Streak was ^70AC11{"+ .@streak +"}^000000 on :";
    					mes "    ^EE8800"+ .@time$ +"^000000";
    					set .@streak, 0;
    					set .@kills, 0;
    					set .@deaths, 0;
    					set .@time$, "";
    				}
    				next;
    				if ( getcharid(2) ) {
    					mes "["+ .@npcname$ +"]";
    					query_sql "select guild_id, currentown, highestown, date_format(owntime,'%a %e/%c/%y %r') from ownladder where guild_id = "+ getcharid(2), .@gid, .@currentown, .@owned, .@time$;
    					if ( !.@gid )
    						mes "Your guild not yet kill any player";
    					else {
    						mes "Your guild name : ^006699"+ strcharinfo(2) +"^000000";
    						mes "Current Owning  : ^00AAAA("+ .@currentown +")^000000";
    						mes "Longest Ownage was ^00AAAA("+ .@owned + ")^000000 on :";
    						mes "    ^EE8800"+ .@time$ +"^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;
    			case 6:
    				if ( getgmlevel() < getvariableofnpc(.min_gm_menu,"DOTAPVP") ) break;
    				mes "["+ .@npcname$ +"]";
    				mes "Which table you want to reset ?";
    				next;
    				switch( select("Both","PVP ladder","Ownage ladder","Nope") ) {
    					case 1:
    						mes "["+ .@npcname$ +"]";
    						mes "Are you sure you want to reset both ladder ?";
    						next;
    						if ( select("Nope:Yup") == 1 ) break;
    						query_sql "delete from pvpladder";
    						query_sql "delete from ownladder";
    						mes "["+ .@npcname$ +"]";
    						mes "Both ladder are reset";
    						next;
    						break;
    					case 2:
    					case 3:
    						set .@menu, @menu;
    						mes "["+ .@npcname$ +"]";
    						mes "Are you sure you want to reset "+( (.@menu ==2)?"PVP":"Ownage" )+" ladder ?";
    						next;
    						if ( select("Nope:Yup") == 1 ) break;
    						query_sql "delete from "+( (.@menu ==2)?"pvp":"own" )+"ladder";
    						mes "["+ .@npcname$ +"]";
    						mes "The ladder is reset";
    						next;
    						break;
    					default:
    				}
    				break;
    			case 7:
    				if ( getgmlevel() < getvariableofnpc(.min_gm_menu,"DOTAPVP") ) break;
    				mes "["+ .@npcname$ +"]";
    				mes "select which table you want to modify";
    				next;
    				switch( select ("PVP ladder","Ownage ladder","Back") ) {
    					if ( @menu == 3 ) break;
    					mes "["+ .@npcname$ +"]";
    					mes "select input type";
    					next;
    					case 1:
    						if ( select("Char ID","Char Name","Account ID") != 3) {
    							if ( @menu == 1 )
    								input .@id;
    							else
    								input .@id$;
    							mes "["+ .@npcname$ +"]";
    							query_sql "select char_id from `char` where "+( (@menu ==1)?("char_id = "+ .@id):("name = '"+ escape_sql(.@id$) +"'") ), .@cid;
    							if ( !.@cid ) {
    								mes "There is no such character "+( (@menu == 1)?"ID":"name");
    								next;
    								break;
    							} else
    								set .@cid, 0;
    							query_sql "select char_id, name, streaks, kills, deaths, date_format(streaktime,'%a %e/%c/%y %r') from pvpladder where "+( (@menu ==1)?("char_id = "+ .@id):("name = '"+ escape_sql(.@id$) +"'") ), .@cid, .@name$, .@streak, .@kills, .@deaths, .@time$;
    							if ( !.@cid ) {
    								mes "This player is not in the ladder";
    								next;
    								break;
    							}
    						} else {
    							input .@id;
    							query_sql "select char_id, name, char_num from `char` where account_id = "+ .@id +" order by char_num asc", .@cid, .@name$, .@gid;
    							if ( !.@cid ) {
    								mes "There is no such Account ID";
    								next;
    								break;
    							}
    							mes "["+ .@npcname$ +"]";
    							for ( set .@i,0; .@i < getarraysize(.@cid); set .@i, .@i + 1 )
    								mes (.@gid[.@i] +1) +". "+ .@cid[.@i] +" "+ .@name$[.@i];
    							set .@menu$, (.@gid[.@i] +1) +". "+ .@cid;
    							for ( set .@i,1; .@i < getarraysize(.@cid); set .@i, .@i + 1 )
    								set .@menu$, .@menu$ +":"+ .@gid[.@i] +". "+ .@cid[.@i];
    							next;
    							select .@menu$;
    							mes "["+ .@npcname$ +"]";
    							set .@id, .@cid[@menu-1];
    							deletearray .@cid, 9;
    							query_sql "select char_id, name, streaks, kills, deaths, date_format(streaktime,'%a %e/%c/%y %r') from pvpladder where char_id = "+ .@id, .@cid, .@name$, .@streak, .@kills, .@deaths, .@time$;
    							if ( !.@cid ) {
    								mes "This player is not in the ladder";
    								next;
    								break;
    							}
    						}
    						mes "Char ID : ^006699"+ .@cid +"^000000";
    						mes "Char Name : ^006699"+ .@name$ +"^000000";
    						mes "Total Kills : ^00AA00["+ .@kills +"]^000000";
    						mes "Deaths Counts : ^FF0000<"+ .@deaths +">^000000";
    						mes "Highest Streak was ^70AC11{"+ .@streak +"}^000000 on :";
    						mes "    ^EE8800"+ .@time$ +"^000000";
    						next;
    						switch( select("Total Kills","Death Counts","Highest Streak & Highest Streak Time","Name") ) {
    							case 1:
    								setarray .@time$,"Total Kills",".@kills","kills","";
    								break;
    							case 2:
    								setarray .@time$,"Death Counts",".@deaths","deaths","";
    								break;
    							case 3:
    								setarray .@time$,"Highest Streak",".@streak","streaks","1";
    							default:
    						}
    						if ( @menu < 4 ) {
    							input .@num;
    							mes "["+ .@npcname$ +"]";
    							mes "Really change "+ .@name$ +"'s";
    							mes .@time$[0] +" from "+ getd(.@time$[1]) +" to "+ .@num +" ?";
    							if ( .@num >= getd(.@time$[1]) && .@time$[3] == "1" ) mes "and set Highest Streak Time to current time?";
    							next;
    							if ( select("Nope:Yup") == 1 ) break;
    							mes "["+ .@npcname$ +"]";
    							query_sql "update pvpladder set "+ .@time$[2] +" = "+ .@num +" where char_id = "+ .@cid;
    							if ( .@num >= getd(.@time$[1]) && .@time$[3] == "1" ) query_sql "update pvpladder set streaktime = now()";
    							mes "The "+ .@time$[0] +" for";
    							mes .@name$ +" has set to "+ .@num;
    							if ( .@num >= getd(.@time$[1]) && .@time$[3] == "1" ) mes "and the Highest Streak Time set to current time";
    							next;
    							break;
    						} else {
    							mes "["+ .@npcname$ +"]";
    							mes "Refreshing name of this char :";
    							mes .@name$ +" ......";
    							mes " ";
    							query_sql "select `char`.name, pvpladder.name from `char` right join pvpladder on `char`.char_id = pvpladder.char_id where `char`.char_id = "+ .@cid, .@cid1$, .@cid2$;
    							if ( .@cid1$ == "" )
    								mes "The character has deleted, so can't be change anymore";
    							else if ( .@cid1$ == .@cid2$ )
    								mes "The name is still the same, so don't need to change";
    							else {
    								query_sql "update pvpladder set name = '"+ escape_sql(.@cid1$) +"' where char_id = "+ .@cid;
    								mes "Now it called : "+ .@cid1$;
    							}
    							set .@cid1$, "";
    							set .@cid2$, "";
    							next;
    						}
    						break;
    					case 2:
    						select "Guild ID","Guild Name";
    						if ( @menu == 1 )
    							input .@id;
    						else
    							input .@id$;
    						mes "["+ .@npcname$ +"]";
    						query_sql "select guild_id from guild where "+( (@menu ==1)?("guild_id = "+ .@id):("name = '"+ escape_sql(.@id$) +"'") ), .@gid;
    						if ( !.@gid ) {
    							mes "There is no such guild";
    							next;
    							break;
    						} else
    							set .@gid, 0;
    						query_sql "select guild_id, name, currentown, highestown, date_format(owntime,'%a %e/%c/%y %r') from ownladder where "+( (@menu ==1)?("guild_id = "+ .@id):("name = '"+ escape_sql(.@id$) +"'") ), .@gid, .@name$, .@currentown, .@owned, .@time$;
    						if ( !.@gid ) {
    							mes "This guild is not in the ladder";
    							next;
    							break;
    						}
    						mes "Guild ID : ^006699"+ .@gid +"^000000";
    						mes "Guild name : ^006699"+ .@name$ +"^000000";
    						mes "Current Owning : ^00AAAA("+ .@currentown +")^000000";
    						mes "Longest Ownage was ^00AAAA("+ .@owned +")^000000 on :";
    						mes "    ^EE8800"+ .@time$ +"^000000";
    						next;
    						switch( select("Current Owning","Longest Ownage & Longest Ownage Time","Name") ) {
    							case 1:
    								setarray .@time$,"Current Owning",".@currentown","currentown","";
    								break;
    							case 2:
    								setarray .@time$,"Highest Ownage",".@owned","highestown","1";
    							default:
    						}
    						if ( @menu < 3 ) {
    							input .@num;
    							mes "["+ .@npcname$ +"]";
    							mes "Really change "+ .@name$ +"'s";
    							mes .@time$[0] +" from "+ getd(.@time$[1]) +" to "+ .@num +" ?";
    							if ( .@num >= getd(.@time$[1]) && .@time$[3] == "1" ) mes "and set Longest Ownage Time to current time?";
    							next;
    							if ( select("Nope:Yup") == 1 ) break;
    							mes "["+ .@npcname$ +"]";
    							query_sql "update ownladder set "+ .@time$[2] +" = "+ .@num +" where guild_id = "+ .@gid;
    							if ( .@num >= getd(.@time$[1]) && .@time$[3] == "1" ) query_sql "update ownladder set owntime = now()";
    							mes "The "+ .@time$[0] +" for";
    							mes .@name$ +" guild has set to "+ .@num;
    							if ( .@num >= getd(.@time$[1]) && .@time$[3] == "1" ) mes "and the Longest Ownage Time set to current time";
    							next;
    							break;
    						} else {
    							mes "["+ .@npcname$ +"]";
    							mes "Refreshing name of this guild :";
    							mes .@name$ +" ......";
    							mes " ";
    							query_sql "select guild.name, ownladder.name from guild right join ownladder on guild.guild_id = ownladder.guild_id where guild.guild_id = "+ .@gid, .@gid1$, .@gid2$;
    							if ( .@gid1$ == "" )
    								mes "The guild has deleted, so can't be change anymore";
    							else if ( .@gid1$ == .@gid2$ )
    								mes "The name is still the same, so don't need to change";
    							else {
    								query_sql "update ownladder set name = '"+ escape_sql(.@gid1$) +"' where guild_id = "+ .@gid;
    								mes "Now it called : "+ .@gid1$;
    							}
    							set .@gid1$, "";
    							set .@gid2$, "";
    							next;
    						}
    					default:
    				}
    			default:
    		}
    	} while (1);
    }
    

    please guide me how to make query on my sql. thank you

  5. i decided to use this script, but somehow the npc timer doesnt works. i can still in room when the time is over

    please check it

    ayothaya,165,162,3	script	Dead Branch Room	100,{
    setarray $@maps$[1], "pvp_y_1-4", "06guild_01", "06guild_02", "06guild_03", "06guild_04", "06guild_05";
    setarray .@price[1], 0, 1000000, 1000000, 1000000, 1000000, 1000000;
    for(set .@b,1; .@b < getarraysize($@maps$); set .@b,.@b + 1) {
    	if(.@b==1){ set .@menu$, .@menu$  + "Public- "+((getmapusers($@maps$[.@b])>=30)?"^CD0000Closed^000000("+getmapusers($@maps$[.@b])+")":"^007700Open^000000("+getmapusers($@maps$[.@b])+") [z"+.@price[.@b]+"]")+":"; } else { set .@menu$, .@menu$  + "Private["+(.@b-1)+"]- "+((getmapusers(""+$@maps$[.@b]+"")>=5)?"^CD0000Closed^000000("+getmapusers($@maps$[.@b])+")":"^007700Open^000000("+getmapusers($@maps$[.@b])+") [z"+.@price[.@b]+"]")+":"; }
    }
    if(select(.@menu$)) { callfunc "GRfunction",$@maps$[@menu],@menu,.@price[@menu]; }
    }
    
    function	script	GRfunction	{
    if(Zeny<getarg(2)){mes "I'm sorry but you don't have enough Zeny, please come back later."; close;}
    if(getmapusers(getarg(0))<=30&&getarg(1)==1){
    	warp getarg(0),0,0; end;
    }
    if(!getmapusers(getarg(0))){
    	mes "Input a new password.";
    	input($password$[getarg(1)]);
    	set Zeny,Zeny-getarg(2);
    	set $@maps$,getarg(0);
    	next; setnpctimer 0; attachnpctimer(strcharinfo(0)); startnpctimer; warp getarg(0),0,0;
    	end;
    }
    if(getmapusers(getarg(0))<=5&&getarg(1)!=1) {
    	mes "This room is password protected please input the password now.";
    	input(@name$);
    	if(@name$==$password$[getarg(1)]){
    		set Zeny,Zeny-getarg(2);
    		set $@maps$,getarg(0);
    		mes "correct!"; next; setnpctimer 0; attachnpctimer(strcharinfo(0)); startnpctimer; warp getarg(0),0,0; end;
    	} else {
    		mes "Incorrect!";
    		close;
    	}
    } else {
    	mes "I'm sorry this room is full.";
    	close;
    }
    
    OnTimer60000:
    if(strcharinfo(3)==$@maps$){
    	warp "ayothaya",151,166;
    	end;
    }
    }
    
    pvp_y_1-4	mapflag	nowarpto
    06guild_01	mapflag	nowarpto
    06guild_02	mapflag	nowarpto
    06guild_03	mapflag	nowarpto
    06guild_04	mapflag	nowarpto
    06guild_05	mapflag	nowarpto
    pvp_y_1-4	mapflag	nosave
    06guild_01	mapflag	nosave
    06guild_02	mapflag	nosave
    06guild_03	mapflag	nosave
    06guild_04	mapflag	nosave
    06guild_05	mapflag	nosave
    pvp_y_1-4	mapflag	pvp	off
    06guild_01	mapflag	pvp	off
    06guild_02	mapflag	pvp	off
    06guild_03	mapflag	pvp	off
    06guild_04	mapflag	pvp	off
    06guild_05	mapflag	pvp	off
    

    and could anyone please make it kill all monster if room is idle for 5 minutes? also when the time is over

  6. At first you want it to run on random time --> "But can you make it active on random time? So player dont know when the double rates will activated"

    But now you want it to run once a day?

    Oh sorry, maybe my first statement is blur.

    What i mean by random time is any hour in a day. But if only make it random, there is a chance the script will be triggered again right after the event is ended, or few hours after.

    So, i asked for a possibility to make it triggered once a day at random hour.

  7. based on script from nanakiwurtz, i made some modification on that script, please check if the script is right and possibly can work properly.

     

    here is the script

     

    -    script    FloatingRates    -1,{
    OnInit:
    set $floatingrate, rand(0,23);
    set $defaultbrate,5000;//my server rate is 5000
    set $defaultjrate,5000;//my server rate is 5000
    set $defaultdrate,10000;//my server common item drop rate is 10000
    set $defaultccdrate,100000;//my server common card drop rate is 100000
    set $defaultcbdrate,30000;//my server card boss rate is 30000
    end;
     
    OnMinute00:
    if (gettime(3)!=$floatingrate) end;
    set $floatingrate, rand(0,23);
    set $@brate,rand(7500,10000);//i want it raise by 50% - 100% from default
    set $@jrate,rand(7500,10000);//i want it raise by 50% - 100% from default
    set $@drate,rand(15000,20000);//i want it raise by 50% - 100% from default
    set $@ccdrate,rand(150000,200000);//i want it raise by 50% - 100% from default
    set $@cbdrate,rand(37500,45000);//i want it raise by 25% - 50% from default
    //Base exp
    setbattleflag("base_exp_rate",$@brate);
    //Job exp
    setbattleflag("job_exp_rate",$@jrate);
    //Drops
    setbattleflag("item_rate_common",$@drate);
    setbattleflag("item_rate_heal",$@drate);
    setbattleflag("item_rate_use",$@drate);
    setbattleflag("item_rate_equip",$@drate);
    setbattleflag("item_rate_card",$@ccdrate);
    setbattleflag("item_rate_card_boss",$@cbdrate);
    announce "ADMINS PROUDLY PRESENTS!",bc_all;
    sleep 3000;
    announce "Super Rates Event Time!!!",bc_all;
    sleep 3000;
    announce "LOOK! THE RATES CHANGED!: Base:"+($@brate/100)+"x Job:"+($@jrate/100)+"x Drop:"+($@drate/100)+"x",bc_all;
    sleep 3000;
    announce "Run!'cause this will last 1 hour only!!!",bc_all;
    initnpctimer;
    set .Event,1;
    atcommand "@reloadmobdb";
    
    end;
    }
    
    OnTimer3600000: // After 1 hour
    set .Event,0;
    setbattleflag "base_exp_rate",$defaultbrate;
    setbattleflag "job_exp_rate",$defaultjrate;
    setbattleflag("item_rate_common",$defaultdrate);
    setbattleflag("item_rate_heal",$defaultdrate);
    setbattleflag("item_rate_use",$defaultdrate);
    setbattleflag("item_rate_equip",$defaultdrate);
    setbattleflag("item_rate_card",$defaultccdrate);
    setbattleflag("item_rate_card_boss",$defaultcbdrate);
    atcommand "@reloadmobdb";
    announce "Rates Changed Back to normal!",bc_all;
    end;
    
    OnPcLoginEvent:
    if (.Event == 1) dispbottom "Super rates Event currently active!";
    end;
    }
    
    

     

     

     

    im so sorry i dont know how to make a spoiler

     

    edit : oh 1 more, how to make this script only work once a day???

  8. hi, i wanna ask a question.. how to increase maximum weight capacity of each job??? i checked job_db1.txt

     

    // Structure of Database:
    //JobID,Weight,HPFactor,HPMultiplicator,SPFactor,Unarmed,Dagger,1HSword,2HSword,1HSpear,2HSpear,1HAxe,2HA


    // High Wizard
    4010,    24000,55   ,500  ,900  ,500  ,575  ,2000 ,2000 ,2000 ,2000 ,2000 ,2000 ,2000 ,2000 ,625  ,2000 ,2000 ,

    the 24000 part is a weight of high wizard right??? but in game my high wizard only has 9900 weight T__T

×
×
  • Create New...