та, есть только

cls
screen 12

10
line (100,100)-(400,400)

if chocho=1 then print "111"
else goto 10
circle (200,300),10,2
end

остальные кроме вижуал бэйсика - уг