SCENE 71 bazaar
#Include prtychk.txt
ACTOR 1, "Harriet of the herbs", joshTownsfolk, 2, 25, 80
POSE 2, 3
COMPARE #<num.hostClass> "35"
IF> @monster
IF= @monster
1: Hello there
1: I am Harriet, the herb expert.
@serviceask
OFFER 1, 2, 3, 4, 7, 12, 13, 14, 15, 16, 18, 19, 24, 27, 29, 30, 31, 32, 33, 34, 35, 36, 37, 38
1: What service do you require? (1=Information 2=Making Of Exlier)
ASK 30
IF Q1 @about
IF QInformation @about
IF Q2 @exlier
IF Qexlier @exlier
IF Qmaking @exlier
IF Qmixing @exlier
IF Qherbs @exlier
GOTO @serviceask
END
; About the herbs
@about
1: There are 10 rare herbs all over the island, however finding them is very difficult.
1: The rare herbs are found after battles, but are as the name suggests in short supply.
1: There are ten different rare herbs, each have unique properties
1: Is there a particular rare herb you want to know about?
@aboutwhat
1: Say the name of a herb and Ill see what I can tell you, or say 'exlier' and i will mix some of your rare herbs for you.
ASK 30
IF QHealing @heal
IF QHeal @heal
IF QWitch-hazel @witch
IF Qhazel @witch
IF QTrainers @train
IF QTrain @train
IF QTrainer @train
IF QZodiac @zodiac
IF QTravelers @travel
IF QTraveler @travel
IF QTravel @travel
IF QVine @vine
IF QCaidoz @Caidoz
IF QBewitched @bewitch
IF QCalicane @Calicane
IF QDeaths-head @death
IF QDeaths @death
IF QDeath @death
IF Qexlier @exlier
IF Qmaking @exlier
IF Qmixing @exlier
IF Qherbs @exlier
GOTO @aboutwhat
END

@heal
1: Healing herbs, are for the curation of HP, these generally create various healing exliers.
GOTO @aboutwhat
@witch
1: Witch-hazel herbs, are for the curation of MP, these create various magic exliers.
GOTO @aboutwhat
@train
1: Trainers herbs, are for the improving of status points, they create training exliers.
GOTO @aboutwhat
@zodiac
1: Zodiac herbs, are for ENHANCING the effects of other herbs, some of the best exliers are produced when a Zodiac herb is involved.
GOTO @aboutwhat
@travel
1: Travelers herbs, are for creating magical exliers of teleportation.
GOTO @aboutwhat
@vine
1: Vine herbs, are for producing alcoholic exliers, these increace HP at the cost of MP
GOTO @aboutwhat
@Caidoz
1: Caidoz herbs, are dehancing herbs, these reduce the effects of other herbs, although they can produce some usful exliers all the same.
GOTO @aboutwhat
@bewitch
1: Bewitched herbs, are for the curation of status defects, what you mix them with determines the curation effect
GOTO @aboutwhat
@Calicane
1: Calicane herbs, are damaging to the mind, great for lowering opponants MP
GOTO @aboutwhat
@death
1: Deaths-head herbs, live up-to thier name, damaging to the body, the effects can be devestating when mixed correctly.
GOTO @aboutwhat

; Mixing an exlier
@exlier
1: So you are ready for me to mix you an exlier?
@howmany
1: How many herbs do you want to put in the exlier, one or two?
ASK 30
IF Q1 @oneherb
IF Qone @oneherb
IF Q2 @twoherbs
IF Qtwo @twoherbs
GOTO @howmany
END

; Mixing a one herb exlier
@oneherb
1: Creating an exlier with one herb costs 500 GP, is that OK?
ASK 10
IF Qyes @oneherbstart
IF Qno @howmany
GOTO @oneherb
@oneherbstart
1: Please type the name of the rare herb you which to create the exlier with
ASK 30
IF QHealing @1.1heal
IF QHeal @1.1heal
IF QWitch-hazel @1.1witch
IF Qhazel @1.1witch
IF QTrainers @1.1train
IF QTrain @1.1train
IF QTrainer @1.1train
IF QZodiac @1.1zodiac
IF QTravelers @1.1travel
IF QTraveler @1.1travel
IF QTravel @1.1travel
IF QVine @1.1vine
IF QCaidoz @1.1Caidoz
IF QBewitched @1.1bewitch
IF QCalicane @1.1Calicane
IF QDeaths-head @1.1death
IF QDeaths @1.1death
IF QDeath @1.1death
1: That is not a rare herb
GOTO @oneherbstart

@1.1heal
IF -G500 @notenouthGP
SET herbmix1, 721
IF -I#<herbmix1> @noherb
1: Are you sure you want to create the basic exlier with the rare healing herb?
ASK 30
IF Qyes @1.1healyes
IF Qno @howmany
GOTO @1.1heal
@1.1healyes
1: One moment.
WAIT 1
1: Here is your %I731, made from a %I#<herbmix1>
TAKE G500
GIVE I731
TAKE I#<herbmix1>
GOTO @howmany

@1.1witch
IF -G500 @notenouthGP
SET herbmix1, 722
IF -I#<herbmix1> @noherb
1: Are you sure you want to create the basic exlier with the rare %I#<herbmix1>?
ASK 30
IF Qyes @1.1witchyes
IF Qno @howmany
GOTO @1.1witch
@1.1witchyes
1: One moment.
WAIT 1
1: Here is your %I732, made from a %I#<herbmix1>
TAKE G500
GIVE I732
TAKE I#<herbmix1>
GOTO @howmany

@1.1train
IF -G500 @notenouthGP
SET herbmix1, 723
IF -I#<herbmix1> @noherb
1: Are you sure you want to create the basic exlier with the rare %I#<herbmix1>?
ASK 30
IF Qyes @1.1trainyes
IF Qno @howmany
GOTO @1.1train
@1.1trainyes
1: One moment.
WAIT 1
1: Here is your %I733, made from a %I#<herbmix1>
TAKE G500
GIVE I733
TAKE I#<herbmix1>
GOTO @howmany

@1.1zodiac
IF -G500 @notenouthGP
SET herbmix1, 724
IF -I#<herbmix1> @noherb
1: Are you sure you want to create the basic exlier with the rare %I#<herbmix1>?
ASK 30
IF Qyes @1.1zodiacyes
IF Qno @howmany
GOTO @1.1zodiac
@1.1zodiacyes
1: One moment.
WAIT 1
1: Here is your %I734, made from a %I#<herbmix1>
TAKE G500
GIVE I734
TAKE I#<herbmix1>
GOTO @howmany

@1.1travel
IF -G500 @notenouthGP
SET herbmix1, 725
IF -I#<herbmix1> @noherb
1: Are you sure you want to create the basic exlier with the rare %I#<herbmix1>?
ASK 30
IF Qyes @1.1travelyes
IF Qno @howmany
GOTO @1.1travel
@1.1travelyes
1: One moment.
WAIT 1
1: Here is your %I735, made from a %I#<herbmix1>
TAKE G500
GIVE I735
TAKE I#<herbmix1>
GOTO @howmany

@1.1vine
IF -G500 @notenouthGP
SET herbmix1, 726
IF -I#<herbmix1> @noherb
1: Are you sure you want to create the basic exlier with the rare %I#<herbmix1>?
ASK 30
IF Qyes @1.1vineyes
IF Qno @howmany
GOTO @1.1vine
@1.1vineyes
1: One moment.
WAIT 1
1: Here is your %I736, made from a %I#<herbmix1>
TAKE G500
GIVE I736
TAKE I#<herbmix1>
GOTO @howmany

@1.1Caidoz
IF -G500 @notenouthGP
SET herbmix1, 727
IF -I#<herbmix1> @noherb
1: Are you sure you want to create the basic exlier with the rare %I#<herbmix1>?
ASK 30
IF Qyes @1.1Caidozyes
IF Qno @howmany
GOTO @1.1Caidoz
@1.1Caidozyes
1: One moment.
WAIT 1
1: Here is your %I737, made from a %I#<herbmix1>
TAKE G500
GIVE I737
TAKE I#<herbmix1>
GOTO @howmany

@1.1bewitch
IF -G500 @notenouthGP
SET herbmix1, 728
IF -I#<herbmix1> @noherb
1: Are you sure you want to create the basic exlier with the rare %I#<herbmix1>?
ASK 30
IF Qyes @1.1bewitchyes
IF Qno @howmany
GOTO @1.1bewitch
@1.1bewitchyes
1: One moment.
WAIT 1
1: Here is your %I738, made from a %I#<herbmix1>
TAKE G500
GIVE I738
TAKE I#<herbmix1>
GOTO @howmany

@1.1Calicane
IF -G500 @notenouthGP
SET herbmix1, 729
IF -I#<herbmix1> @noherb
1: Are you sure you want to create the basic exlier with the rare %I#<herbmix1>?
ASK 30
IF Qyes @1.1Calicaneyes
IF Qno @howmany
GOTO @1.1Calicane
@1.1Calicaneyes
1: One moment.
WAIT 1
1: Here is your %I739, made from a %I#<herbmix1>
TAKE G500
GIVE I739
TAKE I#<herbmix1>
GOTO @howmany

@1.1death
IF -G500 @notenouthGP
SET herbmix1, 730
IF -I#<herbmix1> @noherb
1: Are you sure you want to create the basic exlier with the rare %I#<herbmix1>?
ASK 30
IF Qyes @1.1deathyes
IF Qno @howmany
GOTO @1.1death
@1.1deathyes
1: One moment.
WAIT 1
1: Here is your %I740, made from a %I#<herbmix1>
TAKE G500
GIVE I740
TAKE I#<herbmix1>
GOTO @howmany

@twoherbs
1: Creating an exlier with two herbs costs 5000 GP, is that OK?
ASK 10
IF Qyes @twoherbstart
IF Qno @howmany
GOTO @twoherbs
END

@twoherbstart
1: Please type the name of the first rare herb you which to create the exlier with
ASK 30
IF QHealing @2.1heal
IF QHeal @2.1heal
IF QWitch-hazel @2.1witch
IF Qhazel @2.1witch
IF QTrainers @2.1train
IF QTrain @2.1train
IF QTrainer @2.1train
IF QZodiac @2.1zodiac
IF QTravelers @2.1travel
IF QTraveler @2.1travel
IF QTravel @2.1travel
IF QVine @2.1vine
IF QCaidoz @2.1Caidoz
IF QBewitched @2.1bewitch
IF QCalicane @2.1Calicane
IF QDeaths-head @2.1death
IF QDeaths @2.1death
IF QDeath @2.1death
1: That is not a rare herb
GOTO @twoherbstart
END

;TWO herb exlier-HEALING
@2.1heal
IF -G5000 @notenouthGP
SET herbmix1, 721
IF -I#<herbmix1> @noherb
1: Are you sure you want to create the two herb exlier with the rare %I#<herbmix1>?
ASK 30
IF Qyes @2.1healyes
IF Qno @howmany
GOTO @2.1heal
@2.1healyes
1: Ok what is the seccond herb?
ASK 30
IF QHealing @2.2heal
IF QHeal @2.2heal
IF QWitch-hazel @2.2witch
IF Qhazel @2.2witch
IF QTrainers @2.2train
IF QTrain @2.2train
IF QTrainer @2.2train
IF QZodiac @2.2zodiac
IF QTravelers @2.2travel
IF QTraveler @2.2travel
IF QTravel @2.2travel
IF QVine @2.2vine
IF QCaidoz @2.2Caidoz
IF QBewitched @2.2bewitch
IF QCalicane @2.2Calicane
IF QDeaths-head @2.2death
IF QDeaths @2.2death
IF QDeath @2.2death
1: That is not a rare herb
GOTO @2.1healyes

@2.1witch
IF -G5000 @notenouthGP
SET herbmix1, 722
IF -I#<herbmix1> @noherb
1: Are you sure you want to create the two herb exlier with the rare %I#<herbmix1>?
ASK 30
IF Qyes @2.1witchyes
IF Qno @howmany
GOTO @2.1witch
@2.1witchyes
1: Ok what is the seccond herb?
ASK 30
IF QHealing @2.2heal
IF QHeal @2.2heal
IF QWitch-hazel @2.2witch
IF Qhazel @2.2witch
IF QTrainers @2.2train
IF QTrain @2.2train
IF QTrainer @2.2train
IF QZodiac @2.2zodiac
IF QTravelers @2.2travel
IF QTraveler @2.2travel
IF QTravel @2.2travel
IF QVine @2.2vine
IF QCaidoz @2.2Caidoz
IF QBewitched @2.2bewitch
IF QCalicane @2.2Calicane
IF QDeaths-head @2.2death
IF QDeaths @2.2death
IF QDeath @2.2death
1: That is not a rare herb
GOTO @2.1witchyes

@2.1train
IF -G5000 @notenouthGP
SET herbmix1, 723
IF -I#<herbmix1> @noherb
1: Are you sure you want to create the two herb exlier with the rare %I#<herbmix1>?
ASK 30
IF Qyes @2.1trainyes
IF Qno @howmany
GOTO @2.1train
@2.1trainyes
1: Ok what is the seccond herb?
ASK 30
IF QHealing @2.2heal
IF QHeal @2.2heal
IF QWitch-hazel @2.2witch
IF Qhazel @2.2witch
IF QTrainers @2.2train
IF QTrain @2.2train
IF QTrainer @2.2train
IF QZodiac @2.2zodiac
IF QTravelers @2.2travel
IF QTraveler @2.2travel
IF QTravel @2.2travel
IF QVine @2.2vine
IF QCaidoz @2.2Caidoz
IF QBewitched @2.2bewitch
IF QCalicane @2.2Calicane
IF QDeaths-head @2.2death
IF QDeaths @2.2death
IF QDeath @2.2death
1: That is not a rare herb
GOTO @2.1trainyes

@2.1zodiac
IF -G5000 @notenouthGP
SET herbmix1, 724
IF -I#<herbmix1> @noherb
1: Are you sure you want to create the two herb exlier with the rare %I#<herbmix1>?
ASK 30
IF Qyes @2.1zodiacyes
IF Qno @howmany
GOTO @2.1zodiac
@2.1zodiacyes
1: Ok what is the seccond herb?
ASK 30
IF QHealing @2.2heal
IF QHeal @2.2heal
IF QWitch-hazel @2.2witch
IF Qhazel @2.2witch
IF QTrainers @2.2train
IF QTrain @2.2train
IF QTrainer @2.2train
IF QZodiac @2.2zodiac
IF QTravelers @2.2travel
IF QTraveler @2.2travel
IF QTravel @2.2travel
IF QVine @2.2vine
IF QCaidoz @2.2Caidoz
IF QBewitched @2.2bewitch
IF QCalicane @2.2Calicane
IF QDeaths-head @2.2death
IF QDeaths @2.2death
IF QDeath @2.2death
1: That is not a rare herb
GOTO @2.1zodiacyes

@2.1travel
IF -G5000 @notenouthGP
SET herbmix1, 725
IF -I#<herbmix1> @noherb
1: Are you sure you want to create the two herb exlier with the rare %I#<herbmix1>?
ASK 30
IF Qyes @2.1travelyes
IF Qno @howmany
GOTO @2.1travel
@2.1travelyes
1: Ok what is the seccond herb?
ASK 30
IF QHealing @2.2heal
IF QHeal @2.2heal
IF QWitch-hazel @2.2witch
IF Qhazel @2.2witch
IF QTrainers @2.2train
IF QTrain @2.2train
IF QTrainer @2.2train
IF QZodiac @2.2zodiac
IF QTravelers @2.2travel
IF QTraveler @2.2travel
IF QTravel @2.2travel
IF QVine @2.2vine
IF QCaidoz @2.2Caidoz
IF QBewitched @2.2bewitch
IF QCalicane @2.2Calicane
IF QDeaths-head @2.2death
IF QDeaths @2.2death
IF QDeath @2.2death
1: That is not a rare herb
GOTO @2.1travelyes

@2.1vine
IF -G5000 @notenouthGP
SET herbmix1, 726
IF -I#<herbmix1> @noherb
1: Are you sure you want to create the two herb exlier with the rare %I#<herbmix1>?
ASK 30
IF Qyes @2.1vineyes
IF Qno @howmany
GOTO @2.1vine
@2.1vineyes
1: Ok what is the seccond herb?
ASK 30
IF QHealing @2.2heal
IF QHeal @2.2heal
IF QWitch-hazel @2.2witch
IF Qhazel @2.2witch
IF QTrainers @2.2train
IF QTrain @2.2train
IF QTrainer @2.2train
IF QZodiac @2.2zodiac
IF QTravelers @2.2travel
IF QTraveler @2.2travel
IF QTravel @2.2travel
IF QVine @2.2vine
IF QCaidoz @2.2Caidoz
IF QBewitched @2.2bewitch
IF QCalicane @2.2Calicane
IF QDeaths-head @2.2death
IF QDeaths @2.2death
IF QDeath @2.2death
1: That is not a rare herb
GOTO @2.1vineyes

@2.1Caidoz
IF -G5000 @notenouthGP
SET herbmix1, 727
IF -I#<herbmix1> @noherb
1: Are you sure you want to create the two herb exlier with the rare %I#<herbmix1>?
ASK 30
IF Qyes @2.1caidozyes
IF Qno @howmany
GOTO @2.1caidoz
@2.1caidozyes
1: Ok what is the seccond herb?
ASK 30
IF QHealing @2.2heal
IF QHeal @2.2heal
IF QWitch-hazel @2.2witch
IF Qhazel @2.2witch
IF QTrainers @2.2train
IF QTrain @2.2train
IF QTrainer @2.2train
IF QZodiac @2.2zodiac
IF QTravelers @2.2travel
IF QTraveler @2.2travel
IF QTravel @2.2travel
IF QVine @2.2vine
IF QCaidoz @2.2Caidoz
IF QBewitched @2.2bewitch
IF QCalicane @2.2Calicane
IF QDeaths-head @2.2death
IF QDeaths @2.2death
IF QDeath @2.2death
1: That is not a rare herb
GOTO @2.1caidozyes

@2.1bewitch
IF -G5000 @notenouthGP
SET herbmix1, 728
IF -I#<herbmix1> @noherb
1: Are you sure you want to create the two herb exlier with the rare %I#<herbmix1>?
ASK 30
IF Qyes @2.1bewitchyes
IF Qno @howmany
GOTO @2.1bewitch
@2.1bewitchyes
1: Ok what is the seccond herb?
ASK 30
IF QHealing @2.2heal
IF QHeal @2.2heal
IF QWitch-hazel @2.2witch
IF Qhazel @2.2witch
IF QTrainers @2.2train
IF QTrain @2.2train
IF QTrainer @2.2train
IF QZodiac @2.2zodiac
IF QTravelers @2.2travel
IF QTraveler @2.2travel
IF QTravel @2.2travel
IF QVine @2.2vine
IF QCaidoz @2.2Caidoz
IF QBewitched @2.2bewitch
IF QCalicane @2.2Calicane
IF QDeaths-head @2.2death
IF QDeaths @2.2death
IF QDeath @2.2death
1: That is not a rare herb
GOTO @2.1bewitchyes

@2.1Calicane
IF -G5000 @notenouthGP
SET herbmix1, 729
IF -I#<herbmix1> @noherb
1: Are you sure you want to create the two herb exlier with the rare %I#<herbmix1>?
ASK 30
IF Qyes @2.1calicaneyes
IF Qno @howmany
GOTO @2.1calicane
@2.1calicaneyes
1: Ok what is the seccond herb?
ASK 30
IF QHealing @2.2heal
IF QHeal @2.2heal
IF QWitch-hazel @2.2witch
IF Qhazel @2.2witch
IF QTrainers @2.2train
IF QTrain @2.2train
IF QTrainer @2.2train
IF QZodiac @2.2zodiac
IF QTravelers @2.2travel
IF QTraveler @2.2travel
IF QTravel @2.2travel
IF QVine @2.2vine
IF QCaidoz @2.2Caidoz
IF QBewitched @2.2bewitch
IF QCalicane @2.2Calicane
IF QDeaths-head @2.2death
IF QDeaths @2.2death
IF QDeath @2.2death
1: That is not a rare herb
GOTO @2.1calicaneyes

@2.1death
IF -G5000 @notenouthGP
SET herbmix1, 730
IF -I#<herbmix1> @noherb
1: Are you sure you want to create the two herb exlier with the rare %I#<herbmix1>?
ASK 30
IF Qyes @2.1deathyes
IF Qno @howmany
GOTO @2.1death
@2.1deathyes
1: Ok what is the seccond herb?
ASK 30
IF QHealing @2.2heal
IF QHeal @2.2heal
IF QWitch-hazel @2.2witch
IF Qhazel @2.2witch
IF QTrainers @2.2train
IF QTrain @2.2train
IF QTrainer @2.2train
IF QZodiac @2.2zodiac
IF QTravelers @2.2travel
IF QTraveler @2.2travel
IF QTravel @2.2travel
IF QVine @2.2vine
IF QCaidoz @2.2Caidoz
IF QBewitched @2.2bewitch
IF QCalicane @2.2Calicane
IF QDeaths-head @2.2death
IF QDeaths @2.2death
IF QDeath @2.2death
1: That is not a rare herb
GOTO @2.1deathyes

@2.2heal
SET herbmix2, 721
IF -I#<herbmix2> @noherb
1: Are you sure you want to create the two herb exlier with the rare %I#<herbmix1> and %I#<herbmix2>?
ASK 30
IF Qyes @mix
IF Qno @howmany
GOTO @2.2heal

@2.2witch
SET herbmix2, 722
IF -I#<herbmix2> @noherb
1: Are you sure you want to create the two herb exlier with the rare %I#<herbmix1> and %I#<herbmix2>?
ASK 30
IF Qyes @mix
IF Qno @howmany
GOTO @2.2witch

@2.2train
SET herbmix2, 723
IF -I#<herbmix2> @noherb
1: Are you sure you want to create the two herb exlier with the rare %I#<herbmix1> and %I#<herbmix2>?
ASK 30
IF Qyes @mix
IF Qno @howmany
GOTO @2.2train

@2.2zodiac
SET herbmix2, 724
IF -I#<herbmix2> @noherb
1: Are you sure you want to create the two herb exlier with the rare %I#<herbmix1> and %I#<herbmix2>?
ASK 30
IF Qyes @mix
IF Qno @howmany
GOTO @2.2zodiac

@2.2travel
SET herbmix2, 725
IF -I#<herbmix2> @noherb
1: Are you sure you want to create the two herb exlier with the rare %I#<herbmix1> and %I#<herbmix2>?
ASK 30
IF Qyes @mix
IF Qno @howmany
GOTO @2.2travel

@2.2vine
SET herbmix2, 726
IF -I#<herbmix2> @noherb
1: Are you sure you want to create the two herb exlier with the rare %I#<herbmix1> and %I#<herbmix2>?
ASK 30
IF Qyes @mix
IF Qno @howmany
GOTO @2.2vine

@2.2Caidoz
SET herbmix2, 727
IF -I#<herbmix2> @noherb
1: Are you sure you want to create the two herb exlier with the rare %I#<herbmix1> and %I#<herbmix2>?
ASK 30
IF Qyes @mix
IF Qno @howmany
GOTO @2.2Caidoz

@2.2bewitch
SET herbmix2, 728
IF -I#<herbmix2> @noherb
1: Are you sure you want to create the two herb exlier with the rare %I#<herbmix1> and %I#<herbmix2>?
ASK 30
IF Qyes @mix
IF Qno @howmany
GOTO @2.2bewitch

@2.2Calicane
SET herbmix2, 729
IF -I#<herbmix2> @noherb
1: Are you sure you want to create the two herb exlier with the rare %I#<herbmix1> and %I#<herbmix2>?
ASK 30
IF Qyes @mix
IF Qno @howmany
GOTO @2.2Calicane

@2.2death
SET herbmix2, 730
IF -I#<herbmix2> @noherb
1: Are you sure you want to create the two herb exlier with the rare %I#<herbmix1> and %I#<herbmix2>?
ASK 30
IF Qyes @mix
IF Qno @howmany
GOTO @2.2death

@notenouthGP
1: Im sorry, you cannot afford that.
GOTO @serviceask
END

@noherb
1: Im sorry, you dont have a %I#<herbmix1>
GOTO @howmany
END

;Ok finally we have both herbs for the two herb exlier, now to 'mix em', well to determine what to give the player at least...
;we can do this by comparing #<herbmix1> and #<herbmix2> to the ten possable valuse:-
;Healing herb 		721
;Witch-Hazel herb 	722
;Trainers herb 		723
;Zodiac herb 		724
;Travelers herb 		725
;Vine herb 			726
;Caidoz herb 		727
;Bewitched herb 		728
;Calicane herb 		729
;Deaths-head herb 	730
@Mix
1: This should be interesting, please wait.
COMPARE #<herbmix1>, "721"
IF= @721+
COMPARE #<herbmix1>, "722"
IF= @722+
COMPARE #<herbmix1>, "723"
IF= @723+
COMPARE #<herbmix1>, "724"
IF= @724+
COMPARE #<herbmix1>, "725"
IF= @725+
COMPARE #<herbmix1>, "726"
IF= @726+
COMPARE #<herbmix1>, "727"
IF= @727+
COMPARE #<herbmix1>, "728"
IF= @728+
COMPARE #<herbmix1>, "729"
IF= @729+
COMPARE #<herbmix1>, "730"
IF= @730+
1: This is confusing, have YOU been fiddling cookies?
1: Forsome reason the herbs selected are not herbs....
GOTO @howmany
END

@721+
COMPARE #<herbmix2>, "721"
IF= @721+721
COMPARE #<herbmix2>, "722"
IF= @721+722
COMPARE #<herbmix2>, "723"
IF= @721+723
COMPARE #<herbmix2>, "724"
IF= @721+724
COMPARE #<herbmix2>, "725"
IF= @721+725
COMPARE #<herbmix2>, "726"
IF= @721+726
COMPARE #<herbmix2>, "727"
IF= @721+727
COMPARE #<herbmix2>, "728"
IF= @721+728
COMPARE #<herbmix2>, "729"
IF= @721+729
COMPARE #<herbmix2>, "730"
IF= @721+730
1: This is confusing, have YOU been fiddling cookies?
1: Forsome reason the herbs selected are not herbs....
GOTO @howmany
END

@722+
COMPARE #<herbmix2>, "721"
IF= @722+721
COMPARE #<herbmix2>, "722"
IF= @722+722
COMPARE #<herbmix2>, "723"
IF= @722+723
COMPARE #<herbmix2>, "724"
IF= @722+724
COMPARE #<herbmix2>, "725"
IF= @722+725
COMPARE #<herbmix2>, "726"
IF= @722+726
COMPARE #<herbmix2>, "727"
IF= @722+727
COMPARE #<herbmix2>, "728"
IF= @722+728
COMPARE #<herbmix2>, "729"
IF= @722+729
COMPARE #<herbmix2>, "730"
IF= @722+730
1: This is confusing, have YOU been fiddling cookies?
1: Forsome reason the herbs selected are not herbs....
GOTO @howmany
END

@723+
COMPARE #<herbmix2>, "721"
IF= @723+721
COMPARE #<herbmix2>, "722"
IF= @723+722
COMPARE #<herbmix2>, "723"
IF= @723+723
COMPARE #<herbmix2>, "724"
IF= @723+724
COMPARE #<herbmix2>, "725"
IF= @723+725
COMPARE #<herbmix2>, "726"
IF= @723+726
COMPARE #<herbmix2>, "727"
IF= @723+727
COMPARE #<herbmix2>, "728"
IF= @723+728
COMPARE #<herbmix2>, "729"
IF= @723+729
COMPARE #<herbmix2>, "730"
IF= @723+730
1: This is confusing, have YOU been fiddling cookies?
1: Forsome reason the herbs selected are not herbs....
GOTO @howmany
END

@724+
COMPARE #<herbmix2>, "721"
IF= @724+721
COMPARE #<herbmix2>, "722"
IF= @724+722
COMPARE #<herbmix2>, "723"
IF= @724+723
COMPARE #<herbmix2>, "724"
IF= @724+724
COMPARE #<herbmix2>, "725"
IF= @724+725
COMPARE #<herbmix2>, "726"
IF= @724+726
COMPARE #<herbmix2>, "727"
IF= @724+727
COMPARE #<herbmix2>, "728"
IF= @724+728
COMPARE #<herbmix2>, "729"
IF= @724+729
COMPARE #<herbmix2>, "730"
IF= @724+730
1: This is confusing, have YOU been fiddling cookies?
1: Forsome reason the herbs selected are not herbs....
GOTO @howmany
END

@725+
COMPARE #<herbmix2>, "721"
IF= @725+721
COMPARE #<herbmix2>, "722"
IF= @725+722
COMPARE #<herbmix2>, "723"
IF= @725+723
COMPARE #<herbmix2>, "724"
IF= @725+724
COMPARE #<herbmix2>, "725"
IF= @725+725
COMPARE #<herbmix2>, "726"
IF= @725+726
COMPARE #<herbmix2>, "727"
IF= @725+727
COMPARE #<herbmix2>, "728"
IF= @725+728
COMPARE #<herbmix2>, "729"
IF= @725+729
COMPARE #<herbmix2>, "730"
IF= @725+730
1: This is confusing, have YOU been fiddling cookies?
1: Forsome reason the herbs selected are not herbs....
GOTO @howmany
END

@726+
COMPARE #<herbmix2>, "721"
IF= @726+721
COMPARE #<herbmix2>, "722"
IF= @726+722
COMPARE #<herbmix2>, "723"
IF= @726+723
COMPARE #<herbmix2>, "724"
IF= @726+724
COMPARE #<herbmix2>, "725"
IF= @726+725
COMPARE #<herbmix2>, "726"
IF= @726+726
COMPARE #<herbmix2>, "727"
IF= @726+727
COMPARE #<herbmix2>, "728"
IF= @726+728
COMPARE #<herbmix2>, "729"
IF= @726+729
COMPARE #<herbmix2>, "730"
IF= @726+730
1: This is confusing, have YOU been fiddling cookies?
1: Forsome reason the herbs selected are not herbs....
GOTO @howmany
END

@727+
COMPARE #<herbmix2>, "721"
IF= @727+721
COMPARE #<herbmix2>, "722"
IF= @727+722
COMPARE #<herbmix2>, "723"
IF= @727+723
COMPARE #<herbmix2>, "724"
IF= @727+724
COMPARE #<herbmix2>, "725"
IF= @727+725
COMPARE #<herbmix2>, "726"
IF= @727+726
COMPARE #<herbmix2>, "727"
IF= @727+727
COMPARE #<herbmix2>, "728"
IF= @727+728
COMPARE #<herbmix2>, "729"
IF= @727+729
COMPARE #<herbmix2>, "730"
IF= @727+730
1: This is confusing, have YOU been fiddling cookies?
1: Forsome reason the herbs selected are not herbs....
GOTO @howmany
END

@728+
COMPARE #<herbmix2>, "721"
IF= @728+721
COMPARE #<herbmix2>, "722"
IF= @728+722
COMPARE #<herbmix2>, "723"
IF= @728+723
COMPARE #<herbmix2>, "724"
IF= @728+724
COMPARE #<herbmix2>, "725"
IF= @728+725
COMPARE #<herbmix2>, "726"
IF= @728+726
COMPARE #<herbmix2>, "727"
IF= @728+727
COMPARE #<herbmix2>, "728"
IF= @728+728
COMPARE #<herbmix2>, "729"
IF= @728+729
COMPARE #<herbmix2>, "730"
IF= @738+730
1: This is confusing, have YOU been fiddling cookies?
1: Forsome reason the herbs selected are not herbs....
GOTO @howmany
END

@729+
COMPARE #<herbmix2>, "721"
IF= @729+721
COMPARE #<herbmix2>, "722"
IF= @729+722
COMPARE #<herbmix2>, "723"
IF= @729+723
COMPARE #<herbmix2>, "724"
IF= @729+724
COMPARE #<herbmix2>, "725"
IF= @729+725
COMPARE #<herbmix2>, "726"
IF= @729+726
COMPARE #<herbmix2>, "727"
IF= @729+727
COMPARE #<herbmix2>, "728"
IF= @729+728
COMPARE #<herbmix2>, "729"
IF= @729+729
COMPARE #<herbmix2>, "730"
IF= @739+730
1: This is confusing, have YOU been fiddling cookies?
1: Forsome reason the herbs selected are not herbs....
GOTO @howmany
END

@730+
COMPARE #<herbmix2>, "721"
IF= @730+721
COMPARE #<herbmix2>, "722"
IF= @730+722
COMPARE #<herbmix2>, "723"
IF= @730+723
COMPARE #<herbmix2>, "724"
IF= @730+724
COMPARE #<herbmix2>, "725"
IF= @730+725
COMPARE #<herbmix2>, "726"
IF= @730+726
COMPARE #<herbmix2>, "727"
IF= @730+727
COMPARE #<herbmix2>, "728"
IF= @730+728
COMPARE #<herbmix2>, "729"
IF= @730+729
COMPARE #<herbmix2>, "730"
IF= @730+730
1: This is confusing, have YOU been fiddling cookies?
1: Forsome reason the herbs selected are not herbs....
GOTO @howmany
END

;Now lets take the herbs, and give the result!
;Healing herbs
@721+721
SET resultherb, 741
TAKE G5000
TAKE I#<herbmix1>
TAKE I#<herbmix2>
GIVE I#<resultherb>
1: Wow %I#<herbmix1> and %I#<herbmix2> produced this %I#<resultherb>!
1: Is there anything else I can do for you?
GOTO @howmany
END

@721+722
SET resultherb, 742
TAKE G5000
TAKE I#<herbmix1>
TAKE I#<herbmix2>
GIVE I#<resultherb>
1: Wow %I#<herbmix1> and %I#<herbmix2> produced this %I#<resultherb>!
1: Is there anything else I can do for you?
GOTO @howmany
END

@721+723
SET resultherb, 743
TAKE G5000
TAKE I#<herbmix1>
TAKE I#<herbmix2>
GIVE I#<resultherb>
1: Wow %I#<herbmix1> and %I#<herbmix2> produced this %I#<resultherb>!
1: Is there anything else I can do for you?
GOTO @howmany
END

@721+724
SET resultherb, 744
TAKE G5000
TAKE I#<herbmix1>
TAKE I#<herbmix2>
GIVE I#<resultherb>
1: Wow %I#<herbmix1> and %I#<herbmix2> produced this %I#<resultherb>!
1: Is there anything else I can do for you?
GOTO @howmany
END

@721+725
SET resultherb, 745
TAKE G5000
TAKE I#<herbmix1>
TAKE I#<herbmix2>
GIVE I#<resultherb>
1: Wow %I#<herbmix1> and %I#<herbmix2> produced this %I#<resultherb>!
1: Is there anything else I can do for you?
GOTO @howmany
END

@721+726
SET resultherb, 746
TAKE G5000
TAKE I#<herbmix1>
TAKE I#<herbmix2>
GIVE I#<resultherb>
1: Wow %I#<herbmix1> and %I#<herbmix2> produced this %I#<resultherb>!
1: Is there anything else I can do for you?
GOTO @howmany
END

@721+727
SET resultherb, 747
TAKE G5000
TAKE I#<herbmix1>
TAKE I#<herbmix2>
GIVE I#<resultherb>
1: Wow %I#<herbmix1> and %I#<herbmix2> produced this %I#<resultherb>!
1: Is there anything else I can do for you?
GOTO @howmany
END

@721+728
SET resultherb, 748
TAKE G5000
TAKE I#<herbmix1>
TAKE I#<herbmix2>
GIVE I#<resultherb>
1: Wow %I#<herbmix1> and %I#<herbmix2> produced this %I#<resultherb>!
1: Is there anything else I can do for you?
GOTO @howmany
END

@721+729
SET resultherb, 749
TAKE G5000
TAKE I#<herbmix1>
TAKE I#<herbmix2>
GIVE I#<resultherb>
1: Wow %I#<herbmix1> and %I#<herbmix2> produced this %I#<resultherb>!
1: Is there anything else I can do for you?
GOTO @howmany
END

@721+730
SET resultherb, 750
TAKE G5000
TAKE I#<herbmix1>
TAKE I#<herbmix2>
GIVE I#<resultherb>
1: Wow %I#<herbmix1> and %I#<herbmix2> produced this %I#<resultherb>!
1: Is there anything else I can do for you?
GOTO @howmany
END

;Witch-hazel herbs
@722+721
SET resultherb, 742
TAKE G5000
TAKE I#<herbmix1>
TAKE I#<herbmix2>
GIVE I#<resultherb>
1: Wow %I#<herbmix1> and %I#<herbmix2> produced this %I#<resultherb>!
1: Is there anything else I can do for you?
GOTO @howmany
END

@722+722
SET resultherb, 751
TAKE G5000
TAKE I#<herbmix1>
TAKE I#<herbmix2>
GIVE I#<resultherb>
1: Wow %I#<herbmix1> and %I#<herbmix2> produced this %I#<resultherb>!
1: Is there anything else I can do for you?
GOTO @howmany
END

@722+723
SET resultherb, 752
TAKE G5000
TAKE I#<herbmix1>
TAKE I#<herbmix2>
GIVE I#<resultherb>
1: Wow %I#<herbmix1> and %I#<herbmix2> produced this %I#<resultherb>!
1: Is there anything else I can do for you?
GOTO @howmany
END

@722+724
SET resultherb, 753
TAKE G5000
TAKE I#<herbmix1>
TAKE I#<herbmix2>
GIVE I#<resultherb>
1: Wow %I#<herbmix1> and %I#<herbmix2> produced this %I#<resultherb>!
1: Is there anything else I can do for you?
GOTO @howmany
END

@722+725
SET resultherb, 754
TAKE G5000
TAKE I#<herbmix1>
TAKE I#<herbmix2>
GIVE I#<resultherb>
1: Wow %I#<herbmix1> and %I#<herbmix2> produced this %I#<resultherb>!
1: Is there anything else I can do for you?
GOTO @howmany
END

@722+726
SET resultherb, 755
TAKE G5000
TAKE I#<herbmix1>
TAKE I#<herbmix2>
GIVE I#<resultherb>
1: Wow %I#<herbmix1> and %I#<herbmix2> produced this %I#<resultherb>!
1: Is there anything else I can do for you?
GOTO @howmany
END

@722+727
SET resultherb, 756
TAKE G5000
TAKE I#<herbmix1>
TAKE I#<herbmix2>
GIVE I#<resultherb>
1: Wow %I#<herbmix1> and %I#<herbmix2> produced this %I#<resultherb>!
1: Is there anything else I can do for you?
GOTO @howmany
END

@722+728
SET resultherb, 757
TAKE G5000
TAKE I#<herbmix1>
TAKE I#<herbmix2>
GIVE I#<resultherb>
1: Wow %I#<herbmix1> and %I#<herbmix2> produced this %I#<resultherb>!
1: Is there anything else I can do for you?
GOTO @howmany
END

@722+729
SET resultherb, 758
TAKE G5000
TAKE I#<herbmix1>
TAKE I#<herbmix2>
GIVE I#<resultherb>
1: Wow %I#<herbmix1> and %I#<herbmix2> produced this %I#<resultherb>!
1: Is there anything else I can do for you?
GOTO @howmany
END

@722+730
SET resultherb, 759
TAKE G5000
TAKE I#<herbmix1>
TAKE I#<herbmix2>
GIVE I#<resultherb>
1: Wow %I#<herbmix1> and %I#<herbmix2> produced this %I#<resultherb>!
1: Is there anything else I can do for you?
GOTO @howmany
END

;Trainers herbs
@723+721
SET resultherb, 743
TAKE G5000
TAKE I#<herbmix1>
TAKE I#<herbmix2>
GIVE I#<resultherb>
1: Wow %I#<herbmix1> and %I#<herbmix2> produced this %I#<resultherb>!
1: Is there anything else I can do for you?
GOTO @howmany
END

@723+722
SET resultherb, 752
TAKE G5000
TAKE I#<herbmix1>
TAKE I#<herbmix2>
GIVE I#<resultherb>
1: Wow %I#<herbmix1> and %I#<herbmix2> produced this %I#<resultherb>!
1: Is there anything else I can do for you?
GOTO @howmany
END

@723+723
SET resultherb, 760
TAKE G5000
TAKE I#<herbmix1>
TAKE I#<herbmix2>
GIVE I#<resultherb>
1: Wow %I#<herbmix1> and %I#<herbmix2> produced this %I#<resultherb>!
1: Is there anything else I can do for you?
GOTO @howmany
END

@723+724
SET resultherb, 761
TAKE G5000
TAKE I#<herbmix1>
TAKE I#<herbmix2>
GIVE I#<resultherb>
1: Wow %I#<herbmix1> and %I#<herbmix2> produced this %I#<resultherb>!
1: Is there anything else I can do for you?
GOTO @howmany
END

@723+725
SET resultherb, 762
TAKE G5000
TAKE I#<herbmix1>
TAKE I#<herbmix2>
GIVE I#<resultherb>
1: Wow %I#<herbmix1> and %I#<herbmix2> produced this %I#<resultherb>!
1: Is there anything else I can do for you?
GOTO @howmany
END

@723+726
SET resultherb, 763
TAKE G5000
TAKE I#<herbmix1>
TAKE I#<herbmix2>
GIVE I#<resultherb>
1: Wow %I#<herbmix1> and %I#<herbmix2> produced this %I#<resultherb>!
1: Is there anything else I can do for you?
GOTO @howmany
END

@723+727
SET resultherb, 764
TAKE G5000
TAKE I#<herbmix1>
TAKE I#<herbmix2>
GIVE I#<resultherb>
1: Wow %I#<herbmix1> and %I#<herbmix2> produced this %I#<resultherb>!
1: Is there anything else I can do for you?
GOTO @howmany
END

@723+728
SET resultherb, 765
TAKE G5000
TAKE I#<herbmix1>
TAKE I#<herbmix2>
GIVE I#<resultherb>
1: Wow %I#<herbmix1> and %I#<herbmix2> produced this %I#<resultherb>!
1: Is there anything else I can do for you?
GOTO @howmany
END

@723+729
SET resultherb, 766
TAKE G5000
TAKE I#<herbmix1>
TAKE I#<herbmix2>
GIVE I#<resultherb>
1: Wow %I#<herbmix1> and %I#<herbmix2> produced this %I#<resultherb>!
1: Is there anything else I can do for you?
GOTO @howmany
END

@723+730
SET resultherb, 767
TAKE G5000
TAKE I#<herbmix1>
TAKE I#<herbmix2>
GIVE I#<resultherb>
1: Wow %I#<herbmix1> and %I#<herbmix2> produced this %I#<resultherb>!
1: Is there anything else I can do for you?
GOTO @howmany
END

;Zodiac herbs
@724+721
SET resultherb, 744
TAKE G5000
TAKE I#<herbmix1>
TAKE I#<herbmix2>
GIVE I#<resultherb>
1: Wow %I#<herbmix1> and %I#<herbmix2> produced this %I#<resultherb>!
1: Is there anything else I can do for you?
GOTO @howmany
END

@724+722
SET resultherb, 753
TAKE G5000
TAKE I#<herbmix1>
TAKE I#<herbmix2>
GIVE I#<resultherb>
1: Wow %I#<herbmix1> and %I#<herbmix2> produced this %I#<resultherb>!
1: Is there anything else I can do for you?
GOTO @howmany
END

@724+723
SET resultherb, 761
TAKE G5000
TAKE I#<herbmix1>
TAKE I#<herbmix2>
GIVE I#<resultherb>
1: Wow %I#<herbmix1> and %I#<herbmix2> produced this %I#<resultherb>!
1: Is there anything else I can do for you?
GOTO @howmany
END

@724+724
SET resultherb, 768
TAKE G5000
TAKE I#<herbmix1>
TAKE I#<herbmix2>
GIVE I#<resultherb>
1: Wow %I#<herbmix1> and %I#<herbmix2> produced this %I#<resultherb>!
1: Is there anything else I can do for you?
GOTO @howmany
END

@724+725
SET resultherb, 769
TAKE G5000
TAKE I#<herbmix1>
TAKE I#<herbmix2>
GIVE I#<resultherb>
1: Wow %I#<herbmix1> and %I#<herbmix2> produced this %I#<resultherb>!
1: Is there anything else I can do for you?
GOTO @howmany
END

@724+726
SET resultherb, 770
TAKE G5000
TAKE I#<herbmix1>
TAKE I#<herbmix2>
GIVE I#<resultherb>
1: Wow %I#<herbmix1> and %I#<herbmix2> produced this %I#<resultherb>!
1: Is there anything else I can do for you?
GOTO @howmany
END

@724+727
SET resultherb, 771
TAKE G5000
TAKE I#<herbmix1>
TAKE I#<herbmix2>
GIVE I#<resultherb>
1: Wow %I#<herbmix1> and %I#<herbmix2> produced this %I#<resultherb>!
1: Is there anything else I can do for you?
GOTO @howmany
END

@724+728
SET resultherb, 772
TAKE G5000
TAKE I#<herbmix1>
TAKE I#<herbmix2>
GIVE I#<resultherb>
1: Wow %I#<herbmix1> and %I#<herbmix2> produced this %I#<resultherb>!
1: Is there anything else I can do for you?
GOTO @howmany
END

@724+729
SET resultherb, 773
TAKE G5000
TAKE I#<herbmix1>
TAKE I#<herbmix2>
GIVE I#<resultherb>
1: Wow %I#<herbmix1> and %I#<herbmix2> produced this %I#<resultherb>!
1: Is there anything else I can do for you?
GOTO @howmany
END

@724+730
SET resultherb, 774
TAKE G5000
TAKE I#<herbmix1>
TAKE I#<herbmix2>
GIVE I#<resultherb>
1: Wow %I#<herbmix1> and %I#<herbmix2> produced this %I#<resultherb>!
1: Is there anything else I can do for you?
GOTO @howmany
END

;Travelers herbs
@725+721
SET resultherb, 745
TAKE G5000
TAKE I#<herbmix1>
TAKE I#<herbmix2>
GIVE I#<resultherb>
1: Wow %I#<herbmix1> and %I#<herbmix2> produced this %I#<resultherb>!
1: Is there anything else I can do for you?
GOTO @howmany
END

@725+722
SET resultherb, 754
TAKE G5000
TAKE I#<herbmix1>
TAKE I#<herbmix2>
GIVE I#<resultherb>
1: Wow %I#<herbmix1> and %I#<herbmix2> produced this %I#<resultherb>!
1: Is there anything else I can do for you?
GOTO @howmany
END

@725+723
SET resultherb, 762
TAKE G5000
TAKE I#<herbmix1>
TAKE I#<herbmix2>
GIVE I#<resultherb>
1: Wow %I#<herbmix1> and %I#<herbmix2> produced this %I#<resultherb>!
1: Is there anything else I can do for you?
GOTO @howmany
END

@725+724
SET resultherb, 769
TAKE G5000
TAKE I#<herbmix1>
TAKE I#<herbmix2>
GIVE I#<resultherb>
1: Wow %I#<herbmix1> and %I#<herbmix2> produced this %I#<resultherb>!
1: Is there anything else I can do for you?
GOTO @howmany
END

@725+725
SET resultherb, 775
TAKE G5000
TAKE I#<herbmix1>
TAKE I#<herbmix2>
GIVE I#<resultherb>
1: Wow %I#<herbmix1> and %I#<herbmix2> produced this %I#<resultherb>!
1: Is there anything else I can do for you?
GOTO @howmany
END

@725+726
SET resultherb, 776
TAKE G5000
TAKE I#<herbmix1>
TAKE I#<herbmix2>
GIVE I#<resultherb>
1: Wow %I#<herbmix1> and %I#<herbmix2> produced this %I#<resultherb>!
1: Is there anything else I can do for you?
GOTO @howmany
END

@725+727
SET resultherb, 777
TAKE G5000
TAKE I#<herbmix1>
TAKE I#<herbmix2>
GIVE I#<resultherb>
1: Wow %I#<herbmix1> and %I#<herbmix2> produced this %I#<resultherb>!
1: Is there anything else I can do for you?
GOTO @howmany
END

@725+728
SET resultherb, 778
TAKE G5000
TAKE I#<herbmix1>
TAKE I#<herbmix2>
GIVE I#<resultherb>
1: Wow %I#<herbmix1> and %I#<herbmix2> produced this %I#<resultherb>!
1: Is there anything else I can do for you?
GOTO @howmany
END

@725+729
SET resultherb, 779
TAKE G5000
TAKE I#<herbmix1>
TAKE I#<herbmix2>
GIVE I#<resultherb>
1: Wow %I#<herbmix1> and %I#<herbmix2> produced this %I#<resultherb>!
1: Is there anything else I can do for you?
GOTO @howmany
END

@725+730
SET resultherb, 780
TAKE G5000
TAKE I#<herbmix1>
TAKE I#<herbmix2>
GIVE I#<resultherb>
1: Wow %I#<herbmix1> and %I#<herbmix2> produced this %I#<resultherb>!
1: Is there anything else I can do for you?
GOTO @howmany
END

;Vine herbs
@726+721
SET resultherb, 746
TAKE G5000
TAKE I#<herbmix1>
TAKE I#<herbmix2>
GIVE I#<resultherb>
1: Wow %I#<herbmix1> and %I#<herbmix2> produced this %I#<resultherb>!
1: Is there anything else I can do for you?
GOTO @howmany
END

@726+722
SET resultherb, 755
TAKE G5000
TAKE I#<herbmix1>
TAKE I#<herbmix2>
GIVE I#<resultherb>
1: Wow %I#<herbmix1> and %I#<herbmix2> produced this %I#<resultherb>!
1: Is there anything else I can do for you?
GOTO @howmany
END

@726+723
SET resultherb, 763
TAKE G5000
TAKE I#<herbmix1>
TAKE I#<herbmix2>
GIVE I#<resultherb>
1: Wow %I#<herbmix1> and %I#<herbmix2> produced this %I#<resultherb>!
1: Is there anything else I can do for you?
GOTO @howmany
END

@726+724
SET resultherb, 770
TAKE G5000
TAKE I#<herbmix1>
TAKE I#<herbmix2>
GIVE I#<resultherb>
1: Wow %I#<herbmix1> and %I#<herbmix2> produced this %I#<resultherb>!
1: Is there anything else I can do for you?
GOTO @howmany
END

@726+725
SET resultherb, 776
TAKE G5000
TAKE I#<herbmix1>
TAKE I#<herbmix2>
GIVE I#<resultherb>
1: Wow %I#<herbmix1> and %I#<herbmix2> produced this %I#<resultherb>!
1: Is there anything else I can do for you?
GOTO @howmany
END

@726+726
SET resultherb, 781
TAKE G5000
TAKE I#<herbmix1>
TAKE I#<herbmix2>
GIVE I#<resultherb>
1: Wow %I#<herbmix1> and %I#<herbmix2> produced this %I#<resultherb>!
1: Is there anything else I can do for you?
GOTO @howmany
END

@726+727
SET resultherb, 782
TAKE G5000
TAKE I#<herbmix1>
TAKE I#<herbmix2>
GIVE I#<resultherb>
1: Wow %I#<herbmix1> and %I#<herbmix2> produced this %I#<resultherb>!
1: Is there anything else I can do for you?
GOTO @howmany
END

@726+728
SET resultherb, 783
TAKE G5000
TAKE I#<herbmix1>
TAKE I#<herbmix2>
GIVE I#<resultherb>
1: Wow %I#<herbmix1> and %I#<herbmix2> produced this %I#<resultherb>!
1: Is there anything else I can do for you?
GOTO @howmany
END

@726+729
SET resultherb, 784
TAKE G5000
TAKE I#<herbmix1>
TAKE I#<herbmix2>
GIVE I#<resultherb>
1: Wow %I#<herbmix1> and %I#<herbmix2> produced this %I#<resultherb>!
1: Is there anything else I can do for you?
GOTO @howmany
END

@726+730
SET resultherb, 785
TAKE G5000
TAKE I#<herbmix1>
TAKE I#<herbmix2>
GIVE I#<resultherb>
1: Wow %I#<herbmix1> and %I#<herbmix2> produced this %I#<resultherb>!
1: Is there anything else I can do for you?
GOTO @howmany
END

;Caidoz herbs
@727+721
SET resultherb, 747
TAKE G5000
TAKE I#<herbmix1>
TAKE I#<herbmix2>
GIVE I#<resultherb>
1: Wow %I#<herbmix1> and %I#<herbmix2> produced this %I#<resultherb>!
1: Is there anything else I can do for you?
GOTO @howmany
END

@727+722
SET resultherb, 756
TAKE G5000
TAKE I#<herbmix1>
TAKE I#<herbmix2>
GIVE I#<resultherb>
1: Wow %I#<herbmix1> and %I#<herbmix2> produced this %I#<resultherb>!
1: Is there anything else I can do for you?
GOTO @howmany
END

@727+723
SET resultherb, 764
TAKE G5000
TAKE I#<herbmix1>
TAKE I#<herbmix2>
GIVE I#<resultherb>
1: Wow %I#<herbmix1> and %I#<herbmix2> produced this %I#<resultherb>!
1: Is there anything else I can do for you?
GOTO @howmany
END

@727+724
SET resultherb, 771
TAKE G5000
TAKE I#<herbmix1>
TAKE I#<herbmix2>
GIVE I#<resultherb>
1: Wow %I#<herbmix1> and %I#<herbmix2> produced this %I#<resultherb>!
1: Is there anything else I can do for you?
GOTO @howmany
END

@727+725
SET resultherb, 777
TAKE G5000
TAKE I#<herbmix1>
TAKE I#<herbmix2>
GIVE I#<resultherb>
1: Wow %I#<herbmix1> and %I#<herbmix2> produced this %I#<resultherb>!
1: Is there anything else I can do for you?
GOTO @howmany
END

@727+726
SET resultherb, 782
TAKE G5000
TAKE I#<herbmix1>
TAKE I#<herbmix2>
GIVE I#<resultherb>
1: Wow %I#<herbmix1> and %I#<herbmix2> produced this %I#<resultherb>!
1: Is there anything else I can do for you?
GOTO @howmany
END

@727+727
SET resultherb, 786
TAKE G5000
TAKE I#<herbmix1>
TAKE I#<herbmix2>
GIVE I#<resultherb>
1: Wow %I#<herbmix1> and %I#<herbmix2> produced this %I#<resultherb>!
1: Is there anything else I can do for you?
GOTO @howmany
END

@727+728
SET resultherb, 787
TAKE G5000
TAKE I#<herbmix1>
TAKE I#<herbmix2>
GIVE I#<resultherb>
1: Wow %I#<herbmix1> and %I#<herbmix2> produced this %I#<resultherb>!
1: Is there anything else I can do for you?
GOTO @howmany
END

@727+729
SET resultherb, 788
TAKE G5000
TAKE I#<herbmix1>
TAKE I#<herbmix2>
GIVE I#<resultherb>
1: Wow %I#<herbmix1> and %I#<herbmix2> produced this %I#<resultherb>!
1: Is there anything else I can do for you?
GOTO @howmany
END

@727+730
SET resultherb, 789
TAKE G5000
TAKE I#<herbmix1>
TAKE I#<herbmix2>
GIVE I#<resultherb>
1: Wow %I#<herbmix1> and %I#<herbmix2> produced this %I#<resultherb>!
1: Is there anything else I can do for you?
GOTO @howmany
END

;Bewitched herbs
@728+721
SET resultherb, 748
TAKE G5000
TAKE I#<herbmix1>
TAKE I#<herbmix2>
GIVE I#<resultherb>
1: Wow %I#<herbmix1> and %I#<herbmix2> produced this %I#<resultherb>!
1: Is there anything else I can do for you?
GOTO @howmany
END

@728+722
SET resultherb, 757
TAKE G5000
TAKE I#<herbmix1>
TAKE I#<herbmix2>
GIVE I#<resultherb>
1: Wow %I#<herbmix1> and %I#<herbmix2> produced this %I#<resultherb>!
1: Is there anything else I can do for you?
GOTO @howmany
END

@728+723
SET resultherb, 765
TAKE G5000
TAKE I#<herbmix1>
TAKE I#<herbmix2>
GIVE I#<resultherb>
1: Wow %I#<herbmix1> and %I#<herbmix2> produced this %I#<resultherb>!
1: Is there anything else I can do for you?
GOTO @howmany
END

@728+724
SET resultherb, 772
TAKE G5000
TAKE I#<herbmix1>
TAKE I#<herbmix2>
GIVE I#<resultherb>
1: Wow %I#<herbmix1> and %I#<herbmix2> produced this %I#<resultherb>!
1: Is there anything else I can do for you?
GOTO @howmany
END

@728+725
SET resultherb, 778
TAKE G5000
TAKE I#<herbmix1>
TAKE I#<herbmix2>
GIVE I#<resultherb>
1: Wow %I#<herbmix1> and %I#<herbmix2> produced this %I#<resultherb>!
1: Is there anything else I can do for you?
GOTO @howmany
END

@728+726
SET resultherb, 783
TAKE G5000
TAKE I#<herbmix1>
TAKE I#<herbmix2>
GIVE I#<resultherb>
1: Wow %I#<herbmix1> and %I#<herbmix2> produced this %I#<resultherb>!
1: Is there anything else I can do for you?
GOTO @howmany
END

@728+727
SET resultherb, 787
TAKE G5000
TAKE I#<herbmix1>
TAKE I#<herbmix2>
GIVE I#<resultherb>
1: Wow %I#<herbmix1> and %I#<herbmix2> produced this %I#<resultherb>!
1: Is there anything else I can do for you?
GOTO @howmany
END

@728+728
SET resultherb, 790
TAKE G5000
TAKE I#<herbmix1>
TAKE I#<herbmix2>
GIVE I#<resultherb>
1: Wow %I#<herbmix1> and %I#<herbmix2> produced this %I#<resultherb>!
1: Is there anything else I can do for you?
GOTO @howmany
END

@728+729
SET resultherb, 791
TAKE G5000
TAKE I#<herbmix1>
TAKE I#<herbmix2>
GIVE I#<resultherb>
1: Wow %I#<herbmix1> and %I#<herbmix2> produced this %I#<resultherb>!
1: Is there anything else I can do for you?
GOTO @howmany
END

@728+730
SET resultherb, 792
TAKE G5000
TAKE I#<herbmix1>
TAKE I#<herbmix2>
GIVE I#<resultherb>
1: Wow %I#<herbmix1> and %I#<herbmix2> produced this %I#<resultherb>!
1: Is there anything else I can do for you?
GOTO @howmany
END

;Calicane herbs
@729+721
SET resultherb, 749
TAKE G5000
TAKE I#<herbmix1>
TAKE I#<herbmix2>
GIVE I#<resultherb>
1: Wow %I#<herbmix1> and %I#<herbmix2> produced this %I#<resultherb>!
1: Is there anything else I can do for you?
GOTO @howmany
END

@729+722
SET resultherb, 758
TAKE G5000
TAKE I#<herbmix1>
TAKE I#<herbmix2>
GIVE I#<resultherb>
1: Wow %I#<herbmix1> and %I#<herbmix2> produced this %I#<resultherb>!
1: Is there anything else I can do for you?
GOTO @howmany
END

@729+723
SET resultherb, 766
TAKE G5000
TAKE I#<herbmix1>
TAKE I#<herbmix2>
GIVE I#<resultherb>
1: Wow %I#<herbmix1> and %I#<herbmix2> produced this %I#<resultherb>!
1: Is there anything else I can do for you?
GOTO @howmany
END

@729+724
SET resultherb, 773
TAKE G5000
TAKE I#<herbmix1>
TAKE I#<herbmix2>
GIVE I#<resultherb>
1: Wow %I#<herbmix1> and %I#<herbmix2> produced this %I#<resultherb>!
1: Is there anything else I can do for you?
GOTO @howmany
END

@729+725
SET resultherb, 779
TAKE G5000
TAKE I#<herbmix1>
TAKE I#<herbmix2>
GIVE I#<resultherb>
1: Wow %I#<herbmix1> and %I#<herbmix2> produced this %I#<resultherb>!
1: Is there anything else I can do for you?
GOTO @howmany
END

@729+726
SET resultherb, 784
TAKE G5000
TAKE I#<herbmix1>
TAKE I#<herbmix2>
GIVE I#<resultherb>
1: Wow %I#<herbmix1> and %I#<herbmix2> produced this %I#<resultherb>!
1: Is there anything else I can do for you?
GOTO @howmany
END

@729+727
SET resultherb, 788
TAKE G5000
TAKE I#<herbmix1>
TAKE I#<herbmix2>
GIVE I#<resultherb>
1: Wow %I#<herbmix1> and %I#<herbmix2> produced this %I#<resultherb>!
1: Is there anything else I can do for you?
GOTO @howmany
END

@729+728
SET resultherb, 791
TAKE G5000
TAKE I#<herbmix1>
TAKE I#<herbmix2>
GIVE I#<resultherb>
1: Wow %I#<herbmix1> and %I#<herbmix2> produced this %I#<resultherb>!
1: Is there anything else I can do for you?
GOTO @howmany
END

@729+729
SET resultherb, 793
TAKE G5000
TAKE I#<herbmix1>
TAKE I#<herbmix2>
GIVE I#<resultherb>
1: Wow %I#<herbmix1> and %I#<herbmix2> produced this %I#<resultherb>!
1: Is there anything else I can do for you?
GOTO @howmany
END

@729+730
SET resultherb, 794
TAKE G5000
TAKE I#<herbmix1>
TAKE I#<herbmix2>
GIVE I#<resultherb>
1: Wow %I#<herbmix1> and %I#<herbmix2> produced this %I#<resultherb>!
1: Is there anything else I can do for you?
GOTO @howmany
END

;Deaths-head herbs
@730+721
SET resultherb, 750
TAKE G5000
TAKE I#<herbmix1>
TAKE I#<herbmix2>
GIVE I#<resultherb>
1: Wow %I#<herbmix1> and %I#<herbmix2> produced this %I#<resultherb>!
1: Is there anything else I can do for you?
GOTO @howmany
END

@730+722
SET resultherb, 759
TAKE G5000
TAKE I#<herbmix1>
TAKE I#<herbmix2>
GIVE I#<resultherb>
1: Wow %I#<herbmix1> and %I#<herbmix2> produced this %I#<resultherb>!
1: Is there anything else I can do for you?
GOTO @howmany
END

@730+723
SET resultherb, 767
TAKE G5000
TAKE I#<herbmix1>
TAKE I#<herbmix2>
GIVE I#<resultherb>
1: Wow %I#<herbmix1> and %I#<herbmix2> produced this %I#<resultherb>!
1: Is there anything else I can do for you?
GOTO @howmany
END

@730+724
SET resultherb, 774
TAKE G5000
TAKE I#<herbmix1>
TAKE I#<herbmix2>
GIVE I#<resultherb>
1: Wow %I#<herbmix1> and %I#<herbmix2> produced this %I#<resultherb>!
1: Is there anything else I can do for you?
GOTO @howmany
END

@730+725
SET resultherb, 780
TAKE G5000
TAKE I#<herbmix1>
TAKE I#<herbmix2>
GIVE I#<resultherb>
1: Wow %I#<herbmix1> and %I#<herbmix2> produced this %I#<resultherb>!
1: Is there anything else I can do for you?
GOTO @howmany
END

@730+726
SET resultherb, 785
TAKE G5000
TAKE I#<herbmix1>
TAKE I#<herbmix2>
GIVE I#<resultherb>
1: Wow %I#<herbmix1> and %I#<herbmix2> produced this %I#<resultherb>!
1: Is there anything else I can do for you?
GOTO @howmany
END

@730+727
SET resultherb, 789
TAKE G5000
TAKE I#<herbmix1>
TAKE I#<herbmix2>
GIVE I#<resultherb>
1: Wow %I#<herbmix1> and %I#<herbmix2> produced this %I#<resultherb>!
1: Is there anything else I can do for you?
GOTO @howmany
END

@730+728
SET resultherb, 792
TAKE G5000
TAKE I#<herbmix1>
TAKE I#<herbmix2>
GIVE I#<resultherb>
1: Wow %I#<herbmix1> and %I#<herbmix2> produced this %I#<resultherb>!
1: Is there anything else I can do for you?
GOTO @howmany
END

@730+729
SET resultherb, 794
TAKE G5000
TAKE I#<herbmix1>
TAKE I#<herbmix2>
GIVE I#<resultherb>
1: Wow %I#<herbmix1> and %I#<herbmix2> produced this %I#<resultherb>!
1: Is there anything else I can do for you?
GOTO @howmany
END

@730+730
SET resultherb, 795
TAKE G5000
TAKE I#<herbmix1>
TAKE I#<herbmix2>
GIVE I#<resultherb>
1: Wow %I#<herbmix1> and %I#<herbmix2> produced this %I#<resultherb>!
1: Is there anything else I can do for you?
GOTO @howmany
END

@monster
1: Oh my, a monster!
END