找回密码
 加入
搜索
查看: 6070|回复: 8

[IE类操作] (易语言) 求翻译,怎么翻译成au3问题不重要了,当做(已解决)

  [复制链接]
发表于 2011-3-26 20:53:18 | 显示全部楼层 |阅读模式
本帖最后由 qq123123 于 2011-4-19 19:11 编辑

function nearest(type)
        local p = getObjectAddrList();
        local nearId = nil;
        local distNear = 0;
        if p == nil then
                return nil;
        end
        for _, baseAddr in pairs(p)  do
                local object = getObjectInfo(baseAddr);
                if object.type==type then
                        local distNow = distance(object);
                        if nearId ==nil then
                                nearId = object.id;
                                distNear = distNow;
                        elseif distNear>distNow then
                                nearId = object.id;
                                distNear = distNow;
                        end
                end
        end
        return nearId;
end

function distance(object)
        local cx, cy = Player:GetPos();
        local xx = math.abs(cx-object.x);
        local yy = math.abs(cy-object.y);
        return math.sqrt(xx*xx+yy*yy);
end

local nearId = nearest("box");
if nearId~=nil then
        SetNotifyTip("最近的箱子ID:"..nearId);
        openBag(nearId);        --可以使用openBox(nearId);试试..
else
        SetNotifyTip("未找到箱子.");
end
发表于 2011-3-27 08:31:14 | 显示全部楼层
这像D多过像E吧.
getObjxxxxx这些应该不是内置函数
发表于 2011-3-27 12:17:12 | 显示全部楼层
易语言 不是中文的吗?
发表于 2011-3-27 20:39:07 | 显示全部楼层
内置函数 不易转
发表于 2011-3-28 11:58:35 | 显示全部楼层
内置函数  多了
发表于 2011-3-28 15:52:02 | 显示全部楼层
自己按照思路重新编写一个代码  得了
发表于 2011-3-28 15:57:47 | 显示全部楼层
呵呵,这个哪是易语言
发表于 2011-3-28 21:31:48 | 显示全部楼层
简单而看不懂的语言=易语言
发表于 2014-5-13 14:56:26 | 显示全部楼层
雷锋精神传天下!谢谢分享!
您需要登录后才可以回帖 登录 | 加入

本版积分规则

QQ|手机版|小黑屋|AUTOIT CN ( 鲁ICP备19019924号-1 )谷歌 百度

GMT+8, 2024-11-16 21:42 , Processed in 0.075146 second(s), 23 queries .

Powered by Discuz! X3.5 Licensed

© 2001-2024 Discuz! Team.

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