prontera,170,181,5  script  Grape Juice Maker   757,{
// What Item you want to Make ?
set .GiveItem,20022;
// Item Requirements + Amounts
setarray .Item[0],
   533,1;
set .zeny,300;
mes "[ Upgraded Grape Juice Maker ]";
mes "How many "+getitemname(.GiveItem)+" you want??";
input .@ug;
if (.@ug <= 0){
mes "Please input positive numbers";
close;
}
next;
mes "[ Upgraded Grape Juice Maker ]";
mes "You need "+ .zeny*.@ug +" Zeny";
for( set .@i,0; .@i < getarraysize( .Item ) - 1; set .@i,.@i + 2 ){
   mes "Need "+.Item[.@i + 1]*.@ug +" x "+getitemname( .Item[.@i] );
  if( countitem( .Item[.@i] ) < .Item[.@i + 1]*.@ug) 
      set .@error,1;
}
next;
if (zeny < .zeny*.@ug || .@error){
    mes "[ Upgraded Grape Juice Maker ]";
   mes "You don't have enough zeny or items";
   close;
}
if( select("Make ^FF0000"+getitemname( .GiveItem )+"^000000:Cancel") == 2 ) close;
for( set .@i,0; .@i < getarraysize( .Item ) - 1; set .@i,.@i + 2 )
delitem .Item[ .@i ],.Item[ .@i + 1 ]*.@ug;
set zeny,zeny-.zeny*.@ug;
getitem .GiveItem,.@ug;
mes "[ Upgraded Grape Juice Maker ]";
mes "You received ^FF0000"+getitemname( .GiveItem )+"^000000";
close;
}