; SCENE 0 must be primary well of souls
;
; It is only used for switching souls (saved games), not for general ressurection and recharge
;
SCENE 0		waucathedral, WELL, "Neutral zone", 0, 0
	THEME -1
	MUSIC title.mid
	ACTOR	1,	"Alliance", army3foot, 4, 65, 85
	ACTOR 	2,  "Skaven", skaven1, 1, 35, 85
	ACTOR	3,	"Chaos Elf", elf, 3, 60, 75
	ACTOR	4,	"Mercenary", mercenary, 4, 70, 100
	ACTOR	5,	"Gray seer", skaven2, 4, 40, 75
	ACTOR	6,	"Rat Ogre", ratogre, 1, 30, 100
	FACE 1, 0
	FACE 3, 0
	FACE 4, 0
	SEL 1
	WAIT	1.0
	1: Greetings, traveller. Welcome to the world of Foroduin.
	1: From here the land seems not as disturbed as it really is.
	1: Hordes of those terrible Skaven have poured from their cities and..
	2: Yees! Destroy the manthings!
	5: Agreed! I wants something to feed my little rats with.
	6: Urmm. Blargh urbgh?
	5: Shuts up, Rat-rat!
	6: Gurrggll.
	1: Bahh don't you dare disturb me again!
	2: Your helmet seems to be-be too tight for you..
	2: Stops-stops you from thinking, ee?
	1: Pfft..
	5: Tshihii. This world shall soon belong to the Skaven!
	1: No it will not. We will stop you foul creatures.
	4: And I'll help.. If I get enough money that is.
	2: You stop-stop not, it is our-our righteous revenge!
	1: Who are you to talk about "righteous"?
	2: Umm, it just sounded-sounded funny.
	5: This may be only resolved with war!
	1: So be it!
	4: Yay moneeeeeehhhh!
	END
	@eventActorClick1
	MENU 	"Story=@story","Gods..?=@gods","Bugs to inform?=@email","Version 	info=@version","Updating?=@update"
	END	
	@eventActorClick2
	MENU 	"Story=@story","Gods..?=@gods","Bugs to inform?=@email","Version 	info=@version","Updating?=@update"
	END
	@story
	1: We'll give you short look into the history of Skavens_Plague.
	2: Indeedy, goody goody!
	1: Oh shut up already.
	2: Umm, no?
	1: ..Anyways.
	2: Foroduin was a relatively peaceful place to be in..
	1: Until the Skaven arrived.
	1: There has been many big fights between the wartorn sides.
	2: There seems to be no end to the fighting.
	2: Dwarves, them longbeards have fled to Sturmwind, the Paladin city!
	1: They just care for the glitter of gold, not us humans.
	2: Goodie for them!
	1: How will the battle end?
	2: You not know.. yet!
	END

	@gods
	1: New thing that was added are three gods.
	2: Talos, god of Chaos and Storms. He is goodie fella.
	1: Paladine, god of Order..
	2: And the icey one, Auril, goddess of winter!
	1: Once you have completed your class training in Sturmwind..
	2: You may choose to worship one of them!
	1: Mages do not have class training yet.
	2: They musts just visit the training building..
	1: to get a token which allows you to serve.
	1: Not all classes can worship all gods, though.
	1: Elves may never serve Talos.
	2: And the Skaven may never serve the stinky Paladine.
	2: Plague Monk and Goblin Alchemist can't serve ANY gods!
	1: Also notice that if your class changes, your elements..
	2: mights change too!
	1: .. Paladine's temple is in Sturmwind.
	2: Talos' temple is in the City of the Dead, in desert of Kahurdak.
	1: Khaudrak.
	2: Whatever, your turn to shut up!
	1: .. Auril's temple is in Eversnow village.
	2: Tha would be somewhere past Mourning Dead Valley.
	END
	
	@email
	1: Have you noticed a bug that escaped Queek's grasp?
	2: If so, You must e-mail him and inform him!
	1: queek@netti.fi
	2: Or uses the forum!
	1: http://www.athelias.com/web/bulletin/bb/
	2: Thankie Saxu for the Skavens_Plague homepage.
	2: You has Queek's thanks an' stuff!
	END
	@version
	1: New in this version?
	2: -female pain sounds, ooooh~
	1: ..You're sick.
	2: But so ish Queek!
	1: -arena where you can fight powerful monsters
	2: -you can get cool drops from the arena monsters, too!
	1: -missions, visit a mercenary camp on the main map
	2: -couple o' wavs replaced by new ones (explains the patch size)
	1: -increased trophy drop rates for some trophies
	2: -fixed some monster sounds
	1: -couple of bug fixes
	END

	@update
	1: Where to get newest version?
	2: That simple, manthing. Goes to http://www.athelias.biz/skavens
	1: And choose downloads.
	1: Check your current version by..
	2: Typing /version in game!
	END

SCENE 1

;MUSIC blank.mid
;THEME 57

;Me an' me friends.

STRCMP #<str.soul> "6A5CEE31"
	IF= @skipcheck

STRCMP #<str.soul> "595CE87F"
	IF= @skipcheck

STRCMP #<str.soul> "SOUL 1893"
	IF= @skipcheck

IF I44-C32, @takei44
IF C30-T16, @givet16
IF C32+T810-T811, @spel
IF C32+T16, @taket16

;Bastards

;STRCMP #<str.soul> "SOUL 2298"
;	IF= @unforgiven

;STRCMP #<str.soul> "SOUL 2290"
;	IF= @unforgiven
;we shall see if he does more bad things..

STRCMP #<str.soul> "SOUL 1188"
	IF= @unforgiven

;STRCMP #<str.soul> "SOUL 1325"
;	IF= @unforgiven

STRCMP #<str.soul> "SOUL 1669"
	IF= @unforgiven

STRCMP #<str.soul> "4A3C4703"
	IF= @unforgiven

STRCMP #<str.soul> "52F194A0"
	IF= @unforgiven

STRCMP #<str.soul> "SOUL 2488"
	IF= @unforgiven

STRCMP #<str.soul> "SOUL 1777"
	IF= @unforgiven

;class checks, you're not supposed to get these!!

STRCMP #<str.Class> "11"
	IF= @unforgiven
STRCMP #<str.Class> "12"
	IF= @unforgiven
STRCMP #<str.Class> "13"
	IF= @unforgiven
STRCMP #<str.Class> "14"
	IF= @unforgiven
STRCMP #<str.Class> "31"
	IF= @unforgiven


;Spell an' item checks

IF M2, @unforgiven
IF M0, @unforgiven
;modder, cheater..
IF S300, @unforgiven
IF S301, @unforgiven
IF S302, @unforgiven
IF S303, @unforgiven
;the 4 above being the new uber roxor monster spells
IF I1270, @unforgiven
IF I1271, @unforgiven
IF I1272, @unforgiven
IF I1273, @unforgiven
IF I1274, @unforgiven
IF I1275, @unforgiven
IF I1276, @unforgiven
IF S192,  @unforgiven
IF S191,  @unforgiven
IF S190,  @unforgiven
IF S260,  @unforgiven
IF S221,  @unforgiven
IF S222,  @unforgiven
IF S223,  @unforgiven
IF S224,  @unforgiven
IF S225,  @unforgiven
IF S226,  @unforgiven
IF S227,  @unforgiven
IF I1110,  @unforgiven
IF I1111,  @unforgiven
IF I1112,  @unforgiven
IF I1113,  @unforgiven
IF I1114,  @unforgiven
IF I1115,  @unforgiven
IF I1116,  @unforgiven
IF I1048,  @unforgiven
IF I1049,  @unforgiven
IF I1050,  @unforgiven
IF I1051,  @unforgiven
IF I1052,  @unforgiven
IF I1053,  @unforgiven
IF I1054,  @unforgiven
IF I1055,  @unforgiven
IF I1056,  @unforgiven
IF I1057,  @unforgiven
IF I1058,  @unforgiven
IF I1059,  @unforgiven
IF I1060,  @unforgiven
IF I1061,  @unforgiven
IF I1150,  @unforgiven
IF I1151,  @unforgiven
IF I1152,  @unforgiven
IF I1153,  @unforgiven
IF I1154,  @unforgiven
IF I1155,  @unforgiven
IF I1156,  @unforgiven
IF I1180,  @unforgiven
IF I1181,  @unforgiven
IF I1182,  @unforgiven
IF I1183,  @unforgiven
IF I1184,  @unforgiven
IF I1185,  @unforgiven
IF I1186,  @unforgiven
IF T205,  @unforgiven
IF T405,  @unforgiven 
IF T25+T26,  @unforgiven
IF T2+T3,  @unforgiven
IF I1220, @unforgiven
IF I1221, @unforgiven
IF I1222, @unforgiven
IF I1223, @unforgiven
IF I1224, @unforgiven
IF I1225, @unforgiven
IF I1226, @unforgiven



IF T570, @normal

IF -T10, @pick

IF C30-T16, @givet16

IF C32+T16, @taket16

IF C32+T810-T811, @spel

IF C32+T29, @taket

IF C32+T16, @taket16

IF T305, @call

STRCMP #<str.soul> "SOUL 2445"
	IF= @sword

IF C30-T16, @givet16

IF C32+T810-T811, @spel

IF T13, @camping

IF -T903, @givet903

COMPARE #<num.serverTimeMonth>, 10
	IF= @hallo
END

@hallo
COMPARE #<num.serverTimeDay>, 30
	IF= @hallo2
COMPARE #<num.serverTimeDay>, 31
	IF= @hallo2
END

@hallo2
GOTO SCENE 6068
END

@unforgiven
	HOST_GIVE T555
	PARTY T555 
	GOTO LINK 666,0
END

@normal

IF C32+T29, @taket
IF -T10, @pick
IF T305, @call
IF T13, @camping
IF I44-C32, @takei44
IF C30-T16, @givet16
IF C32+T810-T811, @spel
IF C32+T16, @taket16
IF -T903, @givet903

COMPARE #<num.serverTimeMonth>, 10
	IF= @hallo

END


@skipcheck

IF C32+T29, @taket
IF -T10, @pick
IF T305, @call
IF T13, @camping
IF I44-C32, @takei44
IF C30-T16, @givet16
IF C32+T810-T811, @spel
IF C32+T16, @taket16
IF -T903, @givet903
COMPARE #<num.serverTimeMonth>, 10
	IF= @hallo
END

@pick
COMPARE #<num.mapNum>, 666
IF= @unforgi
N: It is the time for you to choose a skill.
WAIT 3
N: You may choose only one skill and may never repick it.
WAIT 2
MENU "Cooking=@cookz", "Camping=@campz", "Lumbering=@lumberz", "Mining=@minez"
END
@cookz
WAIT 3
N: It is done. You are now able to cook.
HOST_GIVE T10
HOST_GIVE T12
END
@campz
WAIT 3
N: It is done. You are now able to camp well.
HOST_GIVE T10
HOST_GIVE T13
END
@lumberz
WAIT 3
N: It is done. You are now able to cut down trees for wood.
HOST_GIVE T10
HOST_GIVE T11
END
@minez
N: It is done. You are now able to mine valuable minerals.
HOST_GIVE T10
HOST_GIVE T15
END

@sword
IF C10, @sword2
END

@sword2
N: Because your character got lost in the abyss without a reason..
N: Here is a shiny sword for you!
HOST_GIVE I1258
HOST_GIVE T570
END

@camping


IF C30-T16, @givet16

IF C32+T810-T811, @spel

IF C32+T29, @taket

IF T305, @call

IF C32+T16, @taket16


IF V90, @gm
IF V70, @master
IF V50, @adept
IF V30, @nb

GIVE H10
GIVE M10

ACTOR	10,"", danNoFloat, 4, 25, 95
COMPARE #<num.serverTimeMonth>, 10
	IF= @hallo
END
@eventActorClick10
MENU "Light a Campfire=@fire", "Cancel=@end"
END
@fire
IF I57, @test
N: Seems you don't have any wood to light the fire with.
END
@test
IF V90, @gm2
IF V70, @master2
IF V50, @adept2
IF V30, @nb2
COMPARE %R2, 1
IF= @fail
HOST_TAKE I57
H: I managed to light the fire, yay!
SELECT 10
POSE 1,2,3
WAIT 2
GIVE H5000
GIVE M5000
N: You rest well.
END
@fail
H: Darn, I failed to light the fire.
HOST_TAKE I57
WAIT 2
N: Lost Magical treebranch.
@cancel
END


@gm

GIVE H600
GIVE M450

ACTOR	10,"", danNoFloat, 4, 25, 95
COMPARE #<num.serverTimeMonth>, 10
	IF= @hallo
END
@gm2
COMPARE %R10, 1
IF= @fail
HOST_TAKE I57
H: I managed to light the fire, yay!
SELECT 10
POSE 1,2,3
WAIT 2
GIVE H5000
GIVE M5000
N: You rest well.
END

@master

GIVE H350
GIVE M225


ACTOR	10,"", danNoFloat, 4, 25, 95
COMPARE #<num.serverTimeMonth>, 10
	IF= @hallo
END
@master2
COMPARE %R8, 1
IF= @fail
HOST_TAKE I57
H: I managed to light the fire, yay!
SELECT 10
POSE 1,2,3
WAIT 2
GIVE H5000
GIVE M5000
N: You rest well.
END

@adept

GIVE H200
GIVE M150

ACTOR	10,"", danNoFloat, 4, 25, 95
COMPARE #<num.serverTimeMonth>, 10
	IF= @hallo
END
@adept2
COMPARE %R6, 1
IF= @fail
HOST_TAKE I57
H: I managed to light the fire, yay!
SELECT 10
POSE 1,2,3
WAIT 2
GIVE H5000
GIVE M5000
N: You rest well.
END

@nb

GIVE H100
GIVE M75

ACTOR	10,"", danNoFloat, 4, 25, 95
COMPARE #<num.serverTimeMonth>, 10
	IF= @hallo
END
@nb2
COMPARE %R3, 1
IF= @fail
HOST_TAKE I57
H: I managed to light the fire, yay!
SELECT 10
POSE 1,2,3
WAIT 2
GIVE H5000
GIVE M5000
N: You rest well.
END

@call

IF C32+T810-T811, @spel
IF C32+T16, @taket16
IF C30-T16, @givet16
IF C32+T29, @taket
IF C1, @scall
IF C2, @scall
IF C4, @scall
IF C6, @scall
IF C18, @scall
IF C19, @scall
IF C22, @scall
IF C30, @scall
IF C32, @scall
H: What is this? I hear a.. Strange call..
H: It's coming from the Worldspine mountains..
WAIT 2
N: Join the dead.. Join the lichking's army..
WAIT 2
N: All the poor souls that died in the war are gathering..
WAIT 2
N: Come, come join us..
WAIT 2
H: Lich king!? Now that's no good!
H: I have to go rally my friends and take care of this Lich King!
H: Otherwise there will be no dawn.. For anyone.
H: Worldspine mountains lie.. Umm.. Near Frost Hills!
HOST_TAKE T305
HOST_GIVE T600
END
@scall
H: What be dat? A strange call..
H: It be coming from da.. Worldspine mountains!
WAIT 2
N: Join the dead.. Join the lichking's army..
WAIT 2
N: All the poor souls that died in the war are gathering..
WAIT 2
N: Come, come join us..
WAIT 2
H: Lich king? EEEEEEEEEEK!
H: Me must go rally me allies. Then take care of this lich king.
H: No dawn for anyone otherwise.
H: Worldspine mountains be near da Alliance city of Frost Hills.
HOST_TAKE T305
HOST_GIVE T600
END

@taket
HOST_TAKE T29
GOTO EXIT
END

@takei44
HOST_TAKE I44
GOTO EXIT
END

@unforgi
GOTO EXIT
END

@givet16
HOST_GIVE T16
GOTO EXIT
END

@spel
HOST_GIVE T811
HOST_GIVE S308
HOST_GIVE S309
HOST_GIVE S310
GOTO EXIT
END

@taket16
HOST_TAKE T16
GOTO EXIT
END

@givet903
GIVE T903
END

SCENE 6068 halloweenplague, SCENE, "Halloween!", 0, 0, 0
IF T13, @hallocamping
ACTOR 1, "Pumpkin", trickortreat, 1, 25, 87,
ACTOR 2, "Bat", trickortreat, 3, 20, 30,
ACTOR 3, "Glowing Pumpkin", trickortreat, 4, 20, 95,
ACTOR 4, "Pumpkin", trickortreat, 1, 15, 87,
ACTOR 5, "Bat", trickortreat, 3, 25, 35,
ACTOR 6, "Bat", trickortreat, 3, 15, 40,
ACTOR 7, "Spider web", trickortreat, 2, 85, 70,
ACTOR 8, "Spider web", trickortreat, 2, 45, 98,
ACTOR 9, "Spider web", trickortreat, 2, 82, 32,
THEME 20
MUSIC nitemare.mid
N: Happy halloween!
MOVE 2, 110, 50
MOVE 5, 110, 55
MOVE 6, 110, 60
END


@hallocamping

IF V90, @hagm
IF V70, @hamaster
IF V50, @haadept
IF V30, @hanb

ACTOR 1, "Pumpkin", trickortreat, 1, 25, 87,
ACTOR 2, "Bat", trickortreat, 3, 20, 30,
ACTOR 3, "Glowing Pumpkin", trickortreat, 4, 20, 95,
ACTOR 4, "Pumpkin", trickortreat, 1, 15, 87,
ACTOR 5, "Bat", trickortreat, 3, 25, 35,
ACTOR 6, "Bat", trickortreat, 3, 15, 40,
ACTOR 7, "Spider web", trickortreat, 2, 85, 70,
ACTOR 8, "Spider web", trickortreat, 2, 45, 98,
ACTOR 9, "Spider web", trickortreat, 2, 82, 32,
ACTOR	10,"", danNoFloat, 4, 25, 95
THEME 20
MUSIC nitemare.mid
N: Happy halloween!
MOVE 2, 110, 50
MOVE 5, 110, 55
MOVE 6, 110, 60
GIVE H10
GIVE M10
END
@eventActorClick10
MENU "Light a Campfire=@fire", "Cancel=@end"
END
@fire
IF I57, @test
N: Seems you don't have any wood to light the fire with.
END
@test
IF V90, @hagm2
IF V70, @hamaster2
IF V50, @haadept2
IF V30, @hanb2
COMPARE %R2, 1
IF= @fail
HOST_TAKE I57
H: I managed to light the fire, yay!
SELECT 10
POSE 1,2,3
WAIT 2
GIVE H5000
GIVE M5000
N: You rest well.
END
@fail
H: Darn, I failed to light the fire.
HOST_TAKE I57
WAIT 2
N: Lost Magical treebranch.
@cancel
END

@hagm

GIVE H600
GIVE M450
ACTOR 1, "Pumpkin", trickortreat, 1, 25, 87,
ACTOR 2, "Bat", trickortreat, 3, 20, 30,
ACTOR 3, "Glowing Pumpkin", trickortreat, 4, 20, 95,
ACTOR 4, "Pumpkin", trickortreat, 1, 15, 87,
ACTOR 5, "Bat", trickortreat, 3, 25, 35,
ACTOR 6, "Bat", trickortreat, 3, 15, 40,
ACTOR 7, "Spider web", trickortreat, 2, 85, 70,
ACTOR 8, "Spider web", trickortreat, 2, 45, 98,
ACTOR 9, "Spider web", trickortreat, 2, 82, 32,
ACTOR	10,"", danNoFloat, 4, 25, 95
THEME 20
MUSIC nitemare.mid
N: Happy halloween!
MOVE 2, 110, 50
MOVE 5, 110, 55
MOVE 6, 110, 60
END
@hagm2
COMPARE %R10, 1
IF= @fail
HOST_TAKE I57
H: I managed to light the fire, yay!
SELECT 10
POSE 1,2,3
WAIT 2
GIVE H5000
GIVE M5000
N: You rest well.
END

@hamaster

GIVE H350
GIVE M225

ACTOR 1, "Pumpkin", trickortreat, 1, 25, 87,
ACTOR 2, "Bat", trickortreat, 3, 20, 30,
ACTOR 3, "Glowing Pumpkin", trickortreat, 4, 20, 95,
ACTOR 4, "Pumpkin", trickortreat, 1, 15, 87,
ACTOR 5, "Bat", trickortreat, 3, 25, 35,
ACTOR 6, "Bat", trickortreat, 3, 15, 40,
ACTOR 7, "Spider web", trickortreat, 2, 85, 70,
ACTOR 8, "Spider web", trickortreat, 2, 45, 98,
ACTOR 9, "Spider web", trickortreat, 2, 82, 32,
ACTOR	10,"", danNoFloat, 4, 25, 95
THEME 20
MUSIC nitemare.mid
N: Happy halloween!
MOVE 2, 110, 50
MOVE 5, 110, 55
MOVE 6, 110, 60
END
@hamaster2
COMPARE %R8, 1
IF= @fail
HOST_TAKE I57
H: I managed to light the fire, yay!
SELECT 10
POSE 1,2,3
WAIT 2
GIVE H5000
GIVE M5000
N: You rest well.
END

@haadept

GIVE H200
GIVE M150

ACTOR 1, "Pumpkin", trickortreat, 1, 25, 87,
ACTOR 2, "Bat", trickortreat, 3, 20, 30,
ACTOR 3, "Glowing Pumpkin", trickortreat, 4, 20, 95,
ACTOR 4, "Pumpkin", trickortreat, 1, 15, 87,
ACTOR 5, "Bat", trickortreat, 3, 25, 35,
ACTOR 6, "Bat", trickortreat, 3, 15, 40,
ACTOR 7, "Spider web", trickortreat, 2, 85, 70,
ACTOR 8, "Spider web", trickortreat, 2, 45, 98,
ACTOR 9, "Spider web", trickortreat, 2, 82, 32,
ACTOR	10,"", danNoFloat, 4, 25, 95
THEME 20
MUSIC nitemare.mid
N: Happy halloween!
MOVE 2, 110, 50
MOVE 5, 110, 55
MOVE 6, 110, 60
END
@haadept2
COMPARE %R6, 1
IF= @fail
HOST_TAKE I57
H: I managed to light the fire, yay!
SELECT 10
POSE 1,2,3
WAIT 2
GIVE H5000
GIVE M5000
N: You rest well.
END

@hanb

GIVE H100
GIVE M75

ACTOR 1, "Pumpkin", trickortreat, 1, 25, 87,
ACTOR 2, "Bat", trickortreat, 3, 20, 30,
ACTOR 3, "Glowing Pumpkin", trickortreat, 4, 20, 95,
ACTOR 4, "Pumpkin", trickortreat, 1, 15, 87,
ACTOR 5, "Bat", trickortreat, 3, 25, 35,
ACTOR 6, "Bat", trickortreat, 3, 15, 40,
ACTOR 7, "Spider web", trickortreat, 2, 85, 70,
ACTOR 8, "Spider web", trickortreat, 2, 45, 98,
ACTOR 9, "Spider web", trickortreat, 2, 82, 32,
ACTOR	10,"", danNoFloat, 4, 25, 95
THEME 20
MUSIC nitemare.mid
N: Happy halloween!
MOVE 2, 110, 50
MOVE 5, 110, 55
MOVE 6, 110, 60
END
@hanb2
COMPARE %R3, 1
IF= @fail
HOST_TAKE I57
H: I managed to light the fire, yay!
SELECT 10
POSE 1,2,3
WAIT 2
GIVE H5000
GIVE M5000
N: You rest well.
END


SCENE 2


STRCMP #<str.soul> "6A5CEE31"
	IF= @skipcheck

STRCMP #<str.soul> "595CE87F"
	IF= @skipcheck

STRCMP #<str.soul> "SOUL 1893"
	IF= @skipcheck




;STRCMP #<str.soul> "SOUL 2298"
;	IF= @unforgiven

;STRCMP #<str.soul> "SOUL 2290"
;	IF= @unforgiven
;we shall see if he does more bad things..


STRCMP #<str.soul> "SOUL 1188"
	IF= @unforgiven

;STRCMP #<str.soul> "SOUL 1325"
;	IF= @unforgiven

STRCMP #<str.soul> "SOUL 1669"
	IF= @unforgiven

STRCMP #<str.soul> "4A3C4703"
	IF= @unforgiven

STRCMP #<str.soul> "52F194A0"
	IF= @unforgiven

STRCMP #<str.soul> "SOUL 2488"
	IF= @unforgiven

STRCMP #<str.soul> "SOUL 1777"
	IF= @unforgiven

IF C32+T29, @taket2
IF I44-C32, @takei44

STRCMP #<str.Class> "11"
	IF= @unforgiven
STRCMP #<str.Class> "12"
	IF= @unforgiven
STRCMP #<str.Class> "13"
	IF= @unforgiven
STRCMP #<str.Class> "14"
	IF= @unforgiven
STRCMP #<str.Class> "31"
	IF= @unforgiven

IF S300, @unforgiven
IF S301, @unforgiven
IF S302, @unforgiven
IF S303, @unforgiven
;the 4 above being the new uber roxor monster spells
IF I1270, @unforgiven
IF I1271, @unforgiven
IF I1272, @unforgiven
IF I1273, @unforgiven
IF I1274, @unforgiven
IF I1275, @unforgiven
IF I1276, @unforgiven
IF S192,  @unforgiven
IF S191,  @unforgiven
IF S190,  @unforgiven
IF S260,  @unforgiven
IF S221,  @unforgiven
IF S222,  @unforgiven
IF S223,  @unforgiven
IF S224,  @unforgiven
IF S225,  @unforgiven
IF S226,  @unforgiven
IF S227,  @unforgiven
IF I1110,  @unforgiven
IF I1111,  @unforgiven
IF I1112,  @unforgiven
IF I1113,  @unforgiven
IF I1114,  @unforgiven
IF I1115,  @unforgiven
IF I1116,  @unforgiven
IF I1048,  @unforgiven
IF I1049,  @unforgiven
IF I1050,  @unforgiven
IF I1051,  @unforgiven
IF I1052,  @unforgiven
IF I1053,  @unforgiven
IF I1054,  @unforgiven
IF I1055,  @unforgiven
IF I1056,  @unforgiven
IF I1057,  @unforgiven
IF I1058,  @unforgiven
IF I1059,  @unforgiven
IF I1060,  @unforgiven
IF I1061,  @unforgiven
IF I1150,  @unforgiven
IF I1151,  @unforgiven
IF I1152,  @unforgiven
IF I1153,  @unforgiven
IF I1154,  @unforgiven
IF I1155,  @unforgiven
IF I1156,  @unforgiven
IF I1180,  @unforgiven
IF I1181,  @unforgiven
IF I1182,  @unforgiven
IF I1183,  @unforgiven
IF I1184,  @unforgiven
IF I1185,  @unforgiven
IF I1186,  @unforgiven
IF T205,  @unforgiven
IF T405,  @unforgiven 
IF T25+T26,  @unforgiven
IF T2+T3,  @unforgiven
IF I1220, @unforgiven
IF I1221, @unforgiven
IF I1222, @unforgiven
IF I1223, @unforgiven
IF I1224, @unforgiven
IF I1225, @unforgiven
IF I1226, @unforgiven

COMPARE #<num.mapNum>, 0
IF= @fight
COMPARE #<num.mapNum>, 1
IF= @fight
COMPARE #<num.mapNum>, 2
IF= @fight
COMPARE #<num.mapNum>, 3
IF= @fight
COMPARE #<num.mapNum>, 4
IF= @fight
COMPARE #<num.mapNum>, 5
IF= @fight
COMPARE #<num.mapNum>, 6
IF= @fight
COMPARE #<num.mapNum>, 7
IF= @fight
COMPARE #<num.mapNum>, 8
IF= @fight
COMPARE #<num.mapNum>, 9
IF= @fight
COMPARE #<num.mapNum>, 10
IF= @fight
COMPARE #<num.mapNum>, 11
IF= @fight
COMPARE #<num.mapNum>, 12
IF= @fight
COMPARE #<num.mapNum>, 13
IF= @fight
COMPARE #<num.mapNum>, 14
IF= @fight
COMPARE #<num.mapNum>, 15
IF= @fight
COMPARE #<num.mapNum>, 16
IF= @fight
COMPARE #<num.mapNum>, 17
IF= @fight
COMPARE #<num.mapNum>, 18
IF= @fight
COMPARE #<num.mapNum>, 19
IF= @fight
COMPARE #<num.mapNum>, 20
IF= @fight
COMPARE #<num.mapNum>, 21
IF= @fight
COMPARE #<num.mapNum>, 22
IF= @fight
COMPARE #<num.mapNum>, 23
IF= @fight
COMPARE #<num.mapNum>, 24
IF= @fight
COMPARE #<num.mapNum>, 25
IF= @fight
COMPARE #<num.mapNum>, 26
IF= @fight
COMPARE #<num.mapNum>, 27
IF= @fight
COMPARE #<num.mapNum>, 28
IF= @fight
COMPARE #<num.mapNum>, 29
IF= @fight
COMPARE #<num.mapNum>, 30
IF= @fight
COMPARE #<num.mapNum>, 31
IF= @fight
COMPARE #<num.mapNum>, 32
IF= @fight
COMPARE #<num.mapNum>, 33
IF= @fight
COMPARE #<num.mapNum>, 34
IF= @fight
COMPARE #<num.mapNum>, 35
IF= @fight
COMPARE #<num.mapNum>, 36
IF= @fight
COMPARE #<num.mapNum>, 37
IF= @fight
COMPARE #<num.mapNum>, 38
IF= @fight
COMPARE #<num.mapNum>, 39
IF= @fight
COMPARE #<num.mapNum>, 40
IF= @fight
COMPARE #<num.mapNum>, 41
IF= @fight
COMPARE #<num.mapNum>, 42
IF= @fight
COMPARE #<num.mapNum>, 43
IF= @fight
COMPARE #<num.mapNum>, 44
IF= @fight
COMPARE #<num.mapNum>, 45
IF= @fight
COMPARE #<num.mapNum>, 46
IF= @fight
COMPARE #<num.mapNum>, 47
IF= @fight
COMPARE #<num.mapNum>, 48
IF= @fight
COMPARE #<num.mapNum>, 49
IF= @fight
COMPARE #<num.mapNum>, 50
IF= @fight
COMPARE #<num.mapNum>, 51
IF= @fight
COMPARE #<num.mapNum>, 52
IF= @fight
COMPARE #<num.mapNum>, 53
IF= @fight
COMPARE #<num.mapNum>, 54
IF= @fight
COMPARE #<num.mapNum>, 55
IF= @fight
COMPARE #<num.mapNum>, 56
IF= @fight
COMPARE #<num.mapNum>, 57
IF= @fight
COMPARE #<num.mapNum>, 58
IF= @fight
COMPARE #<num.mapNum>, 59
IF= @fight
COMPARE #<num.mapNum>, 60
IF= @fight
COMPARE #<num.mapNum>, 61
IF= @fight
COMPARE #<num.mapNum>, 62
IF= @fight
COMPARE #<num.mapNum>, 63
IF= @fight
COMPARE #<num.mapNum>, 64
IF= @fight
COMPARE #<num.mapNum>, 65
IF= @fight
COMPARE #<num.mapNum>, 70
IF= @fight
COMPARE #<num.mapNum>, 71
IF= @fight
COMPARE #<num.mapNum>, 72
IF= @fight
COMPARE #<num.mapNum>, 73
IF= @fight
COMPARE #<num.mapNum>, 74
IF= @fight
COMPARE #<num.mapNum>, 75
IF= @fight
COMPARE #<num.mapNum>, 76
IF= @fight
COMPARE #<num.mapNum>, 77
IF= @fight
COMPARE #<num.mapNum>, 78
IF= @fight
COMPARE #<num.mapNum>, 79
IF= @fight
COMPARE #<num.mapNum>, 66
IF= @dead
COMPARE #<num.mapNum>, 67
IF= @dead
COMPARE #<num.mapNum>, 68
IF= @dead
COMPARE #<num.mapNum>, 69
IF= @dead



IF -T700, @checkore
IF -T702+T305, @dire2
IF -T702-T701+T301+T302+T303+T304, @dire
IF I44-C32, @takei44
IF -T903, @givet903

COMPARE #<num.serverTimeMonth>, 10
	IF= @1stcheck

FIGHT
END
@1stcheck
COMPARE #<num.serverTimeDay>, 30
	IF= @halloween
COMPARE #<num.serverTimeDay>, 31
	IF= @halloween

COMPARE #<num.mapNum>, 0
IF= @fight3
COMPARE #<num.mapNum>, 1
IF= @fight3
COMPARE #<num.mapNum>, 2
IF= @fight3
COMPARE #<num.mapNum>, 3
IF= @fight3
COMPARE #<num.mapNum>, 4
IF= @fight3
COMPARE #<num.mapNum>, 5
IF= @fight3
COMPARE #<num.mapNum>, 6
IF= @fight3
COMPARE #<num.mapNum>, 7
IF= @fight3
COMPARE #<num.mapNum>, 8
IF= @fight3
COMPARE #<num.mapNum>, 9
IF= @fight3
COMPARE #<num.mapNum>, 10
IF= @fight3
COMPARE #<num.mapNum>, 11
IF= @fight3
COMPARE #<num.mapNum>, 12
IF= @fight3
COMPARE #<num.mapNum>, 13
IF= @fight3
COMPARE #<num.mapNum>, 14
IF= @fight3
COMPARE #<num.mapNum>, 15
IF= @fight3
COMPARE #<num.mapNum>, 16
IF= @fight3
COMPARE #<num.mapNum>, 17
IF= @fight3
COMPARE #<num.mapNum>, 18
IF= @fight3
COMPARE #<num.mapNum>, 19
IF= @fight3
COMPARE #<num.mapNum>, 20
IF= @fight3
COMPARE #<num.mapNum>, 21
IF= @fight3
COMPARE #<num.mapNum>, 22
IF= @fight3
COMPARE #<num.mapNum>, 23
IF= @fight3
COMPARE #<num.mapNum>, 24
IF= @fight3
COMPARE #<num.mapNum>, 25
IF= @fight3
COMPARE #<num.mapNum>, 26
IF= @fight3
COMPARE #<num.mapNum>, 27
IF= @fight3
COMPARE #<num.mapNum>, 28
IF= @fight3
COMPARE #<num.mapNum>, 29
IF= @fight3
COMPARE #<num.mapNum>, 30
IF= @fight3
COMPARE #<num.mapNum>, 31
IF= @fight3
COMPARE #<num.mapNum>, 32
IF= @fight3
COMPARE #<num.mapNum>, 33
IF= @fight3
COMPARE #<num.mapNum>, 34
IF= @fight3
COMPARE #<num.mapNum>, 35
IF= @fight3
COMPARE #<num.mapNum>, 36
IF= @fight3
COMPARE #<num.mapNum>, 37
IF= @fight3
COMPARE #<num.mapNum>, 38
IF= @fight3
COMPARE #<num.mapNum>, 39
IF= @fight3
COMPARE #<num.mapNum>, 40
IF= @fight3
COMPARE #<num.mapNum>, 41
IF= @fight3
COMPARE #<num.mapNum>, 42
IF= @fight3
COMPARE #<num.mapNum>, 43
IF= @fight3
COMPARE #<num.mapNum>, 44
IF= @fight3
COMPARE #<num.mapNum>, 45
IF= @fight3
COMPARE #<num.mapNum>, 46
IF= @fight3
COMPARE #<num.mapNum>, 47
IF= @fight3
COMPARE #<num.mapNum>, 48
IF= @fight3
COMPARE #<num.mapNum>, 49
IF= @fight3
COMPARE #<num.mapNum>, 50
IF= @fight3
COMPARE #<num.mapNum>, 51
IF= @fight3
COMPARE #<num.mapNum>, 52
IF= @fight3
COMPARE #<num.mapNum>, 53
IF= @fight3
COMPARE #<num.mapNum>, 54
IF= @fight3
COMPARE #<num.mapNum>, 55
IF= @fight3
COMPARE #<num.mapNum>, 56
IF= @fight3
COMPARE #<num.mapNum>, 57
IF= @fight3
COMPARE #<num.mapNum>, 58
IF= @fight3
COMPARE #<num.mapNum>, 59
IF= @fight3
COMPARE #<num.mapNum>, 60
IF= @fight3
COMPARE #<num.mapNum>, 61
IF= @fight3
COMPARE #<num.mapNum>, 62
IF= @fight3
COMPARE #<num.mapNum>, 63
IF= @fight3
COMPARE #<num.mapNum>, 64
IF= @fight3
COMPARE #<num.mapNum>, 65
IF= @fight3
COMPARE #<num.mapNum>, 70
IF= @fight3
COMPARE #<num.mapNum>, 71
IF= @fight3
COMPARE #<num.mapNum>, 72
IF= @fight3
COMPARE #<num.mapNum>, 73
IF= @fight3
COMPARE #<num.mapNum>, 74
IF= @fight3
COMPARE #<num.mapNum>, 75
IF= @fight3
COMPARE #<num.mapNum>, 76
IF= @fight3
COMPARE #<num.mapNum>, 77
IF= @fight3
COMPARE #<num.mapNum>, 78
IF= @fight3
COMPARE #<num.mapNum>, 79
IF= @fight3
COMPARE #<num.mapNum>, 66
IF= @dead3
COMPARE #<num.mapNum>, 67
IF= @dead3
COMPARE #<num.mapNum>, 68
IF= @dead3
COMPARE #<num.mapNum>, 69
IF= @dead3

END

@unforgiven
	HOST_GIVE T555
	PARTY T555 
	GOTO LINK 666,0
END

@skipcheck

COMPARE #<num.serverTimeMonth>, 10
	IF= @1stcheck


COMPARE #<num.mapNum>, 0
IF= @fight
COMPARE #<num.mapNum>, 1
IF= @fight
COMPARE #<num.mapNum>, 2
IF= @fight
COMPARE #<num.mapNum>, 3
IF= @fight
COMPARE #<num.mapNum>, 4
IF= @fight
COMPARE #<num.mapNum>, 5
IF= @fight
COMPARE #<num.mapNum>, 6
IF= @fight
COMPARE #<num.mapNum>, 7
IF= @fight
COMPARE #<num.mapNum>, 8
IF= @fight
COMPARE #<num.mapNum>, 9
IF= @fight
COMPARE #<num.mapNum>, 10
IF= @fight
COMPARE #<num.mapNum>, 11
IF= @fight
COMPARE #<num.mapNum>, 12
IF= @fight
COMPARE #<num.mapNum>, 13
IF= @fight
COMPARE #<num.mapNum>, 14
IF= @fight
COMPARE #<num.mapNum>, 15
IF= @fight
COMPARE #<num.mapNum>, 16
IF= @fight
COMPARE #<num.mapNum>, 17
IF= @fight
COMPARE #<num.mapNum>, 18
IF= @fight
COMPARE #<num.mapNum>, 19
IF= @fight
COMPARE #<num.mapNum>, 20
IF= @fight
COMPARE #<num.mapNum>, 21
IF= @fight
COMPARE #<num.mapNum>, 22
IF= @fight
COMPARE #<num.mapNum>, 23
IF= @fight
COMPARE #<num.mapNum>, 24
IF= @fight
COMPARE #<num.mapNum>, 25
IF= @fight
COMPARE #<num.mapNum>, 26
IF= @fight
COMPARE #<num.mapNum>, 27
IF= @fight
COMPARE #<num.mapNum>, 28
IF= @fight
COMPARE #<num.mapNum>, 29
IF= @fight
COMPARE #<num.mapNum>, 30
IF= @fight
COMPARE #<num.mapNum>, 31
IF= @fight
COMPARE #<num.mapNum>, 32
IF= @fight
COMPARE #<num.mapNum>, 33
IF= @fight
COMPARE #<num.mapNum>, 34
IF= @fight
COMPARE #<num.mapNum>, 35
IF= @fight
COMPARE #<num.mapNum>, 36
IF= @fight
COMPARE #<num.mapNum>, 37
IF= @fight
COMPARE #<num.mapNum>, 38
IF= @fight
COMPARE #<num.mapNum>, 39
IF= @fight
COMPARE #<num.mapNum>, 40
IF= @fight
COMPARE #<num.mapNum>, 41
IF= @fight
COMPARE #<num.mapNum>, 42
IF= @fight
COMPARE #<num.mapNum>, 43
IF= @fight
COMPARE #<num.mapNum>, 44
IF= @fight
COMPARE #<num.mapNum>, 45
IF= @fight
COMPARE #<num.mapNum>, 46
IF= @fight
COMPARE #<num.mapNum>, 47
IF= @fight
COMPARE #<num.mapNum>, 48
IF= @fight
COMPARE #<num.mapNum>, 49
IF= @fight
COMPARE #<num.mapNum>, 50
IF= @fight
COMPARE #<num.mapNum>, 51
IF= @fight
COMPARE #<num.mapNum>, 52
IF= @fight
COMPARE #<num.mapNum>, 53
IF= @fight
COMPARE #<num.mapNum>, 54
IF= @fight
COMPARE #<num.mapNum>, 55
IF= @fight
COMPARE #<num.mapNum>, 56
IF= @fight
COMPARE #<num.mapNum>, 57
IF= @fight
COMPARE #<num.mapNum>, 58
IF= @fight
COMPARE #<num.mapNum>, 59
IF= @fight
COMPARE #<num.mapNum>, 60
IF= @fight
COMPARE #<num.mapNum>, 61
IF= @fight
COMPARE #<num.mapNum>, 62
IF= @fight
COMPARE #<num.mapNum>, 63
IF= @fight
COMPARE #<num.mapNum>, 64
IF= @fight
COMPARE #<num.mapNum>, 65
IF= @fight
COMPARE #<num.mapNum>, 70
IF= @fight
COMPARE #<num.mapNum>, 71
IF= @fight
COMPARE #<num.mapNum>, 72
IF= @fight
COMPARE #<num.mapNum>, 73
IF= @fight
COMPARE #<num.mapNum>, 74
IF= @fight
COMPARE #<num.mapNum>, 75
IF= @fight
COMPARE #<num.mapNum>, 76
IF= @fight
COMPARE #<num.mapNum>, 77
IF= @fight
COMPARE #<num.mapNum>, 78
IF= @fight
COMPARE #<num.mapNum>, 79
IF= @fight
COMPARE #<num.mapNum>, 66
IF= @dead
COMPARE #<num.mapNum>, 67
IF= @dead
COMPARE #<num.mapNum>, 68
IF= @dead
COMPARE #<num.mapNum>, 69
IF= @dead

IF C32+T29, @taket2

IF -T700, @checkore
IF -T702+T305, @dire2
IF -T702-T701+T301+T302+T303+T304, @dire
IF I44-C32, @takei44
IF -T903, @givet903

FIGHT

END

@fight
COMPARE #<num.serverTimeMonth>, 10
	IF= @1stcheck
@fight3
IF C32+T29, @taket2
IF -T700, @checkore
IF -T702+T305, @dire2
IF -T702-T701+T301+T302+T303+T304, @dire
IF I44-C32, @takei44
THEME 69
FIGHT
IF WON, @fightover
THEME 70
END
@fightover
THEME 71
END

@dead
COMPARE #<num.serverTimeMonth>, 10
	IF= @1stcheck
@dead3
TAKE T903
THEME 69
FIGHT *, -116
IF WON, @dead2
THEME 70
END
@dead2
THEME 71
END

@halloween
BKGND halloweenplague.jpg
THEME 20
MUSIC nitemare.mid
FIGHT
END

@ore
IF -T903, @givet903
IF C32+T29, @taket2
IF I44-C32, @takei44
ACTOR	1,	"Ore Elemental", goldelemental, 1, 40, 95
1: Gahh! Hey you! Have you seen some dwarves carrying big pickaxes?
H: Umm, nope. Why should I have?
1: Errm, they are after me. I'm a walking ore treasury, see!?
1: Anyways, better get going.. Wish me luck!
H: Errm, yeah.. ( talking ore, hmmm... )
H: Good luck.
MOVE 1, -10, 100
WAIT 5
N: The ore elemental drops something as it goes.
WAIT 2
N: Found Thoridium, Mithril and Warpstone!
HOST_GIVE I90
HOST_GIVE I91
HOST_GIVE I92
HOST_GIVE T700
END
@checkore
COMPARE %R50, 1
IF= @ore
FIGHT
END

@dire
IF C32+T29, @taket2
IF I44-C32, @takei44
IF -T903, @givet903
ACTOR	1,	"Queek the Warlord", queek, 1, 25, 100,
1: Humm, what has we here?
H: Queek!?
1: Indeed-indeed. Me comes with dire news.
1: Me sees thee has done tha job for da betrayer..
1: You has killed everyone strong enough to oppose him..
1: Go for your reward but do not expect such..
1: After you has find out its true nature, and probably defeated it..
1: You finds it was not the last of your problems.
1: Da Lich King .. Aye, that be your real challenge.
1: I musts go now.
H: But.. What..
HOST_GIVE T701
MOVE 1, -20, 100
WAIT 5
END

@dire2
IF C32+T29, @taket2
IF I44-C32, @takei44
IF -T903, @givet903
ACTOR	1,	"Queek the Warlord", queek, 3, 25, 100,
1: Humm, what has we here?
H: Queek!?
1: Indeed-indeed. I comes with dire news.
1: You has defeated the betrayer already. Goodie for you.
1: But thas not your only problem. The Lich King has awoken..
1: You will see.. You WILL indeed see.
H: Huh..?
MOVE 1, -20, 100
HOST_GIVE T702
END

@taket2
HOST_TAKE T29
GOTO EXIT
END

@takei44
HOST_TAKE I44
END

@givet903
GIVE T903
END

SCENE 4
#include banthing.txt
ACTOR	1,	"Healer", cleric, 1, 40, 100
SEL		1
IF ALIVE, @live
1: Oh, you've fallen to one of the many dangers
1: of this land. Let me resurrect you.
WAIT 2
GIVE I1106
OFFER	1, 2, 6, 7, 8, 9, 10, 14, 15, 17, 18, 19,
GIVE L1
GIVE H5000
GIVE M5000
END
@live
1: I will heal your wounds, %2. 
1: Feel free to rest for as long as you like.
GIVE I1106
OFFER	1, 2, 6, 7, 8, 9, 10, 14, 15, 17, 18, 19,
GIVE L1
GIVE H5000
GIVE M5000
END
@eventActorClick1
MENU 	"Any news?=@news","New places to visit?=@places"
END
@news
1: Nothing, the war still goes on..
1: Even the gods are warring against each other.
1: We just have to hope and fight against the chaos..
END
@places
1: Well, there is a new cave some explorers found out..
1: It's in the Worldspine mountains..
1: No one has ventured in because it's very deep underground.
1: And climbing back up would be impossible.
END

SCENE 5
#include banthing.txt
ACTOR	1,	"Packmaster", skaven1, 1, 25, 100
ACTOR 	2,  "Slave"		, slave1, 1, 20, 80
ACTOR	3,	"Slave"		, slave2, 1, 20, 70
IF T2,@t2
1: Hmm thy be a Skaven. I am here to teach you to fight!
2: Aww, you don't mean..?
3: Aww #&!, I can even mine warpstone. Just lemme outta here!
2: We don't wanna fight that big, ugly, hairy thingy!
3: Please, let us out of here?
2: Pretty please?
H: Is sounding more like a petty please..
1: You will fight-fight this Skaven, it needs the experience on its travels! 
1: Now, fight!
3: Aww..
WAIT 3.0
MOVE 2, -50, 100, 1
MOVE 3, -50, 100, 1
FIGHT 3, 4
IF WON,@won
1: What a loser you-you is, losing to slaves!
END
@won
1: You wins!
MOVE 2, 20, 80
MOVE 3, 20, 70
HOST_GIVE T2
WAIT 5
@t2
H: Can I train more?
1: You trained already, young Skaven.
2: Yeah you did! Whipped us bad!
3: It hurt, too!
H: I can always kill you, slave-thingies..
2: Please don't!
3: We didn't mean to whine!!
HOST_GIVE T50
END


SCENE 6
#include banthing.txt
ACTOR 1, 	"Shopkeeper", skaven1, 1, 25, 90
1: I offers you my useful-useful items and thingies!
OFFER 1, 2, 3, 6, 7, 8, 9, 10, 12, 14, 15, 17, 18, 19,
END


SCENE 7
#include banthing.txt
ACTOR 1, 	"Shopkeeper", skaven3, 1, 25, 90
OFFER 300, 301, 302, 303, 304, 350, 351, 352, 353, 354, 550, 551, 552, 553, 554
1: Look at my shiny-shiny warblades!
1: Definitely the sharpest you finds in Skavenblight.
1: Errm.. I gots other stuff than warblades, too..
END


SCENE 8
#include banthing.txt
ACTOR 1, 	"Armorer", skaven2, 1, 25, 90
OFFER 200, 201, 202, 203, 204, 250, 251, 252, 253, 254, 600, 601, 602, 603, 604, 650, 651, 652, 653, 801, 802, 803, 804, 805
1: My armor-armor protects well..
1: I offers parrying blades too!
END


SCENE 9
#include banthing.txt
ACTOR 1, 	"Jewelry Xpert", skaven1, 1, 40, 90
1: Ooh, shiny ones!
OFFER 700, 701, 702, 703, 704, 750, 751, 752, 753, 754
END
SCENE 13
#include banthing.txt
ACTOR	1,	"Healer", cleric, 1, 25, 90
SEL		1
' I will heal your wounds, %2. 
' I expect I'll do that many times, yet.
OFFER	1, 2, 6, 7, 8, 9, 10, 14, 15, 17, 18, 
GIVE L1
GIVE H5000
GIVE M5000
END
SCENE 14
#include banthing.txt
ACTOR	1,	"Guard captain", knight, 1, 25, 90
ACTOR	2,	"Thief", streetthief, 1, 22, 75
ACTOR	3,	"Thief", weakthief, 1, 28, 100
IF C26, @evil
IF C21, @evil
IF C16, @evil
IF T55, @k
IF T3,@t3
1: Hmm.. Hey you there! 
H: Yes?
1: You need some training?
H: Sure, I could use some.
1: We've got the town full of these darn thieves..
1: They are much like the skaven..
1: Teach these two a lesson!
2: Stomping on our rights!!
3: Yeah! We'll teach YOU a lesson!
3: *Points at you*
H: Bah you have no rights.
WAIT 3.0
MOVE 2, -50, 100, 1
MOVE 3, -50, 100, 1
FIGHT 9, 10
IF WON,@won
1: Hmm. Come back when you've the strength
1: To win lowlife thugs..
END
@won
1: You win, great! Taught them a lesson!
MOVE 2, 22, 75
MOVE 3, 28, 100
HOST_GIVE T3
WAIT 5
@t3
1: Had fun beating those two?
2: It wasn't fun, ya know.
3: My back is sore!!
H: Just stop whining..
HOST_GIVE T54
END
@k
1: Hello again, %1.
END
@evil
1: Get out of here %1!
1: You are too foul to be trusted!
END

SCENE 15
#include banthing.txt
ACTOR 1, 	"Armored elf", elf, 2, 25, 90
IF C26, @evil2
IF C21, @evil2
IF C16, @evil2
IF T1050-I1304, @givebow
IF T1050, @getout
IF T201+V99-I1304, @givebow
IF T201, @getout

STRCMP #<str.soul>, "6A5CEE31"
IF= @givet

STRCMP #<str.soul>, "595CE87F"
IF= @givet

STRCMP #<str.soul>, "SOUL 1893"
IF= @givet

1: If you are in dire need of well protecting armor..
1: You've come to the right place!
1: Elvish quality, of course!
OFFER 200, 201, 202, 203, 204, 250, 251, 252, 253, 254, 600, 601, 602, 603, 604, 801, 802, 803, 804, 805, 850, 851, 900, 901, 902, 903, 904
1: Right click for more items.
END
@eventActorClick1
OFFER 380, 381, 382,
END

@givebow
1: Here you go, greedy bastard.
HOST_GIVE I1304
HOST_GIVE I1305
HOST_GIVE T1050
END

@givet
1: Ah so you are one of the priviledged.
1: Here, take this token 201. You may now enter the cave near north Swamp.
HOST_GIVE T201
STRCMP #<str.soul>, "SOUL 1893"
IF= @givet2
END
@evil2
1: Hrrm! You're one of the betrayers!
1: Get out before I call the guards!
END
@givet2
1: So, Queek, is it?
1: I have a couple of spells you instructed me to give
1: to all of your characters. 
HOST_GIVE S230
HOST_GIVE S231
HOST_GIVE S232
HOST_GIVE S233
HOST_GIVE S250
WAIT 2
IF C15, @givet3
1: Begone already.
END
@givet3
1: And some items to help you on your travels.
1: Only for Chaos elves! >.>
HOST_GIVE I1220
HOST_GIVE I1221
HOST_GIVE I1222
HOST_GIVE I1223
HOST_GIVE I1224
HOST_GIVE I1225
HOST_GIVE I1226

END
@getout
1: You got your fancy token already. Buy something if you need.
OFFER 200, 201, 202, 203, 204, 250, 251, 252, 253, 254, 600, 601, 602, 603, 604, 801, 802, 803, 804, 805, 850, 851, 900, 901, 902, 903, 904
1: Right click for more items.
END
@eventActorClick1
OFFER 380, 381, 382,
END

SCENE 16
#include banthing.txt
ACTOR 1, 	"Shopkeeper", armedmerchant, 1, 40, 90
IF C26, @evil3
IF C21, @evil3
IF C16, @evil3
1: Greetings, shiny jewelery is what I offer.
1: If you're willing to buy.
OFFER 700, 701, 702, 703, 704, 750, 751, 752, 753, 754
END
@evil3
1: Get out foul %1!
1: You're not welcome here!
END

SCENE 17
#include banthing.txt
ACTOR 1, 	"Shopkeeper", armedmerchant, 4, 25, 90
1: You're welcome to see what I have to offer.
IF C26, @evil4
IF C21, @evil4
IF C16, @evil4
OFFER 1, 2, 5, 6, 7, 8, 9, 10, 11, 17, 18, 19, 
END
@evil4
1: You are not welcome here, %1!
1: Foul servant of darkness!
END

SCENE 18
#include banthing.txt
ACTOR 1, 	"Elf Ranger", elf, 1, 25, 90
IF C26, @evil5
IF C21, @evil5
IF C16, @evil5
1: I offer sharp weapons.
1: Well, atleast most of them are sharp.
1: And no, I do not sell bows only.
OFFER 400, 401, 402, 403, 404, 450, 451, 452, 453, 454, 500, 501, 502, 503, 504, 550, 551, 552, 553, 554, 362, 363, 364, 365, 366,
END
@evil5
1: Leave immediately, spawn of darkness!
END

SCENE 22
#include banthing.txt
ACTOR	1,	"Skaven Seer", skaven2, 1, 25, 90
SEL		1
' Bwahaha! You though it was treasure here, %2? 
' Yes I knows your-your name. I has been told to aid you.
' I can heal your wounds and offer you healing stuffies.
OFFER	1, 2, 3, 6, 7, 8, 9, 10, 12
GIVE L1
GIVE H5000
GIVE M5000
END
SCENE 23
IF T60, @t60
ACTOR 1, "Snarrgat's ghost", skaven1, 1, 25, 90, 24
H: WTF... Who is you?
1: Naww, the question is, who I was?
1: I was a great Skaven warlord called Snarrgat!
H: I no think me has-has heard of you, sorry warlord thingy.
1: That is because I was famous for that-that I..
1: Was a Warlord for 3 hours before I was assassinated.
1: I had all great equip too.
1: Just not good enough to keep the-the poisoned weapons away!
1: So I offers you my pieces of equipment I still has.. 
1: If you offers me a good fight.
H: What you mean?
1: You fights me! If you wins, you wins! If you loses, you dies!!
H: Fine thingie! Those equipment must be good!
WAIT 3.0
MOVE 1, -50, 100, 1
THEME 53
FIGHT 21
IF WON,@won
THEME 70
1: Bad luck, newb! HAR HAR!
END
@won
THEME 71
;reward
HOST_GIVE I1011
HOST_GIVE I1012
HOST_GIVE I1013
HOST_GIVE T60
END
@t60
ACTOR 1, "Snarrgat's ghost", skaven1, 1, 25, 90, 24
1: Greetings again, young one.
1: Visiting ole Snarrgat, hrr?
H: Does you know where rest of you armor might be?
1: Scattered around the.. World. Skavens stole some.
1: Manthings stole some.
H: I shall recover and use you armor.
1: Fine travels to you, Skaven.
END

SCENE 999
#include banthing.txt
IF T205, @t205
STRCMP #<str.soul>, "SOUL 1893"
IF= @queeker
STRCMP #<str.soul>, "595CE87F"
IF= @drizzt
STRCMP #<str.soul>, "6A5CEE31"
IF= @pomi
END
@queeker
N: %1, do you want to become a drow,
N: The evil cousin of the elf?
ASK 30
IF Qyes, @yes1
N: So no? What about.. Drow Nightrunner?
ASK 30
IF Qyes, @yes2
N: Want to become a Hero?
ASK 30
IF Qyes, @hero
N: No? Then I'll give you useful equip.. :D
WAIT 5
HOST_GIVE I1180
HOST_GIVE I1181
HOST_GIVE I1182
HOST_GIVE I1183
HOST_GIVE I1184
HOST_GIVE I1185
HOST_GIVE I1186
HOST_GIVE T205
GOTO EXIT
END
@yes1
SET num.hostClass, 11
HOST_GIVE T205
GOTO EXIT
END
@yes2
SET num.hostClass, 14
HOST_GIVE T205
GOTO EXIT
END
@hero
SET num.hostClass, 31
GOTO EXIT
END
@drizzt
N: %1, do you want to become a drow ranger,
N: Senkin jauhoaivo..?
ASK 30
IF Qyes, @yes2
@yes2
SET num.hostClass, 12
HOST_GIVE T205
GOTO EXIT
END
@t205
N: This place seems to be completely deserted.
END
@pomi
N: Terve Pomi. Siusta tulee nyt itse
N: hullu maagi joka viskoo tulipalloja silmistaan! ^_^
N: ootappa vaan ensin pikkasen :D
WAIT 4
SET num.hostClass, 13
HOST_GIVE T205
N: Nonni mita mie sanoin, hullu maagi! :P
GOTO EXIT
END

SCENE 350
#include banthing.txt
	HTML "list.htm"
END
;boo

SCENE 351
#include banthing.txt
	HTML "skaven.htm"
END

SCENE 352
#include banthing.txt
	HTML "elements.htm"
END

SCENE 353
#include banthing.txt
	HTML "chaos.htm"
END

SCENE 998
#include banthing.txt
END

SCENE 1234
#include banthing.txt
	HTML "alchemy.htm"
END

ACTOR 1, "Drow", drow, 1, 25, 90

IF T405, @t405

1: Uhh ohh. It's so bright here on the surface.
1: Who might you be?
1: I don't think I recognize you, %1..
STRCMP #<str.soul>, "SOUL 1893"
IF= @queekeri
STRCMP #<str.soul>, "595CE87F"
IF= @drizzti
STRCMP #<str.soul>, "6A5CEE31"
IF= @pomitor

END
@queekeri
1: Oh but, of course! The mighty %1! 
1: Believe it or not, I have a few tricks I can teach you, 
1: some of which you have forgotten on the surface. 
1: You should find them more than useful.
HOST_GIVE S260
HOST_GIVE S221
HOST_GIVE S222
HOST_GIVE S224
HOST_GIVE S225
HOST_GIVE S226
HOST_GIVE S227
HOST_GIVE T405
N: Learned new spells..
N: More than Glow, muah!!
END
@drizzti
1: Traitor! Lmao, Glow isn't it?
1: I would have your head on a silver plate, 
1: but as you know you're the friend of the maker of this world..
1: so.. he'd just remove me or something should I do that.
1: I can teach you a couple of spells.
1: Oh but! Before that I really must test you.
1: Queek would want it. He hates to see you all
1: lazy and stuff. Fight for your life, maggot!
WAIT 3
THEME 69
FIGHT 150
IF WON, @won
THEME 70
1: It was right to test you, fool!
END
@won
THEME 71
1: You have survived the test..
HOST_GIVE S260
HOST_GIVE S221
HOST_GIVE S223
N: Learned three new spells. o.O
HOST_GIVE T405
END
@pomitor
1: oh-ho-ho! So a bloodmage!
1: I have some spells to teach to you.
N: You receive three new spells.
HOST_GIVE S190
HOST_GIVE S191
HOST_GIVE S192
HOST_GIVE T405
END
@t405
1: What? I have nothing more to teach you.
END

SCENE 995
#include banthing.txt
STRCMP #<str.soul>, "SOUL 1893"
IF= @queeker
N: There's a writing on the wall:
N: Leave now and never come back!
END
@queeker
N: Haluuxa pois ne togsut?
ASK 400
IF Qjoo, @pois
N: Sit otan togsu kympin pois.. :P
HOST_TAKE T10
END
@pois
HOST_TAKE T140
HOST_TAKE T141
HOST_TAKE T142
HOST_TAKE T143
HOST_TAKE T301
HOST_TAKE T302
HOST_TAKE T303
HOST_TAKE T304
HOST_TAKE T305
HOST_TAKE T309
HOST_TAKE T315
HOST_TAKE T316
HOST_TAKE T317
HOST_TAKE T318
HOST_TAKE T330
HOST_TAKE T331
HOST_TAKE T332
HOST_TAKE T333
HOST_TAKE T350
HOST_TAKE T351
HOST_TAKE T352
HOST_TAKE T353
HOST_TAKE T354
HOST_TAKE T355
HOST_TAKE T356
HOST_TAKE T357
HOST_TAKE T10
END

SCENE 625
#include banthing.txt
ACTOR 1, "Pet Shop Owner", wolfwizboneddruid, 2, 40, 90
1: During long travels, companions are needed.
1: I am willing to sell you some of me trained animals.
OFFER 1101,1102,1120,1121
END

SCENE 616
#include banthing.txt
IF T82, @lawful
IF T81, @kuollut
IF I50+I51+I52, @reward
IF T80, @getgoing
ACTOR 1, "Noble", army2foot, 4, 25, 100
1: Greetings and well met. Why have you come to my house?
1: You're one of them adventurers, aren't you?
1: Muddy folk. Get out before I call the.. Cleaners!
WAIT 3
1: Oh, blast it. Wait. I have use for you.
1: You see, I like collecting different kinds of art.
1: At the moment I'm fond of different kind of statuettes.
1: I'm still missing Red Dragon, Holy knight and rat.
1: Should you find them and return them to me, I'll reward you.
1: I think I can promise to pay you.. Hmm, 150 000.
1: If you get more than 1 of each, sell the rest.
1: I do not need many.
1: The statuettes are dropped randomly from monsters.
1: Good luck, adventurer. Now, get out. GET OUT!
HOST_GIVE T80
END
@reward
ACTOR 1, "Noble", army2foot, 4, 25, 90
1: Oh joy! My collection is complete!
1: Please, %1, give them to me now.
1: The Rat, Red Dragon and Holy Knight statuettes!
1: I will reward you! 100 000! Think about it!
1: Just say give! Please! 
ASK 100
IF Qgive, @anna
1: Wtf? Cheatorz! You weren't gonna give them to me anyways!
1: You're trying to rob me! I'm sure of it!
1: I warn you! I'm an experienced fighter!
1: You still have a few seconds to leave.
WAIT 3
1: Fine, die!
MOVE 1, -50, 100, 1
FIGHT 180
IF WON, @qrja
END
@qrja
N: The noble's lifeless body lies on the floor.
WAIT 1
N: You quickly relieve him from his possession.
wAIT 2
N: You manage to gather 100 000 gold.
wAIT 2
N: Your actions have shifted your alignment one point
N: towards evil! Hahahaha!

HOST_GIVE G100000
HOST_GIVE T81
END
@anna
N: You hand the statuettes to the noble.
HOST_TAKE I50
HOST_TAKE I51
HOST_TAKE I52
1: Thank you, adventurer. Here is your reward.
WAIT 2
HOST_GIVE G100000
HOST_GIVE T82
N: You got 100 000 gold!
1: Now, I trust we do not have anything else to discuss.
1: Leave my house if you'd be so kind.
END
@lawful
ACTOR 1, "Noble", army2foot, 4, 25, 90
1: Thank you once more. Now get out. I mean it.
WAIT 2
@eventActorClick1
MENU 	"Any new quests?=@questie","More money?=@rew2"
END

@questie
1: Hey, not a bad idea! Make up a good idea
1: and inform Queek!
END

@rew2
1: Ha! Even my gratitude has it's limits!
1: Get out already.
END

@kuollut
N: There is nothing else to rob here, you're quite sure.
END
@getgoing
ACTOR 1, "Noble", army2foot, 4, 25, 90
1: Go on, find the precious statuettes!
END

SCENE 617
#include banthing.txt
ACTOR 1, "Chaos Elf", elf, 3, 40, 90
OFFER 100, 101, 102, 103, 104, 105, 106, 150, 151, 152, 153,
1: Weapons and skill upgrades..
1: Chaos gods themselves have made these weapons!
1: They never left Foroduin. We, the Chaos Elves, shall rule..
IF T35, @already
IF C15, @manaburn
1: Do you want to learn more about us Chaos Elves?
WAIT 2
@eventActorClick1
MENU 	"Chaos elves?=@black","Talos?=@talos"
END
@black
1: We thirst for magic. No amount of magical power can satisfy our thirst.
1: We have turned to worship the long gone Chaos gods..
1: Atleast others claim that they are gone, we know the truth!
1: They have enhanced weapons and left them for us to use!
1: These weapons are far more powerful than normal ones!
1: They have but one weakness. They are big and require 2 hands to use.
1: But as "shield" you can use mastery which increases your skill with the weapon.
1: Some claim that we Chaos Elves are crazy. That's not the truth.
1: We are just far more powerful than anyone else on Foroduin!
1: Some say we shouldn't be in the Alliance. That we are.. Chaotic..
1: We couldn't care less! Let us make our own faction and kill everyone in our path!
END
@talos
1: So you want to know more about Talos, god of chaos and storm?
1: Most of us Chaos elves worship him, including me.
1: Some Chaos elves serve Paladine and become Demon hunters,
1: taking a step towards light.. Phah, weaklings I say!
1: Talos is the most powerful of all chaos gods.
1: He gives his servants terrible spells of mass destruction
1: and items of great power. Paladine hates Talos and vice versa.
1: They are long time rivals.
END
@manaburn
1: I see you are one of Our kind. I can teach you a spell.
1: Use its burning flames against anyone who opposes chaos gods..
HOST_GIVE T35
HOST_GIVE S250
N: Learned %S250!
END
@already
OFFER 100, 101, 102, 103, 104, 105, 106, 150, 151, 152, 153,
1: I see you are one of our kind.
1: I also, however, see, that you have learned %S250 already.
1: I have nothing more to teach you.
END

SCENE 618
#include banthing.txt
ACTOR 1, "Chaos Elf", elf, 3, 40, 90
OFFER 106, 107, 108, 109, 110, 111, 153, 154, 155, 156, 157, 158,
1: Bwhahaha! See my fine wares of Two bladed weapons..
1: And of course, skill upgrades.. 
1: All enhanced by the Chaos gods, yes.. 
1: Do you want to know more about us Chaos elves?
ASK 30
IF Qyes, @tell
1: No? Fine.
END
@tell
1: We thirst for magic. No amount of magical power can satisfy our thirst.
1: We have turned to worship the long gone Chaos gods..
1: Atleast others claim that they are gone, we know the truth!
1: They have enhanced weapons and left them for us to use!
1: These weapons are far more powerful than normal ones!
1: They have but one weakness. They are big and require 2 hands to use.
1: But as "shield" you can use mastery which increases your skill with the weapon.
1: Some claim that we Chaos Elves are crazy. That's not the truth.
1: We are just far more powerful than anyone else on Foroduin!
1: Some say we shouldn't be in the Alliance. That we are.. Chaotic..
1: We couldn't care less! Let us make our own faction and kill everyone in our path!
END



SCENE 619
#include banthing.txt
ACTOR 1, "Rare items collector", army3foot, 4, 25, 100
IF T86, @got
IF I170+I171+I172+I173+I174, @plz
IF T85, @finding
1: Greetings adventurer. I'm a Paladin of Sturmwind.
1: I recently moved here to live.
1: I collect rare weapons and such.
1: Could you perhaps find me a couple of items?
1: Some monsters carry them around with them.
1: The items that I still need for my collection are as follows:
1: Brute Orc Gauntlets(level 37), Belt of Nature(level 43),
1: Circlet of Kings(level 47), Manaboots(level 33)
1: and Symbol of Chaos(level 52).
1: As I mentioned, monsters drop them. Randomly.
1: Should you find more than 1 of each, you're free to sell them.
1: Also, if you have use for them while leveling,
1: you can always return with them later.
1: I have time.
1: As a reward I'll gladly give you 130 000 gold.
HOST_GIVE T85
END
@plz
1: Ooh, you have all the items I need!
1: Will you please give them to me?
1: Your reward will be the promised 130 000 gold.
1: The items are:
1: Brute Orc Gauntlets(level 37), Belt of Nature(level 43),
1: Circlet of Kings(level 47), Manaboots(level 33)
1: and Symbol of Chaos(level 52).
1: So, want to give them to me?
WAIT 3
MENU 	"Here you go=@thanks","Not right now=@oh"
END

@thanks
1: Whee, thank you! I'll take those..
HOST_TAKE I170
HOST_TAKE I171
HOST_TAKE I172
HOST_TAKE I173
HOST_TAKE I174
WAIT 3
1: Thanks, adventurer!
1: Here is your reward as promised.
HOST_GIVE G130000
HOST_GIVE T86
N: You receive 130 000 gold.
1: Now, I don't need anything else right now.
1: Maybe later. Thanks again adventurer.
END

@oh
1: Don't want to give them up yet?
1: That's okay, I can wait.
1: The items are:
1: Brute Orc Gauntlets(level 37), Belt of Nature(level 43),
1: Circlet of Kings(level 47), Manaboots(level 33)
1: and Symbol of Chaos(level 52).

END
@got
1: Hello again adventurer.
END
@finding
1: Still haven't found them?
1: That's ok. I have time.
END

SCENE 2000
ACTOR 1, "Adventurer", army3foot, 1, 25, 100
GIVE L1
1: Welcome to my camp adventurer. Do you wish to rest?
1: Or perhaps know more about this place?
MENU "I'd like to rest.=@rest", "Tell me more about this place=@valley", "Nothing thanks, I'll be on my way=@go"
END

@go
1: Alright, see you.
END

@valley
1: Ahh, the Valley of Heroes..
1: Odd name for it. No heroes here.
1: Only monsters and lost souls wander in here.
1: This is the place where the greatest of battles between Skaven and Alliance
1: has been fought.
1: Aye, three thousand Alliance soldiers got stuck here while returning home
1: from a succesfull campaign. Back then the war was going strong.
1: The army decided to rest here for a while, being quite fatiqued.
1: The Skaven live in all kinds of places, even this place.
1: They smelled manflesh and called reinforcements.
1: Soon an army of more than twenty thousand Skaven and Goblins surrounded the
1: Alliance's troops.
1: A bitter battle ensued, both sides suffered terrible losses.
1: They fought for weeks, when Alliance forces decide to stand their ground
1: they do just that.
1: Finally, reinforcements were sent from Human capital of Stormkeep.
1: The Skaven were driven from the valley but only 500 battered soldiers survived.
1: This Valley is said to be haunted by the dead.
1: The Hero part? Comes from the fact that each and every soldier fought valiantly.
END

@rest
1: Allright.
WAIT 2
N: You rest.
WAIT 3
GIVE H5000
GIVE M5000
1: There, feeling any better?
H: Certainly.
1: Hopefully I'll talk to you later.
1: It's creepy in here..
END


;boo and stuff. no stuffies and thingies!