; Моделирование движения объекта на
; наклонной плоскости с учётом гравитации.
; Регистр 1  - ускорение свободного падения (м/c2)
; Регистр 2 - угол наклона плоскости в градусах
; Регистр 3 - общее время полёта в секундах
; Вывод в регистры:
; Регистр 10 - прошедшее время (в секундах) на момент итерации
; Регистр 9 - скорость на данный момент
LOAD 1 9.81      ; Ускорение свободного падения (м/с2)
LOAD 2 30        ; Угол наклона плоскости в градусах
LOAD 3 10        ; Общее время полёта
LOAD 4 3.14159   ; Число pi
LOAD 5 180       ; Константа 180
LOAD 6 1         ; Для theta * (pi / 180) результат деления
LOAD 7 1         ; theta_rad = theta * (pi / 180) ТУТ theta_rad
LOAD 8 1         ; Ускорение вдоль наклонной плоскости
DIV 6 4 5        ; pi / 180
MUL 7 2 6        ; theta_rad
MUL 8 1 7        ; a = g * theta_rad
LOAD 9 0         ; v = 0
LOAD 10 1        ; Прошедшее время
LOAD 11 1        ; Константа 1
ADD 3 11         ; Добавляем к общему времени полёта 1
LOOPI 10 < 3     ; Цикл, пока не преодолено общее время полёта
MUL 9 8 10       ; Считаем скорость тела
ADD 10 11        ; Увеличиваем прошедшее время на 1
SLEEP 1000       ; Выжидаем 1 секунду.
END