Raw files for these HP 67 program listings ?

[Dieter]

(08-31-2016 04:08 PM)Gene Wrote:  Dieter, I don't disagree, but some of the "fun" is actually leaving them the way they were.

OK – with the one or other slight modification due to the different programming paradigm. See RoberM's post below.

(08-31-2016 04:08 PM)Gene Wrote:  I'm trying to pick HP 67 era games for which there is no direct 41CL equivalent yet by setting up a .rom file with these older HP 67 era games. I'm very aware :-) we *could* rewrite them, but that is not the intent here at all.

OK, here is a more or less literal translation of the HP67/97 program.

Code:

 01 LBL "JT"
 02 FIX 0
 03 CF 22
 04 SF 27
 05 CF 29
 06 "JIVE TURKEY"
 07 PROMPT
 08 LBL A
 09 STO 03
 10 STO 00
 11 ST- 00
 12 RTN
 13 LBL B
 14 STO 04
 15 XEQ 01
 16 STO 01
 17 LBL D
 18 RCL 00
 19 RTN
 20 LBL C
 21 STO 02
 22 1
 23 ST+ 00
 24 XEQ 01
 25 X>Y?
 26 CF 22
 27 RCL 02
 28 RCL 01
 29 X=Y?
 30 GTO D
 31 X>Y?
 32 GTO 00
 33 FS?C 22
 34 FS?C 22
 35 SF 22
 36 LBL 00
 37 1
 38 FS?C 22
 39 CHS
 40 RTN
 41 LBL 01
 42 24298
 43 RCL 04
 44 *
 45 5
 46 10^X
 47 9
 48 -
 49 +
 50 199017
 51 /
 52 LASTX
 53 X<>Y
 54 FRC
 55 *
 56 STO 04
 57 RCL 03
 58 LASTX
 59 1 E2
 60 *
 61 INT
 62 RTN
 63 END

ISZ(i) was replaced with a simple 1 ST+00, and the CLRG at LBL A was omitted and only R00 set to zero. A global label "JT" was added in order to access the program and initialize it, just as a HP67/97 card read would do.

If you like it this way I could provide a raw file.

(08-31-2016 04:08 PM)Gene Wrote:  Still, fun to have a rewritten Jive Turkey program. :-)

It was also fun to write it. ;-)

Dieter