久久久久久久999_99精品久久精品一区二区爱城_成人欧美一区二区三区在线播放_国产精品日本一区二区不卡视频_国产午夜视频_欧美精品在线观看免费

 找回密碼
 立即注冊

QQ登錄

只需一步,快速開始

搜索
查看: 4086|回復: 3
收起左側

單片機電子沙漏程序

[復制鏈接]
ID:254193 發表于 2017-12-6 19:10 來自觸屏版 | 顯示全部樓層 |閱讀模式
#include<reg51.h>        //頭文件

typedef unsigned int  uint;
typedef unsigned char uchar;

sbit D1=P1^0;
sbit D2=P1^1;
sbit D3=P1^2;
sbit D4=P1^3;
sbit D5=P1^4;
sbit D6=P1^5;
sbit D7=P1^6;
sbit D8=P1^7;

sbit D9=P3^0;
sbit D10=P3^1;
sbit D11=P3^2;
sbit D12=P3^3;
sbit D13=P3^4;
sbit D14=P3^5;
sbit D15=P3^6;
sbit D16=P3^7;

sbit D17=P0^0;
sbit D18=P0^1;
sbit D19=P0^2;
sbit D20=P0^3;
sbit D21=P0^4;
sbit D22=P0^5;
sbit D23=P0^6;
sbit D24=P0^7;

sbit D25=P2^0;
sbit D26=P2^1;
sbit D27=P2^2;
sbit D28=P2^3;
sbit D29=P2^4;
sbit D30=P2^5;
sbit D31=P2^6;
sbit D32=P2^7;

void delayms(unsigned int t)
{
         unsigned int a,b;
        for(a=110;a>0;a--)
           for(b=t;b>0;b--);
}

int f=0;
void main()                        //主函數
{
        while(1)        
        {
                if(f==0)
                {
                        st:
                        while(D32==0);
                        P1=0X00;
                        P0=0X00;
                        P2=0XFF;
                        P3=0XFF;
                        f=1;
                        delayms(1000);               
                }
                if(f==1)
                {
                        D8=1;
                        delayms(250);
                        D31=0;
                        delayms(250);
                        if(D32==0)goto st;
                        D31=1;
                        D27=0;
                        delayms(250);
                        D27=1;
                        D11=0;
                        delayms(250);
                        if(D32==0)goto st;/@

                        D7=1;
                        delayms(250);
                        D31=0;
                        delayms(250);
                        if(D32==0)goto st;
                        D31=1;
                        D27=0;
                        delayms(250);
                        D27=1;
                        D12=0;
                        delayms(250);
                        if(D32==0)goto st; /@

                        D17=1;
                        delayms(250);
                        D31=0;
                        delayms(250);
                        if(D32==0)goto st;
                        D31=1;
                        D27=0;
                        delayms(250);
                        D27=1;
                        D10=0;
                        delayms(250);
                        if(D32==0)goto st;/@

                        D4=1;
                        delayms(250);
                        D31=0;
                        delayms(250);
                        if(D32==0)goto st;
                        D31=1;
                        D27=0;
                        delayms(250);
                        D27=1;
                        D16=0;
                        delayms(250);
                        if(D32==0)goto st;/@

                        D5=1;
                        delayms(250);
                        D31=0;
                        delayms(250);
                        if(D32==0)goto st;
                        D31=1;
                        D27=0;
                        delayms(250);
                        D27=1;
                        D15=0;
                        delayms(250);
                        if(D32==0)goto st;/@

                        D3=1;
                        delayms(200);
                        D31=0;
                        delayms(200);
                        if(D32==0)goto st;
                        D31=1;
                        D27=0;
                        delayms(200);
                        D27=1;
                        D25=0;
                        delayms(200);
                        D25=1;
                        D13=0;
                        delayms(200);
                        if(D32==0)goto st;/@

                        D6=1;
                        delayms(200);
                        D31=0;
                        delayms(200);
                        if(D32==0)goto st;
                        D31=1;
                        D27=0;
                        delayms(200);
                        D27=1;
                        D14=0;
                        delayms(200);
                        D14=1;
                        D9=0;
                        delayms(200);
                        if(D32==0)goto st; /@

                        D1=1;
                        delayms(250);
                        D31=0;
                        delayms(250);
                        if(D32==0)goto st;
                        D31=1;
                        D27=0;
                        delayms(250);
                        D27=1;
                        D25=0;
                        delayms(250);
                        if(D32==0)goto st;/@

                        D2=1;
                        delayms(250);
                        D31=0;
                        delayms(250);
                        if(D32==0)goto st;
                        D31=1;
                        D27=0;
                        delayms(250);
                        D27=1;
                        D14=0;
                        delayms(250);
                        if(D32==0)goto st;/@

                        D20=1;
                        delayms(333);
                        D31=0;
                        delayms(333);
                        if(D32==0)goto st;
                        D31=1;
                        D27=0;
                        delayms(333);
                        if(D32==0)goto st; /@

                        D18=1;
                        delayms(333);
                        D31=0;
                        delayms(333);
                        if(D32==0)goto st;
                        D31=1;
                        D28=0;
                        delayms(333);
                        if(D32==0)goto st;/@

                        D19=1;
                        delayms(333);
                        D31=0;
                        delayms(333);
                        if(D32==0)goto st;
                        D31=1;
                        D26=0;
                        delayms(333);
                        if(D32==0)goto st;/@

                        D22=1;
                        delayms(333);
                        D31=0;
                        delayms(333);
                        if(D32==0)goto st;
                        D31=1;
                        D30=0;
                        delayms(333);
                        if(D32==0)goto st;/@

                        D21=1;
                        delayms(333);
                        D31=0;
                        delayms(333);
                        if(D32==0)goto st;
                        D31=1;
                        D29=0;
                        delayms(333);
                        if(D32==0)goto st;/@

                        D23=1;
                        D31=0;
                        delayms(1000);
                        if(D32==0)goto st;/@
                        f=2;
                }
                if(f==2)
                {
                        if(D32==0)goto st;/@                        
                }
        }
}
回復

使用道具 舉報

ID:841290 發表于 2020-11-9 22:47 | 顯示全部樓層
里面的st可以解釋一下嘛?
回復

使用道具 舉報

ID:328014 發表于 2020-11-9 23:00 | 顯示全部樓層
ST 是goto語句  一般不建議這樣做
回復

使用道具 舉報

ID:940754 發表于 2021-6-21 12:19 來自觸屏版 | 顯示全部樓層
51hei團團 發表于 2020-11-9 23:00
ST 是goto語句  一般不建議這樣做

請問,那應該怎么做呀
回復

使用道具 舉報

您需要登錄后才可以回帖 登錄 | 立即注冊

本版積分規則

小黑屋|51黑電子論壇 |51黑電子論壇6群 QQ 管理員QQ:125739409;技術交流QQ群281945664

Powered by 單片機教程網

快速回復 返回頂部 返回列表
主站蜘蛛池模板: 日本免费毛片 | 国产精品一区一区三区 | 超碰中文字幕 | 四虎黄色片 | 久久黄色网址 | 国产一级在线观看 | 亚洲精品一 | 美女网站视频在线观看 | 日韩视频免费在线观看 | 97中文字幕 | 日韩欧美中文字幕在线观看 | 911精品国产一区二区在线 | 一级毛片黄色 | 成 人 黄 色 片 在线播放 | a级黄毛片| 手机av在线 | 青草av在线 | 亚洲第一毛片 | 黄网站在线播放 | 91精品91久久久中77777 | 加勒比综合 | 91玖玖| 国产黄色精品 | 夜夜操夜夜爽 | 午夜视频在线免费观看 | 亚洲黄色成人 | 国产欧美一区二区三区视频在线观看 | 亚洲国产精品网站 | 免费在线看a | 日韩在线免费播放 | 91看片淫黄大片 | 黄色在线免费 | 欧美专区在线观看 | 欧美视频在线观看免费 | 久久999| 国产视频一二三 | 天天澡天天狠天天天做 | 日韩一级大片 | 亚洲区在线 | 亚洲网在线| 在线中文字幕 |