fletching script

[jpatter123]

first heres the script for cutting shafts
.cutshaft {material and destination container} {item used to do the cutting ie axe}

start:
put get wood from %1
put cut arrow from my wood with my %2
waitfor roundtime
put put shaft in %1
goto start


heres a simplified fletching script that I wrote that will actually handle failures in the early stages of fletching. I have it set up with using a dagger in my boot but for instance if your using a knife just look for all instances of dagger and change it to knife.
I run the script as so .Fletch {material container} {destination container}
my recomendation if your just starting fletching is to change the desitnation container line from put arrow in my %2 to just drop arrow.
I have had some timing issues between the stormfront and gemstone and you can see I have added some unneeded pauses in places trying to overcome this. I notice it was particualy bad when my laptop screen saver would kick on it would cause the script to fire 1 second to fast. I turned it off and have had this script run for 8 hours with no problems. If anyone has any tweak ideas for this I'd appreciate it.
ENJOY!

start:
put get 1 shaft from %1
put get my dagger
waitfor you remove
put cut my shaft with my dagger
waitfor roundtime
put glance

match failure nothing
match success single
matchwait

failure:
goto start

success:
pause 1
put put dagger in my boot
put get pain from %1
waitfor you remove
put paint my shaft with my pain
waitfor roundtime
put put pain in %1
waitfor the paint
put get dagger
put cut noc in my shaft with my dagger
waitfor roundtime
put put dagger in my boot
put glance

match failure2 empty
match success2 single
matchwait

failure2:
goto start

success2:
put remove bow
put measure my shaft with my bow
waitfor roundtime
pause 1
put wear bow
waitfor you sling
put get dagger
put cut my shaft with my dagger
waitfor roundtime
put put dagger in my boot
goto fletchings

fletchings:
pause 1
put get glue from %1
waitfor you remove
put put glue on my shaft
waitfor roundtime
pause 1
put put glue in %1
put get 3 fletch from %1
waitfor remove
put put fletc on my shaft
match restart you discard
match almosthome holding them
match refletch salvage
matchwait

refletch:
put put fletch in %1
goto fletchings

almosthome:
put put fletch in %1
pause 2
put get dagger from my boot
waitfor the glue
put cut my shaft with my dagger
pause 1
put cut my shaft with my dagger
waitfor you
pause 2
put put my arrow in my %2
pause 1
goto start

restart:
put put fletch in %1
pause 1
goto start