home *** CD-ROM | disk | FTP | other *** search
/ No Fragments Archive 10: Diskmags / nf_archive_10.iso / MAGS / STESTOS / STESTOS1.MSA / TUTORIAL.BAS / BLITTER.P1 / BLITC1.BAS (.txt) next >
Atari STOS Basic  |  1995-01-09  |  762b  |  22 lines
  1. 10 PRINT
  2. 100 EXTENSION (Index #6) (Token 0xac)
  3. 110 IF
  4. 120 REM HECK THAT BLITTER IS FINISHED WORKING
  5. 130 REM 
  6. 150 IF
  7. 160 EXTENSION (Index #6) (Token 0xac)
  8. 165 REM COPY THE IMAGE TO THE MOUSE COORDINATES
  9. 180 IF
  10. 190 REM HECK THAT BLITTER IS FINISHED
  11. 20 PRINT
  12. 200 SCREEN SWAP
  13. 210 GOTO
  14. 220 UNKNOWN OP: 0x3A
  15. 30 PRINT
  16. 40 MODE
  17. 50 RESERVE
  18. 60 LOAD
  19. 70 GET PALETTE
  20. 80 REM       ****** MAIN LOOP ******
  21. 90 REM      -------------------------
  22.