Making Iron

==Description==
This script starts from the Charcoal room, collects all the ingredients necessary - makes iron, then returns the user back to Wehnimmer's landing north gate.
==Syntax==
> .makeiron
There is no need for adding any additional syntax arguments, Please do so at your own risk!
==The Script==
BEGIN:
put store weapon
put store shield
put get Char
match CHARCOAL1 You just grabbed a charcoal from the burner. It is still warm but you find you can safely hold it.
match START There is nothing more for you to get.
match CHARCOAL1 You pick
match CHARCOAL1 You remove
matchwait 
START:
put get wood
match LOG You just grabbed yourself a split log
match TINDER You just grabbed yourself a handful of tinder.
match STICK You just grabbed yourself a wooden stick.
matchwait 
LOG:
pause
put put log in burn
put get wood
match LOG2 You just grabbed yourself a split log
match TINDER1 You just grabbed yourself a handful of tinder.
match STICK1 You just grabbed yourself a wooden stick.
matchwait 
TINDER:
pause
put put tinder in bur
goto start
STICK:
pause
put drop stick
goto start 
TINDER1:
pause
put put tinder in bur
goto LOG
STICK1:
pause
put drop stick
goto LOG 
LOG2:
pause
put put log in burn
put get stick
put get stick
match STICK2 Get what
match RUB You pick
matchwait 
Stick2:
pause
put get wood
match LOG3 You just grabbed yourself a split log
match TINDER3 You just grabbed yourself a handful of tinder.
match RUB You just grabbed yourself a wooden stick.
matchwait 
TINDER3:
pause
put put tinder in bur
goto stick2
LOG3:
pause
put put log in bur
goto stick2
RUB:
put rub Stick
match CHARCOAL You rub two sticks
match Stick2 You rub a wooden stick.
matchwait 
CHARCOAL:
waitfor The fire flickers and dies down to a few glowing lumps of charcoal and finally goes out.
put get char 
CHARCOAL1: 
put stow my char
move go bush
move go shadow
move down
move down
move down
move south 
counter set 1
ORE:
put search work
match ORE%c You dig around in the cracks and fissures on the workface and you manage to dislodge something heavy!
match OREA You search the working face but you don't find anything
matchwait 
OREA:
pause
goto ORE 
ORE1:
counter add 1
OREB:
pause
put search work
match ORE%c You dig around in the cracks and fissures on the workface and you manage to dislodge something heavy!
match OREB You search the working face but you don't find anything
matchwait 
ORE2:
counter add 1
OREC:
pause
put search work
match ORE%c You dig around in the cracks and fissures on the workface and you manage to dislodge something heavy!
match OREC You search the working face but you don't find anything
matchwait 
ORE3:
counter add 1
ORED:
pause
put search work
match ORE%c You dig around in the cracks and fissures on the workface and you manage to dislodge something heavy!
match ORED You search the working face but you don't find anything
matchwait 
ORE4:
put get ore
put stow my ore
pause
put get ore
put stow my ore
pause
put get ore
put stow my ore
pause
put get ore
put stow my ore
pause
move n
move up
move n 
counter set 1
Oil:
put search
match RT …wait
match oil%c back behind a pile of oily debris, you find a filthy flask of oil seemingly still
match oil You carefully and meticulously search every place you can think of
match oil You grope about the place searching here and there, but you find only dust and old cobwebs.
match Oil You grope about the place searching carefully, but you find only a thin film of oil that coats your hands.
matchwait 
RT:
Pause
Goto OIL 
Oil1:
counter add 1
put get oil
put stow oil
OILB:
pause
put search
match RT1 …wait
match oil%c back behind a pile of oily debris, you find a filthy flask of oil seemingly still
match oilB You carefully and meticulously search every place you can think of
match oilB You grope about the place searching here and there, but you find only dust and old cobwebs.
match OilB You grope about the place searching carefully, but you find only a thin film of oil that coats your hands.
matchwait 
RT1:
Pause
Goto OILB 
oil2:
put get oil
put stow oil
counter add 1
oilC:
pause
put search
match RT2 …wait
match Oil%c back behind a pile of oily debris, you find a filthy flask of oil seemingly still
match OilC You carefully and meticulously search every place you can think of
match oilC You grope about the place searching here and there, but you find only dust and old cobwebs.
match OilC You grope about the place searching carefully, but you find only a thin film of oil that coats your hands.
matchwait 
RT2:
Pause
Goto OILC 
RT3:
Pause
Goto OIL3 
Oil3:
put get oil
match RT3 …wait
match OIL4 You pick up a filthy flask of oil
matchwait 
OIL4:
put stow oil
move s
move go door 
SMELT:
put look
Match OCCUPIED Also here:
Match NOONE Obvious exits
Matchwait 
OCCUPIED:
ECHO When the occupants here are done to continue type RESTART
Waitfor RESTART 
NOONE:
put look in pit
match FULL In the casting pit you see a
match NOTFULL There is nothing in there
matchwait 
FULL:
ECHO THERES SOME ALREADY DONE REMOVE IT and TYPE RESTART to restart the script where it left off or HOME to head back to town.
match NOTFULL RESTART
match HOME HOME
matchwait 
NOTFULL:
put get char
put put char in cru
pause
put get ore
put put ore in cru
pause
put get ore
put put ore in cru
pause
put get ore
put put ore in cru
pause
put get ore
put put ore in cru
pause
VALVE:
put turn valv
match BELLOW The valve closes
match VALVE You turn the valve but only
matchwait 
BELLOW:
move east
put get oil
put pour oil in drum
pause
put get oil
put pour oil in drum
pause
put get oil
put pour oil in drum
pause
put pull chain
MATCH BELLOW1 Roundtime
MATCH BELLOW1 You tug on the chain but nothing much happens.
matchwait 
BELLOW1:
put pull bellow
match RT ...wait
match TURN Roundtime
matchwait 
RT:
Pause
goto BELLOW1 
TURN:
put w
match MOVE [Kobold Mines, Crucible]
match RT1 ...wait
matchwait
RT1:
pause
goto TURN 
MOVE:
put turn valv
move e 
put pull chain
MATCH BELLOW2 Roundtime
matchwait 
BELLOW2:
put pull bellow
match RT2 ...wait
match CHAIN Roundtime
matchwait 
RT2:
Pause
goto BELLOW2 
CHAIN:
put pull chain
MATCH BELLOW3 Roundtime
MATCH RTA ...wait
matchwait
RTA:
pause
goto CHAIN 
BELLOW3:
put pull bellow
match RT3 ...wait
match CHAIN1 Roundtime
matchwait 
RT3:
Pause
goto BELLOW3 
CHAIN1:
put pull chain
MATCH BELLOW4 Roundtime
MATCH RTB ...wait
matchwait
RTB:
pause
goto CHAIN 
BELLOW4:
put pull bellow
match RT4 ...wait
match FINISH Roundtime
matchwait 
RT4:
Pause
goto BELLOW4 
FINISH:
put w
match FINISHM [Kobold Mines, Crucible]
match RT5 ...wait
matchwait 
RT5:
pause
goto FINISH 
FINISHM:
match WHOOPS There is a loud crackling sound from within the crucible as the partially melted but not yet forged materials solidify into useless slag caking the insides of the forge. The work is ruined.
match FINAL With an oddly musical ringing sound, the slab
matchwait 
WHOOPS:
put go door
move up
move up
move out
move out
put go hole
put go shrub
goto START 
FINAL:
put get iron from pit
put stow my iron
pause
put get iron from pit
put stow my iron
pause
put get iron from pit
put stow my iron
pause
put get iron from pit
put stow my iron
pause 
HOME:
put go door
move up
move up
move out
move out
move se
move s
move s
move sw
move sw
move s
move sw
move s
move s
move se
move sw
put climb bank
put go bri
move w
move w
move nw
move n
move n
move n
move n
move n
move ne
put go gate
move s
move w
move s
move s
exit
Category:Miscellaneous Scripts