. Racunanje polinoma s subrutino ki vsebuje loop 00000 ps START 0 00000 050000 LDX #0 . X je idx za tocke 00003 090003 LDL #3 00006 73000F LDF len 00009 77A02F outer_loop LDT in,X . V T je trenutno obravnavana tocka 0000C 03205C LDA a4 . V A bomo računali z vmesnimi rezultati 0000F 0F204A STA temp . V temp vmesni rezultati 00012 690000 LDB #0 . B bo idx za koeficiente 00015 6F2050 LDS a3 . Z S se bomo pomikali po koeficientih 00018 032041 inner_loop LDA temp 0001B 9850 MULR T,A 0001D 9434 SUBR B,S 0001F 9040 ADDR S,A . V prvem loopu je B=0, pol B=3, pol B=6 itd 00021 0F2038 STA temp 00024 9023 ADDR L,B 00026 A036 COMPR B,F 00028 3B2FED JLT inner_loop 0002B 0FA01F STA poly,X 0002E 9021 ADDR L,X 00030 A016 COMPR X,F 00032 3B2FD4 JLT outer_loop 00035 4F0000 RSUB 00038 3F2FFD halt J halt 0003B END ps . Tocke 0003B 000001 in WORD 1 0003E 000002 WORD 2 00041 000003 WORD 3 00044 000004 WORD 4 00047 000005 WORD 5 0004A lastin EQU * 0004A len EQU lastin-in . Stevilo tock 0004A 00000C st_poly WORD 12 . Stopnja polinoma . Rezultat 0004D 00....00 poly RESW 5 0005C 000000 temp RESW 1 . Koeficienti 0005F 000005 a0 WORD 5 00062 000004 a1 WORD 4 00065 000003 a2 WORD 3 00068 000002 a3 WORD 2 0006B 000001 a4 WORD 1