LQ: CLR C MOV R2,#8 MOV A,@R0 ; CPL A ;TPIC6B595应该不用这一步 LCALL DD1;调用显示一个字节的子程序 INC R0;指向下一个显示单元 DJNZ R5,LQ RET DD1: CLR SRCLK;清串行CP端 RLC A; MOV SER,C SETB SRCLK ;触发串行CP端 DJNZ R2,DD1;每个字节移8次够了向下执行 RET ;选通行子程序 XH: CLR RCK ;将输出CP变成低电平为上升沿做准备 NOP SETB RCK CLR P1.6 ;CLR P1.7 MOV A,27H MOV P0,A CLR OE LCALL DE25MS INC A SETB OE SETB P1.6 MOV A,27H ANL A,#0F0H SWAP A ADD A,#01H SWAP A MOV 27H,A CLR MR SETB MR RET DE25MS: MOV R5,#09H DEL2: MOV R6,#0FH DEL3: MOV R7,#01H DJNZ R7,$ DJNZ R6,DEL3 DJNZ R5,DEL2 RET TAB: 字库 END
首页 上一页 2 3 4 5 下一页 尾页 5/5/5