Luc Pauwels

LDISP

Mathieu Clabaut

Subject: Little Display.
Date: Fri, 7 Jan 1994 18:21:27 +0100
From: "bechaud (HP)" <bechaud@ENSEEIHT.FR>
Newsgroups: bit.listserv.hp-28

Hello, here is a little more life...

I'm a french studient, and I'm very fond of HP28s.. I own an hp28s which I have customize 2 years ago in order to link my hp and my pc.. It works very well and it is very very convenient..

I'm looking for people who work on hp28s, especially in assembly language, in order to exchange information and programs (through this mail-list would be good..)

Some programs follows....

LDISP : Display with little letters over 5 rows... same syntax as DISP.
-----

     76C20 58A81 4C3C0 B35C0 69C20 F2200 8F72F 40340 48FF1 0A8F1 8050D 23018
     B640D A3058 BA40D A1011 47137 14334 E4A20 8A201 8F8B0 508DB 05C08 08F85
     21B00 FFF30 F15C0 11A06 17414 3818F 8481C CC560 6A711 00174 D0841 14B07
     13706 31A09 66606 56131 03966 411BB 36D1D 2302D 76370 31169 E2333 102B6
     A31A5 9EA32 31369 E2313 1F69E 6A0CC CC6A0 08082 1E631 029EE 90808 21E6B
     6AC4C 4D6C4 CA348 75D1C A130D 215E0 CED71 60AF2 14EAF 5BED1 11CC8 72708
     08818 1E81D CC432 81281 281E8 1E811 81181 D81DC C4606 2EF28 1531B 9E0E1
     20E1D 15512 01773 482EF F1331 318B2 60665 03406 AFF8B 21134 00CFF 8B650
     13587 1C116 1CF46 0606F 851AF 231EF 685F1 10CC4 31100 07137 06171 649E8
     08007 8D1E5 21119 E6D51 09305 9813E 1F048 FF842 6DBF6 01200 9F20

                Size  594
                CRC  = #DDDCh
Type the hex-string of TenX without any blancs or new-line ("76C2058A814C...") verify the size and the CRC, and change it in a System-object with Hexify or another program as RASS, that you can obtain by running the following program :
RASS-generator.
--------------

        <<
        # C02C9604F3D02C67h
        # 3134105081F80005h
        # 8183414719611310h
        # 71B414718D30458Fh
        # 8AE90A13AE30131h
        # CDC0610851686818h
        # 3CEAA125E1D8D95Dh
        # 2F9004F3Dh 1 7
          START # 3B82h
        SYSEVAL
          NEXT # 20238h
        SYSEVAL # 4F3Dh
        SYSEVAL
        >>
CRC(This is the same as RPL CRC which follows)
---
69C20 5B000 8F180 50147 13714 334E4 A208A 2606A 70174 14717 4AF3D
7818F B481F CF4D5 D2108 14B31 03B6A 31A09 E2903 170B6 A1187 C30D2
30F0E F6331 8018F B1820 D4118 F67B1 01001 71CF5 5BD28 D3257 18D1E
521D5 0EFC0 EF6FC 0EF00 1

SIZE 186, CRC=#B1C0h
The same in rpl...(if some prefere RPL ??!! it is longer and extremly slower...)
CRC:
---
        << # 0h -> S C
          << 1 S SIZE
            FOR X S X X SUB
        NUM 48 - DUP 9 > 7 *
        - # 0h + C 16 / SWAP
        C XOR # Fh AND
        # 1081h * XOR 'C'
        STO
            NEXT C
          >>
        >>
CRCOBJ (Same as CRC,but works on any objects..)
------
69C20 29000 8F180 50143 D6134 068F4 9E200 7132E A8F8B 050D6 D7147
137CF D2061 5B007 06793 0D230 F0EF6 33180 18FB1 820D4 07F67 910D6
06170 CF5AC 07DAD 28D02 571D5 0EFC0 EF6FC 0EF001

SIZE 151, CRC=#47h
That's all folks....

I'd like to know if there are some people left here....And if you want that i post some more programms...

See u soon... :-)

__________________________________
7/01/1994.                       |
Mathieu Clabaut
bechaud@enseeiht.fr

36, rue du general potez
62170 Montreuil sur mer
FRANCE