00001 #include "p18cxxx.inc"
00002 udata_acs ; Adatterület lefoglalása
00003 i res 1 ; unsigned char i; (ciklusváltozó)
00004 a res 2*.10 ; int a[10];
00005 b res 2*.10 ; int b[10];
00006 c res 2*.10 ; int c[10];
00007 RST CODE
00008 goto start
00009 PGM CODE ; Itt kezdődik a program
00010 start: lfsr FSR0,a
00011 lfsr FSR1,b
00012 lfsr FSR2,c
00013 clrf i
00014 ciklus: movlw .10
00015 cpfslt i ; i < 10?
00016 bra vege ; kilép, ha i>= 10
00017 movf POSTINC0,W ; W = a[i].LSB
00018 addwf POSTINC1,W ; W = W + b[i].LSB
00019 movwf POSTINC2 ; W -> c[i].LSB
00020 movf POSTINC0,W ; W = a[i].MSB
00021 addwfc POSTINC1,W ; W = W + b[i].MSB
00022 movwf POSTINC2 ; W -> c[i].MSB
00023 incf i
00024 bra ciklus
00025 ;--- végtelen ciklus
00026 vege: goto start
00027 END