HP "calculators" (was Re: World's first computer on ebay!)

Actually, this reminds me of an HP machine I used back in about 1977 or so. Perhaps someone can identify it for me? I think it was badged as a calculator, but "computer" would be a more honest word. It had an embedded language which was a bit odd - nothing I've seen anywhere else. There were some small number of named variables - X, Y, Z, A, B, C, I think - plus one array, R(). The size of R() depended on how large your program was - R() and program code competed for space. It had a thermal printer that printed on paper rolls 2?" wide. There was also a printer that printed on similar thermal-paper rolls eight and five-eighths inches wide; I *think* it was an external peripheral, but could be wrong about that. The "big" printer used substitutes for some of the non-ASCII characters that were built in to the small printer - for example, the right-arrow used for assignment became " TO ", and the not-equal symbol became "#". The particular one I used had a plotter attached; that I'm quite sure was an external peripheral. I did a little digging and found some old printouts, which is why I can be so exact about the paper sizes. Here are some excerpts from one of the programs (using the wide-printer substitutions, since I can't use characters like the right-arrow or right-tack symbols in this email). It bears a recognizable resemblance to BASIC, but clearly has some important differences. 0: CFG 13; ENT "NO. OF EQUATIONS",A,"NO. OF UNKNOWNS", B;FXD 3;IF FLG 13;JMP 0 [ 1: PRT "AUGMENTED MATRIX",""," IS";SPC [ 2: 0 TO X [ 3: "1";0 TO C;SPC ;X+1 TO X [ 4: "2";C+1 TO C;ENT "A(I,J)?",R(AC+X);PRT ;IF B+1 # C;GTO "2" [ ... 15: "7";R(A(C+Z+R0)+X+Z) TO R(A(C+Z+R0)+Z+R1);IF C+Z+R0 # B+1;C+1 TO C;GTO "7" [ ... 37: "20";IF A # X;X+(1 TO C) TO X;GTO "19" [ /~\ The ASCII der Mouse \ / Ribbon Campaign X Against HTML mouse at rodents.montreal.qc.ca / \ Email! 7D C8 61 52 5D E7 2D 39 4E F1 31 3E E8 B3 27 4B