sıcaklık sensörü

[aLoNeDarK]

mrb P16F877A ile bir termometre devresi yapmam lazım belli bi derecede bi sinyal verecek mesela 30 dereceyi aştığı zaman bir sinyal verecek normal termometre devresi kodları bu araya komut eklemem gerekiyo yardımcı olurmusunuz

#include <P16F877A.inc>
DEGER EQU 0x20
SAYAC1 EQU 0x21
SAYAC2 EQU 0x22
VERI EQU 0x23
ONLAR EQU 0x24
BIRLER EQU 0x25
ARADEGER EQU 0x26 
ORG 0x00
START
BANKSEL TRISB     
CLRF TRISB 
MOVLW 0xFF
MOVWF TRISA
BSF ADCON1,7
BANKSEL ADCON0
MOVLW b'11000001'
MOVWF ADCON0     
CALL LCDTEMIZLE
CALL LCDKUR
CALL LCDADRES
CLRF ONLAR
CLRF BIRLER
YAZDIR
CLRF ONLAR
CLRF BIRLER
CALL BASLA
MOVWF ARADEGER
CALL ONLARBAS
CALL ADCYAZ
BASLA
BSF ADCON0,GO
CALL GECIKME
KONTROL
btfsc ADCON0,GO
GOTO KONTROL
BSF   STATUS,RP0
RRF   ADRESL,W
BCF   STATUS,RP0
MOVWF ARADEGER
ONLARBAS
MOVLW d'10'
SUBWF ARADEGER,0
btfss STATUS,C
GOTO BIRLERBAS
INCF ONLAR,1
MOVLW d'10'
SUBWF ARADEGER,1
GOTO ONLARBAS
BIRLERBAS
MOVF ARADEGER,0
MOVWF BIRLER
ADCYAZ
MOVLW 0X80
MOVWF DEGER 
CALL LCDADRES
MOVLW 'S'    
CALL VERIYAZ
MOVLW 'I'      
CALL VERIYAZ     
MOVLW 'C'           
CALL VERIYAZ
MOVLW 'A'      
CALL VERIYAZ
MOVLW 'K'      
CALL VERIYAZ
MOVLW 'L'      
CALL VERIYAZ
MOVLW 'I'      
CALL VERIYAZ
MOVLW 'K'      
CALL VERIYAZ
MOVLW '='           
CALL VERIYAZ     
BSF ONLAR,4
BSF ONLAR,5
MOVF ONLAR,0
CALL VERIYAZ
MOVLW b'00110000'
IORWF BIRLER,0
CALL VERIYAZ     
MOVLW ' '           
CALL VERIYAZ     
MOVLW 0xDF          
CALL VERIYAZ     
MOVLW 'C' 
CALL VERIYAZ
CALL YAZDIR
KOMUTYAZ
MOVWF VERI
SWAPF VERI,W
ANDLW 0x0F
MOVWF PORTB
BCF PORTB,4
CALL PULSE
MOVF VERI,W
ANDLW 0x0F
MOVWF PORTB
BCF PORTB,4
CALL PULSE
RETURN
VERIYAZ
MOVWF VERI
SWAPF VERI,W
ANDLW 0X0F
MOVWF PORTB
BSF PORTB,4
CALL PULSE
MOVF VERI,W
ANDLW 0X0F
MOVWF PORTB
BSF PORTB,4
CALL PULSE
RETURN
LCDTEMIZLE
MOVLW 0x01
CALL KOMUTYAZ
RETURN
LCDADRES
MOVF DEGER,0
CALL KOMUTYAZ
RETURN
LCDKUR
MOVLW 0x03
CALL KOMUTYAZ
MOVLW 0x03
CALL KOMUTYAZ
MOVLW 0x03
CALL KOMUTYAZ
MOVLW 0x02
CALL KOMUTYAZ
MOVLW 0x0C
CALL KOMUTYAZ
MOVLW 0x28
CALL KOMUTYAZ
MOVLW 0x80
CALL KOMUTYAZ
RETURN
PULSE
BSF PORTB,5
CALL GECIKME
BCF PORTB,5
GECIKME
MOVLW 0xAA
MOVWF SAYAC1
D1
MOVLW 0x10
MOVWF SAYAC2
D2 
DECFSZ SAYAC2
GOTO D2
DECFSZ SAYAC1
GOTO D1
RETURN
END

[eeburakdemir]

Termostatlar var sıcaklığına göre , ondan alırsın anahtar gibi kullan. İstediğin dereceye gelince kısa devre oluyordu. Normalde kapalı olanı da varmış.

http://www.kartalotomasyon.com.tr/Limit-Termostatlari,LA_1067-2.html#labels=1073-2

[aLoNeDarK]

Termostatlar var sıcaklığına göre , ondan alırsın anahtar gibi kullan. İstediğin dereceye gelince kısa devre oluyordu. Normalde kapalı olanı da varmış.

http://www.kartalotomasyon.com.tr/Limit-Termostatlari,LA_1067-2.html#labels=1073-2

bana kod lazım bu dediğimi yapacak kod lazım proje ödevim assembly diinde olması lazım

[mehmet]

O kadar kodu siz yazmadınız mı?

[aLoNeDarK]

O kadar kodu siz yazmadınız mı?

hayır bi yerden buldum araya sadece bi komut eklemem lazım ama yapamıyorum muhalefet olmayamı geldiniz yardımcı olmayamı bu projeyı yetiştirmem için çok az zamanım kaldı ve ben bu assembly dilinden hiçbişey anlamadım hiçbi yerdede bulamıyorum istediğim kodu bilen varsa yardım edin lütfen