Бомба

Нажмите "Оглянуться"+"Действие" для активации скрипта. Высоко в небе появится бомба, которая будет падать вниз (логично, не так ли). Когда она упадет, произойдет большой взрыв.

:Test
wait 10
model.Load(1636)
038B: load_requested_models

:Test2
wait 10
if and
player.Defined($PLAYER_CHAR)
not actor.Dead($PLAYER_ACTOR)
not actor.Driving($PLAYER_ACTOR)
model.Available(1636)
00E1:   player 0 pressed_key 19
00E1:   player 0 pressed_key 4
jf @Test2
04C4: store_coords_to 1@ 2@ 3@ from_actor $PLAYER_ACTOR with_offset 0.0 3.0 75.0
object.Create(7@,1636,1@,2@,3@)
object.ToggleInMovingList(7@,1)
object.CollisionDetection(7@,1)
04D9: object 7@ set_scripted_collision_check 1
wait 50
jump to @Test3

:Test3
wait 10
if or
04E7:   object 7@ in_water
04DA:   has_object 7@ collided
jf @Test3
object.StorePos(7@,1@,2@,3@)
0400: store_coords_to 4@ 5@ 6@ from_object 7@ with_offset 0.0 1.0 0.0
0400: store_coords_to 8@ 9@ 10@ from_object 7@ with_offset 0.0 -1.0 0.0
0400: store_coords_to 11@ 12@ 13@ from_object 7@ with_offset 1.0 0.0 0.0
0400: store_coords_to 14@ 15@ 16@ from_object 7@ with_offset -1.0 0.0 0.0
0948: create_explosion_at 1@ 2@ 3@ type 10 camera_shake 2.0
0948: create_explosion_at 1@ 2@ 3@ type 1 camera_shake 2.0
0948: create_explosion_at 1@ 2@ 3@ type 4 camera_shake 2.0
0948: create_explosion_at 4@ 5@ 6@ type 10 camera_shake 2.0
0948: create_explosion_at 4@ 5@ 6@ type 1 camera_shake 2.0
0948: create_explosion_at 4@ 5@ 6@ type 4 camera_shake 2.0
0948: create_explosion_at 8@ 9@ 10@ type 10 camera_shake 2.0
0948: create_explosion_at 8@ 9@ 10@ type 1 camera_shake 2.0
0948: create_explosion_at 8@ 9@ 10@ type 4 camera_shake 2.0
0948: create_explosion_at 11@ 12@ 13@ type 10 camera_shake 2.0
0948: create_explosion_at 11@ 12@ 13@ type 1 camera_shake 2.0
0948: create_explosion_at 11@ 12@ 13@ type 4 camera_shake 2.0
0948: create_explosion_at 14@ 15@ 16@ type 10 camera_shake 2.0
0948: create_explosion_at 14@ 15@ 16@ type 1 camera_shake 2.0
0948: create_explosion_at 14@ 15@ 16@ type 4 camera_shake 2.0
object.Destroy(7@)
object.RemoveReferences(7@)
wait 10
model.Destroy(1636)
wait 1000
jump to @Test