;Assembler header file for DragASprite
;written by DefMod (Jan  2 2007) on Tue Jan  2 11:56:37 2007
;Jonathan Coxhead, jonathan@doves.demon.co.uk, 12 May 1995

        [       :LNOT: :DEF: DragASprite_Hdr
        GBLS    DragASprite_Hdr

        [       :LNOT: :DEF: Get_Types
        GBLS    Get_Types
        ]
        [       :LNOT: :DEF: Types_Hdr
Get_Types                       SETS    "GET oslib/Types.Hdr"
        |
Get_Types                       SETS    ""
        ]
        $Get_Types

        [       :LNOT: :DEF: Get_OS
        GBLS    Get_OS
        ]
        [       :LNOT: :DEF: OS_Hdr
Get_OS                          SETS    "GET oslib/OS.Hdr"
        |
Get_OS                          SETS    ""
        ]
        $Get_OS

        [       :LNOT: :DEF: Get_OSSpriteOp
        GBLS    Get_OSSpriteOp
        ]
        [       :LNOT: :DEF: OSSpriteOp_Hdr
Get_OSSpriteOp                  SETS    "GET oslib/OSSpriteOp.Hdr"
        |
Get_OSSpriteOp                  SETS    ""
        ]
        $Get_OSSpriteOp

;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
DragASprite_SystemSpriteArea    *       &0
DragASprite_WimpSpriteArea      *       &1

;Symbols for structure offsets and sizes
                                ^       0
                                #       Bits
DragASprite_Flags               *       @


;Symbols for SWI's and SWI reason codes
XDragASprite_Start              *       &62400
DragASprite_Start               *       &42400
   ;Entry
   ;  R0 = flags (DragASprite_Flags)
   ;  R1 -> area (OSSpriteOp_Area)
   ;  R2 -> sprite_name (String)
   ;  R3 -> box (OS_Box)
   ;  R4 -> bbox (OS_Box)

XDragASprite_Stop               *       &62401
DragASprite_Stop                *       &42401

        ]
        END
