# HG changeset patch
# User boisy
# Date 1027558876 0
# Node ID 2c13557a04d6f0e2ad7b3d93750cac10f8a1d923
# Parent  8f8fb0d8e0cd2debffac40fb440385722b84e874
Added code to read mouse info from init

diff -r 8f8fb0d8e0cd -r 2c13557a04d6 level2/modules/cc3io.asm
--- 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