- Moät ñöôøng ñieàu khieån transistor pnp ñeå ñoùng nguoàn 5V cho maïch Moät ñöôøng ñieàu khieån transistor npn ñeå ñoùng mass 0V cho maïch.
Döïa vaøo löu ñoà ñieàu khieån ta tieán haønh vieát chöông trình cho töøng heä thoáng.
;xxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxx ;chuong trinh test IC so
;xxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxx ;chuong trinh viet cho vi dieu khien he thong 2:
enter equ 0ah ;dinh nghia ma phim enter ptang equ 0bh ;dinh nghia ma phim tang pgiam equ 0ch ;dinh nghia ma phim giam pclear equ 0dh ;dinh nghia ma phim xoa pkey equ p0 ;ket noi voi ma tran phim nhan ;ma bat tay goi di la AAH, ma bat tay nhan ve la BBh
;ma bat tay goi di la C0H la bao IC tot ;ma qui dinh goi di la d0H la bao IC xau
;ma qui dinh goi di la CFH la bao he thong 1 chua xay dung phan kiem tra IC pcon equ 87h
;cac vung nho se su dung de luu thong tin
; 20h,21h,22h de luu ma cua IC = 740xxx ; 23h luu ma so cao de truyen di
; 30h -> 3fh de luu thong tin cho LCD hang thu 1 ; 40h -> 4fh de luu thong tin cho LCD hang thu 2
org 0000h
Thu vien DH SPKT TP. HCM - http://www.thuvienspkt.edu.vn
27
mov sp,#50h
mov 22h,#00h ;mac nhien la khi khoi dong mov 21h,#00h ;mac nhien la khi khoi dong mov 20h,#074h ;mac nhien la khi khoi dong la 74
lcall khoitao_trxd ;goi chtr con khoi tao truyen du lieu giua 2 vdk lcall khoitao_lcd ;goi chtr khoi tao LCD
lcall hienthi_lcd ;goi chtr con hien thi thong tin ra LCD main1a: lcall quetphim ;goi chtr con quet phim
cjne a,#0ffh,main3 ;co phim nhan thi nhay
sjmp main1a ;neu khong co phim nhan thi tiep tuc ;xxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxx main3: lcall hienthi_lcd_key ;goi chtr con hien thi nhan ma so IC main1: lcall quetphim ;goi chtr con quet phim
cjne a,#0ffh,main3a ;co phim nhan thi nhay
sjmp main1 ;neu khong co phim nhan thi tiep tuc main3a: cjne a,#10,main4 ;kiem tra phim so
main4: jnc main5 ;cac phim chuc nagn con lai ljmp xuly_phimso ;nhay den chtr xu ly phim so main5: cjne a,#enter,main2 ;kiem tra phim enter
lcall hienthi_test
ljmp xuly_enter ;nhay den chtr xu ly phim enter main2: cjne a,#pclear,main3 ;kiem tra phim clear
ljmp xuly_clear ;nhay den chtr xu ly phim clear ljmp main1 ;nhay den chtr xu ly
;xxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxx ;xu ly cac phim so luu tru vao 2 o nho 21h (byte H) va 22h (byte L)
;xxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxx xuly_phimso: push acc ;cat tam noi dung A
mov a,22h
swap a ;
mov 22h,a ;ket qua tu ZVH thanh VZH clr a ;
mov r0,#22h
xchd a,@r0 ;ket qua (A) = YZH
mov 21h,a ;ket qua (A) = YZH vao o nho 21h pop acc ;lay lai A
orl 22h,a ;ket qua (22H)=VW: bon 4 thap moi vua vao xuly_pso1: lcall giaima ;goi chtr con giai ma
lcall hienthichung
ljmp main1 ;tro ve chtr chinh
;xxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxx ;chtr con giai ma
;xxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxx giaima: mov a,21h
anl a,#0fh add a,#30h mov 4dh,a mov a,22h
Thu vien DH SPKT TP. HCM - http://www.thuvienspkt.edu.vn