Rem Project: Dark Basic Pro Project
Rem Created: Saturday, July 17, 2021

Rem ***** Main Source File *****
Rem переменная для объека автомобиля
car=1

Rem пнрнменные, для позиция 3d модели автомобиля
y as float
z as float

Rem инициализация координат 3d модели автомобиля
y=0
z=0
Rem загрузка 3d модели автомобиля
load object "car4.3ds", car
do
 sync
 Rem вращем 3d модель автомобиля
 rotate object car, 0, y, 0
 Rem перемещаем 3d модель автомобиля
 position object car, 0, 0, z
 Rem ждём 5 мсек.
 wait 5
 Rem если нажаты клавиши, то перемещаем или вращаем 3d модель автомобиля
 if downkey() = 1 then z=z+0.1
 if upkey() = 1 then z=z-0.1
 if leftkey() = 1 then y=y+1
 if rightkey() = 1 then y=y-1
 if y > 359 then y=0
loop
Rem удаляем 3d модель автомобиля
delete object car
Rem конец
end