home *** CD-ROM | disk | FTP | other *** search
/ Amiga Developer CD 2.1 / Amiga Developer CD v2.1.iso / Reference / DevCon / Atlanta_1990 / Atlanta-Devcon.3 / Debug / debugger / s / Wack / graphics.macros < prev    next >
Encoding:
Text File  |  1992-08-26  |  5.7 KB  |  151 lines
  1. ;graphics.macros V1.5
  2.  
  3. ;GRAPHICS GfxBase structure
  4. (macro GfxBase
  5.     (Node (@l (+ (@l 4) 17a)))  ;ExecBase.LibList
  6.     (while (and (!= (strcmp (@l ln_Name) "graphics.library") 0)
  7.       (!= (@l ln_Succ) 0))
  8.         (Node (@l ln_Succ)))
  9.  
  10.     (addsymbol gb_LibNode ln_Succ)
  11.     (addsymbol gb_ActiView (+ gb_LibNode 22))
  12.     (addsymbol gb_copinit (+ gb_ActiView 4))
  13.     (addsymbol gb_cia (+ gb_copinit 4))
  14.     (addsymbol gb_blitter (+ gb_cia 4))
  15.     (addsymbol gb_LOFlist (+ gb_blitter 4))
  16.     (addsymbol gb_SHFlist (+ gb_LOFlist 4))
  17.     (addsymbol gb_blthd (+ gb_SHFlist 4))
  18.     (addsymbol gb_blttl (+ gb_blthd 4))
  19.     (addsymbol gb_bsblthd (+ gb_blttl 4))
  20.     (addsymbol gb_bsblttl (+ gb_bsblthd 4))
  21.     (addsymbol gb_vbsrv (+ gb_bsblttl 4))
  22.     (addsymbol gb_timsrv (+ gb_vbsrv 16))
  23.     (addsymbol gb_bltsrv (+ gb_timsrv 16))
  24.     (addsymbol gb_TextFonts (+ gb_bltsrv 16))
  25.     (addsymbol gb_DefaultFont (+ gb_TextFonts e))
  26.     (addsymbol gb_Modes (+ gb_DefaultFont 4))
  27.     (addsymbol gb_VBlank (+ gb_Modes 2))
  28.     (addsymbol gb_Debug (+ gb_VBlank 1))
  29.     (addsymbol gb_BeamSync (+ gb_Debug 1))
  30.     (addsymbol gb_system_bplcon0 (+ gb_BeamSync 2))
  31.     (addsymbol gb_SpriteReserved (+ gb_system_bplcon0 2))
  32.     (addsymbol gb_bytereserved (+ gb_SpriteReserved 1))
  33.     (addsymbol gb_Flags (+ gb_bytereserved 1))
  34.     (addsymbol gb_BlitLock (+ gb_Flags 2))
  35.     (addsymbol gb_BlitNest (+ gb_BlitLock 2))
  36.     (addsymbol gb_BlitWaitQ (+ gb_BlitNest 2))
  37.     (addsymbol gb_BlitOwner (+ gb_BlitWaitQ e))
  38.     (addsymbol gb_TOF_WaitQ (+ gb_BlitOwner 4))
  39.     (addsymbol gb_DisplayFlags (+ gb_TOF_WaitQ e))
  40.     (addsymbol gb_SimpleSprites (+ gb_DisplayFlags 2))
  41.     (addsymbol gb_MaxDisplayRow (+ gb_SimpleSprites 4))
  42.     (addsymbol gb_MaxDisplayColumn (+ gb_MaxDisplayRow 2))
  43.     (addsymbol gb_NormalDisplayRows (+ gb_MaxDisplayColumn 2))
  44.     (addsymbol gb_NormalDisplayColumns (+ gb_NormalDisplayRows 2))
  45.     (addsymbol gb_NormalDPMX (+ gb_NormalDisplayColumns 2))
  46.     (addsymbol gb_NormalDPMY (+ gb_NormalDPMX 2))
  47.     (addsymbol gb_LastChanceMemory (+ gb_NormalDPMY 2))
  48.     (addsymbol gb_LCMptr (+ gb_LastChanceMemory 4))
  49.     (addsymbol gb_MicrosPerLine (+ gb_LCMptr 4))
  50.     (addsymbol gb_reserved (+ gb_MicrosPerLine 2))
  51. )
  52.  
  53. ;GRAPHICS Layer structure
  54. (macro Layer
  55.     (if (!= (nargs) 0)
  56.     (addsymbol l_front (arg 1))
  57.     (addsymbol l_front (current)))
  58.     (addsymbol l_back (+ l_front 4))
  59.     (addsymbol l_ClipRect (+ l_back 4))
  60.     (addsymbol l_rp (+ l_ClipRect 4))
  61.     (addsymbol l_bounds (+ l_rp 4))
  62.     (addsymbol l_reserved (+ l_bounds 8))
  63.     (addsymbol l_priority (+ l_reserved 4))
  64.     (addsymbol l_Flags (+ l_priority 2))
  65.     (addsymbol l_SuperBitMap (+ l_Flags 2))
  66.     (addsymbol l_SuperClipRect (+ l_SuperBitMap 4))
  67.     (addsymbol l_Window (+ l_SuperClipRect 4))
  68.     (addsymbol l_Scroll_X (+ l_Window 4))
  69.     (addsymbol l_Scroll_Y (+ l_Scroll_X 2))
  70.     (addsymbol l_cr (+ l_Scroll_Y 2))
  71.     (addsymbol l_cr2 (+ l_cr 4))
  72.     (addsymbol l_crnew (+ l_cr2 4))
  73.     (addsymbol l_SuperSaveClipRects (+ l_crnew 4))
  74.     (addsymbol l__cliprects (+ l_SuperSaveClipRects 4))
  75.     (addsymbol l_LayerInfo (+ l__cliprects 4))
  76.     (addsymbol l_Lock (+ l_LayerInfo 4))
  77.     (addsymbol l_reserved3 (+ l_Lock 2e))
  78.     (addsymbol l_ClipRegion (+ l_reserved3 8))
  79.     (addsymbol l_saveClipRects (+ l_ClipRegion 4))
  80.     (addsymbol l_reserved2 (+ l_saveClipRects 4))
  81.     (addsymbol l_DamageList (+ l_reserved2 16))
  82. )
  83.  
  84. ;GRAPHICS Layer_Info structure
  85. (macro Layer_Info
  86.     (if (!= (nargs) 0)
  87.     (addsymbol li_top_layer (arg 1))
  88.     (addsymbol li_top_layer (current)))
  89.     (addsymbol li_check_lp (+ li_top_layer 4))
  90.     (addsymbol li_obs (+ li_check_lp 4))
  91.     (addsymbol li_FreeClipRects (+ li_obs 4))
  92.     (addsymbol li_Lock (+ li_FreeClipRects c))
  93.     (addsymbol li_gs_Head (+ li_Lock 2e))
  94.     (addsymbol li_longreserved (+ li_gs_Head e))
  95.     (addsymbol li_Flags (+ li_longreserved 4))
  96.     (addsymbol li_fatten_count (+ li_Flags 2))
  97.     (addsymbol li_LockLayersCount (+ li_fatten_count 1))
  98.     (addsymbol li_LayerInfo_extra_size (+ li_LockLayersCount 1))
  99.     (addsymbol li_blitbuff (+ li_LayerInfo_extra_size 2))
  100.     (addsymbol li_LayerInfo_extra (+ li_blitbuff 4))
  101. )
  102.  
  103. ;show some important GfxBase members
  104. (macro gfxbase
  105.     (GfxBase)
  106.     (print "GfxBase at %8lx\n" gb_LibNode)
  107.     (print "Modes: %04lx\n" (@ gb_Modes))
  108.     (print "Flags: %04lx, DisplayFlags: %04lx\n\n"
  109.       (@ gb_Flags) (@ gb_DisplayFlags))
  110.     (print "ActiView at %8lx\n" (@l gb_ActiView))
  111.     (print "LOFlist at %8lx, SHFlist at %8lx\n"
  112.       (@l gb_LOFlist) (@l gb_SHFlist))
  113.     (print "Top of Display size stuff at %8lx\n" gb_MaxDisplayRow)
  114.     (print "SpriteReserved: %02lx\n" (@b gb_SpriteReserved))
  115.     (print "BlitLock: %04lx, BlitNest: %04lx\n"
  116.       (@ gb_BlitLock) (@ gb_BlitNest))
  117.     (print "BlitOwner at %8lx, BlitWaitQ at %8lx\n"
  118.       (@l gb_BlitOwner) gb_BlitWaitQ)
  119.     (print "LastCHanceMemory at %8lx\n" (@l gb_LastChanceMemory))
  120.     (print "LastCHanceMemory ptr %8lx\n" (@l gb_LCMptr))
  121.     (print "Debug (byte) at %8lx\n" gb_Debug)
  122. )
  123.  
  124. ;format given address or current frame as a Layer structure
  125. (macro layer
  126.     (if (!= (nargs) 0)
  127.     (Layer (arg 1))
  128.     (Layer (current)))
  129.     (print "Layer at %8lx\n" l_front)
  130.     (print "Bounds: MinX = %ld, MinY = %ld, MaxX = %ld, MaxY = %ld\n"
  131.       (@ l_bounds) (@ (+ l_bounds 2)) (@ (+ l_bounds 4)) (@ (+ l_bounds 6)))
  132.     (print "Flags: %04lx\n" (@ l_Flags))
  133.     (print "Window at %8lx\n" (@l l_Window))
  134.     (print "Lock at %8lx\n" l_Lock)
  135.     (print "DamageList at %8lx\n"  (@l l_DamageList))
  136. )
  137.  
  138. ;format given address or current frame as a Layer_Info structure
  139. (macro linfo
  140.     (if (!= (nargs) 0)
  141.     (Layer_Info (arg 1))
  142.     (Layer_Info (current)))
  143.     (print "Layer_Info at %8lx\n" li_top_layer)
  144.     (print "Flags: %04lx\n" (@ li_Flags))
  145.     (print "top_layer at %8lx\n" (@l li_top_layer))
  146.     (print "layer info lock at %8lx\n" li_Lock)
  147.     (print "semaphore list gs_Head at %8lx\n" li_gs_Head)
  148. )
  149.  
  150.  
  151.