home *** CD-ROM | disk | FTP | other *** search
/ Club Amiga de Montreal - CAM / CAM_CD_1.iso / files / 224a.lha / Includes / graphics / gels < prev    next >
Encoding:
Text File  |  1989-04-08  |  2.8 KB  |  137 lines
  1.  
  2. EQU SUSERFLAGS  $00FF
  3. EQU VSPRITE     $0001
  4. EQU SAVEBACK    $0002
  5. EQU OVERLAY     $0004
  6. EQU MUSTDRAW    $0008
  7. EQU BACKSAVED   $0100
  8. EQU BOBUPDATE   $0200
  9. EQU GELGONE     $0400
  10. EQU VSOVERFLOW  $0800
  11.  
  12. EQU BUSERFLAGS  $00FF
  13. EQU SAVEBOB     $0001
  14. EQU BOBISCOMP   $0002
  15. EQU BWAITING    $0100
  16. EQU BDRAWN      $0200
  17. EQU BOBSAWAY    $0400
  18. EQU BOBNIX      $0800
  19. EQU SAVEPRESERVE $1000
  20. EQU OUTSTEP     $2000
  21.  
  22. EQU ANFRACSIZE  6
  23. EQU ANIMHALF    $0020
  24. EQU RINGTRIGGER $0001
  25.  
  26. {s VSprite
  27.     APTR    NextVSprite
  28.     APTR    PrevVSprite
  29.     APTR    DrawPath
  30.     APTR    ClearPath
  31.     WORD    Oldy
  32.     WORD    Oldx
  33.     WORD    Flags
  34.     WORD    Y
  35.     WORD    X
  36.     WORD    Height
  37.     WORD    Width
  38.     WORD    Depth
  39.     WORD    MeMask
  40.     WORD    HitMask
  41.     APTR    ImageData
  42.     APTR    BorderLine
  43.     APTR    CollMask
  44.     APTR    SprColors
  45.     APTR    VSBob
  46.     BYTE    PlanePick
  47.     BYTE    PlaneOnOff
  48.     LONGS   0 VUserExt
  49.    s}
  50.  
  51. {s Bob
  52.     WORD    Flags
  53.     APTR    SaveBuffer
  54.     APTR    ImageShadow
  55.     APTR    Before
  56.     APTR    After
  57.     APTR    BobVSprite
  58.     APTR    BobComp
  59.     APTR    DBuffer
  60.     LONGS   0 BUserExt
  61.    s}
  62.  
  63. {s AnimComp
  64.     WORD    Flags
  65.     WORD    Timer
  66.     WORD    TimeSet
  67.     APTR    NextComp
  68.     APTR    PrevComp
  69.     APTR    NextSeq
  70.     APTR    PrevSeq
  71.     APTR    AnimCRoutine
  72.     WORD    YTrans
  73.     WORD    XTrans
  74.     APTR    HeadOb
  75.     APTR    AnimBob
  76.    s}
  77.  
  78. {s AnimOb
  79.     APTR    NextOb
  80.     APTR    PrevOb
  81.     LONG    Clock
  82.     WORD    AnOldY
  83.     WORD    AnOldX
  84.     WORD    AnY
  85.     WORD    AnX
  86.     WORD    YVel
  87.     WORD    XVel
  88.     WORD    YAccel
  89.     WORD    XAccel
  90.     WORD    RingYTrans
  91.     WORD    RingXTrans
  92.     APTR    AnimORoutine
  93.     APTR    HeadComp
  94.     LONGS   0 AUserExt
  95.    s}
  96.  
  97. {s DBufPacket
  98.     WORD    BufY
  99.     WORD    BufX
  100.     APTR    BufPath
  101.     APTR    BufBuffer
  102.     APTR    BufPlanes
  103.    s}
  104.  
  105. \\ Two macro's missing: InitAnimate and RemBob
  106.  
  107. EQU  B2NORM   0
  108. EQU  B2SWAP   1
  109. EQU  B2BOBBER 2
  110.  
  111. {s collTable
  112.     LONGS 16 collPtrs
  113.    s}
  114.  
  115.  
  116. >Graphics   -162 (r A1 A0 r) Animate (s rp animKey -- )
  117.  
  118. >Graphics   -156 (r A3 A1 A0 r) AddAnimOb (s rp animKey animOb -- )
  119. >Graphics   -174 (r A0 r)       InitGMasks (s animob -- )
  120.  
  121. >Graphics   -600 (r A1 A0 D0 r) FreeGBuffers (s rp animOb dbuffer -- )
  122. >Graphics ^ -168 (r A1 A0 D0 r) GetGBuffers (s rp animob dbuffer -- f )
  123. >Graphics   -120 (r A2 A1 A0 r) InitGels (s ginfo tail head -- )
  124. >Graphics   -114 (r A1 A0 r)    DrawGList (s rp vp -- )
  125. >Graphics   -150 (r A1 r)       SortGList (s rp -- )
  126.  
  127. >Graphics   -096 (r A1 A0 r)    AddBob  (s rp bob --  )
  128. >Graphics   -132 (r A2 A1 A0 r) RemIBob (s vp rp bob -- )
  129.  
  130. >Graphics   -102 (r A1 A0 r) AddVSprite (s rp vSprite -- )
  131. >Graphics   -126 (r A0 r)    InitMasks  (s vSprite -- )
  132. >Graphics   -138 (r A0 r)    RemVSprite (s vSprite -- )
  133.  
  134. >Graphics   -144 (r A1 A0 D0 r) SetCollision (s ginfo routine n -- )
  135. >Graphics   -108 (r A1 r)       DoCollision  (s rasPort -- )
  136.  
  137.