Ta'Illistim deeds (script)

A script that may be helpful to purchasing deeds in Ta'Illistim.

 # Purchasing a Deed in Ta'Illistim in the Hall of Patrons 
 # Any questions, comments can be directed to me at dalynched1@attbi.com 
  
 if_1 goto Start 
 AddToHighlightStrings string="Use as follows: .tailldeed <gem> <second gem> <etc. through nine>" foreColor=#29CEFF highlightEntireLine=True /quiet 
 echo
 echo Use as follows: .tailldeed <gem> <second gem> <etc. through nine>
 echo  
 waitfor 
 DeleteFromHighlightStrings string="Use as follows: .tailldeed <gem> <second gem> <etc. through nine>" 
 echo 
 AddToHighlightStrings string="Example: .tailldeed sapphire diamond" foreColor=#29CEFF highlightEntireLine=True /quiet 
 echo Example: .tailldeed sapphire diamond 
 echo 
 DeleteFromHighlightStrings string="Example: .tailldeed sapphire diamond" 
 waitfor 
 exit

 Start: 
 put look tome
 match Open You see the tome is open
 match Closed The tome is bound
 matchwait
 exit

 Open: 
 put close tome
 waitfor You carefully close
 goto Closed
 exit

Closed: 
 put open tome
 waitfor You carefully open
 put read tome
 waitfor PATRONS OF THE ELVEN HOUSES
 put turn tome to ashrim
 match Charl wielding a trident
 match Niima blue-green gown clings
 matchwait
 exit

Charl:
 move east
 move go panel
 put get taper
 waitfor You pick up a long
 put light my taper with candle
 waitfor You carefully light the taper
 move go panel
 move west
 move southeast
 move go modwir door
 goto Payment
 exit
  
 Niima:
 move east
 move go panel
 put get taper
 waitfor You pick up a long
 put light my taper with candle
 waitfor You carefully light the taper
 move go panel
 move west
 move southeast 
 move go haon door
 goto Payment
 exit 
  
Payment:
 put kneel
 waitfor You kneel down
 goto Gemrotate

Gemrotate:
 put get my %1
 put put my %1 on censer
 waitfor on a brass censer
 shift
 goto Check

Check:
 if_1 goto Gemrotate
 goto Outcome

Outcome: 
 put pray 
 put meditate 
 match Success You sense an accomplishment
 match Failure You struggle to gain any further insights
 matchwait
 exit
  
 Success: 
 AddToHighlightStrings string="You were successful in recording another deed." foreColor=#29CEFF highlightEntireLine=True /quiet
 echo 
 echo You were successful in recording another deed.
 echo 
 waitfor 
 DeleteFromHighlightStrings string="You were successful in recording another deed."
 move northwest
 put experience
 exit 

 Failure: 
 AddToHighlightStrings string="You were not successful in recording another deed." foreColor=#29CEFF highlightEntireLine=True /quiet 
 echo 
 echo You were not successful in recording another deed.
 echo 
 waitfor 
 DeleteFromHighlightStrings string="You were not successful in recording another deed."
 move northwest
 put experience
 exit