SUBT    Service call info. => &.Hdr.Services

OldOpt  SETA    {OPT}
        OPT     OptNoList+OptNoP1List

; ***********************************
; ***    C h a n g e   L i s t    ***
; ***********************************

; Date       Name  Description
; ----       ----  -----------
; 27-Nov-86  BC    Added 'Service_Memory' and 'Service_Reset'
; 05-Dec-86  APT   Added 'Service_UKConfig' and 'Service_UKStatus'
; 21-Jan-87  APT   Added 'Service_Tube', 'Service_Post_Help',
;                        'Service_StartUpFS'
; 28-Apr-87  TMD   Added a few more service codes
; 14-May-87  SKS   Added Service_FSRedeclare
; 15-May-87  SKS   Added Service_NewApplication
; 21-May-87  NDR   Added Service_PrinterDriver (turn driver on/off)
; 25-May-87  SKS   Added Service_LookupFileType
; 27-May-87  TMD   Added Service_International and sub reason codes
; 03-Jun-87  TMD   Added Service_KeyHandler
; 20-Jul-87  BC    Added Service_PreReset
; 20-Jul-87  NDR   Changed 'PrinterDriver' to 'Print'
; 05-Aug-87  TMD   Added Service_ModeChange
; 29-Oct-87  APT   Service_ReleaseSpareRMA
; 14-Jan-88  APT   Service_ClaimFIQinBackground added,
;                  Service_ReleaseSpareRMA removed.
; 26-Jan-88  SKS   Service_SoundSampler added.
; 17-Feb-88  BC    Service_ReAllocatePortsAndDomains added.
; 19-Feb-88  NDR   Service_StartWimp added.
;  5-Mar-88  NDR   Service_StartedWimp added.
; 11-Mar-88  SKS   Service_StartFinder,StartedFinder added
; 14-Mar-88  BC    Changed service name to 'Service_ReAllocatePorts'
; 15-Mar-88  TMD   Added Service_PreModeChange
;            APT   Service_MemoryMoved
;            SKS   Service_FinderDying
; 16-Mar-88  TMD   Added Inter_Keyboard
; 18-Mar-88  TMD   Added Service_ModeExtension
; 21-Mar-88  TMD   Added Service_ModeTranslation
; 29-Mar-88  BC    Added Service_NetFSInAction etc.
; 08-Apr-88  BC    Removed Service_NetFSInAction (Changed to use CallAVector)
; 10-Apr-88  NDR   Added Service_MouseTrap
; 13-Apr-88  SKS   Changed Finder to Filer
; 26-May-88  NDR   Added Service_WimpCloseDown
; 21-Jun-88  SKS   Added Service_Sound
; 07-Jul-88  BC    Added Service_NetFS
; 15-Jul-88  BC    Added Service_EconetDying
;  9-Sep-88  NDR   Added Service_WimpReportError

; +++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
; All the service call reason codes

Service_Serviced   * &00
Service_UKCommand  * &04
Service_Error      * &06 ; Not quite the same: only for workspace tidying.
                         ; If you want to claim the error, sit on ErrorV
Service_UKByte     * &07 ; Unknown OSBYTEs go thru here
Service_UKWord     * &08 ; Unknown OSWORDs go thru here
Service_Help       * &09 ; Issued at the start of the *Help command :
                         ; claim if replacing the MOS *Help
Service_ReleaseFIQ * &0B
Service_ClaimFIQ   * &0C ; May only be issued from foreground !
Service_Memory     * &11
Service_StartUpFS  * &12

Service_Tube       * &FE ; Means "Tube changing state"
                         ; R2 = 0 for Tube not there
                         ;   <> 0 means Tube alive : may contain more info.

; Master OS ones:

Service_Post_Help       * &18 ; Passed round at the end of the *Help code
Service_Reset           * &27
Service_UKConfig        * &28
Service_UKStatus        * &29
Service_NewApplication  * &2A ; Passed round before application is loaded / run

; Arthur OS ones:

Service_FSRedeclare     * &40 ; Add yourselves as Filing Systems again please
Service_Print           * &41 ; Printer Driver is being turned on/off (R2=0/1)
Service_LookupFileType  * &42 ; Do you know this file type ?
Service_International   * &43 ; Translate country/alphabet numbers/names;
                              ; or define set of chars
Service_KeyHandler      * &44 ; Offered when keyboard id ascertained
Service_PreReset        * &45 ; Offered after pressing the 'Break Key'
Service_ModeChange      * &46 ; Offered after a screen MODE change
Service_ClaimFIQinBackground * &47
                              ; Claim if you are FIQ owner and can
                              ; currently release FIQ straight away.
Service_ReAllocatePorts * &48 ; Econet is being started up again
Service_StartWimp       * &49
Service_StartedWimp     * &4A
Service_StartFiler      * &4B
Service_StartedFiler    * &4C

Service_PreModeChange   * &4D ; Offered before mode changes, if claimed then
                              ; returns if R0=0, else R0 -> error block
Service_MemoryMoved     * &4E ; Offered at end of ChangeDynamic
Service_FilerDying      * &4F
Service_ModeExtension   * &50 ; To allow soft modes
Service_ModeTranslation * &51 ; For unknown monitor types
Service_MouseTrap       * &52 ; For non-click mouse warnings
Service_WimpCloseDown   * &53 ; for trapping Wimp_CloseDown calls
Service_Sound           * &54 ; Something's happening ... sub-rc's in Hdr.Sound
Service_NetFS           * &55 ; Either a *Logon or a *Bye has happened
Service_EconetDying     * &56 ; Econet is leaving Abandon all Tx/RxCBs
Service_WimpReportError * &57 ; Wimp is opening/closing a ReportError window

; International service sub-reason codes

Inter_CNaToCNo  * 0
Inter_ANaToANo  * 1
Inter_CNoToCNa  * 2
Inter_ANoToANa  * 3
Inter_CNoToANo  * 4
Inter_Define    * 5
Inter_Keyboard  * 6
Inter_Highest   * 7             ; highest reason code +1

; Third party services start at &80000 and they get 64 each

                    ^ &80000

SoundSamplerService # 64                ; 80000

        OPT     OldOpt
        END