|
Device = 16F690 XTAL = 20 Config = %00000001000010 ' HS osilator Declare ADIN_RES = 10 Declare ADIN_TAD FRC Declare ADIN_STIME 100 TRISA = %11111111 TRISB = %11101111 'gırısler 1 TRISC = %11000000 INTCON = 0 'adcon1 = CM1CON0 = %00000000 CM2CON0 = %00000000 ADCON0 = %10000011 ANSEL = %00000111 ANSELH = %00000100 OPTION_REG = %10000000 DelayMS 270 goto main display_sur: display sürme kısmı bu alan return main: oku: If Anolog = 1 Then Anolog = 11 Voltage = ADIn 2 Say = Say + 1 If Say > 185 Then ' 285 If Anolog = 0 Then T_voltage = 0 If Anolog = 11 Then S_voltage = 0 If Anolog = 2 Then R_voltage = 0 gercek_1 = 160 GoTo hesap EndIf If sifir_kontrol = 0 Then If Voltage > 10 Then GoTo oku Else If Say > 1 Then GoSub display_sur ' sifir_kontrol = 1 Say = 0 EndIf Else If Voltage < 10 Then GoTo oku Else sifir_kontrol = 0 GoTo ornek_al EndIf EndIf GoTo oku '------------------------------------------------- ornek_al: If Anolog = 1 Then Anolog = 11 For Say = 0 To 83 Voltage = ADIn 2 If Toplam_v < Voltage Then Toplam_v = Voltage EndIf Next DelayMS 1 DelayUS 50 If Anolog = 11 Then Anolog = 1 Select Case Anolog Case 0 S = ADIn 11 T = ADIn 2 Case 1 R = ADIn 0 T = ADIn 2 Case 2 R = ADIn 0 S = ADIn 11 End Select goto main Anolog okur iken portlar karşıyor bunun sebebini comprator olarak zannediyorum bilgisi olan arkadaş var mı yada pıc16f690 ile çalışan arkadaş varmı www.gruparge.com |
amatör bir web sayfası yaptık ana sayfada 6 adet video var takribi 1Mb büyüklüğünde sayfa ilk açıldığı zaman tüm videoları yüklemeye çalışıyor bu yüzden sayfa ilk açılırken epey zaman geçiyor
videolar sadece başla düğmesine bastığımızda yüklenmesini istiyoruz dreamweave8 kullanıyoruz nasıl bir çalışma yapalım
www.arusserigrafi.com.tr
Teşekkürler