Ajajaj, a mohlo se mi to odpálit při připojení + ? Předpokládám, že ano, protože už na mě úpně kašle. PS: K nule, nebo logické nule?
pokud si ho nemel jako vystup a jeste v log 0 tak nejspis ne …
mikroe.com/img/publication/p … fig3-7.gif levej obrazek
no,zjistis to nasledovne, vypnes ADC,vsechny piny nastavys na vystup + do logicky 1 a projedes to vsechno ledkou s odporen a uvidis …
administrator: přiloženy externí soubory
Otestováno. Vše vypadá OK. Ale reakce na tlačítko pořád nic. 
Schema jak tomas momentalne zapojeny + program , foto toho bastlu…
Ahoj, máš nějaké to schéma? Zdrojak se zdá být OK
Nějakou dobu jsem byl mimo, a proto žádné reakce. Schéma samozřejmě dodám, ale je to na nepájeném spoji a prakticky úplně promitivní. Jeden kondenz. mezi napájením, dva u krystalu a jedna led na kontrolu výstupu. Ale mezi tím jsem objevil krásy Proteuse. Zkusil jsem to v něm a nevím, jestli mám mít radost, ale chová se stejně jako v reálu. (tudíž vstup nejde) Vypadá to, jako kdybzch měl blbě nastavený Port B. Ukazuje mi B4, B5 jako prázdný a B6, B7 jako +5, přitom jsou všechny nastavený stejně. Plánek dodám zítra.
Tak jsem se dostal konečně k tomu, abych sejmul schéma.
[code]list P=16F690, R=DEC
include p16f690.inc
__config (_XT_OSC & _WDT_OFF & _PWRTE_ON & _MCLRE_ON & _CP_ON & _BOR_ON & _IESO_OFF & _FCMEN_OFF)
RAM equ 20h ; prvni adresa pameti RAM (PIC16F628, 16F88, 16F876, 16F690)
KLAVESA equ RAM+1 ; Stav tlacitka
TMP0 equ RAM+12 ; cekaci smycka
TMP1 equ RAM+13 ; cekaci smycka
TMP2 equ RAM+14 ; cekaci smycka
TMP3 equ RAM+15 ; cekaci smycka, stisk tlacitka
#define LED PORTA,0
#define LED2 PORTA,1
#define Tlac_Hod PORTB,4
#define Tlac_Min PORTB,5
#define Tlac_Ent PORTB,6
org 0x0000 ; zacatek programu
;**************************************************************************
INIT
bcf STATUS,RP0
bcf STATUS,RP1
clrf PORTA
clrf PORTB
bcf STATUS,RP0
bsf STATUS,RP1
movlw b’00000000’ ;0 Digital / 1 Analog
movwf ANSEL ;Nastavení Analog/Digital
movwf ANSELH ;Nastavení Analog/Digital
bsf STATUS,RP0
bcf STATUS,RP1
bcf OPTION_REG,7 ; PULL-UPy ON
movlw 0x00
movwf TRISA
movlw 0xF0
movwf TRISB
bcf STATUS,RP0
bcf STATUS,RP1
clrf LED
clrf LED2
;*************************************************************
;MAIN
;*************************************************************
TlacSmycka
Tlac1
BTFSC Tlac_Hod
goto Tlac2
; *** Akce tl.1 ***
BSF LED
call CEK500m
; *** **** **** ***
Tlac2
BTFSC Tlac_Min
goto TlacSmycka
BSF LED2
call CEK500m
Tlac3
BTFSC Tlac_Ent
BCF LED
BCF LED2
goto TlacSmycka
;**************************************************************************
CEK500m movlw .5 ; TMP2 = 20 cekej 2 sekundu
movwf TMP3
goto SMYCKA2
;-------------------------------
CEK100m movlw 0CEh ; cas = 100ms
movwf TMP0
movlw 0A0h
movwf TMP1
goto SMYCKA
;-------------------------------
SMYCKA2 call CEK100m
decfsz TMP3,F ; nejvetsi smycka
goto SMYCKA2
retlw 00h
;-------------------------------
SMYCKA movf TMP0,W
movwf TMP2
SMYCKA1 decfsz TMP2,F ; mala smycka
goto SMYCKA1
decfsz TMP1,F ; velka smycka
goto SMYCKA
retlw 00h
end[/code]
Vladousi nemáš pořád zapnuté Pull-UPy. V option se pull-upy povolují, ale jednotlivé odpory se zapínají v registru WPUB
Vypadá to dobře! V Proteu dělá to, co jsem si představoval. O víkendu to vyzkouším v reálu. Mnohokráte děkuji WPUB mě ani nenapadlo.