/action {We will pay you %0 gold for each %1.} {/variable {TempValue} {$0};/variable {CalculatedValue} {0};/math {CurrentTradeItem} {$CurrentTradeItem + 1};/math {CalculatedValue} {100000000 + ($TempValue * @Word(@GetItem(TradeItemList,$CurrentTradeItem),3))};/itemadd {TradeItemValues} {$CalculatedValue @Word(@GetItem(TradeItemList,$CurrentTradeItem),2) @Word(@GetItem(TradeItemList,$CurrentTradeItem),1) @Word(@GetItem(TradeItemList,$CurrentTradeItem),3)}} {TradeValue}
/action {They don't buy or sell that here.} {/itemadd {TradeItemValues} {0000000000 Null Value for a Item)}
/alias {chattrade %0} {/if {@GetCount(TradeItemList) != @GetCount(TradeItemValues)} {/showme {@Chr(10)@AnsiBold()@ForeRed()ERROR:@Chr(10)@ForeWhite()Valued list count does not match trade item list count. Try valuing again...}} {/if {@IsNumber($0) == 1 && $0 > 0 && $0 <= @GetCount(TradeItemList)} {/var {ChatTrade} {@AnsiBold()@ForeRed()Top [@ForeYellow()$0@ForeRed()] Trade Values: @ForeYellow()($TradeLocation)@Chr(10)@Chr(10)@ForeBlue()[==@ForeRed()Value@ForeBlue()==] [====@ForeRed()Item@ForeBlue()====] [=@ForeRed()#@ForeBlue()=] [=====@ForeRed()From@ForeBlue()=====]@Chr(10)};/loop {@GetCount(TradeItemValues),@Math((@GetCount(TradeItemValues) - $0) + 1)} {/variable {CoveredLength} {@Len(@Word(@GetItem(TradeItemValues,$LoopCount),4))};/variable {ValueLength} {@Len(@Math(@Word(@GetItem(TradeItemValues,$LoopCount),1) - 100000000))};/variable {ItemLength} {@Len(@Word(@GetItem(TradeItemValues,$LoopCount),2))};/variable {PostLength} {@Len(@Word(@GetItem(TradeItemValues,$LoopCount),3))};/variable {ChatTrade} {@ConCat($ChatTrade,@ForeBlue()[@ForeWhite()@PadLeft(@Math(@Word(@GetItem(TradeItemValues,$LoopCount),1)-100000000), ,@Math(9 - $ValueLength))@ForeBlue()] [@ForeWhite()@PadLeft(@Word(@GetItem(TradeItemValues,$LoopCount),2), ,@Math(12 - $ItemLength))@ForeBlue()] [@ForeWhite()@PadLeft(@Word(@GetItem(TradeItemValues,$LoopCount),4), ,@Math(3 - $CoveredLength))@ForeBlue()] [@ForeWhite()@PadLeft(@Word(@GetItem(TradeItemValues,$LoopCount),3), ,@Math(14 - $PostLength))@ForeBlue()]@Chr(10))}};/chatall @Chr(10)$ChatTrade} {/showme {@Chr(10)@AnsiBold()@ForeRed()ERROR:@Chr(10)@ForeWhite()Number must be between 1 and @GetCount(TradeItemList)...@Chr(10)@Chr(10)@ForeRed()Syntax: @ForeBlue()chattrade @ForeMagenta()<# To Display>}}}} {TradeValue}
/alias {listtrade %0} {/if {@GetCount(TradeItemList) != @GetCount(TradeItemValues)} {/showme {@Chr(10)@AnsiBold()@ForeRed()ERROR:@Chr(10)@ForeWhite()Valued list count does not match trade item list count. Try valuing again...}} {/if {@IsNumber(@Word($0,1)) == 1 && @Word($0,1) > 0 && @Word($0,1) < @GetCount(TradeItemList)} {@Word($0,2) Top [@Word($0,1)] Trade Values: ($TradeLocation);@Word($0,2) [==Value==] [====Item====] [=#=] [=====From=====];/loop {@GetCount(TradeItemValues),@Math((@GetCount(TradeItemValues) - @Word($0,1)) + 1)} {/variable {CoveredLength} {@Len(@Word(@GetItem(TradeItemValues,$LoopCount),4))};/variable {ValueLength} {@Len(@Math(@Word(@GetItem(TradeItemValues,$LoopCount),1) - 100000000))};/variable {ItemLength} {@Len(@Word(@GetItem(TradeItemValues,$LoopCount),2))};/variable {PostLength} {@Len(@Word(@GetItem(TradeItemValues,$LoopCount),3))};@Word($0,2) [@PadLeft(@Math(@Word(@GetItem(TradeItemValues,$LoopCount),1)-100000000), ,@Math(9 - $ValueLength))] [@PadLeft(@Word(@GetItem(TradeItemValues,$LoopCount),2), ,@Math(12 - $ItemLength))] [@PadLeft(@Word(@GetItem(TradeItemValues,$LoopCount),4), ,@Math(3 - $CoveredLength))] [@PadLeft(@Word(@GetItem(TradeItemValues,$LoopCount),3), ,@Math(14 - $PostLength))]}} {/showme {@Chr(10)@AnsiBold()@ForeRed()ERROR:@Chr(10)@ForeWhite()Missing or invalid parameters...@Chr(10)@Chr(10)@ForeRed()Syntax: @ForeBlue()listtrade @ForeMagenta()<# To Display> <Channel>}}}} {TradeValue}
/alias {showtrade %0} {/if {@GetCount(TradeItemList) != @GetCount(TradeItemValues)} {/showme {@Chr(10)@AnsiBold()@ForeRed()ERROR:@Chr(10)@ForeWhite()Valued list count does not match trade item list count. Try valuing again...}} {/if {@IsNumber($0) == 1 && $0 > 0 && $0 <= @GetCount(TradeItemList)} {/showme {@Chr(10)@AnsiBold()@ForeRed()Top [@ForeYellow()$0@ForeRed()] Trade Values: @ForeYellow()($TradeLocation)@Chr(10)@Chr(10)@ForeBlue()[==@ForeRed()Value@ForeBlue()==] [====@ForeRed()Item@ForeBlue()====] [=@ForeRed()#@ForeBlue()=] [=====@ForeRed()From@ForeBlue()=====]};/loop {@GetCount(TradeItemValues),@Math((@GetCount(TradeItemValues) - $0) + 1)} {/variable {CoveredLength} {@Len(@Word(@GetItem(TradeItemValues,$LoopCount),4))};/variable {ValueLength} {@Len(@Math(@Word(@GetItem(TradeItemValues,$LoopCount),1) - 100000000))};/variable {ItemLength} {@Len(@Word(@GetItem(TradeItemValues,$LoopCount),2))};/variable {PostLength} {@Len(@Word(@GetItem(TradeItemValues,$LoopCount),3))};/showme {@ForeBlue()[@ForeWhite()@PadLeft(@Math(@Word(@GetItem(TradeItemValues,$LoopCount),1)-100000000), ,@Math(9 - $ValueLength))@ForeBlue()] [@ForeWhite()@PadLeft(@Word(@GetItem(TradeItemValues,$LoopCount),2), ,@Math(12 - $ItemLength))@ForeBlue()] [@ForeWhite()@PadLeft(@Word(@GetItem(TradeItemValues,$LoopCount),4), ,@Math(3 - $CoveredLength))@ForeBlue()] [@ForeWhite()@PadLeft(@Word(@GetItem(TradeItemValues,$LoopCount),3), ,@Math(14 - $PostLength))@ForeBlue()]}}} {/showme {@Chr(10)@AnsiBold()@ForeRed()ERROR:@Chr(10)@ForeWhite()Number must be between 1 and @GetCount(TradeItemList)...@Chr(10)@Chr(10)@ForeRed()Syntax: @ForeBlue()showtrade @ForeMagenta()<# To Display>}}}} {TradeValue}
/alias {tradehelp} {/showme {@Chr(10)@AnsiBold()@ForeRed()Trade Value Help:@Chr(10)@Chr(10)@ForeGreen()Commands:@Chr(10)         @ForeBlue()valueall @ForeMagenta()<Trade Shop Name> @ForeWhite()- Do this at a trade post and the script @Chr(10)         will value all the possible trade items in the game.@Chr(10)         @ForeBlue()showtrade @ForeMagenta()<# To Display> @ForeWhite()- This displays a local summary of the @Chr(10)         prices to you.@Chr(10)         @ForeBlue()chattrade @ForeMagenta()<# To Display> @ForeWhite()- This displays a summary of the prices over @Chr(10)         your chat channel.@Chr(10)         @ForeBlue()listtrade @ForeMagenta()<# To Display> <Channel To Display On> @ForeWhite()- This displays a @Chr(10)         summary of the prices over a channel of your choice.@Chr(10)@Chr(10)@ForeGreen()@PadLeft(Written by Keirgar, ,60)@Chr(10)@PadLeft(Version 1.1, ,67)}} {TradeValue}
/alias {valueall %0} {/if {@IsEmpty($0) == 1} {/showme {@Chr(10)@AnsiBold()@ForeRed()ERROR:@Chr(10)@ForeWhite()Trade Post Parameter missing...@Chr(10)@Chr(10)@ForeRed()Syntax: @ForeBlue()valueall @ForeMagenta()<Trade Post Name>}} {/variable {TradeLocation} {$0};/variable {CurrentTradeItem} {0};/clearlist {TradeItemValues};buy mule;/loop {1,@GetCount(TradeItemList)} {value @Word(@GetItem(TradeItemList,$LoopCount),2)};sell mule}} {TradeValue}
/variable {CalculatedValue} {0} {TradeValue}
/variable {CoveredLength} {0} {TradeValue}
/variable {CurrentTradeItem} {0} {TradeValue}
/variable {ItemLength} {0} {TradeValue}
/variable {PostLength} {0} {TradeValue}
/variable {TradeLocation} {None} {TradeValue}
/variable {ValueLength} {0} {TradeValue}
/listadd {TradeItemList} {TradeValue}
/itemadd {TradeItemList} {Derah artifacts 11}
/itemadd {TradeItemList} {Derah candles 85}
/itemadd {TradeItemList} {Derah hemp 34}
/itemadd {TradeItemList} {Derah herbs 68}
/itemadd {TradeItemList} {Derah nuts 28}
/itemadd {TradeItemList} {Gdangus bananas 34}
/itemadd {TradeItemList} {Gdangus beans 48}
/itemadd {TradeItemList} {Gdangus rice 42}
/itemadd {TradeItemList} {Gdangus seed 42}
/itemadd {TradeItemList} {Gdangus tobacco 56}
/itemadd {TradeItemList} {HiddenValley cloaks 42}
/itemadd {TradeItemList} {HiddenValley emeralds 85}
/itemadd {TradeItemList} {HiddenValley rope 42}
/itemadd {TradeItemList} {HiddenValley waybread 85}
/itemadd {TradeItemList} {HiddenValley willowbark 280}
/itemadd {TradeItemList} {Karlisna beer 11}
/itemadd {TradeItemList} {Karlisna books 28}
/itemadd {TradeItemList} {Karlisna cloth 20}
/itemadd {TradeItemList} {Karlisna dates 42}
/itemadd {TradeItemList} {Karlisna spices 68}
/itemadd {TradeItemList} {Lyryanoth eggs 34}
/itemadd {TradeItemList} {Lyryanoth glowworms 113}
/itemadd {TradeItemList} {Lyryanoth hides 48}
/itemadd {TradeItemList} {Lyryanoth mushrooms 113}
/itemadd {TradeItemList} {Lyryanoth venom 85}
/itemadd {TradeItemList} {Medievia ale 11}
/itemadd {TradeItemList} {Medievia raisins 42}
/itemadd {TradeItemList} {Medievia salt 85}
/itemadd {TradeItemList} {Medievia sugar 34}
/itemadd {TradeItemList} {Medievia tar 8}
/itemadd {TradeItemList} {NaeraMae armor 18}
/itemadd {TradeItemList} {NaeraMae chains 7}
/itemadd {TradeItemList} {NaeraMae mead 11}
/itemadd {TradeItemList} {NaeraMae pelts 46}
/itemadd {TradeItemList} {NaeraMae weapons 13}
/itemadd {TradeItemList} {NewAsthon copper 6}
/itemadd {TradeItemList} {NewAsthon jewels 20}
/itemadd {TradeItemList} {NewAsthon nails 34}
/itemadd {TradeItemList} {NewAsthon silicate 21}
/itemadd {TradeItemList} {NewAsthon silver 10}
/itemadd {TradeItemList} {NewGenesia adamantite 11}
/itemadd {TradeItemList} {NewGenesia coal 21}
/itemadd {TradeItemList} {NewGenesia iron 7}
/itemadd {TradeItemList} {NewGenesia poppyseed 48}
/itemadd {TradeItemList} {NewGenesia tools 24}
/itemadd {TradeItemList} {RangerCabin furs 68}
/itemadd {TradeItemList} {RangerCabin ivory 37}
/itemadd {TradeItemList} {RangerCabin rations 34}
/itemadd {TradeItemList} {RangerCabin sap 11}
/itemadd {TradeItemList} {RangerCabin timber 1}
/itemadd {TradeItemList} {Riverton brandy 42}
/itemadd {TradeItemList} {Riverton fertilizer 43}
/itemadd {TradeItemList} {Riverton grapes 56}
/itemadd {TradeItemList} {Riverton honey 42}
/itemadd {TradeItemList} {Riverton metals 28}
/itemadd {TradeItemList} {SeasEnd ambergris 56}
/itemadd {TradeItemList} {SeasEnd kelp 42}
/itemadd {TradeItemList} {SeasEnd nets 28}
/itemadd {TradeItemList} {SeasEnd opals 68}
/itemadd {TradeItemList} {SeasEnd shells 56}
/itemadd {TradeItemList} {Tasivport carpet 14}
/itemadd {TradeItemList} {Tasivport fish 42}
/itemadd {TradeItemList} {Tasivport maps 42}
/itemadd {TradeItemList} {Tasivport pearls 85}
/itemadd {TradeItemList} {Tasivport teak 17}
/itemadd {TradeItemList} {Temple aloe 280}
/itemadd {TradeItemList} {Temple balm 112}
/itemadd {TradeItemList} {Temple quills 170}
/itemadd {TradeItemList} {Trellor incense 56}
/itemadd {TradeItemList} {Trellor ink 85}
/itemadd {TradeItemList} {Trellor oils 56}
/itemadd {TradeItemList} {Trellor perfume 140}
/itemadd {TradeItemList} {Trellor wine 11}
/itemadd {TradeItemList} {Trilanisti arrows 47}
/itemadd {TradeItemList} {Trilanisti art 42}
/itemadd {TradeItemList} {Trilanisti bows 56}
/itemadd {TradeItemList} {Trilanisti flowers 56}
/itemadd {TradeItemList} {Trilanisti parchment 170}
/itemadd {TradeItemList} {Vanlarra crystal 68}
/itemadd {TradeItemList} {Vanlarra figs 42}
/itemadd {TradeItemList} {Vanlarra molasses 11}
/itemadd {TradeItemList} {Vanlarra rum 11}
/itemadd {TradeItemList} {Vanlarra wands 22}
/itemadd {TradeItemList} {E'nat quilts 13}
/itemadd {TradeItemList} {E'nat silk 13}
/itemadd {TradeItemList} {E'nat fans 74}
/itemadd {TradeItemList} {E'nat silkworms 27}
/itemadd {TradeItemList} {E'nat illutian 67}
/listadd {TradeItemValues} {TradeValue}