Тема: RFO BASIC
Показать сообщение отдельно
Старый 13.08.2015, 11:10   #16
1961uvg
Нуждающийся
 
Регистрация: 28.07.2015
Сообщений: 55
Написано одно полезное сообщение
Ответ: RFO BASIC

Пример:
REM Start of BASIC! Program
gr.open 255,255,255,255
gr.color 255,25,0,255,0
gr.rect rct1,50,40,60,15
gr.render
for i=50 to 100 step 1
gr.modify rct1, "left", i
gr.modify rct1, "right", (i+10)
gr.render
pause 1
next
pause 1
gr.close
END
(Offline)
 
Ответить с цитированием