河南理工大学微机原理课设--悄艽傲河南理工大学微机原理课设--智能窗aspan class=

include define uchar unsigned char unsigned char code dofly 0 x3f 0 x06 0 x5b 0 x4f 0 x66 0 x6d 0 x7d 0 x07 0 x7f 0 x6f 0 x77 0 x7c 0 x39 0 x5e 0 x00 0 x6d 0 x7 8 0 x5c 0 x73 uchar table num 4 0 sbit k1 P0 5 sbit k2 P0 6 sbit k3 P0 7 sbit A P3 2 sbit b P3 3 sbit C P3 4 sbit D P3 5 sbit out1 P2 0 sbit out2 P2 1 sbit huoerA P2 2 sbit huoerb P2 3 sbit P3 6 P3 6 sbit P3 7 P3 7 int pwm 50 a pwmout char flag void delay2 unsigned int cnt unsigned char i for cnt 0 cnt for i 0 i0 mm for nn 110 nn 0 nn void display void char i for i 0 i 4 i P0 1 i P1 dofly table num i delay1 90 P1 0 x00 void initime void P1M0 0 x00 P1M1 0 xff TMOD 0 x02 dingshiqi0fangshi2 TH0 TL0 0 x06 TR0 1 ET0 1 EA 1 out1 out2 0 void keyscan void P0 0 xff P3 6 0 P3 7 1 if k1 0 delay1 3 if k1 0 pwm while k1 if k2 0 delay1 3 if k2 0 pwm 5 while k2 if k3 0 delay1 3 if k3 0 pwm 10 while k3 P0 0 xff P3 7 0 P3 6 1 if k1 0 delay1 3 if k1 0 pwm while k1 if k2 0 delay1 3 if k2 0 pwm 5 while k2 if k3 0 delay1 3 if k3 0 pwm 10 while k3 if pwm100 pwm 100 P0 0 xff main initime for 主函数循环体 while 1 display 显示函数调用 keyscan 按键扫描函数调用 table num 1 pwm 100 table num 2 pwm 100 10 table num 3 pwm 10 if D 1 按键 D 按下 调整 PWM 控制电机速度 table num 0 18 out2 out1 0 else if A 1out2 0 flag 1 table num 0 10 按键 A 按下且 A 端霍尔传感器为不靠近磁钢 A 方向旋转 else if b 1out1 0 flag 2 table num 0 11 按键 b 按下且 b 端霍尔传感器为不靠近磁钢 b 方向旋转 else 按键 C 按下 或磁钢靠近对应方向磁钢即窗帘到头 if flag 1 out2 1 out1 0 delay2 1000 短时间反方向旋转 电机急停 if flag 2 out2 0 out1 1 delay2 1000 短时间反方向旋转 电机急停 out2 out1 0 flag 0 table num 0 15 数码管显示当前状态 stop table num 1 16 table num 2 17 tabl