2 Kanal Çıkışlı LDR Devresi

   İki kanallı olmasının sebebi şöyle;
Az karanlıkta tek led, çok karanlıkta iki led
yanmaktadır. Ledlerin yerine transistör ile
röleyi sürebilirsiniz. Röleye ters yönde diyot
bağlamanız gerekecek.
   Tüm dosyaların bulunduğu RAR dosyasını
aşağıdaki linkten indirebilirsiniz.

DEFINE LOADER_USED 1
'define osccal_1k 1
define osc 4
'@ DEVICE pic12F675,XT_OSC,mclr_off
@ DEVICE pic12f675,INTRC_OSC_NOCLKOUT, mclr_off
Define ADC_BITS 8 ' Set number of bits in result
Define ADC_CLOCK 3 ' Set clock source (3=rc)
Define ADC_SAMPLEUS 50 ' Set sampling time in uS

adval var byte


 ANSEL = 0100 ' AN2 analog kanal digerleri digital
 trisio=001111  ' giris ve cikislar ayarlandi
gpio  =001111


              OPTION_REG.7 = 0
OSCCAL = 3432
     high   gpio.4
     pause 3000
     low gpio.4

ANA:
     ADCIN 2, adval  ' AN2

  select case adval

    case is<50
    high gpio.4
 
    case is<80
    high gpio.5
 
  case is>50
  low gpio.4: low gpio.5
 
  end select

  Goto ANA

 End
2 Kanal LDR Dosyaları indir    12F675 LDR Bas Videolu