- 331
- 35
Tram:
{$CLEO .dll}
{NOSOURCE}
//-------------MAIN---------------
0000: NOP
wait 0
Model.Load(#TRAM)
038B: load_requested_models
:NONAME_13
wait 0
if
Model.Available(#TRAM)
else_jump @NONAME_13
:NONAME_33
wait 0
if
Player.Defined($PLAYER_CHAR)
else_jump @NONAME_33
wait 1000
06D8: $TRAIN = create_train_at -2006.57 126.842 27.5391 type 9 direction 1
06DD: set_train $TRAIN speed 0.0
06DC: set_train $TRAIN acc 0.0
06D7: enable_train_traffic 9000
wait 1000
jump @NONAME_119
:NONAME_119
wait 0
if and
0203: actor $PLAYER_ACTOR near_car $TRAIN radius 8.0 8.0 flag 0 on_foot
0AB0: key_pressed 13
else_jump @NONAME_168
05CB: AS_actor $PLAYER_ACTOR enter_car $TRAIN as_driver -1 ms
:NONAME_168
wait 0
if and
not Actor.InCar($PLAYER_ACTOR, $TRAIN)
0AB0: key_pressed 104
else_jump @NONAME_205
06DC: set_train $TRAIN acc 35.0
:NONAME_205
wait 0
if and
not Actor.InCar($PLAYER_ACTOR, $TRAIN)
0AB0: key_pressed 98
else_jump @NONAME_242
06DC: set_train $TRAIN acc -35.0
:NONAME_242
wait 0
if and
not Actor.InCar($PLAYER_ACTOR, $TRAIN)
0AB0: key_pressed 101
else_jump @NONAME_289
06DD: set_train $TRAIN speed 0.0
06DC: set_train $TRAIN acc 0.0
:NONAME_289
wait 0
if
0981: train $TRAIN wrecked
else_jump @NONAME_119
Car.RemoveReferences($TRAIN)
jump @NONAME_321
:NONAME_321
wait 1000
06D8: $TRAIN = create_train_at -2006.57 126.842 27.5391 type 8 direction 1
06DD: set_train $TRAIN speed 0.0
06DC: set_train $TRAIN acc 0.0
06D7: enable_train_traffic 9000
wait 1000
jump @NONAME_387
:NONAME_387
wait 0
if and
0203: actor $PLAYER_ACTOR near_car $TRAIN radius 8.0 8.0 flag 0 on_foot
0AB0: key_pressed 13
else_jump @NONAME_436
05CB: AS_actor $PLAYER_ACTOR enter_car $TRAIN as_driver -1 ms
:NONAME_436
wait 0
if and
not Actor.InCar($PLAYER_ACTOR, $TRAIN)
0AB0: key_pressed 104
else_jump @NONAME_473
06DC: set_train $TRAIN acc 35.0
:NONAME_473
wait 0
if and
not Actor.InCar($PLAYER_ACTOR, $TRAIN)
0AB0: key_pressed 98
else_jump @NONAME_510
06DC: set_train $TRAIN acc -35.0
:NONAME_510
wait 0
if and
not Actor.InCar($PLAYER_ACTOR, $TRAIN)
0AB0: key_pressed 101
else_jump @NONAME_557
06DD: set_train $TRAIN speed 0.0
06DC: set_train $TRAIN acc 0.0
:NONAME_557
wait 0
if
0981: train $TRAIN wrecked
else_jump @NONAME_387
Car.RemoveReferences($TRAIN)
jump @NONAME_33