Path: utzoo!utgpu!news-server.csri.toronto.edu!cs.utexas.edu!uunet!microsoft!alonzo
From: alonzo@microsoft.UUCP (Alonzo GARIEPY)
Newsgroups: comp.sys.handhelds
Subject: uuencoded PEEK and POKE for the HP 48
Message-ID: <56660@microsoft.UUCP>
Date: 17 Aug 90 00:54:00 GMT
References: <56658@microsoft.UUCP>
Reply-To: alonzo@microsoft.UUCP (Alonzo GARIEPY)
Organization: Microsoft Corp., Redmond WA
Lines: 17

These are uuencoded versions of PEEK and POKE for the 48.  They
are identical to PIG and BAG on the 28.  POKE only pokes as many
nibbles as correspond to the word size set with STWS.  If you set
the word size to 22, POKE will modify 6 nibbles.

begin 600 peek
M2%!(4#0X+4&=+>!A(_[%T;L?,RD0````````9%!<'$XJ4`$````````````)
KZ-&['\7%P=P".0`0(P$3-#$0ED$68U%V,1"64701$R-!$D8(R)!C(RLQ```)
`
end

begin 600 poke
M2%!(4#0X+4&=+>!A([W[D<(?3BI0`0```````````(/GD8`>O?O!W`);`!`C
M`1,T<11T<11#811D,198,8;0$$91%GXQ$)9!$@-1%!$3(T'B)Q!&",B08R,K
",0`T
`
end