IF -C38, @thend



	IF E1100, @th10
	IF E1101, @th20
	IF E1102, @th30
	IF E1103, @th40
	IF E1104, @th50
	IF E1105, @th60
	IF E1106, @th70
	IF E1107, @th80
	IF E1108, @th90
	IF E1109, @th95
	IF E1121, @thquest

	GOTO @thend
@th10
	SET chancerob, "10"
	GOTO @thnext
@th20
	SET chancerob, "20"
	GOTO @thnext
@th30
	SET chancerob, "30"
	GOTO @thnext
@th40
	SET chancerob, "40"
	GOTO @thnext
@th50
	SET chancerob, "50"
	GOTO @thnext
@th60
	SET chancerob, "60"
	GOTO @thnext
@th70
	SET chancerob, "70"
	GOTO @thnext
@th80
	SET chancerob, "80"
	GOTO @thnext
@th90
	SET chancerob, "90"
	GOTO @thnext
@th95
	SET chancerob, "95"
	GOTO @thnext
@thquest
	SET chancerob, 	#<num.hostLevel>
	ADD chancerob, "10"
	COMPARE #<chancerob>, "100"
	IF> @thquest1
	GOTO @thnext
@thquest1
	SET chancerob, "100"
	GOTO @thnext
@thnext


	IF #0, @thmap0
	IF #2, @thmap0
	IF #3, @thmap1
	IF #4, @thmap1
	IF #5, @thmap0
	IF #6, @thmap1
	IF #7, @thmap2
	IF #8, @thmap1
	IF #9, @thmap2
	IF #10, @thmap3
	IF #11, @thmap3
	IF #12, @thmap2
	IF #13, @thmap3
	IF #14, @thmap3
	IF #15, @thmap4
	IF #16,	@thmap2
	IF #17, @thmap4
	IF #18, @thmap4
	IF #31, @thmap10
	IF #49, @thmap5
	IF #50, @thmap5
	IF #51, @thmap5
	IF #52, @thmap5
	IF #53, @thmap5
	IF #54, @thmap5
	IF #55, @thmap5
	IF #56, @thmap5
	IF #57, @thmap5
	IF #58, @thmap5
	IF #59, @thmap5
	GOTO @thend

@thmap0

	SET silverRec, "1"
	GOTO @thnext2
@thmap1
	SET silverRec, "2"
	GOTO @thnext2
@thmap2
	SET silverRec, "3"
	GOTO @thnext2
@thmap3
	SET silverRec, "4"
	GOTO @thnext2
@thmap4
	SET silverRec, "5"
	GOTO @thnext2
@thmap5
	SET silverRec, "6"
	GOTO @thnext2
@thmap10
	SET silverRec, "10"
	GOTO @thnext2

@thnext2

	IF R#<chancerob>, @thTsucceed
	N: You failed to rob the monster.
	Wait 1
	GOTO @thend
@thTsucceed
	HOST_GIVE I40.#<silverRec>
	N: You stole #<silverRec> pieces of silver.
	WAIT 1
	GOTO @thend
@thend