找回密码
 立即注册

QQ登录

只需一步,快速开始

搜索
查看: 2276|回复: 1
打印 上一主题 下一主题
收起左侧

单片机单词记忆器

[复制链接]
跳转到指定楼层
楼主
ID:217468 发表于 2017-7-5 20:28 | 只看该作者 回帖奖励 |倒序浏览 |阅读模式
#include<reg51.h>
char word0[15]="H.I.T.  CHINA";
char word1[10][10]={"ice","flower","water","grass","sun","moon","air",
                       "family","word","mother"};
  char num;
        int i,j,a;
  j=0;
        i=0;                                                                 
sbit Icden=P3^5;
sbit Icdrs=P3^4;
void delay(int z)
{
   int x,y;
   for(x=z;x>0;x--)
   for(y=110;y>0;y--);
}
void write_com(char com)
{
  Icdrs=0;
  P0=com;
  delay(5);
  Icden=1;
  delay(5);
  Icden=0;
}
void write_data(char date)
{
Icdrs=1;
P0=date;
delay(5);
Icden=1;
delay(5);
Icden=0;
}
void init()
{
Icden=0;
write_com(0x38);
write_com(0x0c);
write_com(0x06);
write_com(0x01);
write_com(0x80+0x01);
}
void main()
{
init();
delay(100);

for(num=0;num<15;num++)
           {
            write_data(word0[num]);       
            delay(20);
            }
a=P1;                              
   switch(a)
{
  case0xfe: {write_com(2);
             write_com(0x80+0x40);
             for(num=0;num<10;num++)
            {
             write_data(word1[i][num]);
             i++;
             j++;
             delay(20);
            }
            }
            break;
  case0xfd:{ write_com(2);
             write_com(0x80+0x40);
             for(num=0;num<10;num++)
            {  
             write_data(word1[i][num]);
             i++;
             delay(20);
             }
            }
            break;
  case0xfb:{write_com(2);
            write_com(0x80+0x40);
            --i;
            for(num=0;num<10;num++)
            {  
             write_data(word1[i][num]);
             }
             }
             break;
  case0xf7:{write_com(2);
            write_com(0x80+0x40);
            ++i;
            for(num=0;num<10;num++)
            {  
             write_data(word1[i][num]);
             }
             }
             break;
}
}


分享到:  QQ好友和群QQ好友和群 QQ空间QQ空间 腾讯微博腾讯微博 腾讯朋友腾讯朋友
收藏收藏 分享淘帖 顶 踩
回复

使用道具 举报

沙发
ID:217518 发表于 2017-7-6 01:17 | 只看该作者
麻烦删一下
回复

使用道具 举报

您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

手机版|小黑屋|51黑电子论坛 |51黑电子论坛6群 QQ 管理员QQ:125739409;技术交流QQ群281945664

Powered by 单片机教程网

快速回复 返回顶部 返回列表