mR L

Check on setting
// -- Usable for Only 1 Time set .Based,1; // [ 0 - Account Based / 1 - Character Based ]  

Change This
To This
if (Zeny >= 400000 || countitem(7179) >= 1) {  

Try this :
// =================== MVP KILL =============== // ====== MVP will drop an item only ========== // ====== at specific maps. =================== // ====== if players are on a party =========== // ====== item will be given randomly ========= // ====== to any online party members ========= // ============== by : pajodex ================ // ==== Additional Comments: ================== // 1.0 - Initial release (MVP Kill standalone) // 1.1 - used setarray function to optimize script // 1.2 - Added modified Euphy MVP ladder // slight rework on the script // 1.3 - Fixed on reset function (Report by: celeron0134) // ============================================ - script mvp_kill -1,{ OnInit: setarray .p_rwd, 607,1; // Party reward <item>,<amount> setarray .s_rwd, 607,1; // Solo reward <item>,<amount> .chance = 50; // Drop rate chances % .gm = 10; // Prevents gm level and above to trigger the event // MVP Map list setarray .t_maps$[0],"moc_pryd06","lhz_dun03","gld2_prt","abbey02","ayo_dun02","lhz_dun04","ra_fild02","xmas_fild01","dic_dun02","beach_dun","iz_dun05","tur_dun04","lhz_dun02","jupe_core","moc_fild22","anthell02","odin_tem03","gon_dun03","gef_fild02","thana_boss","gef_fild10","ein_dun02","gef_fild14","moc_pryd04","dew_dun01","in_sphinx5","niflheim","moc_fild17","xmas_dun02","ice_dun03","kh_dun02","treasure02","moc_prydn2","pay_dun04","ra_san05","mosk_dun03","ama_dun03","thor_v03","gef_dun01","mjolnir_04","abyss_03","dic_dun03","prt_sewb4","pay_fild11","gef_dun02","gl_chyard","ra_fild03","ra_fild04","ve_fild01","ve_fild02","lou_dun03","prt_maze03","bra_dun02","gld_dun01_2","ba_lib","ba_lost","niflheim","ba_2whs01","ba_pw03","ba_pw01","ba_pw02"; end; OnNPCKillEvent: // if (getgmlevel() >= .gm ) end; // If gm = event wont happen if ( getmonsterinfo( killedrid, MOB_MVPEXP )) { for (.@a = 0; .@a < getarraysize(.t_maps$); .@a++) { if ( strcharinfo(3) == instance_mapname("06guild_01") ) end; if ( strcharinfo(3) == instance_mapname("force_1-1") ) end; if ( strcharinfo(3) == .t_maps$[.@a]) { if ( getcharid(1) ) { getpartymember getcharid(1), 1; getpartymember getcharid(1), 2; for ( .@i = 0; .@i < $@partymembercount; .@i++ ) { if ( isloggedin( $@partymemberaid[.@i], $@partymembercid[.@i] ) ) { .@partymemberaid[.@c] = $@partymemberaid[.@i]; .@c++; } } if (rand(100) < .chance) getitem .p_rwd[0], .p_rwd[1], .@partymemberaid[ rand( .@c ) ]; mapannounce .t_maps$[.@a],"[ System ] : Player ["+ strcharinfo(0) +"] of party ["+ strcharinfo(1) +"] has killed "+ getmonsterinfo( killedrid, MOB_NAME ) +" at "+ strcharinfo(3), bc_all; } else { if (rand(100) < .chance) getitem .s_rwd[0], .s_rwd[1]; mapannounce .t_maps$[.@a],"[ System ] : Player ["+ strcharinfo(0) +"] has killed "+ getmonsterinfo( killedrid, MOB_NAME ) +" alone at "+ strcharinfo(3), bc_all; } MVPKills = MVPKills+1; dispbottom "---------------------------------------------------"; dispbottom "You killed a total of "+MVPKills+" MVP"+((MVPKills == 1)?"":"s")+"."; dispbottom "---------------------------------------------------"; end; } } if ( getcharid(1) ) { mapannounce .t_maps$[.@a],"[ System ] : Player ["+ strcharinfo(0) +"] of party ["+ strcharinfo(1) +"] has killed "+ getmonsterinfo( killedrid, MOB_NAME ) +" at "+ strcharinfo(3), bc_all; } else { mapannounce .t_maps$[.@a], "[ System ] : Player ["+ strcharinfo(0) +"] has killed "+ getmonsterinfo( killedrid, MOB_NAME ) +" alone at "+ strcharinfo(3), bc_all; } end; } } prontera,151,178,5 script MVP Ladder#Euphy 891,{ mes "[ Rank MVP ]"; mes "Hello."; mes "What are you doing here"; next; switch(select("Check Ranking.", "My stats.",( getgmlevel() >= 99 ) ? "RESET":"","Nothing...")) { case 1: mes "[ Rank MVP ]"; query_sql("SELECT char_id, CAST(`value` AS SIGNED) FROM `char_reg_num` WHERE `key` = 'MVPKills' ORDER BY CAST(`value` AS SIGNED) DESC LIMIT 20",.@cid,.@value); for(set .@i,0; .@i<getarraysize(.@cid); set .@i,.@i+1) { query_sql("SELECT `name` FROM `char` WHERE char_id = "+.@cid[.@i]+";",.@j$); set .@name$[.@i], .@j$; } if (!getarraysize(.@cid)) mes "The rankings are empty."; else { for(set .@i,0; .@i<getarraysize(.@cid); set .@i,.@i+1) mes "["+(.@i+1)+"] "+.@name$[.@i]+" ~ "+.@value[.@i]+" kills"; } break; case 2: mes "[ Rank MVP ]"; mes "You killed "+((MVPKills)?"^0055FF"+MVPKills:"no")+"^000000 MVP"+((MVPKills == 1)?".":"s."); break; case 3: if ( select( "Confirm","Cancel" ) == 1 ) { query_sql("UPDATE `char_reg_num` SET `value` = '0' WHERE `key` ='MVPKills'"); addrid(0); MVPKills = 0; } break; default: end; } end; OnInit: waitingroom "MVP LADDER!",0; end; }  

- script testtitles -1,{ OnPCLoginEvent: if (Farm == 0) goto L_name; if (Farm == 1) goto L_farm; L_name: mes "Your not a farmer!"; end; L_farm: atcommand "@fakename" Farmer1 "+ strcharinfo(0); end; }  

Replace with this :
 

After this :

add this :
setlook LOOK_CLOTHES_COLOR, 1;  

if I'm not mistake
rponsramp_08.bmp  

- script custom_go2 -1,{ OnInit: bindatcmd "go2", strnpcinfo(3)+"::OnGo2",0,1; end; OnGo2: if (getgmlevel() > 0) dispbottom "For Player only !!"; else warp "SavePoint",0,0; end; } Hi, use optional parameters
*bindatcmd "<command>","<NPC object name>::<event label>"{,<atcommand level>,<charcommand level>};
         

Change this :
To This :
    "Guild vs Guild [" + getmapusers("guild_vs3") + "]",gvg1;  

Change this :

To this :
if ( countitem(30000) > 0 || countitem(30002) > 0 || countitem(30003) > 0 || countitem(30004) > 0 ) {  

prontera,0,0,0,0 monster Poring 1002,50,0,0,"poringprize::OnMobDead" - script poringprize -1,{ OnMobDead: #poring_kill = #poring_kill + 1; if ( #poring_kill == 10 ) { getitem 677,1; #poring_kill = 0; } end; }  

turbo_room,99,113,4 script Build Manager 930,{ mes "[ Build Manager ]"; mes "1x Bloody Branch"; mes " > 100 Dead Branch"; mes " > 100.000 Zeny"; mes "^FFFFFF_^000000"; mes "How many you want exchange ?"; input .@ammount; next; if(countitem(604) < (100*.@ammount) || Zeny < (100000*.@ammount) || .@ammount < 1) { mes "[ Build Manager ]"; mes "Not enough requirements"; close; } mes "[ Build Manager ]"; mes "Here you go"; delitem 604,(100*.@ammount); set Zeny,Zeny-(100000*.@ammount); getitem 12103,(1*.@ammount); end; }  

this not bug
#KAFRAPOINTS is another name of Free Cash
you can use another name like #hourlypoints

// Shop 2 Add(2,5137,1,0,0,5141,5,7047,100,7166,50,7038,20,978,1); // Shop 3 Add(3,5389,1,0,0,5043,5,7568,150,969,10);  

Try this :
// ------------------------------------------------------------------------------- // Script Name : Headgear to Costume converter >> Costume to Headgear converter // ------------------------------------------------------------------------------- // Description : // - Allows a user to convert the equipped headgear (on Top, Mid or Low) into a // costume item. It will remove any card and refine of the Item. // - Allows a user to restore the equipped costume headgear (on Top, Mid or Low) // into its original form. It will not return any card or refine of the item. // ------------------------------------------------------------------------------- function script costume { .@npc_name$ = getarg(0); // ====================================================================== .@requirement = 7399; // Item ID Requirement // ====================================================================== disable_items; mes "["+ .@npc_name$ +"]"; mes "Here you can convert your headgears into a Costume Headgear or restore to its Original form."; next; switch(select("I want to convert.:I want to restore.:No thanks.")) { case 1: setarray .@indices[1], EQI_HEAD_TOP, EQI_HEAD_MID, EQI_HEAD_LOW; for (.@i = 1; .@i<=3; ++.@i) { if (getequipisequiped(.@indices[.@i])) { .@menu$ = .@menu$ + F_getpositionname(.@indices[.@i]) + "-[" + getequipname(.@indices[.@i]) + "]"; .@equipped = 1; } .@menu$ = .@menu$ + ":"; } if (.@equipped == 0) { mes "["+ .@npc_name$ +"]"; mes "You need to wear headgears that I can costume..."; close; } mes "["+ .@npc_name$ +"]"; mes "Please select what to convert."; mes "Remember, cards and refine will be removed."; next; .@part = .@indices[ select(.@menu$) ]; if (!getequipisequiped(.@part)) { mes "["+ .@npc_name$ +"]"; mes "You're not wearing anything there..."; close; } mes "["+ .@npc_name$ +"]"; mes "You want to Costume your " + getitemname(getequipid(.@part)) + "?"; next; if (select("Yes, proceed:No, sorry.") == 2) { mes "["+ .@npc_name$ + "]"; mes "Need some time to think about it, huh?"; mes "Alright, I can understand."; close; } if ( countitem(.@requirement) < 1 ) { mes "["+ .@npc_name$ + "]"; mes "You need "+getitemname(.@requirement); end; } delitem .@requirement,1; costume .@part,1; // Convert the Headgear mes "["+ .@npc_name$ +"]"; mes "Done, enjoy your costume headgear."; close; case 2: setarray .@indices[1], EQI_COSTUME_HEAD_TOP, EQI_COSTUME_HEAD_MID, EQI_COSTUME_HEAD_LOW; for (.@i = 1; .@i<=3; ++.@i) { if (getequipisequiped(.@indices[.@i])) { .@menu$ = .@menu$ + F_getpositionname(.@indices$[.@i]) + "-[" + getequipname(.@indices[.@i]) + "]"; .@equipped = 1; } .@menu$ = .@menu$ + ":"; } if (.@equipped == 0) { mes "["+ .@npc_name$ +"]"; mes "You need to wear costumed headgears that I can restore..."; close; } mes "["+ .@npc_name$ +"]"; mes "Please select what to restore."; mes "Remember, I will only restore it back without refine and cards."; next; .@part = .@indices[ select(.@menu$) ]; if (!getequipisequiped(.@part)) { mes "["+ .@npc_name$ +"]"; mes "You're not wearing anything there..."; close; } if (isequippedcnt(getequipid(.@part)) > 1) { mes "["+ .@npc_name$ +"]"; mes "You're wearing too many of the same headgear!"; mes "How am I supposed to know which one to restore?"; mes "See me when you have one equipped."; close; } if (countitem(getequipid(.@part)) > 1) { mes "["+ .@npc_name$ +"]"; mes "You have another " + getitemname(getequipid(.@part)) + " with you."; mes "Put it away before restoring."; close; } mes "[" + .@npc_name$ + "]"; mes "You want to restore your " + getitemname(getequipid(.@part)) + "?"; next; if (select("Yes, proceed:No, sorry.") == 2) { mes "["+ .@npc_name$ +"]"; mes "Need some time to think about it, huh?"; mes "Alright, I can understand."; close; } if ( countitem(.@requirement) < 1 ) { mes "["+ .@npc_name$ + "]"; mes "You need "+getitemname(.@requirement); end; } delitem .@requirement,1; // Restore headgear by recreating a = getequipid(.@part); delitem a,1; getitem a,1; mes "["+ .@npc_name$ +"]"; mes "Done, enjoy your restored headgear."; close; case 3: mes "["+ .@npc_name$ +"]"; mes "Very well. Return at once if you seek my services."; close; } } // --------------------------------------------------------------------------- // Add more lines to put your npc on different cities (adjust name if desired) // --------------------------------------------------------------------------- prontera,159,181,5 script Costume Clown#1 715,{ callfunc "costume","Costume Clown",0; end; }  

https://github.com/rathena/rathena/blob/master/npc/custom/item_signer.txt
 
Change :
setarray .@indices[1], EQI_HEAD_TOP, EQI_ARMOR, EQI_HAND_L, EQI_HAND_R, EQI_GARMENT, EQI_SHOES, EQI_ACC_L, EQI_ACC_R, EQI_HEAD_MID, EQI_HEAD_LOW; To :
setarray .@indices[1],EQI_COSTUME_HEAD_TOP, EQI_COSTUME_HEAD_MID, EQI_COSTUME_HEAD_LOW, EQI_COSTUME_GARMENT;  
hmm, I'm not sure you can use this one