b_book1.gif (162 bytes) Guides

Quick basic

..to first page ..to previous page [1]  

WHILE example 
   

x

    1 2 3 4
y 1   *    
2        
3        
4        

p = 0
x=2: y=1: xi = 1: yi=0
CLS
WHILE p < 10 DO
  BEGIN
    x = x + xi
    y = y + yi
    IF (x = 4) OR (x = 1) THEN xi = -1 * xi
    p = p + 1
    LOCATE (x,y): PRINT "*"
  END

X
.
X

.

X

.

[Rev: 02/02/00] 02/2/00 © 2000 V/2-Com (Verhaart), P O Box 8415, Havelock North, New Zealand.