Prévia do material em texto

<p>Sistemas Microprocessados</p><p>802 ; None</p><p>803 ;</p><p>804 ; Global Variables:</p><p>805 ; BIT_CNTR = Bit counter</p><p>806 ; TC72_ADX = TC72 Address</p><p>807 ; TC72_CTRL = TC72 Control Register</p><p>808 ;</p><p>809 ; Initialization:</p><p>810 ; None</p><p>811 ;</p><p>812 ; Output:</p><p>813 ; None</p><p>814 ;</p><p>815 ;----------------------------------------------------------------------</p><p>816</p><p>817 CMD_TC72_CTC</p><p>818</p><p>819 movlw D’16’ ; set bit counter to 16</p><p>820 movwf BIT_CNTR</p><p>821</p><p>822 bcf SCK ; set SCK low</p><p>823 bsf TC72_CE ; enable TC72 --> chip select high</p><p>824</p><p>825 ; Send address byte 0x80 to TC72 (write) followed by</p><p>826 ; continuous temperature conversion command.</p><p>827</p><p>828 movlw 0x80 ; address byte 0x80 (write)</p><p>829 movwf TC72_ADX</p><p>830</p><p>831 movlw b’00000100’ ; load continuous temp. conv. command</p><p>832 movwf TC72_CTRL</p><p>833</p><p>834 bcf STATUS, C ; clear Carry bit prior to rotate left</p><p>835</p><p>836 CMD_TC72_CTC_LOOP</p><p>837</p><p>838 rlf TC72_CTRL, F ; rotate left into Carry bit</p><p>839 rlf TC72_ADX, F</p><p>840</p><p>841 btfsc STATUS, C ; if Carry bit is set</p><p>842 bsf SDO ; SDO --> high</p><p>843 btfss STATUS, C ; if Carry bit is clear</p><p>844 bcf SDO ; SDO --> low</p><p>845</p><p>846 bsf SCK ; SCK rising edge (shift edge)</p><p>847 bcf SCK ; SCK falling edge (clock edge)</p><p>848</p><p>849 decfsz BIT_CNTR, F ; all 16 bits sent?</p><p>850 goto CMD_TC72_CTC_LOOP</p><p>851</p><p>852 bcf TC72_CE ; disable TC77 --> chip select low</p><p>853</p><p>854 return</p><p>855</p><p>856</p><p>857 ;----------------------------------------------------------------------</p><p>858 ; Subroutine: READ_TC72_TEMP</p><p>859 ;</p><p>860 ; Description: Read temperature and control register from the TC72</p><p>861 ;</p><p>862 ; Constants:</p><p>863 ; None</p><p>864 ;</p><p>865 ; Global Variables:</p><p>866 ; BIT_CNTR = Bit counter</p><p>867 ; TC72_ADX = TC72 Address</p><p>868 ; TC72_MSB = TC72 MSB Temperature</p><p>18 Julho de 2022</p>