STC89C52面包板實測可用
發光二極管D12由滅均勻變到最亮,再由最亮均勻熄滅。在最亮和最暗時使用蜂鳴器分別警報一聲,完成整個周期時間控制在5s左右,循環變化。
下載:
5.5.1.zip
(15.92 KB, 下載次數: 21)
2016-10-25 11:07 上傳
點擊文件名下載附件
整個uvproj工程 下載積分: 黑幣 -5
源程序:
- #include<reg52.h>
- #define uchar unsigned char
- #define uint unsigned int
- sbit dula=P2^6;
- sbit wela=P2^7;
- sbit dawr=P3^6;
- sbit dacs=P3^2;
- sbit beep=P2^3;
- void delayms(uint xms)
- {
- uint i,j;
- for(i=xms;i>0;i--)
- for(j=110;j>0;j--);
- }
- void main()
- {
- uchar val,flag;
- dula=0;
- wela=0;
- dacs=0;
- dawr=0;
- P0=0;
- while(1)
- {
- if(flag==0)
- {
- val+=5;
- P0=val;
- if(val==255)
- {
- flag=1;
- beep=0;
- delayms(100);
- beep=1;
- }
- delayms(50);
- }
- else
- {
- val-=5;
- P0=val;
- if(val==0)
- {
- flag=0;
- beep=0;
- delayms(100);
- beep=1;
- }
- delayms(50);
- }
- }
- }
復制代碼
|