Mercurial > hg > Members > kono > nitros9-code

changeset 350:2c13557a04d6

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Added code to read mouse info from init
author boisy
date Thu, 25 Jul 2002 01:01:16 +0000
parents 8f8fb0d8e0cd
children 486e94f18be0
files level2/modules/cc3io.asm
diffstat 1 files changed, 7 insertions(+), 1 deletions(-) [+]
line wrap: on
line diff
--- a/level2/modules/cc3io.asm	Thu Jul 25 01:00:34 2002 +0000
+++ b/level2/modules/cc3io.asm	Thu Jul 25 01:01:16 2002 +0000
@@ -10,6 +10,8 @@
 *        the init module
 * 26d    Added support for obtaining key repeat info    BGP 98/10/23
 *        from the init module
+* 26e    Added support for obtaining mouse info         BGP 02/07/24
+*        from the init module
 
          nam   CC3IO
          ttl   CoCo 3 I/O driver
@@ -23,7 +25,7 @@
 
 tylg     set   Drivr+Objct
 atrv     set   ReEnt+rev
-rev      set   4
+rev      set   5
 edition  set   26
 
          mod   eom,name,tylg,atrv,start,size
@@ -170,6 +172,10 @@
          ldy   <D.Init    get init module ptr
          lda   MonType,y  get monitor type byte
          sta   <G.MonTyp,x save off
+         ldd   MouseInf,y get mouse information
+         sta   <G.Mouse+Pt.Res,x	save off hi-res/lo-res flag
+         stb   <G.Mouse+Pt.Actv,x	save off left/right
+
 * Set key repeat rate/delay
          ldd   KeyRptS,y  get key repeat start/delay constant
          std   <G.KyDly,x