Sissejuhatus digitaaltehnikasse praktikum, AD-muunduri aruanne
org 0x00
bsf STATUS,RP0 ;Valime mäluala 1
bcf STATUS,RP1
movlw b'00000000' ;Kogu portD on väljund
movwf TRISD
movlw b'00000000' ;Kogu portC on väljund
movwf TRISC
movlw .0
movwf ADCON1 ;PORTA seadistatakse
analoogsisenditeks
movlw b'11111111' ;Kogu portA on sisend
movwf TRISA
bcf STATUS,RP0 ;Valime mäluala 0
bcf STATUS,RP1
bsf ADCON0,0 ;Käivitame A/D muunduri
wmainloop
bsf ADCON0,2 ;Alustame A/D muunduriga pinge mõõtmist