Tài liệu Thiết kế và thi công Card Ghi-Đọc EPROM, chương 8 docx

Chương 8: CHÖÔNG TRÌNH PHAÀN MEÀM
III.1 Chöông Trình Chính
;chuong trinh chinh card ghi doc eprom;
org 7900h
mvi a,3eh ; led1 hien chu d;
sta 83f8h
mvi a,5ch ; led2 hien chu o;
sta 83f9h
mvi a,58h ; led3 hien chu c;
sta 83fah
mvi a,3fh ; led4 hien chu O;
sta 83fbh
mvi a,31h ; led5 hien chu r;
sta 83fch
mvi a,6fh ; led6 hien chu g;
sta 83fdh
mvi a,74h ; led7 hien chu h;
sta 83feh
mvi a,30h ; led8 hien chu i;
sta 83ffh
aa: call 0216h ; goi ct tastd;
sta 8325h
lda 8325h
cpi 11h ; phim chuc nang G(Ghi);
jz ghi
cpi 13h ; phim chuc nang D(Doc);
jz doc
cpi 12h ; phim chuc nang R(Roi);
jz dung
jmp aa
ghi: mvi a,07h ; led1 hien chu T;

sta 83f8h
mvi a,3eh ; led2 hien chu U;
sta 83f9h
mvi a,7dh ; led3 hien chu G;
sta 83fah
mvi a,76h ; led4 hien chu H;
sta 83fbh
mvi a,30h ; led5 hien chu i;
sta 83fch
mvi a,6eh ; led6 hien chu y;
sta 83fdh
mvi a,30h ; led7 hien dau /;
sta 83feh
mvi a,37h ; led8 hien chu n;
sta 83ffh
call 0216h ; goi ct tastd;
sta 8325h
lda 8325h
cpi 17h ; phim chuc nang F(Fai);
jz nhap
call 7000h ; nhay toi chuong trinh
nhap dcd ram;
call 7080h ; nhay toi chuong trinh
nhap dcc ram;
call 7100h ; nhay toi chuong trinh
nhap dcd eprom;
call 7400h ; nhay toi chuong trinh
ktra sach eprom;
call 7500h ; nhay toi chuong trinh
ghi dl len eprom;

call 7600h ; nhay toi chuong trinh
ktra dl da ghi;
jmp dung
nhap: call 7000h ; nhay toi chuong
trinh nhap dcd ram;
call 7100h ; nhay toi chuong trinh
nhap dcd eprom;
call 7300h ; nhay toi chuong trinh
nhap dl len ram;
call 7400h ; nhay toi chuong trinh
ktra sach eprom;
call 7500h ; nhay toi chuong trinh
ghi dl len eprom;
call 7600h ; nhay toi chuong trinh
ktra dl da ghi;
jmp dung
doc: call 7100h ; nhay toi chuong
trinh nhap dcd eprom;
call 7200h ; nhay toi chuong trinh
nhap dcc eprom;
call 7700h ; nhay toi chuong trinh
doc dl tu eprom;
dung: hlt
end
III.2 Chửụng Trỡnh doùc dửừ lieọu tửứ EPROM
;chuong trinh doc du lieu tu eprom
org 7700h
lhld 8330h ; nap dcd eprom vao BC;
mov c,l
mov b,h

xchg ; nap dcd eprom vao DE;
lhld 8332h ; nap dcc eprom vao HL;
mvi a,80h
out 13
mvi a,06h ; cho phep 74373;
out 12h ; xuat portc;
nap: mov a,e
sta 8321h
out 10h ; xuat porta;
mvi a,05h ; chot 74373;
out 12h ; xuat portc;
mvi a,90h ; porta nhap, portb,c xuat;
out 13h
mov a,d
out 11h ; xuat portb;
sta 8320h
mvi a,15h ;tu dieu khien de doc;
in 10
sta 8323h
call 7800h
mov a,e
cmp c
jz xx
dd: mov a,e
cmp l
jz yy
cc: call 0216h
cpi 15h
jz aa
cpi 12h

jz bb
jmp cc
xx: mov a,d
cmp b
jz tang
jmp dd
yy: mov a,d
cmp h
jz giam
jmp cc
tang: call 0216h
cpi 15h
jz aa
jmp tang
giam: call 0216h
cpi 12h
jz bb
hlt
aa: inx de
jmp nap
bb: dcx de
jmp nap
end
III.3 Chöông Trình ghi döõ lieäu leân EPROM
;chuong trinh ghi du lieu len eprom
org 7500h
lhld 8330h
xchg ; nhap dia chi dau eprom vao
DE;
lhld 8336h

mov b,h
mov c,l ; nhap dia chi cuoi ram vao BC;
lhld 8334h ; nhap dia chi dau ram vao
HL;
mvi a,80h
out 13h ; xuat thanh ghi dk;
aa: mvi a,06h ; cho phep 47373;
out 12h ; xuat portc;
mov a,e
out 10h ; xuat porta;
mvi a,05h ; chot 74374;
out 12h ; xuat portc;
mov a,d
out 11h ; xuat portb;
mov a,m
out 10h ; xuat porta;
mvi a,29h ; xuat tu dieu khien cho phep
ghi;
out 12h ; xuat portc;
call 02efh
call 02efh ; delay 27x2=54ms de ghi;
mov a,l
cmp c
jz xx
tang: inx hl
inx de
jmp aa
xx: mov a,h
cmp b
jz dung

jmp tang
dung: ret
end
III.4 Chöông Trình hieån thò 1
;chuong trinh hien thi1
org 7800h
push h
push b
push d
lxi de,8320h
lxi bc,83f8h
lxi hl,8300h
nap: ldax de
ani 0F0h
rrc
rrc
rrc
rrc
mov l,a
mov a,m
stax bc
inx bc
ldax de
ani 0Fh
mov l,a
mov a,m
stax bc
inx bc
inx de
mvi a,24h

cmp e
jnz nap
mvi a,00h ; du lieu lam cho led tai o
nho chua no khong sang;
sta 83fch
sta 83fdh
pop d
pop b
pop h
ret
end
III.5 Chöông Trình hieån thò 2
;chuong trinh hien thi2;
org 7850h
push h
push b
push d
lxi h,8300h
lxi d,8322h
lxi b,83fch
tang: ldax d
ani 0f0h
rrc
rrc
rrc
rrc
mov l,a
mov a,m
stax b
inx b

ldax d
ani 0fh
mov l,a
mov a,m
stax b
inx b
inx d
mvi a,24h
cmp e
jnz tang
pop d
pop b
pop h
ret
end
III.6 Chöông Trình kieåm tra döõ lieäu
;chuong trinh kiem tra du lieu da nap
tren eprom va du lieu can nap;
org 7600h
lhld 8334h ; nap dcd ram vao DE;
xchg
lhld 8336h ; nap dcc ram vao BC;
mov c,l
mov b,h
lhld 8330h ; nap dcd eprom vao HL;
mvi a,80h ; porta nhap, portb,c xuat;
out 13h
mvi a,06h ; 74373 cho phep;
out 12h ; xuat portc;
aa: mov a,l

sta 8321h
out 10h ; xuat porta;
mvi a,05h ; 74373 chot;
out 12h ; xuat portc;
mvi a,90h ; cac port a,b,c deu xuat;
out 13h
mov a,h
sta 8320h
out 11h ; xuat portb;