tn.rar_between

id equ 2fh ;noi chua dia chi cua chip recbuff equ 30h; dia chi dau vung cat du lieu nhan trabuff equ 35h ; dia chi dau vung cat du lieu truyen receiveprobuff equ 3ah ; dia chi vung luu tam de xu ly nhan header equ 45h addr equ 46h command equ 47h da_ta equ 48h lampstore equ 49h ; noi chua trang thai den temstore equ 50h ;noi chua mau nhiet do cpstore equ 51h ;noi chua trang thai cong tac to top_sp equ 6fh; dia chi dinh ngan xep ;========================================== ;Buff nhan co dia chi nhu sau: ;header = 30h ;recive_addr = 31h ;command = 32h ;data = 33h ;fsc = 34h ;========================================== ;Buff truyen co dia chi nhu sau: ; header = 35h ;trans_addr = 36h ;command = 37h ;data = 38h ;fsc = 39h ;========================================== ;Buff tam de xu ly co dia chi nhu sau: ;header = 3ah ;pro_addr = 3bh ;command = 3ch ;data = 3dh ;fsc = 3eh ;========================================== ;Dinh nghia cac co trang thai: fla_fsc bit 20h.0 ; cho biet frame nhan tot(=1) hay khong(=0) fla_ack bit 20h.1 ; cho biet phai tra loi ack(=1) hay khong(=0) fla_timeout bit 20h.2 ;cho biet het thoi gian doi(=1) fla_trans bit 20h.3 ; cho biet can phat du lieu(=1) fla_tem bit 20h.4 ;cho biet can truyen data(=1) fla_lamp bit 20h.5 ;cho biet can truyen trang thai den (=1) fla_cp bit 20h.6 ;cho biet can truyen trang thai cong tac to (=1) ;========================================== org 0 jmp main org 23h jmp ng_nt org 30h main: mov sp,#top_sp ; nap dinh ngan xep mov scon,#50h ; che do uart 8 bit mov tmod , # 21h ; bo dinh thoi 1,he do 2 va bo dinh thoi 0 che do 1 mov th1,#- 3;toc do baud 9600 mov tl1,#-3 setb tr1 mov id,p2 ;nap dia chi duoc set boi p2 clr fla_trans clr fla_fsc mov r7,#0 ; dinh so byte nhan ban dau mov ie,#90h ; cho phep ngat port noi tiep ;======================================================= ;jb fla_fsc,xulydata ; fla_fsc = 1 cho biet data nhan duoc dung ; va tien hanh xuly data stop: jb fla_trans,transmit ; fl_trans = 1 thi tien hanh chuan bi frame truyen jmp stop ; va truyen dulieu ;=============================================================== ng_nt: jnb ri,kt_ke; 2ck/du lieu duoc nhan do ngat call receive ;2ck kt_ke: jnb ti,int_exit call start int_exit: reti ;=============================================================== receive: mov a,sbuf ;2ck cjne r7,#0,recont ;2ck ,kiem tra xem phai byte thu 1 khong cjne a,#0f0h,exit ; 2ck ,kiem tra byte dau co dung khong ;neu la byte nhieu thi loai bo mov b,#recbuff ;2ck, B chua dia chi cat so lieu mov r0,b ;1ck mov @r0,a;1ck push acc ;2ck,cat gia tri cua a mov a,r0;1ck add a,#10;1ck mov r0,a;1ck pop acc;2ck mov @r0,a ;1ck,luu byte dau vao vung xu ly mov r7,#1;1ck,cho biet so byte nhan duoc clr ri;1ck ret;2ck recont: inc b ;1ck,chu y b va r7 khong bi thay doi boi tac vu khac inc r7;1ck mov r0,b;1ck mov @r0,a;1ck push acc;2ck mov a,r0;1ck add a,#10;1ck mov r0,a;1ck pop acc;2ck mov @r0,a ;1ck cjne r7,#5,exit;2ck call fsc ;2ck goi chuong trinh tinh fsc jb fla_fsc,xulydata;2ck exit: clr ri;1ck ret;2ck ;================================================== ;Chuan bi frame truyen ;================================================== transmit: jnb fla_ack,next1 call trans_ack next1: jnb fla_lamp,next2 call trans_lampstate next2: jnb fla_tem ,next3 call trans_tem next3: jnb fla_cp,next4 call trans_cp next4: clr fla_trans ;sau khi truyen het cac yeu cau thi xoa co truyen jmp stop ;======================================================= xulydata: clr fla_fsc ;1ck,xoa fla_fsc truoc khi xu ly dulieu de khoi gay lap lai trong ; cac vong chuong trinh con vi day chi la dk de xuly data mov r0,#recbuff ;1ck,nap dia chi dau vung du lieu nhan inc r0 ;1ck,tro den vitri byte dia chi mov a,@r0;1ck , nap byte dia chi vao a swap a ;doi vi tri hai dia chi nguon va dich cjne a,id,exit ;2ck, kiem tra dia chi xem data nhan �uoc phai cua kit khong inc r0;1ck,tro den de lay command mov a,@r0;1ck cjne a,#0ah,kt_dk ;2ck,kiem tra xem phai ack khong ;neu ack thi xoa co phat va timeout setb TF0 ;dung timer clr fla_timeout ;1ck,xoa co timeout clr fla_trans ;1ck,xoa co phat mov r6,#1 ;1ck,xoa bien so lan phat jmp exit;2ck kt_dk:cjne a,#0bh,exit ; kiem tra xem phai byte dieu khien khong setb fla_ack ; tao dk de tra loi ack vi data nhan dung setb fla_trans ;tao dk de truyen mov a,#recbuff add a,#3; mov r0,a mov a,@r0 ; lay byte data cua dieu khien ;======================================= ;Mo ta cac bit dieu khien ;acc.0 turnon(=1)/turnoff(=0) thiet bi cho phep ;acc.1 cho phep / khong cho phep dieu khien cp ;acc.2 cho phep /khong cho phep dieu khien den ;acc.5 = 1 yeu cau goi trang thai cong tac to ;acc.6 = 1 yeu cau goi nhiet do ;acc.7 = 1 yeu cau goi trang thai den ;======================================= jb acc.1,cpcontrol jb acc.2,lampcontrol jb acc.5,state_cp jb acc.6,temsampl jb acc.7, state_lamp cpcontrol: jb acc.0 ,cpturnon setb p3.3 ; p3.3 noi voi dk cp jmp exit cpturnon: clr p3.3 ; dk bat cp jmp exit lampcontrol: jb acc.0,lampturnon setb p3.2 ;mov p0,#0fh ; tn jmp exit lampturnon: clr p3.2 ;p3.2 noi voi dk den jmp exit temsampl: push acc mov a,p1 mov temstore,a pop acc ;pop r0 ;pop acc setb fla_tem ;setb fla_trans ;tao dk de truyen nhiet jmp exit state_cp: jb p3.3,statecpoff ; push acc mov a,#1 mov cpstore,a;luu trang thai cong tac to ;vao noi chua trang thai cong tac to pop acc setb fla_cp jmp exit statecpoff: push acc mov a,#0 mov cpsto