{$VERSION 3.1.0027}
{$CLEO .cs}

//-------------MAIN---------------
thread "Cicl"
:Cicl
wait 0
if and
not actor.Dead($PLAYER_ACTOR)
not actor.Driving($PLAYER_ACTOR)
0AB0: key_pressed 0xD  //проверки на то, что игрок жив, не в авто, и на нажатие клавиши "Enter"
jf @Cicl
actor.StorePos($PLAYER_ACTOR,2@,3@,4@) //сохраняем текущие координаты игрока в переменные
02CE: 4@ = ground_z_at 2@ 3@ 4@ //получаем координату поверхности, чтобы действие не происходило в воздухе
//начало самого таймера, то есть простого цикла, известного многим по школьному курсу программирования (в Turbo Pascal)
for 1@ = 15 downto 0  //берем downto, чтобы счет шел от большего к меньшему
01E5: show_text_1number_highpriority GXT 'VAR' number 1@ time 1000 flag 1  //выводим значение переменной (секунды), которая в цикле изменяется с 15 до 0
wait 1000 //ждем 1 секунду, иначе таймер закончится сразу же, да и таймер в секундах
end //конец цикла, это и конец таймера
020C: create_explosion_with_radius 10 at 2@ 3@ 4@ //создаем два больших взрыва
020C: create_explosion_with_radius 6 at 2@ 3@ 4@  
wait 750  //ждем 750 мс, чтобы игрок не сразу мог перезапустить скрипт
  jump @Cicl //идем на начало  

0A96: 13@ = actor $PLAYER_ACTOR struct  
13@ += 1432  
0A8C: write_memory 13@ size 1 value 1 virtual_protect 0