Re: HP28S screen noise generator Message #6 Posted by C.Ret on 19 Feb 2012, 4:09 a.m., in response to message #1 by Keith Midson
Many Thanks for remember me bitmap screen plays on my old HP-28S.
If my memory don't abuse me, this code may not run on HP-28C due to the use of the XOR on strings. XOR function may not handel binary or screen strings on HP28C; only integers and regular binaries.
In your code, I still not understand why you loop 738 times ? Is there samething I miss interpret, is ther any effect I miss ?
«
IMG 'TEST' STO
1 738 START
TEST 548 548 SUB
TEST 1 547 SUB +
TEST XOR
'TEST' STO
TEST ->LCD
NEXT
»
(what a bunch as TEST ?)
Please consider my translation of your code without any use of any global variable. My version directly use actual screen apparence and loops until one key is pressed.
«
DO
LCD->
DUP 548 548 SUB
OVER 1 547 SUB + XOR
->LCD
UNTIL
KEY
END
CLMF
»
Great effet HP28S feature, isn't it ?
May same one bring down a version for HP48/49/50 ?
Edited: 19 Feb 2012, 4:10 a.m.
|