花样灯(一).asm

基于Proteus的51系列单片机设计与仿真

       ORG  30H
START: MOV  DPTR,#TABLE  ;TABLE表的地址存入DPTR
LP1:   MOV  A,#00H         ;清除累加器
       MOVC A,@A+DPTR     ;查表
       CJNE A,#1BH,LP2   ;取出的代码不是结束码，则进行下一步操作
       JMP  START          ;是结束码，则重新进行操作
LP2:   MOV  P2,A           ;将A中的值送P1口，显示
       LCALL DELAY        ;等待1s
       INC  DPTR           ;数据指针加1，指向下1个码
       JMP  LP1            ;返回，取码
DELAY: MOV  R7,#10         ;1s延时子程序
DE1:   MOV  R6,#200
DE2:   MOV  R5,#248
       DJNZ R5,$
       DJNZ R6,DE2
       DJNZ R7,DE1
       RET
TABLE: DB  0feH,0fdH,0fbH,0f7H ;正向流水灯
       DB  0efH,0dfH,0bfH,07fH
       DB  0bfH,0dfH,0efH,0f7H ;反向流水灯
       DB  0fbH,0fdH,0feH,0ffH
       DB  0aaH,55H,0aaH,55H  ;隔灯闪烁
       DB  0aaH,55H,0ffH
       DB  0f0H,0fH,0f0H,0fH,0ffH;高四盏低四盏闪烁
       DB  33H,0ccH,33H,0ccH
       DB  33H,0ccH,0ffH      ;隔两盏闪烁
       DB  1BH                ;退出码       
       END