Necimar's Bead Scripts

Necimar's Bead Scripts
Category	Crafting,Cleric
Front-end	Stormfront
Author	Necimar

Description

A Collection of three simplistic scripts used by Clerics to find Limbs, Carve them into Blocks, and then shape the blocks into Beads. Each script requires that the user have nothing in their hands, except for the final carving script(you may use a primer if needed.) These scripts were written quickly upon request, but have been tested out and worked in every case tried. There may still be a situation that needs refining. That will be up to you to work on.

The scripts are:

 .forlimb
 .block  (This script requires you to be a Cleric in possession of the Bless spell.)
 .bead

Script

1 - .FORLIMB (container to store the limbs)

#This script can be used to forage a specific common/uncommon/rare limb and store it in a container.
#Scroll down and UNCOMMENT the lines containing the wood type you want to keep.
#This script drops unwanted limbs, so the room may become Cluttered and need to be dealt with.
#It is the first of 3 sequential scripts.


Start:
put glance
match GETLIMB You glance down at your empty hands.
match NOTEMPTY You glance down to see
matchwait

GETLIMB:
put forage limb
match CLUTTERED The room is too cluttered
#match STORE You manage to find a ash limb.
#match STORE You manage to find a aspen limb.
#match STORE You manage to find a balsa limb.
#match STORE You manage to find a bamboo limb.
#match STORE You manage to find a birch limb.
#match STORE You manage to find a cedar limb.
#match STORE You manage to find a fir limb.
#match STORE You manage to find a mangrove limb.
#match STORE You manage to find a maple limb.
#match STORE You manage to find a moabi limb.
#match STORE You manage to find a oak limb.
#match STORE You manage to find a pine limb.
#match STORE You manage to find a sandalwood limb.
#match STORE You manage to find a spruce limb.
#match STORE You manage to find a alder limb.
#match STORE You manage to find a apple limb.
#match STORE You manage to find a cypress limb.
#match STORE You manage to find a durian limb.
#match STORE You manage to find a elm limb.
#match STORE You manage to find a hemlock limb.
#match STORE You manage to find a larch limb.
#match STORE You manage to find a mahogany limb.
#match STORE You manage to find a teak limb.
#match STORE You manage to find a walnut limb.
#match STORE You manage to find a willow limb.
#match STORE You manage to find a bocote limb.
#match STORE You manage to find a cherry limb.
#match STORE You manage to find a ebony limb.
#match STORE You manage to find a hickory limb.
#match STORE You manage to find a ironwood limb.
#match STORE You manage to find a kapok limb.
#match STORE You manage to find a lelori limb.
#match STORE You manage to find a ramin limb.
#match STORE You manage to find a redwood limb.
#match STORE You manage to find a rosewood limb.
#match STORE You manage to find a tamarak limb.
#match STORE You manage to find a yew limb.
match DROP Roundtime
matchwait

NOTEMPTY:
echo  EMPTY YOUR HANDS AND RESTART.


STORE:
pause 1
put put my limb in my %1
goto GETLIMB

DROP:
pause 1
put drop my limb
goto GETLIMB

CLUTTERED:
echo ***************************************
echo ******      The room is to cluttered.         ******
echo ******     Resolve and restart script.        ******
echo ***************************************
end

2 - .BLOCK (holy water container) (limb/block container) (carving knife container)

#This script can be used to carve a Limb into a Block to make Payer Beads.
#It requires a container with Holy Water in it, a limb, and a carving knife.
#It is the second of 3 sequential scripts.

Start:
put glance
match GETWATER You glance down at your empty hands.
match NOTEMPTY You glance down to see
matchwait

NOTEMPTY:
echo ******   Your hands are NOT empty.  ******
echo ******      Empty them and restart.      ******
goto END

NOWATER:
echo ****** You do not have any Holy Water in your %1 ******
echo ******       Please refill it, and restart the script.        ******
goto END

NOLIMB:
echo ******   You do not have a limb in your %2      ******
echo ****** Please get one and restart the script.  ******
goto END

NOCAST:
waitfor roundtime
goto BLESS

GETWATER:
pause 1
put open my %2
put get my %1
put look in my %1
match GETLIMB you see some holy water.
match NOWATER There is nothing in there.
matchwait

GETLIMB:
pause 1
put get my limb
match NOLIMB What were you referring to?
match PREPLIMB limb from inside your
matchwait

PREPLIMB:
pause 1
put sprinkle %1 on my limb
put put %1 in %2
pause 1
put close %2
goto BLESS

BLESS:
put prep bless 6
match CASTBLESS You feel fully prepared to cast your spell.
match NOCAST ...wait
matchwait

CASTBLESS:
put cast my limb
pause 1
goto GETKNIFE

GETKNIFE:
put get my carv knife
goto CARVE

CARVE:
put carve my limb with my knife
match CARVE Roundtime
match BLOCK leaving you holding a
matchwait

BLOCK:
pause 1
put open my %2
put put my block in my %2
pause 1
put put my knife in my %3
goto END

END:
echo ALL DONE!!

3 - .BEAD (animal) (wood shaper/primer location) (where to put the beads when done)

#This script assists you in carving a bead from a block in your position.
#You may do so with or without a primer.
#Without a primer, empty your hands, and just run the syntax  .BEAD (animal) (tool contaier) (final bead container)
#With a primer, place the primer in your Right Hand and run the same syntax.
#This is the third and final of 3 sequential scripts.

Start:
put glance
match PRIMER1 You glance down to see a parchment
match GETTOOLS You glance down at your empty
matchwait

PRIMER:
pause 1
put study my primer
match PRIMERTURN Roundtime
match PRIMER0 But the primer is closed!
match PRIMER1 You should start on the first
match PRIMER2 You have already studied
match PRIMER3 You finish studying the last page
matchwait

PRIMERTURN:
pause 1
put turn my primer
goto PRIMER

PRIMER0:
pause 1
put open my primer
goto PRIMER

PRIMER1:
pause 1
put close my primer
put open my primer
goto PRIMER

PRIMER2:
pause 1
put turn my primer
goto PRIMER

PRIMER3:
pause 1
put close my primer
put put my primer in my %2
goto GETTOOLS

GETTOOLS:
pause 1
put get my shaper
put get my block
goto SHAPE

SHAPE:
pause 1
put shape block to %1
match SHAPE Roundtime
match SHAPE You smile with satisfaction as you continue
match SHAPE With heavy strokes, 
match SHAPE Trying your best,
match SHAPE block taking shape in the form of
match SHAPE Pursing your lips
match SHAPE You focus
match BEADDONE Your spirit soars with pride
matchwait


BEADDONE:
pause 1
put put bead in my %3
put put my shaper in my %2
echo *****************************************
echo *           You have completed your bead.                 *
echo *****************************************