home *** CD-ROM | disk | FTP | other *** search
/ Falcon 030 Power 2 / F030_POWER2.iso / ST_STE / MAGS / ICTARI03.ARJ / ictari.03 / GFA / TUTORIAL / DOLOOP_2.GFA (.txt) < prev    next >
GFA-BASIC Atari  |  1989-07-29  |  496b  |  11 lines
  1. p&=TRUE                              !*** Boolean Test Representatives ***
  2. q&=FALSE                             !*** Using GFA 3 Only (16 Bit) Integers ***
  3. '
  4. DO UNTIL NOT p&                      !*** Same As WHILE p% ... WEND ***
  5.   PRINT " CTRL, ALT, left SHIFT is only way out!"
  6. LOOP UNTIL q&                        !*** Same As REPEAT ... UNTIL q% ***
  7. '
  8. PRINT CHR$(7);
  9. ~INP(2)                              !*** Using GFA 3 Only VOID ***
  10. EDIT
  11.