Uso A51 controle LCD Nokia 3310

[bigreat]

Código:

sdin bit p1.1

sclk bit p1.0

dc bit p1.2

SCE bit p1.3

res bit p1.4
xadd dados 30h; 0-83

yadd dados 31h; 0-5
lcdd dados 32h
org 0000H

JMP inícioInício: CLR res

nop

nop

setb res

mov a, # 00100001b

lcall permitir

mov a, # 10011001b

lcall permitir

mov a, # 00100000b

lcall permitir

mov a, # 00001100b

lcall permitir

lcall deldisp

mov xadd, # 00h;

mov yadd, # 00h;

lcall setadd

mov a, # 0ffh

lcall escreversetadd: mov a, # 20h

lcall permitir

mov a, yadd

CLR acc.7

setb acc.6

CLR acc.5

CLR acc.4

CLR acc.3

lcall permitir

mov a, xadd

setb acc.7

lcall permitir

retdeldisp: mov r0, # 07

deld1: mov r1, # 84

deld2: mov a, # 00h

lcall escrever

djnz r1, deld2

djnz r0, deld1

ret

permitir: CLR dc

escrever: CLR cená

mov lcdd, # 08h

tot CLR sclk

RLC um

mov sdin, c

setb sclk

djnz lcdd, toto

setb dc

setb cená

ret

fim