gyroguevarra Posted November 27, 2013 Posted November 27, 2013 1pod = 2000cash points cash to pod pod to cash Quote
Yoga Posted November 27, 2013 Posted November 27, 2013 (edited) // 1 Pod = 2k Cash Point // 2k Cash Point = 1 Pod prontera,120,120,4 script POD 100,{ mes "[Trader]"; mes "You currently have ^ff0000"+#CASHPOINTS+"^000000 Cash Points"; menu "Exchange Proof of Donation to Cash Point", L_PODS, "Exchange Cash Point to Proof of Donation", L_Point, "Cancel", L_Cancel; L_PODS: next; mes "[Trader]"; mes "How many you want to exchange?"; mes "^ff0000Note^000000: 1 Proof of Donation currently 2000 Cash Point"; input .@count; if (.@count == 0) close; if (countitem(7179) < .@count*1) goto L_Noitem; delitem 7179,.@count*1; set #CASHPOINTS, #CASHPOINTS + ( .@count*2000 ); close; L_Point: next; mes "[Trader]"; mes "How many you want to exchange?"; mes "^ff0000Note^000000: 2000 Cash Point currently 1 Proof of Donation"; input .@count; if (.@count == 0) close; if (#CASHPOINTS < .@count*1) goto L_Nopoint; set #CASHPOINTS, #CASHPOINTS - ( .@count*2000 ); getitem 7179,.@count*1; close; L_Nopoint: next; mes "[Trader]"; mes "Sorry you dont have enough of Cash Point"; close; L_Noitem: next; mes "[Trader]"; mes "Sorry you dont have enough of Proof of Donation"; close; L_Cancel: mes "[Trader]"; mes "No problem, Come back again"; close; end; } Edited November 27, 2013 by Yoga Quote
Budots Posted November 28, 2013 Posted November 28, 2013 // 1 Pod = 2k Cash Point // 2k Cash Point = 1 Pod prontera,120,120,4 script POD 100,{ mes "[Trader]"; mes "You currently have ^ff0000"+#CASHPOINTS+"^000000 Cash Points"; menu "Exchange Proof of Donation to Cash Point", L_PODS, "Exchange Cash Point to Proof of Donation", L_Point, "Cancel", L_Cancel; L_PODS: next; mes "[Trader]"; mes "How many you want to exchange?"; mes "^ff0000Note^000000: 1 Proof of Donation currently 2000 Cash Point"; input .@count; if (.@count == 0) close; if (countitem(7179) < .@count*1) goto L_Noitem; delitem 7179,.@count*1; set #CASHPOINTS, #CASHPOINTS + ( .@count*2000 ); close; L_Point: next; mes "[Trader]"; mes "How many you want to exchange?"; mes "^ff0000Note^000000: 2000 Cash Point currently 1 Proof of Donation"; input .@count; if (.@count == 0) close; if (#CASHPOINTS < .@count*1) goto L_Nopoint; set #CASHPOINTS, #CASHPOINTS - ( .@count*2000 ); getitem 7179,.@count*1; close; L_Nopoint: next; mes "[Trader]"; mes "Sorry you dont have enough of Cash Point"; close; L_Noitem: next; mes "[Trader]"; mes "Sorry you dont have enough of Proof of Donation"; close; L_Cancel: mes "[Trader]"; mes "No problem, Come back again"; close; end; } Tested already? Working? Can i request, can i request sir ? how about 1 POD = 1,000 pcs (9524) // 9524 is the item ID Thanks in advance Quote
Patskie Posted November 28, 2013 Posted November 28, 2013 http://upaste.me/1d10278cd3db1e7 credits to @Emistry Quote
Yoga Posted November 28, 2013 Posted November 28, 2013 prontera,120,130,4 script POD 100,{ mes "[Trader]"; mes "You currently have ^ff0000"+countitem(9524)+"^000000 "+getitemname(9524)+""; menu "Exchange "+getitemname(7179)+" to "+getitemname(9524)+"", L_PODS, "Nevermind", L_Cancel; L_PODS: next; mes "[Trader]"; mes "How many you want to exchange?"; mes "^ff0000Note^000000: 1 "+getitemname(7179)+" currently 1000 "+getitemname(9524)+""; input .@count; if (.@count == 0) close; if (countitem(7179) < .@count*1) goto L_Noitem; delitem 7179,.@count*1; getitem 9524,.@count*1000; close; L_Noitem: next; mes "[Trader]"; mes "You dont have enough "+getitemname(7179)+""; close; L_Cancel: mes "[Trader]"; mes "Come back anytime!"; close; end; } Quote
Budots Posted November 28, 2013 Posted November 28, 2013 (edited) prontera,120,130,4 script POD 100,{ mes "[Trader]"; mes "You currently have ^ff0000"+countitem(9524)+"^000000 "+getitemname(9524)+""; menu "Exchange "+getitemname(7179)+" to "+getitemname(9524)+"", L_PODS, "Nevermind", L_Cancel; L_PODS: next; mes "[Trader]"; mes "How many you want to exchange?"; mes "^ff0000Note^000000: 1 "+getitemname(7179)+" currently 1000 "+getitemname(9524)+""; input .@count; if (.@count == 0) close; if (countitem(7179) < .@count*1) goto L_Noitem; delitem 7179,.@count*1; getitem 9524,.@count*1000; close; L_Noitem: next; mes "[Trader]"; mes "You dont have enough "+getitemname(7179)+""; close; L_Cancel: mes "[Trader]"; mes "Come back anytime!"; close; end; } OMG sorry my bad, Can you reverse it sir? It will exchange 1,000 pcs (9524) into 1 Proof of Donation // vice-versa SO SORRY! bump bump bump Edited November 28, 2013 by GM Montoy Quote
Yoga Posted November 28, 2013 Posted November 28, 2013 (edited) prontera,120,130,4 script POD 100,{ mes "[Trader]"; mes "You currently have ^ff0000"+countitem(9524)+"^000000 "+getitemname(9524)+""; menu "Exchange "+getitemname(9524)+" to "+getitemname(7179)+"", L_PODS, "Nevermind", L_Cancel; L_PODS: next; mes "[Trader]"; mes "How many you want to exchange?"; mes "^ff0000Note^000000: 1000 "+getitemname(9524)+" currently 1 "+getitemname(7179)+""; input .@count; if (.@count == 0) close; if (countitem(9524) < .@count*1000) goto L_Noitem; delitem 9524,.@count*1000; getitem 7179,.@count*1; close; L_Noitem: next; mes "[Trader]"; mes "[ ^ff0000X^000000 ] Insulfficient "+getitemname(9524)+""; close; L_Cancel: mes "[Trader]"; mes "Come back anytime!"; close; end; } Edited November 28, 2013 by Yoga Quote
Budots Posted November 28, 2013 Posted November 28, 2013 (edited) Thanks YOGA, it works like a charm :3 Last request please,Can you please add a special effects when they convert?where to add this on the script specialeffect2 248; prontera,147,157,5 script BC - PODS 100,{ mes "[Trader]"; mes "You currently have ^ff0000"+countitem(9524)+"^000000 "+getitemname(9524)+""; menu "Convert ^ff0000"+getitemname(9524)+"^000000 to ^ff0000"+getitemname(7179)+"^000000", L_PODS, "Nevermind", L_Cancel; L_PODS: next; mes "[Trader]"; mes "How many you want to exchange?"; mes "^ff0000Note^000000: 1,000 "+getitemname(9524)+" is 1 "+getitemname(7179)+""; input .@count; if (.@count == 0) close; if (countitem(9524) < .@count*1000) goto L_Noitem; delitem 9524,.@count*1000; getitem 7179,.@count*1; close; L_Noitem: next; mes "[Trader]"; mes "[ ^ff0000X^000000 ] Insufficient "+getitemname(9524)+""; close; L_Cancel: mes "[Trader]"; mes "Feel free to use my service anytime!"; close; end; } Edited November 28, 2013 by GM Montoy Quote
Dynasty Posted November 28, 2013 Posted November 28, 2013 (edited) if (countitem(9524) < .@count*1000) goto L_Noitem; delitem 9524,.@count*1000; getitem 7179,.@count*1; after the "getitem 7179,.@count*1; if (countitem(9524) < .@count*1000) goto L_Noitem; delitem 9524,.@count*1000; getitem 7179,.@count*1; specialeffect2 248; close; Edited November 28, 2013 by Dynasty Quote
Budots Posted November 28, 2013 Posted November 28, 2013 if (countitem(9524) < .@count*1000) goto L_Noitem; delitem 9524,.@count*1000; getitem 7179,.@count*1; after the "getitem 7179,.@count*1; if (countitem(9524) < .@count*1000) goto L_Noitem; delitem 9524,.@count*1000; getitem 7179,.@count*1; specialeffect2 248; close; Thanks Quote
Question
gyroguevarra
1pod = 2000cash points
cash to pod
pod to cash
9 answers to this question
Recommended Posts
Join the conversation
You can post now and register later. If you have an account, sign in now to post with your account.