|
程序清單： 51匯編 3x138，24燈流水 ;D:\DPJ\3x138_24LED流水燈\LSD.ASM ORG 00H AJMP MAIN ORG 30H MAIN: MOV P2,A SETB P2.3 ACALL DLY CLR P2.3 INC A CJNE A,#8,MAIN MOV A,#0 CLR P2.3 MAIN2: MOV P2,A SETB P2.4 ACALL DLY CLR P2.4 INC A CJNE A,#8,MAIN2 MOV A,#0 CLR P2.4 MAIN3: MOV P2,A SETB P2.5 ACALL DLY SETB P2.4 CLR P2.5 INC A CJNE A,#8,MAIN3 MOV A,#0 CLR P2.5 AJMP MAIN
DLY: ;0.5S MOV R7,#4 MOV R6,#255 MOV R5,#255 DJNZ R5,$ DJNZ R6,$-4 DJNZ R7,$-8 RET END
-------------------------------------------------------------------- 51c /3只138，控制24只LED流水燈 //2011 04 23 E:\DPJ_C\8x138LSD.c #include <reg51.h> #define uchar unsigned char sbit E10=P2^3; //第1 片138 E1 sbit E11=P2^4; //第2 片138 E1 sbit E12=P2^5; //第3 片138 E1 delay_ms(unsigned int ms) { uchar i; while(ms--) for(i=123;i>0;i--); } void main(void) { uchar a=0; while(a!=8) { P2=a; E10=1; delay_ms(500 ); E10=0; a++; } a=0; while(a!=8) { P2=a; E11=1; delay_ms(500); E11=0; a++; } a=0; while(a!=8) { P2=a; E12=1; delay_ms(500 ); E12=0; a++; } }
| 
QQ好友和群
QQ空間
騰訊微博
騰訊朋友
收藏
淘帖
頂
踩
