home *** CD-ROM | disk | FTP | other *** search
- ;AAsm header file for WimpReadSysInfo
- ;written by DefMod (Aug 8 1994) on Mon Sep 26 15:59:43 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_Wimp
- GBLS Get_Wimp
- Get_Wimp SETS "GET OS:Hdr.Wimp"
- |
- Get_Wimp SETS ""
- ]
- $Get_Wimp
-
- [ :LNOT: :DEF: Get_Font
- GBLS Get_Font
- Get_Font SETS "GET OS:Hdr.Font"
- |
- Get_Font SETS ""
- ]
- $Get_Font
-
- [ :LNOT: :DEF: Get_OSSpriteOp
- GBLS Get_OSSpriteOp
- Get_OSSpriteOp SETS "GET OS:Hdr.OSSpriteOp"
- |
- Get_OSSpriteOp SETS ""
- ]
- $Get_OSSpriteOp
-
- [ :LNOT: :DEF: WimpReadSysInfo_Hdr
- GBLS WimpReadSysInfo_Hdr
-
- ;Symbols for constants
- WimpReadSysInfo_StateCommands * 0
- WimpReadSysInfo_StateDesktop * 1
- WimpReadSysInfo_DirLeftToRight * 0
- WimpReadSysInfo_DirRightToLeft * 1
-
- ;Symbols for SWI's and SWI reason codes
- XWimp_ReadSysInfo * &600F2
- Wimp_ReadSysInfo * &400F2
-
- WimpReadSysInfo_TaskCount * &0
- ;Entry
- ; R0 = &0
- ;Exit
- ; R0 = task_count (Int)
-
- WimpReadSysInfo_WimpMode * &1
- ;Entry
- ; R0 = &1
- ;Exit
- ; R0 = mode (OS_Mode)
-
- WimpReadSysInfo_SpriteSuffix * &2
- ;Entry
- ; R0 = &2
- ;Exit
- ; R0 -> suffix (String)
-
- WimpReadSysInfo_DesktopState * &3
- ;Entry
- ; R0 = &3
- ;Exit
- ; R0 = state (Int)
-
- WimpReadSysInfo_WriteDir * &4
- ;Entry
- ; R0 = &4
- ;Exit
- ; R0 = write_dir (Int)
-
- WimpReadSysInfo_Task * &5
- ;Entry
- ; R0 = &5
- ;Exit
- ; R0 = task (Wimp_T)
- ; R1 = version (Int)
-
- WimpReadSysInfo_Version * &7
- ;Entry
- ; R0 = &7
- ;Exit
- ; R0 = version (Int)
-
- WimpReadSysInfo_Font * &8
- ;Entry
- ; R0 = &8
- ;Exit
- ; R0 = font (Font_F)
- ; R1 = symbol_font (Font_F)
-
- WimpReadSysInfo_ToolSprites * &9
- ;Entry
- ; R0 = &9
- ;Exit
- ; R0 -> toolsprites (OSSpriteOp_Area)
-
- WimpReadSysInfo_ApplicationLimit * &B
- ;Entry
- ; R0 = &B
- ;Exit
- ; R0 = size_limit (Int)
-
- ]
- END
-