result on the display of HP50g

[Simone Cerica]

You must translate ASCII files into binary files, you should use ASCII to Binary Converter --> http://www.hpcalc.org/details.php?id=3648 and you read Ascii Import/Export for SD card and Emulator --> https://groups.google.com/forum/#!msg/co...zxPAvZfk4J

PAGEV in ASCII format

Code:

%%HP: T(3)A(R)F(.); @ Ascii transfer header
RCLF SIZE 3 >   \<< @ Which calc series?

@ HP50G/49G[+]/48Gii


\<< 1. FREEZE DEPTH RCLF { } LCD\-> SIZE NIP B\->R
-73. DUP 1. + FS? { SF 6. 33. }
{ CF #2623Dh SYSEVAL #262F6h SYSEVAL 22. }
IFTE UNROT / IP \-> d f h w n \<< IFERR DUPDUP
TYPE 2. \=/ { #25ECEh SYSEVAL } IFT #2F034h SYSEVAL

1. DO CLLCD 1. n FOR i DUP2 DUP w + SUB 1. OVER
1. ALOG CHR POS DUP NOT w * + SUB DUP
i 1. #3F481h SYSEVAL #25EBCh SYSEVAL

SIZE + NEXT -55. CF 0. IFERR WAIT THEN END {
\<< DUP 'h' STO+ \>>
85. \<< DROP h TAIL DUP 'h' STO
SIZE { h HEAD } 1. IFTE \>>
75. \<< DROP 1. { } 'h' STO \>>
0. { DROP 7. ALOG }
101. { OFF DROP h SIZE { h HEAD } 1. IFTE } }
DUP ROT IP POS 1. + GET EVAL
UNTIL DUP2 SWAP SIZE > END DROP2
THEN 1. ELSE 0. END
f STOF @ #2F031h SYSEVAL #25EF4h SYSEVAL

{ DEPTH d - DROPN ERRN DOERR } IFT
\>> \>> @ Bytes: { 653.5 #B00Bh }
\>> \<< @ Which calc series?

@ HP48G[X/+]
\<< 1 FREEZE DEPTH RCLF { } 22 8
\-> d f h w n \<< IFERR DUP DUP
TYPE 2 \=/ { #15A0Eh SYSEVAL } IFT #4E2CFh SYSEVAL
1 DO CLLCD 1 n FOR i DUP2 DUP w + SUB 1 OVER
1 ALOG CHR POS DUP NOT w * + SUB DUP
i 1. #194F7h SYSEVAL #3A4CEh SYSEVAL
SIZE + NEXT 0 WAIT {
\<< DUP 'h' STO+ \>>
85 \<< DROP h TAIL DUP 'h' STO
SIZE { h HEAD } 1 IFTE \>>
75 \<< DROP 1 { } 'h' STO \>>
91 { OFF DROP h SIZE { h HEAD } 1 IFTE } }
DUP ROT IP POS 1 + GET EVAL


UNTIL DUP2 SWAP SIZE > END DROP2
THEN 1 ELSE 0 END
f STOF @ #4E347h SYSEVAL #130ACh SYSEVAL

{ DEPTH d - DROPN ERRN DOERR } IFT
\>> \>> @ Bytes: { 518.5 #6311h }
\>> IFTE 'PAGEV' STO @ Which calc series?

VIEW in ASCII format

Code:

%%HP: T(3)A(R)F(.); @ Ascii transfer header
 \<< QUOTE RCLF SWAP -73 SF DUPDUP
TYPE 2 \=/ { #25ECEh SYSEVAL } IFT
33 R~SB 7 ALOG R~SB #9B003h FLASHEVAL
DROP SCROLL SWAP STOF \>> 'VIEW' STO

1) HOME 256 ATTACH; (development library)

2) copy ASCII text on the stack;


3) convert ASCII text into binary with ASCIIBIN.49 --> http://www.hpcalc.org/details.php?id=3648 ;


4) push EVAL;


5) done!