home *** CD-ROM | disk | FTP | other *** search
/ Turbo Toolbox / Turbo_Toolbox.iso / tryqb / examples / ballxor.bas (.txt) < prev    next >
Encoding:
QuickBASIC Tokenized Source  |  1989-12-04  |  2.0 KB  |  30 lines
  1. GetArraySize
  2. WLeft
  3. WRight
  4. WBottom
  5.     ArraySize
  6. Array
  7. Pattern
  8. StepSize
  9.     StartLoop
  10. Decay
  11. EndLoop
  12. Pause
  13. VLeft
  14. VRight
  15. VBottom
  16. RectHeight
  17.     RectWidth
  18. ByteSize
  19.  The rectangle is smaller than the one in the previous
  20.  program, which means Array is also smaller:
  21. Press any key to end
  22.  The first PUT statement places the image on
  23.  the screen:
  24.  An empty FOR...NEXT loop to delay the program and
  25.  reduce image flicker:
  26. fff?p
  27.  The second PUT statement erases the image and
  28.  restores the background: 
  29. GetArraySize
  30.