Ответ: RFO BASIC
Пример:
REM Start of BASIC! Program
gr.open 255,255,255,255
gr.color 255,250,0,255,0
gr.orientation 1
gr.text.draw txt1, 1, 60, "My current 'x' position is 1"
for i=1 to 100 step 1
gr.modify txt1, "x", i
gr.modify txt1, "text", "My current 'x' position is " + str$(i)
gr.render
pause 1
next
pause 1000
gr.close
END
|