Advertisement
Guest User

Untitled

a guest
Feb 7th, 2013
69
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
  1. prontera,159,180,3 script FreeItems 790,{
  2.  
  3. mes "Here are some free items.";
  4. next;
  5. mes "Input the Item ID of your choice.";
  6. mes "^FF0000*0 to cancel^000000";
  7. do {
  8. input .@itemid;
  9. if (.@itemid == 0 ) {
  10. close;
  11. }
  12. if (getitemname(.@itemid) == "null") {
  13. mes "^FF0000"+.@itemid+"^000000 is not a valid item.";
  14. }
  15. }
  16. while (getitemname(.@itemid) == "null" );
  17. next;
  18. mes "How many ^FF0000"+getitemname(.@itemid)+"^000000 do you want?";
  19. mes "^FF0000*0 to cancel^000000";
  20. do {
  21. input .@itemamount;
  22. if((((getiteminfo(.@itemid,6))/10)*(.@itemamount)) > ((MaxWeight/10)-(Weight/10)) && (.@itemamount > 0 && .@itemamount <= 30000)) {
  23. mes "Sorry, ^FF0000"+.@itemamount+"x "+getitemname(.@itemid)+"^000000 will make you overweight.";
  24. }
  25. if (.@itemamount == 0) {
  26. close;
  27. }
  28. if (.@itemamount > 30000) {
  29. mes "Sorry, ^FF0000"+.@itemamount+"^000000 is not a valid amount.";
  30. }
  31. }
  32. while (.@itemamount > 30000 || ((((getiteminfo(.@itemid,6))/10)*(.@itemamount)) > ((MaxWeight/10)-(Weight/10))));
  33. next;
  34. mes "You requested for";
  35. mes "Item ID: ^FF0000"+.@itemid+"^000000.";
  36. mes "Item Name: ^FF0000"+getitemname(.@itemid)+"^000000.";
  37. mes "Amount: ^FF0000"+.@itemamount+"^000000.";
  38. mes " ";
  39. mes "Is this okay?";
  40. menu "Yes.",-,"No.",Notsatisfied;
  41. getitem .@itemid,.@itemamount;
  42. close;
  43.  
  44. Notsatisfied:
  45. close;
  46. }
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement