mirror of
https://github.com/pkimpel/retro-220.git
synced 2026-04-25 11:41:59 +00:00
33 lines
2.5 KiB
Plaintext
33 lines
2.5 KiB
Plaintext
1 SINH DEFN 100 .00.0
|
|
1 COSH DEFN 200 ,00,0
|
|
1 ERROR DEFN 300 .00.0
|
|
1 TANH NOP .00.0
|
|
1 STA 8 X .00.0
|
|
1 LDR 8 TANH2 .00.0
|
|
1 CFA 8 +5250000000,00 .00.0
|
|
1 BCH 8 B+ .00.0
|
|
1 STP 6 COSH .00.0
|
|
1 BUN 6 COSH+2 .00.0
|
|
1 STA 8 COSHX .00.0
|
|
1 BZA 8 A+ .00.0
|
|
1 CAD 8 X .00.0
|
|
1 STP 6 SINH .00.0
|
|
1 BUN 6 SINH .00.0
|
|
1 FDV 8 COSHX .00.0
|
|
1 *A LDB 8 TANH .00.0
|
|
1 BUN - 0 .00.0
|
|
1 *B CAD 6 ERROR+51 =1.0= .00.0
|
|
1 LDR 8 X .00.0
|
|
1 SLT 0 .00.0
|
|
1 BUN 8 A- .00.0
|
|
1 X CNST 0 .00.0
|
|
1 COSHX CNST 0 .00.0
|
|
1 TANH2 HLT 8 TANH1 .00.0
|
|
1 TANH1 CNST $TANH$ .00.0
|
|
1 LOCN LOCN *+1 .00.0
|
|
1 CNST 40000990000 .00.0
|
|
1 CNST $TANH,REAL(REAL) SINH=1 COSH=2 ERROR=3 $ .00.0
|
|
1 CNST 90000000000 .00.0
|
|
1 LOCN LOCN .00.0
|
|
1 FINI TANH .00.0
|