Pre:
echo .
echo .
echo .
echo .....Thank you for using Eridus' Fletching Assistant!.....
echo .
echo .
echo .....And off we go! Enjoy the Ride!
echo .
echo .
pause 2
Echo .
Echo .
match Pre1 Yes
match GetReady No
Echo Would you like to see the Fletching Assistant Help?
Echo .
Echo If this is your first time using the assistant, I suggest you type Yes.  
Echo .
Echo If you are experienced with it, go ahead and type No.
Echo .
Echo .
matchwait

Pre1:
pause 1
Echo Allright, this assistant will assist you with creating either basic hand-carved arrows, painted arrows, or arrows with arrowheads...
Echo .
Echo .
Echo You will need to have four variables set for this to work.
Echo .
Echo .
Echo Variable ARBAG = the bag or sack you are using to store your supplies. Echo This needs to be different from your regular STOW container, as finished stacks of 100 arrows will be placed into your regular container, and mixing up the two will confuse the assistant.  (He's not too bright)
Echo .
Echo Variable ARKNIFE = The Cutting implement (dagger base) for trimming arrows and suchlike.
Echo .
Echo Variable ARAXE = For the axe that you will use to chop wood into arrow-shafts.
Echo .
Echo Variable ARHEAD = The arrowheads you would like to use.
Echo .
Echo . 
Echo .
Echo You will also need a decent supply of the type of wood you would like to use, and make sure arrowheads, cutting implements, glue, fletchings, and wood are in your supply bag.  
Echo .
Echo The next revision of this assistant will (if all goes as planned) shop for you, but we aren't quite at that point yet.
Echo .
Echo .
Echo One last note, if you run this assistant at a table, it will clean up any discards for you, otherwise your trash is your own concern.
pause 2
Echo .
Echo .
MATCH Getready Yes
Echo Ready to go?  Good Luck!  Type Yes to start the assistant.
Echo .
matchwait

Getready:

put put right in %arbag
put put left in %arbag
pause 1
Echo .
Echo .
Echo .
Echo .
Echo .
Echo Now I need to know which type of arrows you would like to make.
Echo .
Echo . 
Echo Type Basic to craft basic, run-of-the-mill, nothing special arrows.
Echo .
Echo Type Paint to craft basic arrows that are painted.  NOTE: You will need a stock of the paint you wish to use in your supply bag.
Echo .
Echo Type Tipped to craft basic arrows with arrowheads.  NOTE: You will need arrowheads stocked in your supply bag.
Echo .
MATCH FletchB Basic
MATCH FletchP Paint
MATCH FletchH Tipped
MATCH FletchF Full
Echo Type Full to craft arrows that are painted AND use arrowheads. NOTE: Obviously, you will need paint and arrowheads in your bag.
Echo .
Echo .
Matchwait


FletchB:
pause 1
Echo .
Echo .
Echo Plain and simple is the way for you!
Echo .
Echo .
Echo So off we go!
Pause 2
match FB1A You tap a
match Supplies What were you referring to?
put tap fletch
matchwait
FB1A:
match FletchB1W You tap a
match Supplies What were you referring to?
put tap glue
matchwait


FletchB1W:
Match FletchB1W1 You remove a 
Match FletchB1I Get what?
put get wood from my %ARBAG
matchwait
FletchB1W1:
put Get %ARAXE from my %ARBAG
put cut arrow shafts from my wood with my %ARAXE
pause 1
put put %ARAXE in %ARBAG
put put my shaft in %ARBAG
goto FletchB1W
FletchB1I:
put get 1 shaft from my %ARBAG
put get my %ARKNIFE from my %ARBAG
match FletchB2 through a line of mein golems
match FletchB2 would probably survive a few shots through plate mail.
match FletchB2 but is not really worthy of mention.
match FletchB2 but it might go where you aim it.
match FletchB2 would make a fine arrow.
match FletchB2 All in all, peerless craftsmanship.
match ErrorBT you discard the rough arrow shaft.
put cut my shaft with my %ARKNIFE
matchwait
FletchB2:
echo Well, that worked...
pause 1
put cut nocks in my shaft with my %ARKNIFE
pause 1
match ErrorBT might as well toss it.
match FletchB21 You carefully cut a nock into the end of the arrow shaft.
put cut nocks in my shaft with my %ARKNIFE
matchwait
FletchB21:
echo Nicely done!
pause 3
put put my %ARKNIFE in my %ARBAG
put remove bow
put measure my shaft with my bow
pause 3
pause 1
put wear bow
FletchB3:
put get my %ARKNIFE from my %ARBAG
Match FletchB4 you cleanly slice the end off the arrow shaft.
put cut my shaft with my %ARKNIFE
matchwait
FletchB4:
pause 1
put put %ARKNIFE in my %ARBAG
MATCH FletchB4a You remove a bottle of fletching glue
MATCH Supplies Get what?
put get glue from my %ARBAG
matchwait
FletchB4a:
pause 1
put put glue on my shaft
pause 
put put glue in my %ARBAG
pause 1
match FletchB42 and remove 3 of them.
match FletchB42 You remove a bundle of fletchings
match Supplies Get what?
put get 3 fletchings from my %ARBAG
matchwait
pause 1
FletchB42:
match FletchB4 you are able to salvage the shaft.
match FletchB5 holding them in place until you feel they are securely glued.
put put my fletchings on my shaft
echo Sticky...
matchwait
FletchB5:
match FletchB6 The glue on your arrow shaft has dried.
matchwait
FletchB6:
pause 1
put get %ARKNIFE from my %ARBAG
put cut shaft with my %ARKNIFE
pause 1
put cut shaft with my %ARKNIFE 
FletchB7:
pause 3
put put %ARKNIFE in %ARBAG
match FletchB7b and find 100
match FletchB7a in the bundle
match FletchB7aa I could not find what you were referring to.
put look arrows in my %ARBAG
matchwait
FletchB7a:
put get arrow from %ARBAG
put bundle
put put arrow in %ARBAG
goto FletchB1I
FletchB7b:
put get arrows from my %ARBAG
put stow arrows
put put arrow in my %ARBAG
goto FletchB1I
FletchB7aa:
match B7ab arrowheads
match B7ab arrowhead
match B7ac arrow in a
match B7ad What were you referring to?
put tap arr in %ARBAG
matchwait
B7ab:
put put arrow in %ARBAG
goto FletchB1I
B7ac:
put get arrow from my %ARBAG
put bundle
put put arrow in my %ARBAG
goto FletchB1I
B7ad:
put put arrow in my %ARBAG
goto FletchB1I

ErrorBT:
pause 1
echo
echo Well, dont you feel like an idiot... Lets start again
echo
pause 1
put put my %ARKNIFE in my %ARBAG
put wear my bow
put drop right
put clean table
goto FletchB1I 


FletchP:
pause 1
Echo .
Echo .
Echo Painted arrows for everyone!!
Echo .
Echo .
Echo Whoohoo!
Pause 2

match PB1A You tap a
match Supplies What were you referring to?
put tap fletch
matchwait
PB1A:
match PB1B You tap a
match Supplies What were you referring to?
put tap glue
matchwait
PB1B:
match FletchP1W You tap a
match Supplies What were you referring to?
put tap paint
matchwait

FletchP1W:
Match FletchP1W1 You remove a 
Match FletchP1I Get what?
put get wood from my %ARBAG
matchwait
FletchP1W1:
put Get %ARAXE from my %ARBAG
put cut arrow shafts from my wood with my %ARAXE
pause 1
put put %ARAXE in %ARBAG
put put my shaft in %ARBAG
goto FletchP1W
FletchP1I:
put get 1 shaft from my %ARBAG
put get my %ARKNIFE from my %ARBAG
match FletchP2 through a line of mein golems
match FletchP2 would probably survive a few shots through plate mail.
match FletchP2 but is not really worthy of mention.
match FletchP2 but it might go where you aim it.
match FletchP2 would make a fine arrow.
match FletchP2 All in all, peerless craftsmanship.
match ErrorPT you discard the rough arrow shaft.
put cut my shaft with my %ARKNIFE
matchwait
FletchP2:
echo Well, that worked...
pause 1
put put %ARKNIFE in my %ARBAG
put get paint from my %ARBAG
match FletchP21 The paint on your arrow shaft has dried.
put paint shaft
matchwait

FletchP21:
put put paint in my %ARBAG
put get %ARKNIFE from my %ARBAG
pause 1
match ErrorPT might as well toss it.
match FletchP22 You carefully cut a nock into the end of the arrow shaft.
put cut nocks in my shaft with my %ARKNIFE
matchwait
FletchP22:
echo Nicely done!
pause 3
put put my %ARKNIFE in my %ARBAG
put remove bow
put measure my shaft with my bow
pause 3
pause 1
put wear bow
FletchP3:
put get my %ARKNIFE from my %ARBAG
Match FletchP4 you cleanly slice the end off the arrow shaft.
put cut my shaft with my %ARKNIFE
matchwait
FletchP4:
pause 1
put put %ARKNIFE in my %ARBAG
MATCH FletchP4a You remove a bottle of fletching glue
MATCH Supplies Get what?
put get glue from my %ARBAG
matchwait
FletchP4a:
pause 1
put put glue on my shaft
pause 3
put put glue in my %ARBAG
pause 1
match FletchP42 and remove 3 of them.
match Supplies Get what?
put get 3 fletchings from my %ARBAG
matchwait
pause 1
FletchP42:
match FletchP4 you are able to salvage the shaft.
match FletchP5 holding them in place until you feel they are securely glued.
put put my fletchings on my shaft
echo Sticky...
matchwait
FletchP5:
match FletchP6 The glue on your arrow shaft has dried.
matchwait
FletchP6:
pause 1
put get %ARKNIFE from my %ARBAG
put cut shaft with my %ARKNIFE
pause 1
put cut shaft with my %ARKNIFE 
FletchP7:
pause 3
put put %ARKNIFE in %ARBAG
match FletchP7b and find 100
match FletchP7a in the bundle
match FletchP7aa I could not find what you were referring to.
put look arrows in my %ARBAG
matchwait
FletchP7a:
put get arrow from %ARBAG
put bundle
put put arrow in %ARBAG
goto Fl0etchP1I
FletchP7b:
put get arrows from my %ARBAG
put stow arrows
put put arrow in my %ARBAG
goto FletchP1I
FletchP7aa:
match P7ab arrowheads
match P7ab arrowhead
match P7ac arrow in a
match P7ad What were you referring to?
put tap arr in %ARBAG
matchwait
P7ab:
put put arrow in %ARBAG
goto FletchP1I
P7ac:
put get arrow from my %ARBAG
put bundle
put put arrow in my %ARBAG
goto FletchP1I
P7ad:
put put arrow in %ARBAG
goto Fletch P1I

ErrorPT:
pause 1
echo
echo Well, dont you feel like an idiot... Lets start again
echo
pause 1
put put my %ARKNIFE in my %ARBAG
put wear my bow
put drop right
put clean table
goto FletchP1I 


FletchH:
pause 1
Echo .
Echo .
Echo Arrows with tips of death!
Echo .
Echo .
Echo And We Begin!
Pause 2

match HB1A You tap a
match Supplies What were you referring to?
put tap fletch
matchwait
HB1A:
match HB1B You tap a
match Supplies What were you referring to?
put tap glue
matchwait
HB1B:
match FletchH1W You tap a
match Supplies What were you referring to?
put tap %ARHEAD
matchwait

FletchH1W:
Match FletchH1W1 You remove a 
Match FletchH1I Get what?
put get wood from my %ARBAG
matchwait
FletchH1W1:
put Get %ARAXE from my %ARBAG
put cut arrow shafts from my wood with my %ARAXE
pause 1
put put %ARAXE in %ARBAG
put put my shaft in %ARBAG
goto FletchH1W
FletchH1I:
put get 1 shaft from my %ARBAG
put get my %ARKNIFE from my %ARBAG
match FletchH2 through a line of mein golems
match FletchH2 would probably survive a few shots through plate mail.
match FletchH2 but is not really worthy of mention.
match FletchH2 but it might go where you aim it.
match FletchH2 would make a fine arrow.
match FletchH2 All in all, peerless craftsmanship.
match ErrorHT you discard the rough arrow shaft.
put cut my shaft with my %ARKNIFE
matchwait
FletchH2:
echo Well, that worked...
pause 1
put cut nocks in my shaft with my %ARKNIFE
pause 1
pause 1
match ErrorHT might as well toss it.
match FletchH21 You carefully cut a nock into the end of the arrow shaft.
put cut nocks in my shaft with my %ARKNIFE
matchwait
FletchH21:
echo Nicely done!
pause 3
put put my %ARKNIFE in my %ARBAG
put remove bow
put measure my shaft with my bow
pause 3
pause 1
put wear bow
FletchH3:
put get my %ARKNIFE from my %ARBAG
Match FletchH4 you cleanly slice the end off the arrow shaft.
put cut my shaft with my %ARKNIFE
matchwait
FletchH4:
pause 1
put put %ARKNIFE in my %ARBAG
MATCH FletchH4a You remove a bottle of fletching glue
MATCH Supplies Get what?
put get glue from my %ARBAG
matchwait
FletchH4a:
pause 1
put put glue on my shaft
pause 3
put put glue in my %ARBAG
pause 1
match FletchH42 and remove 3 of them.
match Supplies Get what?
put get 3 fletchings from my %ARBAG
matchwait
pause 1
FletchH42:
match FletchH4 you are able to salvage the shaft.
match FletchH5 holding them in place until you feel they are securely glued.
put put my fletchings on my shaft
echo Sticky...
matchwait
FletchH5:
match FletchH6 The glue on your arrow shaft has dried.
matchwait

FletchH6:
pause 1
put get drill from my %ARBAG
put turn drill
pause 1
put put drill in case
match FletchH61 You remove a
match Supplies Get what?
put get 1 %ARHEAD
matchwait
FletchH61:
put put shaft in %ARBAG
pause 1
put get 1 %ARHEAD
put put arrowheads in %ARBAG
pause 1
put get shaft from %ARBAG
put turn arrowhead 


FletchH7:
pause 3
put put %ARKNIFE in %ARBAG
match FletchH7b and find 100
match FletchH7a in the bundle
match FletchH7aa I could not find what you were referring to.

put look arrows in my %ARBAG
matchwait
FletchH7a:
put get arrow from %ARBAG
put bundle
put put arrow in %ARBAG
goto FletchH1I
FletchH7b:
put get arrows from my %ARBAG
put stow arrows
put put arrow in my %ARBAG
goto FletchH1I
FletchH7aa:
match H7ab arrowheads
match H7ab arrowhead
match H7ac arrow tipped
match H7ad What were you referring to?
put tap arr in %ARBAG
matchwait
H7ab:
put put arrow in %ARBAG
goto FletchH1I
H7ac:
put get arrow from my %ARBAG
put bundle
put put arrow in my %ARBAG
goto FletchH1I
H7ad:
put put arrow in %ARBAG
goto FletchH1I

ErrorHT:
pause 1
echo
echo Well, dont you feel like an idiot... Lets start again
echo
pause 1
put put my %ARKNIFE in my %ARBAG
put wear my bow
put drop right
put clean table
goto FletchH1I 


FletchF:
pause 1
Echo .
Echo .
Echo You like it all, paint, arrowheads, bring it on!
Echo .
Echo .
Echo Hold on to your daggers, we're off!
Echo .
Echo .
Pause 2

match FB1A You tap a
match Supplies What were you referring to?
put tap fletch
matchwait
FB1A:
match FB1B You tap a
match Supplies What were you referring to?
put tap glue
matchwait
FB1B:
match FB1C You tap a
match Supplies What were you referring to?
put tap %ARHEAD
matchwait
FB1C:
match FletchF1W You tap a
match Supplies What were you referring to?
put tap paint
matchwait

FletchF1W:
Match FletchF1W1 You remove a 
Match FletchF1I Get what?
put get wood from my %ARBAG
matchwait
FletchF1W1:
put Get %ARAXE from my %ARBAG
put cut arrow shafts from my wood with my %ARAXE
pause 1
put put %ARAXE in %ARBAG
put put my shaft in %ARBAG
goto FletchF1W
FletchF1I:
put get 1 shaft from my %ARBAG
put get my %ARKNIFE from my %ARBAG
match FletchF2 through a line of mein golems
match FletchF2 would probably survive a few shots through plate mail.
match FletchF2 but is not really worthy of mention.
match FletchF2 but it might go where you aim it.
match FletchF2 would make a fine arrow.
match FletchF2 All in all, peerless craftsmanship.
match ErrorFT you discard the rough arrow shaft.
put cut my shaft with my %ARKNIFE
matchwait
FletchF2:
echo Well, that worked...
pause 1
put put %ARKNIFE in my %ARBAG
put get paint from my %ARBAG
match FletchF21 The paint on your arrow shaft has dried.
put paint shaft
matchwait

FletchF21:
put put paint in my %ARBAG
put get %ARKNIFE from my %ARBAG
pause 1
match ErrorFT might as well toss it.
match FletchF22 You carefully cut a nock into the end of the arrow shaft.
put cut nocks in my shaft with my %ARKNIFE
matchwait
FletchF22:
echo Nicely done!
pause 3
put put my %ARKNIFE in my %ARBAG
put remove bow
put measure my shaft with my bow
pause 3
pause 1
put wear bow
FletchF3:
put get my %ARKNIFE from my %ARBAG
Match FletchF4 you cleanly slice the end off the arrow shaft.
put cut my shaft with my %ARKNIFE
matchwait
FletchF4:
pause 1
put put %ARKNIFE in my %ARBAG
MATCH FletchF4a You remove a bottle of fletching glue
MATCH Supplies Get what?
put get glue from my %ARBAG
matchwait
FletchF4a:
pause 1
put put glue on my shaft
pause 3
put put glue in my %ARBAG
pause 1
match FletchF42 and remove 3 of them.
match Supplies Get what?
put get 3 fletchings from my %ARBAG
matchwait
pause 1
FletchF42:
match FletchF4 you are able to salvage the shaft.
match FletchF5 holding them in place until you feel they are securely glued.
put put my fletchings on my shaft
echo Sticky...
matchwait
FletchF5:
match FletchF6 The glue on your arrow shaft has dried.
matchwait

FletchF6:
pause 1
put get drill from my %ARBAG
put turn drill
pause 1
put put drill in case
match FletchF61 You remove a
match Supplies Get what?
put get 1 %ARHEAD
matchwait
FletchF61:
put put shaft in %ARBAG
pause 1
put get 1 %ARHEAD
put put arrowheads in %ARBAG
pause 1
put get shaft from %ARBAG
put turn arrowhead 


FletchF7:
pause 3
put put %ARKNIFE in %ARBAG
match FletchF7b and find 100
match FletchF7a in the bundle
match FletchF7aa I could not find what you were referring to.
put look arrows in my %ARBAG
matchwait
FletchF7a:
put get arrow from %ARBAG
put bundle
put put arrow in %ARBAG
goto FletchF1I
FletchF7b:
put get arrows from my %ARBAG
put stow arrows
put put arrow in my %ARBAG
goto FletchF1I
FletchF7aa:
match F7ab arrowheads
match F7ab arrowhead
match F7ac arrow tipped
match F7ad What were you referring to?
put tap arr in %ARBAG
matchwait
F7ab:
put put arrow in %ARBAG
goto FletchF1I
F7ac:
put get arrow from my %ARBAG
put bundle
put put arrow in my %ARBAG
goto FletchF1I
F7ad:
put put arrow in %ARBAG
goto FletchF1I

ErrorFT:
pause 1
echo
echo Well, dont you feel like an idiot... Lets start again
echo
pause 1
put put my %ARKNIFE in my %ARBAG
put wear my bow
put drop right
put clean table
goto FletchF1I 
Supplies:

Echo .
Echo .
Echo UH OH!  You appear to have run out of supplies.  Please make sure you have a good stock of glue, wood, arrowheads and paint if needed, and fletchings.  
Echo .
Echo . 
Echo All can be purchased from the fletcher in town.  Fletchings work best when stacked in sets of 30, 60, 90, or 99.  If you use a number not divisible by 3, the assistant will freeze on you.