mirror of
https://github.com/pkimpel/retro-220.git
synced 2026-02-26 16:53:53 +00:00
56 lines
2.2 KiB
Plaintext
56 lines
2.2 KiB
Plaintext
.00.0 0100 ERROR DEFN 100
|
|
.00.0 0200 SQRT DEFN 200
|
|
.00.0 0000 ROMXX F4247 3,1,0
|
|
.00.0 0001 DLB 8 *-1,44,0
|
|
.00.0 0002 BOF 6 ERROR+21
|
|
.00.0 0003 LDR 8 ROM2
|
|
.00.0 0004 STR 8 B+,04
|
|
.00.0 0005 CFA 6 ERROR+51,00 =1.0=
|
|
.00.0 0006 BCH 8 B+
|
|
.00.0 0007 BFA 8 E+,22,51
|
|
.00.0 0008 BZA 8 F+
|
|
.00.0 0009 STA 6 ERROR+52
|
|
.00.0 0010 FMU 6 ERROR+52
|
|
.00.0 0011 SLT 2
|
|
.00.0 0012 STR 8 E+,02
|
|
.00.0 0013 LBC 8 E+
|
|
.00.0 0014 SRT - 51
|
|
.00.0 0015 SUB 8 +1000000000
|
|
.00.0 0016 SLT 10
|
|
.00.0 0017 SUB 6 ERROR+48 =5(11)=
|
|
.00.0 0018 SUB 6 ERROR+48
|
|
.00.0 0019 SLT 10
|
|
.00.0 0020 BOF 8 *+2
|
|
.00.0 0021 F4248 51,12,+1
|
|
.00.0 0022 DLB 8 *-1,44,0
|
|
.00.0 0023 *D BFA 8 C+,11,0
|
|
.00.0 0024 STB 8 E+,04
|
|
.00.0 0025 LDR 8 E+
|
|
.00.0 0026 SLT 18
|
|
.00.0 0027 *G LDB 8 ROMXX
|
|
.00.0 0028 BUN 6 SQRT+2
|
|
.00.0 0029 *C SLT 1
|
|
.00.0 0030 DBB 8 D-,1
|
|
.00.0 0031 *E LSA 1
|
|
.00.0 0032 *F FAD 6 ERROR+51 =1.0=
|
|
.00.0 0033 BUN 8 G-
|
|
.00.0 0034 *B LDR 8 ROM1
|
|
.00.0 0035 LDB 8 ROMXX
|
|
.00.0 0036 BUN 6 ERROR+7
|
|
.00.0 0037 ROM1 CNST $ROMXX$
|
|
.00.0 0038 ROM2 HLT 8 ROM1
|
|
.00.0 0039 ROM3 CAD 8 +5115707963
|
|
.00.0 0040 LDR 6 ERROR+52
|
|
.00.0 0041 BZR - 0
|
|
.00.0 0042 SLT 0
|
|
.00.0 0043 BUN - 0
|
|
.00.0 0044 LOCN LOCN *+3
|
|
.00.0 0047 CNST 40000990000
|
|
.00.0 0048 CNST $ROMXX,REAL(REAL) ERROR=1 SQRT=2 $
|
|
.00.0 0055 CNST 90000000000
|
|
.00.0 0056 LOCN LOCN
|
|
.00.0 0044 FINI ROMXX
|
|
44 +1000000000
|
|
45 +0000000001
|
|
46 +5115707963
|