Relay-Version: version B 2.10 5/3/83; site utzoo.UUCP
Posting-Version: version B 2.10.2.chuqui_test 8/21/84; site nsc.UUCP
Path: utzoo!watmath!clyde!burl!mgnetp!ihnp4!nsc!nessus
From: nessus@nsc.UUCP (Kchula-Rrit)
Newsgroups: net.micro.ti
Subject: A useful CALL LOAD
Message-ID: <1359@nsc.UUCP>
Date: Thu, 23-Aug-84 14:37:06 EDT
Article-I.D.: nsc.1359
Posted: Thu Aug 23 14:37:06 1984
Date-Received: Fri, 24-Aug-84 05:09:06 EDT
Distribution: net
Organization: The Patriarchy of Kzin
Lines: 53

*** REPLACE THIS LINE WITH YOUR MESSAGE ***

     I received the following message in response to my question about disabling
the QUIT button and since the sender allowed me to post it and I thought it
would be interesting/useful to micro.ti readers:


From sequent!pur-ee!pc:rhs Thu Aug 23 03:11:00 1984
Date: Wed, 22 Aug 84 19:17:44 est
From: sequent!pur-ee!pc:rhs (Robert H Spitzer)
To: sequent!nsc!nessus

<  I would have posted this but I do not have write access to the net  >
<  Feel free to post it.	                                       >

I find the following CALL LOADS to be useful:

CALL LOAD(-31931,0)  -- unprotect the protected X-BASIC program in memory
CALL LOAD(-31806,16)  -- disable QUIT key

>83C2 is an interesting address to play around with.  It is located in the
Scrath Pad RAM.  This address is known as the 'Interrupt Flag' and is a 
1 byte bit mapped address.

		>83C2

Bit		Use
 0     On disable all of the following
 1     On disable Sprite motion
 2     On disable Auto Sound processing
 3     On disable the QUIT key( FCTN = )
 4-7   not used
 
 CALL LOAD(-31806,128) = bit 0 on
 CALL LOAD(-31806,64) = bit 1 on
 CALL LOAD(-31806,32) = bit 2 on
 CALL LOAD(-31806,16) = bit 3 on
 CALL LOAD(-31806,0) = all bits off
 CALL LOAD(-31806,48) = bits 2 & 3 on
 CALL LOAD(-31806,80) = bits 1 & 3 on
 CALL LOAD(-31806,96) = bits 1 & 2 on
 
 ----
 
 		Mike Spitzer
 		UUCP:[ihnp4,inuxc,decvax,ucbvax]!pur-ee!rhs
 		ARPA:ECN.rhs@PURDUE

     Thank you, Mike.

                                       Kchula-Rrit
                                       !menlo70!nsc!nessus