home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
The Best of Select: Games 4
/
CD_1.iso
/
bioforge
/
script
/
landpad.scp
< prev
next >
Wrap
Text File
|
1995-02-05
|
10KB
|
922 lines
{ LANDPAD_LOAD
^åû = $âë
I @Çû ^ê╖ THEN ^ê╖
E ^ê╕
@Ç¢ PLAYER
I @Ç⌐ LEXMIR THEN
{
^àï = @Çì REFLECTBATTDRAIN
}
I ^ï¿ = 1 THEN
^Åì = @Çì BIOREPAIR
^ï║ = 0
^ï╜ = 0
@Ç¥ READY_MARINE3B
@Ç¥ READY_MARINE4
I ^å¬ = 2 THEN
{
G TO_BCH
}
@Çì ANIMATE_BIG_ARROWS
@Çì ESCHERS_PLEES_FOR_HELP
@Çì ANI_MECH_FRAME
@Çì ANI_HFR2_FRAME
@Çì ANI_HALL_FRAME
@Çì ANI_ARL2_FRAME
@Çì ANI_FIRE_FRAME
@Çì JETSON_TUBE_BUTTON
I ^ç╖ = $üé AND ^ê┐ = $üâ THEN
@Çì READY_LANDBOTS
E
{
@Çì KILL_LANDBOTS
^ê┐ = $üé
}
}
{ PAD6_LOAD
@Ç¥ REACTIVATE_MARINE4
}
{ PAD8_LOAD
@Ç¥ REACTIVATE_MARINE4
}
{ AIR_DOOR_USE
I ^ç╣ = $üé THEN é
I @Çä NOTIN 30 130 THEN é
I @Çä IN 10 30 THEN T -45
I @Çä IN 21 70 THEN T -20
I @Çä IN 71 80 THEN T -15
I @Çä IN 100 130 THEN T 15
M PUSH_BUTTON CONTINUE
W 15
I ^çå THEN
{
@Çå `Çì 150 -4096
é
}
E
@Çå `Çì 150 -2048
W 10
@Çå `àö
I ^ä« = $ââ THEN J #Çä
I ^ä« = $âé THEN J #Çà
:BEGINOPENINGELEVATOR
@Çì ELEVATOR_DOOR_OPEN
^ä« = $âé
@Çì LANDINGAUTOELEVATORCLOSE
é
:CLOSE_DR1
@Çì ELEVATOR_DOOR_CLOSE
^ä« = $ââ
}
{ AIRLCK_USE
@Ç¢ PLAYER
I @Çä NOTIN 30 150 THEN é
^Ç╢ ++
G AIRLCK_1 WALK 30
E £ 90 GRADUAL
M PUSH_BUTTON CONTINUE
W 15
@Çå `Ç» 100 -2048
@Ç¥ AIRLOCK_MONITOR
I ^ç╗ == 0 THEN é
^Ç╢ --
W 10
@Çå `àö
@Ç¥ DRB_OPEN
}
{ DRA_BTN_USE
I ^ç╣ = $üé THEN
{
é
}
I @Çä NOTIN -130 -30 THEN é
^Ç╢ ++
I @Çä IN -130 -110 THEN T -45
I @Çä IN -109 -90 THEN T -20
I @Çä IN -89 -80 THEN T -15
I @Çä IN -60 -30 THEN T 15
M PUSH_BUTTON CONTINUE
W 15
@Çå `Ç» 100 -2048
@Ç¥ AIRLOCK_MONITOR
I ^ç╗ == 0 THEN é
^Ç╢ --
W 10
@Çå `àö
I ^é¥ == 1 THEN
{
^ê╛ = 1
@Çì AIRLOCK_DRA_OPEN
@Çì PADDRAAUTOCLOSE
^ä│ = $âé
}
}
{ DRB_OPEN
I ^é₧ == 1 AND ^ç╗ = 1 THEN
{
@Çì AIRLOCK_DRB_OPEN
@Çì PADDRBAUTOCLOSE
^ä╢ = $âé
}
I ^ê╝ == 1 THEN
{
^ê╝ = 0
@Çì PADDRBAUTOCLOSE
}
}
{ DRA_STRT
P ~ÇÇ
~ÇÇ = 0
I ^ê╝ == 0 THEN
{
^ê╛ = 1
^ê╝ = 1
^ä│ = $ââ
@Çì AIRLOCK_DRA_CLOSE
I @Çû ^êº = $üâ THEN
^êº
:LOOP
I ^ê╛ = 0 THEN
{
W 3 SECONDS
@Çì AIRLOCK_DRB_OPEN
^ä╢ = $âé
I @Ç⌐ HARD = $üâ OR @Ç⌐ LEXMIR = $üâ THEN
â
E
{
A OFF
u CURFIG OFF
M CHOKE FREEZE
O $Çà
@Ç¥ KILLLEX
é
}
é
}
E
â
J #Çè
}
:END
}
{ DRB_STRT
I ^ê╝ == 0 THEN
{
^ê╛ = 1
^ê╝ = 1
^ä╢ = $ââ
@Çì AIRLOCK_DRB_CLOSE
:LOOP
I ^ê╛ = 0 THEN
{
W 3 SECONDS
@Çì AIRLOCK_DRA_OPEN
^ä│ = $âé
é
}
E
â
J #Çì
}
}
{ DRA_RSET
^ê╛ = 0
^ê╝ = 0
@Çì PADDRAAUTOCLOSE
}
[ DECONTAM
P ~ÇÇ
I ^ê╛ == $üé THEN é
00:00 ~ÇÇ = @Çç `àô 150
^ê╜ = 1
00:02 ^ê╜ = 2
00:04 ^ê╜ = 3
00:06 ^ê╜ = 4
00:08 ^ê╜ = 5
00:10 ^ê╜ = 6
00:12 ^ê╜ = 7
00:14 ^ê╜ = 8
00:16 ^ê╜ = 9
00:18 ^ê╜ = 10
00:20 ^ê╜ = 11
00:22 ^ê╜ = 12
00:24 ^ê╜ = 13
00:26 ^ê╜ = 14
00:28 ^ê╜ = 15
01:00 ^ê╜ = 16
01:02 ^ê╜ = 17
01:04 ^ê╜ = 18
01:06 ^ê╜ = 19
01:08 ^ê╜ = 20
01:10 ^ê╜ = 21
01:12 ^ê╜ = 22
01:14 ^ê╜ = 23
01:16 ^ê╜ = 24
01:18 ^ê╜ = 25
01:20 ^ê╜ = 26
01:22 ^ê╜ = 27
01:24 ^ê╜ = 28
01:26 ^ê╜ = 29
01:28 ^ê╜ = 28
02:00 ^ê╜ = 27
02:02 ^ê╜ = 26
02:04 ^ê╜ = 25
02:06 ^ê╜ = 24
02:08 ^ê╜ = 23
02:10 ^ê╜ = 22
02:12 ^ê╜ = 21
02:14 ^ê╜ = 20
02:16 ^ê╜ = 19
02:18 ^ê╜ = 18
02:20 ^ê╜ = 17
02:22 ^ê╜ = 16
02:24 ^ê╜ = 15
02:26 ^ê╜ = 14
02:28 ^ê╜ = 13
03:00 ^ê╜ = 12
03:02 ^ê╜ = 11
03:04 ^ê╜ = 10
03:06 ^ê╜ = 9
03:08 ^ê╜ = 8
03:10 ^ê╜ = 7
03:12 ^ê╜ = 6
03:14 ^ê╜ = 5
03:16 ^ê╜ = 4
03:18 ^ê╜ = 3
03:20 ^ê╜ = 2
03:22 ^ê╜ = 1
03:24 ^ê╜ = 0
^ê╛ = 0
~ÇÇ
]
{ PADDRAAUTOCLOSE
:TOP
â
I ^é¥ != 0 THEN J #Çæ
I ^ä│ == $ââ THEN é
I @ǡ CURFIG ARL OR @Ǽ CURFIG DR18 < 320 THEN
J #Çæ
I @Ç¡ CURFIG HFR THEN
{
@Çì AIRLOCK_DRA_CLOSE
^ä│ = $ââ
}
^ç╗ = 0
}
{ PADDRBAUTOCLOSE
:TOP
â
I ^é₧ != 0 THEN J #Çô
I ^ä╢ == $ââ THEN é
I @ǡ CURFIG ARL OR @Ǽ CURFIG PADDR < 300 THEN
J #Çô
I @Ç¡ CURFIG PADWLK1 THEN
J #Çô
I @Ç¡ CURFIG PADWLK2 THEN
{
@Çì AIRLOCK_DRB_CLOSE
^ä╢ = $ââ
}
^ç╗ = 0
}
{ PAD_DOWN
@Ç¢ PLAYER
A OFF
o
Z CURFIG OFF
u CURFIG OFF
C PAD2
@Ç¥ PAD_TRANSIT 1
C PAD7
@Ç¥ JETSON_OPEN
G DEST_UP WALK
u CURFIG ON
Z CURFIG ON
A ON
â
C UNLOCK
@Çì PAD_DOWN_AUTO_CLOSE
}
{ PAD_UP
@Ç¢ PLAYER
A OFF
o
Z CURFIG OFF
u CURFIG OFF
C PAD7
@Ç¥ PAD_TRANSIT 0
C PAD2
@Ç¥ JETSON_OPEN
G DEST_DWN WALK
u CURFIG ON
Z CURFIG ON
A ON
â
C UNLOCK
@Çì PAD_UP_AUTO_CLOSE
}
{ PAD_UP_AUTO_CLOSE
:TOP
â
I ^ëè != 0 THEN
J #Çù
I @Ǽ CURFIG JETSON2 < 300 THEN
J #Çù
I @ÇÄ PAD2 = $üé THEN
é
@Çì JETSON_CLOSE 3
}
{ PAD_DOWN_AUTO_CLOSE
:TOP
â
I ^ëè != 0 THEN
J #ÇÖ
I @Ǽ CURFIG JETSON1 < 300 THEN
J #ÇÖ
I @ÇÄ PAD7 = $üé THEN
é
@Çì JETSON_CLOSE 3
}
{ JET_BUT1_USE
@Ç¢ PLAYER
I @Çä IN -45 45 THEN
{
£ BUTT1 GRADUAL
M PUSH_BUTTON CONTINUE
W 10
@Çå `Ç» 100 -2048
W 10
@Ç¥ JETSON_OPEN
@Çì PAD_DOWN_AUTO_CLOSE
}
}
{ JET_BUT2_USE
@Ç¢ PLAYER
I @Çä > 130 || @Çä < -130 THEN
{
£ BUTT2 GRADUAL
M PUSH_BUTTON CONTINUE
W 10
@Çå `Ç» 100 -2048
W 10
@Ç¥ JETSON_OPEN
@Çì PAD_UP_AUTO_CLOSE
}
}
{ PAD_TRANSIT _DIRECTION
P ~Çü
P ~Çé
~Çé = 0
~Çü = 0
^ëÅ = 0
@Ç¥ JETSON_CLOSE ~ÇÇ
~Çü = @Çì DIRECTIONAL_PULSE ~ÇÇ
:WAITING
I ^ëÅ != 1 AND ~Çé <= 10 THEN
{
â
W 10
~Çé ++
J #Ç¥
}
E
{
~Çü
^ëî = 0
}
}
[ JETSON_CLOSE _DIRECTION
I ^ëè != 0 THEN
é
00:00 ^ëë = 1
^ëè = 1
@Çå `àò
00:02 ^ëë = 2
^ëè = 2
00:04 ^ëë = 3
^ëè = 3
00:06 ^ëë = 4
^ëè = 4
00:08 ^ëë = 5
^ëè = 5
00:10 ^ëë = 6
^ëè = 6
00:12 ^ëë = 7
^ëè = 7
00:14 ^ëë = 8
^ëè = 8
00:16 ^ëë = 9
^ëè = 9
00:18 ^ëë = 10
^ëè = 10
00:20 ^ëë = 11
^ëè = 11
00:22 ^ëë = 12
^ëè = 12
00:24 ^ëë = 13
^ëè = 13
I ~ÇÇ != 3 THEN
{
I ~ÇÇ = 0 THEN
{
G PAD_DOWN
}
E
{
G PAD_UP
}
}
00:26 ^ëë = 14
^ëè = 14
00:28 ^ëë = 15
^ëè = 15
01:00 ^ëë = 16
^ëè = 16
01:01 ^ëï = 1
^ëè = 17
^àë = $ââ
^àè = $ââ
]
[ JETSON_OPEN
I ^ëè != 17 THEN
é
00:01 ^ëï = 0
^ëè = 16
@Çå `àò 150
00:02 ^ëë = 16
^ëè = 16
00:04 ^ëë = 15
^ëè = 15
00:06 ^ëë = 14
^ëè = 14
00:08 ^ëë = 13
^ëè = 13
00:10 ^ëë = 12
^ëè = 12
00:12 ^ëë = 11
^ëè = 11
00:14 ^ëë = 10
^ëè = 10
00:16 ^ëë = 9
^ëè = 9
00:18 ^ëë = 8
^ëè = 8
00:20 ^ëë = 7
^ëè = 7
00:22 ^ëë = 6
^ëè = 6
00:24 ^ëë = 5
^ëè = 5
00:26 ^ëë = 4
^ëè = 4
00:28 ^ëë = 3
^ëè = 3
01:00 ^ëë = 2
^ëè = 2
01:02 ^ëë = 1
^ëè = 1
01:04 ^ëè = 0
^àë = $âé
^àè = $âé
]
[ JETSON_TUBE_BUTTON
ó PAD2 PAD7 PAD8
:TOP
00:00 ^ëÄ = 0
00:03 ^ëÄ = 1
00:06 ^ëÄ = 2
00:09 ^ëÄ = 3
00:11 ò
J #Çí
]
[ DIRECTIONAL_PULSE _DIRECTION
I ~ÇÇ = 0 THEN
{
:DOWN
00:00 ^ëî = 1
^ëì = 1
@Çå `èô
00:02 ^ëî = 2
^ëì = 2
00:04 ^ëî = 3
^ëì = 3
00:06 ^ëî = 4
^ëì = 4
00:08 ^ëî = 5
^ëì = 5
00:10 ^ëî = 6
^ëì = 6
00:12 ^ëî = 7
^ëì = 7
00:14 ^ëî = 8
^ëì = 8
00:16 ^ëî = 9
^ëì = 9
00:17 ò
J #Çú
}
E
{
:UPP
00:00 ^ëî = 9
^ëì = 9
@Çå `èô
00:02 ^ëî = 8
^ëì = 8
00:04 ^ëî = 7
^ëì = 7
00:06 ^ëî = 6
^ëì = 6
00:08 ^ëî = 5
^ëì = 5
00:10 ^ëî = 4
^ëì = 4
00:12 ^ëî = 3
^ëì = 3
00:14 ^ëî = 2
^ëì = 2
00:16 ^ëî = 1
^ëì = 1
00:17 ò
J #Çñ
}
]
{ TO_BCH
i LEX LEDGBOTS
@Ç¢ PLAYER
A OFF
o
M STAND CONTINUE
I @Ç¢ MARINE3B THEN
{
I ^ìÿ THEN
{
M STAND CONTINUE
â
o
â
}
}
A ON PLAYER
S BEACH FROM_PAD
}
{ ELV_LND1_USE
I ^çç = 1 THEN é
I @Çä NOTIN 50 130 THEN é
^Ç╢ ++
M PUSH_BUTTON CONTINUE
W 5
@Ç¥ ELEVATOR_MONITOR
^Ç╢ --
}
{ ELV_LND2_USE
I ^çç = 1 THEN é
I @Çä NOTIN -115 -45 THEN é
^Ç╢ ++
M PUSH_BUTTON CONTINUE
W 5
@Ç¥ ELEVATOR_MONITOR
^Ç╢ --
}
{ PAD_LOAD
I ^ïè = 0 THEN O $Ç£
I @Çû ^êº = $üâ THEN
^êº
I ^ç╖ AND ^ç╕ = $üé THEN
^äü = 1
E
^äü = 0
^ü£ = 0
^ê╣ = 150
}
{ PAD3_LOAD
I ^ç╖ AND ^ç╕ = $üé THEN
@Çì HAVESHIPFIREONUS
}
{ MECHOBURN _VOLUME
I ^ç╣ == $üâ THEN
{
I @Çû ^êº = $üé THEN
^êº = @Çç `ࢠAIR_POSX
}
^ê╣ = ~ÇÇ
}
{ NOBURN _VOLUME
I @Çû ^êº = $üâ THEN
^êº
^ê╣ = ~ÇÇ
}
{ ARL1_LOAD
@Ç¥ MECHOBURN 150
}
{ ARL2_LOAD
^ê╣ = 150
}
{ ARL3_LOAD
^ê╣ = 150
}
{ ELV_LOAD
O $Ç₧
^ê¿ = @Çë
^ê¿ 0
}
{ ELV2_LOAD
@Ç¥ MECHOBURN 100
I ^ç╣ == $üé THEN
{
^Ç▓ = 7
}
E
{
^Ç▓ = 0
}
}
{ HFR1_LOAD
@Ç¥ MECHOBURN 150
}
{ HFR2_LOAD
@Ç¥ MECHOBURN 150
}
{ HFR3_LOAD
@Ç¥ NOBURN 150
}
{ HFR4_LOAD
@Ç¥ MECHOBURN 150
}
{ HFR5_LOAD
@Ç¥ MECHOBURN 150
}
{ HFR6_LOAD
@Ç¥ NOBURN 150
}
{ DOOMED_L
@Ç¢ LEX
M FALLING 25 CONTINUE
}
[ AIRLOCK_DRA_OPEN
00:00 I ^é¥ != 1 THEN é
00:00 @Çå `Ç« 200
00:00 ^é¥ = 1
00:02 ^é¥ = 2
00:05 ^é¥ = 3
00:08 ^é¥ = 4
00:10 ^é¥ = 5
00:13 ^é¥ = 6
00:16 ^é¥ = 7
00:19 ^é¥ = 8
00:21 ^é¥ = 9
00:24 ^é¥ = 10
00:26 ^é¥ = 11
00:28 ^é¥ = 12
01:00 ^é¥ = 13
01:02 ^é¥ = 14
01:04 ^é¥ = 15
01:06 ^é¥ = 16
01:08 ^é¥ = 17
01:13 ^é¥ = 0
^ä│ = $âé
]
[ AIRLOCK_DRA_CLOSE
00:00 I ^é¥ != 0 THEN é
00:00 @Çå `Ç« 200
00:00 ^é¥ = 0
00:08 ^é¥ = 17
00:10 ^é¥ = 16
00:13 ^é¥ = 15
00:16 ^é¥ = 14
00:19 ^é¥ = 13
00:21 ^é¥ = 12
00:24 ^é¥ = 11
00:26 ^é¥ = 10
00:28 ^é¥ = 9
01:00 ^é¥ = 8
01:02 ^é¥ = 7
01:04 ^é¥ = 6
01:06 ^é¥ = 5
01:08 ^é¥ = 4
01:10 ^é¥ = 3
01:12 ^é¥ = 2
01:13 ^é¥ = 1
^ä│ = $ââ
]
[ AIRLOCK_DRB_OPEN
00:00 @Çå `Ç« 200
00:00 ^é₧ = 1
00:02 ^é₧ = 2
00:05 ^é₧ = 3
00:08 ^é₧ = 4
00:10 ^é₧ = 5
00:13 ^é₧ = 6
00:16 ^é₧ = 7
00:19 ^é₧ = 8
00:21 ^é₧ = 9
00:24 ^é₧ = 10
00:26 ^é₧ = 11
00:28 ^é₧ = 12
01:00 ^é₧ = 13
01:02 ^é₧ = 14
01:04 ^é₧ = 15
01:06 ^é₧ = 16
01:08 ^é₧ = 17
01:10 ^é₧ = 18
01:12 ^é₧ = 19
01:13 ^é₧ = 20
01:14 ^é₧ = 0
^éƒ = 0
]
[ AIRLOCK_DRB_CLOSE
00:00 @Çå `Ç« 200
00:00 ^é₧ = 0
00:01 ^é₧ = 20
00:02 ^é₧ = 19
00:05 ^é₧ = 18
00:08 ^é₧ = 17
00:10 ^é₧ = 16
00:13 ^é₧ = 15
00:16 ^é₧ = 14
00:19 ^é₧ = 13
00:21 ^é₧ = 12
00:24 ^é₧ = 11
00:26 ^é₧ = 10
00:28 ^é₧ = 9
01:00 ^é₧ = 8
01:02 ^é₧ = 7
01:04 ^é₧ = 6
01:06 ^é₧ = 5
01:08 ^é₧ = 4
01:10 ^é₧ = 3
01:12 ^é₧ = 2
01:13 ^é₧ = 1
^éƒ = 1
]
[ AIRLOCK_PAD6DOOR_CLOSE
00:00 @Çå `Ç« 200
00:00 ^éƒ = 0
00:01 ^éƒ = 20
00:02 ^éƒ = 19
00:05 ^éƒ = 18
00:08 ^éƒ = 17
00:10 ^éƒ = 16
00:13 ^éƒ = 15
00:16 ^éƒ = 14
00:19 ^éƒ = 13
00:21 ^éƒ = 12
00:24 ^éƒ = 11
00:26 ^éƒ = 10
00:28 ^éƒ = 9
01:00 ^éƒ = 8
01:02 ^éƒ = 7
01:04 ^éƒ = 6
01:06 ^éƒ = 5
01:08 ^éƒ = 4
01:10 ^éƒ = 3
01:12 ^éƒ = 2
01:13 ^éƒ = 1
^é₧ = 1
]
[ AIRLOCK_PAD6DOOR_OPEN
00:00 @Çå `Ç« 200
00:00 ^éƒ = 1
00:02 ^éƒ = 2
00:05 ^éƒ = 3
00:08 ^éƒ = 4
00:10 ^éƒ = 5
00:13 ^éƒ = 6
00:16 ^éƒ = 7
00:19 ^éƒ = 8
00:21 ^éƒ = 9
00:24 ^éƒ = 10
00:26 ^éƒ = 11
00:28 ^éƒ = 12
01:00 ^éƒ = 13
01:02 ^éƒ = 14
01:04 ^éƒ = 15
01:06 ^éƒ = 16
01:08 ^éƒ = 17
01:10 ^éƒ = 18
01:12 ^éƒ = 19
01:13 ^éƒ = 20
01:14 ^éƒ = 0
^é₧ = 0
]
[ ANIMATE_BIG_ARROWS
ó PAD1
:TOP
00:00 ^â╢ = 0
^â╖ = 0
00:10 ^â╢ = 1
^â╖ = 1
00:20 ^â╢ = 2
^â╖ = 2
01:00 ^â╢ = 3
^â╖ = 3
01:10 ^â╢ = 4
^â╖ = 4
01:20 ^â╢ = 5
^â╖ = 5
02:00 ò
J #Ç┐
]
//$ 26 - version number