塑料排水板-植草格-土工膜厂家-泰安东诺工程材料有限公司

以文本方式查看主題

-  曙海教育集團論壇  (http://m.rfoamep.cn/bbs/index.asp)
--  單片機初中級  (http://m.rfoamep.cn/bbs/list.asp?boardid=55)
----  關于“單片機初中級...”的內容  (http://m.rfoamep.cn/bbs/dispbbs.asp?boardid=55&id=2208)

--  作者：wangxinxin
--  發布時間：2010-12-7 14:06:01
--  關于“單片機初中級...”的內容
RG 001BH          ;
MOV TH1,R1       ;
MOV TL1,R0       ;
CPL P3.7          ;
RET1             ;
ORG 100H          ;
START:MOV TMOD,#10H ;
MOV IE,#88H       ;
MOV DPTR,#TAB    ;
LOOP:CLR A       ;
INC DPTR          ;
CLR A             ;
MOVC A,@A+DPTR    ;
MOV R0,A          ;
ORL A,R1          ;
JZ NEXT0          ;
ANL A,R1          ;
CJNE A,#OFFH,NEXT ;
SJMP START       ;
NEXT:MOV TH1,R1    ;
MOV TL1,R0       ;
SETB TR1          ;
SJMP NEXT1       ;
NEXT0:CLR TR1    ;
NEXT1:CLR A       ;
INC DPTR          ;
MOVC A,@A+DPTR    ;
MOV R2,A          ;
LOOP1CALL D200 ;
DJNZ R2,LOOP1    ;
INC DPTR          ;
D200:MOV R4,#81H ;
D200B:MOV A,#OFFH ;
D200AEC A       ;
JNZ D200A          ;
DEC R4             ;
CJNZ R4,#00H,D200B  ;
RET

TAB:  DB OFEH,25H,02H,OFEH,25H,02H; DB OFEH,84H,02H,OFEH,84H,02H;
   DB OFEH,84H,04H,OFEH,25H,04H; DB OFEH,25H,02H,OFEH,84H,02H;
   DB OFEH,OCOH,04H,OFEH,OCOH,04H;  DB OFEH,98H,002H,OFEH,84H,02H;
   DB OFEH,57H,08H,00H,00H,04H;    DB OFFH,OFFH;
   END.