 |
Rennus
Beginner
Joined: 30 Dec 2003
Posts: 22
Location: USA
|
 Posted: Fri Mar 26, 2004 12:01 am
YAMTS (Yet Another Medievia Trade Script)
|
Based upon Carabs' and Jessew's trade run scripts. This script pretty much has it all. (A townie called it "the Cadilac of Trade Scripts") *shrugs*
Destinations, cargo, values, CPM's and DISTANCES are displayed for each item (I added distances for Trading TOW towngames). You may customize the level at which you consider bad, so-so, or good (red, yellow, green) for the Values, CPMs and Distances through an included command. Uses built in %ansi command so no additional color script is neccessary. Values can be sent through zChat, and here's the REAL draw of this script. You may recall any tradepost that you have valued using the ShowTP command.
Currently, you MUST be able to see room names for this to work (fix is forthcoming in a future version). Help/instrucitons are available in the valuehelp command.
Future revisions also will include a command to change cargo types (like when Opium went to Poppyseed), and a command to add/change trade posts.
Comments welcome. Enjoy.
| Code: |
#CLASS {Trading}
#CLASS 0
#CLASS {Trading|Aliases}
#CLASS 0
#CLASS {Trading|Aliases|User}
#ALIAS ValueAll {GetLoc;resetval;addheader;Allvalues}
#ALIAS ChangeCargo {#var OldCargo {%pick( o:1, @Goods)} {%null} {Trading|Variables};#var NewCargo {%prompt( "Please enter the new name of the cargo as it appears on Med")} {%null} {Trading|Variables};#var CargoNum {%ismember( @OldCargo, @Goods)} {%null} {Trading|Variables};#if {%int( @CargoNum) > 0} {%replaceitem( @NewCargo, %int( @CargoNum), @Goods)} {#show "That Cargo was not found"}}
#ALIAS ChangePost {}
#ALIAS ChatValues {CHValues}
#ALIAS ChatTP {#var TPVal {%pick( "o:1", @Posts.names)} {%null} {Trading|Variables};CHTP @{TPVal}}
#ALIAS SetValues {CValues}
#ALIAS ValueTP {GetLoc;resetval;#var vallist {%pick( "p:Pick the trade posts you wish to value", @Posts.names)};ListValue}
#ALIAS ValueHelp {#forall @ValHelp {#show %exec "%i"}}
#ALIAS showvalues {#show "Current values for @CurLoc";#forall @{@{CurLoc}_Val} {#Show %eval "%i"}}
#ALIAS clanvalues {cl Current values for @CurLoc;#forall @{@{CurLoc}_Val} {cl %i}}
#ALIAS tellvalues {tell %1 Current values for @CurLoc;#forall @{@{CurLoc}_Val} {rt %stripansi( %i)}}
#ALIAS townvalues {town Current values for @CurLoc;#forall @{@{CurLoc}_Val} {town %i}}
#ALIAS ShowTP {#var TPVal {%pick( "o:1", @Posts.names)} {%null} {Trading|Variables};TPShow @{TPVal}}
#CLASS 0
#CLASS {Trading|Aliases|System}
#ALIAS ChValues {#var ChatVals {%null} {%null} {Trading|Variables};#forall @{@{CurLoc}_Val} {#var ChatVals {%concat( @ChatVals, %i, %ansi( green), %char( 10))}} {%null};#chata @ChatVals}
#ALIAS AllValues {#var spcstr {" "} {%null} {Trading|Data};#forall @goods {value %i covered}}
#ALIAS adddist {#var DistStr {@CPMS} {%null} {Trading|Variables};#loop 4 {#if (%len( @DistStr) < %i) {#var DistStr {%concat( " ", @DistStr)}}};#if (%int( @DistStr) > %int( @DistMax)) {#var DistStr {%ansi( high, red)@DistStr}};#if (%int( @DistStr) < %int( @DistMin)) {#var DistStr {%ansi( high, green)@DistStr}} {#var DistStr {%ansi( high, Yellow)@DistStr}}}
#ALIAS addheader {#var BldStr {%ansi( high, Yellow)"Current Values for @CurLoc"};#additem @{curloc}_val {@bldstr};#var BldStr {%ansi( high, red)"LOCATION CARGO VALUE CPM DIST"};#additem @{curloc}_val {@bldstr};#var BldStr {%ansi( high, yellow)"--------------------------------------------"};#additem @{curloc}_val {@bldstr}}
#ALIAS addcargo {#var CargoStr {%1} {%null} {Trading|Variables};#loop 12 {#if (%len( @CargoStr) < %i) {#var CargoStr {%concat( @CargoStr , " ")}}}}
#ALIAS addprice {#var PriceStr {%replace( "%1", ",", "")} {%null} {Trading|Variables};#var TempPrice {@PriceStr} {%null} {Trading|Variables};#loop 7 {#if (%len( @PriceStr) < %i) {#var PriceStr {%concat( " ", @PriceStr)}}};#if (%int( @PriceStr) < %int( @ValMin)) {#var PriceStr {%ansi( high, red)@PriceStr}};#if (%int( @PriceStr) > %int( @ValMax)) {#var PriceStr {%ansi( high, green)@PriceStr}} {#var PriceSTr {%ansi( high, Yellow)@PriceStr}}}
#ALIAS adddest {#var ValLoc {@{Locations.%1}} {%null} {Trading|Variables};#var DestStr {@ValLoc} {%null} {Trading|Variables};#loop 12 {#if (%len( @DestStr) < %i) {#var DestStr {%concat( @DestStr, " ")}}};#var DestStr {%concat( %ansi( high, cyan), @DestStr)}}
#ALIAS makeval {#var BldStr {%concat @DestStr @CargoStr @PriceStr @CPMStr @DistStr} {%null} {Trading|Variables};#if {@CurLoc != @ValLoc} {#additem @{curloc}_val {@bldstr}}}
#ALIAS addcpm {#var CPMS {@{@{CurLoc}_dist.@{ValLoc}}} {%null} {Trading|Variables};#if (@CPMS = "NA") {#var CPMStr {"NA"} {%null} {Trading|Variables}} {#math CPMStr {%int( %1)/%int( @CPMS))} {Trading|Variables}};#loop 4 {#if (%len( @CPMStr) < %i) {#var CPMStr {%concat( " ", @CPMStr)}}};#if (%int( @CPMStr) < %int( @CPMMin)) {#var CPMStr {%ansi( high, red)@CPMStr}};#if (%int( @CPMStr) > %int( @CPMMax)) {#var CPMStr {%ansi( high, green)@CPMStr}} {#var CPMSTr {%ansi( high, Yellow)@CPMStr}}}
#ALIAS GetLoc {look}
#ALIAS CValues {#var ValMin {%prompt( 700000, "Enter the highest value that you want to be considered BAD")} {700000} {Trading|Variables};#var ValMax {%prompt( 1000000, "Enter the lowest value that you want to be considered GOOD")} {1000000} {Trading|Variables};#var CPMMax {%prompt( 700, "Enter the lowest value you consider to be GOOD")} {700}{Trading|Variables};#var CPMMin {%prompt( 400, "Enter the highest value you consider to be BAD")} {400}{Trading|Variables};#var DistMin {%prompt( 700, "Enter the lowest distance you consider to be GOOD")} {700}{Trading|Variables};#var DistMax {%prompt( 1500, "Enter the highest distance you consider to be BAD")} {1500}{Trading|Variables}}
#ALIAS ListValue {#forall @vallist {TPValue %i}}
#ALIAS TPValue {#var spcstr {" "} {%null} {Trading|Data};#forall @Posts.%1 {value %i covered}}
#ALIAS resetVal {#var @{Curloc}_Val {%null} {%null} {Trading|Variables|Values}}
#ALIAS TPShow {#show "Last known values for "@TPVal;#forall @{%1_Val} {#Show %eval "%i"}}
#ALIAS CHTP {#var ChatVals {%null} {%null} {Trading|Variables};#var ChatVals { %concat( "Last known values for ", %1, %char( 10))};#forall @{%1_Val} {#var ChatVals {%concat( @ChatVals, %i, %ansi( green), %char( 10))}} {%null};#chata @ChatVals}
#CLASS 0
#CLASS {Trading|Data}
#VAR Posts {names Athelasea|DeRah|Elwyn|Gdangus|Enatdae|Karlisna|Lyryanoth|Medievia|Mystara|NaeraMae|NewAshton|NewGenesia|RangersCabin|Riverton|Ruellia|SeasEnd|Trellor|UrVille|Vanlarra Athelasea Flowers|Arrows|Bows|Art|Parchment DeRah Artifacts|Candles|Herbs|Nuts|Hemp Elwyn Aloe|Quills|Balm Gdangus Bananas|Seed|Beans|Rice|Tobacco Enatdae Quilts|Silk|Fans|Silkworms|Illutian Karlisna Books|Cloth|Spices|Beer|Dates Lyryanoth Venom|Hides|Eggs|Glowworms|Mushrooms Medievia Ale|Tar|Salt|Sugar|Raisins Mystara Pearls|Teak|Carpet|Maps|Fish NaeraMae Armor|Chains|Mead|Pelts|Weapons NewAshton Silver|Jewels|Silicate|Nails|Copper NewGenesia Tools|Adamantite|Coal|Poppyseed|Iron RangersCabin Sap|Furs|Timber|Rations|Ivory Riverton Brandy|Metals|Honey|Grapes|Fertilizer Ruellia Emeralds|Willowbark|Cloaks|Rope|Waybread SeasEnd Opals|Ambergris|Shells|Nets|Kelp Trellor Wine|Perfume|Oils|Incense|Ink UrVille Vanlarra Silk|Crystal|Rum|Figs|Molasses}
#VAR ValHelp {%ansi(high, yellow)Trade Valuing Help| |%ansi(high,green)Commands|%ansi(high,yellow)--------------------------------------------------------------------------------|%ansi(high,red)SetValues %ansi(high,green)- %ansi(high,yellow)Configures the colors (%ansi(high,red)red,%ansi(high,yellow)yellow,%ansi(high,green)green%ansi(high,yellow)) for CPMs and Distances|%ansi(high,red)ValueHelp %ansi(high,green)- %ansi(high,yellow)This File.|%ansi(high,red)Valueall %ansi(high,green)- %ansi(high,yellow)Gets values from your current trade post location.|%ansi(high,red)Showvalues %ansi(high,green)- %ansi(high,yellow)Shows values from your current or last valued location.|%ansi(high,red)ValueTP %ansi(high,green)- %ansi(high,yellow)Allows you to value specific tradeposts at your current trade post location.|%ansi(high,red)ShowTP %ansi(high,green)- %ansi(high,yellow)Allows you to recall the last values from a specific trade post.|%ansi(high,red)ChatValues %ansi(high,green)- %ansi(high,yellow)Sends the values from your current/last valued trade post over chat.|%ansi(high,red)ChatTP %ansi(high,green)- %ansi(high,yellow)Sends the values from a specific trade post that you've valued over chat.| |%ansi(high,yellow)Instructions:|%ansi(high,green)Type %ansi(high,red)SetValues %ansi(high,green)to configure your colors for what you consider to be good or bad.|%ansi(high,green)This will allow you to set your personal preferences for CPMs (coins per move)|%ansi(high,green)and Distances from the trading post. ||%ansi(high,green)Go to any trading post and type either %ansi(high,red)Valueall %ansi(high,green)or %ansi(high,red)ValueTP%ansi(high,green). %ansi(high,red)Valueall %ansi(high,green)will get all|%ansi(high,green)values from the current location, while %ansi(high,red)ValueTP %ansi(high,green)will present you a list of trading|%ansi(high,green)posts to value. ||%ansi(high,green)You may recall any trade post that you have valued by typing %ansi(high,red)ShowTP %ansi(high,green)and selecting the|%ansi(high,green)post from the presented list.| |%ansi(high,green)When you view the lists, the far right columns will be shown as either red, yellow, or|%ansi(high,green)green. This will allows you to choose the best run for your chosen Trade location.|%ansi(high,green)Two red values are definately a bad run, two yellow values are good for an average|%ansi(high,green)run, and two green values are the best.| |%ansi(high,green)Distances were added so that you may choose the best run for trading TOW games.}
#VAR Goods {Flowers|Bows|Art|Parchment|Artifacts|Candles|Herbs|Nuts|Hemp|Aloe|Quills|Balm|Bananas|Seed|Beans|Rice|Tobacco|Quilts|Silk|Fans|Silkworms|Illutian|Books|Cloth|Spices|Beer|Dates|Venom|Hides|Eggs|Glowworms|Mushrooms|Ale|Tar|Salt|Sugar|Raisins|Pearls|Teak|Carpet|Maps|Fish|Armor|Chains|Mead|Pelts|Weapons|Silver|Jewels|Silicate|Nails|Copper|Tools|Adamantite|Coal|Poppyseed|Iron|Sap|Furs|Timber|Rations|Ivory|Brandy|Metals|Honey|Grapes|Fertilizer|Emeralds|Willowbark|Cloaks|Rope|Waybread|Opals|Ambergris|Shells|Nets|Kelp|Wine|Perfume|Oils|Incense|Ink|Silk|Crystal|Rum|Figs|Molasses}
#VAR Locations {Flowers Athelasea Arrows Athelasea Bows Athelasea Art Athelasea Parchment Athelasea Artifacts DeRah Candles DeRah Herbs DeRah Nuts DeRah Hemp DeRah Aloe Elwyn Quills Elwyn Balm Elwyn Bananas Gdangus Seed Gdangus Beans Gdangus Rice Gdangus Tobacco Gdangus Quilts Enatdae Silk Enatdae Fans Enatdae Silkworms Enatdae Illutian Enatdae Books Karlisna Cloth Karlisna Spices Karlisna Beer Karlisna Dates Karlisna Venom Lyryanoth Hides Lyryanoth Eggs Lyryanoth Glowworms Lyryanoth Mushrooms Lyryanoth Ale Medievia Tar Medievia Salt Medievia Sugar Medievia Raisins Medievia Pearls Mystara Teak Mystara Carpet Mystara Maps Mystara Fish Mystara Armor NaeraMae Chains NaeraMae Mead NaeraMae Pelts NaeraMae Weapons NaeraMae Silver NewAshton Jewels NewAshton Silicate NewAshton Nails NewAshton Copper NewAshton Tools NewGenesia Adamantite NewGenesia Coal NewGenesia Poppyseed NewGenesia Iron NewGenesia Sap RangersCabin Furs RangersCabin Timber RangersCabin Rations RangersCabin Ivory RangersCabin Brandy Riverton Metals Riverton Honey Riverton Grapes Riverton Fertilizer Riverton Emeralds Ruellia Willowbark Ruellia Cloaks Ruellia Rope Ruellia Waybread Ruellia Opals SeasEnd Ambergris SeasEnd Shells SeasEnd Nets SeasEnd Kelp SeasEnd Wine Trellor Perfume Trellor Oils Trellor Incense Trellor Ink Trellor Crystal Vanlarra Rum Vanlarra Figs Vanlarra Molasses Vanlarra}
#CLASS 0
#CLASS {Trading|Data|Distances}
#VAR Athelasea_dist {Athelasea 1 DeRah 1225 Elwyn 747 Enatdae 461 Gdangus 1262 Karlisna 1176 Lyryanoth 1332 Medievia 221 Mystara 776 NaeraMae NA NewAshton 668 NewGenesia 770 RangersCabin 503 Riverton 773 Ruellia 1111 SeasEnd 1548 Trellor 1160 UrVille NA Vanlarra 987}
#VAR DeRah_dist {Athelasea 1225 DeRah 1 Elwyn 1295 Enatdae 862 Gdangus 2376 Karlisna 2292 Lyryanoth 1880 Medievia 1072 Mystara 1627 NaeraMae NA NewAshton 1785 NewGenesia 1571 RangersCabin 1348 Riverton 1624 Ruellia 1912 SeasEnd 2552 Trellor 2264 UrVille NA Vanlarra 1838}
#VAR Elwyn_dist {Athelasea 747 DeRah 1295 Elwyn 1 Enatdae 418 Gdangus 1898 Karlisna 1814 Lyryanoth 655 Medievia 594 Mystara 1149 NaeraMae NA NewAshton 1307 NewGenesia 1093 RangersCabin 870 Riverton 1146 Ruellia 1464 SeasEnd 2184 Trellor 1486 UrVille NA Vanlarra 1336}
#VAR Gdangus_dist {Athelasea 1262 DeRah 2376 Elwyn 1898 Enatdae 1612 Gdangus 1 Karlisna 863 Lyryanoth 2483 Medievia 1330 Mystara 1380 NaeraMae NA NewAshton 1666 NewGenesia 1967 RangersCabin 1061 Riverton 1197 Ruellia 2308 SeasEnd 672 Trellor 1562 UrVille NA Vanlarra 1423}
#VAR Enatdae_dist {Athelasea 461 DeRah 862 Elwyn 418 Enatdae 1 Gdangus 1612 Karlisna 1528 Lyryanoth 1003 Medievia 308 Mystara 863 NaeraMae NA NewAshton 1021 NewGenesia 807 RangersCabin 584 Riverton 860 Ruellia 1148 SeasEnd 1898 Trellor 1500 UrVille NA Vanlarra 1059}
#VAR Karlisna_dist {Athelasea 1176 DeRah 2292 Elwyn 1814 Enatdae 1528 Gdangus 863 Karlisna 1 Lyryanoth 2399 Medievia 1246 Mystara 1256 NaeraMae NA NewAshton 752 NewGenesia 1795 RangersCabin 976 Riverton 1112 Ruellia 2136 SeasEnd 1149 Trellor 1349 UrVille NA Vanlarra 1338}
#VAR Lyryanoth_dist {Athelasea 1332 DeRah 1880 Elwyn 655 Enatdae 1003 Gdangus 2183 Karlisna 2399 Lyryanoth 1 Medievia 1179 Mystara 1734 NaeraMae NA NewAshton 1892 NewGenesia 1678 RangersCabin 1455 Riverton 1731 Ruellia 2019 SeasEnd 2768 Trellor 2371 UrVille NA Vanlarra 1921}
#VAR Medievia_dist {Athelasea 221 DeRah 1072 Elwyn 594 Enatdae 308 Gdangus 1330 Karlisna 1246 Lyryanoth 1179 Medievia 1 Mystara 575 NaeraMae NA NewAshton 781 NewGenesia 657 RangersCabin 302 Riverton 572 Ruellia 998 SeasEnd 1616 Trellor 1269 UrVille NA Vanlarra 896}
#VAR Mystara_dist {Athelasea 776 DeRah 1627 Elwyn 1149 Enatdae 863 Gdangus 1380 Karlisna 1256 Lyryanoth 1734 Medievia 575 Mystara 1 NaeraMae NA NewAshton 1336 NewGenesia 1212 RangersCabin 743 Riverton 307 Ruellia 1553 SeasEnd 1666 Trellor 1824 UrVille NA Vanlarra 281}
#VAR NaeraMae_dist {Athelasea NA DeRah NA Elwyn NA Enatdae NA Gdangus NA Karlisna NA Lyryanoth NA Medievia NA Mystara NA NaeraMae 1 NewAshton NA NewGenesia NA RangersCabin NA Riverton NA Ruellia NA SeasEnd NA Trellor NA UrVille NA Vanlarra NA}
#VAR NewAshton_dist {Athelasea 668 DeRah 1785 Elwyn 1307 Enatdae 1021 Gdangus 1666 Karlisna 752 Lyryanoth 1892 Medievia 781 Mystara 1336 NaeraMae NA NewAshton 1 NewGenesia 1196 RangersCabin 1063 Riverton 1333 Ruellia 1537 SeasEnd 1952 Trellor 494 UrVille NA Vanlarra 1547}
#VAR NewGenesia_dist {Athelasea 770 DeRah 1571 Elwyn 1093 Enatdae 807 Gdangus 1967 Karlisna 1795 Lyryanoth 1678 Medievia 657 Mystara 1212 NaeraMae NA NewAshton 1196 NewGenesia 1 RangersCabin 939 Riverton 1209 Ruellia 399 SeasEnd 2253 Trellor 1500 UrVille NA Vanlarra 1423}
#VAR RangersCabin_dist {Athelasea 503 DeRah 1348 Elwyn 870 Enatdae 584 Gdangus 1061 Karlisna 976 Lyryanoth 1455 Medievia 302 Mystara 743 NaeraMae NA NewAshton 1063 NewGenesia 939 RangersCabin 1 Riverton 740 Ruellia 1280 SeasEnd 1347 Trellor 1551 UrVille NA Vanlarra 958}
#VAR Riverton_dist {Athelasea 773 DeRah 1624 Elwyn 1146 Enatdae 860 Gdangus 1197 Karlisna 1112 Lyryanoth 1731 Medievia 572 Mystara 307 NaeraMae NA NewAshton 1333 NewGenesia 1209 RangersCabin 740 Riverton 1 Ruellia 1550 SeasEnd 1483 Trellor 1821 UrVille NA Vanlarra 518}
#VAR Ruellia_dist {Athelasea 1111 DeRah 1912 Elwyn 1434 Enatdae 1148 Gdangus 2308 Karlisna 2136 Lyryanoth 2019 Medievia 998 Mystara 1553 NaeraMae NA NewAshton 1537 NewGenesia 399 RangersCabin 1280 Riverton 1550 Ruellia 1 SeasEnd 2594 Trellor 2169 UrVille NA Vanlarra 1764}
#VAR SeasEnd_dist {Athelasea 1548 DeRah 2662 Elwyn 2184 Enatdae 1898 Gdangus 672 Karlisna 1149 Lyryanoth 2768 Medievia 1616 Mystara 1666 NaeraMae NA NewAshton 1952 NewGenesia 2253 RangersCabin 1347 Riverton 1483 Ruellia 2594 SeasEnd 1 Trellor 1774 UrVille NA Vanlarra 1709}
#VAR Trellor_dist {Athelasea 1160 DeRah 2264 Elwyn 1786 Enatdae 1500 Gdangus 1562 Karlisna 1349 Lyryanoth 2371 Medievia 1269 Mystara 1824 NaeraMae NA NewAshton 494 NewGenesia 1500 RangersCabin 1551 Riverton 1821 Ruellia 2169 SeasEnd 1774 Trellor 1 UrVille NA Vanlarra 2035}
#VAR Vanlarra_dist {Athelasea 987 DeRah 1838 Elwyn 1336 Enatdae 1059 Gdangus 1423 Karlisna 1338 Lyryanoth 1621 Medievia 896 Mystara 281 NaeraMae NA NewAshton 1547 NewGenesia 1423 RangersCabin 958 Riverton 518 Ruellia 1764 SeasEnd 1709 Trellor 2038 Urville NA Vanlarra 1}
#VAR Urville_dist {Athelasea NA DeRah NA Elwyn NA Enatdae NA Gdangus NA Karlisna NA Lyryanoth NA Medievia NA Mystara NA NaeraMae NA NewAshton NA NewGenesia NA RangersCabin NA Riverton NA Ruellia NA SeasEnd NA Trellor NA UrVille 1 Vanlarra NA}
#CLASS 0
#CLASS {Trading|Triggers}
#CLASS 0
#CLASS {Trading|Triggers|Location}
#TRIGGER {An Elven Marketplace} {#var CurLoc {"Athelasea"} {%null} {Trading|Variables}}
#TRIGGER {Ur-vile Feeding Hall} {#var CurLoc {"UrVille"} {%null} {Trading|Variables}}
#TRIGGER {DeRah Villadom's Small Trading Post} {#var CurLoc {"DeRah"} {%null} {Trading|Variables}}
#TRIGGER {A Quiet Temple Shop} {#var CurLoc {"Elwyn"} {%null} {Trading|Variables}}
#TRIGGER {The Trading Post of G'dangus} {#var CurLoc {"Gdangus"} {%null} {Trading|Variables}}
#TRIGGER {The Hidden City Tradeshop} {#var CurLoc {"Enatdae"} {%null} {Trading|Variables}}
#TRIGGER {Trading Post of the City of Karlisna} {#var CurLoc {"Karlisna"} {%null} {Trading|Variables}}
#TRIGGER {The Lizard Boulangere} {#var CurLoc {"Lyryanoth"} {%null} {Trading|Variables}}
#TRIGGER {Medievia Trading Shop} {#var CurLoc {"Medievia"} {%null} {Trading|Variables}}
#TRIGGER {Tanivsport Traders} {#var CurLoc {"Mystara"} {%null} {Trading|Variables}}
#TRIGGER {A Minotaur Trading Outpost} {#var CurLoc {"Naeramae"} {%null} {Trading|Variables}}
#TRIGGER {New Ashton Trading Post} {#var CurLoc {"NewAshton"} {%null} {Trading|Variables}}
#TRIGGER {Trading Post of the Dark Army} {#var CurLoc {"NewGenesia"} {%null} {Trading|Variables}}
#TRIGGER {Ranger's Cabin} {#var CurLoc {"RangersCabin"} {%null} {Trading|Variables}}
#TRIGGER {Riverton Trading Partners} {#var CurLoc {"Riverton"} {%null} {Trading|Variables}}
#TRIGGER {Hidden Valley Traders, Inc.} {#var CurLoc {"Ruellia"} {%null} {Trading|Variables}}
#TRIGGER {Sea's End Direct Merchants} {#var CurLoc {"SeasEnd"} {%null} {Trading|Variables}}
#TRIGGER {Trading Shop of Trellor City} {#var CurLoc {"Trellor"} {%null} {Trading|Variables}}
#TRIGGER {Vanlarra Imports and Exports} {#var CurLoc {"Vanlarra"} {%null} {Trading|Variables}}
#CLASS 0
#CLASS {Trading|Triggers|Valuing}
#TRIGGER {A covered wagon horse can carry * of (*). We'll pay you (*) gold for that.} {;#math pricelen (20-%len( %replace( "%2", ",", "")));adddest %1;addcargo %1;addprice %2;addcpm @TempPrice;adddist;makeval}
#CLASS 0
#CLASS {Trading|Variables}
#VAR CurLoc {} {}
#VAR ValLoc {} {}
#VAR ValList {SeasEnd}
#VAR BldStr {} {}
#VAR pricelen {} {}
#VAR deststr {} {}
#VAR CargoStr {} {}
#VAR PriceStr {} {}
#VAR CPMStr {} {}
#VAR CPMS {} {}
#VAR TPVal {} {}
#VAR DistStr {} {}
#VAR ValMin {700000} {700000}
#VAR ValMax {1000000} {1000000}
#VAR ChatVals {} {}
#VAR TempPrice {} {}
#VAR OldCargo {} {}
#VAR NewCargo {} {}
#VAR CargoNum {} {}
#CLASS 0
#CLASS {Trading|Variables|Values}
#VAR Athelasea_Val {} {}
#VAR DeRah_Val {} {}
#VAR Elwyn_Val {} {}
#VAR Gdangus_Val {} {}
#VAR Enatdae_Val {} {}
#VAR Karlisna_Val {} {}
#VAR Lyryanoth_Val {} {}
#VAR Medievia_Val {} {}
#VAR Mystara_Val {} {}
#VAR NaeraMae_Val {} {}
#VAR NewAshton_Val {} {}
#VAR NewGenesia_Val {} {}
#VAR RangersCabin_Val {} {}
#VAR Riverton_Val {} {}
#VAR Ruellia_Val {} {}
#VAR SeasEnd_Val {} {}
#VAR Trellor_Val {} {}
#VAR Vanlarra_Val {} {}
#VAR UrVille_Val {} {}
#CLASS 0
|
|
|
|
|
|
Carabas
GURU
Joined: 28 Sep 2000
Posts: 434
Location: USA
|
Posted: Fri Mar 26, 2004 6:25 pm
|
Interesting. It looks a lot like the new script I was working on before life threw a monkey wrench at me. Good job :)
If you based the distances off my script, then they are incorrect. I am unsure if jessew's distances are correct or not. I have made available an excel spreadsheet of the correct distances as of sometime last month. It can be found here. |
|
|
|
|
Rennus
Beginner
Joined: 30 Dec 2003
Posts: 22
Location: USA
|
Posted: Fri Mar 26, 2004 10:01 pm
|
Thanks for the "Good job". Coming from you, thats pretty high praise.. ;) Anyway, I downloaded your distances and if they are different, I'll update and repost the appropriate portion.
|
|
|
|
|
Rennus
Beginner
Joined: 30 Dec 2003
Posts: 22
Location: USA
|
Posted: Sat Apr 03, 2004 7:19 pm
|
Here it is.. YAMTS 2.0
***changes***:
*Put in new CPM distances from Carabas' spreadsheet - now correct.
*Added UrVille trading caculator - Shows number of trips required for cargo, and also shows CPMs so you know what you are REALLY getting into (takes distance for cargo to Rue, then adds 2 x distance between Rue and Urville x number of trips)
*Added command to change cargo item automagically throughout the script so that when items change, you don't have to go hunting.
This is probably the last update until I get brave enough to start DarkWoods trading, or something major changes in Med Trading.
When using this script, please delete the old "trading" class.. I decided to change the name of the base class.
"undocumented feature" reports can be put here, or mudmailed to Rennus. 
| Code: |
#CLASS {YAMTS}
#CLASS 0
#CLASS {YAMTS|Aliases}
#CLASS 0
#CLASS {YAMTS|Aliases|User}
#ALIAS ValueAll {GetLoc;resetval;#if (@curloc = "UrVille") {URTrip} {addheader;Allvalues}}
#ALIAS ChangeCargo {#var OldCargo {%pick( o:1, @Goods)} {%null} {YAMTS|Variables};#var NewCargo {%prompt( @OldCargo, "Please enter the new name of the cargo as it appears on Med")} {%null} {YAMTS|Variables};;;; Change the value in the Goods list;;;#forall @Goods {#if (@OldCargo = %i) {#additem NewGoods {@NewCargo}} {#additem NewGoods {%i}}};#var Goods {%null} {%null} {YAMTS|Data};#var Goods {@NewGoods} {%null} {YAMTS|Data};#unvar NewGoods;;;;Now change the Post information;;;#var PostChange {@{Locations.@OldCargo}};#var Posts.@{PostChange} {%replace( @{Posts.@PostChange}, @OldCargo, @NewCargo)};;;;and finally, change the location information;#delkey Locations {@OldCargo};#addkey Locations @NewCargo @PostChange}
#ALIAS ChatValues {CHValues}
#ALIAS ChatTP {#var TPVal {%pick( "o:1", @Posts.names)} {%null} {YAMTS|Variables};CHTP @{TPVal}}
#ALIAS SetValues {CValues}
#ALIAS ValueTP {GetLoc;resetval;#var vallist {%pick( "p:Pick the trade posts you wish to value", @Posts.names)};ListValue}
#ALIAS ValueHelp {#forall @ValHelp {#show %exec "%i"}}
#ALIAS showvalues {#show "Current values for @CurLoc";#forall @{@{CurLoc}_Val} {#Show %eval "%i"}}
#ALIAS clanvalues {cl Current values for @CurLoc;#forall @{@{CurLoc}_Val} {cl %i}}
#ALIAS tellvalues {tell %1 Current values for @CurLoc;#forall @{@{CurLoc}_Val} {rt %stripansi( %i)}}
#ALIAS townvalues {town Current values for @CurLoc;#forall @{@{CurLoc}_Val} {town %i}}
#ALIAS ShowTP {#var TPVal {%pick( "o:1", @Posts.names)} {%null} {YAMTS|Variables};TPShow @{TPVal}}
#CLASS 0
#CLASS {YAMTS|Aliases|System}
#ALIAS ChValues {#var ChatVals {%null} {%null} {YAMTS|Variables};#forall @{@{CurLoc}_Val} {#var ChatVals {%concat( @ChatVals, %i, %ansi( green), %char( 10))}} {%null};#chata @ChatVals}
#ALIAS URTrip {addURheader;AllValues}
#ALIAS AllValues {#forall @goods {value %i covered}}
#ALIAS adddist {#var DistStr {@CPMS} {%null} {YAMTS|Variables};#loop 4 {#if (%len( @DistStr) < %i) {#var DistStr {%concat( " ", @DistStr)}}};#if (%int( @DistStr) > %int( @DistMax)) {#var DistStr {%ansi( high, red)@DistStr}};#if (%int( @DistStr) < %int( @DistMin)) {#var DistStr {%ansi( high, green)@DistStr}} {#var DistStr {%ansi( high, Yellow)@DistStr}}}
#ALIAS addheader {#var BldStr {%ansi( high, Yellow)"Current Values for @CurLoc"};#additem @{curloc}_val {@bldstr};#var BldStr {%ansi( high, red)"LOCATION CARGO VALUE CPM DIST"};#additem @{curloc}_val {@bldstr};#var BldStr {%ansi( high, yellow)"--------------------------------------------"};#additem @{curloc}_val {@bldstr}}
#ALIAS addcargo {#var CargoStr {%1} {%null} {YAMTS|Variables};#loop 12 {#if (%len( @CargoStr) < %i) {#var CargoStr {%concat( @CargoStr , " ")}}}}
#ALIAS addprice {#var PriceStr {%replace( "%1", ",", "")} {%null} {YAMTS|Variables};#var TempPrice {@PriceStr} {%null} {YAMTS|Variables};#loop 7 {#if (%len( @PriceStr) < %i) {#var PriceStr {%concat( " ", @PriceStr)}}};#if (%int( @PriceStr) < %int( @ValMin)) {#var PriceStr {%ansi( high, red)@PriceStr}};#if (%int( @PriceStr) > %int( @ValMax)) {#var PriceStr {%ansi( high, green)@PriceStr}} {#var PriceSTr {%ansi( high, Yellow)@PriceStr}}}
#ALIAS adddest {#var ValLoc {@{Locations.%1}} {%null} {YAMTS|Variables};#var DestStr {@ValLoc} {%null} {YAMTS|Variables};#loop 12 {#if (%len( @DestStr) < %i) {#var DestStr {%concat( @DestStr, " ")}}};#var DestStr {%concat( %ansi( high, cyan), @DestStr)}}
#ALIAS makeval {#var BldStr {%concat @DestStr @CargoStr @PriceStr @CPMStr @DistStr} {%null} {YAMTS|Variables};#if {@CurLoc != @ValLoc} {#additem @{curloc}_val {@bldstr}}}
#ALIAS addcpm {#var CPMS {@{@{CurLoc}_dist.@{ValLoc}}} {%null} {YAMTS|Variables};#if (@CPMS = "NA") {#var CPMStr {"NA"} {%null} {YAMTS|Variables}} {#math CPMStr {%int( %1)/%int( @CPMS))} {YAMTS|Variables}};#loop 4 {#if (%len( @CPMStr) < %i) {#var CPMStr {%concat( " ", @CPMStr)}}};#if (%int( @CPMStr) < %int( @CPMMin)) {#var CPMStr {%ansi( high, red)@CPMStr}};#if (%int( @CPMStr) > %int( @CPMMax)) {#var CPMStr {%ansi( high, green)@CPMStr}} {#var CPMSTr {%ansi( high, Yellow)@CPMStr}}}
#ALIAS GetLoc {look}
#ALIAS CValues {#var ValMin {%prompt( 700000, "Enter the highest value that you want to be considered BAD")} {700000} {YAMTS|Variables};#var ValMax {%prompt( 1000000, "Enter the lowest value that you want to be considered GOOD")} {1000000} {YAMTS|Variables};#var CPMMax {%prompt( 700, "Enter the lowest value you consider to be GOOD")} {700}{YAMTS|Variables};#var CPMMin {%prompt( 400, "Enter the highest value you consider to be BAD")} {400}{YAMTS|Variables};#var DistMin {%prompt( 700, "Enter the lowest distance you consider to be GOOD")} {700}{YAMTS|Variables};#var DistMax {%prompt( 1500, "Enter the highest distance you consider to be BAD")} {1500}{YAMTS|Variables}}
#ALIAS ListValue {#forall @vallist {TPValue %i}}
#ALIAS TPValue {#forall @Posts.%1 {value %i covered}}
#ALIAS resetVal {#var @{Curloc}_Val {%null} {%null} {YAMTS|Variables|Values}}
#ALIAS TPShow {#show "Last known values for "@TPVal;#forall @{%1_Val} {#Show %eval "%i"}}
#ALIAS CHTP {#var ChatVals {%null} {%null} {YAMTS|Variables};#var ChatVals { %concat( "Last known values for ", %1, %char( 10))};#forall @{%1_Val} {#var ChatVals {%concat( @ChatVals, %i, %ansi( green), %char( 10))}} {%null};#chata @ChatVals}
#ALIAS addURheader {#var BldStr {%ansi( high, Yellow)"Current Values for @CurLoc"};#additem @{curloc}_val {@bldstr};#var BldStr {%ansi( high, red)"LOCATION CARGO VALUE CPM DIST TRIPS"};#additem @{curloc}_val {@bldstr};#var BldStr {%ansi( high, yellow)"--------------------------------------------------"};#additem @{curloc}_val {@bldstr}}
#ALIAS addURcpm {#var CPMS @{Ruellia_dist.@{ValLoc}} {%null} {YAMTS|Variables};#math CPMS {%int( @CPMS + %int( @RueUrv) * %int( @phtrips.%2))};#math CPMStr {%int( %1)/%int( @CPMS))} {YAMTS|Variables};#loop 4 {#if (%len( @CPMStr) < %i) {#var CPMStr {%concat( " ", @CPMStr)}}};#if (%int( @CPMStr) < %int( @CPMMin)) {#var CPMStr {%ansi( high, red)@CPMStr}};#if (%int( @CPMStr) > %int( @CPMMax)) {#var CPMStr {%ansi( high, green)@CPMStr}} {#var CPMSTr {%ansi( high, Yellow)@CPMStr}}}
#ALIAS addURdist {#var DistStr {@CPMS} {%null} {YAMTS|Variables};#loop 4 {#if (%len( @DistStr) < %i) {#var DistStr {%concat( " ", @DistStr)}}};#if (%int( @DistStr) > %int( @DistMax)) {#var DistStr {%ansi( high, red)@DistStr}};#if (%int( @DistStr) < %int( @DistMin)) {#var DistStr {%ansi( high, green)@DistStr}} {#var DistStr {%ansi( high, Yellow)@DistStr}}}
#ALIAS addURtrips {#var URTrips {@phtrips.%1} {%null} {YAMTS|Variables};#loop 3 {#if (%len( @URTrips) < %i) {#var URTrips {%concat( " ", @URTrips)}}}}
#ALIAS makeURval {#var BldStr {%concat @DestStr @CargoStr @PriceStr @CPMStr @DistStr @URTrips} {%null} {YAMTS|Variables};#if {@CurLoc != @ValLoc} {#additem @{curloc}_val {@bldstr}}}
#CLASS 0
#CLASS {YAMTS|Data}
#VAR ValHelp {%ansi(high, yellow)YAMTS - (Yet Another Medieva Trading Script) Version 2.0| |%ansi(high,green)Commands|%ansi(high,yellow)--------------------------------------------------------------------------------|%ansi(high,red)SetValues %ansi(high,green)- %ansi(high,yellow)Configures the colors (%ansi(high,red)red,%ansi(high,yellow)yellow,%ansi(high,green)green%ansi(high,yellow)) for CPMs and Distances|%ansi(high,red)ValueHelp %ansi(high,green)- %ansi(high,yellow)This File.|%ansi(high,red)Valueall %ansi(high,green)- %ansi(high,yellow)Gets values from your current trade post location.|%ansi(high,red)Showvalues %ansi(high,green)- %ansi(high,yellow)Shows values from your current or last valued location.|%ansi(high,red)ValueTP %ansi(high,green)- %ansi(high,yellow)Allows you to value specific tradeposts at your current trade post location.|%ansi(high,red)ShowTP %ansi(high,green)- %ansi(high,yellow)Allows you to recall the last values from a specific trade post.|%ansi(high,red)ChatValues %ansi(high,green)- %ansi(high,yellow)Sends the values from your current/last valued trade post over chat.|%ansi(high,red)ChatTP %ansi(high,green)- %ansi(high,yellow)Sends the values from a specific trade post that you've valued over chat.|%ansi(high,red)ChangeCargo %ansi(high,green)- %ansi(high,yellow)Changes a cargo item throughout the entire script.| |%ansi(high,yellow)Instructions:|%ansi(high,green)Type %ansi(high,red)SetValues %ansi(high,green)to configure your colors for what you consider to be good or bad.|%ansi(high,green)This will allow you to set your personal preferences for CPMs (coins per move)|%ansi(high,green)and Distances from the trading post. ||%ansi(high,green)Go to any trading post and type either %ansi(high,red)Valueall %ansi(high,green)or %ansi(high,red)ValueTP%ansi(high,green). %ansi(high,red)Valueall %ansi(high,green)will get all|%ansi(high,green)values from the current location, while %ansi(high,red)ValueTP %ansi(high,green)will present you a list of trading|%ansi(high,green)posts to value. ||%ansi(high,green)You may recall any trade post that you have valued by typing %ansi(high,red)ShowTP %ansi(high,green)and selecting the|%ansi(high,green)post from the presented list.| |%ansi(high,green)When you view the lists, the far right columns will be shown as either red, yellow, or|%ansi(high,green)green. This will allows you to choose the best run for your chosen Trade location.|%ansi(high,green)Three red values are definately a bad run, two yellow values are good for an average|%ansi(high,green)run, and three green values are the best.| |%ansi(high,green)The %ansi(high,red)ChangeCargo %ansi(high,green)command allows you to change the name of a cargo item throughout the|%ansi(high,green)entire script. You will be presented with a list from which to chose, then prompted |%ansi(high,green)to enter a new cargo name for that item. This keeps you from having to hunt through |%ansi(high,green)the script when the names change.| |%ansi(high,green)Distances were added so that you may choose the best run for trading TOW games.}
#VAR Posts {names Athelasea|DeRah|Elwyn|Gdangus|Enatdae|Karlisna|Lyryanoth|Medievia|Mystara|NaeraMae|NewAshton|NewGenesia|RangersCabin|Riverton|Ruellia|SeasEnd|Trellor|UrVille|Vanlarra Athelasea Flowers|Arrows|Bows|Art|Parchment DeRah Artifacts|Candles|Herbs|Nuts|Hemp Elwyn Aloe|Quills|Balm Gdangus Bananas|Seed|Beans|Rice|Tobacco Enatdae Quilts|Silk|Fans|Silkworms|Illutian Karlisna Books|Cloth|Spices|Beer|Dates Lyryanoth Venom|Hides|Eggs|Glowworms|Mushrooms Medievia Ale|Tar|Salt|Sugar|Raisins Mystara Pearls|Teak|Carpet|Maps|Fish NaeraMae Armor|Chains|Mead|Pelts|Weapons NewAshton Silver|Jewels|Silicate|Nails|Copper NewGenesia Tools|Adamantite|Coal|Poppyseed|Iron RangersCabin Sap|Furs|Timber|Rations|Ivory Riverton Brandy|Metals|Honey|Grapes|Fertilizer Ruellia Emeralds|Willowbark|Cloaks|Rope|Waybread SeasEnd Opals|Ambergris|Shells|Nets|Kelp Trellor Wine|Perfume|Oils|Incense|Ink UrVille Vanlarra Wands|Crystal|Rum|Figs|Molasses}
#VAR Locations {Flowers Athelasea Arrows Athelasea Bows Athelasea Art Athelasea Parchment Athelasea Artifacts DeRah Candles DeRah Herbs DeRah Nuts DeRah Hemp DeRah Aloe Elwyn Quills Elwyn Balm Elwyn Bananas Gdangus Seed Gdangus Beans Gdangus Rice Gdangus Tobacco Gdangus Quilts Enatdae Silk Enatdae Fans Enatdae Silkworms Enatdae Illutian Enatdae Books Karlisna Cloth Karlisna Spices Karlisna Beer Karlisna Dates Karlisna Venom Lyryanoth Hides Lyryanoth Eggs Lyryanoth Glowworms Lyryanoth Mushrooms Lyryanoth Ale Medievia Tar Medievia Salt Medievia Sugar Medievia Raisins Medievia Pearls Mystara Teak Mystara Carpet Mystara Maps Mystara Fish Mystara Armor NaeraMae Chains NaeraMae Mead NaeraMae Pelts NaeraMae Weapons NaeraMae Silver NewAshton Jewels NewAshton Silicate NewAshton Nails NewAshton Copper NewAshton Tools NewGenesia Adamantite NewGenesia Coal NewGenesia Poppyseed NewGenesia Iron NewGenesia Sap RangersCabin Furs RangersCabin Timber RangersCabin Rations RangersCabin Ivory RangersCabin Brandy Riverton Metals Riverton Honey Riverton Grapes Riverton Fertilizer Riverton Emeralds Ruellia Willowbark Ruellia Cloaks Ruellia Rope Ruellia Waybread Ruellia Opals SeasEnd Ambergris SeasEnd Shells SeasEnd Nets SeasEnd Kelp SeasEnd Wine Trellor Perfume Trellor Oils Trellor Incense Trellor Ink Trellor Wands Vanlarra Crystal Vanlarra Rum Vanlarra Figs Vanlarra Molasses Vanlarra}
#VAR cwagon {Flowers 56 Arrows 47 Bows 56 Art 42 Parchment 170 Artifacts 11 Candles 85 Herbs 68 Nuts 28 Hemp 34 Aloe 280 Quills 170 Balm 112 Bananas 34 Seed 42 Beans 48 Rice 42 Tobacco 56 Quilts 34 Silk 26 Fans 68 Silkworms 37 Illutian 85 Books 28 Cloth 24 Spices 68 Beer 11 Dates 38 Venom 85 Hides 48 Eggs 34 Glowworms 113 Mushrooms 113 Ale 11 Tar 8 Salt 85 Sugar 34 Raisins 42 Pearls 85 Teak 17 Carpet 14 Maps 42 Fish 42 Armor 18 Chains 7 Mead 11 Pelts 46 Weapons 18 Silver 10 Jewels 20 Silicate 21 Nails 34 Copper 6 Tools 24 Adamantite 11 Coal 21 Poppyseed 48 Iron 7 Sap 11 Furs 68 Timber 1 Rations 34 Ivory 37 Brandy 42 Metals 28 Honey 42 Grapes 56 Fertilizer 43 Emeralds 85 Willowbark 280 Cloaks 42 Rope 42 Waybread 85 Opals 68 Ambergris 56 Shells 56 Nets 28 Kelp 42 Wine 11 Perfume 140 Oils 56 Incense 56 Ink 85 Wands 28 Crystal 68 Rum 11 Figs 68 Molasses 11}
#VAR Goods {Flowers|Bows|Arrows|Art|Parchment|Artifacts|Candles|Herbs|Nuts|Hemp|Aloe|Quills|Balm|Bananas|Seed|Beans|Rice|Tobacco|Quilts|Silk|Fans|Silkworms|Illutian|Books|Cloth|Spices|Beer|Dates|Venom|Hides|Eggs|Glowworms|Mushrooms|Ale|Tar|Salt|Sugar|Raisins|Pearls|Teak|Carpet|Maps|Fish|Armor|Chains|Mead|Pelts|Weapons|Silver|Jewels|Silicate|Nails|Copper|Tools|Adamantite|Coal|Poppyseed|Iron|Sap|Furs|Timber|Rations|Ivory|Brandy|Metals|Honey|Grapes|Fertilizer|Emeralds|Willowbark|Cloaks|Rope|Waybread|Opals|Ambergris|Shells|Nets|Kelp|Wine|Perfume|Oils|Incense|Ink|Wands|Crystal|Rum|Figs|Molasses}
#VAR phtrips {Flowers 14 Arrows 8 Bows 14 Art 14 Parchment 14 Artifacts 11 Candles 16 Herbs 14 Nuts 7 Hemp 9 Aloe 14 Quills 14 Balm 14 Bananas 7 Seed 9 Beans 10 Rice 9 Tobacco 12 Quilts 7 Silk 9 Fans 9 Silkworms 8 Illutian 9 Books 7 Cloth 12 Spices 14 Beer 11 Dates 14 Venom 11 Hides 12 Eggs 9 Glowworms 8 Mushrooms 12 Ale 11 Tar 8 Salt 15 Sugar 7 Raisins 7 Pearls 15 Teak 9 Carpet 7 Maps 7 Fish 7 Armor 9 Chains 7 Mead 11 Pelts 16 Weapons 18 Silver 10 Jewels 10 Silicate 7 Nails 7 Copper NA Tools 8 Adamantite 11 Coal 7 Poppyseed 10 Iron 7 Sap 11 Furs 14 Timber NA Rations 9 Ivory 8 Brandy 14 Metals 7 Honey 9 Grapes 14 Fertilizer 15 Emeralds 11 Willowbark 14 Cloaks 7 Rope 9 Waybread 9 Opals 7 Ambergris 10 Shells 12 Nets 7 Kelp 11 Wine 11 Perfume 14 Oils 9 Incense 7 Ink 11 Wands 14 Crystal 13 Rum 11 Figs 13 Molasses 11}
#VAR mutrips {Flowers 10 Arrows 6 Bows 11 Art 9 Parchment 10 Artifacts 6 Candles 10 Herbs 10 Nuts 5 Hemp 7 Aloe 10 Quills 10 Balm 11 Bananas 5 Seed 6 Beans 8 Rice 6 Tobacco 8 Quilts 5 Silk 5 Fans 7 Silkworms 5 Illutian 7 Books 5 Cloth 6 Spices 10 Beer 6 Dates 10 Venom 8 Hides 10 Eggs 7 Glowworms 5 Mushrooms 9 Ale 6 Tar 4 Salt 10 Sugar 5 Raisins 5 Pearls 10 Teak 9 Carpet 5 Maps 5 Fish 5 Armor 6 Chains 7 Mead 6 Pelts 12 Weapons 6 Silver 5 Jewels 5 Silicate 5 Nails 5 Copper 6 Tools 5 Adamantite 6 Coal 5 Poppyseed 7 Iron 7 Sap 6 Furs 9 Timber NA Rations 7 Ivory 5 Brandy 11 Metals 5 Honey 6 Grapes 12 Fertilizer 11 Emeralds 8 Willowbark 10 Cloaks 5 Rope 6 Waybread 7 Opals 5 Ambergris 7 Shells 8 Nets 5 Kelp 9 Wine 6 Perfume 10 Oils 7 Incense 5 Ink 8 Wands 7 Crystal 10 Rum 6 Figs 10 Molasses 6}
#VAR RueUrv {364}
#CLASS 0
#CLASS {YAMTS|Data|Distances}
#VAR Athelasea_dist {Athelasea 1 DeRah 1223 Elwyn 707 Enatdae 461 Gdangus 1262 Karlisna 1177 Lyryanoth 1292 Medievia 221 Mystara 776 NaeraMae NA NewAshton 666 NewGenesia 770 RangersCabin 503 Riverton 773 Ruellia 1111 SeasEnd 1546 Trellor 1158 UrVille NA Vanlarra 987}
#VAR DeRah_dist {Athelasea 1223 DeRah 1 Elwyn 1178 Enatdae 862 Gdangus 2379 Karlisna 2292 Lyryanoth 1763 Medievia 1070 Mystara 1625 NaeraMae NA NewAshton 1783 NewGenesia 1569 RangersCabin 1352 Riverton 1622 Ruellia 1910 SeasEnd 2663 Trellor 2275 UrVille NA Vanlarra 1836}
#VAR Elwyn_dist {Athelasea 707 DeRah 1178 Elwyn 1 Enatdae 416 Gdangus 1863 Karlisna 1178 Lyryanoth 655 Medievia 554 Mystara 1109 NaeraMae NA NewAshton 1267 NewGenesia 1053 RangersCabin 836 Riverton 1106 Ruellia 1394 SeasEnd 2147 Trellor 1759 UrVille NA Vanlarra 1320}
#VAR Gdangus_dist {Athelasea 1262 DeRah 2376 Elwyn 1898 Enatdae 1612 Gdangus 1 Karlisna 863 Lyryanoth 2483 Medievia 1330 Mystara 1380 NaeraMae NA NewAshton 1666 NewGenesia 1967 RangersCabin 1061 Riverton 1197 Ruellia 2308 SeasEnd 672 Trellor 1562 UrVille NA Vanlarra 1423}
#VAR Enatdae_dist {Athelasea 461 DeRah 862 Elwyn 416 Enatdae 1 Gdangus 1617 Karlisna 1532 Lyryanoth 1001 Medievia 308 Mystara 863 NaeraMae NA NewAshton 1021 NewGenesia 807 RangersCabin 590 Riverton 860 Ruellia 1148 SeasEnd 1901 Trellor 1513 UrVille NA Vanlarra 1074}
#VAR Karlisna_dist {Athelasea 1177 DeRah 2294 Elwyn 1778 Enatdae 1532 Gdangus 863 Karlisna 1 Lyryanoth 2363 Medievia 1246 Mystara 1295 NaeraMae NA NewAshton 1579 NewGenesia 1841 RangersCabin 976 Riverton 1112 Ruellia 2182 SeasEnd 1147 Trellor 1347 UrVille NA Vanlarra 1506}
#VAR Lyryanoth_dist {Athelasea 1292 DeRah 1763 Elwyn 655 Enatdae 1001 Gdangus 2448 Karlisna 2363 Lyryanoth 1 Medievia 1139 Mystara 1694 NaeraMae NA NewAshton 1852 NewGenesia 1638 RangersCabin 1421 Riverton 1691 Ruellia 1979 SeasEnd 2732 Trellor 2344 UrVille NA Vanlarra 1905}
#VAR Medievia_dist {Athelasea 221 DeRah 1070 Elwyn 554 Enatdae 308 Gdangus 1331 Karlisna 1246 Lyryanoth 1139 Medievia 1 Mystara 575 NaeraMae NA NewAshton 781 NewGenesia 657 RangersCabin 302 Riverton 572 Ruellia 998 SeasEnd 1615 Trellor 1273 UrVille NA Vanlarra 786}
#VAR Mystara_dist {Athelasea 776 DeRah 1625 Elwyn 1109 Enatdae 863 Gdangus 1380 Karlisna 1295 Lyryanoth 1694 Medievia 575 Mystara 1 NaeraMae NA NewAshton 1336 NewGenesia 1212 RangersCabin 743 Riverton 307 Ruellia 1553 SeasEnd 1664 Trellor 1828 UrVille NA Vanlarra 281}
#VAR NaeraMae_dist {Athelasea NA DeRah NA Elwyn NA Enatdae NA Gdangus NA Karlisna NA Lyryanoth NA Medievia NA Mystara NA NaeraMae 1 NewAshton NA NewGenesia NA RangersCabin NA Riverton NA Ruellia NA SeasEnd NA Trellor NA UrVille NA Vanlarra NA}
#VAR NewAshton_dist {Athelasea 666 DeRah 1783 Elwyn 1267 Enatdae 1021 Gdangus 1664 Karlisna 1579 Lyryanoth 1852 Medievia 781 Mystara 1336 NaeraMae NA NewAshton 1 NewGenesia 1190 RangersCabin 1063 Riverton 1333 Ruellia 1531 SeasEnd 1948 Trellor 496 UrVille NA Vanlarra 1547}
#VAR NewGenesia_dist {Athelasea 770 DeRah 1569 Elwyn 1053 Enatdae 807 Gdangus 1926 Karlisna 1841 Lyryanoth 1638 Medievia 657 Mystara 1212 NaeraMae NA NewAshton 1190 NewGenesia 1 RangersCabin 393 Riverton 1209 Ruellia 399 SeasEnd 2210 Trellor 1492 UrVille NA Vanlarra 1423}
#VAR RangersCabin_dist {Athelasea 503 DeRah 1352 Elwyn 836 Enatdae 590 Gdangus 1061 Karlisna 976 Lyryanoth 1421 Medievia 302 Mystara 743 NaeraMae NA NewAshton 1063 NewGenesia 939 RangersCabin 1 Riverton 586 Ruellia 1280 SeasEnd 1345 Trellor 1555 UrVille NA Vanlarra 954}
#VAR Riverton_dist {Athelasea 77. DeRah 1622 Elwyn 1106 Enatdae 860 Gdangus 1197 Karlisna 1112 Lyryanoth 1691 Medievia 572 Mystara 307 NaeraMae NA NewAshton 1333 NewGenesia 1209 RangersCabin 589 Riverton 1 Ruellia 1550 SeasEnd 1481 Trellor 1707 UrVille NA Vanlarra 518}
#VAR Ruellia_dist {Athelasea 1111 DeRah 1910 Elwyn 1394 Enatdae 1148 Gdangus 2267 Karlisna 2182 Lyryanoth 1979 Medievia 998 Mystara 1553 NaeraMae NA NewAshton 1531 NewGenesia 399 RangersCabin 1280 Riverton 1550 Ruellia 1 SeasEnd 2551 Trellor 1833 UrVille NA Vanlarra 1764}
#VAR SeasEnd_dist {Athelasea 1546 DeRah 2663 Elwyn 2147 Enatdae 1901 Gdangus 670 Karlisna 1147 Lyryanoth 2732 Medievia 1615 Mystara 1664 NaeraMae NA NewAshton 1948 NewGenesia 2210 RangersCabin 1345 Riverton 1481 Ruellia 2551 SeasEnd 1 Trellor 1800 UrVille NA Vanlarra 1875}
#VAR Trellor_dist {Athelasea 1158 DeRah 2275 Elwyn 1759 Enatdae 1513 Gdangus 1516 Karlisna 1347 Lyryanoth 2344 Medievia 1273 Mystara 1828 NaeraMae NA NewAshton 496 NewGenesia 1492 RangersCabin 1555 Riverton 1707 Ruellia 1833 SeasEnd 1800 Trellor 1 UrVille NA Vanlarra 2039}
#VAR Vanlarra_dist {Athelasea 987 DeRah 1836 Elwyn 1320 Enatdae 1074 Gdangus 1591 Karlisna 1506 Lyryanoth 1905 Medievia 786 Mystara 261 NaeraMae NA NewAshton 1547 NewGenesia 1423 RangersCabin 954 Riverton 518 Ruellia 1764 SeasEnd 1875 Trellor 2036 Urville NA Vanlarra 1}
#VAR Urville_dist {Athelasea NA DeRah NA Elwyn NA Enatdae NA Gdangus NA Karlisna NA Lyryanoth NA Medievia NA Mystara NA NaeraMae NA NewAshton NA NewGenesia NA RangersCabin NA Riverton NA Ruellia NA SeasEnd NA Trellor NA UrVille 1 Vanlarra NA}
#CLASS 0
#CLASS {YAMTS|Triggers}
#CLASS 0
#CLASS {YAMTS|Triggers|Location}
#TRIGGER {An Elven Marketplace} {#var CurLoc {"Athelasea"} {%null} {YAMTS|Variables}}
#TRIGGER {Ur-vile Feeding Hall} {#var CurLoc {"UrVille"} {%null} {YAMTS|Variables}}
#TRIGGER {DeRah Villadom's Small Trading Post} {#var CurLoc {"DeRah"} {%null} {YAMTS|Variables}}
#TRIGGER {A Quiet Temple Shop} {#var CurLoc {"Elwyn"} {%null} {YAMTS|Variables}}
#TRIGGER {The Trading Post of G'dangus} {#var CurLoc {"Gdangus"} {%null} {YAMTS|Variables}}
#TRIGGER {The Hidden City Tradeshop} {#var CurLoc {"Enatdae"} {%null} {YAMTS|Variables}}
#TRIGGER {Trading Post of the City of Karlisna} {#var CurLoc {"Karlisna"} {%null} {YAMTS|Variables}}
#TRIGGER {The Lizard Boulangere} {#var CurLoc {"Lyryanoth"} {%null} {YAMTS|Variables}}
#TRIGGER {Medievia Trading Shop} {#var CurLoc {"Medievia"} {%null} {YAMTS|Variables}}
#TRIGGER {Tanivsport Traders} {#var CurLoc {"Mystara"} {%null} {YAMTS|Variables}}
#TRIGGER {A Minotaur Trading Outpost} {#var CurLoc {"Naeramae"} {%null} {YAMTS|Variables}}
#TRIGGER {New Ashton Trading Post} {#var CurLoc {"NewAshton"} {%null} {YAMTS|Variables}}
#TRIGGER {Trading Post of the Dark Army} {#var CurLoc {"NewGenesia"} {%null} {YAMTS|Variables}}
#TRIGGER {Ranger's Cabin} {#var CurLoc {"RangersCabin"} {%null} {YAMTS|Variables}}
#TRIGGER {Riverton Trading Partners} {#var CurLoc {"Riverton"} {%null} {YAMTS|Variables}}
#TRIGGER {Hidden Valley Traders, Inc.} {#var CurLoc {"Ruellia"} {%null} {YAMTS|Variables}}
#TRIGGER {Sea's End Direct Merchants} {#var CurLoc {"SeasEnd"} {%null} {YAMTS|Variables}}
#TRIGGER {Trading Shop of Trellor City} {#var CurLoc {"Trellor"} {%null} {YAMTS|Variables}}
#TRIGGER {Vanlarra Imports and Exports} {#var CurLoc {"Vanlarra"} {%null} {YAMTS|Variables}}
#CLASS 0
#CLASS {YAMTS|Triggers|Valuing}
#TRIGGER {A covered wagon horse can carry * of (*). We'll pay you (*) gold for that.} {;#math pricelen (20-%len( %replace( "%2", ",", "")));#if (@curloc = "UrVille") {adddest %1;addcargo %1;addprice %2;addURcpm @TempPrice %1;addURdist %1;addURtrips %1;makeURval} {adddest %1;addcargo %1;addprice %2;addcpm @TempPrice;adddist;makeval}}
#CLASS 0
#CLASS {YAMTS|Variables}
#VAR CurLoc {} {}
#VAR ValLoc {} {}
#VAR ValList {}
#VAR BldStr {} {}
#VAR pricelen {} {}
#VAR deststr {} {}
#VAR CargoStr {} {}
#VAR PriceStr {} {}
#VAR CPMStr {} {}
#VAR CPMS {} {}
#VAR TPVal {} {}
#VAR DistStr {} {}
#VAR ValMin {700000} {700000}
#VAR ValMax {1000000} {1000000}
#VAR ChatVals {} {}
#VAR TempPrice {} {}
#VAR OldCargo {} {}
#VAR NewCargo {} {}
#VAR CargoNum {} {}
#VAR CPMMax {700} {700}
#VAR CPMMin {400} {400}
#VAR DistMin {700} {700}
#VAR DistMax {1500} {1500}
#VAR URTrips {} {}
#CLASS 0
#CLASS {YAMTS|Variables|Values}
#VAR Athelasea_Val {} {}
#VAR DeRah_Val {} {}
#VAR Elwyn_Val {} {}
#VAR Gdangus_Val {} {}
#VAR Enatdae_Val {} {}
#VAR Karlisna_Val {} {}
#VAR Lyryanoth_Val {} {}
#VAR Medievia_Val {} {}
#VAR Mystara_Val {} {}
#VAR NaeraMae_Val {}
#VAR NewAshton_Val {} {}
#VAR NewGenesia_Val {} {}
#VAR RangersCabin_Val {} {}
#VAR Riverton_Val {} {}
#VAR Ruellia_Val {} {}
#VAR SeasEnd_Val {} {}
#VAR Trellor_Val {} {}
#VAR Vanlarra_Val {} {}
#VAR UrVille_Val {} {}
#VAR _Val {} {}
#CLASS 0
|
|
|
|
|
|
|
|
|
|
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
|
|
