Remstart

Данный пример показывает как добавить небольшой эффект, как в Max Payn - замеделение времени в Ваши программы.l

Remend

` Установки дисплея
set display mode 1024,768,16
sync on : hide mouse
sync rate 50
cls :
` Создаем объекты и задаем начальные параметы, m# должно быть равным 1 для назначения 1
make object cube 1,10
m#=1

` Это пример работы
text$ = "Bullet Time... Just like Max Payne..."
set text size 36
set text font "Comic Sans MS"

` Main Loop
do

x#=OBJECT ANGLE x(1)
y#=OBJECT ANGLE y(1)

` *m# добавляется после каждых значений объектов

x#=x#+1*m#
y#=y#+1*m#
x# = wrapvalue(x#)
y# = wrapvalue(y#)

ROTATE OBJECT 1,x#,y#,0

'Если нажат пробел активируется функция

if spacekey()=1
m#=0.2
Center Text 512,675,text$
else
m#=1
endif
sync
loop