; Save the Baby!
SCENE 40 shop, SCENE, "Athedia's House"
	ACTOR	1,	"Athedia",	joshTownsfolk,	2,	25,	90
	
	IF -V25, @tooyoung
	IF T362, @treaty2
	IF T361+T42, @treaty
	IF T42, @thanks
	IF T41, @safe
	1: My son has been kidnapped by the gremlins, you have to save him
	GIVE T40
@repeat
	1:Theres no time to waste, we must hurry!!
	move 1, 30, 80
	1:What are you waiting for they are going to eat him!!
	move 1, 35,95
	1:We must hurry to the Eirinnal tunnels!!
	move 1, 25, 90
	GOTO @repeat
@safe
	1: We made it.  We are safe.
	TAKE T40
	TAKE T41
	GIVE T42
	GIVE I722
	1: Take these boots please, I'm told they have magic powers
@thanks
	1: Thank you for all your help.
	1: You are a noble %L.
	GOTO @end
@tooyoung
	1: Hello.
@end
END

@treaty
	H: Hello Athedia.  Do you know who the Mayor of Mystic Grotto is?
	1: I am
	H: ...
	H: I have this treaty from the Town of Dannisair.
	N: YOu give her the treaty and she reads it, signs it and gives it back.
	1: Can you return this to Dannisair for me?
	1: Thank you.
	GIVE T362
	END
@treaty2
	1: Hello
	END


SCENE 41 bgFlat1, SCENE, "Gremlin Cave"
	
	IF T42, @cauldren
	IF -T40, @fight
	IF T41, @fight
	ACTOR	1,	"Athedia",	joshTownsfolk,	2,	70, 45   
	ACTOR    2,	"Grelish", 	Pic060e,	1,	25,	90

	2: mmm!!  Baby Stew
	1: They are going to eat my son, stop them!!
	2: Get them boys they are stealing the food
	FIGHT 41,40,39
	IF WON, @escape
	2: HaHa!!    Baby stew coming up
	GOTO @end
@escape
	GIVE T41
	1: I have my baby, lets run before they more of those nasty creatures show up!!
	1: You must hurry!!
	GOTO @end
@fight
	FIGHT 41,40,39
	END
@cauldren

	ACTOR    1,	"Grelish", 	Pic060e,	1,	25,	90


	1: Since I have nothing to cook now, I can produce some new items for you.


	1: Please give me two items and I will combine them and give you one item back
	1: Only equipment works and lvl 95 and 99 equipment is too powerful for me to change.
SET armor, "0"
SET armor1, "0"
SET helm, "0"
SET helm1, "0"
SET sword, "0"
SET sword1, "0"
SET staff, "0"
SET staff1, "0"
SET bow, "0"
SET bow1, "0"
SET whip, "0"
SET whip1, "0"
SET greatsword, "0"
SET greatsword1, "0"
SET gauntlet, "0"
SET gauntlet1, "0"
SET hammer, "0"
SET hammer1, "0"
SET boots, "0"
SET boots1, "0"
SET shield, "0"
SET shield1, "0"
SET amulet, "0"
SET amulet1, "0"
SET axe, "0"
SET axe1, "0"
SET ring, "0"
SET ring1, "0"
	END
@eventActorGive1
	IF T341, @2nditem
	GIVE T341
	SET 1item, #<item.id>
	SET 1Iclass, #<item.class>
	SET 1Ilevel, #<item.level>
	COMPARE #<1item>, "0"
	IF= @gold
	COMPARE #<1item>, "1018"
	IF= @specialequip
	COMPARE #<1item>, "1008"
	IF= @specialequip

	COMPARE #<item.id>, "206"
	IF= @armor
	COMPARE #<item.id>, "217"
	IF= @armor1
	COMPARE #<item.id>, "259"
	IF= @helm
	COMPARE #<item.id>, "265"
	IF= @helm1
	COMPARE #<item.id>, "307"
	IF= @sword
	COMPARE #<item.id>, "314"
	IF= @sword1
	COMPARE #<item.id>, "355"
	IF= @staff
	COMPARE #<item.id>, "369"
	IF= @staff1
	COMPARE #<item.id>, "400"
	IF= @bow
	COMPARE #<item.id>, "418"
	IF= @bow1
	COMPARE #<item.id>, "400"
	IF= @bow
	COMPARE #<item.id>, "418"
	IF= @bow1
	COMPARE #<item.id>, "461"
	IF= @whip
	COMPARE #<item.id>, "469"
	IF= @whip1
	COMPARE #<item.id>, "505"
	IF= @greatsword
	COMPARE #<item.id>, "518"
	IF= @greatsword1
	COMPARE #<item.id>, "552"
	IF= @gauntlet
	COMPARE #<item.id>, "559"
	IF= @gauntlet1
	COMPARE #<item.id>, "657"
	IF= @hammer
	COMPARE #<item.id>, "660"
	IF= @hammer1
	COMPARE #<item.id>, "702"
	IF= @boots
	COMPARE #<item.id>, "716"
	IF= @boots1
	COMPARE #<item.id>, "803"
	IF= @shield
	COMPARE #<item.id>, "817"
	IF= @shield1
	COMPARE #<item.id>, "925"
	IF= @amulet
	COMPARE #<item.id>, "936"
	IF= @amulet1
	COMPARE #<item.id>, "948"
	IF= @axe
	COMPARE #<item.id>, "956"
	IF= @axe1
	COMPARE #<item.id>, "902"
	IF= @ring
	COMPARE #<item.id>, "910"
	IF= @ring1

	1: You have given me a #<item.name>.

	END
@gold
	1: Gold isn't an item
	HOST_GIVE G#<item.goldGiven>
	TAKE T341
	END
@gold2
	1: Gold isn't an item
	HOST_GIVE G#<item.goldGiven>
	END

@2nditem
	SET 2item, #<item.id>
	SET 2Iclass, #<item.class>
	SET 2Ilevel, #<item.level>
	COMPARE #<2item>, "0"
	IF= @gold2

	COMPARE #<item.id>, "206"
	IF= @armor
	COMPARE #<item.id>, "217"
	IF= @armor1
	COMPARE #<item.id>, "259"
	IF= @helm
	COMPARE #<item.id>, "265"
	IF= @helm1
	COMPARE #<item.id>, "307"
	IF= @sword
	COMPARE #<item.id>, "314"
	IF= @sword1
	COMPARE #<item.id>, "355"
	IF= @staff
	COMPARE #<item.id>, "369"
	IF= @staff1
	COMPARE #<item.id>, "400"
	IF= @bow
	COMPARE #<item.id>, "418"
	IF= @bow1
	COMPARE #<item.id>, "400"
	IF= @bow
	COMPARE #<item.id>, "418"
	IF= @bow1
	COMPARE #<item.id>, "461"
	IF= @whip
	COMPARE #<item.id>, "469"
	IF= @whip1
	COMPARE #<item.id>, "505"
	IF= @greatsword
	COMPARE #<item.id>, "518"
	IF= @greatsword1
	COMPARE #<item.id>, "552"
	IF= @gauntlet
	COMPARE #<item.id>, "559"
	IF= @gauntlet1
	COMPARE #<item.id>, "657"
	IF= @hammer
	COMPARE #<item.id>, "660"
	IF= @hammer1
	COMPARE #<item.id>, "702"
	IF= @boots
	COMPARE #<item.id>, "716"
	IF= @boots1
	COMPARE #<item.id>, "803"
	IF= @shield
	COMPARE #<item.id>, "817"
	IF= @shield1
	COMPARE #<item.id>, "925"
	IF= @amulet
	COMPARE #<item.id>, "936"
	IF= @amulet1
	COMPARE #<item.id>, "948"
	IF= @axe
	COMPARE #<item.id>, "956"
	IF= @axe1
	COMPARE #<item.id>, "902"
	IF= @ring
	COMPARE #<item.id>, "910"
	IF= @ring1


	1: You have given me a #<item.name>
	COMPARE #<1Iclass>, "10"
	IF< @newitem
	COMPARE #<2Iclass>, "10"
	IF< @newitem
	COMPARE #<1Ilevel>, #<2Ilevel>
	IF= @newequip1
	IF< @newequip1
	IF> @newequip2


	SET loop1, "0"
@loop1
	COMPARE #<1Iclass>, #<loop1>



@newequip1
	ADD 1item, "1"
	SET item.id, #<1item>
	COMPARE #<item.level>, "99"
	IF= @specialequip
	COMPARE #<item.class>, "9"
	IF> @reward1
	SUB 1item, "1"
	SET item.id, #<1item>
@reward1
	HOST_GIVE I#<1item>
	TAKE T341
	1: Here you go, its a #<item.name>
	1: Come back soon
	END
@newequip2
	ADD 2item, "1"
	SET item.id, "#<2item>"
	COMPARE #<item.level>, "99"
	IF= @specialequip
	COMPARE #<item.class>, "9"
	IF> @reward2
	SUB 2item, "1"
	SET item.id, #<2item>
@reward2
	HOST_GIVE I#<2item>
	TAKE T341
	1: Here you go, its a #<item.name>
	1: Come back soon
	END
@armor
SET armor, "1"
1: You have given me a %I206
COMPARE #<armor1>, "1"
IF=, @givearmor
END

@armor1
SET armor1, "1"
1: You have given me a %I217
COMPARE #<armor>, "1"
IF=, @givearmor
END

@helm
SET helm, "1'
1: You have given me a %I259
COMPARE #<helm1>, "1"
IF=, @givehelm
END

@helm1
SET helm1, "1"
1: You have given me a %I265
COMPARE #<helm>, "1"
IF=, @givehelm
END

@sword
SET sword, "1"
1: You have given me a %I307
COMPARE #<sword1>, "1"
IF=, @givesword
END

@sword1
SET sword1, "1"
1: You have given me a %I314
COMPARE #<sword>, "1"
IF=, @givesword
END

@staff
SET staff, "1"
1: You have given me a %I355
COMPARE #<staff1>, "1"
IF=, @givestaff
END

@staff1
SET staff1, "1"
1: You have given me a %I369
COMPARE #<staff>, "1"
IF=, @givestaff
END

@bow
SET bow, "1"
1: You have given me a %I400
COMPARE #<bow1>, "1"
IF=, @givebow
END

@bow1
SET bow1, "1"
1: You have given me a %I418
COMPARE #<bow>, "1"
IF=, @givebow
END

@whip
SET whip, "1"
1: You have given me a %I461
COMPARE #<whip1>, "1"
IF=, @givewhip
END

@whip1
SET whip1, "1"
1: You have given me a %I469
COMPARE #<whip>, "1"
IF=, @givewhip
END

@greatsword
SET greatsword, "1"
1: You have given me a %I505
COMPARE #<greatsword1>, "1"
IF=, @givegreatsword
END

@greatsword1
SET greatsword1, "1"
1: You have given me a %I518
COMPARE #<greatsword>, "1"
IF=, @givegreatsword
END

@gauntlet
SET gauntlet, "1"
1: You have given me a %I552
COMPARE #<gauntlet1>, "1"
IF=, @givegauntlet
END

@gauntlet1
SET gauntlet1, "1"
1: You have given me a %I559
COMPARE #<gauntlet>, "1"
IF=, @givegauntlet
END

@hammer
SET hammer, "1"
1: You have given me a %I657
COMPARE #<hammer1>, "1"
IF=, @givehammer
END

@hammer1
SET hammer1, "1"
1: You have given me a %I660
COMPARE #<hammer>, "1"
IF=, @givehammer
END

@boots
SET boots, "1"
1: You have given me a %I702
COMPARE #<boots1>, "1"
IF=, @giveboots
END

@boots1
SET boots1, "1"
1: You have given me a %I716
COMPARE #<boots>, "1"
IF=, @giveboots
END

@shield
SET shield, "1"
1: You have given me a %I803
COMPARE #<shield1>, "1"
IF=, @giveshield
END

@shield1
SET shield1, "1"
1: You have given me a %I817
COMPARE #<shield>, "1"
IF=, @giveshield
END

@amulet
SET amulet, "1"
1: You have given me a %I925
COMPARE #<amulet1>, "1"
IF=, @giveamulet
END

@amulet1
SET amulet1, "1"
1: You have given me a %I936
COMPARE #<amulet>, "1"
IF=, @giveamulet
END

@axe
SET axe, "1"
1: You have given me a %I948
COMPARE #<axe1>, "1"
IF=, @giveaxe
END

@axe1
SET axe1, "1"
1: You have given me a %I956
COMPARE #<axe>, "1"
IF=, @giveaxe
END

@ring
SET ring, "1"
1: You have given me a %I902
COMPARE #<ring1>, "1"
IF=, @givering
END

@ring1
SET ring1, "1"
1: You have given me a %I910
COMPARE #<ring>, "1"
IF=, @givering
END
@specialequip
	1: You recieve nothing
	TAKE T341
	END
@newitem
	1: You recieve nothing
	TAKE T341
	END

@givearmor
GIVE I176
1: Congratulations, you have received a %I176 for your trouble.
SET armor, "0"
SET armor1, "0"
END


@givehelm
GIVE I177
1: Congratulations, you have received a %I177 for your trouble.
SET helm, "0"
SET helm1, "0"
END


@givesword
GIVE I178
1: Congratulations, you have received a %I178 for your trouble.
SET sword, "0"
SET sword1, "0"
END


@givestaff
GIVE I179
1: Congratulations, you have received a %I179 for your trouble.
SET staff, "0"
SET staff1, "0"
END


@givebow
GIVE I180
1: Congratulations, you have received a %I180 for your trouble.
SET bow, "0"
SET bow1, "0"
END


@givewhip
GIVE I181
1: Congratulations, you have received a %I181 for your trouble.
SET whip, "0"
SET whip1, "0"
END

@givegreatsword
GIVE I182
1: Congratulations, you have received a %I182 for your trouble.
SET greatsword, "0"
SET greatsword1, "0"
END

@givegauntlet
GIVE I183
1: Congratulations, you have received a %I183 for your trouble.
SET gauntlet, "0"
SET gauntlet1, "0"
END

@givehammer
GIVE I184
1: Congratulations, you have received a %I184 for your trouble.
SET hammer, "0"
SET hammer1, "0"
END

@giveboots
GIVE I185
1: Congratulations, you have received a %I185 for your trouble.
SET boots, "0"
SET boots1, "0"
END

@giveshield
GIVE I186
1: Congratulations, you have received a %I186 for your trouble.
SET shield, "0"
SET shield1, "0"
END

@giveamulet
GIVE I187
1: Congratulations, you have received a %I187 for your trouble.
SET amulet, "0"
SET amulet1, "0"
END

@giveaxe
GIVE I188
1: Congratulations, you have received a %I188 for your trouble.
SET axe, "0"
SET axe1, "0"
END

@givering
GIVE I189
1: Congratulations, you have received a %I189 for your trouble.
SET ring, "0"
SET ring1, "0"

END
;comment
@end
END
;ending comment