Skip to content

GitLab

Source
...
Target
Commits (1)
  • Jeffrey Lee's avatar
    Update to work with zero page relocation · 8522ec57
    Jeffrey Lee authored 
    Detail:
  Source/IntKeyBody - Try using OS_ReadSysInfo 6 to get the location of the OS_Byte variables before falling back on OS_Byte &A6
Admin:
  Tested on rev A2 BB-xM


Version 0.92. Tagged as 'IntKey-0_92'
    8522ec57
Hide whitespace changes
Inline Side-by-side
Showing with 28 additions and 18 deletions
Source/IntKeyBody
View file @ 8522ec57
......@@ -69,6 +69,7 @@ Ursula SETL {TRUE}
GET Interface/ModHand
GET Global/Services
GET Global/Proc
GET Hdr:OSRSI6
OsbyteSetCountry * &46
OsbyteSetAlphKey * &47
......@@ -572,12 +573,21 @@ SetUpKeyStructureAndHandlerIfUs Entry "r0,r1"
TEQNE r0, #Keyboard_None
BNE %FT50
MOV r0, #6
MOV r1, #0
MOV r2, #OSRSI6_OSByteVars
SWI XOS_ReadSysInfo
MOVVS r2, #0
CMP r2, #0
BNE %FT01
MOV r0, #OsbyteFindOsbyteVars
MOV r1, #0
MOV r2, #&FF
SWI XOS_Byte
ORR r1, r1, r2, LSL #8
STR r1, OsbyteVars ; set up osbyte vars address
ORR r2, r1, r2, LSL #8
01
STR r2, OsbyteVars ; set up osbyte vars address
MOV r0, #OsbyteSetAlphKey
MOV r1, #&FF ; read keyboard number
......
VersionASM
View file @ 8522ec57
......@@ -11,13 +11,13 @@
GBLS Module_HelpVersion
GBLS Module_ComponentName
GBLS Module_ComponentPath
Module_MajorVersion SETS "0.91"
Module_Version SETA 91
Module_MajorVersion SETS "0.92"
Module_Version SETA 92
Module_MinorVersion SETS ""
Module_Date SETS "19 Jan 2010"
Module_ApplicationDate SETS "19-Jan-10"
Module_Date SETS "04 Aug 2011"
Module_ApplicationDate SETS "04-Aug-11"
Module_ComponentName SETS "IntKey"
Module_ComponentPath SETS "castle/RiscOS/Sources/Internat/IntKey"
Module_FullVersion SETS "0.91"
Module_HelpVersion SETS "0.91 (19 Jan 2010)"
Module_FullVersion SETS "0.92"
Module_HelpVersion SETS "0.92 (04 Aug 2011)"
END
VersionNum
View file @ 8522ec57
/* (0.91)
/* (0.92)
*
* This file is automatically maintained by srccommit, do not edit manually.
* Last processed by srccommit version: 1.1.
*
*/
#define Module_MajorVersion_CMHG 0.91
#define Module_MajorVersion_CMHG 0.92
#define Module_MinorVersion_CMHG
#define Module_Date_CMHG 19 Jan 2010
#define Module_Date_CMHG 04 Aug 2011
#define Module_MajorVersion "0.91"
#define Module_Version 91
#define Module_MajorVersion "0.92"
#define Module_Version 92
#define Module_MinorVersion ""
#define Module_Date "19 Jan 2010"
#define Module_Date "04 Aug 2011"
#define Module_ApplicationDate "19-Jan-10"
#define Module_ApplicationDate "04-Aug-11"
#define Module_ComponentName "IntKey"
#define Module_ComponentPath "castle/RiscOS/Sources/Internat/IntKey"
#define Module_FullVersion "0.91"
#define Module_HelpVersion "0.91 (19 Jan 2010)"
#define Module_LibraryVersionInfo "0:91"
#define Module_FullVersion "0.92"
#define Module_HelpVersion "0.92 (04 Aug 2011)"
#define Module_LibraryVersionInfo "0:92"