mR L

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 [email protected]; next; if(countitem(604) < (100*[email protected]) || Zeny < (100000*[email protected]) || [email protected] < 1) { mes "[ Build Manager ]"; mes "Not enough requirements"; close; } mes "[ Build Manager ]"; mes "Here you go"; delitem 604,(100*[email protected]); set Zeny,Zeny-(100000*[email protected]); getitem 12103,(1*[email protected]); 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 { [email protected]_name$ = getarg(0); // ====================================================================== [email protected] = 7399; // Item ID Requirement // ====================================================================== disable_items; mes "["+ [email protected]_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 [email protected][1], EQI_HEAD_TOP, EQI_HEAD_MID, EQI_HEAD_LOW; for ([email protected] = 1; [email protected]<=3; [email protected]) { if (getequipisequiped([email protected][[email protected]])) { [email protected]$ = [email protected]$ + F_getpositionname([email protected][[email protected]]) + "-[" + getequipname([email protected][[email protected]]) + "]"; [email protected] = 1; } [email protected]$ = [email protected]$ + ":"; } if ([email protected] == 0) { mes "["+ [email protected]_name$ +"]"; mes "You need to wear headgears that I can costume..."; close; } mes "["+ [email protected]_name$ +"]"; mes "Please select what to convert."; mes "Remember, cards and refine will be removed."; next; [email protected] = [email protected][ select([email protected]$) ]; if (!getequipisequiped([email protected])) { mes "["+ [email protected]_name$ +"]"; mes "You're not wearing anything there..."; close; } mes "["+ [email protected]_name$ +"]"; mes "You want to Costume your " + getitemname(getequipid([email protected])) + "?"; next; if (select("Yes, proceed:No, sorry.") == 2) { mes "["+ [email protected]_name$ + "]"; mes "Need some time to think about it, huh?"; mes "Alright, I can understand."; close; } if ( countitem([email protected]) < 1 ) { mes "["+ [email protected]_name$ + "]"; mes "You need "+getitemname([email protected]); end; } delitem [email protected],1; costume [email protected],1; // Convert the Headgear mes "["+ [email protected]_name$ +"]"; mes "Done, enjoy your costume headgear."; close; case 2: setarray [email protected][1], EQI_COSTUME_HEAD_TOP, EQI_COSTUME_HEAD_MID, EQI_COSTUME_HEAD_LOW; for ([email protected] = 1; [email protected]<=3; [email protected]) { if (getequipisequiped([email protected][[email protected]])) { [email protected]$ = [email protected]$ + F_getpositionname([email protected]$[[email protected]]) + "-[" + getequipname([email protected][[email protected]]) + "]"; [email protected] = 1; } [email protected]$ = [email protected]$ + ":"; } if ([email protected] == 0) { mes "["+ [email protected]_name$ +"]"; mes "You need to wear costumed headgears that I can restore..."; close; } mes "["+ [email protected]_name$ +"]"; mes "Please select what to restore."; mes "Remember, I will only restore it back without refine and cards."; next; [email protected] = [email protected][ select([email protected]$) ]; if (!getequipisequiped([email protected])) { mes "["+ [email protected]_name$ +"]"; mes "You're not wearing anything there..."; close; } if (isequippedcnt(getequipid([email protected])) > 1) { mes "["+ [email protected]_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([email protected])) > 1) { mes "["+ [email protected]_name$ +"]"; mes "You have another " + getitemname(getequipid([email protected])) + " with you."; mes "Put it away before restoring."; close; } mes "[" + [email protected]_name$ + "]"; mes "You want to restore your " + getitemname(getequipid([email protected])) + "?"; next; if (select("Yes, proceed:No, sorry.") == 2) { mes "["+ [email protected]_name$ +"]"; mes "Need some time to think about it, huh?"; mes "Alright, I can understand."; close; } if ( countitem([email protected]) < 1 ) { mes "["+ [email protected]_name$ + "]"; mes "You need "+getitemname([email protected]); end; } delitem [email protected],1; // Restore headgear by recreating a = getequipid([email protected]); delitem a,1; getitem a,1; mes "["+ [email protected]_name$ +"]"; mes "Done, enjoy your restored headgear."; close; case 3: mes "["+ [email protected]_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 [email protected][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 [email protected][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