SCene 0
% Big Default Dungeon Scene

% This is an infinite dungeon.

% V2 = *Depth at which to load final battle
% V3 = *Current Depth
% V4 = *Current Monster Rating
% V5 =  Initialization Counter
% V101 = Enemy NPC ID

	special <NoExit>
	NU1 <if= T1 0 Return>
	CaveMap
	BorderType 31

	start <if= V5 0 V= 5 1 MonsterUp 2 V4>

sub
	Team 1
	SetEnemy 2

	Team 2
	SetEnemy 1
	type <Earth Mutant Devo Reptile Hunter-X>

	rect
	width 3
	height 3
	sub
		StairsUp
		Destination -1
		use <ifG L3 5 else GoNoUp Print 1 L+ 3 -5 L+ 4 -3 Goto GoUpStairs>
		GoUpStairs <LoadD .sitename PassVar 101 L101 PassVar 2 L2 PassVar 3 L3 PassVar 4 L4 SeekGate 1>
		.sitename <TS_XRAN_SCENE_BigDefDungeon.txt>
		GoNoUp <Print 2>
		Msg2 <The door at the top of the stairs has been locked. There's no going back.>
	end

	rect
	width 3
	height 3
	sub
		StairsDown
		Destination 1
		use <Print 1 L+ 3 5 L+ 4 3 ifG L2 L3 else GoLoadFinal Goto GoLoadDown>
		GoLoadDown <LoadD .sitename PassVar 101 L101 PassVar 2 L2 PassVar 3 L3 PassVar 4 L4 SeekGate -1>
		.sitename <TS_XRAN_SCENE_BigDefDungeon.txt>
		GoLoadFinal <LoadD .lastbattle DynaNPC L101 2 PassVar 101 L101>
		.lastbattle <TS_XRAN_SCENE_LastBattle.txt>
	end

end
