Costume script 100Tcg Required You can EDIT IT"

[vegavega]

Quote

Tested First you need to add the patch files by keitenai

// -------------------------------------------------------------------------------
// 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.
// -------------------------------------------------------------------------------
- script Costume Clown -1,{
mes "[Clown]";
mes "Here you can convert your headgears into a Costume Headgear or restore to its Original form.";
switch(select("I want to convert my Headgears.:No thanks.")) {
case 1:
next;
mes "Please, select what to convert.";
mes "Remember, cards and refine will be removed.";
next;
setarray .@Position$[1],"Top","Mid","Low";
setarray .@Position[1], 1, 9, 10;
set .@Menu$,"";
for( set .@i, 1; .@i < 5; set .@i, .@i + 1 )
{
if( getequipisequiped(.@Position[.@i]) )
set .@Menu$, .@Menu$ + .@Position$[.@i] + "-" + "[" + getequipname(.@Position[.@i]) + "]";
set .@Menu$, .@Menu$ + ":";
}
set .@Part, .@Position[ select(.@Menu$) ];
if( !getequipisequiped(.@Part) )
{
mes "[Clown]";
mes "Your not wearing anything there...";
close;
}
mes "[Clown]";
mes "You want to Costume your " + getitemname(getequipid(.@Part)) + "?";
next;
if( select("Yes, proceed:No, I am sorry.") == 2 )
{
mes "[Clown]";
mes "Need some time to think about it, huh?";
mes "Alright, I can understand.";
close;
}
if ( countitem(7227) < 100 ) { // Check the required item
mes "[Clown]";
mes "100TCG is Required...";
close;
}
a = getequipid(.@Part);
delitem 7227,100;

costume .@Part; // Convert the Headgear

mes "[Clown]";
mes "Done, enjoy your costume headgear.";
close;

mes "[Clown]";
mes "Done, enjoy your restored headgear.";
close;
case 3:
mes "[Clown]";
mes "Very well. Return at once if you seek my services.";
close;
}
}
// --------------------------------------------------------------------------
// Use duplicates to put your npc on different cities
// --------------------------------------------------------------------------
prontera,140,180,6 duplicate(Costume Clown) Costume Clown#1 715

Credit to keitenai

I already rescript this Edit this part delitem 7227,100; also this for the description 100TCG is Required...

http://herc.ws/board/topic/12181-costume-converter/ Apply this patch then edit the script after patching

 

[keitenai]

Request granted. I've updated my post.

http://herc.ws/board/topic/12181-costume-converter/?p=70935

 

[vegavega]

thanks a lot bro