cofre digital URGENTE!

[senso]

Mas tu não tinhas isso a funcionar com o outro teclado?
Imagino que se fores ler o Programming help tem lá um esquema sobre como ligar isso, assim como se usares o google vais encontrar o que precisas, eu nunca usei um teclado desses, mas existe muita gente que já o fez por essa internet fora.

[johnny__08]

Mas tu não tinhas isso a funcionar com o outro teclado?
Imagino que se fores ler o Programming help tem lá um esquema sobre como ligar isso, assim como se usares o google vais encontrar o que precisas, eu nunca usei um teclado desses, mas existe muita gente que já o fez por essa internet fora.

sim mas isto ja vai a alguns meses atras, depois fui alterando tudo! ja procurei na net e nao encontro nada relativamento igual ou parecido , dai o meu pedido de ajuda aki no forum! de seguida vou enviar o primeira programaçao feito no picaxe com akele primeiro teclado  a funcionar!

[johnny__08]

Mas tu não tinhas isso a funcionar com o outro teclado?
Imagino que se fores ler o Programming help tem lá um esquema sobre como ligar isso, assim como se usares o google vais encontrar o que precisas, eu nunca usei um teclado desses, mas existe muita gente que já o fez por essa internet fora.

sim mas isto ja vai a alguns meses atras, depois fui alterando tudo! ja procurei na net e nao encontro nada relativamento igual ou parecido , dai o meu pedido de ajuda aki no forum! de seguida vou enviar o primeira programaçao feito no picaxe com akele primeiro teclado  a funcionar!

main:   if pin3 = 1 and pin4 = 1 then novo
   if b0 = 0 then primeiro
   if b0 = 1 then segundo
   if b0 = 2 then terceiro
   if b0 = 3 then quarto
   if pin3 = 1 and pin6 = 1 then okb
   goto main
   
   
primeiro:if pin3 = 1 and pin5 = 1 then b_0
   if pin0 = 1 and pin4 = 1 then b_1
   if pin0 = 1 and pin5 = 1 then b_2
   if pin0 = 1 and pin6 = 1 then b_3
   if pin1 = 1 and pin4 = 1 then b_4
   if pin1 = 1 and pin5 = 1 then b_5
   if pin1 = 1 and pin6 = 1 then b_6
   if pin2 = 1 and pin4 = 1 then b_7
   if pin2 = 1 and pin5 = 1 then b_8
   if pin2 = 1 and pin6 = 1 then b_9
   goto main
   
segundo:if pin3 = 1 and pin5 = 1 then b_0a
   if pin0 = 1 and pin4 = 1 then b_1a
   if pin0 = 1 and pin5 = 1 then b_2a
   if pin0 = 1 and pin6 = 1 then b_3a
   if pin1 = 1 and pin4 = 1 then b_4a
   if pin1 = 1 and pin5 = 1 then b_5a
   if pin1 = 1 and pin6 = 1 then b_6a
   if pin2 = 1 and pin4 = 1 then b_7a
   if pin2 = 1 and pin5 = 1 then b_8a
   if pin2 = 1 and pin6 = 1 then b_9a
   goto segundo
   
   
terceiro:if pin3 = 1 and pin5 = 1 then b_0aa
   if pin0 = 1 and pin4 = 1 then b_1aa
   if pin0 = 1 and pin5 = 1 then b_2aa
   if pin0 = 1 and pin6 = 1 then b_3aa
   if pin1 = 1 and pin4 = 1 then b_4aa
   if pin1 = 1 and pin5 = 1 then b_5aa
   if pin1 = 1 and pin6 = 1 then b_6aa
   if pin2 = 1 and pin4 = 1 then b_7aa
   if pin2 = 1 and pin5 = 1 then b_8aa
   if pin2 = 1 and pin6 = 1 then b_9aa
   goto terceiro
   
quarto:if pin3 = 1 and pin5 = 1 then b_0aaa
   if pin0 = 1 and pin4 = 1 then b_1aaa
   if pin0 = 1 and pin5 = 1 then b_2aaa
   if pin0 = 1 and pin6 = 1 then b_3aaa
   if pin1 = 1 and pin4 = 1 then b_4aaa
   if pin1 = 1 and pin5 = 1 then b_5aaa
   if pin1 = 1 and pin6 = 1 then b_6aaa
   if pin2 = 1 and pin4 = 1 then b_7aaa
   if pin2 = 1 and pin5 = 1 then b_8aaa
   if pin2 = 1 and pin6 = 1 then b_9aaa
   goto quarto
   
   
b_0: b1 = %00000000
   b0 = b0 + 1
   goto main
b_1: b1 = %00000001
   b0 = b0 + 1
   goto main
b_2: b1 = %00000010
   b0 = b0 + 1
   goto main
b_3: b1 = %00000011
   b0 = b0 + 1
   goto main
b_4: b1 = %00000100
   b0 = b0 + 1
   goto main
b_5: b1 = %00000101
   b0 = b0 + 1
   goto main
b_6: b1 = %00000110
   b0 = b0 + 1
   goto main
b_7: b1 = %00000111
   b0 = b0 + 1
   goto main
b_8: b1 = %00001000
   b0 = b0 + 1
   goto main
b_9: b1 = %00001001
   b0 = b0 + 1
   goto main

b_0a: b2 = %00000000
   b0 = b0 + 1
   goto main
b_1a: b2 = %00000001
   b0 = b0 + 1
   goto main
b_2a: b2 = %00000010
   b0 = b0 + 1
   goto main
b_3a: b2 = %00000011
   b0 = b0 + 1
   goto main
b_4a: b2 = %00000100
   b0 = b0 + 1
   goto main
b_5a: b2 = %00000101
   b0 = b0 + 1
   goto main
b_6a: b2 = %00000110
   b0 = b0 + 1
   goto main
b_7a: b2 = %00000111
   b0 = b0 + 1
   goto main
b_8a: b2 = %00001000
   b0 = b0 + 1
   goto main
b_9a: b2 = %00001001
   b0 = b0 + 1
   goto main

b_0aa: b3 = %00000000
   b0 = b0 + 1
   goto main
b_1aa: b3 = %00000001
   b0 = b0 + 1
   goto main
b_2aa: b3 = %00000010
   b0 = b0 + 1
   goto main
b_3aa: b3 = %00000011
   b0 = b0 + 1
   goto main
b_4aa: b3 = %00000100
   b0 = b0 + 1
   goto main
b_5aa: b3 = %00000101
   b0 = b0 + 1
   goto main
b_6aa: b3 = %00000110
   b0 = b0 + 1
   goto main
b_7aa: b3 = %00000111
   b0 = b0 + 1
   goto main
b_8aa: b3 = %00001000
   b0 = b0 + 1
   goto main
b_9aa: b3 = %00001001
   b0 = b0 + 1
   goto main

b_0aaa: b4 = %00000000
   b0 = b0 + 1
   goto okb
b_1aaa: b4 = %00000001
   b0 = b0 + 1
   goto okb
b_2aaa: b4 = %00000010
   b0 = b0 + 1
   goto okb
b_3aaa: b4 = %00000011
   b0 = b0 + 1
   goto okb
b_4aaa: b4 = %00000100
   b0 = b0 + 1
   goto okb
b_5aaa: b4 = %00000101
   b0 = b0 + 1
   goto okb
b_6aaa: b4 = %00000110
   b0 = b0 + 1
   goto okb
b_7aaa: b4 = %00000111
   b0 = b0 + 1
   goto okb
b_8aaa: b4 = %00001000
   b0 = b0 + 1
   goto okb
b_9aaa: b4 = %00001001
   b0 = b0 + 1
   goto okb


novo: b10 = 0
   if b14 = 0 then primeiron
   if b14 = 1 then segundon
   if b14 = 2 then terceiron
   if b14 = 3 then quarton
   goto novo
   
primeiron:if pin3 = 1 and pin5 = 1 then a0b
   if pin0 = 1 and pin4 = 1 then a1b
   if pin0 = 1 and pin5 = 1 then a2b
   if pin0 = 1 and pin6 = 1 then a3b
   if pin1 = 1 and pin4 = 1 then a4b
   if pin1 = 1 and pin5 = 1 then a5b
   if pin1 = 1 and pin6 = 1 then a6b
   if pin2 = 1 and pin4 = 1 then a7b
   if pin2 = 1 and pin5 = 1 then a8b
   if pin2 = 1 and pin6 = 1 then a9b
   goto primeiro_
   
segundon:if pin3 = 1 and pin5 = 1 then a0ab
   if pin0 = 1 and pin4 = 1 then a1ab
   if pin0 = 1 and pin5 = 1 then a2ab
   if pin0 = 1 and pin6 = 1 then a3ab
   if pin1 = 1 and pin4 = 1 then a4ab
   if pin1 = 1 and pin5 = 1 then a5ab
   if pin1 = 1 and pin6 = 1 then a6ab
   if pin2 = 1 and pin4 = 1 then a7ab
   if pin2 = 1 and pin5 = 1 then a8ab
   if pin2 = 1 and pin6 = 1 then a9ab
   goto segundo_
   
   
terceiron:if pin3 = 1 and pin5 = 1 then a0aab
   if pin0 = 1 and pin4 = 1 then a1aab
   if pin0 = 1 and pin5 = 1 then a2aab
   if pin0 = 1 and pin6 = 1 then a3aab
   if pin1 = 1 and pin4 = 1 then a4aab
   if pin1 = 1 and pin5 = 1 then a5aab
   if pin1 = 1 and pin6 = 1 then a6aab
   if pin2 = 1 and pin4 = 1 then a7aab
   if pin2 = 1 and pin5 = 1 then a8aab
   if pin2 = 1 and pin6 = 1 then a9aab
   goto terceiro_

   
quarton:if pin3 = 1 and pin5 = 1 then a0aaab
   if pin0 = 1 and pin4 = 1 then a1aaab
   if pin0 = 1 and pin5 = 1 then a2aaab
   if pin0 = 1 and pin6 = 1 then a3aaab
   if pin1 = 1 and pin4 = 1 then a4aaab
   if pin1 = 1 and pin5 = 1 then a5aaab
   if pin1 = 1 and pin6 = 1 then a6aaab
   if pin2 = 1 and pin4 = 1 then a7aaab
   if pin2 = 1 and pin5 = 1 then a8aaab
   if pin2 = 1 and pin6 = 1 then a9aaab
   goto quarto_


a0b: b1 = %00000000
   b14 = b14 + 1
   goto novo
a1b: b1 = %00000001
   b14 = b14 + 1
   goto novo
a2b: b1 = %00000010
   b14 = b14 + 1
   goto novo
a3b: b1 = %00000011
   b14 = b14 + 1
   goto novo
a4b: b1 = %00000100
   b14 = b14 + 1
   goto novo
a5b: b1 = %00000101
   b14 = b14 + 1
   goto novo
a6b: b1 = %00000110
   b14 = b14 + 1
   goto novo
a7b: b1 = %00000111
   b14 = b14 + 1
   goto novo
a8b: b1 = %00001000
   b14 = b14 + 1
   goto novob
a9b: b1 = %00001001
   b14 = b14 + 1
   goto novo

a0ab: b2 = %00000000
   b14 = b14 + 1
   goto novo
a1ab: b2 = %00000001
   b14 = b14 + 1
   goto novo
a2ab: b2 = %00000010
   b14 = b14 + 1
   goto novo
a3ab: b2 = %00000011
   b14 = b14 + 1
   goto novo
a4ab: b2 = %00000100
   b14 = b14 + 1
   goto novo
a5ab: b2 = %00000101
   b14 = b14 + 1
   goto novo
a6ab: b2 = %00000110
   b14 = b14 + 1
   goto novo
a7ab: b2 = %00000111
   b14 = b14 + 1
   goto novo
a8ab: b2 = %00001000
   b14 = b14 + 1
   goto novo
a9ab: b2 = %00001001
   b14 = b14 + 1
   goto novo

a0aab: b3 = %00000000
   b14 = b14 + 1
   goto novo
a1aab: b3 = %00000001
   b14 = b14 + 1
   goto novo
a2aab: b3 = %00000010
   b14 = b14 + 1
   goto novo
a3aab: b3 = %00000011
   b14 = b14 + 1
   goto novo
a4aab: b3 = %00000100
   b14 = b14 + 1
   goto novo
a5aab: b3 = %00000101
   b14 = b14 + 1
   goto novo
a6aab: b3 = %00000110
   b14 = b14 + 1
   goto novo
a7aab: b3 = %00000111
   b14 = b14 + 1
   goto novo
a8aab: b3 = %00001000
   b14 = b14 + 1
   goto novo
a9aab: b3 = %00001001
   b14 = b14 + 1
   goto novo

a0aaab: b4 = %00000000
   b14 = b14 + 1
   goto okcn
a1aaab: b4 = %00000001
   b14 = b14 + 1
   goto okcn
a2aaab: b4 = %00000010
   b14 = b14 + 1
   goto okcn
a3aaab: b4 = %00000011
   b14 = b14 + 1
   goto okcn
a4aaab: b4 = %00000100
   b14 = b14 + 1
   goto okcn
a5aaab: b4 = %00000101
   b14 = b14 + 1
   goto okcn
a6aaab: b4 = %00000110
   b14 = b14 + 1
   goto okcn
a7aaab: b4 = %00000111
   b14 = b14 + 1
   goto okcn
a8aaab: b4 = %00001000
   b14 = b14 + 1
   goto okcn
a9aaab: b4 = %00001001
   b14 = b14 + 1
   goto okcn   


novob:if b10 = 0 then primeiro_
   if b10 = 1 then segundo_
   if b10 = 2 then terceiro_
   if b10 = 3 then quarto_
   goto main
   
   
primeiro_:if pin3 = 1 and pin5 = 1 then a0
   if pin0 = 1 and pin4 = 1 then a1
   if pin0 = 1 and pin5 = 1 then a2
   if pin0 = 1 and pin6 = 1 then a3
   if pin1 = 1 and pin4 = 1 then a4
   if pin1 = 1 and pin5 = 1 then a5
   if pin1 = 1 and pin6 = 1 then a6
   if pin2 = 1 and pin4 = 1 then a7
   if pin2 = 1 and pin5 = 1 then a8
   if pin2 = 1 and pin6 = 1 then a9
   goto primeiro_
   
segundo_:if pin3 = 1 and pin5 = 1 then a0a
   if pin0 = 1 and pin4 = 1 then a1a
   if pin0 = 1 and pin5 = 1 then a2a
   if pin0 = 1 and pin6 = 1 then a3a
   if pin1 = 1 and pin4 = 1 then a4a
   if pin1 = 1 and pin5 = 1 then a5a
   if pin1 = 1 and pin6 = 1 then a6a
   if pin2 = 1 and pin4 = 1 then a7a
   if pin2 = 1 and pin5 = 1 then a8a
   if pin2 = 1 and pin6 = 1 then a9a
   goto segundo_
   
   
terceiro_:if pin3 = 1 and pin5 = 1 then a0aa
   if pin0 = 1 and pin4 = 1 then a1aa
   if pin0 = 1 and pin5 = 1 then a2aa
   if pin0 = 1 and pin6 = 1 then a3aa
   if pin1 = 1 and pin4 = 1 then a4aa
   if pin1 = 1 and pin5 = 1 then a5aa
   if pin1 = 1 and pin6 = 1 then a6aa
   if pin2 = 1 and pin4 = 1 then a7aa
   if pin2 = 1 and pin5 = 1 then a8aa
   if pin2 = 1 and pin6 = 1 then a9aa
   goto terceiro_

   
quarto_:if pin3 = 1 and pin5 = 1 then a0aaa
   if pin0 = 1 and pin4 = 1 then a1aaa
   if pin0 = 1 and pin5 = 1 then a2aaa
   if pin0 = 1 and pin6 = 1 then a3aaa
   if pin1 = 1 and pin4 = 1 then a4aaa
   if pin1 = 1 and pin5 = 1 then a5aaa
   if pin1 = 1 and pin6 = 1 then a6aaa
   if pin2 = 1 and pin4 = 1 then a7aaa
   if pin2 = 1 and pin5 = 1 then a8aaa
   if pin2 = 1 and pin6 = 1 then a9aaa
   goto quarto_


a0: b5 = %00000000
   b10 = b10 + 1
   goto novob
a1: b5 = %00000001
   b10 = b10 + 1
   goto novob
a2: b5 = %00000010
   b10 = b10 + 1
   goto novob
a3: b5 = %00000011
   b10 = b10 + 1
   goto novob
a4: b5 = %00000100
   b10 = b10 + 1
   goto novob
a5: b5 = %00000101
   b10 = b10 + 1
   goto novob
a6: b5 = %00000110
   b10 = b10 + 1
   goto novob
a7: b5 = %00000111
   b10 = b10 + 1
   goto novob
a8: b5 = %00001000
   b10 = b10 + 1
   goto novob
a9: b5 = %00001001
   b10 = b10 + 1
   goto novob

a0a: b6 = %00000000
   b10 = b10 + 1
   goto novob
a1a: b6 = %00000001
   b10 = b10 + 1
   goto novob
a2a: b6 = %00000010
   b10 = b10 + 1
   goto novob
a3a: b6 = %00000011
   b10 = b10 + 1
   goto novob
a4a: b6 = %00000100
   b10 = b10 + 1
   goto novob
a5a: b6 = %00000101
   b10 = b10 + 1
   goto novob
a6a: b6 = %00000110
   b10 = b10 + 1
   goto novob
a7a: b6 = %00000111
   b10 = b10 + 1
   goto novob
a8a: b6 = %00001000
   b10 = b10 + 1
   goto novob
a9a: b6 = %00001001
   b10 = b10 + 1
   goto novob

a0aa: b7 = %00000000
   b10 = b10 + 1
   goto novob
a1aa: b7 = %00000001
   b10 = b10 + 1
   goto novob
a2aa: b7 = %00000010
   b10 = b10 + 1
   goto novob
a3aa: b7 = %00000011
   b10 = b10 + 1
   goto novob
a4aa: b7 = %00000100
   b10 = b10 + 1
   goto novob
a5aa: b7 = %00000101
   b10 = b10 + 1
   goto novob
a6aa: b7 = %00000110
   b10 = b10 + 1
   goto novob
a7aa: b7 = %00000111
   b10 = b10 + 1
   goto novob
a8aa: b7 = %00001000
   b10 = b10 + 1
   goto novob
a9aa: b7 = %00001001
   b10 = b10 + 1
   goto novob

a0aaa: b8 = %00000000
   b10 = b10 + 1
   goto okcn
a1aaa: b8 = %00000001
   b10 = b10 + 1
   goto okcn
a2aaa: b8 = %00000010
   b10 = b10 + 1
   goto okcn
a3aaa: b8 = %00000011
   b10 = b10 + 1
   goto okcn
a4aaa: b8 = %00000100
   b10 = b10 + 1
   goto okcn
a5aaa: b8 = %00000101
   b10 = b10 + 1
   goto okcn
a6aaa: b8 = %00000110
   b10 = b10 + 1
   goto okcn
a7aaa: b8 = %00000111
   b10 = b10 + 1
   goto okcn
a8aaa: b8 = %00001000
   b10 = b10 + 1
   goto okcn
a9aaa: b8 = %00001001
   b10 = b10 + 1
   goto okcn


ok:if b1 = b5 then ok2
   goto erro
ok2:if b2 = b6 then ok3
   goto erro
ok3:if b3 = b7 then ok4
   goto erro
ok4:if b4 = b8 then abrir
   goto erro

abrir:let pins = %10000000
   pause 1000
   let pins = %00000000
goto limparb

erro:if b9 = 0 then limpar
   if b9 = 1 then limpar
   if b9 = 2 then alarme
   
alarme:let pins = %01000111
   pause 4000
   let pins = %00000111
   goto limpar   
   
limpar:b1 = %00000000
   b2 = %00000000
   b3 = %00000000
   b4 = %00000000
   b0 = 0
   b9 = b9 + 1
   goto kerro
   
   
kerro:if b9 = 1 then s1
   if b9 = 2 then s2
   if b9 = 3 then s3
   
s1:let pins = %00000001
   goto main
s2:let pins = %00000011
   goto main
   
s3:let pins = %00000111
   goto bloq

okb:if pin3 = 1 and pin6 = 1 then ok
   goto okb
   
bloq:if pin3 = 1 and pin4 = 1 then novo1
   goto bloq

novo1:pause 4000
   if pin3 = 1 and pin4 = 1 then novo2
   goto novo1

novo2:pause 4000
   if pin3 = 1 and pin4 = 1 then desblq
   goto novo2

desblq:b9 = 0
   let pins = %01000000
   let pins = %00000000
   goto main
   
okc:if pin3 = 1 and pin6 = 1 then main
   goto okc

limparb:b1 = %00000000
   b2 = %00000000
   b3 = %00000000
   b4 = %00000000
   b0 = 0
   b9 = 0
   b14 = 0
   goto main

okcn:if b1 = b5 then ok2cn
   goto limparb
ok2cn:if b2 = b6 then ok3cn
   goto limparb
ok3cn:if b3 = b7 then ok4cn
   goto limparb
ok4cn:if b4 = b8 then novob
   goto limparb

[andre_f_carvalho]

boas, antes demais, as tuas ligações não irão funcionar nem que rezes, isto porque se no programa tens de ter as entradas a para que dê algum sinal e na tua ideia ter resistências ligadas a massa para dar os 0v n te serve de nada se n tiveres algo que de 1 nas entradas ve por este esquema, pode ser que te safes.



os Opto são os 4n35, eu usei este para o alarme da minha pap, mas não te posso facultar o código...


cump

[Sérgio_Sena]

Conseguem descortinar alguma coisa, no meio de tanta palha?

nem um comentário tem....

[andre_f_carvalho]

Conseguem descortinar alguma coisa, no meio de tanta palha?

nem um comentário tem....

olha para te dizer a verdade nem percebi o código dele, mas pôs um esquema para ele saber mais ou menos o que fazer

[amando96]

Para quem não percebe muito de basic essa grande parede de código sem coments é um pesadelo... 

Dizes que funcionava num teclado e agora com este não, mas que modificaste o código para dar, quase decerteza o que difere de um teclado para o outro é a posição dos pinos que correspondem às colunas e linhas, tens datasheet do teclado? se não pega no multímetro e começa a carregar em botões até descobrires se é igual ou não, ou então muda para o outro teclado, visto ser urgente.

[fre_deri_co]

Boas johnny_08, o teu programa esta abusivamente repetido...

com o picaxe estou completamente a vontade, so ainda não percebi bem o que pretendes (confesso que também não li tudo...
a questão que meto para numa tentativa te ajudar era se podias postar o teu esquema (pelo menos como estão as entradas e saídas) para pelos eliminar a hipótese de erro nas ligações e se possível uma "lista" de passos que pretendes, do género:

-primeiro passo cobre aberto, código inserido quando fecha;
-para abrir 3 tentativas, se atingido o limite por exemplo não permite nova tentativa durante os próximos 5 min.;
-o código de abertura será sempre o mesmo quando o cofre fechado;
-etc

outra questão que meto é quando é que tens de entregar o projecto?!