00001 #include "p18cxxx.inc" 00002 extern adat, lepes, blep 00003 udata_acs 00004 i res 1 00005 j res 1 00006 k res 1 00007 RST CODE 00008 goto start 00009 PGM CODE 00010 start: movlw 0x24 00011 movwf i ; i = 0x24 00012 movlw 0x2 00013 movwf j ; j = 2 00014 ;--- k=blep(i,j) szubrutinhívás 00015 movff i,adat 00016 movff j,lepes 00017 call blep 00018 movff adat,k ; k = blep(i,j); 00019 vege: goto $ 00020 END