File: SCENE_Thief_2.txt

package info (click to toggle)
gearhead 1.310-1
  • links: PTS
  • area: main
  • in suites: buster
  • size: 10,028 kB
  • sloc: pascal: 36,375; makefile: 78
file content (68 lines) | stat: -rw-r--r-- 1,221 bytes parent folder | download | duplicates (6)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
scene 0 0
% The PC is here to steal a mecha, or at least some mecha equipment.

% The following interface details must remain constant
% throughout all Thief_* scenes:

%   Team 2 = Default enemies
%   Team 3 = WMon enemies

%   V1 = If nonzero, have some wandering monsters
%   V2 = If nonzero, PC has succeeded in his quest.

% The following interface details may be changed:


WildMap
GapFill <-4 -4 -7 -7 -10 -10 -10>

start <if# L1 0 MonsterUp 3 L1 L= 1 0 ifG SkRoll 11 12 Print 1>
5Min <ifG 15 SkRoll 25 MonsterUp 3 d8>

% If the PC leaves or is killed, return to the calling scene.
Nu1 <if= T1 0 Return>

Msg1 <You hear a large machine operating in the distance.>

sub
	forest
	width 5
	height 5
	special <StartHere>

	Complex
	width 12
	height 12
	LockedDoorChance 50
	SecretDoorChance 30
	sub
		rect
		FloorType 16
		special <Cell>
		sub
			StairsDown
			Use <Print 1 Alert 3 L= 2 1 Retreat 1>
			Msg3 <You grab what you came here for and make a hasty retreat.>
		end
	end


	Team 1
	SetEnemy 2 3

	Team 2
	SetEnemy 1
	SetAlly 3
	type <Robot Guard>

	Team 3
	SetEnemy 1
	SetAlly 2
	type <Robot Guard>

end
inv
	Monster SENTINEL
	SetTeam 2

end