home *** CD-ROM | disk | FTP | other *** search
/ Nibble Magazine / nib35a.dsk / DECEMBER.1988 / TEXT.SHIFTER.FP.bas < prev   
BASIC Source File  |  2023-02-26  |  266b  |  4 lines
  1. 1  IF  PEEK( -1101) < >6  THEN  FOR I = 768 TO 815: READ J: POKE I,J: NEXT : CALL 768
  2. 2  DATA 165,103,133,0,165,104,133,1,160,1,177,0,240,33,160,4
  3. 3  DATA 177,0,240,13,48,8,201,96,144,4,41,95,145,0,200,208
  4. 4  DATA 239,160,0,177,0,170,200,177,0,133,1,134,0,208,223,96