Re: CAPS LOCK

 BBS: Inland Empire Archive
Date: 03-16-92 (12:18)             Number: 165
From: FRANCOIS ROY                 Refer#: NONE
  To: MATT GLOVER                   Recvd: NO  
Subj: Re: CAPS LOCK                  Conf: (2) Quik_Bas

 MG> 1. Turn on Caps lock
     DEF SEG = &H40: POKE &H17, PEEK(&H17) OR &H40
 MG> 2. Turn Off Caps lock
     DEF SEG = &H40: POKE &H17, PEEK(&H17) OR &HBF
 MG> 3. Lock Caps LOCK in either postion.
     If you mean preventing modification by user depressing the key,
     I can only think of looping on one of the above...
 MG> 4. Get status of Caps Lock??
     DEF SEG = &H40: IF PEEK(&H17) AND &H40 THEN PRINT "On" ELSE PRINT "Off"


--- ME2_1104
 * Origin: Out of String Space - the Final Frontier (Fidonet 1:163/506.2)