home *** CD-ROM | disk | FTP | other *** search
/ Generous Efforts of Many / gemcd.zip / GEM.CD.A.po / FEATURES:BEAGLE / FONTMECH.PRO.S1 / FONT.MECHANIC / FP.bas < prev    next >
BASIC Source File  |  2000-01-01  |  416b  |  9 lines
  1. 10  CALL 48888: REM RELEASE BUFFERS
  2. 20  PRINT  CHR$(21): REM TURN OFF 80 COLUMNS
  3. 30  PRINT  CHR$(4)"IN#0": PRINT  CHR$(4)"PR#0": REM RESET I/O 
  4. 40  POKE 48647,158: POKE 48648,190: REM RESET EXTRNCMD
  5. 50  POKE 1014,3: POKE 1015,190: REM RESET AMPERSAND
  6. 60  POKE 103,1: POKE 104,8: POKE 2048,0: REM RESET PROGSTART
  7. 70  FOR I = 48985 TO 49002: POKE I,0: NEXT : REM FIX BIT MAP
  8. 80  POKE 49003,63: REM FIX BIT MAP
  9. 90  NEW