home *** CD-ROM | disk | FTP | other *** search
- ;Assembler header file for Quit
- ;written by DefMod (Jun 30 1995) on Tue Sep 5 15:14:56 1995
- ;Jonathan Coxhead, Acorn Computers Ltd
-
- [ :LNOT: :DEF: Get_Types
- GBLS Get_Types
- ]
- [ :LNOT: :DEF: Types_Hdr
- Get_Types SETS "GET OS:Hdr.Types"
- |
- Get_Types SETS ""
- ]
- $Get_Types
-
- [ :LNOT: :DEF: Quit_Hdr
- GBLS Quit_Hdr
-
- ;Symbols for constants
- Class_Quit * &82A90
- Quit_GenerateAboutToBeShown * &1
- Quit_GenerateDialogueCompleted * &2
- Quit_FileTypeIcon * &82A900
- Quit_Quit * &82A901
- Quit_Cancel * &82A902
- Action_QuitAboutToBeShown * &82A90
- Action_QuitQuit * &82A91
- Action_QuitDialogueCompleted * &82A92
- Action_QuitCancel * &82A93
-
- ;Symbols for structure offsets and sizes
- Quit_Flags * Bits
-
- ^ 0
- Quit_Object_flags # Quit_Flags
- Quit_Object_title # Toolbox_MsgReference
- Quit_Object_title_limit # Int
- Quit_Object_message # Toolbox_MsgReference
- Quit_Object_message_limit # Int
- Quit_Object_alternative_window_name # Toolbox_StringReference
- Quit_Object * @
-
- Quit_Full * OS_Coord
-
- ^ 0
- Quit_ActionAboutToBeShown_tag # Toolbox_PositionTag
- Quit_ActionAboutToBeShown_position * @
- Quit_ActionAboutToBeShown_position_top_left # OS_Coord
- ^ Quit_ActionAboutToBeShown_position
- Quit_ActionAboutToBeShown_position_full # Quit_Full
- Quit_ActionAboutToBeShown * @
-
-
- ;Symbols for SWI's and SWI reason codes
- XQuit_ClassSWI * &A2A90
- Quit_ClassSWI * &82A90
-
- XQuit_PostFilter * &A2A91
- Quit_PostFilter * &82A91
-
- XQuit_PreFilter * &A2A92
- Quit_PreFilter * &82A92
-
- Quit_GetWindowID * &0
- ;Entry
- ; R0 = flags (Bits)
- ; R1 = quit (Toolbox_O)
- ; R2 = &0
- ;Exit
- ; R0 = window (Toolbox_O)
-
- Quit_SetMessage * &1
- ;Entry
- ; R0 = flags (Bits)
- ; R1 = quit (Toolbox_O)
- ; R2 = &1
- ; R3 -> message (String)
-
- Quit_GetMessage * &2
- ;Entry
- ; R0 = flags (Bits)
- ; R1 = quit (Toolbox_O)
- ; R2 = &2
- ; R3 = buffer (pointer to String)
- ; R4 = size (Int)
- ;Exit
- ; R4 = used (Int)
-
- Quit_SetTitle * &3
- ;Entry
- ; R0 = flags (Bits)
- ; R1 = quit (Toolbox_O)
- ; R2 = &3
- ; R3 -> title (String)
-
- Quit_GetTitle * &4
- ;Entry
- ; R0 = flags (Bits)
- ; R1 = quit (Toolbox_O)
- ; R2 = &4
- ; R3 = buffer (pointer to String)
- ; R4 = size (Int)
- ;Exit
- ; R4 = used (Int)
-
- ]
- END
-