mirror of
https://github.com/pkimpel/retro-220.git
synced 2026-02-10 10:10:49 +00:00
30 lines
1.1 KiB
Plaintext
30 lines
1.1 KiB
Plaintext
.00.0 0100 ATAN DEFN 100
|
|
.00.0 0200 ROMXX DEFN 200
|
|
.00.0 0300 ERROR DEFN 300
|
|
.00.0 0000 ACOS NOP
|
|
.00.0 0001 STA 6 ERROR+52
|
|
.00.0 0002 LDB 8 ACOS
|
|
.00.0 0003 BZA 6 ROMXX+39
|
|
.00.0 0004 LDR 8 ACOS2
|
|
.00.0 0005 STP 6 ROMXX
|
|
.00.0 0006 BUN 6 ROMXX+4
|
|
.00.0 0007 FDV 6 ERROR+52
|
|
.00.0 0008 STP 6 ATAN
|
|
.00.0 0009 BUN 6 ATAN
|
|
.00.0 0010 LDB 8 ACOS
|
|
.00.0 0011 LDR 6 ERROR+52
|
|
.00.0 0012 SLT 0
|
|
.00.0 0013 BPA - 0
|
|
.00.0 0014 FAD 8 +5131415927
|
|
.00.0 0015 BUN - 0
|
|
.00.0 0016 ACOS2 HLT 8 ACOS1
|
|
.00.0 0017 ACOS1 CNST $ACOS$
|
|
.00.0 0018 X CNST 0
|
|
.00.0 0019 LOCN LOCN *+1
|
|
.00.0 0020 CNST 40000990000
|
|
.00.0 0021 CNST $ARCCOS,REAL(REAL) ARCTAN=1 ROMXX=2 ERROR=3 $
|
|
.00.0 0030 CNST 90000000000
|
|
.00.0 0031 LOCN LOCN
|
|
.00.0 0019 FINI ACOS
|
|
19 +5131415927
|