16F84A a MM5450BN

[Karla Dvořáková]

Je to psane v MPASM, ano.

Jinak ta zpozdovaci rutina je prevzata z jineho programu  a nastaveno mam
HEX a funguje to.
Jeste dneska to zkusim udelat. Protoze kdyz je jas na plno, tak je videt jak
to trosku problikne.

Diky za odpoved


----- Original Message -----
From: <jiri@bezstarosti.cz>
To: <hw-news@list.gin.cz>
Sent: Wednesday, September 05, 2001 4:32 PM
Subject: RE: 16F84A a MM5450BN


Zhasinaji, ale jen na kratouckou dobu a neni to videt.
Fakt jsem to prolitl jen zbezne, mozna by to po zhasnuti
chtelo jeste taky "call cekej  ;zpozdeni", aby to
zhasnuti bylo videt. Dalsi chybky jsem nehledal.
A pri prekladu pozor, aby byl zapnut desitkovy radix,
kdyz tam je "NASTAV2 movlw 200", coz je asi mysleno desitkove,
tedy treba napsat:

list p=16F84, r=DEC
#include p16f84.inc

cimz bude defaultni radix desitkovy a inc soubor
umozni pouzivat jmena registru a bitu misto cisel (definice).
Je to psane pro MPASM ze ?

--
Jiri Bezstarosti

-----Original Message-----
From: Karla Dvo??kov? [mailto:karla.dvorakova@seznam.cz]
Sent: Wednesday, September 05, 2001 3:19 PM
To: hw-news@list.gin.cz
Subject: 16F84A a MM5450BN


Zdravim a pozdravuji,
tak jsem se konecne dockala a mam doma programator, ktery programuje a
nenici soucastky. Trochu se pokousim neco napsat a mam tu hnedka jeden
problem.

Nize uvedeny program pro PIC 16F84A s RC oscilatorem mi nechce fungovat ja
nevim proc.
Ma poslat na radic displeje MM5450BN (pachatel Micrel) takova data, aby se
vsechny led rozsvitily a po nejake dobe zase zhasly. Me se zatim pouze
rozsviti a nezhasinaji. Nevite nekdo proc ?  Muzete naproste zacatecnici
pomoci ?  :)


; PORT B  PIN 5 - DATA POVOLENA
; PORT B PIN 6 - DATA
; PORT B PIN 7 - HODINY

LIST P=16F84A

porta equ 05H
portb equ 06H
STATUS equ 03H
TRISB equ 86H
ZPOMAL3 equ 0DH
ZPOMAL2 equ 0EH
ZPOMAL1 equ 0FH
cykl equ 10H

 org 08H

 bsf STATUS,5
 clrf TRISB
 bcf STATUS,5

;...........................................................................
.
; rozsviceni displeje

 BCF portb,5
 BCF portb,6
 BCF portb,7

SMYCKA
 BCF portb,7  ;date enable
 BSF portb,6  ;data = 1
 BCF portb,5  ;vyslani hodin prvni jednicky
 BSF portb,5
 BCF portb,5  ;ok


 MOVLW 23h  ;nastaveni cyklu
 MOVWF cykl  ;ok
CYKLUS1 BSF portb,6  ;data = 1
 BCF portb,5  ;vyslani hodin
 BSF portb,5
 BCF portb,5  ;ok
 DECFSZ cykl,1
 GOTO CYKLUS1  ;opakovani cyklu
;....................................................
 call cekej  ;zpozdeni
;....................................................
; zhasnuti displeje

 BSF portb,6  ;data = 1
 BCF portb,5  ;vyslani hodin prvni jednicky
 BSF portb,5
 BCF portb,5  ;ok


 MOVLW 23h  ;nastaveni cyklu
 MOVWF cykl  ;ok
CYKLUS2 BCF portb,6  ;data = 0
 BCF portb,5  ;vyslani hodin
 BSF portb,5
 BCF portb,5  ;ok
 DECFSZ cykl,1
 GOTO CYKLUS2  ;opakovani cyklu

 GOTO SMYCKA




; tady je vytvorena casova prodleva

cekej movlw 1  ;vnejsi smycka
 movwf ZPOMAL3

NASTAV1 movlw 45  ;prostredni smycka  45
 movwf ZPOMAL2

NASTAV2 movlw 200  ;vnitrni smycka 200
 movwf ZPOMAL1
 clrwdt

NASTAV3 decfsz ZPOMAL1,1 ;cyklus 1
 goto NASTAV3
 decfsz ZPOMAL2,1 ;cyklus 2
 goto NASTAV2
 decfsz ZPOMAL3,1 ;cyklus 3
 goto NASTAV1
 return   ;navrat do programu

 END