39 lines
1.4 KiB
Text
39 lines
1.4 KiB
Text
00000 POLY START 0
|
|
. x^4
|
|
00000 03204F LDA x
|
|
00003 23204C MUL x
|
|
00006 232049 MUL x
|
|
00009 232046 MUL x
|
|
0000C 0F2046 STA res
|
|
0000F B400 CLEAR A
|
|
. +2x^3
|
|
00011 03203E LDA x
|
|
00014 23203B MUL x
|
|
00017 232038 MUL x
|
|
0001A 210002 MUL #2
|
|
0001D 1B2035 ADD res
|
|
00020 0F2032 STA res
|
|
00023 B400 CLEAR A
|
|
. +3x^2
|
|
00025 03202A LDA x
|
|
00028 232027 MUL x
|
|
0002B 210003 MUL #3
|
|
0002E 1B2024 ADD res
|
|
00031 0F2021 STA res
|
|
00034 B400 CLEAR A
|
|
. +4x
|
|
00036 032019 LDA x
|
|
00039 210004 MUL #4
|
|
0003C 1B2016 ADD res
|
|
0003F 0F2013 STA res
|
|
00042 B400 CLEAR A
|
|
. +5
|
|
00044 03200E LDA res
|
|
00047 190005 ADD #5
|
|
0004A 0F2008 STA res
|
|
0004D B400 CLEAR A
|
|
0004F 3F2FFD HALT J HALT
|
|
00052 END POLY
|
|
|
|
00052 000002 x WORD 2
|
|
00055 000000 res RESW 1
|