Re: Left & Right Shift?

 BBS: Inland Empire Archive
Date: 09-11-92 (09:50)             Number: 294
From: BOB PERKINS                  Refer#: NONE
  To: WALTON DELL                   Recvd: NO  
Subj: Re: Left & Right Shift?        Conf: (2) Quik_Bas
 WD>   How can I quickly find the status of the left and right shift
 WD> keys?  I know I can use an interrupt, but I think a PEEK would
 WD> be faster.

 DEF SEG = 0
   x% = PEEK(&H417)
   IF x% AND 1 THEN PRINT "Right Shift Key Down"
   IF x% AND 2 THEN PRINT "Left Shift Key Down"

--- Msg V4.5
 * Origin: Reciprocity Failure  (1:124/4115.236)
Outer Court
Echo Basic Postings

Books at Amazon:

Back to BASIC: The History, Corruption, and Future of the Language

Hackers: Heroes of the Computer Revolution (including Tiny BASIC)

Go to: The Story of the Math Majors, Bridge Players, Engineers, Chess Wizards, Scientists and Iconoclasts who were the Hero Programmers of the Software Revolution

The Advent of the Algorithm: The Idea that Rules the World

Moths in the Machine: The Power and Perils of Programming

Mastering Visual Basic .NET