Trader Shop Inventory Logger (script)

Trader Shop Inventory Logger (script)
Category	information
Front-end	Genie
Author	Isharon

Description

These scripts and triggers will run through every Trader-owned shop in the market plazas and log inventory, making it easier to find what you want and compare prices. The data is stored in Shoplog.txt. The columns of data are separated by tabs so that you can copy and paste it to Excel for easy sorting.

Instructions

Syntax

Once installed, the triggers will do most of the work automatically. You simply need to start the appropriate script in the same room as the listings board. It will go from room to room, shopping at all of the shops and logging the results.

Making a Spreadsheet in Excel

[www.elanthia.org/TraderShops/TraderShopInventory-Blank.xls Template]: Here is a template that you can use to make your own spreadsheet.

1. Open Shoplog.txt
2. Delete the underscores ( _ ) from the price column.
3. Delete the periods ( . ) from the price column.
4. Copy and paste the data from Shoplog.txt to the spreadsheet.
5. To convert prices to plats, divide column E by 10000.
6. To convert the prices from Lirums to Kronars, multiply column E by 1.25.
7. To convert the prices from Dokoras to Kronars, multiply column E by 1.385.

If you need help using these features in Excel, see How to Use Microsoft Excel.

Triggers

#trigger {^(Behind|In|On|Under) the (.+), you see:$} {#var shop2 $2} {shop}
#trigger {^\s+(a|an|some|the) (.+) for (\d+) bronze (Kronars|Lirums|Dokoras)$} {#log >Shoplog.txt $date	$time	$2	$roomname	$3_0	$shop2		$shopcity} {shop}
#trigger {^\s+(a|an|some|the) (.+) for (\d+) copper (Kronars|Lirums|Dokoras)$} {#log >Shoplog.txt $date	$time	$2	$roomname	$3	$shop2		$shopcity} {shop}
#trigger {^\s+(a|an|some|the) (.+) for (\d+) gold (Kronars|Lirums|Dokoras)$} {#log >Shoplog.txt $date	$time	$2	$roomname	$3_000	$shop2		$shopcity} {shop}
#trigger {^\s+(a|an|some|the) (.+) for (\d+) platinum (Kronars|Lirums|Dokoras)$} {#log >Shoplog.txt $date	$time	$2	$roomname	$3_0000	$shop2		$shopcity} {shop}
#trigger {^\s+(a|an|some|the) (.+) for (\d+) silver (Kronars|Lirums|Dokoras)$} {#log >Shoplog.txt $date	$time	$2	$roomname	$3_00	$shop2		$shopcity} {shop}
#trigger {^\s+(a|an|some|the) (.+) for (\d+)k platinum (Kronars|Lirums|Dokoras)$} {#log >Shoplog.txt $date	$time	$2	$roomname	$3_000_0000	$shop2		$shopcity} {shop}
#trigger {^\s+(a|an|some|the) (.+) for (\d+\.\d+)k platinum (Kronars|Lirums|Dokoras)$} {#log >Shoplog.txt $date	$time	$2	$roomname	$3_000_000	$shop2		$shopcity} {shop}

Changelog

• 11/6/2012: Added support for more shop surfaces; reduced false matches.

Scripts

Shop2

This is the script that actually shops each surface. It must be named shop2.cmd to work. (The other scripts run shop2 when needed.)

action goto end when ^There is nothing to buy here

setvar altar 0
setvar armoir 0
setvar bale 0
setvar bar 0
setvar barn 0
setvar barrel 0
setvar basket 0
setvar bedroll 0
setvar bench 0
setvar bin 0
setvar block 0
setvar blossom 0
setvar boar 0
setvar board 0
setvar bookcase 0
setvar bookshelf 0
setvar bookshelves 0
setvar bookstand 0
setvar box 0
setvar branch 0
setvar breakfront 0
setvar broomstick 0
setvar bucket 0
setvar buffet 0
setvar bull 0
setvar bureau 0
setvar bust 0
setvar butterfly 0
setvar cabinet 0
setvar carpet 0
setvar cart 0
setvar carton 0
setvar case 0
setvar catalog 0
setvar cauldron 0
setvar chair 0
setvar chest 0
setvar closet 0
setvar cloud 0
setvar coffer 0
setvar container 0
setvar cord 0
setvar cornucopia 0
setvar corral 0
setvar cot 0
setvar counter 0
setvar cradle 0
setvar crate 0
setvar cushion 0
setvar desk 0
setvar display 0
setvar drawer 0
setvar dresser 0
setvar drum 0
setvar dummy 0
setvar easel 0
setvar endtable 0
setvar fence 0
setvar firepit 0
setvar footrest 0
setvar fountain 0
setvar framework 0
setvar garderobe 0
setvar goblin 0
setvar gourd 0
setvar grinder 0
setvar hand 0
setvar hanger 0
setvar hatstand 0
setvar head 0
setvar highboy 0
setvar hole 0
setvar hook 0
setvar horse 0
setvar jar 0
setvar keg 0
setvar lattice 0
setvar locker 0
setvar mannequin 0
setvar mantel 0
setvar mantle 0
setvar moon 0
setvar net 0
setvar niche 0
setvar ogre 0
setvar pail 0
setvar pallet 0
setvar panel 0
setvar peccary 0
setvar pedestal 0
setvar peg 0
setvar pegboard 0
setvar pew 0
setvar pillow 0
setvar pipe 0
setvar pit 0
setvar plank 0
setvar planter 0
setvar platter 0
setvar plinth 0
setvar podium 0
setvar pole 0
setvar post 0
setvar pumpkin 0
setvar quilt 0
setvar rack 0
setvar rope 0
setvar rug 0
setvar salver 0
setvar sawhorse 0
setvar shelf 0
setvar shell 0
setvar shelves 0
setvar showcase 0
setvar sidebar 0
setvar sideboard 0
setvar skeleton 0
setvar skippet 0
setvar spittoon 0
setvar stable 0
setvar stand 0
setvar star 0
setvar stool 0
setvar stove 0
setvar stump 0
setvar sun 0
setvar table 0
setvar tomb 0
setvar tray 0
setvar tree 0
setvar trestle 0
setvar trough 0
setvar trunk 0
setvar turtle 0
setvar urn 0
setvar valet 0
setvar vanity 0
setvar vat 0
setvar wall 0
setvar wardrobe 0
setvar waterwheel 0
setvar web 0
setvar webbing 0
setvar workbench 0
setvar worktable 0

ACTION setvar altar 1 WHEN ^\s+(an?|some|the).+altar
ACTION setvar armoir 1 WHEN ^\s+(an?|some|the).+armoir
ACTION setvar bale 1 WHEN ^\s+(an?|some|the).+\bbales?\b
ACTION setvar bar 1 WHEN ^\s+(an?|some|the).+\bbars?\b
ACTION setvar barn 1 WHEN ^\s+(an?|some|the).+\bbarns?\b
ACTION setvar barrel 1 WHEN ^\s+(an?|some|the).+barrel
ACTION setvar basket 1 WHEN ^\s+(an?|some|the).+basket
ACTION setvar bedroll 1 WHEN ^\s+(an?|some|the).+bedroll
ACTION setvar bench 1 WHEN ^\s+(an?|some|the).+\bbenche?s?\b
ACTION setvar bin 1 WHEN ^\s+(an?|some|the).+\bbins?\b
ACTION setvar block 1 WHEN ^\s+(an?|some|the).+\bblocks?\b
ACTION setvar blossom 1 WHEN ^\s+(an?|some|the).+blossom
ACTION setvar boar 1 WHEN ^\s+(an?|some|the).+\bboars?\b
ACTION setvar board 1 WHEN ^\s+(an?|some|the).+\bboards?\b
ACTION setvar bookcase 1 WHEN ^\s+(an?|some|the).+bookcase
ACTION setvar bookshelf 1 WHEN ^\s+(an?|some|the).+bookshelf
ACTION setvar bookshelves 1 WHEN ^\s+(an?|some|the).+bookshelves
ACTION setvar bookstand 1 WHEN ^\s+(an?|some|the).+bookstand
ACTION setvar box 1 WHEN ^\s+(an?|some|the).+\bboxe?s?\b
ACTION setvar branch 1 WHEN ^\s+(an?|some|the).+\bbranche?s?\b
ACTION setvar breakfront 1 WHEN ^\s+(an?|some|the).+breakfront
ACTION setvar broomstick 1 WHEN ^\s+(an?|some|the).+broomstick
ACTION setvar bucket 1 WHEN ^\s+(an?|some|the).+bucket
ACTION setvar buffet 1 WHEN ^\s+(an?|some|the).+buffet
ACTION setvar bull 1 WHEN ^\s+(an?|some|the).+\bbulls?\b
ACTION setvar bureau 1 WHEN ^\s+(an?|some|the).+bureau
ACTION setvar bust 1 WHEN ^\s+(an?|some|the).+\bbusts?\b
ACTION setvar butterfly 1 WHEN ^\s+(an?|some|the).+butterfly
ACTION setvar cabinet 1 WHEN ^\s+(an?|some|the).+cabinet
ACTION setvar carpet 1 WHEN ^\s+(an?|some|the).+carpet
ACTION setvar cart 1 WHEN ^\s+(an?|some|the).+\bcarts?\b
ACTION setvar carton 1 WHEN ^\s+(an?|some|the).+carton
ACTION setvar case 1 WHEN ^\s+(an?|some|the).+\bcases?\b
ACTION setvar catalog 1 WHEN ^\s+(an?|some|the).+catalog
ACTION setvar cauldron 1 WHEN ^\s+(an?|some|the).+cauldron
ACTION setvar chair 1 WHEN ^\s+(an?|some|the).+\bchairs?\b
ACTION setvar chest 1 WHEN ^\s+(an?|some|the).+\bchests?\b
ACTION setvar closet 1 WHEN ^\s+(an?|some|the).+closet
ACTION setvar cloud 1 WHEN ^\s+(an?|some|the).+\bclouds?\b
ACTION setvar coffer 1 WHEN ^\s+(an?|some|the).+coffer
ACTION setvar container 1 WHEN ^\s+(an?|some|the).+container
ACTION setvar cord 1 WHEN ^\s+(an?|some|the).+\bcords?\b
ACTION setvar cornucopia 1 WHEN ^\s+(an?|some|the).+cornucopia
ACTION setvar corral 1 WHEN ^\s+(an?|some|the).+corral
ACTION setvar cot 1 WHEN ^\s+(an?|some|the).+\bcots?\b
ACTION setvar counter 1 WHEN ^\s+(an?|some|the).+counter
ACTION setvar cradle 1 WHEN ^\s+(an?|some|the).+cradle
ACTION setvar crate 1 WHEN ^\s+(an?|some|the).+\bcrates?\b
ACTION setvar cushion 1 WHEN ^\s+(an?|some|the).+cushion
ACTION setvar desk 1 WHEN ^\s+(an?|some|the).+\bdesks?\b
ACTION setvar display 1 WHEN ^\s+(an?|some|the).+display
ACTION setvar drawer 1 WHEN ^\s+(an?|some|the).+drawer
ACTION setvar dresser 1 WHEN ^\s+(an?|some|the).+dresser
ACTION setvar drum 1 WHEN ^\s+(an?|some|the).+\bdrums?\b
ACTION setvar dummy 1 WHEN ^\s+(an?|some|the).+dummy
ACTION setvar easel 1 WHEN ^\s+(an?|some|the).+\beasels?\b
ACTION setvar endtable 1 WHEN ^\s+(an?|some|the).+endtable
ACTION setvar fence 1 WHEN ^\s+(an?|some|the).+\bfences?\b
ACTION setvar firepit 1 WHEN ^\s+(an?|some|the).+firepit
ACTION setvar footrest 1 WHEN ^\s+(an?|some|the).+footrest
ACTION setvar fountain 1 WHEN ^\s+(an?|some|the).+fountain
ACTION setvar framework 1 WHEN ^\s+(an?|some|the).+framework
ACTION setvar garderobe 1 WHEN ^\s+(an?|some|the).+garderobe
ACTION setvar goblin 1 WHEN ^\s+(an?|some|the).+goblin
ACTION setvar gourd 1 WHEN ^\s+(an?|some|the).+gourd
ACTION setvar grinder 1 WHEN ^\s+(an?|some|the).+grinder
ACTION setvar hand 1 WHEN ^\s+(an?|some|the).+\bhands?\b
ACTION setvar hanger 1 WHEN ^\s+(an?|some|the).+hanger
ACTION setvar hatstand 1 WHEN ^\s+(an?|some|the).+hatstand
ACTION setvar head 1 WHEN ^\s+(an?|some|the).+\bheads?\b
ACTION setvar highboy 1 WHEN ^\s+(an?|some|the).+highboy
ACTION setvar hole 1 WHEN ^\s+(an?|some|the).+\bholes?\b
ACTION setvar hook 1 WHEN ^\s+(an?|some|the).+\bhooks?\b
ACTION setvar horse 1 WHEN ^\s+(an?|some|the).+\bhorses?\b
ACTION setvar jar 1 WHEN ^\s+(an?|some|the).+\bjars?\b
ACTION setvar keg 1 WHEN ^\s+(an?|some|the).+\bkegs?\b
ACTION setvar lattice 1 WHEN ^\s+(an?|some|the).+lattice
ACTION setvar locker 1 WHEN ^\s+(an?|some|the).+locker
ACTION setvar mannequin 1 WHEN ^\s+(an?|some|the).+mannequin
ACTION setvar mantel 1 WHEN ^\s+(an?|some|the).+mantel
ACTION setvar mantle 1 WHEN ^\s+(an?|some|the).+mantle
ACTION setvar moon 1 WHEN ^\s+(an?|some|the).+\bmoons?\b
ACTION setvar net 1 WHEN ^\s+(an?|some|the).+\bnets?\b
ACTION setvar niche 1 WHEN ^\s+(an?|some|the).+niche
ACTION setvar ogre 1 WHEN ^\s+(an?|some|the).+\bogres?\b
ACTION setvar pail 1 WHEN ^\s+(an?|some|the).+\bpails?\b
ACTION setvar pallet 1 WHEN ^\s+(an?|some|the).+pallet
ACTION setvar panel 1 WHEN ^\s+(an?|some|the).+\bpanels?\b
ACTION setvar peccary 1 WHEN ^\s+(an?|some|the).+peccary
ACTION setvar pedestal 1 WHEN ^\s+(an?|some|the).+pedestal
ACTION setvar peg 1 WHEN ^\s+(an?|some|the).+\bpegs?\b
ACTION setvar pegboard 1 WHEN ^\s+(an?|some|the).+pegboard
ACTION setvar pew 1 WHEN ^\s+(an?|some|the).+\bpews?\b
ACTION setvar pillow 1 WHEN ^\s+(an?|some|the).+pillow
ACTION setvar pipe 1 WHEN ^\s+(an?|some|the).+\bpipes?\b
ACTION setvar pit 1 WHEN ^\s+(an?|some|the).+\bpits?\b
ACTION setvar plank 1 WHEN ^\s+(an?|some|the).+\bplanks?\b
ACTION setvar planter 1 WHEN ^\s+(an?|some|the).+planter
ACTION setvar platter 1 WHEN ^\s+(an?|some|the).+platter
ACTION setvar plinth 1 WHEN ^\s+(an?|some|the).+plinth
ACTION setvar podium 1 WHEN ^\s+(an?|some|the).+podium
ACTION setvar pole 1 WHEN ^\s+(an?|some|the).+\bpoles?\b
ACTION setvar post 1 WHEN ^\s+(an?|some|the).+\bposts?\b
ACTION setvar pumpkin 1 WHEN ^\s+(an?|some|the).+pumpkin
ACTION setvar quilt 1 WHEN ^\s+(an?|some|the).+\bquilts?\b
ACTION setvar rack 1 WHEN ^\s+(an?|some|the).+\bracks?\b
ACTION setvar rope 1 WHEN ^\s+(an?|some|the).+\bropes?\b
ACTION setvar rug 1 WHEN ^\s+(an?|some|the).+\brugs?\b
ACTION setvar salver 1 WHEN ^\s+(an?|some|the).+salver
ACTION setvar sawhorse 1 WHEN ^\s+(an?|some|the).+sawhorse
ACTION setvar shelf 1 WHEN ^\s+(an?|some|the).+shelf
ACTION setvar shell 1 WHEN ^\s+(an?|some|the).+\bshells?\b
ACTION setvar shelves 1 WHEN ^\s+(an?|some|the).+shelves
ACTION setvar showcase 1 WHEN ^\s+(an?|some|the).+showcase
ACTION setvar sidebar 1 WHEN ^\s+(an?|some|the).+sidebar
ACTION setvar sideboard 1 WHEN ^\s+(an?|some|the).+sideboard
ACTION setvar skeleton 1 WHEN ^\s+(an?|some|the).+skeleton
ACTION setvar skippet 1 WHEN ^\s+(an?|some|the).+skippet
ACTION setvar spittoon 1 WHEN ^\s+(an?|some|the).+spittoon
ACTION setvar stable 1 WHEN ^\s+(an?|some|the).+stable
ACTION setvar stand 1 WHEN ^\s+(an?|some|the).+\bstands?\b
ACTION setvar star 1 WHEN ^\s+(an?|some|the).+\bstars?\b
ACTION setvar stool 1 WHEN ^\s+(an?|some|the).+\bstools?\b
ACTION setvar stove 1 WHEN ^\s+(an?|some|the).+\bstoves?\b
ACTION setvar stump 1 WHEN ^\s+(an?|some|the).+stump
ACTION setvar sun 1 WHEN ^\s+(an?|some|the).+\bsuns?\b
ACTION setvar Surface1 1 WHEN ^\s+(an?|some|the).+B1Surface2B2
ACTION setvar table 1 WHEN ^\s+(an?|some|the).+\btables?\b
ACTION setvar tomb 1 WHEN ^\s+(an?|some|the).+\btombs?\b
ACTION setvar tray 1 WHEN ^\s+(an?|some|the).+\btrays?\b
ACTION setvar tree 1 WHEN ^\s+(an?|some|the).+\btrees?\b
ACTION setvar trestle 1 WHEN ^\s+(an?|some|the).+trestle
ACTION setvar trough 1 WHEN ^\s+(an?|some|the).+trough
ACTION setvar trunk 1 WHEN ^\s+(an?|some|the).+trunk
ACTION setvar turtle 1 WHEN ^\s+(an?|some|the).+turtle
ACTION setvar urn 1 WHEN ^\s+(an?|some|the).+\burns?\b
ACTION setvar valet 1 WHEN ^\s+(an?|some|the).+valet
ACTION setvar vanity 1 WHEN ^\s+(an?|some|the).+vanity
ACTION setvar vat 1 WHEN ^\s+(an?|some|the).+\bvats?\b
ACTION setvar wall 1 WHEN ^\s+(an?|some|the).+\bwalls?\b
ACTION setvar wardrobe 1 WHEN ^\s+(an?|some|the).+wardrobe
ACTION setvar waterwheel 1 WHEN ^\s+(an?|some|the).+waterwheel
ACTION setvar web 1 WHEN ^\s+(an?|some|the).+\bwebs?\b
ACTION setvar webbing 1 WHEN ^\s+(an?|some|the).+webbing
ACTION setvar workbench 1 WHEN ^\s+(an?|some|the).+workbench
ACTION setvar worktable 1 WHEN ^\s+(an?|some|the).+worktable

send shop
waitforre ^The following items contain goods for sale:

startshop:

if %altar = 1 then gosub shopvar altar
if %armoir = 1 then gosub shopvar armoir
if %bale = 1 then gosub shopvar bale
if %bar = 1 then gosub shopvar bar
if %barn = 1 then gosub shopvar barn
if %barrel = 1 then gosub shopvar barrel
if %basket = 1 then gosub shopvar basket
if %bedroll = 1 then gosub shopvar bedroll
if %bench = 1 then gosub shopvar bench
if %bin = 1 then gosub shopvar bin
if %block = 1 then gosub shopvar block
if %blossom = 1 then gosub shopvar blossom
if %boar = 1 then gosub shopvar boar
if %board = 1 then gosub shopvar board
if %bookcase = 1 then gosub shopvar bookcase
if %bookshelf = 1 then gosub shopvar bookshelf
if %bookshelves = 1 then gosub shopvar bookshelves
if %bookstand = 1 then gosub shopvar bookstand
if %box = 1 then gosub shopvar box
if %branch = 1 then gosub shopvar branch
if %breakfront = 1 then gosub shopvar breakfront
if %broomstick = 1 then gosub shopvar broomstick
if %bucket = 1 then gosub shopvar bucket
if %buffet = 1 then gosub shopvar buffet
if %bull = 1 then gosub shopvar bull
if %bureau = 1 then gosub shopvar bureau
if %bust = 1 then gosub shopvar bust
if %butterfly = 1 then gosub shopvar butterfly
if %cabinet = 1 then gosub shopvar cabinet
if %carpet = 1 then gosub shopvar carpet
if %cart = 1 then gosub shopvar cart
if %carton = 1 then gosub shopvar carton
if %case = 1 then gosub shopvar case
if %catalog = 1 then gosub shopvar catalog
if %cauldron = 1 then gosub shopvar cauldron
if %chair = 1 then gosub shopvar chair
if %chest = 1 then gosub shopvar chest
if %closet = 1 then gosub shopvar closet
if %cloud = 1 then gosub shopvar cloud
if %coffer = 1 then gosub shopvar coffer
if %container = 1 then gosub shopvar container
if %cord = 1 then gosub shopvar cord
if %cornucopia = 1 then gosub shopvar cornucopia
if %corral = 1 then gosub shopvar corral
if %cot = 1 then gosub shopvar cot
if %counter = 1 then gosub shopvar counter
if %cradle = 1 then gosub shopvar cradle
if %crate = 1 then gosub shopvar crate
if %cushion = 1 then gosub shopvar cushion
if %desk = 1 then gosub shopvar desk
if %display = 1 then gosub shopvar display
if %drawer = 1 then gosub shopvar drawer
if %dresser = 1 then gosub shopvar dresser
if %drum = 1 then gosub shopvar drum
if %dummy = 1 then gosub shopvar dummy
if %easel = 1 then gosub shopvar easel
if %endtable = 1 then gosub shopvar endtable
if %fence = 1 then gosub shopvar fence
if %firepit = 1 then gosub shopvar firepit
if %footrest = 1 then gosub shopvar footrest
if %fountain = 1 then gosub shopvar fountain
if %framework = 1 then gosub shopvar framework
if %garderobe = 1 then gosub shopvar garderobe
if %goblin = 1 then gosub shopvar goblin
if %gourd = 1 then gosub shopvar gourd
if %grinder = 1 then gosub shopvar grinder
if %hand = 1 then gosub shopvar hand
if %hanger = 1 then gosub shopvar hanger
if %hatstand = 1 then gosub shopvar hatstand
if %head = 1 then gosub shopvar head
if %highboy = 1 then gosub shopvar highboy
if %hole = 1 then gosub shopvar hole
if %hook = 1 then gosub shopvar hook
if %horse = 1 then gosub shopvar horse
if %jar = 1 then gosub shopvar jar
if %keg = 1 then gosub shopvar keg
if %lattice = 1 then gosub shopvar lattice
if %locker = 1 then gosub shopvar locker
if %mannequin = 1 then gosub shopvar mannequin
if %mantel = 1 then gosub shopvar mantel
if %mantle = 1 then gosub shopvar mantle
if %moon = 1 then gosub shopvar moon
if %net = 1 then gosub shopvar net
if %niche = 1 then gosub shopvar niche
if %ogre = 1 then gosub shopvar ogre
if %pail = 1 then gosub shopvar pail
if %pallet = 1 then gosub shopvar pallet
if %panel = 1 then gosub shopvar panel
if %peccary = 1 then gosub shopvar peccary
if %pedestal = 1 then gosub shopvar pedestal
if %peg = 1 then gosub shopvar peg
if %pegboard = 1 then gosub shopvar pegboard
if %pew = 1 then gosub shopvar pew
if %pillow = 1 then gosub shopvar pillow
if %pipe = 1 then gosub shopvar pipe
if %pit = 1 then gosub shopvar pit
if %plank = 1 then gosub shopvar plank
if %planter = 1 then gosub shopvar planter
if %platter = 1 then gosub shopvar platter
if %plinth = 1 then gosub shopvar plinth
if %podium = 1 then gosub shopvar podium
if %pole = 1 then gosub shopvar pole
if %post = 1 then gosub shopvar post
if %pumpkin = 1 then gosub shopvar pumpkin
if %quilt = 1 then gosub shopvar quilt
if %rack = 1 then gosub shopvar rack
if %rope = 1 then gosub shopvar rope
if %rug = 1 then gosub shopvar rug
if %salver = 1 then gosub shopvar salver
if %sawhorse = 1 then gosub shopvar sawhorse
if %shelf = 1 then gosub shopvar shelf
if %shell = 1 then gosub shopvar shell
if %shelves = 1 then gosub shopvar shelves
if %showcase = 1 then gosub shopvar showcase
if %sidebar = 1 then gosub shopvar sidebar
if %sideboard = 1 then gosub shopvar sideboard
if %skeleton = 1 then gosub shopvar skeleton
if %skippet = 1 then gosub shopvar skippet
if %spittoon = 1 then gosub shopvar spittoon
if %stable = 1 then gosub shopvar stable
if %stand = 1 then gosub shopvar stand
if %star = 1 then gosub shopvar star
if %stool = 1 then gosub shopvar stool
if %stove = 1 then gosub shopvar stove
if %stump = 1 then gosub shopvar stump
if %sun = 1 then gosub shopvar sun
if %table = 1 then gosub shopvar table
if %tomb = 1 then gosub shopvar tomb
if %tray = 1 then gosub shopvar tray
if %tree = 1 then gosub shopvar tree
if %trestle = 1 then gosub shopvar trestle
if %trough = 1 then gosub shopvar trough
if %trunk = 1 then gosub shopvar trunk
if %turtle = 1 then gosub shopvar turtle
if %urn = 1 then gosub shopvar urn
if %valet = 1 then gosub shopvar valet
if %vanity = 1 then gosub shopvar vanity
if %vat = 1 then gosub shopvar vat
if %wall = 1 then gosub shopvar wall
if %wardrobe = 1 then gosub shopvar wardrobe
if %waterwheel = 1 then gosub shopvar waterwheel
if %web = 1 then gosub shopvar web
if %webbing = 1 then gosub shopvar webbing
if %workbench = 1 then gosub shopvar workbench
if %worktable = 1 then gosub shopvar worktable
goto end

shopvar:
put #var shopper $0
goto shop1

shop1:
send shop first $shopper
matchre shop2 ^\[Type SHOP \[GOOD\] to see some details about
matchre return ^I could not find what you referring to|^You can buy this item if you like
matchwait

shop2:
send shop second $shopper
matchre shop3 ^\[Type SHOP \[GOOD\] to see some details about
matchre return ^I could not find what you referring to|^You can buy this item if you like
matchwait

shop3:
send shop third $shopper
matchre shop4 ^\[Type SHOP \[GOOD\] to see some details about
matchre return ^I could not find what you referring to|^You can buy this item if you like
matchwait

shop4:
send shop fourth $shopper
matchre shop5 ^\[Type SHOP \[GOOD\] to see some details about
matchre return ^I could not find what you referring to|^You can buy this item if you like
matchwait

shop5:
send shop fifth $shopper
matchre shop6 ^\[Type SHOP \[GOOD\] to see some details about
matchre return ^I could not find what you referring to|^You can buy this item if you like
matchwait

shop6:
send shop sixth $shopper
matchre shop7 ^\[Type SHOP \[GOOD\] to see some details about
matchre return ^I could not find what you referring to|^You can buy this item if you like
matchwait

shop7:
send shop seventh $shopper
matchre shop8 ^\[Type SHOP \[GOOD\] to see some details about
matchre return ^I could not find what you referring to|^You can buy this item if you like
matchwait

shop8:
send shop eighth $shopper
matchre shop9 ^\[Type SHOP \[GOOD\] to see some details about
matchre return ^I could not find what you referring to|^You can buy this item if you like
matchwait

shop9:
send shop ninth $shopper
matchre shop10 ^\[Type SHOP \[GOOD\] to see some details about
matchre return ^I could not find what you referring to|^You can buy this item if you like
matchwait

shop10:
send shop tenth $shopper
matchre shop11 ^\[Type SHOP \[GOOD\] to see some details about
matchre return ^I could not find what you referring to|^You can buy this item if you like
matchwait

shop11:
send shop eleventh $shopper
goto return

return:
return

end:
put #parse SCRIPT DONE
exit

Crossing's Market Plaza

start:
put #class rp on
put #class shop on
put #class combat off
put #class arrive off
put #var currency Kronars
put #var shopcity Crossing
send stop play
waitforre ^You stop|^In the name

send read listings board
waitforre shops? (is|are) open\.$

put #log >Shoplog.txt The following items are sold at Crossing's Market Plaza and are priced in copper Kronars [$date $time]:

move north

Sun_Room:
gosub arch
gosub door
gosub entrance
move east

Water_Room:
gosub arch
gosub door
gosub entrance
move northeast

Grass_Room:
gosub arch
gosub door
gosub entrance
move northwest

Solarium:
gosub arch
gosub door
gosub entrance
move southwest
move northwest

Forest_Room:
gosub arch
gosub door
gosub entrance
move southwest

Dimly-Lit_Storage:
gosub arch
gosub door
gosub entrance
move southeast

Meeting_Room:
gosub arch
gosub door
gosub entrance
move east
move southeast

Moon_Room:
gosub arch
gosub door
gosub entrance
move east

Armor_Room:
gosub arch
gosub door
gosub entrance
move west
move south

Lodge_Room:
gosub arch
gosub door
gosub entrance
move north
move northwest
move southwest

Gladiolus_Room:
gosub arch
gosub door
gosub entrance
move west

Fire_Room:
gosub arch
gosub door
gosub entrance
move east
move south

Library:
gosub arch
gosub door
gosub entrance
move north
move northeast
move go spiral ramp

Volcano_Room:
gosub arch
gosub door
gosub entrance
move east

Palm_Room:
gosub arch
gosub door
gosub entrance
move northeast

Ocean_Room:
gosub arch
gosub door
gosub entrance
move northwest

Tundra_Room:
gosub arch
gosub door
gosub entrance
move southwest

Jungle_Room:
gosub arch
gosub door
gosub entrance
move northwest

Savannah_Room:
gosub arch
gosub door
gosub entrance
move southwest

Desert_Room:
gosub arch
gosub door
gosub entrance
move southeast

River_Room:
gosub arch
gosub door
gosub entrance
move east
move go spiral ramp
move climb marble staircase

Tasting_Room:
gosub arch
gosub door
gosub entrance
move north

Bottle_Room:
gosub arch
gosub door
gosub entrance
move north

Stomping_Room:
gosub arch
gosub door
gosub entrance
move east

Barrel_Room:
gosub arch
gosub door
gosub entrance
move west
move north

Fermentation_Room:
gosub arch
gosub door
gosub entrance
move south
move west

Cooper_Room:
gosub arch
gosub door
gosub entrance
move east
move south
move south
move climb marble staircase
move south
goto done

arch:
setvariable portal arch
send look arch
matchre shopinv ^'.+'.+It is currently open\.$
matchre return ^'.+'.+It is currently closed\.$
matchwait 1
return

door:
setvariable portal door
send look door
matchre shopinv ^'.+'.+It is currently open\.$
matchre return ^'.+'.+It is currently closed\.$
matchwait 1
return

entrance:
setvariable portal entrance
send look entrance
matchre shopinv ^'.+'.+It is currently open\.$
matchre return ^'.+'.+It is currently closed\.$
matchwait 1
return

shopinv:
move go %portal
put .shop2
waitfor SCRIPT DONE
move out
return

return:
return

done:
put #class arrive on
put #class shop off
send hum $hum
exit

Riverhaven's Knight's Hall

start:
put #class rp on
put #class shop on
put #class combat off
put #class arrive off
put #var currency Lirums
put #var shopcity Riverhaven
send stop play
waitforre ^You stop|^In the name

send read listings board
waitforre shops? (is|are) open\.$

put #log >Shoplog.txt The following items are sold at Riverhaven's Knight's Hall and are priced in copper Lirums [$date $time]:

move north

Rose_Room:
gosub arch
gosub door
gosub entrance
move north

Warrior_Room:
gosub arch
gosub door
gosub entrance
move north

Food_Plaza:
gosub arch
gosub door
gosub entrance
move north

Childrens_Room:
gosub arch
gosub door
gosub entrance
move south
move south
move south
move south
move northeast

Theatre_Room:
gosub arch
gosub door
gosub entrance
move northeast

World_Room:
gosub arch
gosub door
gosub entrance
move northeast

The_Back_Room:
gosub arch
gosub door
gosub entrance
move southwest
move southwest
move southwest
move northwest

Keep_Room:
gosub arch
gosub door
gosub entrance
move northwest

Dungeon_Room:
gosub arch
gosub door
gosub entrance
move northwest

Storage_Area:
gosub arch
gosub door
gosub entrance
move southeast
move southeast
move southeast
goto done

arch:
setvariable portal arch
send look arch
matchre shopinv ^'.+'.+It is currently open\.$
matchre return ^'.+'.+It is currently closed\.$
matchwait 1
return

door:
setvariable portal door
send look door
matchre shopinv ^'.+'.+It is currently open\.$
matchre return ^'.+'.+It is currently closed\.$
matchwait 1
return

entrance:
setvariable portal entrance
send look entrance
matchre shopinv ^'.+'.+It is currently open\.$
matchre return ^'.+'.+It is currently closed\.$
matchwait 1
return

shopinv:
move go %portal
put .shop2
waitfor SCRIPT DONE
move out
return

return:
return

done:
put #class arrive on
put #class shop off
send hum $hum
exit

Shard's Crystal Plaza

start:
put #class rp on
put #class shop on
put #class combat off
put #class arrive off
put #var currency Dokoras
put #var shopcity Shard
send stop play
waitforre ^You stop|^In the name

send read listings board
waitforre shops? (is|are) open\.$

put #log >Shoplog.txt The following items are sold at Shard's Crystal Plaza and are priced in copper Dokoras [$date $time]:

move north
move north

Play_Yard:
gosub arch
gosub door
gosub entrance
move south
move northeast

Prism_Room:
gosub arch
gosub door
gosub entrance
move southwest
move east

Oak_Room:
gosub arch
gosub door
gosub entrance
move west
move southeast

Luminous_Room:
gosub arch
gosub door
gosub entrance
move northwest
move southwest

Storage:
gosub arch
gosub door
gosub entrance
move northeast
move west

Food_Court:
gosub arch
gosub door
gosub entrance
move east
move northwest

The_Sea:
gosub arch
gosub door
gosub entrance
move southeast
move south
goto done

arch:
setvariable portal arch
send look arch
matchre shopinv ^'.+'.+It is currently open\.$
matchre return ^'.+'.+It is currently closed\.$
matchwait 1
return

door:
setvariable portal door
send look door
matchre shopinv ^'.+'.+It is currently open\.$
matchre return ^'.+'.+It is currently closed\.$
matchwait 1
return

entrance:
setvariable portal entrance
send look entrance
matchre shopinv ^'.+'.+It is currently open\.$
matchre return ^'.+'.+It is currently closed\.$
matchwait 1
return

shopinv:
move go %portal
put .shop2
waitfor SCRIPT DONE
move out
return

return:
return

done:
put #class arrive on
put #class shop off
send hum $hum
exit

See Also

• Trader-owned Shops: I periodically update this list of shops, their record owners, and their locations.
• Trader Shop Inventory: This is a spreadsheet that I made from the information logged by these triggers.