Craft (script)

Craft (script)
Category	information
Front-end	StormFront
Author	Danoryiel

This script is currently designed for the creating projects in the Carving discipline, however I would like to expand it to include all Crafting Disciplines in the future. It is not complete but it is easy to use and easy to change to suit an individuals needs. One of its limitations however is that it cannot make multiple item projects like tables that need two separate carved items to complete the finished project. The script also assumes that you have all materials needed prior to starting the script.

Syntax

Usage for this script is .Craft deedtype project song - i.e. .Craft rock flail rondo

Script

put read logbook
match NOWORK is not currently tracking
match THINSLAB thin stone slab
match LARGEBLOCK large stone block
match G_ROD grooved stone stirring rod
match N_ROD notched stone stirring rod
match F_ROD forked stone stirring rod
match MATTOCK stone mattock
match MAUL stone maul
match FLAIL stone flail
match BRACELET stone bracelet
match ANKLET stone anklet
match PIN stone pin
match DIADEM stone diadem
match CIRCLET stone circlet
match NECKLACE stone necklace
match A_BELT articulated stone belt
match CROWN stone crown
match HUMAN a Human image
match KALDAR a Kaldar image
match ELF an Elf image
matchwait

NOWORK:
echo ***                                            ***
echo ***  You do not have a Work Order at this time ***
echo ***  Please ask your local trainer for work    ***
echo ***  and try again.                            ***
exit

THINSLAB:
put stow logb
put get carv book
put turn book to chapt 1
put turn book to page 2
goto MAIN

LARGEBLOCK:
put stow logb
put get carv book
put turn book to chapt 1
put turn book to page 3
goto MAIN

G_ROD:
put stow logb
put get carv book
put turn book to chapter 1
put turn book to page 13
goto MAIN

N_ROD:
put stow logb
put get carv book
put turn book to chapter 1
put turn book to page 14
goto MAIN

F_ROD:
put stow logb
put get carv book
put turn book to chapter 1
put turn book to page 15
goto MAIN

MATTOCK:
put stow logb
put get carv book
put turn book to chapter 3
put turn book to page 17
goto MAIN

MAUL:
put stow logb
put get carv book
put turn book to chapter 3
put turn book to page 16
goto MAIN

FLAIL:
put stow logb
put get carv book
put turn book to chapt 3
put turn book to page 18
goto MAIN

BRACELET:
put stow logb
put get carv book
put turn book to chapt 4
put turn book to page 4
goto MAIN

ANKLET:
put stow logb
put get carv book
put turn book to chapt 4
put turn book to page 5
goto MAIN

PIN:
put stow logb
put get carv book
put turn book to chapt 4
put turn book to page 6
goto MAIN

DIADEM:
put stow logb
put get carv book
put turn book to chapter 4
put turn book to page 23
goto MAIN

CIRCLET:
put stow logb
put get carv book
put turn book to chapter 4
put turn book to page 24
goto MAIN

NECKLACE:
put stow logb
put get carv book
put turn book to chapter 4
put turn book to page 25
goto MAIN

A_BELT:
put stow logb
put get carv book
put turn book to chapt 4
put turn book to page 26
goto MAIN

CROWN:
put stow logb
put get carv book
put turn book to chapt 4
put turn book to page 27
goto MAIN

HUMAN:
put stow logb
put get carv book
put turn book to chapt 5
put turn book to page 1
goto MAIN

KALDAR:
put stow logb
put get carv book
put turn book to chapt 5
put turn book to page 2
goto MAIN

ELF:
put stow logb
put get carv book
put turn book to chapt 5
put turn book to page 3
goto MAIN

MAIN:
echo -------------------------------
echo =  You have made %c %2 's
echo =
echo -------------------------------
put get my deed
put tap my deed
put get book
put study book
waitfor roundtime
pause 2
put stow book
put get chisels
put get %1
put carve %1 with chis
match riff jagged edges
match rasp uneven
match rasp no longer level
match polish discol
match carve roundtime
matchwait

carve:
put stow
put get chis
put hum %3
put carve %2 with chis
match stow You cannot figure
match assemble [Ingredients
match riff jagged edges
match rasp uneven
match rasp no longer level
match polish discol
match carve roundtime
match carve ...w
matchwait

riff:
put stow chis
put get riff
put rub %2 with riff
match riff ...w
match assemble [Ingredients
match stow Applying the final
match carve roundtime
matchwait

rasp:
put stow chis
put get rasp
put scrape %2 with rasp
match rasp ...w
match assemble [Ingredients
match stow Applying the final
match carve roundtime
matchwait


polish:
put stow chis
put get polish
put apply polish to %2
match polish ...w
match assemble [Ingredients
match stow Applying the final
match carve roundtime
matchwait

assemble:
put stow right
put get chis
put carve %2 with chis
match cord cord to continue
match pole pole to continue
match cord pole is not required
match pole cord is not required
match assemble ...w
matchwait

cord:
put stow right
put get cord in my bag
put assemble %2 with my cord
put analyze %2
match carve further carving
match carve You do not see anything
match rasp rasp
match riff riffler
match polish polish
match pole cord is not required
matchwait

pole:
put stow right
put get pole in my bag
put assemble %2 with my pole
put analyze %2
match carve further carving
match carve You do not see anything
match rasp rasp
match riff riffler
match polish polish
match cord pole is not required
matchwait

stow:
put analyze %2
waitfor roundtime
pause 1
put stow %2
counter add 1
goto MAIN