🚀 go-pugleaf

RetroBBS NetNews Server

Inspired by RockSolid Light RIP Retro Guy

Article View: alt.folklore.computers
Article #986

How to synthetically program a hp41

#986
From: mcin... David McIntyre
Date: Wed, 17 Jan 1990 09:26
80 lines
2702 bytes
Note: this will erase your calc's memory.  Keep that in mind.

First, create the byte grabber:

1) Master clear, by holding down the <- while turning on.

2) ASN '+' to the LN key.

3) ASN 'DEL' to the LOG key.

4) Switch to PRGM mode.  "00 REG 45" on display.

5) Start CAT 1.  Press R/S immediately before the display blinks.  Do
   this step until you are fast enough.

6) Switch to ALPHA mode.  Press <- with the .END. in the display.

7) You should see "4094 RCL 01" on the display.  You are in unknown
   territory here.

8) GTO .005   You should see "05 LBL 03".

9)  Press USER, LOG, SQRT.  "04 STO 01" on display.

10) Key in the alpha line "?AAAAAA".  If you don't have an extended functions
    module, you will see "?A-----".

11) Switch out of PRGM mode, then GTO ..  .

The byte grabber is now attached to the LN key.  Be careful.

Now, let's try it out:

1) Switch into PRGM mode, and GTO ..

2) Key in this program:

	01 ENTER^
	02 X <> 88
	03 STO IND 31
	04 PI

3) PACK

4) Make sure you are in USER mode.

5) GTO .001

6) Switch to PRGM mode.

7) BYTE GRAB (ie, press the LN key).

8) You will see this "02 ^-?----*", where ^ is a TEE, and * is a character
   with all segments on.

9) The new character came from the X <> part of the X <> 88 line.
   Line 03 has turned into "03 E^X-1"

NOW BETTER STUFF:

1) GTO .003, the sto line.

2) BYTE GRAB

3) SST to check out "05 TONE Y".....a new tone!!!  There are over 100
   synthetic tones.

For more information, check out the book "HP-41 Synthetic Programming Made
Easy" by Keith Jarett, published by Synthetix.  This is probably available
from EduCalc.  Ask if it is not in their current catalog.  I copied this
example from there, without permission.  Sorry.

I don't know EduCalc's current address/phone, so don't ask......

				-dave

Dave "mr question" McIntyre     |                                             
mcin...@turing.cs.rpi.edu      |      "....say you're thinking about a plate  
office : 518-276-8633		|	of shrimp.....and someone says to    
home   : 518-271-6664		|       you `plate,' or `shrimp'......"       
Technical Details
Message-ID: <4QR8X-@rpi.edu>
Path: mbox-mo1.pugleaf.net!utzoo!utgpu!jarvis.csri.toronto.edu!mailrus!iuvax!ux1.cso.uiuc.edu!brutus.cs.uiuc.edu!rpi!turing.cs.rpi.edu!mcintyre

Show Full Headers
Complete Article Headers
Path: mbox-mo1.pugleaf.net!utzoo!utgpu!jarvis.csri.toronto.edu!mailrus!iuvax!ux1.cso.uiuc.edu!brutus.cs.uiuc.edu!rpi!turing.cs.rpi.edu!mcintyre
From: mcin...@turing.cs.rpi.edu (David McIntyre)
Newsgroups: alt.folklore.computers
Subject: How to synthetically  program a hp41
Message-ID: <4QR8X-@rpi.edu>
Date: 17 Jan 90 09:26:44 GMT
Reply-To: mcin...@turing.cs.rpi.edu (David McIntyre)
Organization: Rensselaer Instipoly Technitute
Lines: 80
MIME-Version: 1.0
Content-Type: text/plain; charset=UTF-8
Content-Transfer-Encoding: 7bit