Path: utzoo!attcan!uunet!clyde.concordia.ca!news-server.csri.toronto.edu!cs.utexas.edu!usc!snorkelwacker!bloom-beacon!eru!luth!sunic!tut!santra!kampi.hut.fi!jmunkki
From: jmunkki@kampi.hut.fi (Juri Munkki)
Newsgroups: comp.sys.handhelds
Subject: Re: Introduction to HP 48SX Internals
Keywords: HP48
Message-ID: <1990Mar14.152221.25597@santra.uucp>
Date: 14 Mar 90 15:22:21 GMT
References: <52058@microsoft.UUCP> <52059@microsoft.UUCP>
Sender: news@santra.uucp (Cnews - USENET news system)
Reply-To: jmunkki@kampi.hut.fi (Juri Munkki)
Organization: Helsinki University of Technology, FINLAND
Lines: 56

In article <52059@microsoft.UUCP> alonzo@microsoft.UUCP (Alonzo GARIEPY) writes:
>		Easy Machine Code: PEEK and POKE
>
>The obvious way to enter machine code is with scan mode.  You don't 
>need to waste time with hex string converters and other silliness.

I disagree. The obvious way to enter machine code is to compile it on
a computer and then use kermit to transfer the binary. The scan mode
entry system is extremely error-prone and easily results in crashes.
Since you need to backup your programs before entering new stuff with
the scan mode, why not download the new stuff from the computer and
save a few keystrokes.

>Store the following PEEK program template in the first variable of the
>HOME directory.

... Long description follows ...

>You can now checksum PEEK with the BYTES command.  The result should
>be #8568h.  This is a binary checksum, so it includes the contents of 
>the Code object, and is independent of display modes.
>
>Store the following POKE program template in the first variable of the
>HOME directory.
>
... Slightly shorter instructions, but longer hex dump ...

>You can now checksum POKE with the BYTES command.  The result should
>be #725D.

I typed those programs in, since there is no way to download the scan
mode instructions with kermit. To save you some trouble, I put the
PEEK and POKE programs in a directory (ASM) and downloaded it in binary
form to my Macintosh. I then transfered it to this VAX and uuencoded it.

begin 644 asm
M2%!(4#0X+4&6*O!_P@`````$4$]+102=+>!A([W[D<(?3BI0`0``````````
M`(/GD8`>O?O!W`);`!`C`1,T<11T<11#811D,198,8;0$$91%GXQ$)9!$@-1
M%!$3(T'B)Q!&",B08R,K,3`+``10145+!)TMX&$C_L71NQ\S*1````````!D
M4%P<3BI0`0````````````GHT;L?Q<7!W`(Y`!`C`1,T,1"6019C478Q$)91
/=!$3(T$21@C(D&,C*S$`
`
end

To use, uudecode the file, start kermit, "set file type binary"
and send the "asm" file. Calculate the checksums before using
the commands.

If there is enough volume, a comp.sources.hp48 or comp.binaries.hp48
group might be in order. Should we start the discussion now, or wait
until we see what the real volume will be?

   ___________________________________________________________________________
  / Juri Munkki	    /  Helsinki University of Technology   /  Wind  /   HP S /
 / jmunkki@hut.fi  /  Computing Center Macintosh Support  /  Surf  /   48 X /
 ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~