易语言控制单片机实现鼠标左击

dita · 发表于 2015-1-16 23:45

我是刚接触单片机  写的有问题希望前辈们  与以点评
原理  如下
废旧鼠标左键焊接两根导线
易语言与单片机的串口通信  控制一个继电器  继电器控制鼠标左键

一共两个程序
调用端  易语言
-----------------------------------------------------------------------------

端口1.发送数据 (到字节 (到数值 (编辑框1.内容)))

-----------------------------------------------------------------------------
被调用端单片机 C
----------------------------------------------------------------------------

#include<reg51.h>

sbit RELAY = P0^0;
sbit LED1 = P1^0;

void Delay10ms(unsigned int);

unsigned char flag,tmp;

void main()
{
      LED1=0;
         SCON=0X50;
      TMOD=0X20;
      PCON=0X80;
      TH1=0XF3;
      TL1=0XF3;
      ES=1;
      EA=1;
      TR1=1;
            while(1)
            {
                        if(flag==1)
                              {
                                    ES=0;
                                    flag=0;
                        LED1=0;
                                    RELAY=0;

                                       Delay10ms(1);
                                                LED1=1;
                                    RELAY=1;
                                    SBUF=tmp;
                                    while(!TI);
                                    TI=0;
                                    ES=1;
                              }

            }

}

  void Delay10ms(unsigned int c)
{
unsigned char a,b;
for(;c>0;c--)
      for(b=38;b>0;b--)
         for(a=130;a>0;a--);
}

void ser() interrupt 4

{
      RI=0;
      tmp=SBUF;
      flag=1;
}

源码如下加入屏幕取色实现CF 自动开枪  在出23-0 就是你运气真背到极点了  这是真的鼠标点的

新建文件夹.zip (32.67 KB, 下载次数: 151)

备份浏览地址
http://bbs.jianhucheng.com/thread-670872-1-1.html

love105827 · 发表于 2015-1-17 00:00

这个和易语言有关系？？

dita · 发表于 2015-1-16 23:52

大漠色值如下友情提示大漠色值不通用别的模块
FindColor(375,333,429,357,"e3461c-050505|a53a31-050505|9b3834-050505|9e3833-050505",1.0,4,x1,y1)=1 then

hlrlqy · 发表于 2015-1-17 00:00

到底还是c

as1543100166 · 发表于 2015-1-17 00:24

这玩意干嘛用呢

f378694339 · 发表于 2015-1-17 00:28

好神秘的感觉

tongjin73 · 发表于 2015-1-17 01:24

易语言玩单片机楼主不错啊

1257276297 · 发表于 2015-1-17 09:36

表示看不懂。

yuday · 发表于 2015-1-17 17:14

表示楼主非常爱折腾

liujinze880125 · 发表于 2015-1-20 10:27

太特么的流弊了！！！

帐号		自动登录	找回密码
密码			注册[Register]

[易语言转载] 易语言控制单片机实现鼠标左击

免费评分

个人中心

[易语言 转载] 易语言控制单片机 实现鼠标左击

免费评分

个人中心

[易语言转载] 易语言控制单片机实现鼠标左击