home *** CD-ROM | disk | FTP | other *** search
/ Set of Apple II Hard Drive Images / eric.hdv / TEST / READ2PDL.BAS < prev    next >
BASIC Source File  |  2020-08-13  |  183b  |  7 lines
  1. 5  PRINT  CHR$(4)"BLOAD READ2PDL.OBJ"
  2. 10 A = 24576 +15 *256
  3. 15 B = 12 *4096 +6 *16 +1
  4. 20  CALL A
  5. 25 X =  PEEK(A +6) + PEEK(A +7):Y =  PEEK(A +8) + PEEK(A +9)
  6. 30  PRINT X,Y
  7. 40  GOTO 20