16f877 analog kontrol sorunu pic basic

[alpergen]

merhaba arkadaşlar ben pic basic konusunda yeni sayılırım.
Forumlardaki konuları inceleyerek bir yazılım kurdum ama simulasyonda çalıştıramadım.
birnevi karşılaştırıcı devre olacak ama çalıştıramadım.

Kurmak istediğim devre pic 877de bir butona basıldığında, pic in analog girişinde ki potu kontrol edecek en üst değerdeyken ve en alt değerdeyken bir dijital çıkış versin istiyorum.eğer pot ara değerdeyse çıkış pasif olmalı.

yazılımım.; (adcon0 veya adcon1 değerlerinde mi yanlış yapıyorum)

TRISA=%11111111
TRISB=%00011111
TRISC=%00110000
TRISD=%00010010

ADCON1=%1000000

DEFINE    ADC_BITS    8     'A/D  çevirim sonucu kaç bit olacak
DEFINE    ADC_CLOCK    1      'Clock  kaynağı (1=xtal)
DEFINE    ADC_SAMPLEUS 100   'Örnekleme zamanı mikro saniye cinsinden.

feed12 VAR byte
SYMBOL BUTON12= PORTB.4

ADCIN 4 ,FEED12 '4 nolu kanaldan  Analog değeri oku ve FEED12 değişkenine aktar.


basla:
pause 20
if buton12 = 0 then start
goto basla

start:

IF  feed12=>100 and feed12=<199 THEN yak
IF  feed12=>200 THEN sondur
IF  feed12=<99  THEN sondur
goto  yak

yak:
pause 10
high portd.3
goto basla

sondur:
pause 10
low portd.3
goto basla