Re: A86: Alpha-Lock

To: assembly-86@lists.ticalc.org
Subject: Re: A86: Alpha-Lock
From: rabidcow@juno.com (Joshua J Seagoe)
Date: Fri, 4 Dec 1998 20:10:58 -0800
Delivered-To: assembly-86-outgoing@towerguard.unix.edu.sollentuna.se
Reply-To: assembly-86@lists.ticalc.org



calls:
$406C   check upper-case alpha lock
$4070   clear 4,(iy+$05) and alpha lock
$4074   clear normal upper-case alpha lock
$4078   set unclearable upper-case alpha lock
$407C   set upper-case alpha lock
$4080   set upper-case alpha

flags, all but bit 7 are in ti86asm.inc:
iy+$12	indicflags,shiftflags
  0	indicRun
  2	indicOnly
  3	shift2nd
  4	shiftAlpha
  5	shiftLwrAlph
  6	shiftALock
  7	unclearable alphalock

to set uppercase alpha lock:
 set shiftALock,(iy+shiftflags)
 set shiftAlpha,(iy+shiftflags)

to clear it:
 res shiftALock,(iy+shiftflags)
 res shiftAlpha,(iy+shiftflags)

you should also res shiftLwrAlph,(iy+shiftflags) in case someone sets
lower alpha lock before quitting.

-josh



___________________________________________________________________
You don't need to buy Internet access to use free Internet e-mail.
Get completely free e-mail from Juno at http://www.juno.com/getjuno.html
or call Juno at (800) 654-JUNO [654-5866]

Prev: Re: A86: batt checker
Next: A86: acz
Index(es):
- Main
- Thread