打开APP
userphoto
未登录

开通VIP,畅享免费电子书等14项超值服

开通VIP
delphi开发的文字识别插件coolocr 源码
此次还增加找图找色和找字在屏幕上的坐标的代码,并附带字库建造工具源码
本人开发的delphi插件源码,喜欢的拿去自己研究!scanline扫描速度很快。本人专注于做网游装备材料自动收货商人,有盈利模式的欢迎一起探讨


实测本插件的速度优于收费插件

字库建造工具
调用例子
<html>
<meta http-equiv="content-type" content="text/html;charset=utf-8">
<SCRIPT LANGUAGE="javascript">
var km = new ActiveXObject("keymouse.hdkm");//建立硬件键盘鼠标的activex com对象
var xdm = new ActiveXObject("xdm.coolocr");//建立图像识别插件的activex com对象
xdm.lujing("d:/dnfhtml/font.txt"); //字库路径
xdm.wordwide(1);//字宽
xdm.secha(10); //色差
xdm.yanse("ffffff");//字颜色
xdm.loadpic("d:/dnfhtml/pic/");//图片路径
function main() {
    var place, dnfwin;
    try {
        if (port == 0) {
            port = km.open("com1", 57600);//打开硬件键盘鼠标电子板的端口
        }
  
xdm.xieping(476, 600, ("端口状态" + port), "0000ff");//屏幕写字
        dnfwin = xdm.findwindows("地下城与勇士"); //查找窗口
        if (dnfwin > 0) {
            xdm.movewin();
            km.moveto(56, 555); //鼠标移动到
            xdm.delay(200);        //插件延时
            km.leftclick();         //鼠标左击
            while (running) {
                xdm.secha(30);
                xdm.yanse("9bc8e6");  //设置识字颜色
                place = xdm.ocr(610, 5, 796, 19);  //在屏幕左610,上5,右796,下19范围内找字
                if (place.indexOf("h") >= 0) {
                    higheststage = 0;
                    weak();
                    pl();
                    citytomap();
                } else if (place.indexOf("级") >= 0) {
                    monstersw = 1;
                    if (stage != 99) {
                        if (stageloop < 5) {
                            jianwu();
                        }
                    }
                    tu();
                    magic();
                } else {
                }
                doquest();
                xdm.delay(500);
            }
        } else {
            login();
            main();
        }
    } catch (e) {
        alert(e.message)
    }
    // km.close();
}
</SCRIPT>
<p>
    <textarea rows="24" name="S1" cols="20" value="测试"></textarea>
</p>
<input name="uu" type="button" id="uu" value="开始">
<input name="u" type="button" id="u" value="停止">
<input name="continu" type="button" id="contu" value="继续">
<input name="test" type="button" id="test" value="测试">
<input name="close" type="button" id="killpro" value="关掉程序">
</html>
本站仅提供存储服务,所有内容均由用户发布,如发现有害或侵权内容,请点击举报
打开APP,阅读全文并永久保存 查看更多类似文章
猜你喜欢
类似文章
【热】打开小程序,算一算2024你的财运
最神奇、最实用和最精准的逃顶指标公式(通达信源码)
Delphi中Chrome Chromium、Cef3学习笔记(四)
delphi2010 无法继承窗体的bug
delphi WebBrowser的使用方法详解(五)
有人要求的B点选股源码
Xmanager4.0连接CentOS6.5
更多类似文章 >>
生活服务
热点新闻
分享 收藏 导长图 关注 下载文章
绑定账号成功
后续可登录账号畅享VIP特权!
如果VIP功能使用有故障,
可点击这里联系客服!

联系客服