 |
Salaric
Beginner
Joined: 10 Jun 2008
Posts: 17
|
 Posted: Sun Jul 18, 2010 9:00 pm
Works in zmud, not in cmud
|
This script works perfectly in zmud but for whatever reason doesn't work at all in cmud. I've tried tinkering around with it but I can't figure out why it won't work. Any suggestions?
| Code: |
#CLASS {Merchant}
#ALIAS pricecheck {#PRIORITY {#IF (%ismember( %lower( %1), inks|comms|herbs|concoctions|runes|enchantments)) {#VARIABLE PriceTemp {0};#CASE %ismember( %lower( %1), "inks|comms|herbs|concoctions|runes|enchantments") {#FORALL %replace( "%-2", ", ", |) {#IF (%isnumber( %word( %i, 1))) {#IF (%iskey( @InkPrices, %proper( %word( %i, 2)))) {#ADD PriceTemp {%eval( %word( %i, 1)*%db( @InkPrices, %proper( %word( %i, 2))))}} {#SHOW {%ansi( 6)ERROR: %ansi( 7)~"%word( %i, 2)~" not recognised as a valid ink.}}} {#IF (%iskey( @InkPrices, %proper( %i))) {#ADD PriceTemp {%eval( %db( @InkPrices, %proper( %i)))}} {#SHOW {%ansi( 6)ERROR: %ansi( 7)~"%i~" not recognised as a valid ink.}}}}} {#FORALL %replace( "%-2", ", ", |) {#IF (%isnumber( %word( %i, 1))) {#IF (%iskey( @CommPrices, %proper( %word( %i, 2)))) {#ADD PriceTemp {%eval( %word( %i, 1)*%db( @CommPrices, %proper( %word( %i, 2))))}} {#SHOW {%ansi( 6)ERROR: %ansi( 7)~"%word( %i, 2)~" not recognised as a valid commodity.}}} {#IF (%iskey( @CommPrices, %proper( %i))) {#ADD PriceTemp {%eval( %db( @CommPrices, %proper( %i)))}} {#SHOW {%ansi( 6)ERROR: %ansi( 7)~"%i~" not recognised as a valid commodity.}}}}} {#FORALL %replace( "%-2", ", ", |) {#IF (%isnumber( %word( %i, 1))) {#IF (%iskey( @HerbPrices, %proper( %word( %i, 2)))) {#ADD PriceTemp {%eval( %word( %i, 1)*%db( @HerbPrices, %proper( %word( %i, 2))))}} {#SHOW {%ansi( 6)ERROR: %ansi( 7)~"%word( %i, 2)~" not recognised as a valid herb.}}} {#IF (%iskey( @HerbPrices, %proper( %i))) {#ADD PriceTemp {%eval( %db( @HerbPrices, %proper( %i)))}} {#SHOW {%ansi( 6)ERROR: %ansi( 7)~"%i~" not recognised as a valid herb.}}}}} {#FORALL %replace( "%-2", ", ", |) {#IF (%isnumber( %word( %i, 1))) {#IF (%iskey( @ConcoctPrices, %proper( %word( %i, 2)))) {#FORALL %db( @ConcoctPrices, %word( %i, 2)) {#IF (%j=gold) {#ADD PriceTemp {%eval( %word( %i, 1)*200)}} {#ADD PriceTemp {%eval( %word( %i, 1)*%db( @HerbPrices, %j))}}}} {#SHOW {%ansi( 6)ERROR: %ansi( 7)~"%word( %i, 2)~" not recognised as a valid concoction.}}} {#IF (%iskey( @ConcoctPrices, %proper( %i))) {#FORALL %db( @ConcoctPrices, %i) {#IF (%j=gold) {#ADD PriceTemp {200}} {#ADD PriceTemp {%eval( %db( @HerbPrices, %j))}}}} {#SHOW {%ansi( 6)ERROR: %ansi( 7)~"%i~" not recognised as a valid concoction.}}}}} {#FORALL %replace( "%-2", ", ", |) {#IF (%lower( %i)=totem OR (%isnumber( %word( %i, 1)) AND %lower( %word( %i, 2))=totem)) {#IF (%isnumber( %word( %i, 1))) {#FORALL %db( @RunePrices, %word( %i, 2)) {#ADD PriceTemp {%eval( %word( %i, 1)*%db( @CommPrices, %j))}}} {#FORALL %db( @RunePrices, %proper( %i)) {#ADD PriceTemp {%eval( %db( @CommPrices, %j))}}}} {#IF (%isnumber( %word( %i, 1))) {#IF (%iskey( @RunePrices, %proper( %word( %i, 2)))) {#FORALL %db( @RunePrices, %word( %i, 2)) {#ADD PriceTemp {%eval( %word( %i, 1)*%db( @InkPrices, %j))}}} {#SHOW {%ansi( 6)ERROR: %ansi( 7)~"%word( %i, 2)~" not recognised as a valid rune.}}} {#IF (%iskey( @RunePrices, %proper( %i))) {#FORALL %db( @RunePrices, %i) {#ADD PriceTemp {%eval( %db( @InkPrices, %j))}}} {#SHOW {%ansi( 6)ERROR: %ansi( 7)~"%i~" not recognised as a valid rune.}}}}}} {#FORALL %replace( "%-2", ", ", |) {#IF (%isnumber( %word( %i, 1))) {#IF (%iskey( @EnchantPrices, %proper( %word( %i, 2)))) {#FORALL %db( @EnchantPrices, %word( %i, 2)) {#IF (%j=kola) {#ADD PriceTemp {%eval( %word( %i, 1)*%db( @HerbPrices, Kola))}} {#ADD PriceTemp {%eval( %word( %i, 1)*%db( @CommPrices, %proper( %j)))}}}} {#SHOW {%ansi( 6)ERROR: %ansi( 7)~"%word( %i, 2)~" not recognised as a valid enchantment.}}} {#IF (%iskey( @EnchantPrices, %proper( %i))) {#FORALL %db( @EnchantPrices, %i) {#IF (%j=kola) {#ADD PriceTemp {%db( @HerbPrices, Kola)}} {#ADD PriceTemp {%eval( %db( @CommPrices, %proper( %j)))}}}} {#SHOW {%ansi( 6)ERROR: %ansi( 7)~"%i~" not recognised as a valid enchantment.}}}}};#IF (@OrderCheck=0) {#SHOW {%ansi( 7)Total value: @PriceTemp gold.};#IF (@PriceMod!=1) {#SHOW {%ansi( 7)With a %abs( %eval( 100-@PriceMod*100))~% %if( %eval( 100-@PriceMod*100)<0, increase, discount), the price comes to %eval( @PriceTemp*@PriceMod) gold.}};#SEND {}}} {#IF (@OrderCheck=0) {#SHOW {%ansi( 6)Syntax:%ansi( 7) PRICECHECK ~<type~> ~<items, seperated by commas~>%crlf%ansi( 6)Valid types:%ansi( 7) inks, comms, herbs, concoctions, runes, enchantments%crlf%crlf%ansi( 6)Example:%ansi( 7) pricecheck herbs bloodroot, 15 moss, 20 cohosh}};#SEND {}};#IF (@OrderCheck=1) {#VARIABLE OrderPrice {@PriceTemp}} {#IF (@OrderCheck=2) {#ADD OrderPrice {@PriceTemp}}}}}
#ALIAS cancelorder {#PRIORITY {#VARIABLE OrderCheck {0};#VARIABLE OrderPrice {0};#VARIABLE OrderItems {};#VARIABLE OrderItemsCounted {};#SHOW {%ansi( 7)Order cancelled.};#SEND {}}}
#ALIAS makeorder {#PRIORITY {#IF (%ismember( %lower( %1), inks|comms|herbs)) {#VARIABLE OrderPrice {0};#VARIABLE OrderItems {};#VARIABLE OrderCheck {1};pricecheck %-1;#FORALL %replace( "%-2", ", ", |) {#IF (%isnumber( %word( %i, 1))) {#REPEAT %word( %i, 1) {#VARIABLE OrderItems {%additem( %word( %i, 2), @OrderItems)}}} {#VARIABLE OrderItems {%additem( %i, @OrderItems)}}};#SHOW {%ansi( 7)Total cost of this order: @OrderPrice gold.};#IF (@PriceMod!=1) {#SHOW {%ansi( 7)With a %abs( %eval( 100-@PriceMod*100))~% %if( %eval( 100-@PriceMod*100)<0, increase, discount), the price comes to %eval( @OrderPrice*@PriceMod) gold.}};#SEND {};#VARIABLE OrderCheck {0}} {#SHOW {%ansi( 6)SYNTAX: %ansi( 7)MAKEORDER ~<type~> ~<items, seperated by commas~>%crlf%ansi( 6)Valid types:%ansi( 7) inks, comms, herbs%crlf%crlf%ansi( 6)Example:%ansi( 7) makeorder herbs bloodroot, 15 moss, 20 cohosh};#SEND {}}}}
#ALIAS addorder {#PRIORITY {#IF (%ismember( %lower( %1), inks|comms|herbs)) {#VARIABLE OrderCheck {2};pricecheck %-1;#FORALL %replace( "%-2", ", ", |) {#IF (%isnumber( %word( %i, 1))) {#REPEAT %word( %i, 1) {#VARIABLE OrderItems {%additem( %word( %i, 2), @OrderItems)}}} {#VARIABLE OrderItems {%additem( %i, @OrderItems)}}};#SHOW {%ansi( 7)Total cost of this order: @OrderPrice gold.};#IF (@PriceMod!=1) {#SHOW {%ansi( 7)With a %abs( %eval( 100-@PriceMod*100))~% %if( %eval( 100-@PriceMod*100)<0, increase, discount), the price comes to %eval( @OrderPrice*@PriceMod) gold.}};#SEND {};#VARIABLE OrderCheck {0}}}}
#ALIAS checkorder {#PRIORITY {#IF (@OrderItems) {#SHOW {%ansi( 6)Current items in order:};#LOOPDB %countlist( @OrderItems) {#SHOW {%ansi( 7)%val %key}};#SHOW {%ansi( 6)Cost of this order: @OrderPrice gold.};#IF (@PriceMod!=1) {#SHOW {%ansi( 6)With a %abs( %eval( 100-@PriceMod*100))~% %if( %eval( 100-@PriceMod*100)<0, increase, discount), the price comes to %eval( @OrderPrice*@PriceMod) gold.}};#SEND {}} {#SHOW {%ansi( 7)I'm afraid there is no order to check.};#SEND {}}}}
#ALIAS giveorder {#PRIORITY {#IF (%null( %1)) {#SHOW {%ansi( 6)SYNTAX: %ansi( 7)GIVEORDER ~<recipient~>};#SEND {}} {#LOOPDB %countlist( @OrderItems) {#IF (%val=1) {outr %key;give 1 %key to %1} {inr all %key;outr %val %key;give group %key to %1}};#IF (@Recording) {#LOOPDB %countlist( @OrderItems) {#ADDITEM OrderItemsCounted {%val %key}};#ADDKEY SalesRecord {%eval( 1+%numkeys( @SalesRecord))} {%1:%time( "yyyy/mm/dd"):%sort( @OrderItemsCounted):@OrderPrice:@PriceMod};#SHOW {%ansi( 7)Sale ~#%numkeys( @SalesRecord) recorded.};#SEND {}}}}}
#ALIAS viewrecord {#PRIORITY {#IF (%isnumber( %1)) {#IF (%iskey( @SalesRecord, %1)) {#SHOW {%ansi( 6)~#%ansi( 7)%1 out of %numkeys( @SalesRecord)%crlf%ansi( 6)Name: %ansi( 7)%word( %db( @SalesRecord, %1), 1, :)%crlf%ansi( 6)Date: %ansi( 7)%word( %db( @SalesRecord, %1), 2, :)%crlf%ansi( 6)Items: %ansi( 7)%replace( %word( %db( @SalesRecord, %1), 3, :), "|", ", ")%crlf%ansi( 6)Price: %ansi( 7)%if( %word( %db( @SalesRecord, %1), 5, :)=1, %word( %db( @SalesRecord, %1), 4, :), %eval( %word( %db( @SalesRecord, %1), 3, :)*%word( %db( @SalesRecord, %1), 5, :)))};#SEND {}} {#SHOW {%ansi( 7)Invalid sale number.};#SEND {}}} {#IF ("%1"="last") {#SHOW {%ansi( 6)~#%ansi( 7)%numkeys( @SalesRecord)%crlf%ansi( 6)Name: %ansi( 7)%word( %db( @SalesRecord, %numkeys( @SalesRecord)), 1, :)%crlf%ansi( 6)Date: %ansi( 7)%word( %db( @SalesRecord, %numkeys( @SalesRecord)), 2, :)%crlf%ansi( 6)Items: %ansi( 7)%replace( %word( %db( @SalesRecord, %numkeys( @SalesRecord)), 3, :), "|", ", ")%crlf%ansi( 6)Price: %ansi( 7)%if( %word( %db( @SalesRecord, %numkeys( @SalesRecord)), 5, :)=1, %word( %db( @SalesRecord, %numkeys( @SalesRecord)), 4, :), %eval( %word( %db( @SalesRecord, %numkeys( @SalesRecord)), 3, :)*%word( %db( @SalesRecord, %numkeys( @SalesRecord)), 5, :)))};#SEND {}} {#IF ("%1"="all") {#LOOPDB @SalesRecord {#SHOW {%ansi( 6)~#%ansi( 7)%key out of %numkeys( @SalesRecord)%crlf%ansi( 6)Name: %ansi( 7)%word( %val, 1, :)%crlf%ansi( 6)Date: %ansi( 7)%word( %val, 2, :)%crlf%ansi( 6)Items: %ansi( 7)%replace( %word( %val, 3, :), "|", ", ")%crlf%ansi( 6)Price: %ansi( 7)%if( %word( %val, 5, :)=1, %word( %val, 4, :), %eval( %word( %val, 3, :)*%word( %val, 5, :)))};#SHOW {}};#SEND {}} {#SHOW {%ansi( 6)SYNTAX: %ansi( 7)VIEWRECORD ~<~#|last|all~>};#SEND {}}}}}}
#ALIAS clearrecord {#PRIORITY {#VARIABLE SalesRecord {};#SHOW {%ansi( 7)All recorded sales deleted.};#SEND {}}}
#ALIAS record {#PRIORITY {#IF (%lower( %1)="on") {#VARIABLE Recording {1};#SHOW {%ansi( 7)Sales will now be recorded.};#SEND {}} {#IF (%lower( %1)="off") {#VARIABLE Recording {1};#SHOW {%ansi( 7)Sales will not be recorded.};#SEND {}} {#SHOW {%ansi( 6)SYNTAX: %ansi( 7)RECORD ~<on|off~>};#SEND {}}}}}
#ALIAS saveorder {#PRIORITY {#LOOPDB %countlist( @OrderItems) {#ADDITEM OrderItemsCounted {%val %key}};#ADDKEY SalesRecord {%eval( 1+%numkeys( @SalesRecord))} {%if( %1, %1, Unknown):%time( "yyyy/mm/dd"):%sort( @OrderItemsCounted):@OrderPrice:@PriceMod};#SHOW {%ansi( 7)Current order ~(~#%numkeys( @SalesRecord)~) recorded.};#SEND {}}}
#ALIAS undorecord {#PRIORITY {#DELKEY SalesRecord {%numkeys( @SalesRecord)};#SHOW {%ansi( 7)The last recorded sale ~(~#%eval( 1+%numkeys( @SalesRecord))~) has been deleted.};#SEND {}}}
#ALIAS merchanthelp {#PRIORITY {#SHOW {%ansi( 6)HERBPRICE ~<herb~> ~<price~>:%ansi( 7) Set the price of an herb.};#SHOW {%ansi( 6)COMMPRICE ~<comm~> ~<price~>:%ansi( 7) Set the price of a commodity.};#SHOW {%ansi( 7)You can use comma-separated lists to set multiple herbs/comms.};#SHOW {};#SHOW {%ansi( 6)PRICECHECK ~<type~> ~<comma-separated list of items~>:%ansi( 7) Calculate the price of the items.};#SHOW {%ansi( 7)Valid types: inks, comms, herbs, runes, concoctions, enchantments};#SHOW {};#SHOW {%ansi( 6)PRICEMOD ~<number~>:%ansi( 7) The number to multiply the price by.};#SHOW {};#SHOW {%ansi( 6)MAKEORDER ~<type~> ~<comma-separated list of items~>:%ansi( 7) Create a new order.};#SHOW {%ansi( 6)ADDORDER ~<type~> ~<comma-separated list of items~>:%ansi( 7) Add to an existing order.};#SHOW {%ansi( 7)Valid item types for orders: inks, herbs, comms};#SHOW {};#SHOW {%ansi( 6)CHECKORDER:%ansi( 7) View the current order.};#SHOW {%ansi( 6)CANCELORDER:%ansi( 7) Clear the current order.};#SHOW {%ansi( 6)GIVEORDER ~<target~>:%ansi( 7) Outrift and give all items in the current order to the target.};#SHOW {};#SHOW {%ansi( 6)RECORD ~<on|off~>:%ansi( 7) Enable/disable automatic recording of sales.};#SHOW {%ansi( 6)SAVEORDER ~<name~>:%ansi( 7) Manually saves the current order.};#SHOW {%ansi( 6)UNDORECORD:%ansi( 7) Deletes the most recent recorded sale.};#SHOW {%ansi( 6)CLEARRECORD:%ansi( 7) Deletes all recorded sales.};#SHOW {%ansi( 6)VIEWRECORD ~<~#|last|all~>:%ansi( 7) See a specific sale by number, the most recent sale, or all sales.};#SEND {}}}
#ALIAS pricemod {#PRIORITY {#IF (%isnumber( %1) OR %isfloat( %1)) {#VARIABLE PriceMod {%1};#SHOW {%ansi( 7)Price modifier set to %eval( %1*100)~%};#SEND {}} {#SHOW {%ansi( 7)~"%1~" is not a valid number.};#SEND {}}}}
#ALIAS herbprice {#PRIORITY {#IF (%pos( ",", "%-1")) {#FORALL %replace( "%-1", ", ", |) {#IF (%iskey( @HerbPrices, %proper( %word( %i, 1)))) {#IF (%isnumber( %word( %i, 2)) OR %isfloat( %word( %i, 2))) {#ADDKEY HerbPrices {%proper( %word( %i, 1))} {%word( %i, 2)};#SHOW {%ansi( 7)%proper( %word( %i, 1)) set to %word( %i, 2).}} {#SHOW {%ansi( 6)ERROR: %ansi( 7)~"%word( %i, 2)~" is not a valid price.};#VARIABLE ErrorNote {1}}} {#SHOW {%ansi( 6)ERROR: %ansi( 7)~"%word( %i, 1)~" is not recognised as a valid herb.};#VARIABLE ErrorNote {1}}};#IF (@ErrorNote) {#SHOW {%ansi( 6)SYNTAX:%ansi( 7) HERBPRICE ~<herb~> ~<price~>%crlf~You can set multiple prices at once using a comma-delimited list.%crlf~Example: herbprice kola 15, myrrh 10, cohosh 20};#VARIABLE ErrorNote {0}}} {#IF (%iskey( @HerbPrices, %proper( %1))) {#IF (%isnumber( %2) OR %isfloat( %2)) {#ADDKEY HerbPrices {%proper( %1)} {%2};#SHOW {%ansi( 7)%proper( %1) set to %2.}} {#SHOW {%ansi( 6)ERROR: %ansi( 7)~"%2~" is not a valid price.%crlf%ansi( 6)SYNTAX:%ansi( 7) HERBPRICE ~<herb~> ~<price~>%crlf~You can set multiple prices at once using a comma-delimited list.%crlf~Example: herbprice kola 15, myrrh 10, cohosh 20}}} {#SHOW {%ansi( 6)ERROR: %ansi( 7)~"%1~" is not recognised as a valid herb.%crlf%ansi( 6)SYNTAX:%ansi( 7) HERBPRICE ~<herb~> ~<price~>%crlf~You can set multiple prices at once using a comma-delimited list.%crlf~Example: herbprice kola 15, myrrh 10, cohosh 20}}};#SEND {}}}
#ALIAS commprice {#PRIORITY {#IF (%pos( ",", "%-1")) {#FORALL %replace( "%-1", ", ", |) {#IF (%iskey( @CommPrices, %proper( %word( %i, 1)))) {#IF (%isnumber( %word( %i, 2)) OR %isfloat( %word( %i, 2))) {#ADDKEY CommPrices {%proper( %word( %i, 1))} {%word( %i, 2)};#SHOW {%ansi( 7)%proper( %word( %i, 1)) set to %word( %i, 2).}} {#SHOW {%ansi( 6)ERROR: %ansi( 7)~"%word( %i, 2)~" is not a valid price.};#VARIABLE ErrorNote {1}}} {#SHOW {%ansi( 6)ERROR: %ansi( 7)~"%word( %i, 1)~" is not recognised as a valid commodity.};#VARIABLE ErrorNote {1}}};#IF (@ErrorNote) {#SHOW {%ansi( 6)SYNTAX:%ansi( 7) COMMPRICE ~<comm~> ~<price~>%crlf~You can set multiple prices at once using a comma-delimited list.%crlf~Example: COMMPRICE leather 15, ice 10, steel 20};#VARIABLE ErrorNote {0}}} {#IF (%iskey( @CommPrices, %proper( %1))) {#IF (%isnumber( %2) OR %isfloat( %2)) {#ADDKEY CommPrices {%proper( %1)} {%2};#SHOW {%ansi( 7)%proper( %1) set to %2.}} {#SHOW {%ansi( 6)ERROR: %ansi( 7)~"%2~" is not a valid price.%crlf%ansi( 6)SYNTAX:%ansi( 7) COMMPRICE ~<comm~> ~<price~>%crlf~You can set multiple prices at once using a comma-delimited list.%crlf~Example: COMMPRICE leather 15, ice 10, steel 20}}} {#SHOW {%ansi( 6)ERROR: %ansi( 7)~"%1~" is not recognised as a valid commodity.%crlf%ansi( 6)SYNTAX:%ansi( 7) COMMPRICE ~<comm~> ~<price~>%crlf~You can set multiple prices at once using a comma-delimited list.%crlf~Example: COMMPRICE leather 15, ice 10, steel 20}}};#SEND {}}}
#VAR InkPrices {Red 20 Blue 40 Yellow 80 Green 160 Purple 250 Gold 400}
#VAR CommPrices {Arrow 0 Bone 0 Cloth 0 Coal 0 Dust 0 Gems 0 Gold 0 Horn 0 Ice 0 Iron 0 Leather 0 Obsidian 0 Platinum 0 Rope 0 Silver 0 Steel 0 Wood 0}
#VAR HerbPrices {Ash 0 Bayberry 0 Bellwort 0 Bloodroot 0 Blueberry 0 Cohosh 0 Echinacea 0 Elm 0 Ginger 0 Ginseng 0 Goldenseal 0 Hawthorn 0 Kelp 0 Kola 0 Kuzu 0 Lobelia 0 Moss 0 Myrrh 0 Pear 0 Sileris 0 Skullcap 0 Slipper 0 Valerian 0 Weed 0}
#VAR TattooPrices {Firefly Yellow Moss Blue|Red|Yellow Feather Blue|Blue|Red Shield Green|Red|Red Mindseye Blue|Blue|Green Hammer Purple|Red|Red Cloak Blue|Blue Bell Blue|Blue|Blue|Red|Red Crystal Green|Purple|Yellow Moon Blue|Red|Yellow Starburst Blue|Gold|Green|Purple|Red|Yellow Boar Purple|Red|Red Web Green|Yellow Tentacle Green|Green|Purple Hourglass Blue|Yellow|Yellow Brazier Red|Red|Yellow|Yellow Prism Blue|Green|Purple|Red|Yellow Tree Green|Green|Green|Green|Green Megalith Gold|Gold Ox Gold|Red|Yellow|Blue Chameleon Gold|Purple|Yellow}
#VAR EnchantPrices {Worrystone ice|gold|silver|horn|dust Firelash gold|silver|dust|dust Hearing silver|silver|silver|horn|horn|horn|horn|kola Fist silver|horn|horn Cold gold|gold|horn|horn|dust|dust Waterwalking ice|gold|gold|silver|kola Flame silver Electric gold|gold|gold|gold|gold|kola|kola Firewall horn|horn|horn|dust|silver|silver|silver Brooch ice|dust|dust|horn|silver|silver Key gold Eye obsidian Augment dust|dust|silver|gold|kola|kola|kola|kola Meteor dust|arrow Magic horn|horn|horn|horn|horn|gold|silver|silver Knife silver Comprehension ice|ice|gold|gold|gold|silver|silver|silver|silver|horn|horn|horn|kola Icewall ice|dust Mushroom ice Whirlwind silver|dust|horn Concealment silver|silver|silver|silver|silver|gold Fire ice|silver|silver Bauble dust|kola Monolith gold|silver Dreamcatcher gold|gold|gold|gold|silver|silver|silver|silver|horn|horn Negation gold|kola Cube silver|silver Pestilence silver|silver|horn|gold Stasis gold|gold|gold|gold|ice|ice|ice|horn|horn|horn|dust|dust|silver|kola|kola Scabbard gold|gold|gold|ice|ice|ice|horn|horn|horn|dust|dust|dust|silver|silver Orb dust Purity ice|ice|ice|ice|gold|dust}
#VAR RunePrices {Kena red Uruz blue|yellow Fehu red Pithakhan red Jera purple Inguz red Wunjo red Lagul purple Sowulu red Algiz green Isaz red|blue Dagaz red|green Gebu gold Gebo gold Gular red Raido green Thurisaz red|blue Lagua purple Hugalaz blue Nauthiz blue|yellow Mannaz red Othala red|red|red|red|red Sleizak blue Tiwaz red|red|blue Berkana yellow|yellow|yellow Nairat yellow Eihwaz blue|yellow Laguz purple Loshre blue Totem wood|wood|wood|wood|wood|wood|wood|wood|wood|wood|wood|wood|wood|wood|wood|wood|wood|wood|wood|wood|leather|leather|leather|leather|leather|leather|leather|leather|leather|leather|silver|silver}
#VAR ConcoctPrices {Immunity sac|sac|ash|echinacea|echinacea Epidermal kuzu|kuzu|bloodroot|hawthorn|ginseng Mana slipper|bellwort|hawthorn|bloodroot Health valerian|goldenseal|ginseng|myrrh Venom sac|cohosh|kelp|skullcap Frost kelp|pear|ginseng Caloric kuzu|kuzu|valerian|kelp|kelp|bellwort Levitation kelp|kelp|pear|feather Mending dust|kelp|kuzu|ginger|ginger Mass moss|bloodroot|kuzu|dust Speed skin|skin|kuzu|goldenseal|ginger Restoration gold|gold|kuzu|kuzu|valerian|bellwort}
#VAR PriceMod {1} {1}
#VAR PriceTemp {0} {0}
#VAR ErrorNote {0} {0}
#VAR OrderCheck {0} {0}
#VAR OrderItems {} {}
#VAR OrderPrice {0} {0}
#VAR SalesRecord {}
#VAR Recording {0}
#VAR OrderItemsCounted {} {}
#CLASS 0
|
|
|
|
|
|
MattLofton
GURU
Joined: 23 Dec 2000
Posts: 4834
Location: USA
|
Posted: Mon Jul 19, 2010 2:20 am
|
1)#PRIORITY is no longer valid.
2)implicit concatenation in most cases is no longer valid (more true for the 3.xx series than 2.37).
3)if you are zscript-familiar, you should read the helpfile section about what's changed for zmud users. |
|
_________________
EDIT: I didn't like my old signature |
 |
|
|
charneus
Wizard
Joined: 19 Jun 2005
Posts: 1876
Location: California
|
Posted: Mon Jul 19, 2010 4:12 am
|
4) Quotes makes things literal strings, so "%-1" is treated as %-1 instead of the parameters.
5) Run the Compatibility Report under File in the Package editor. It'll tell you several things that are incorrect.
Charneus |
|
|
|
|
|
|
|
|
You cannot post new topics in this forum
You cannot reply to topics in this forum
You cannot edit your posts in this forum
You cannot delete your posts in this forum
You cannot vote in polls in this forum
|
|
