Ajuda com Painel de Led's

[leofl]

Eu queria montar um painel de leds que mostrasse a Letra L, depois a letra E e depois a letro O. Isso é possível? Alguém tem o esquema?

Muito Obrigado.

[LEOPUENA]

Isso é mais do que possivel, meu nome tambem é Leo e já fiz isso muitas vezes. Com uma matris de de led 5x4 usando um PIC é bem possivel.

Mas tambem podes fazer usando um display de 7 segmentos, controlado atraves de um pic.

sabes programar?

[leofl]

Não sei programar não, poderia me falar como?

[LEOPUENA]

Primeiro deves aprender a programar, tem esse link com um curso pra PIC em linguagem assembly

Contudo, tal como disse, tenho um programa que faz isso.

;-----------------------------------------------

;Este projecto é um painel com 30 LEDs -

;os leds serão ligados no portb -

;criado por LeoPUENA aos 16.06.2010 -

;-----------------------------------------------

LIST P=16F628A ;INFORMA AO COMPILADOR O TIPO DE PIC USADO

RADIX DEC ;TODO NÚMERO NAO ESPECIFICADO SERA DECIMAL

#INCLUDE<P16F628A.INC> ; INCLUI A BIBLIOTECA PADRÃO DO PIC USADA

__CONFIG _BOREN_ON & _CP_OFF & _PWRTE_ON & _WDT_OFF & _LVP_OFF & _MCLRE_ON & _INTOSC_OSC_CLKOUT

;-------------------- difiniçao de variaveis e constantes ------------------------------

CBLOCK 20H

LETRA

LETRA1

LETRA2

ATRASO1 ;VARIAVEL PARA CRIAÇAO DE DELAY

VEZES ;VARIAVEL PARA CRIAÇAO DE DELAY

DADOS ;VARIAVEL PARA CRIAÇAO DE DELAY

ENDC

#DEFINE CH1 PORTB,7 ;O LED SERÁ CONTROLADO PEL0 PINO RB0

#DEFINE CH2 PORTB,6 ;O LED SERÁ CONTROLADO PELO PINO RB1

#DEFINE CH3 PORTB,5 ;O LED SERÁ CONTROLADO PEL0 PINO RB0

#DEFINE CH4 PORTB,4

;------------------------ MACRO PARA MUDANÇA DE BANCO ----------------------------------

BANCO0 MACRO

BCF STATUS,RP0

BSF STATUS,RP1

ENDM

BANCO1 MACRO

BSF STATUS,RP0

BCF STATUS,RP1

ENDM

BANCO2 MACRO

BCF STATUS,RP0

BSF STATUS,RP1

ENDM

BANCO3 MACRO

BSF STATUS,RP0

BSF STATUS,RP1

ENDM

;------------------------------------------------------------------------------------

ORG 0H

GOTO INICIO ; VAI PARA O INICIO DO PROGRAMA

;------------------------------------------------------------------------------------

ORG 4H

RETFIE ; AS INTERRUPÇOES NÃO SERÃO UTILIZADAS

;------------------------------------------------------------------------------------

INICIO

BANCO0

CLRF PORTB

MOVLW 7

MOVWF CMCON ; DEFINIMOS TODOS OS PINOS DO PORTA COMO DIGITAIS.

BANCO1

BSF PCON,3 ; OSCILADOR A 4MHZ

MOVLW B'11110000'

MOVWF TRISB ; TODOS OS PINOS DO PORT B SERÃ SAIDA

MOVLW B'11111111'

MOVWF TRISA ; TODOS OS PINOS DO PORT A SERÃ SAIDA

movlw b'10000111'

movwf option_reg

BANCO0

CLRF INTCON

;---------------------------------------------------------------------------

LOOP

CALL L

BTFSS CH4

GOTO MAIN

CALL E

BTFSS CH4

GOTO MAIN

CALL O

BTFSS CH4

GOTO MAIN

CLRF PORTB

CALL DELAY

GOTO LOOP

;«««««««««««««««««««««««««««««ALFABETO««««««««««««««««««««««««««««««

;»»»»»»»»»»»»»»»»»»»»»»»»»»»»»»»»»»»»»»»»»»»»»»»»»»»»»»»»»»»»»»»»»»»

;-------------------------------------------------------------------------------

;-------------------------------------------------------------------------------

E

MOVLW D'2'

MOVWF LETRA

MOVWF LETRA1

MOVWF LETRA2

CALL E_1

RETURN

E_1

CALL E_2

DECFSZ LETRA1

GOTO E_1

RETURN

E_2

CALL E_3

DECFSZ LETRA2

GOTO E_2

RETURN

E_3

MOVLW D'0'

MOVWF PORTB

MOVLW D'1'

MOVWF PORTB

MOVLW D'2'

MOVWF PORTB

MOVLW D'3'

MOVWF PORTB

MOVLW D'4'

MOVWF PORTB

MOVLW D'5'

MOVWF PORTB

MOVLW D'6'

MOVWF PORTB

MOVLW D'7'

MOVWF PORTB

MOVLW D'8'

MOVWF PORTB

MOVLW D'11'

MOVWF PORTB

MOVLW D'12'

MOVWF PORTB

MOVWF PORTB

MOVLW D'15'

MOVWF PORTB

DECFSZ LETRA

GOTO E_3

RETURN

;-------------------------------------------------------------------------------

;-------------------------------------------------------------------------------

L

MOVLW D'3'

MOVWF LETRA

MOVWF LETRA1

MOVWF LETRA2

CALL L_1

RETURN

L_1

CALL L_2

DECFSZ LETRA2

GOTO L_1

RETURN

L_2

CALL L_3

DECFSZ LETRA1

GOTO L_2

RETURN

L_3

MOVLW D'0'

MOVWF PORTB

MOVLW D'1'

MOVWF PORTB

MOVLW D'2'

MOVWF PORTB

MOVLW D'3'

MOVWF PORTB

MOVLW D'7'

MOVWF PORTB

MOVLW D'11'

MOVWF PORTB

DECFSZ LETRA

GOTO L_3

RETURN

;-------------------------------------------------------------------------------

;-------------------------------------------------------------------------------

O

MOVLW D'2'

MOVWF LETRA

MOVWF LETRA1

MOVWF LETRA2

CALL O_1

RETURN

O_1

CALL O_2

DECFSZ LETRA1

GOTO O_1

RETURN

O_2

CALL O_3

DECFSZ LETRA2

GOTO O_2

RETURN

O_3

MOVLW D'1'

MOVWF PORTB

MOVLW D'2'

MOVWF PORTB

MOVLW D'4'

MOVWF PORTB

MOVLW D'7'

MOVWF PORTB

MOVLW D'8'

MOVWF PORTB

MOVLW D'11'

MOVWF PORTB

MOVLW D'13'

MOVWF PORTB

MOVLW D'14'

MOVWF PORTB

DECFSZ LETRA

GOTO O_3

RETURN

;-------------------------------------------------------------------------------

;-------------------------------------------------------------------------------

;»»»»»»»»»»»»»»»»»»»»»»»»»»»»»»»»»»»»»»»»»»»»»»»»»»»»»»»»»»»»»»»»»»»

;---------------------------------DELAY de 10ms------------------------------

DELAY

movlw d'110'

movwf Tmr0

bcf intcon,T0if

btfss intcon,t0if

goto $-1

return

;-------------------------------------------------------------------------------

end