home *** CD-ROM | disk | FTP | other *** search
/ No Fragments Archive 4: The Falcon Archive / nf_archive_four_v1.0.iso / ARCHIVE / DEMOS / LAZER / LAZEROS.ZIP / LAZEROS / MAIN / DEMO.S next >
Text File  |  1995-04-16  |  727b  |  35 lines
  1. TRUE     = -1
  2. FALSE    = 0
  3.  
  4.  
  5.     rsset 0
  6.  
  7. SHOW_SCREEN    rs.l    1    ; active screen
  8. WORK_SCREEN    rs.l    1    ; next screen to display
  9. EXTRA_SCREEN    rs.l    1
  10. SCREEN_COUNT    rs.w    1    ; number of screens
  11. SCREEN_SWAP    rs.w    1    ; if set true, screens are swapped next vbl
  12.  
  13. PALETTE        rs.l    1    ; pointer to 256 color palette
  14. PALETTE_UPDATE    rs.w    1    ; if set true, palette is updated next vbl
  15.  
  16. COUNTER_ABS    rs.l    1    ; vbl-counter since music started
  17. COUNTER_REL    rs.l    1    ; vbl-counter since procedure init
  18.  
  19. SCRMODE        rs.l    1
  20. SCRMODE_UPDATE    rs.w    1
  21.  
  22. parameters    dc.l    0
  23.  
  24. demo_swapscreens MACRO
  25.     move.l    parameters,a0
  26.     move.w    #TRUE,SCREEN_SWAP(a0)
  27.     ENDM
  28.  
  29. RETURN MACRO
  30. *    jmp    \1
  31.     clr.w    -(sp)
  32.     move.l    #\1,-(sp)
  33.     move.w    #$2300,-(sp)
  34.     jmp    task_switch
  35.     ENDM