eJay Posted January 8, 2013 Posted January 8, 2013 File Name: Berry Exchanger File Submitter: eJay File Submitted: 05 Jan 2013 File Category: Utilities Content Author: Jae [ 400 Yggdrasil Berry = 1 Coupon ] [ 1 Coupon = 400 Yggdrasil Berry ] Original Scripter: [ Jae ] Recoded by [ eJay ] Click here to download this file Quote
stydianx Posted June 10, 2013 Posted June 10, 2013 File Name: Berry Exchanger File Submitter: eJay File Submitted: 05 Jan 2013 File Category: Utilities Content Author: Jae [ 400 Yggdrasil Berry = 1 Coupon ] [ 1 Coupon = 400 Yggdrasil Berry ] Original Scripter: [ Jae ] Recoded by [ eJay ] Click here to download this file hi what if i only want the NPC to convert 400 BERRY into 1 coupon? Quote
eJay Posted June 10, 2013 Author Posted June 10, 2013 File Name: Berry Exchanger File Submitter: eJay File Submitted: 05 Jan 2013 File Category: Utilities Content Author: Jae [ 400 Yggdrasil Berry = 1 Coupon ] [ 1 Coupon = 400 Yggdrasil Berry ] Original Scripter: [ Jae ] Recoded by [ eJay ] Click here to download this file hi what if i only want the NPC to convert 400 BERRY into 1 coupon? poring_w02,83,101,5 script Berry Exchanger 719,{ set @name$,"[^FF0000Berry Exchanger^000000]"; mes @name$; mes "What do you want to do?"; next; switch(select("Information","Convert")) { case 1: mes @name$; mes "I can convert your Coupon/s into Berry and vice versa."; mes "1 Coupon = 400 Yggdrasil Berry"; close; case 2: switch(select("Berry to Coupon")) { case 1: if (checkweight(7037,1) == 0 ) goto overWeight; if (countitem(607) < 400) goto noBerry; delitem 607,400; getitem 7037,1; mes @name$; mes "There you go. Hope to see you again!"; close; } } end; noBerry: mes @name$; mes "I'm Sorry but you don't have enough berries."; close; overWeight: mes @name$; mes "Sorry you're overweight."; close; } Quote
stydianx Posted June 10, 2013 Posted June 10, 2013 File Name: Berry Exchanger File Submitter: eJay File Submitted: 05 Jan 2013 File Category: Utilities Content Author: Jae [ 400 Yggdrasil Berry = 1 Coupon ] [ 1 Coupon = 400 Yggdrasil Berry ] Original Scripter: [ Jae ] Recoded by [ eJay ] Click here to download this file hi what if i only want the NPC to convert 400 BERRY into 1 coupon? > poring_w02,83,101,5 script Berry Exchanger 719,{ set @name$,"[^FF0000Berry Exchanger^000000]"; mes @name$; mes "What do you want to do?"; next; switch(select("Information","Convert")) { case 1: mes @name$; mes "I can convert your Coupon/s into Berry and vice versa."; mes "1 Coupon = 400 Yggdrasil Berry"; close; case 2: switch(select("Berry to Coupon")) { case 1: if (checkweight(7037,1) == 0 ) goto overWeight; if (countitem(607) < 400) goto noBerry; delitem 607,400; getitem 7037,1; mes @name$; mes "There you go. Hope to see you again!"; close; } } end; noBerry: mes @name$; mes "I'm Sorry but you don't have enough berries."; close; overWeight: mes @name$; mes "Sorry you're overweight."; close; } - what if i want to add another items? for example. 400 yggbery = 1 coupon 300 pizza = 1 coupon 500 deadbranch = 1coupon. Quote
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.