De-Refine NPC

[uDe]

Can someone help me with this script?

prontera,38,318,6    script    Derefiner    85,{
   set .@npc$,"[ Derefiner ]";
   mes .@npc$;
   mes "Hi !! I can de-refine your item";
   mes "but you need to pay me 10 Poring Coin for each level of de-refiner service";
   next;
//    the next line "setarray" is to store the item ID of the character. Because player with their own hexed client ( aka. hacker ) might change equipment during the talk to npc
   setarray @equip[1],getequipid(1),getequipid(2),getequipid(3),getequipid(4),getequipid(5),getequipid(6),getequipid(7),getequipid(8),getequipid(9),getequipid(10);
//    store the equipment placement so I can optimize the script
   setarray .@a[1],256,16,32,2,4,64,8,128,512,1;
   select(getequipname(1),getequipname(2),getequipname(3),getequipname(4),getequipname(5),getequipname(6),getequipname(7),getequipname(8),getequipname(9),getequipname(10));
       if ( !getequipisequiped(@menu) ) {
           mes .@npc$;
           mes "There's nothing equipped there...";
           close; }
       if (countitem(7539) < 10) {
           mes .@npc$;
           mes "You don't have enough Poring Coin";
           close; }
       if ( getequiprefinerycnt(@menu) > 10 || getequiprefinerycnt(@menu) == 0 ) {
           mes .@npc$;
           mes "This item cannot be de-refine.";
           close; }
   //    now we make a check on them ... 
       if ( getequipid(@menu) != @equip[@menu] ) {
           mes .@npc$;
           mes "Do you think I am that stupid?";
           mes "You have changed the item !!";
           mes "Get lost !!";
           close; }
   atcommand "@refine "+ .@a[@menu] +" -1";
   delitem 7539,10;
   mes .@npc$;
   mes "Your item has de-refined successfully";
   close;
}

Even I have more than 10 Poring Coins. It's still detect that my Poring Coin didn't enough. I don't see any error from Map-Server.

[Bin4ry]

It's working here.

[uDe]

It's working here.

I still can't de-refine and again, no error from map-server. Is there something I'd miss?

Edited September 27, 2012 by uDe

[Emistry]

you can try this if you want...

http://pastebin.com/raw.php?i=xCVkqftD

Use this...

http://pastebin.com/raw.php?i=cEiQbRrd

[uDe]

Thank you Emistry!