Num lock on by default on STB/NC products.

Version 4.70. Tagged as 'Kernel-4_70'

VersionASM

@@ -5,8 +5,8 @@
 			GBLA    Module_Version
 			GBLS	Module_MinorVersion
 			GBLS	Module_Date
-Module_MajorVersion	SETS    "4.69"
-Module_Version          SETA    469
+Module_MajorVersion	SETS    "4.70"
+Module_Version          SETA    470
 Module_MinorVersion	SETS	""
-Module_Date		SETS    "09 Feb 1999"
+Module_Date		SETS    "15 Feb 1999"
 		        END

VersionNum

-/* (4.69)
+/* (4.70)
  *
  * This file is automatically maintained by srccommit, do not edit manually.
  *
  */
-#define Module_MajorVersion_CMHG     	4.69
+#define Module_MajorVersion_CMHG     	4.70
 #define Module_MinorVersion_CMHG	
-#define Module_Date_CMHG      		09 Feb 1999
+#define Module_Date_CMHG      		15 Feb 1999
 
-#define Module_MajorVersion     	"4.69"
-#define Module_Version                  469
+#define Module_MajorVersion     	"4.70"
+#define Module_Version                  470
 #define Module_MinorVersion		""
-#define Module_Date      		"09 Feb 1999"
+#define Module_Date      		"15 Feb 1999"
 

s/PMF/osinit

@@ -22,6 +22,14 @@ ErrorsInR0 SETL Module                  ; if FALSE, use XOS_GenerateError for
         GBLL    ProtectStationID        ; if TRUE, disallow OSBYTE &A2,0,n
 ProtectStationID SETL {TRUE}:LAND::LNOT:STB
 
+ [ STB
+	; STB and NC machines probably want Num lock off.
+KBStat_Default	*	KBStat_NoShiftLock :OR: KBStat_NoNumLock
+ |
+	; Desktop machines probably want Num lock on.
+KBStat_Default	*	KBStat_NoShiftLock
+ ]
+
 ; *****************************************************************************
 
 ExecuteInit ROUT
@@ -294,9 +302,9 @@ ReadCMOSDefaults
         MOV     R0, #StartCMOS
         BL      Read
         MOVS    R0, R0, LSL #(32-5)     ; bit 5 -> carry, bit 4 -> N bit
-        MOVPL   R0, #KBStat_NoShiftLock + KBStat_ShiftEnable    ; SHCAPS
-        MOVMI   R0, #KBStat_NoShiftLock + KBStat_NoCapsLock     ; NOCAPS
-        MOVCS   R0, #KBStat_NoShiftLock                         ; CAPS
+        MOVPL   R0, #KBStat_Default + KBStat_ShiftEnable    ; SHCAPS
+        MOVMI   R0, #KBStat_Default + KBStat_NoCapsLock     ; NOCAPS
+        MOVCS   R0, #KBStat_Default                         ; CAPS
         STRB    R0, KeyBdStatus
 
  [ ModeSelectors
@@ -512,7 +520,7 @@ ByteVarInitTable
   = &00                 ; ESCBREAK    # 1    ; &C8 (200)
                         ;
   = &00                 ; KeyBdDisable # 1   ; &C9
-  = &20                 ; KeyBdStatus  # 1   ; &CA
+  = KBStat_Default      ; KeyBdStatus  # 1   ; &CA
                         ;
   = &11                 ; RS423HandShake # 1 ; &CB
   = &00                 ; RS423InputSupr # 1 ; &CC