/* ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~ *
* ~~~~~~~~ Euphy's MVP Ladder v1.3 ~~~~~~~~ *
* ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~ */
prontera,162,200,4 script MVP Ladder 952,{
function f00000; function f00001; function f00002; function f00003;
function f00004; function f00005; function f00006; function f00007;
function f00008; function f00009; f00008(0); function f00000 { if (
getmonsterinfo(killedrid,22)) { f00009(strcharinfo(0)+" has slain"+
" the ferocious "+strmobinfo(1,killedrid)+"!",16);setd .a00005$[8],
getd(.a00005$[8])+1; if (getd(.a00005$[8])==1) query_sql("INSERT "+
"INTO `global_reg_value` (`char_id`,`str`,`value`,`type`,`account"+
"_id`) VALUES ("+ getcharid(0) +",'" + .a00005$[8] + "','1',3,0)");
else query_sql( "UPDATE `global_reg_value` SET `value` = '" + getd(
.a00005$[8])+"' WHERE char_id = " + getcharid(0) + " AND `str` ='"+
.a00005$[8]+"'"); dispbottom "~ You've killed " +getd(.a00005$[8])+
" MVPs. ~"; specialeffect2 313; } end; } function f00001 { for(
set .@a00000,2;.@a00000<getargcount();set .@a00000,.@a00000+1) setd
"." +getarg(0)+ "["+(.@a00000+getarg(1,0)-2)+"]", getarg(.@a00000);
return; } function f00002 { if (.a00005$[8]!= "") deletearray getd(
"."+getarg(0)+"[0]"),getarg(1,128); else f00001("a00005$",8,"WhyA"+
"reYouReadingThis"); return;} function f00003 {if (.a00005$[0]!="")
{ if (@a00007) return "^777777"+getarg(0)+ "^000000"; set .@a00001,
rand(1,7); set .@a00000$,.a00005$[.@a00001]; for(f00001("a00006",0,
0,.@a00001); .a00006<getstrlen(getarg(0)); set .a00006,.a00006+1) {
set .@a00000$, .@a00000$ + charat( getarg(0), .a00006 ) +
.a00005$[.a00006[1]];set .a00006[1],(.a00006[1]==7)?1:.a00006[1]+1;
} f00002("a00006"); return .@a00000$ + .a00005$[0]; } else f00001(
"a00005$", 0, "^000000", "^FF0000", "^FF7F00", "^FFFF00","^00FF00",
"^0000FF", "^6600FF", "^8B00FF"); return; } function f00004 { if (
compare( getarg(0), "|" )) f00001("a00003$", 0, f00005(atoi(substr(
getarg(0),1,getstrlen(getarg(0)) - 1)))); else f00001("a00003$", 0,
getarg(0)); mes f00003(.a00003$); f00002("a00003$"); if ( getarg(1,
0)==2) next; else if (getarg(1,0)==1) close; else if (getarg(1,0))
sleep2(getarg(1,0)); return;} function f00005 {if (.a00004$[0]!="")
return .a00004$[getarg(0,0)]; else f00001("a00004$",0,"[MVP Ladde"+
"r]", "Hello!", "What are you doing here?", " ~ Check rankings.",
" ~ My stats.", " ~ This hurts my eyes...", " ~ Turn the rainbows"+
" back on!", " ~ Oh, just passing by. ;3", "See ya!" ); return; }
function f00006 { set .@a00000, select(f00003( .a00004$[3]) + ":" +
f00003(.a00004$[4])+ ":"+((@a00007)?":"+f00003(.a00004$[6]):f00003(
.a00004$[5]) + ":") + ":" +f00003(.a00004$[7])); f00004("|0"); if (
.@a00000==1) f00007(); else if (.@a00000 == 2) f00004("You have " +
"killed "+getd(.a00005$[1<<3])+" MVPs.",1); else if (.@a00000==3) {
if (rand(2)){set @a00007,1; f00004("k.",1);} else { misceffect 183;
percentheal -100,-100;close;}}else if (.@a00000==4){ set @a00007,0;
specialeffect 410,25; f00004("Just a moment...",1);} else return; }
function f00007 { query_sql("SELECT char_id,CAST(`value` AS SIGNE"+
"D) FROM `global_reg_value` WHERE `str` = '"+.a00005$[8]+"' ORDER"+
" BY CAST(`value` AS SIGNED) DESC LIMIT 20", .@a00001, .@a00002 );
for(set .@a00000, 0; .@a00000<getarraysize(.@a00001); set .@a00000,
.@a00000+1) { query_sql("SELECT `name` FROM `char` WHERE char_id="+
.@a00001[.@a00000] + ";", .@a00003$); set .@a00004$[.@a00000],
.@a00003$; } for(set .@a00000,0; .@a00000 < getarraysize(.@a00001);
set .@a00000, .@a00000 + 1) f00004( "[" + ( .@a00000 + 1 ) + "] " +
.@a00004$[.@a00000] + " ~ "+.@a00002[.@a00000] +" kills"); close; }
OnInit: f00008(1); function f00008 { if ( getarg(0) ) { if (
.a00005$[8] == "") { f00002(); f00003(); f00005(); f00009(); }
else { getmapxy(.@a00000$,.@a00001,.@a00002,0); monster .@a00000$,
.@a00001,.@a00002," ",2194,2,strnpcinfo(0)+"::OnInit";end;}} else {
f00004("|0"); f00004("|1", 400); f00004("|2", 2); f00006(); f00004(
"|8", 1); } } OnNPCKillEvent: f00000(); end; function f00009 { if (
getarg( 0, "" ) == "") while(1) { sleep(5000); if ( !rand(100) ) {
getmapxy( .@a00000$, .@a00001, .@a00002, 1 ); set .@a00003, 2194;
setnpcdisplay( strnpcinfo(0), .@a00003 ); for( set .@a00004, 0;
.@a00004 < 10; set .@a00004, .@a00004 + 1 ) { misceffect 901;
monster .@a00000$, .@a00001, .@a00002, " ", .@a00003, 10,
strnpcinfo(0) + "::OnInit"; sleep(2500); } hideonnpc strnpcinfo(0);
end; } } else { announce getarg(0), getarg(1); return; } }
}
If anybody got this script, it's in different color and it does hurts the players eyes
How to make the texts of the NPC to normal black font color?