新聞中心

        EEPW首頁 > 嵌入式系統 > 設計應用 > proteus 1602液晶程序

        proteus 1602液晶程序

        作者: 時間:2016-11-13 來源:網絡 收藏
        proteus1602液晶是LM016L

        #include
        #include
        #include
        #define uchar unsigned char
        #define uint unsigned int
        #pragma data:code
        const uchar table[]="I LOVE CHINA";
        const uchar table1[]="MADE BY LYQ" ;
        void delay(uint ms)
        {
        uint i,j;
        for(i=0;ifor(j=0;j<1141;j++);
        }
        void write_com(uchar com)
        {
        PORTD&=~BIT(4); // RS
        PORTD&=~BIT(5);// RW
        PORTB=com;
        //PORTD&=~BIT(6);// E
        PORTD|=BIT(6);
        delay(1);
        PORTD&=~BIT(6);

        }

        本文引用地址:http://www.104case.com/article/201611/316375.htm

        void write_data(uchar data)
        {
        PORTD|=BIT(4); // RS
        PORTD&=~BIT(5);// RW
        PORTB=data;
        //PORTD&=~BIT(6);// E
        PORTD|=BIT(6);
        delay(1);
        PORTD&=~BIT(6);
        }

        void main()
        {
        uchar i;
        DDRB=0XFF;
        DDRD|=BIT(4)|BIT(5)|BIT(6);
        PORTD&=~BIT(6);

        write_com(0x38);
        delay(5);
        write_com(0x01);//clear screen//清屏命令非常重要,沒有出現亂碼
        delay(5);
        write_com(0x0f);
        delay(5);
        write_com(0x06);
        delay(5);
        write_com(0x80+0x10);
        delay(5);

        for(i=0;i<12;i++)
        {
        write_data(table[i]);
        delay(1);
        }
        write_com(0x80+0x40+0x10);
        delay(5);

        for(i=0;i<11;i++)
        {
        write_data(table1[i]);
        delay(1);
        }
        delay(1000);
        for(i=0;i<16;i++)
        {
        write_com(0x1c);//屏幕左移16次,不是0x18
        delay(200);

        }

        }



        關鍵詞: proteus1602液

        評論


        技術專區

        關閉
        主站蜘蛛池模板: 祁连县| 乡宁县| 额敏县| 黄浦区| 穆棱市| 自治县| 林州市| 忻城县| 迁西县| 达拉特旗| 玉林市| 井研县| 林州市| 忻城县| 蕲春县| 无锡市| 土默特右旗| 上犹县| 阳山县| 弥勒县| 濮阳市| 宁波市| 大荔县| 禹城市| 汝阳县| 大化| 武汉市| 兴隆县| 灵川县| 镇安县| 四子王旗| 德昌县| 漾濞| 沁水县| 天等县| 石屏县| 宜君县| 岳普湖县| 微山县| 寿光市| 云霄县|