home *** CD-ROM | disk | FTP | other *** search
/ Nibble Magazine / nib12.dsk / PGR2.bas < prev    next >
BASIC Source File  |  2023-02-26  |  405b  |  15 lines
  1. 10  LIST 
  2. 20  PRINT "PGR2": PRINT 
  3. 30  REM  ***********************
  4. 40  REM  *     SAVDEL DEMO     *
  5. 50  REM  *         PGR2        *
  6. 60  REM  *   APPLESOFT BASIC   *
  7. 70  REM  *    BY P.FRANCOIS    *
  8. 80  REM  * COPYRIGHT (C) 1982  *
  9. 90  REM  * BY MICRO-SPARC. INC *
  10. 100  REM ***********************
  11. 110  REM 
  12. 120 X =  FRE(0)
  13. 130  PRINT "THERE ARE NOW ";(65536 +X);" BYTES FREE "
  14. 140  PRINT A$(1)
  15. 150  END