1
0
mirror of https://github.com/pkimpel/retro-220.git synced 2026-02-26 08:44:04 +00:00
Files
pkimpel.retro-220/software/BALGOL/BALGOL-Library/EXP.baca

83 lines
3.6 KiB
Plaintext

.00.0 0100 ERROR DEFN 100
.00.0 0000 EXP CLR
.00.0 0001 LDR 8 EXP2
.00.0 0002 STR 8 E+,04
.00.0 0003 STA 8 EXP,12
.00.0 0004 CFA 8 +5311282665,00
.00.0 0005 BCH 8 B+
.00.0 0006 SLT 2
.00.0 0007 STR 8 *+1,02
.00.0 0008 CLR
.00.0 0009 LDB 8 *-1
.00.0 0010 MUL 8 +4342944819
.00.0 0011 IBB 8 *+3,9949
.00.0 0012 SLT - 1
.00.0 0013 LBC 8 *-1
.00.0 0014 SLT 8
.00.0 0015 STR 8 TS,22
.00.0 0016 IFL 8 TS,22,51
.00.0 0017 SLT 12
.00.0 0018 CLR
.00.0 0019 IBB 8 *+2,10
.00.0 0020 SLT - 1
.00.0 0021 SLT 10
.00.0 0022 STA 6 ERROR+50 C
.00.0 0023 MUL 6 ERROR+50 C
.00.0 0024 STA 6 ERROR+52 A
.00.0 0025 MUL 8 -17159
.00.0 0026 ADD 8 -4893282
.00.0 0027 MUL 6 ERROR+52 A
.00.0 0028 ADD 8 -169203872
.00.0 0029 MUL 6 ERROR+52 A
.00.0 0030 ADD 8 -995711477
.00.0 0031 MUL 6 ERROR+50 C
.00.0 0032 STA 6 ERROR+50 C
.00.0 0033 STA 6 ERROR+49 B
.00.0 0034 CAD 8 +417304
.00.0 0035 MUL 6 ERROR+52 A
.00.0 0036 ADD 8 +35418755
.00.0 0037 MUL 6 ERROR+52 A
.00.0 0038 ADD 8 +529087016
.00.0 0039 MUL 6 ERROR+52 A
.00.0 0040 ADD 8 +864864000
.00.0 0041 ADL 6 ERROR+49 B
.00.0 0042 SUB 6 ERROR+50 C
.00.0 0043 SRT 3
.00.0 0044 DIV 6 ERROR+49 B
.00.0 0045 ADA 8 TS
.00.0 0046 DFL 8 EXP,12,10
.00.0 0047 LDB 8 EXP
.00.0 0048 BRP 8 A+
.00.0 0049 BUN - 0
.00.0 0050 *A STA 6 ERROR+50 C
.00.0 0051 CAD 8 +5099999999
.00.0 0052 F4248 9999,41,*
.00.0 0053 FDV 6 ERROR+50 C
.00.0 0054 BUN - 0
.00.0 0055 *B LDB 8 EXP
.00.0 0056 BMA 8 C+
.00.0 0057 *E LDR 8 EXP1
.00.0 0058 BUN 6 ERROR
.00.0 0059 *C CLA
.00.0 0060 BUN - 0
.00.0 0061 TS CNST 0
.00.0 0062 EXP2 HLT 8 EXP1
.00.0 0063 EXP1 CNST $EXP$
.00.0 0064 LOCN LOCN *+11
.00.0 0075 CNST 40000990000
.00.0 0076 CNST $EXP,REAL(REAL) ERROR=1 $
.00.0 0081 CNST 90000000000
.00.0 0082 LOCN LOCN
.00.0 0064 FINI 1
64 +5099999999
65 +0035418755 B2
66 +4342944819
67 +0000417304 B1
68 +0864864000 B4
69 +0529087016 B3
70 -0169203872 A3
71 +5311282665
72 -0000017159 A1
73 -0004893282 A2
74 -0995711477 A4