home *** CD-ROM | disk | FTP | other *** search
/ Power-Programmierung / CD1.mdf / magazine / pcmagazi / 1991 / 07 / speedsav.bas < prev    next >
BASIC Source File  |  1991-03-04  |  289b  |  5 lines
  1. DIM Array!(1 TO 10000)            'create a 40000 byte array
  2. DEF SEG = VARSEG(Array!(1))       'use the segment where the array starts
  3. BSAVE "savetest.dat", 0, 40000    'save 40000 bytes starting at address 0
  4. BLOAD "savetest.dat", 0           'now reload it again at the same address
  5.