;---------
; wildheart manor
;

SCENE 120 bglibrary, "Wildheart Manor",
	THEME	0
	MUSIC	void.mid
        ACTOR	1,	"Elder Tamer",	joshtownsfolk, 21,	25,	90
	SELECT	1
	PARTY T4095
	GOTO SCENE 124
	END



SCENE 124 bglibrary, "Wildheart Manor",
	THEME	0
	MUSIC	void.mid
        ACTOR	1,	"Elder Tamer",	joshtownsfolk, 21,	25,	90
	SELECT	1
	IF T1, @wb
	HOST_GIVE T1
	' Greetings, young %2. I am the Elder Tamer, Beast Master extraordinaire. 
	GOTO @class
@wb
	' Welcome back, %2. 
@class
	IF C5, @ranger
        	IF C6, @bm
        	IF C10, @druid
        	IF C2, @paladin
	IF C9, @cleric
	IF C4, @monk
	GOTO @noclass
	MOVE	1,	15, 85
@noclass
	' I'm sorry, but I'm unfamiliar with the ways of your class.
	MOVE	1,	50, 75
	POSE 22
	' Now, if you'll excuse me...
	WAIT 1
	POSE 21
	GOTO @end
@ranger
	IF T212, @ranger2
	' I see you're a Ranger. As luck would have it, I can teach you something.
        ' Take this spell, and good luck on your journey!
	POSE 22
	WAIT 1
	HOST_GIVE T212
	POSE 21
	WAIT 1	
	GOTO @end
@ranger2
	IF T5, @dontcomeback2
	IF -V40+P0, @dontcomeback3
	' I can set you on the path to greater skill in Healing.
	' You'll have to study a little, though. I can't do it all for you.
	HOST_GIVE T5
	END
	


@bm
	IF T212, @bm2
	IF V20, @r20
	' I see you're a Beast Master yourself! As luck would have it, I can teach you something.
        ' Take this spell, and return when you've reached a higher level of training.
	POSE 22
	WAIT 1
	HOST_GIVE T212
	POSE 21
	WAIT 1
	' Good luck on your journey!
	GOTO @end
@r20
	IF T212, @dontcomeback
	' Well, it looks like you are coming along nicely as a Beast Master!
	' But is also looks as though you didn't come visit me when you started your training.
	' Here is an important spell that will aid you in your travels!
	POSE 22
	WAIT 1
	HOST_GIVE T212
	POSE 21
	WAIT 1
	' This is all I can teach you, but I see you are already quite an adept Beast Master.
	' I would suggest seeking out the hermit in the Forest of Palteas. He taught me well, and may do the same for you.
	HOST_GIVE T3
	GOTO @end	
@bm2
	IF T5, @dontcomeback
	IF -V60+P0, @dontcomeback3
	' I can set you on the path to greater skill in Healing.
	' You'll have to study a little, though. I can't do it all for you.
	HOST_GIVE T5
	END
	

@druid
	IF T212, @druid2
	' I see you're a Druid. As luck would have it, I can teach you something.
        ' Take this spell, and good luck on your journey!
	POSE 22
	WAIT 1
	HOST_GIVE T212
	POSE 21
	WAIT 1	
	GOTO @end
@druid2
	IF T5, @dontcomeback2
	IF -V30+P0, @dontcomeback3
	' I can set you on the path to greater skill in Healing.
	' You'll have to study a little, though. I can't do it all for you.
	HOST_GIVE T5
	END
@paladin
	IF T5, @dontcomeback2
	IF -V70+P0, @dontcomeback3
	' I can set you on the path to greater skill in Healing.
	' You'll have to study a little, though. I can't do it all for you.
	HOST_GIVE T5
	END
@cleric
	IF T5, @dontcomeback2
	IF P0, @dontcomeback3
	' I can set you on the path to greater skill in Healing.
	' You'll have to study a little, though. I can't do it all for you.
	HOST_GIVE T5
	END
@monk
	IF T5, @monknpc
	IF -V80, @monknpc2
	' I can set you on the path to greater skill in Healing.
	' You'll have to study a little, though. I can't do it all for you.
	HOST_GIVE T5
	END
@hermit
        ' Welcome back, young %2. Seek the hermit in Palteas as I have advised you!
	GOTO @end
@dontcomeback
	' There's nothing more I can teach you, but I know someone who might.
	' Seek out the hermit in the Forest of Palteas. He taught me well, and may do the same for you.
	HOST_GIVE T3
	GOTO @end
@dontcomeback2
	' There's nothing more I can teach you, %2. You must keep searching for a mentor.
	GOTO @end
@dontcomeback3
	' There's nothing more I can teach you right now, %2. Return when you achieve a higher level of training.
@end
	END
@monknpc
	' Seek out the Master Monk in the Forest of Palteas.
	GOTO @end
@monknpc2
	' Seek out the Master Monk in the Forest of Palteas.
	' But you should still return to visit me when your training improves.
	' There are a few things left that I can teach you.
	GOTO @end	
;---------
; hermit's hut
;
SCENE 121 shop, "Hermit's Hut"
	MUSIC	aerianell.mid
       	 ACTOR	1,	"Slartibartfast",	josh94, 1,	15,	90
	IF T236, @begin
	IF T235, @cookiecheck
	1: You must prove yourself before I will talk with you.
	1: Kill two of every monster on this map and return to me.
	Host_GIVE T235
	END
@cookiecheck

	COMPARE #<km.19>, "2"
	IF< @failure
	COMPARE #<km.20>, "2"
	IF< @failure
	COMPARE #<km.21>, "2"
	IF< @failure
	COMPARE #<km.22>, "2"
	IF< @failure
	COMPARE #<km.23>, "2"
	IF< @failure
	COMPARE #<km.24>, "2"
	IF< @failure
	COMPARE #<km.25>, "2"
	IF< @failure
	COMPARE #<km.26>, "2"
	IF< @failure
	1: Congratulations.
	HOST_GIVE T236
	HOST_GIVE G5000
	1: This money should help you on your journey.
	1: Return to me when you think you are ready for training.
	END

@failure

	1: You haven't yet killed two of every monster on this map.
	1: Return to me when you have.
	END
@begin	
	IF C6, @bm
	IF C5, @ranger
	;bm
	' Hello there, %2. I cannot teach you, because I do not know your trade.
	GOTO @end


@bm
	IF T4, @hiagain1
	HOST_GIVE T4
	IF ALIVE, @skip1
	' Why hello there, what a suprise! A dead person, dropping in on my little hut here!
	' Wait a second, I'll fix you up nicely.
	WAIT    2.0
	SOUND	"thunder1.wav"
	GIVE 	L1
	GIVE	H3000
	GIVE	M3000 
	WAIT	1.0
	' Now, what were you doing, coming to see me, dead and all? 
	IF T3, @grottoguy
	' Well, nevermind that, what are you doing here? 
	' You don't know? Well then, go to the Mystic Grotto.
	' I'm sure there is someone who can help you there.
	GOTO @end
@skip1
	' Why hello there, what a nice suprise! A visitor dropping in on my little hut here!
	' Anyways, welcome to my temporary humble dwelling. I'm usually just out and about, taming wild creatures and training them.
	' So, what were you doing, dropping in on little old me out in the middle of nowhere?
	IF T3, @grottoguy
	IF T212, @needexp1
	' You don't know? Well, listen to me, %2. You need to go see the Elder Tamer in the Mystic Grotto. He has something to teach you.
	GOTO @end
@hiagain1
	' Hello again, %2. 
	IF T7, @nomore
	IF T3, @spellagain
	IF V20, @needseeguy
	IF T212, @needexp
	GOTO @needseeguy
@needexp1
	IF V20, @needseeguy
@needexp
	' You need to gain some experience, and then visit the Elder Tamer in the Mystic Grotto. He will tell you what you need to do.
	GOTO @end
@needseeguy
	' Listen to me, %2. You must go and see the Elder Tamer in the Mystic Grotto. He has something to teach you.
	GOTO @end
@grottoguy
	IF V20, @spell
	' The Elder Tamer from the Mystic Grotto told you to see me? Well, you are not experienced enough to be able to receive my teachings.
	' Come back when you have reached a higher level of learning.
	GOTO @end
@spell
	' Well, nevermind that, there's something important I have to teach you. I know you have talked to the Elder Tamer from the Mystic Grotto.
	' He said to come here, because I would teach you. Well, here is your first lesson...
	' Always be on the alert!
@learnspell
	GIVE L1
	GIVE H5000
	GIVE M5000
	' These are a few of my pets.
	FIGHT 16, 16, 16, 16
	MOVE 25, 75
	IF ALIVE, @getspell
	' Heh heh, they were too strong for you. Let me heal you.
	GIVE	L1
	GIVE	H5000
	GIVE	M5000
	' Do you wish to try again?
	ASK 10
	IF YES, @learnspell
	' That's okay. Come back when you feel you are ready.
	' Be careful, though, they might attack you on your way out!
	GOTO @end
@getspell
	' Poor babies! Oh well, they will be fine. Anyways...
	' You have done well, %2. Here is a spell for your courage.
	POSE 2
	HOST_GIVE T7
	POSE 1
	MOVE 15, 80
	' Come and visit me again sometime, I have plenty to teach you.
	GOTO @end
@nomore
	' Hello again, %2. I'm sorry, there is nothing more that I have to teach you now. Come back when you are more experienced in your talents.
	GOTO @end
@spellagain
	IF V20, @comebackspell
	' You are still not strong enough for me to teach you yet, but come back soon.
	GOTO @end
@comebackspell
	' I see you've come back for me to teach you... Well, here is your first lesson.
	' Always be on the alert!
	GOTO @learnspell
@goway
	' I have already given you what you need. Now be off!
	GOTO @end
@end
	GIVE L1
	GIVE H3000
	GIVE M3000
@endgood
	END
@ranger
	GIVE L1
	GIVE H3000
	GIVE M3000

	1: A Ranger, Welcome.
	1: I have recently acquired some items that may intrest you.
	1: You won't be able to acquire them cheaply though.
	1: These bucklers are usable while a person is shooting a bow.
	OFFER 821, 822, 823, 824, 825, 826, 827, 828, 829, 830, 831
	END

; monk teacher
SCENE 122 Cedars, "Monk's Hut",

        ACTOR	1,	"Corin",	joshtownsfolk, 23,	25,	90

	1: Greetings
	IF -C4, @end
	IF I232, @complete
	IF V99, @99
	IF V80, @80
	IF V60, @60
	IF V40, @40
	IF V20, @20
	OFFER 220,221
	1: You look surprised at my appearance.
	1: Remember things aren't always what they seem.
	1: Return and see me when you are farther along in your training.
	END
@20
	1: Welcome back young Monk.
	1: Before you continue on your path I must test your wisdom.
@20redo
	1: Give it food and it will live; give it water and it will die.
	1: What is it?
	ASK 999
	IF Qfire, @20yes
	1: That is incorrect, please try again.
	GOTO @20redo
@20yes
	1: Correct!
	1: Return to me when you are farther along in your training.
	OFFER 220,221,222,223
	END
@40
	1: Welcome back young Monk.
	1: Are you prepared for your next test?
@40redo
	1: They come at night without being called and are lost in the day without being stolen.
	1: What are they?
	ASK 999
	IF Qstars, @40yes
	1: That is incorrect, please try again.
	GOTO @40redo
@40yes
	1: Correct!
	1: Return to me when you are farther along in your training.
	OFFER 220,221,222,223, 224, 225
	END
@60
	1: Welcome back young Monk.
	1: You must temper your growing strength with greater wisdom.
@60redo
	1: They are Dark, 
	1: and always on the run,
	1: without the sun
	1: there would be none
	1: What are they?
	ASK 999
	IF Qshadows, @60yes
	1: That is incorrect, please try again.
	GOTO @60redo
@60yes
	1: Correct!
	1: Return to me when you are farther along in your training.
	OFFER 220,221,222,223, 224, 225, 226, 227
	END
@80
	1: Welcome back young Monk
	1: Your strength grows daily, but how has your wisdom increased.
@80redo
	1: Throw away the outside,
	1: Cook the inside,
	1: Eat the outside,
	1: Throw away the inside
	1: What is it?
	ASK 999
	IF Qcorn, @80yes
	1: That is incorrect, please try again.
	GOTO @80redo
@80yes
	1: Correct!
	1: Return to me when you are farther along in your training.
	OFFER 220,221,222,223, 224, 225, 226, 227,228,229,231
	END
@99
	1: Welcome back, venerable monk.
	1: You have almost completed your training.
	1: Show your wisdom this last time and you shall the recieve the final belt.
@99redo
	1: What can run, but never walks,
	1: What has a mouth but never talks,
	1: Has a bed but never sleeps,
	1: Has a head, but never weeps?
	ASK 9999
	IF Qriver, @99yes
	1: That is incorrect, please try again.
	GOTO @99redo
	END
@99yes
	1: Congratulations!
	GIVE I232
	END
@complete
	1: Greetings.
	OFFER 220,221,222,223, 224, 225, 226, 227,228,229,231

@end
END

;Verin LightSilencer
SCENE 123, eurostreet, SCENE, "Verin's House"
                  
	
	IF C3+T72+T124+I521, @end
	 ACTOR	1,	"Verin",	Pic053d, 1,	25,	90
	IF C24, @7class
	IF C34, @8class
	IF C35, @9class
	IF C36, @10class
	IF C3+T72-T124, @notdone
	IF C3+T72, @tdg
	IF C3+T124, @congrats
	IF C3+T123, @weak
	IF C13, @necro
	IF -C3, @leave
	1: Greetings Dark One..
	1: There is much to be accomplished and we have so little time.
	1: Before I get into specifics there are some things I need to tell you.
	1: The terrible dark god must be stopped.
	1: He threatens to destroy everything.
	1: Even if you have to team with a paladin, he must be destroyed.
	1: Heh, just let the paladin lead the way, They love to do that kind of stuff.
	1: Let your enemies weaken themselves fighting each other and then destroy them.
@armor
	1: There are some powerful pieces of armor that once belonged to a great anti-paladin hidden out there.
	1: I've determined that they are being held at a hidden temple in the heart of the volcano.
	1: If you're strong enough you should obtain this armor and return to me.
	HOST_GIVE T123
	END
@weak
	1: Bah, weakling!
	1: That old cleric has beaten you?
	1: Or are you too frightened to even attempt to obtain the relics from the heart of the volcano.
	1: Leave my sight.
	WAIT 2
	GOTO EXIT
	END
@congrats
	
	1: You have succeeded.
	1: If you were less powerful I would take those items from you.
	1: Now your highest priority is stopping the dark god.
	1: You must find the ancient relic.
	END
@necro
	 
	COMPARE #<num.peopleInScene>, "1"
	IF> @end
	GIVE L1
	GIVE H20000
	GIVE M20000
	IF T8, @end
	1: Greetings Evil One
	IF V50, @summonthem
	' Return to me when you have acquired more power.
	' I have secrets to teach you.
	END
@summonthem
	' You may be ready for my teachings.
	' But first you have to pass my test.
	FIGHT 80, 80, 80
	IF ALIVE, @learnadarksummonspell
	' Ah a Failure, You are too weak for my knowledge!
	END
@learnadarksummonspell
	' Ah you are powerful, You shall be a great help to us Anti-Paladins at the final battle.
	HOST_GIVE T8
	MOVE 15, 80
	' Here is a tame all spell, 
	' I haven't given it to you, just allowed you to learn it.
	END
@leave
	1: Leave now.
	END
@tdg
	1: I can hardly believe it.
	1: A weakling like you, responsible for killing the dark god.
	1: If it wasn't such an important victory, I would be sickened!
	1: Here is our most powerful weapon.
	HOST_GIVE I521
	HOST_GIVE I820
	1: Now leave my sight.
	END
@notdone
	1: Hmm killed the tdg already?
	1: You must have had help.
	1: I'll have to test you before I can tell if you're worthy of this weapon.
	GOTO @armor
	END





@7class
	IF -V70, @low
	1: Greetings Golem.
	1: I have recently "acquired" the procedure that Ranik uses for creating new Golem bodies.
	H: That sounds very interesting.
	1: I can make you a new body but I'll need some money to "acquire" the parts that I need.
	1: Sound Good?
	ASK 999999
	IF QYes, @emerald
	END
@emerald
	1: I'll need 100000 Gold
	HOST_GIVE T288
	IF -G100000, @poor
	TAKE G100000
	1: HOld on a minute and I'll transfer you in.
	WAIT 4
	SET num.hostClass, 34
	1: I've also got a new pair of hands for you.
	1: Come back when you reach level 80.
	HOST_GIVE I839
	HOST_GIVE S220
	HOST_GIVE S224
	END
@8class
	IF -V80, @low
	1: Welcome back.
	1: I'll need 200000 Gold for this body.
	Wait 3
	IF -G200000, @poor
	TAKE G200000
	1: Good, you have the gold.
	1: Your new body will be done soon.
	SET num.hostClass, 35
	1: I have a new set of Hands for you also.
	1: Ranik needs to get new locks on his doors.
	HOST_GIVE I840
	HOST_GIVE S221
	END
@9class
	IF -V90, @low
	1: I'll need another 200000 Gold for this next body.
	IF -G200000, @poor
	TAKE G200000
	1: You've got the money.
	1: Wait one moment. I'll finish your newest body.
	SET num.hostClass, 36
	1: I've got a new set of hands for you also
	HOst_GIVE I841
	HOST_GIVE S222
	END
@10class
	IF -V100, @low
	1: Just a warning, this is the last body I can make for you.
	1: So don't bother me anymore after this.
	1: I enlisted the help of a Necromancer when creating this one.
	1: I'll need 300000 gold for this body.
	IF -G300000, @poor
	TAKE G300000
	1: Wait one moment. I'll finish your newest body.
	SET num.hostClass, 37
	1: There we are. I've got some new hands for you, by the way.
	1: Remember this is the last body, don't come back!
	HOST_GIVE I842
	HOST_GIVE S223
	END
@poor
	1: You don't have enough money.
	1: Come back when you do.
	END


@end
END

