home *** CD-ROM | disk | FTP | other *** search
- ;AAsm header file for DragASprite
- ;written by DefMod (Aug 8 1994) on Wed Sep 7 21:13:45 1994
-
- [ :LNOT: :DEF: Get_Types
- GBLS Get_Types
- Get_Types SETS "GET OS:Hdr.Types"
- |
- Get_Types SETS ""
- ]
- $Get_Types
-
- [ :LNOT: :DEF: Get_OS
- GBLS Get_OS
- Get_OS SETS "GET OS:Hdr.OS"
- |
- Get_OS SETS ""
- ]
- $Get_OS
-
- [ :LNOT: :DEF: Get_OSSpriteOp
- GBLS Get_OSSpriteOp
- Get_OSSpriteOp SETS "GET OS:Hdr.OSSpriteOp"
- |
- Get_OSSpriteOp SETS ""
- ]
- $Get_OSSpriteOp
-
- [ :LNOT: :DEF: DragASprite_Hdr
- GBLS DragASprite_Hdr
-
- ;Symbols for constants
- DragASprite_HPosLeft * &0
- DragASprite_HPosCentre * &1
- DragASprite_HPosRight * &2
- DragASprite_VPosBottom * &0
- DragASprite_VPosCentre * &4
- DragASprite_VPosTop * &8
- DragASprite_NoBound * &0
- DragASprite_BoundToWindow * &10
- DragASprite_GivenBBox * &20
- DragASprite_BoundSprite * &0
- DragASprite_BoundPointer * &40
- DragASprite_DropShadow * &80
- DragASprite_NoDither * &100
-
- ;Symbols for SWI's and SWI reason codes
- XDragASprite_Start * &62400
- DragASprite_Start * &42400
- ;Entry
- ; R0 = flags (Bits)
- ; R1 -> area (OSSpriteOp_Area)
- ; R2 -> sprite_name (String)
- ; R3 -> box (OS_Box)
- ; R4 -> bbox (OS_Box)
-
- XDragASprite_Stop * &62401
- DragASprite_Stop * &42401
-
- ]
- END
-