mirror of
https://github.com/pkimpel/retro-220.git
synced 2026-04-25 03:35:52 +00:00
f288264276
1. Updated compiler and library sources after second proofing pass. 2. Updated Generator and Compiler object code and build decks. 3. Updated Generator and Compiler loadable object tapes. 4. Corrections to BAC-Assembler and enhancements for additional card/tape output options. 5. Minor corrections to GEN-Assembler. 6. Updates to miscellaneous utilities and example programs.
47 lines
7.4 KiB
Plaintext
47 lines
7.4 KiB
Plaintext
1 ERROR DEFN 100 .00.0
|
|
1 FXFX CLB .00.0
|
|
1 LDB 8 FXFX .00.0
|
|
1 BZA 8 F+ .00.0
|
|
1 STR 6 ERROR+49 B .00.0
|
|
1 STA 6 ERROR+52 .00.0
|
|
1 CLL 6 ERROR+50 C .00.0
|
|
1 IFL 6 ERROR+50,00,1 .00.0
|
|
1 *A CAD 6 ERROR+48 =5(11) .00.0
|
|
1 MUL 6 ERROR+49 B .00.0
|
|
1 STA 6 ERROR+49 B .00.0
|
|
1 BZR 8 B+ .00.0
|
|
1 CAD 6 ERROR+50 C .00.0
|
|
1 MUL 6 ERROR+52 .00.0
|
|
1 STR 6 ERROR+50 C .00.0
|
|
1 BZA 8 B+ .00.0
|
|
1 BUN 8 A+ .00.0
|
|
1 *B LDR 6 ERROR+49 B .00.0
|
|
1 BZR 8 C+ .00.0
|
|
1 CAD 6 ERROR+52 .00.0
|
|
1 MUL 6 ERROR+52 .00.0
|
|
1 STR 6 ERROR+52 .00.0
|
|
1 BZA 8 A- .00.0
|
|
1 *A CAD 6 ERROR+49 B .00.0
|
|
1 BMA 8 E+ .00.0
|
|
1 LDR 8 $FXFX$ .00.0
|
|
1 BUN 6 ERROR .00.0
|
|
1 *C CAD 6 ERROR+50 C .00.0
|
|
1 BFR 8 D+,12,10 .00.0
|
|
1 BUN - 0 .00.0
|
|
1 *D LDR 8 +1 .00.0
|
|
1 CLA .00.0
|
|
1 DIV 6 ERROR+50 C .00.0
|
|
1 BUN - 0 .00.0
|
|
1 *F CFR 6 ERROR+24 ZERO .00.0
|
|
1 BCH - 0 .00.0
|
|
1 LDR 8 $FXFX$ .00.0
|
|
1 BUN 6 ERROR+7 .00.0
|
|
1 *E CLA .00.0
|
|
1 BUN - 0 .00.0
|
|
1 LOCN LOCN *+2 .00.0
|
|
1 CNST 40000990000 .00.0
|
|
1 CNST $FX*FX ERROR=1 $ .00.0
|
|
1 CNST 90000000000 .00.0
|
|
1 LOCN LOCN .00.0
|
|
1 FINI FXFX .00.0
|