Propeller_led - Colégio e Faculdade Relatório Trabalho...

Info iconThis preview shows page 1. Sign up to view the full content.

View Full Document Right Arrow Icon
This is the end of the preview. Sign up to access the rest of the document.

Unformatted text preview: Colégio e Faculdade Relatório Trabalho Final ELETRÔNICA INDUSTRIAL MICROCONTROLADORES E MICROPROCESSADORES Propeller led POR HELTON DOS SANTOS CURITIBA, 02 de Dezembro 2008. 1 Objetivo O objetivo neste projeto é usar um microcontrolador AT89S52 para controlar uma fila de oito led’s para exibir algumas mensagens . Introdução Os led’s irão piscar de maneiro muito rápida, aproximadamente 200µs e permanecer apagados na mesma faixa. Como estes led’s iram girar através de um motor de aproximadamente 8.000RPM (133 voltas por segundo) e devido à resposta lenta do olho humano, nós adquirimos a impressão que há uma matriz de led’s flutuando ao redor do eixo do motor onde irá aparecer as mensagens. Irá funcionar desta maneira: ‐ haverá um sensor infravermelho ligado a porta P3.0, esse sensor mantém sempre a porta P3.0 em um nível lógico alto, quando o sensor ativar, ele ira deixar a porta P3.0 aberta e conseqüentemente abrirá todas as portas (P3.1 à P3.7 já estavam abertas) e com isso irá ativar o microcontrolador, resumindo, os led’s só piscarão quando passarem pelo emissor infravermelho, com isso a mensagem iniciará no mesmo local. Para se criar a ilusão, cada led irá piscar de tempos em tempos, isto é, em uma matriz de cinco por oito representada na figura abaixo para escrever uma letra ele tem que acender desenhando a letra ou o número. No nosso caso é a mesma lógica, mas como não há vários leds um ao lado do outro, então fazemos com que ele pisque de maneira a criar esta matriz, usamos uma base de tempo de 5x200µs, ou seja 01ms. Se um led piscar 5 veses neste intervalo de tempo, ele formará um risco como este: | 200µ|200µ|200µ|200µ|200µ| Então para criar as letras usaremos uma função tempo que os leds permanecerão acesos e apagados com a rotação do motor, lembrando que a rotação do motor é de 133 voltas por segundo. CURITIBA, 02 de Dezembro 2008. 2 Esquema 08 Resistores de 10kΩ 08 Resistores de 470Ω 02 Capacitores cerâmicos 100nF 02 capacitores eletrolitícos 10UF x 16v 02 capacitores cerâmicos 33pF 01 capacitor poliéster 330nF 01 cristal 11,059200 MHz 01 CI AT89S2 01 Ci ULN2803 07 LED'S verdes 01 LED vermelho 01 Barra de pinos femea 01 Barra de pinos fêmea torneado 01 soquete torneado 40 pinos 01 soquete torneado 18 pinos 01 emissor infravermelho 01 receptor infravermelho 01 transistor PNP BC337 01 resistor 2k2 01 resistor 560Ω 01 Barra de pinos 180º (4 pinos) CURITIBA, 02 de Dezembro 2008. 3 Exemplo da Programação ;===================================================================================== ;TRABALHO FINAL ‐ ELETRÔNICA INDUSTRIAL :Titulo – PROPELLER LED ;ALUNO: Helton ;CPU: AT89S52 clk: 11,059200MHz ;====================================================================================a ;===================================================================================== ;===================================================================================== MULT EQU 40h ;multiplicador da base de tempo mantem equ 41h ORG 00h ;‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐ ;INICIALIZACAO: T/C 0 NA FUNCAO TIMER, CONTROLADO POR TR0, MODO 1 ;‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐ MOV IE,#00000000B ;desabilita todas as interrupcoes MOV TCON,#00000000B ; ||||_______ TR0 = 0 ‐> timer 0 parado ; |||________ TF0 = 0 ‐> flag de overflow do T/C 0 zerado ; ||_________ TR1 = 0 ‐> timer 0 parado ; |__________ TF1 = 0 ‐> flag de overflow do T/C 0 zerado MOV TMOD,#00000001B ; ||||___ M0 = 1 ‐> timer 0 no... ; |||____ M1 = 0 ‐> ...modo 1: 16 bits ; ||_____ C/T'= 0 ‐> timer 0 na funcao timer ; |______ GATE= 0 ‐> timer 0 controlado somente por TR0 ;T/C 1 nao utilizado MOV P2,#00h ;apaga display ;‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐ ;PROGRAMA PRINCIPAL CURITIBA, 02 de Dezembro 2008. 4 ;‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐ DD: MOV R7,#3 MOV R6,#3 FRASE5: MOV R0,P3 CJNE R0,#11111111B, FRASE5 LCALL CL LCALL CL LCALL E1 DJNZ R7,FRASE5 MOV R7,#3 DJNZ R6,FRASE5 MOV R7,#3 MOV R6,#3 FRASE6: MOV R0,P3 CJNE R0,#11111111B, FRASE6 LCALL CL LCALL CL LCALL E1 LCALL N1 DJNZ R7,FRASE6 MOV R7,#3 DJNZ R6,FRASE6 MOV R7,#3 MOV R6,#3 FRASE7: MOV R0,P3 CJNE R0,#11111111B, FRASE7 LCALL CL LCALL CL LCALL E1 LCALL N1 LCALL S1 DJNZ R7,FRASE7 MOV R7,#3 DJNZ R6,FRASE7 MOV R7,#3 MOV R6,#3 FRASE8: MOV R0,P3 CJNE R0,#11111111B, FRASE8 LCALL CL LCALL CL LCALL E1 LCALL N1 LCALL S1 LCALL I1 DJNZ R7,FRASE8 MOV R7,#3 CURITIBA, 02 de Dezembro 2008. 5 DJNZ R6,FRASE8 MOV R7,#3 MOV R6,#3 FRASE9: MOV R0,P3 CJNE R0,#11111111B, FRASE9 LCALL CL LCALL CL LCALL E1 LCALL N1 LCALL S1 LCALL I1 LCALL TT DJNZ R7,FRASE9 MOV R7,#3 DJNZ R6,FRASE9 MOV R7,#3 MOV R6,#3 FRASE10: MOV R0,P3 CJNE R0,#11111111B, FRASE10 LCALL CL LCALL CL LCALL E1 LCALL N1 LCALL S1 LCALL I1 LCALL TT LCALL E1 DJNZ R7,FRASE10 MOV R7,#3 DJNZ R6,FRASE10 MOV R7,#3 MOV R6,#3 FRASE11: MOV R0,P3 CJNE R0,#11111111B, FRASE11 LCALL CL LCALL CL LCALL E1 LCALL N1 LCALL S1 LCALL I1 LCALL TT LCALL E1 LCALL C1 DJNZ R7,FRASE11 MOV R7,#3 DJNZ R6,FRASE11 MOV R7,#3 MOV R6,#3 CURITIBA, 02 de Dezembro 2008. 6 FRASE12: MOV R0,P3 CJNE R0,#11111111B, FRASE12 LCALL CL LCALL CL LCALL E1 LCALL N1 LCALL S1 LCALL I1 LCALL TT LCALL E1 LCALL C1 DJNZ R7,FRASE12 MOV R7,#3 DJNZ R6,FRASE12 MOV R7,#2 MOV R6,#5 FRASE13: MOV R0,P3 CJNE R0,#11111111B, FRASE13 LCALL CL LCALL CL LCALL E1 LCALL N1 LCALL S1 LCALL I1 LCALL TT LCALL E1 LCALL C1 DJNZ R7,FRASE13 MOV R7,#2 DJNZ R6,FRASE13 FRASE2: MOV R0,P3 CJNE R0,#0FFH, FRASE2 GIRO: LCALL CL LCALL CL LCALL E1 LCALL N1 LCALL S1 LCALL I1 LCALL TT LCALL E1 LCALL C1 LCALL CL lcall cl lcall cl MOV MULT,#55 LCALL RUNT0 DJNZ MANTEM, GIRO MOV R7,#33 CURITIBA, 02 de Dezembro 2008. 7 MOV R6,#5 FRASE4: MOV R0,P3 CJNE R0,#11111111B, FRASE4 lcall cl lcall cl LCALL H1 LCALL E1 LCALL L1 LCALL TT LCALL O1 LCALL N1 MOV P2,#10000000B; APAGA E MANTÉM O VERMELHO MOV MULT,#7 LCALL RUNT0 LCALL CL LCALL CL LCALL CL LCALL SAN DJNZ R7,FRASE4 MOV R7,#35 DJNZ R6,FRASE4 JMP DD ;‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐ ;SUBROTINAS PARA GERAÇÃO DAS LETRAS ;‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐ SETA: MOV P2,#11100111B MOV MULT,#15 LCALL RUNT0 MOV P2,#10000000B; APAGA E MANTÉM O VERMELHO MOV MULT,#2 LCALL RUNT0 RET SAN: MOV P2,#0FFH MOV MULT,#2 LCALL RUNT0 MOV P2,#10100000B MOV MULT,#2 LCALL RUNT0 MOV P2,#10010000B MOV MULT,#2 LCALL RUNT0 MOV P2,#10001000B MOV MULT,#2 LCALL RUNT0 MOV P2,#11111111B MOV MULT,#2 LCALL RUNT0 MOV P2,#10000000B MOV MULT,#2 CURITIBA, 02 de Dezembro 2008. 8 LCALL RUNT0 MOV P2,#0FFH MOV MULT,#2 LCALL RUNT0 MOV P2,#10001001B MOV MULT,#6 LCALL RUNT0 MOV P2,#11111110B MOV MULT,#2 LCALL RUNT0 MOV P2,#10000000B MOV MULT,#2 LCALL RUNT0 LCALL S1 RET CL: ; SUBROTINA PARA APAGAR TODOS OS LED'S EXCETO O VERMELHO POR 2ms MOV P2,#10000000B MOV MULT,#8 LCALL RUNT0 MOV P2,#10000000B; APAGA E MANTÉM O VERMELHO MOV MULT,#2 LCALL RUNT0 RET H1: MOV P2,#0FFH MOV MULT,#2 LCALL RUNT0 MOV P2,#10001000B MOV MULT,#6 LCALL RUNT0 MOV P2,#0FFH MOV MULT,#2 LCALL RUNT0 MOV P2,#10000000B; APAGA E MANTÉM O VERMELHO MOV MULT,#2 LCALL RUNT0 RET A1: MOV P2,#10111111B MOV MULT,#2 LCALL RUNT0 MOV P2,#11001000B MOV MULT,#2 LCALL RUNT0 MOV P2,#11001000B MOV MULT,#2 LCALL RUNT0 MOV P2,#11001000B MOV MULT,#2 LCALL RUNT0 MOV P2,#10111111B MOV MULT,#2 LCALL RUNT0 CURITIBA, 02 de Dezembro 2008. 9 MOV MOV LCALL RET B1: MOV MOV LCALL MOV MOV LCALL MOV MOV LCALL MOV MOV MOV MOV LCALL MOV MOV LCALL RET E1: MOV MOV LCALL MOV MOV LCALL MOV MOV LCALL MOV MOV MOV MOV LCALL MOV MOV LCALL RET L1: MOV MOV LCALL MOV MOV LCALL MOV MOV LCALL MOV P2,#10000000B; APAGA E MANTÉM O VERMELHO MULT,#2 RUNT0 P2,#0FFH MULT,#2 RUNT0 P2,#11001001B MULT,#2 RUNT0 P2,#11001001B MULT,#2 RUNT0 P2,#11001001B MULT,#2 P2,#11110111B MULT,#2 RUNT0 P2,#10000000B; APAGA E MANTÉM O VERMELHO MULT,#2 RUNT0 P2,#0FFH MULT,#2 RUNT0 P2,#11001001B MULT,#2 RUNT0 P2,#11001001B MULT,#2 RUNT0 P2,#11001001B MULT,#2 P2,#11101011B MULT,#2 RUNT0 P2,#10000000B; APAGA E MANTÉM O VERMELHO MULT,#2 RUNT0 P2,#0FFH MULT,#2 RUNT0 P2,#10000001B MULT,#2 RUNT0 P2,#10000001B MULT,#3 RUNT0 P2,#10000001B CURITIBA, 02 de Dezembro 2008. 10 MOV MOV MOV LCALL MOV MOV LCALL RET TT: MOV MOV LCALL MOV MOV LCALL MOV MOV LCALL MOV MOV MOV MOV LCALL MOV MOV LCALL RET O1: MOV MOV LCALL MOV MOV LCALL MOV MOV LCALL MOV MOV MOV MOV LCALL MOV MOV LCALL RET N1: MOV MOV LCALL MOV MOV LCALL MULT,#2 P2,#10000011B MULT,#2 RUNT0 P2,#10000000B; APAGA E MANTÉM O VERMELHO MULT,#2 RUNT0 P2,#11000000B MULT,#1 RUNT0 P2,#11000000B MULT,#2 RUNT0 P2,#0FFH MULT,#2 RUNT0 P2,#11000000B MULT,#2 P2,#11000000B MULT,#3 RUNT0 P2,#10000000B; APAGA E MANTÉM O VERMELHO MULT,#2 RUNT0 P2,#10111110B MULT,#2 RUNT0 P2,#11000001B MULT,#3 RUNT0 P2,#11000001B MULT,#2 RUNT0 P2,#11000001B MULT,#2 P2,#10111110B MULT,#2 RUNT0 P2,#10000000B; APAGAE MANTÉM O VERMELHO MULT,#2 RUNT0 P2,#0FFH MULT,#2 RUNT0 P2,#10100000B MULT,#2 RUNT0 CURITIBA, 02 de Dezembro 2008. 11 MOV P2,#10010000B MOV MULT,#1 LCALL RUNT0 MOV P2,#10001000B MOV MULT,#1 LCALL RUNT0 MOV P2,#10000100B MOV MULT,#1 LCALL RUNT0 MOV P2,#10000010B MOV MULT,#1 LCALL RUNT0 MOV P2,#0FFH MOV MULT,#2 LCALL RUNT0 MOV P2,#10000000B; APAGA E MANTÉM O VERMELHO MOV MULT,#2 LCALL RUNT0 RET C1: MOV P2,#0FFH MOV MULT,#2 LCALL RUNT0 MOV P2,#11000001B MOV MULT,#2 LCALL RUNT0 MOV P2,#11000001B MOV MULT,#2 LCALL RUNT0 MOV P2,#11000001B MOV MULT,#2 MOV P2,#11100011B MOV MULT,#2 LCALL RUNT0 MOV P2,#10000000B; APAGA E MANTÉM O VERMELHO MOV MULT,#2 LCALL RUNT0 RET BB: MOV P2,#0FFH MOV MULT,#2 LCALL RUNT0 MOV P2,#11001001B MOV MULT,#2 LCALL RUNT0 MOV P2,#11001001B MOV MULT,#2 LCALL RUNT0 MOV P2,#11001001B MOV MULT,#2 LCALL RUNT0 MOV P2,#11001101B MOV MULT,#2 LCALL RUNT0 CURITIBA, 02 de Dezembro 2008. 12 MOV MOV LCALL MOV MOV LCALL MOV MOV LCALL RET D1: MOV MOV LCALL MOV MOV LCALL MOV MOV LCALL MOV MOV MOV MOV LCALL MOV MOV LCALL MOV MOV LCALL RET F1: MOV MOV LCALL MOV MOV LCALL MOV MOV LCALL MOV MOV MOV MOV LCALL MOV MOV LCALL RET G1: MOV P2,#11001010B MULT,#1 RUNT0 P2,#10100010B MULT,#3 RUNT0 P2,#10000000B; APAGA E MANTÉM O VERMELHO MULT,#2 RUNT0 P2,#11111111B MULT,#2 RUNT0 P2,#11000001B MULT,#2 RUNT0 P2,#11000001B MULT,#2 RUNT0 P2,#11000001B MULT,#2 P2,#10111110B MULT,#1 RUNT0 P2,#10011100B MULT,#1 RUNT0 P2,#10000000B; APAGA E MANTÉM O VERMELHO MULT,#2 RUNT0 P2,#0FFH MULT,#2 RUNT0 P2,#11010000B MULT,#2 RUNT0 P2,#11010000B MULT,#3 RUNT0 P2,#11000000B MULT,#2 P2,#11000000B MULT,#2 RUNT0 P2,#10000000B; APAGA E MANTÉM O VERMELHO MULT,#2 RUNT0 P2,#0FFH CURITIBA, 02 de Dezembro 2008. 13 MOV MULT,#2 LCALL RUNT0 MOV P2,#11000001B MOV MULT,#2 LCALL RUNT0 MOV P2,#11000101B MOV MULT,#2 LCALL RUNT0 MOV P2,#11000100B MOV MULT,#2 MOV P2,#11110111B MOV MULT,#2 LCALL RUNT0 MOV P2,#10000000B; APAGA E MANTÉM O VERMELHO MOV MULT,#2 LCALL RUNT0 RET I1: MOV P2,#11000001B MOV MULT,#3 LCALL RUNT0 MOV P2,#11111111B MOV MULT,#2 LCALL RUNT0 MOV P2,#11000001B MOV MULT,#3 LCALL RUNT0 MOV P2,#10000000B; APAGA E MANTÉM O VERMELHO MOV MULT,#2 LCALL RUNT0 RET J1: MOV P2,#10000011B MOV MULT,#2 LCALL RUNT0 MOV P2,#10000001B MOV MULT,#2 LCALL RUNT0 MOV P2,#10000001B MOV MULT,#3 LCALL RUNT0 MOV P2,#10000001B MOV MULT,#2 MOV P2,#11111111B MOV MULT,#3 LCALL RUNT0 MOV P2,#10000000B; APAGA E MANTÉM O VERMELHO MOV MULT,#2 LCALL RUNT0 RET W1: MOV P2,#0FFH MOV MULT,#2 CURITIBA, 02 de Dezembro 2008. 14 LCALL RUNT0 MOV P2,#10000010B MOV MULT,#2 LCALL RUNT0 MOV P2,#10000100B MOV MULT,#1 LCALL RUNT0 MOV P2,#10001000B MOV MULT,#1 LCALL RUNT0 MOV P2,#10000100B MOV MULT,#1 LCALL RUNT0 MOV P2,#10000010B MOV MULT,#2 LCALL RUNT0 MOV P2,#0FFH MOV MULT,#2 LCALL RUNT0 MOV P2,#10000000B; APAGA E MANTÉM O VERMELHO MOV MULT,#2 LCALL RUNT0 RET M1: MOV P2,#0FFH MOV MULT,#2 LCALL RUNT0 MOV P2,#10100000B MOV MULT,#2 LCALL RUNT0 MOV P2,#10010000B MOV MULT,#1 LCALL RUNT0 MOV P2,#10001000B MOV MULT,#1 LCALL RUNT0 MOV P2,#10010000B MOV MULT,#1 LCALL RUNT0 MOV P2,#10100000B MOV MULT,#2 LCALL RUNT0 MOV P2,#0FFH MOV MULT,#2 LCALL RUNT0 MOV P2,#10000000B; APAGA E MANTÉM O VERMELHO MOV MULT,#2 LCALL RUNT0 RET PP: MOV P2,#0FFH MOV MULT,#2 LCALL RUNT0 MOV P2,#11000100B CURITIBA, 02 de Dezembro 2008. 15 MOV MULT,#2 LCALL RUNT0 MOV P2,#11000100B MOV MULT,#3 LCALL RUNT0 MOV P2,#11000100B MOV MULT,#2 MOV P2,#11111000B MOV MULT,#2 LCALL RUNT0 MOV P2,#10000000B; APAGA E MANTÉM O VERMELHO MOV MULT,#2 LCALL RUNT0 RET Q1: MOV P2,#10111110B MOV MULT,#2 LCALL RUNT0 MOV P2,#11000010B MOV MULT,#3 LCALL RUNT0 MOV P2,#11000110B MOV MULT,#2 LCALL RUNT0 MOV P2,#11000001B MOV MULT,#2 MOV P2,#10111101B MOV MULT,#2 LCALL RUNT0 MOV P2,#10000000B; APAGA E MANTÉM O VERMELHO MOV MULT,#2 LCALL RUNT0 RET RRR: MOV P2,#0FFH MOV MULT,#2 LCALL RUNT0 MOV P2,#11001000B MOV MULT,#2 LCALL RUNT0 MOV P2,#11001100B MOV MULT,#2 LCALL RUNT0 MOV P2,#11001010B MOV MULT,#2 LCALL RUNT0 MOV P2,#11111001B MOV MULT,#2 LCALL RUNT0 MOV P2,#10000000B; APAGA E MANTÉM O VERMELHO MOV MULT,#2 LCALL RUNT0 RET CURITIBA, 02 de Dezembro 2008. 16 S1: MOV P2,#11111011B MOV MULT,#2 LCALL RUNT0 MOV P2,#11001001B MOV MULT,#6 LCALL RUNT0 MOV P2,#11101111B MOV MULT,#3 LCALL RUNT0 MOV P2,#10000000B; APAGA E MANTÉM O VERMELHO MOV MULT,#2 LCALL RUNT0 RET U1: MOV P2,#10111110B MOV MULT,#2 LCALL RUNT0 MOV P2,#10000001B MOV MULT,#3 LCALL RUNT0 MOV P2,#10000001B MOV MULT,#2 LCALL RUNT0 MOV P2,#10000001B MOV MULT,#2 MOV P2,#10111110B MOV MULT,#2 LCALL RUNT0 MOV P2,#10000000B; APAGA E MANTÉM O VERMELHO MOV MULT,#2 LCALL RUNT0 RET ;‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐ ; SUBROTINA PARA GERAR ATRASO DE MULT x 0,2ms ;‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐ runT0: MOV TH0,#0ffh MOV TL0,#47h ;... base de tempo de 0,2ms SETB TR0 ;dispara timer 0 JNB TF0,$ ;preso por 0,2ms CLR TR0 ;stop timer 0 CLR TF0 ;zera flag de overflow do timer 0 DJNZ MULT,runT0 ;loop MULT x 0,2ms RET ATRASO: MOV R7,#7 ;gera atraso de... MOV R6,#25 ;... aproximadamente... MOV R5,#25 ;... 1 segundo VOLTA: DJNZ R5,$ MOV R5,#25 DJNZ R6,VOLTA MOV R6,#25 CURITIBA, 02 de Dezembro 2008. 17 DJNZ R7,VOLTA RET END CURITIBA, 02 de Dezembro 2008. 18 ...
View Full Document

This note was uploaded on 09/29/2010 for the course ENG 451235 taught by Professor Werg during the Spring '10 term at Yuba College.

Ask a homework question - tutors are online