按键控制流水灯花样C程序（国外英文资料）.docVIP

按键控制流水灯花样C程序（国外英文资料） # include reg52. H Unsigned char a, key_code = 0; / / bit key_press = 0; Sbit wela = P2 ^ 7; Sbit dula = P0 ^ 2; / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * Delay subroutine * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * / Void delay (long dly) { While (dly --); } / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * Read the keyboard code subroutine * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * / Void read_key (void) { Unsigned char x; P3 = 0 xf0; / / assign a value of the keyboard to 0 X = P3 | 0 x0f; / / pay the value of the keyboard to x If (x! = 0 XFF) / / software keyboard shake { Delay (1000); P3 = 0 xf0; X = P3 | 0 x0f; If (x! = 0 XFF) / / if the row of the keyboard has a low level, is a key press { P3 = x; / / assign 0 to the corresponding row Key_code = P3; / / the value of the row and column, which is the key code / / key_press = 1; A = 1; / / mark position 1 } } } / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * Eight luminescent tube scintillation programs * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * / Void shanshuo (void) { P1 = 0 x00; / / the eight luminescent tubes are not bright Delay (1500