prt_in.gat,63,69,4 script Didanat 50,{ mes "[Didinat]"; mes "Hello there. I deal in upgrade materials. I can sell you Phracon or Emverertarcon. In addition, if you have elunium ore or oridecon ore, I can refine it for you."; next; menu "Phracon - 250z each",PHRACONNUM, "Emveretarcon - 1000z each",EMVERNUM, "Refine Elunium",ELUNIUMNUM, "Refine Oridecon",ORIDNUM, "No thanks, i'm fine.",CLOSEOUT; PHRACONNUM: input @count; if (@count < 1) goto CLOSEOUTNOORE; if(zeny < @count * 250) goto DENYZENY; getitem 1010,@count; set zeny,zeny - @count * 250; mes "[Didinat]"; mes "Very good. Here's your metal."; close; EMVERNUM: input @count; if (@count < 1) goto CLOSEOUTNOORE; if(zeny < @count * 1000) goto DENYZENY; getitem 1011,@count; set zeny,zeny - @count * 1000; mes "[Didinat]"; mes "Very good. Here's your metal."; close; ELUNIUMNUM: set @product,985 set @material,757 set @count,0 mes "[Didanat]"; mes "I'll refine all your rough elunium into pure stones. Is that okay?"; next; menu "Yes",LOOPTOP, "No",CLOSEOUT; ORIDNUM: set @product,984 set @material,756 set @count,0 mes "[Didanat]"; mes "I'll refine all your rough oridecon into pure stones. Is that okay?"; next; menu "Yes",LOOPTOP, "No",CLOSEOUT; LOOPTOP: if (countitem(@material) < 5) goto DENYORE; LOOP: delitem @material,5; set @count,@count+1; if (countitem(@material) < 5) goto RECEIVE; goto LOOP; RECEIVE: getitem @product,@count; mes "[Didanat]"; mes "Here's your metal."; close; DENYORE: mes "[Didanat]"; mes "You don't even have enough ore to make one stone!"; close; DENYZENY: mes "[Didanat]"; mes "You don't have enough money, you bum!"; close; CLOSEOUT: mes "[Didanat]"; mes "Very well."; close; CLOSEOUTNOORE: mes "[Didanat]"; mes "Changed your mind, eh?"; close; }