home *** CD-ROM | disk | FTP | other *** search
/ Amiga Format 39 / af039a.adf / myheader.i < prev    next >
Text File  |  1992-09-17  |  2KB  |  61 lines
  1. ******************************************************************************
  2. BLIT_WIDTH      =     2
  3. BLIT_HEIGHT     =     8
  4. BLOCKS_HIGH        =     25
  5. LINES_HIGH        =     BLOCKS_HIGH*8
  6. BLOCKS_WIDE        =   21
  7. ******************************************************************************
  8. NO_ROOMS        =    100
  9. ******************************************************************************
  10. TWO                =    1
  11. FOUR            =    2
  12. EIGHT            =    3
  13. SIXTEEN            =    4
  14. THIRTYTWO        =    5
  15. SIXTYFOUR        =    6
  16. ONETWOEIGHT        =    7
  17. TWOFIVESIX        =    8
  18. ******************************************************************************
  19. *****************************************************************************
  20. *    qmove                move a constant into a reg the quickest way (probbly)
  21. *    qmove.w    123,d0        note: if word or byte, will still use moveq!!! if it can
  22. qmove    macro
  23.         ifge    \1
  24.             ifle    \1-127
  25.                 moveq    #\1,\2
  26.                 mexit
  27.             endc
  28.             ifle    \1-255
  29.                 moveq    #256-\1,\2
  30.                 neg.b    \2
  31.                 mexit
  32.             endc
  33.                 move.\0    #\1,\2
  34.                 mexit
  35.         elseif
  36.             move.\0    #\1,\2
  37.         endc
  38.         endm
  39. *****************************************************************************
  40. BLIT_NASTY    macro
  41.                 move.w    #$8400,DMACON                blitter nasty on
  42.             endm
  43. *****************************************************************************
  44. BLIT_NICE    macro
  45.                 move.w    #$0400,DMACON                blitter nasty off
  46.             endm
  47. *****************************************************************************
  48. draw_block_line    macro
  49.     move.w    (a1)+,(a4)                        ;plane 0
  50.     move.w    (a1)+,PLANESIZE*1(a0)            ;plane 1
  51.     move.w    (a1)+,PLANESIZE*2(a0)            ;plane 2
  52.     move.w    (a1)+,PLANESIZE*3(a0)            ;plane 3
  53.     lea        SCREEN_WIDTH(a0),a0                ;move to next line of screen
  54.     endm
  55. **********************************************************************
  56. MAPWIDTH    =    8
  57. MAPHEIGHT    =    8
  58. **********************************************************************
  59. NO_STARS    =    32
  60. **********************************************************************
  61.