; Made by Silver

@eventHostGive
	SET qscccheck, "0"
	COMPARE #<qscccheck>, "0"
	IF< @S11
	IF> @S11
	SET qscccheck, "1"
	COMPARE #<qscccheck>, "1"
	IF< @S11
	IF> @S11

	IF C21, @S11

	COMPARE #<item.id>, "36"
	IF= @eventroten
	COMPARE #<item.id>, "776"
	IF= @silverlove
	COMPARE #<item.id>, "770"
	IF= @kamikazi
	COMPARE #<item.id>, "771"
	IF= @respillsA
	COMPARE #<item.id>, "2057"
	IF= @respillsB
	COMPARE #<item.id>, "772"
	IF= @respillsC
	COMPARE #<item.id>, "2058"
	IF= @respillsD
	COMPARE #<item.id>, "734"
	IF= @slavetrainerA	
	COMPARE #<item.id>, "773"
	IF= @slavetrainerB	
	COMPARE #<item.id>, "774"
	IF= @slavetrainerC	
	COMPARE #<item.id>, "775"
	IF= @slavetrainerD	
	COMPARE #<item.id>, "2131"
	IF= @xmaspresentgiving2131	

	IF -T118, @endEventHostGive
	COMPARE #<item.id>, "976"
	IF= @gunslingerDrinkQuote
	COMPARE #<item.id>, "977"
	IF= @gunslingerDrinkQuote

@endEventHostGive
	END
	
@gunslingerDrinkQuote	
	CALL 5199@gunslingerDrink
	END	
	

@silverlove
	COMPARE #<num.peopleInScene>, "1"
	IF> @superlove
	N: You feel all warm and fuzzy inside.
	END
@superlove
	N: %1 feels all warm and fuzzy inside.
	WAIT 3.0
	SET randomlove, "%R6"
	GOTO @superlove#<randomlove>
@superlove6
	H: Oh yeah, that's it...
	H: Oh-my-gosh! 	
	H: My pants are soaked!
	H: I want more of this stuff!
	END
@superlove1
	H: Let's make love, right here, right now!
	END
@superlove2
	H: Anybody wants some love?
	H: What about you sweetie?
	END
@superlove3
	H: GEEEeeeEEEezzzZZZ
	H: This shit is better then dope, sweetheart!
	END
@superlove4
	H: Let's get it on, you know you wanna!	
	END
@superlove5
	SET randomlove, 1
	ADD randomlove, %R9
	H: Did you know that I secretly have a crush on you since #<randomlove> weeks ago?
	END

@kamikazi
	SET randomdeath, %R5
	GOTO @kamikazi#<randomdeath>
	END
@kamikazi1
	H: ! KAMIKAZI!!!
	WAIT 1.0
	HOST_TAKE H#<num.hostHP>
	HOST_TAKE M#<num.hostMP>
	END
@kamikazi2
	H: Dieeee!!
	WAIT 3.0
	N: %1 makes an unexpected swing and accidently kills #<g.himself>!
	WAIT 1.0
	HOST_TAKE H#<num.hostHP>
	HOST_TAKE M#<num.hostMP>
	END
@kamikazi3
	H: Uh oh...
	WAIT 1.0
	HOST_TAKE H#<num.hostHP>
	HOST_TAKE M#<num.hostMP>
	WAIT 1.0
	H: Ouch!
	END
@kamikazi4
	WAIT 5.0
	H: Isn't something supposed to happen now..?
	WAIT 3.0
	WAIT 1.0
	HOST_TAKE H#<num.hostHP>
	HOST_TAKE M#<num.hostMP>
	WAIT 2.0
	H: Ack, never mind!
	END
@kamikazi5
	N: Internal time bomb activated.	
	WAIT 1.0
	N: T minus 5 seconds before death.
	COUNTDOWN 5
	N: 5...
	WAIT 1.0
	N: 4...
	WAIT 1.0
	N: 3...
	WAIT 1.0
	N: 2...
	WAIT 1.0
	N: 1..!
	WAIT 3.0
	N: Just kidding!
	WAIT 3.0
	H: Pweffff..!
	WAIT 6.0
	N: Yeah right, smartass.
	N: Time to die after all!
	WAIT 2.0
	HOST_TAKE H#<num.hostHP>
	HOST_TAKE M#<num.hostMP>
	END

@respillsA
	IF #15, @respillsnotworking
	IF #16, @respillsnotworking
	HOST_GIVE L1
	END
@respillsB
	IF #15, @respillsnotworking
	IF #16, @respillsnotworking
	HOST_GIVE L1
	HOST_GIVE I2057
	END	
@respillsC
	IF #15, @respillsnotworking
	IF #16, @respillsnotworking
	HOST_GIVE L1
	HOST_GIVE H#<num.hostMaxHP>
	HOST_GIVE M#<num.hostMaxMP>
	END
@respillsD
	IF #15, @respillsnotworking
	IF #16, @respillsnotworking
	HOST_GIVE L1
	HOST_GIVE H#<num.hostMaxHP>
	HOST_GIVE M#<num.hostMaxMP>
	HOST_GIVE I2058
	END
@respillsnotworking	
	N: That won't work on this map, you should visit the Inn in Demon Circle instead!
	N: You received your %I#<item.id> back.
	HOST_GIVE I#<item.id>
	END


@slavetrainerA
	FLAGS 261448
#include lpscript.txt
	IF #15, @noslavetraining
	IF #16, @noslavetraining
	N: Call your slave out to train it.
	N: You can NOT participate in the fight and your camp is auto locked!
	LOCK 1
	EJECT T172
	FIGHT2 542
	FIGHT2 542
	FIGHT2 542
	FIGHT2 542
	FIGHT2 542
	WAIT 3.0
	FLAGS 0
	GOTO SCENE 1

@slavetrainerB
	FLAGS 261448
#include lpscript.txt
	IF #15, @noslavetraining
	IF #16, @noslavetraining
	N: Call your slave out to train it.
	N: You can NOT participate in the fight and your camp is auto locked!
	LOCK 1
	EJECT T172
	FIGHT2 543
	FIGHT2 543
	FIGHT2 543
	FIGHT2 543
	FIGHT2 543
	WAIT 3.0
	FLAGS 0
	GOTO SCENE 1

@slavetrainerC
	FLAGS 261448
#include lpscript.txt
	IF #15, @noslavetraining
	IF #16, @noslavetraining
	N: Call your slave out to train it.
	N: You can NOT participate in the fight and your camp is auto locked!
	LOCK 1
	EJECT T172
	FIGHT2 544
	FIGHT2 544
	FIGHT2 544
	FIGHT2 544
	FIGHT2 544
	FIGHT2 544
	FIGHT2 544
	FIGHT2 544
	FIGHT2 544
	FIGHT2 544
	WAIT 3.0
	FLAGS 0
	GOTO SCENE 1

@slavetrainerD
	FLAGS 261448
#include lpscript.txt
	IF #15, @noslavetraining
	IF #16, @noslavetraining
	N: Call your slave out to train it.
	N: You can NOT participate in the fight and your camp is auto locked!
	LOCK 1
	EJECT T172
	FIGHT2 545
	FIGHT2 545
	FIGHT2 545
	FIGHT2 545
	FIGHT2 545
	FIGHT2 545
	FIGHT2 545
	FIGHT2 545
	FIGHT2 545
	FIGHT2 545
	FIGHT2 545
	FIGHT2 545
	FIGHT2 545
	FIGHT2 545
	FIGHT2 545
	FIGHT2 545
	FIGHT2 545
	FIGHT2 545
	FIGHT2 545
	FIGHT2 545
	FIGHT2 545
	FIGHT2 545
	FIGHT2 545
	FIGHT2 545
	FIGHT2 545
	WAIT 3.0
	FLAGS 0
	GOTO SCENE 1

@noslavetraining
	N: That won't work here!
	N: You received your %I#<item.id> back.
	HOST_GIVE I#<item.id>
	END

@eventroten
	IF R80, @eventroten5
	SET rotenx, %R4
	GOTO @eventroten#<rotenx>
@eventroten1
	H: Yuck!
	H: This stuff is disgusting!
	END
@eventroten2
	N: %1 doesn't look very healthy...
	WAIT 3.0
	H: I think I'm gonna puke....
	WAIT 3.0
	N: %1 makes a bloody mess in the camp and pukes over everything!
	WAIT 3.0
	N: Ewwwww!
	END
@eventroten3
	H: I'm feeling sick...
	H: !!
	H: Where is a toilet!?
	H: I got diarrhoea running down my leg!
	END
@eventroten4
	H: *Burb*
	SOUND burb2.wav
	H: Hmmm...
	H: Not bad...
	WAIT 6.0
	N: You watch how %1 suddenly turns pale...
	WAIT 3.0
	H: Oh my gosh!
	H: ! IT'S REVOLTING!
	END
@eventroten5
	N: Nothing seems to happen...
	WAIT 3.0
	N: Maybe you should try eating more, after all it's good for you!
	END

@xmaspresentgiving2131
	MUSIC jbellrock.mid

	HOST_TAKE I2131

	IF T528, @xmaspresentgiving2131end
	IF T527, @xmaspresentgiving2131x4
	IF T526, @xmaspresentgiving2131x3
	IF T525, @xmaspresentgiving2131x2
	IF T524, @xmaspresentgiving2131x1
	HOST_GIVE T524
	GOTO @xmaspresentgiving2131xstart

@xmaspresentgiving2131x4
	HOST_GIVE T528
	GOTO @xmaspresentgiving2131xstart
@xmaspresentgiving2131x3
	HOST_GIVE T527
	GOTO @xmaspresentgiving2131xstart
@xmaspresentgiving2131x2
	HOST_GIVE T526
	GOTO @xmaspresentgiving2131xstart
@xmaspresentgiving2131x1
	HOST_GIVE T525
	GOTO @xmaspresentgiving2131xstart

@xmaspresentgiving2131xstart
	SET randominity, %R100
	COMPARE #<randominity>, "99"
	IF> @xmaspresentgiving2131a
	COMPARE #<randominity>, "94"
	IF> @xmaspresentgiving2131b
	COMPARE #<randominity>, "90"
	IF> @xmaspresentgiving2131c
	COMPARE #<randominity>, "80"
	IF> @xmaspresentgiving2131d
	COMPARE #<randominity>, "70"
	IF> @xmaspresentgiving2131e
	COMPARE #<randominity>, "65"
	IF> @xmaspresentgiving2131l
	COMPARE #<randominity>, "50"
	IF> @xmaspresentgiving2131f
	COMPARE #<randominity>, "40"
	IF> @xmaspresentgiving2131k
	COMPARE #<randominity>, "30"
	IF> @xmaspresentgiving2131g
	COMPARE #<randominity>, "20"
	IF> @xmaspresentgiving2131h
	COMPARE #<randominity>, "15"
	IF> @xmaspresentgiving2131i
	COMPARE #<randominity>, "5"
	IF> @xmaspresentgiving2131j
; k, l is taken


	SET xmasrandom, %R8
	ADD xmasrandom, 17 
	SET xmasrandom2, %R4
	ADD xmasrandom2, 1 
	HOST_GIVE I#<xmasrandom>.#<xmasrandom2>
	N: You received #<xmasrandom2> %I#<xmasrandom>s!
	END
@xmaspresentgiving2131a
	SET xmasrandom, %R24
	ADD xmasrandom, 2100 
	HOST_GIVE I#<xmasrandom>
	N: You received a %I#<xmasrandom>!
	END
@xmaspresentgiving2131b
	SET xmasrandom, %R6
	ADD xmasrandom, 2049 
	HOST_GIVE I#<xmasrandom>
	N: You received a %I#<xmasrandom>!
	END
@xmaspresentgiving2131c
	SET xmasrandom, %R3
	ADD xmasrandom, 772
	HOST_GIVE I#<xmasrandom>
	N: You received a %I#<xmasrandom>!
	END
@xmaspresentgiving2131d
	SET xmasrandom, %R14
	ADD xmasrandom, 785
	HOST_GIVE I#<xmasrandom>
	N: You received a %I#<xmasrandom>!
	END
@xmaspresentgiving2131e
	SET xmasrandom, %R24
	ADD xmasrandom, 949
	HOST_GIVE I#<xmasrandom>
	N: You received a %I#<xmasrandom>!
	END
@xmaspresentgiving2131f
	SET xmasrandom, %R8
	ADD xmasrandom, 102
	SET xmasrandom2, %R35
	ADD xmasrandom2, 25
	HOST_GIVE I#<xmasrandom>.#<xmasrandom2>
	N: You received #<xmasrandom2> %I#<xmasrandom>s!
	END
@xmaspresentgiving2131g
	SET xmasrandom, %R27
	ADD xmasrandom, 651
	HOST_GIVE I#<xmasrandom>
	N: You received a %I#<xmasrandom>!
	END
@xmaspresentgiving2131h
	SET xmasrandom, %R9
	ADD xmasrandom, 1999
	HOST_GIVE I#<xmasrandom>
	N: You received a %I#<xmasrandom>!
	END
@xmaspresentgiving2131i
	SET xmasrandom, %R9
	ADD xmasrandom, 2009
	HOST_GIVE I#<xmasrandom>
	N: You received a %I#<xmasrandom>!
	END
@xmaspresentgiving2131j
	SET xmasrandom, %R4
	ADD xmasrandom, 768
	SET xmasrandom2, %R5
	ADD xmasrandom2, 5
	HOST_GIVE I#<xmasrandom>.#<xmasrandom2>
	N: You received #<xmasrandom2> %I#<xmasrandom>s!
	END
@xmaspresentgiving2131k
	SET xmasrandom, %R6
	ADD xmasrandom, 2124
	HOST_GIVE I#<xmasrandom>
	N: You received a %I#<xmasrandom>!
	END
@xmaspresentgiving2131k
	HOST_GIVE I2132
	N: You received a %I2132!
	END

@xmaspresentgiving2131end
	N: Devil clause ran out of presents!
	END


; Comment: I'm a real lunatic, but hey, at least I'm good at it! >.<