понедельник, 24 января 2011 г.

Циклы в Simple Basic

Простейший цикл построен на метках и сильно охаянной команды GoTo
Синтаксис


metka:
...код...
Goto metka 


Дойдя до команды Goto, программа перепрыгнет на указанную метку. Цикл, епт...


Цикл For
For i=1 To N Step N
...код...
Endfor


Пример нубкода с циклом For (заполняет экран цветными линиями)

GraphicsWindow.BackgroundColor = "Black"
GraphicsWindow.Width = 600
GraphicsWindow.Height =400
For i=1 To 1000
x1=20+Math.GetRandomNumber(560)
x2=20+Math.GetRandomNumber(560)
y1=20+Math.GetRandomNumber(360)
y2=20+Math.GetRandomNumber(360)
GraphicsWindow.PenColor = GraphicsWindow.GetRandomColor()
GraphicsWindow.DrawLine(x1, y1, x2, y2)
EndFor



















Цикл While
While (условия)
...код...
EndWhile

Комментариев нет:

Отправить комментарий