Newbi braucht hilfe

[BodoK.]

Hallo ich beschäftige mich seit 2 Wochen mit Pic’s. Ich habe den Pic16f876.

Ich habe folgendes prob. Ich möchte in ein vorhandenes Programm einige Ausgänge integriert.

Das original Programm habe ich von http://www.sprut.de/electronic/pic/projekte/thermo/thermo.htm

So und ich habe es folgendermaßen abgewandelt.

#define Offset D'250' ; Offset des PTC
#define Toff1 D'30'
#define Toff2 D'30'
#define Ton1 D'38'
#define Ton2 D'38'

Das sind die werte bei den der Lüfter an bzw aus gehen soll.
Lüfter ein/aus-schalten

Luft1
; prüfen ob Temp<Toff
MOVFW Toff1
subwf f0, w ; w:=f-33 = temp-Toff
btfss STATUS, C
bcf PORTC, 5 ; Lüfter aus
; prüfen ob Temp>Ton
MOVFW Ton1
subwf f0, w ; w:=f-38 = temp-Ton
btfsc STATUS, C
bsf PORTC, 5 ; Lüfter an
return

Luft2
; prüfen ob Temp<Toff
MOVFW Toff2
subwf f0, w ; w:=f-w = temp-Toff
btfss STATUS, C
bcf PORTC, 4 ; Lüfter aus
; prüfen ob Temp>Ton
MOVFW Ton2
subwf f0, w ; w:=f-w = temp-Ton
btfsc STATUS, C
bsf PORTC, 4 ; Lüfter an
return
Die Unterprogramme werden im Hauptprogramm auf gerufen.

Ich weiß niocht was ich falsch gemacht habe kann mir jemand helfen?


Danke im voraus Bodo K.