home *** CD-ROM | disk | FTP | other *** search
/ Nibble Magazine / nib40b.dsk / VAR.VIEWER.DEMO.bas < prev    next >
BASIC Source File  |  2023-02-26  |  580b  |  19 lines
  1. 10  REM   ******************************
  2. 20  REM   * VPU.TESTER                 *
  3. 30  REM   * BY GARY TERHUNE            *
  4. 40  REM   * COPYRIGHT(C) 1991          *
  5. 50  REM   * MINDCRAFT PUBL. CORP.      *
  6. 60  REM   * CONCORD, MA 01742          *
  7. 70  REM   ******************************
  8. 80 A = 5.76
  9. 90 A7 = 65536
  10. 100 B% = 21
  11. 110 XY% = 15
  12. 120 T$ = "TEST"
  13. 130 ST$ = "THIS IS A     "
  14. 140 D$ =  CHR$(4)
  15. 150  DIM XX%(100,80),AA(10),BB%(5),CC$(2)
  16. 160  FOR I = 1 TO 10:AA(I) = I *10: NEXT 
  17. 170  FOR I = 1 TO 5:BB%(I) = I: NEXT 
  18. 180 CC$(0) = "ZERO":CC$(1) = "ONE":CC$(2) = "TWO"
  19. 190  END