[原创]武林小蜜蜂1.1版。源码。只供学习参考,不能使用,小心封号

[ 33580 查看 / 153 回复 ]

武林小蜜蜂1.1版。源码。只供学习参考,不能使用,小心封号。

<?xml version="1.0" encoding="gb2312" ?>
<ApeML LID="CHS" MD="0" 抓屏模式="0" 名称="武林小蜜蜂1.1版" 作者="小蜜蜂" 信息窗口="2" 速度="11" 循环次数="1" 自定义属性="运行提示=正在运行,运行次数=0">
 <!---->
 <脚本区块 语言="LAScript" 名称="WEB" 延时="0" 启用="true" 编辑密钥="" 运行公钥="">
 <![CDATA[tab={};
FilePath=win.path("xmf.dll")
if (not FilePath) then
str =[[
tx_rwGH=60  tx_rwGM=30
ck_jlGH=0  tx_jjGH=30
tx_gjbj=12  ck_jllj=0  ck_swgj=0
ck_fz1=0  ck_fz2=0  ck_fz3=0
tx_fzlq1=0  tx_fzlq2=0  tx_fzlq3=0
]]
string.save( str,_LASDIR.."xmf.dll","w+t");
end
_ck=1
_zt=1
_bc=1
str = string.load(_LASDIR.."xmf.dll");
for str,int in string.gmatch(str, "tx_rwGH=(%w+)")  do _rwGH=str   end;
for str,int in string.gmatch(str, "tx_rwGM=(%w+)")  do _rwGM=str   end;
for str,int in string.gmatch(str, "ck_jlGH=(%w+)")  do _jlGH=str   end;
for str,int in string.gmatch(str, "tx_jjGH=(%w+)")  do _jjGH=str   end;
for str,int in string.gmatch(str, "tx_gjbj=(%w+)")  do _gjbj=str   end;
for str,int in string.gmatch(str, "ck_jllj=(%w+)")  do _jllj=str   end;
for str,int in string.gmatch(str, "ck_swgj=(%w+)")  do _swgj=str   end;

for str,int in string.gmatch(str, "ck_fz1=(%w+)")  do _fz1=str   end;
for str,int in string.gmatch(str, "ck_fz2=(%w+)")  do _fz2=str   end;
for str,int in string.gmatch(str, "ck_fz3=(%w+)")  do _fz3=str   end;

for str,int in string.gmatch(str, "tx_fzlq1=(%w+)")  do  _fzlq1=str   end;
for str,int in string.gmatch(str, "tx_fzlq2=(%w+)")  do  _fzlq2=str   end;
for str,int in string.gmatch(str, "tx_fzlq3=(%w+)")  do  _fzlq3=str   end;

 function  get()  
  local ele_rwGH=wbetEle("tx_rwGH");
 local ele_rwGM=wbetEle("tx_rwGM");
 local ele_ck_jlGH = wbetEle("ck_jlGH");
 local ele_jjGH=wbetEle("tx_jjGH");
 local ele_gjbj=wbetEle("tx_gjbj");
 local ele_ck_jllj=wb:getEle("ck_jllj");
 local ele_ck_swgj=wb:getEle("ck_swgj");

 local ele_ck_fz1=wb:getEle("ck_fz1");
 local ele_ck_fz2=wb:getEle("ck_fz2");
 local ele_ck_fz3=wb:getEle("ck_fz3");

 local ele_fzlq1=wb:getEle("tx_fzlq1");
 local ele_fzlq2=wb:getEle("tx_fzlq2");
 local ele_fzlq3=wb:getEle("tx_fzlq3");
  
         _rwGH=ele_rwGH:getAttribute("value");
         _rwGM=ele_rwGM:getAttribute("value");

 local htm_jlGH = ele_ck_jlGH:getHtml();
 if(string.find(htm_jlGH,"CHECKED"))then
 _jlGH=1
 else
 _jlGH=0
 end;
     _jjGH=ele_jjGH:getAttribute("value");

     _gjbj=ele_gjbj:getAttribute("value");
 local htm_jllj = ele_ck_jllj:getHtml();
 if(string.find(htm_jllj,"CHECKED"))then
 _jllj=1
 else
 _jllj=0
 end;
 local htm_swgj = ele_ck_swgj:getHtml();
 if(string.find(htm_swgj,"CHECKED"))then
 _swgj=1
 else
 _swgj=0
 end;

 local htm_fz1= ele_ck_fz1:getHtml();
 if(string.find(htm_fz1,"CHECKED"))then
_fz1=1
 else
_fz1=0
 end;
 local htm_fz2= ele_ck_fz2:getHtml();
 if(string.find(htm_fz2,"CHECKED"))then
_fz2=1
 else
_fz2=0
 end;
 local htm_fz3= ele_ck_fz3:getHtml();
 if(string.find(htm_fz3,"CHECKED"))then
_fz3=1
 else
_fz3=0
 end;

      _fzlq1=ele_fzlq1:getAttribute("value");
      _fzlq2=ele_fzlq2:getAttribute("value");
      _fzlq3=ele_fzlq3:getAttribute("value");

end;

web.callProc = function(ele,wb)
    hwnd = win.find("QElementClient Window","element client");
        if (mem.openHWND(hwnd))then
         collectgarbage();
cz=ele:getAttribute("value")

         if(cz=="开始挂机")then
             ele:setAttribute("value","挂机中...")
             get();
 ape:call("guaji");
elseif(cz=="暂停挂机")then
_zt=0
elseif(cz=="隐藏窗口" and _ck==1)then
        ele:setAttribute("value","显示窗口")
               win.show(hwnd,false);
_ck=2
elseif(cz=="显示窗口" and _ck==1)then
        ele:setAttribute("value","隐藏窗口")
                win.show(hwnd,true);
_ck=2
elseif(cz=="保存退出")then
             get();  
string.save("tx_rwGH=".._rwGH.."     ".."tx_rwGM=".._rwGM.."\n".."ck_jlGH=".._jlGH.."     ".."tx_jjGH=".._jjGH.."\n".."tx_gjbj=".._gjbj.."     ".."ck_jllj=".._jllj.."     ".."ck_swgj=".._swgj.."\n".."ck_fz1=".._fz1.."     ".."ck_fz2=".._fz2.."     ".."ck_fz3=".._fz3.."\n".."tx_fzlq1=".._fzlq1.."     ".."tx_fzlq2=".._fzlq2.."     ".."tx_fzlq3=".._fzlq3,_LASDIR.."xmf.dll","w+t");
_bc=0
                win.messageBox("保存成功!如果正在挂机,打完一个怪后才会自动退出小蜜蜂!","小蜜蜂提示您!");
wb:show(false);
          end;
_ck=1
       else
  win.messageBox("请先运行游戏","小蜜蜂提示您!");
  mem.close();
  end;
end;

stopPlay = function() --这个函数回放停止时被调用.
    web.del(wb);

    collectgarbage();--清理内存
end;

web.msgProc = function(msg,wb)
 return 0;
end;
-- webForm页面HTML源代码
_DEFINE_HTML = [[
<html>
<head>
<title>武林小蜜蜂1.1版</title>
</head>

<body>

<STYLE type=text/css>.sec1 {
 BORDER-RIGHT: Maroon 1px solid; BORDER-TOP:

Maroon 1px solid; BORDER-LEFT: Maroon 1px

solid; CURSOR: hand; COLOR:Green; BORDER-

BOTTOM: Maroon 1px solid; BACKGROUND-COLOR:

FFFECE
}
.sec2 {
 BORDER-RIGHT: Teal 1px solid; BORDER-TOP:

Teal 1px solid; FONT-WEIGHT: 900; BORDER-

LEFT: Teal 1px solid; CURSOR: hand; COLOR:

Blue; BACKGROUND-COLOR: DDDFFF
}
.main_tab {
 BORDER-RIGHT: DDDFFF 1px solid; BORDER-

LEFT: DDDFFF 1px solid; COLOR: Blue; BORDER-

BOTTOM: DDDFFF 1px solid; BACKGROUND-COLORDDFFF
}
</STYLE>
<!--JavaScript部分-->
            <SCRIPT language=javascript>
     function secBoard(n)
  {
    for(i=0;i<secTable.cells.length;i++)
      secTable.cells

.className="sec1";
    secTable.cells[n].className="sec2";
    for(i=0;i<mainTable.tBodies.length;i++)
      mainTable.tBodies

.style.display="none";
    mainTable.tBodies

[n].style.display="block";
  }
      </SCRIPT>

<!--HTML部分-->
            <TABLE id=secTable cellSpacing=0 cellPadding=0 width=200 border=0 style='position:absolute;left:0;top:0;'>
              <TBODY>
              <TR align=center height=5>
                <TD class=sec2 onclick=secBoard(0) width="10%">信息</TD>
                <TD class=sec1 onclick=secBoard(1) width="10%">保护</TD>
                <TD class=sec1 onclick=secBoard(2) width="10%">参数</TD>
                <TD class=sec1 onclick=secBoard(3) width="10%">说明</TD></TR></TBODY></TABLE>
            <TABLE class=main_tab id=mainTable height=220 cellSpacing=0 cellPadding=0 width=200 border=0 style='position:absolute;left:0;top:19;'>
<!--关于TBODY标记-->
              <TBODY style="DISPLAY: block" >
              <TR>
                <TD vAlign=top align=middle><BR><BR>
                  <TABLE cellSpacing=0 cellPadding=0 width=200 border=0>
                    <TBODY>
                    <TR>
                      <TD><font size=2 color=Navy>
<fieldset id='frm1' name='frm1' oType=frm style='position:absolute;left:1;top:3;width:198;height:115' class=''><legend>人物</legend></fieldset>
<label id='lb1' oType=lb style='position:absolute;left:3;top:20;width:40;height:12'  class=''>等级:</label>
<label id='tx_rwdj' name='tx_rwdj' oType=lb style='position:absolute;left:42;top:20;width:40;height:12'  class=''>0</label>
<label id='lb4' oType=lb style='position:absolute;left:72;top:20;width:40;height:12'  class=''>坐标:</label>
<label id='tx_rwxy' name='tx_rwxy' oType=lb style='position:absolute;left:115;top:20;width:100;height:12'  class=''>0,0</label>
<label id='lb2' oType=lb style='position:absolute;left:10;top:35;width:40;height:12'  class=''>HP      :</label>
<label id='tx_rwHP' name='tx_rwHP' oType=lb style='position:absolute;left:42;top:35;width:120;height:12'  class=''>0/0</label>
<label id='lb3' oType=lb style='position:absolute;left:10;top:50;width:40;height:12'  class=''>MP:</label>
<label id='tx_rwMP' name='tx_rwMP' oType=lb style='position:absolute;left:42;top:50;width:120;height:12'  class=''>0/0</label>

<fieldset id='frm2' name='frm2' oType=frm style='position:absolute;left:1;top:120;width:198;height:98' class=''><legend>怪物</legend></fieldset>
<label id='lb5' oType=lb style='position:absolute;left:3;top:135;width:40;height:12'  class=''>等级:</label>
<label id='tx_gwdj' name='tx_gwdj' oType=lb style='position:absolute;left:42;top:135;width:40;height:12'  class=''>0</label>
<label id='lb7' oType=lb style='position:absolute;left:72;top:135;width0;height:12'  class=''>杀怪数量:</label>
<label id='tx_gwsl' name='tx_gwsl' oType=lb style='position:absolute;left:140;top:135;width:40;height:12'  class=''>0</label>
<label id='lb6' oType=lb style='position:absolute;left:10;top:150;width:40;height:12'  class=''>HP  :</label>
<label id='tx_gwHP' name='tx_gwHP' oType=lb style='position:absolute;left:42;top:150;width:120;height:12'  class=''>0/0</label>
<input id='bt_ksgj' oType=bt  name='bt_ksgj' type='button' value='开始挂机' style='position:absolute;left:50;top:180;width:100;height:30;background:FF0000' class='call'>
<BR><BR></font></TD></TR></TBODY></TABLE></TD></TR></TBODY>
<!--关于cells集合-->
              <TBODY style="DISPLAY:none">
              <TR>
                <TD vAlign=top align=middle><BR><BR>
                  <TABLE cellSpacing=0 cellPadding=0 width=200 border=0>
                    <TBODY>
                    <TR>
                      <TD> <font size=2 color=Navy>
<fieldset id='frm3' name='frm3' oType=frm style='position:absolute;left:1;top:3;width:198;height:215' class=''><legend>保护</legend></fieldset>
<label id='lb8' oType=lb style='position:absolute;left:3;top:25;width:25;height:12'  class=''>HP<</label>
<input id='tx_rwGH' name='tx_rwGH' oType=tx txType=text value='60' style='position:absolute;left:30;top:20;width:25;height:21'  class=''>
<label id='lb9' oType=lb style='position:absolute;left:55;top:25;width:40;height:12'  class=''>%加血</label>
<label id='lb10' oType=lb style='position:absolute;left:3;top:50;width:25;height:12'  class=''>MP<</label>
<input id='tx_rwGM' name='tx_rwGM' oType=tx txType=text value='30' style='position:absolute;left:30;top:45;width:25;height:21'  class=''>
<label id='lb11' oType=lb style='position:absolute;left:55;top:50;width:40;height:12'  class=''>%加蓝</label>
<span name='ck_jlGH_span' style='position:absolute;left:3;top:70;width:190;height:21' val='%25u6280%25u80FD%25u52A0%25u8840%2C%25u6280%25u80FD%25u52A0%25u8840%2C%u5426' oType=ck class='undefined'><label for='ck_jlGH_0'><input id='ck_jlGH_0' name='ck_jlGH' value='技能加血' onfocus='this.blur()' type=checkbox >技能加血(快捷键:F5)</label></span>
<label id='lb12' oType=lb style='position:absolute;left:3;top:95;width:25;height:12'  class=''>HP<</label>
<input id='tx_jjGH' name='tx_jjGH' oType=tx txType=text value='30' style='position:absolute;left:30;top:90;width:25;height:21'  class=''>
<label id='lb13' oType=lb style='position:absolute;left:55;top:95;width0;height:12'  class=''>%紧急加血</label>
<BR><BR></font></TD></TR></TBODY></TABLE></TD></TR></TBODY>
<!--关于tBodies集合-->
              <TBODY style="DISPLAY:none">
              <TR>
                <TD vAlign=top align=middle><BR><BR>
                  <TABLE cellSpacing=0 cellPadding=0 width=200 border=0>
                    <TBODY>
                    <TR>
                      <TD><font size=2 color=Navy>
<fieldset id='frm4' name='frm4' oType=frm style='position:absolute;left:1;top:3;width:198;height:122' class=''><legend>参数</legend></fieldset>
<label id='lb14' oType=lb style='position:absolute;left:3;top:20;width0;height:12'  class=''>挂机半径:</label>
<input id='tx_gjbj' name='tx_gjbj' oType=tx txType=text value='12' style='position:absolute;left:70;top:15;width:30;height:21'  class=''>
<span name='ck_jllj_span' style='position:absolute;left:3;top:35;width0;height:21' val='%25u6280%25u80FD%25u7EC3%25u7EA7%2C%25u6280%25u80FD%25u7EC3%25u7EA7%2C%u5426' oType=ck class='undefined'><label for='ck_jllj_0'><input id='ck_jllj_0' name='ck_jllj' value='技能练级' onfocus='this.blur()' type=checkbox >技能练级</label></span>
<span name='ck_swgj_span' style='position:absolute;left:90;top:35;width0;height:21' val='%25u6B7B%25u4EA1%25u5173%25u673A%2C%25u6B7B%25u4EA1%25u5173%25u673A%2C%u5426' oType=ck class='undefined'><label for='ck_swgj_0'><input id='ck_swgj_0' name='ck_swgj' value='死亡关机' onfocus='this.blur()' type=checkbox >死亡关机</label></span>

<fieldset id='frm5' name='frm5' oType=frm style='position:absolute;left:1;top:127;width:198;height:91' class=''><legend>辅助技能</legend></fieldset>

<span name='ck_fz1_span' style='position:absolute;left:3;top:140;width:120;height:21' val='%25u52A0%25u76FE%252C%25u51B7%25u5374%2C%25u52A0%25u76FE%252C%25u51B7%25u5374%2C%u5426' oType=ck class='undefined'><label for='ck_fz1_0'><input id='ck_fz1_0' name='ck_fz1' value='辅助技能1 延时' onfocus='this.blur()' type=checkbox >辅助技能1 延时</label></span>
<input id='tx_fzlq1' name='tx_fzlq1' oType=tx txType=text value='0' style='position:absolute;left:110;top:140;width:35;height:21'  class=''>
<label id='lb36' oType=lb style='position:absolute;left:145;top:145;width:100;height:12'  class=''>秒(F8)</label>

<span name='ck_fz2_span' style='position:absolute;left:3;top:165;width:120;height:21' val='%25u52A0%25u76FE%252C%25u51B7%25u5374%2C%25u52A0%25u76FE%252C%25u51B7%25u5374%2C%u5426' oType=ck class='undefined'><label for='ck_fz2_0'><input id='ck_fz2_0' name='ck_fz2' value='辅助技能2 延时' onfocus='this.blur()' type=checkbox >辅助技能2 延时</label></span>
<input id='tx_fzlq2' name='tx_fzlq2' oType=tx txType=text value='0' style='position:absolute;left:110;top:165;width:35;height:21'  class=''>
<label id='lb37' oType=lb style='position:absolute;left:145;top:170;width:100;height:12'  class=''>秒(F7)</label>

<span name='ck_fz3_span' style='position:absolute;left:3;top:190;width:120;height:21' val='%25u52A0%25u76FE%252C%25u51B7%25u5374%2C%25u52A0%25u76FE%252C%25u51B7%25u5374%2C%u5426' oType=ck class='undefined'><label for='ck_fz3_0'><input id='ck_fz3_0' name='ck_fz3' value='辅助技能3 延时' onfocus='this.blur()' type=checkbox >辅助技能3 延时</label></span>
<input id='tx_fzlq3' name='tx_fzlq3' oType=tx txType=text value='0' style='position:absolute;left:110;top:190;width:35;height:21'  class=''>
<label id='lb38' oType=lb style='position:absolute;left:145;top:195;width:100;height:12'  class=''>秒(F6)</label>

<BR><BR></font></TD></TR></TBODY></TABLE></TD></TR></TBODY>
<!--关于display属性-->
              <TBODY style="DISPLAY:none">
              <TR>
                <TD vAlign=top align=middle><BR><BR>
                  <TABLE cellSpacing=0 cellPadding=0 width=200 border=0>
                    <TBODY>
                    <TR>
                      <TD><font size=2 color=Navy>
<textarea name="textfield" cols="23" rows="10" id="textfield" style="position:absolute;left:10;top:10;font-size:12px;color:blue;" >
*武林小蜜蜂1.1版*
**快捷键设置:1红; 2技能 ;3技能; F1捡东西; F2蓝; F3普通攻击; F5加血技能; F6加防技能; F7加攻技能; F8加盾或罡气技能
**启动时的人物坐标为挂机点,所以人物必须走到要挂机的地方再启动<武林小密蜂>
**目前只能挂一个号,不支持多开。
</textarea>
<a href="http://www.blog.163.com/q_q_s/" target="Window_Name" style="position:absolute;left:10;top:180;font-size:20px;color:Green;FILTER: glow(color=Fuchsia,direction=2)">小蜜蜂之家</a>
<BR><BR></font></TD></TR></TBODY></TABLE>
</TD></TR></TBODY></TABLE>
<input type=hidden id=o_form_df value='fm1,武林小蜜蜂1.1版,235,350' >
<input id='bt_ycck' oType=bt  name='bt_ycck' type='button' value='隐藏窗口' style='position:absolute;left:1;top:220;width:65;height:21;background:Fuchsia' class='call'>
<input id='bt_bcsz' oType=bt  name='bt_bcsz' type='button' value='保存退出' style='position:absolute;left:70;top:220;width:60;height:21;background:Fuchsia' class='call'>
<input id='bt_gjzt' oType=bt  name='bt_gjzt' type='button' value='暂停挂机' style='position:absolute;left:133;top:220;width:65;height:21;background:Fuchsia' class='call'>

 <!-- LAScript - webForm数据岛 -->
 <div id='userdata' style='display:none' />
 </body>
</html>

]]
wb = web.new("about:blank");
wb:setTitle(true);
wb:write(_DEFINE_HTML);

 local ele_rwGH=wb:getEle("tx_rwGH");
 local ele_rwGM=wb:getEle("tx_rwGM");
 local ele_ck_jlGH = wb:getEle("ck_jlGH");
 local ele_jjGH=wb:getEle("tx_jjGH");
 local ele_gjbj=wb:getEle("tx_gjbj");
 local ele_ck_jllj=wb:getEle("ck_jllj");
 local ele_ck_swgj=wb:getEle("ck_swgj");

 local ele_ck_fz1=wb:getEle("ck_fz1");
 local ele_ck_fz2=wb:getEle("ck_fz2");
 local ele_ck_fz3=wb:getEle("ck_fz3");

 local ele_fzlq1=wb:getEle("tx_fzlq1");
 local ele_fzlq2=wb:getEle("tx_fzlq2");
 local ele_fzlq3=wb:getEle("tx_fzlq3");

     ele_rwGH:setAttribute("value",_rwGH);
    ele_rwGM:setAttribute("value",_rwGM);
 
if(tonumber(_jlGH)==1 )then 
ele_ck_jlGH:setAttribute("checked","true");
end;
    ele_jjGH:setAttribute("value",_jjGH);
   
    ele_gjbj:setAttribute("value",_gjbj);
if(tonumber(_jllj)==1 )then 
ele_ck_jllj:setAttribute("checked","true");
end;
if(tonumber(_swgj)==1 )then 
ele_ck_swgj:setAttribute("checked","true");
end;


if(tonumber(_fz1)==1 )then 
ele_ck_fz1:setAttribute("checked","true");
end;
if(tonumber(_fz2)==1 )then 
ele_ck_fz2:setAttribute("checked","true");
end;
if(tonumber(_fz3)==1 )then 
ele_ck_fz3:setAttribute("checked","true");
end;

   ele_fzlq1:setAttribute("value",_fzlq1);
   ele_fzlq2:setAttribute("value",_fzlq2);
   ele_fzlq3:setAttribute("value",_fzlq3);

local hwnd_wb = wb:getWindow();
win.sendStringXX(hwnd_wb,"武林小蜜蜂1.1版")
win.setForeground( hwnd_wb );--移动窗体到最前面
local x,y = win.getRect(hwnd_wb);
win.setRect(hwnd_wb,x,y,x+207,y+287);
wb:show(true);
wb:wait(-1); --等待窗体关闭


]]>
 </脚本区块>
 <脚本区块 语言="LAScript" 名称="guaji" 延时="0" 启用="false" 编辑密钥="" 运行公钥="">
 <![CDATA[hwnd = win.find("QElementClient Window","element client");
if (mem.openHWND(hwnd))then
   jizhi=mem.readInt(0x008c9e54,4);
    renwujizhi=mem.readInt(jizhi+0x24,4);
guaiwujizhi=mem.readInt(jizhi+0x8,4);
ECX=mem.readInt(guaiwujizhi+0x20,4);
jdxa=mem.readInt(jizhi+0x8,4);
jdxb=mem.readInt(jdxa+0x24,4);
else
    win.messageBox("对不起,你还没有启动游戏","小蜜蜂提示您!");
    return  false;
end; 

n=0
_fzlq1=tonumber(_fzlq1)+1
_fzlq2=tonumber(_fzlq2)+1
_fzlq3=tonumber(_fzlq3)+1
local ele_tx_rwdj = wb:getEle("tx_rwdj");
local ele_tx_rwxy = wb:getEle("tx_rwxy");
local ele_tx_rwHP = wb:getEle("tx_rwHP");
local ele_tx_rwMP = wb:getEle("tx_rwMP");

local ele_tx_gwdj = wb:getEle("tx_gwdj");
local ele_tx_gwsl = wb:getEle("tx_gwsl");
local ele_tx_gwHP = wb:getEle("tx_gwHP");

tx_rwdj=mem.readInt(renwujizhi+0x24c,4);
ele_tx_rwdj:setHtmlin(tx_rwdj);

tx_rwx=mem.readFloat(renwujizhi+0x3dc);
tx_rwy=mem.readFloat(renwujizhi+0x3e4);
n1,f = math.modf(tx_rwx)
n2,f = math.modf(tx_rwy)
ele_tx_rwxy:setHtmlin(n1..","..n2);

tx_rwHP=mem.readInt(renwujizhi+0x254,4);
tx_rwHP_max=mem.readInt(renwujizhi+0x26c,4);
ele_tx_rwHP:setHtmlin(tx_rwHP.."/"..tx_rwHP_max);

tx_rwMP=mem.readInt(renwujizhi+0x258,4);
tx_rwMP_max=mem.readInt(renwujizhi+0x270,4);
ele_tx_rwMP:setHtmlin(tx_rwMP.."/"..tx_rwMP_max);
time1=os.time()
time2=os.time()
time3=os.time()
function fuzhujileng()

if(_fz1==1 )then
      win.keyDown(hwnd,"F8");
      delay(150);
      win.keyUp(hwnd,"F8");
      delay(150);
      win.keyDown(hwnd,"F8");
      delay(150);
      win.keyUp(hwnd,"F8");
      delay(150);
_fz1=2
end
if(_fz2==1 )then
      win.keyDown(hwnd,"F7");
      delay(150);
      win.keyUp(hwnd,"F7");
      delay(150);
      win.keyDown(hwnd,"F7");
      delay(150);
      win.keyUp(hwnd,"F7");
      delay(150);
_fz2=2
end
if(_fz3==1 )then
      win.keyDown(hwnd,"F6");
      delay(150);
      win.keyUp(hwnd,"F6");
      delay(150);
      win.keyDown(hwnd,"F6");
      delay(150);
      win.keyUp(hwnd,"F6");
      delay(150);
_fz3=2
end

if(_fz1==2 )then
    fz1_time=os.time();
    if(os.difftime(fz1_time,time1)>_fzlq1) then
      win.keyDown(hwnd,"F8");
      delay(150);
      win.keyUp(hwnd,"F8");
      delay(150);
      win.keyDown(hwnd,"F8");
      delay(150);
      win.keyUp(hwnd,"F8");
      delay(150);
time1=fz1_time
     end
end
if(_fz2==2 )then
    fz2_time=os.time();
    if(os.difftime(fz2_time,time2)>_fzlq2) then
      win.keyDown(hwnd,"F7");
      delay(150);
      win.keyUp(hwnd,"F7");
      delay(150);
      win.keyDown(hwnd,"F7");
      delay(150);
      win.keyUp(hwnd,"F7");
      delay(150);
time2=fz2_time
     end
end
if(_fz3==2 )then
    fz3_time=os.time();
    if(os.difftime(fz3_time,time3)>_fzlq3) then
      win.keyDown(hwnd,"F6");
      delay(150);
      win.keyUp(hwnd,"F6");
      delay(150);
      win.keyDown(hwnd,"F6");
      delay(150);
      win.keyUp(hwnd,"F6");
      delay(150);
time3=fz3_time
     end
end

end

function guajiing()

gwid=mem.readInt(renwujizhi+0x798,4);
if(gwid==0 )then
if(_zt==0 )then
win.messageBox("已暂停挂机,请按      F12   键继续挂机!暂停期间不能退出小蜜蜂!","小蜜蜂提示您!");
key.waitKey("F12")
_zt=1
end;
if(_bc==0 )then
stop();
do return false end;
end;
win.keyDown(hwnd,"TAB");
delay(50)
win.keyUp(hwnd,"TAB");
delay(100)
n=n+1
ele_tx_gwsl:setHtmlin(n);
fuzhujileng();
jdx=mem.readInt(jdxb+0x14,4);
jdx=jdx+1
if(jdx>4 )then
jdx=4
end;
for i=1,jdx,1    do 
win.keyDown(hwnd,"F1");
delay(150)
win.keyUp(hwnd,"F1");
delay(100)
end;
gwid=mem.readInt(renwujizhi+0x798,4);
end;

tx_rwHP=mem.readInt(renwujizhi+0x254,4);
ele_tx_rwHP:setHtmlin(tx_rwHP.."/"..tx_rwHP_max);
if(tx_rwHP/tx_rwHP_max<tonumber(_rwGH)/100)then
if(_jlGH==1)then
win.keyDown(hwnd,"F5")
delay(150)
win.keyUp(hwnd,"F5")
delay(100)
else
win.keyDown(hwnd,"1")
delay(150)
win.keyUp(hwnd,"1")
delay(200)
end;
end;
if(tx_rwHP/tx_rwHP_max<tonumber(_jjGH)/100 )then
win.keyDown(hwnd,"1")
delay(150)
win.keyUp(hwnd,"1")
delay(200)
if(tx_rwHP==0 and  _swgj==1 )then
win.messageBox("人在江湖漂,哪有不挨刀!:)  要关机啦!","你挂了:)!");
delay(1000*600);
win.exit(1);
end;
end;

tx_rwMP=mem.readInt(renwujizhi+0x258,4);
ele_tx_rwMP:setHtmlin(tx_rwMP.."/"..tx_rwMP_max);
if(tx_rwMP/tx_rwMP_max<tonumber(_rwGM)/100 )then
win.keyDown(hwnd,"F2")
delay(150)
win.keyUp(hwnd,"F2")
delay(200)
end;

MAX=mem.readInt(ECX+0x24,4);
pianyi=gwid+(0x7fffffff%MAX)*2+2
pianyi=pianyi%MAX
if(pianyi<0 )then
pianyi=pianyi+MAX
end;
pianyi=pianyi*4
gwzhizen=mem.readInt(ECX+0x18,4);
gwzhizen=mem.readInt(gwzhizen+pianyi,4);
gwzhizen=mem.readInt(gwzhizen+0x4,4);
tx_gwx=mem.readFloat(gwzhizen+0x3c);
tx_gwy=mem.readFloat(gwzhizen+0x44);

tx_gwHP=mem.readInt(gwzhizen+0x130,4);
tx_gwHP_max=mem.readInt(gwzhizen+0x148,4);
ele_tx_gwHP:setHtmlin(tx_gwHP.."/"..tx_gwHP_max);
tx_gwdj=mem.readInt(gwzhizen+0x128,4);
ele_tx_gwdj:setHtmlin(tx_gwdj);

rwx=mem.readFloat(renwujizhi+0x3dc);
rwy=mem.readFloat(renwujizhi+0x3e4);
n3,f = math.modf(rwx)
n4,f = math.modf(rwy)
ele_tx_rwxy:setHtmlin(n3..","..n4);

local a=math.abs(tx_rwx-tx_gwx)>tonumber(_gjbj);
local b=math.abs(tx_rwy-tx_gwy)>tonumber(_gjbj);

if(a or b )then
win.keyDown(hwnd,"TAB");
delay(50)
win.keyUp(hwnd,"TAB");
delay(100)
for i=1,2,1    do 
win.keyDown(hwnd,"F1");
delay(150)
win.keyUp(hwnd,"F1");
delay(100)
end;
 fuzhujileng();
else
if( _jllj==1 and tx_rwMP>200 )then
win.keyDown(hwnd,"2")
delay(100)
win.keyUp(hwnd,"2")
delay(150)
win.keyDown(hwnd,"3")
delay(100)
win.keyUp(hwnd,"3")
delay(150)
else
win.keyDown(hwnd,"F3")
delay(100)
win.keyUp(hwnd,"F3")
delay(50)
end;
end;

end;

while(nStop())do
guajiing();
end;
]]>
 </脚本区块>
 <数据区块 />
</ApeML>

*****************************************************************************************************************************

武林小蜜蜂1。0版。。只供学习参考,不能使用,小心封号。

?xml version="1.0" encoding="gb2312" ?>
<ApeML LID="CHS" MD="0" 抓屏模式="0" 名称="武林小蜜蜂" 作者="qiusong" 信息窗口="2" 速度="10" 循环次数="1" 自定义属性="用户选项 = 0">
 <!--关闭"信息窗口"可以提升效率加快速度
创建时间:2007年02月05日-11:29

************************************************************************************

*************************用脚本者必读*****************

********快捷键设置:1红2技能3技能F1捡东西F2蓝F3普通攻击F5加血技能F8辅助技能

********本脚本可以实现定点挂机,不会被别人用怪拉走,术士和医生可以使用技能加血。

********《武林小蜜蜂》1.0版现已推出。让挂机更直观,更容易看懂参数设置。

********目前可以显视人物等级,血,蓝,攻击,防御,当前坐标,怪物等级,血,和打怪数量。

********死亡关机提示


********目前如果用技能练级最多可以设置2个技能。使用技能练级如果没有蓝药会自动用普通攻击练级
********启动时的人物坐标为挂机点,所以人物必须走到要挂机的地方再启动<武林小密蜂>

********如果有不足之处望各位指出,用的好就顶一下!
****************************************************************************************-->

 <脚本区块 语言="LAScript" 名称="Web" 延时="0" 启用="true" 编辑密钥="" 运行公钥="">
 <![CDATA[
--请在下面添加脚本代码(重复运行)

_set = ape:loadSetting();
stopPlay = function() --这个函数回放停止时被调用.
    local hwnd = win.find("QElementClient Window","");
 web.del(wb);
    win.show(hwnd,true);
    mem.close();
    collectgarbage();--清理内存
end;
juli=10;--设置怪物与挂机点之间的距离,如果怪物在这个距离之外咱就不打啦!
jlgs=1;--使用N个技能练级。。
smz=70;--生命值低于70%加血。
smzmin=30;--生命值低于30%加血。紧急加血。
mfz=30;--魔法值低于30%加蓝。
fzlq=54--辅助技能间隔时间,以秒为单位,按辅助技能间隔实际时间,网络延时我已加到脚本里了。

web.callProc = function(ele,wb)
 local elesmz= wb:getEle("txrwgx");
smz= elesmz:getAttribute("value");

 local elemfz= wb:getEle("txrwgl");
mfz= elemfz:getAttribute("value");

 local elesmzmin= wb:getEle("txjjgx");
smzmin= elesmzmin:getAttribute("value");

 local elejlgs= wb:getEle("txjlgs");
jlgs= elejlgs:getAttribute("value");

 local elejuli= wb:getEle("txjuli");
juli= elejuli:getAttribute("value");

 local elefzlq= wb:getEle("txfzlq");
fzlq= elefzlq:getAttribute("value");


 local elejljx = wb:getEle("rdglgx_0");
 local htmljljx = elejljx:getHtml();
 if(string.find(htmljljx,"CHECKED"))then
  zhiye = 0;
 else
  zhiye = 1;
 end;

 local elejl = wb:getEle("rdjllj_0");
 local htmljl = elejl:getHtml();
 if(string.find(htmljl,"CHECKED"))then
  jl = 1;
 else
  jl = 0;
 end;
 
 ape:saveSetting(_set);
  collectgarbage();
 ape:call("init");
end;
_DEFINE_HTML = [[
<html>
 <head><title>武林小蜜蜂</title></head>
 <style>body{cursorefault;font:12}table{font:12}input{font:12}</style>
 <body id='qiusong' bgcolor=buttonface>
 <input type=hidden id=o_form_df value='qiusong,武林小蜜蜂,285,340'><fieldset id='frm1' name='frm1' oType=frm style='position:absolute;left:5;top:5;width:115;height:170' class=''><legend>人物信息</legend></fieldset>
<label id='lb1' oType=lb style='position:absolute;left:16;top:50;width:36;height:12'  class=''>血 :</label>
<label id='lb2' oType=lb style='position:absolute;left:10;top:25;width:36;height:12'  class=''>等级:</label>
<input id='txrwdj' name='txrwdj' oType=tx txType=text value='' style='position:absolute;left:45;top:20;width:30;height:21'  class=''>
<input id='txrwsmz' name='txrwsmz' oType=tx txType=text value='' style='position:absolute;left:45;top:45;width:70;height:21'  class=''>
<label id='lb3' oType=lb style='position:absolute;left:16;top:75;width:36;height:12'  class=''>蓝 :</label>
<input id='txrwmfz' name='txrwmfz' oType=tx txType=text value='' style='position:absolute;left:45;top:70;width:70;height:21'  class=''>
<label id='lb4' oType=lb style='position:absolute;left:10;top:100;width:36;height:12'  class=''>攻击:</label>
<input id='txrmgj' name='txrmgj' oType=tx txType=text value='' style='position:absolute;left:45;top:95;width:70;height:21'  class=''>
<label id='lb5' oType=lb style='position:absolute;left:10;top:125;width:36;height:12'  class=''>防御:</label>
<input id='txrwfy' name='txrwfy' oType=tx txType=text value='' style='position:absolute;left:45;top:120;width:70;height:21'  class=''>
<label id='lb6' oType=lb style='position:absolute;left:10;top:150;width:36;height:12'  class=''>坐标:</label>
<input id='txrwxy' name='txrwxy' oType=tx txType=text value='' style='position:absolute;left:45;top:145;width:70;height:21'  class=''>
<fieldset id='txgw' name='txgw' oType=frm style='position:absolute;left:5;top:180;width:115;height:95' class=''><legend>怪物信息</legend></fieldset>
<label id='lb7' oType=lb style='position:absolute;left:10;top:200;width:36;height:12'  class=''>等级:</label>
<input id='txgwdj' name='txgwdj' oType=tx txType=text value='' style='position:absolute;left:45;top:195;width:30;height:21'  class=''>
<label id='lb8' oType=lb style='position:absolute;left:16;top:225;width:36;height:12'  class=''>血 :</label>
<input id='txgwsmz' name='txgwsmz' oType=tx txType=text value='' style='position:absolute;left:45;top:220;width:70;height:21'  class=''>
<label id='lb9' oType=lb style='position:absolute;left:10;top:250;width:66;height:12'  class=''>打怪数量:</label>
<input id='txgwxy' name='txgwxy' oType=tx txType=text value='' style='position:absolute;left:70;top:245;width:45;height:21'  class=''>
<fieldset id='frm3' name='frm3' oType=frm style='position:absolute;left:125;top:5;width:150;height:270' class=''><legend>参数设置</legend></fieldset>
<div tabindex='0' Step='1' Precision='1' onscroll='this.NumericUpDown.DoScroll(this)' style='position:absolute;left:190;top:20;width:30;cursor: default;border-width:1px;border-style:solid;border-color777777 #dddddd #dddddd #777777;backgroundffffff; overflow-y: scroll; height: 20'><span style='display: block; white-space: nowrap; text-indent: 2;'>10</span><input type='hidden' name='txjuli' id='txjuli' value='10' onpropertychange='var obj = this.parentNode.all.tags("SPAN")[1];if(obj){obj.innerText=value;if(this.onchange){this.onchange();} }' /></div><label id='lb10' oType=lb style='position:absolute;left:130;top:25;width:60;height:12'  class=''>挂机半径:</label>
<fieldset id='frm4' name='frm4' oType=frm style='position:absolute;left:130;top:45;width:135;height:135' class=''><legend>加血加蓝</legend></fieldset>
<label id='lb11' oType=lb style='position:absolute;left:135;top:65;width:40;height:12'  class=''>血低于</label>
<input id='txrwgx' name='txrwgx' oType=tx txType=text value='' style='position:absolute;left:175;top:60;width:30;height:21'  class=''>
<label id='lb12' oType=lb style='position:absolute;left:210;top:65;width:50;height:12'  class=''>%喝红药</label>
<label id='lb13' oType=lb style='position:absolute;left:135;top:90;width:45;height:12'  class=''>蓝低于</label>
<input id='txrwgl' name='txrwgl' oType=tx txType=text value='' style='position:absolute;left:175;top:85;width:30;height:21'  class=''>
<label id='lb14' oType=lb style='position:absolute;left:210;top:90;width:50;height:12'  class=''>%喝蓝药</label>
<span name='rdglgx_span' style='position:absolute;left:140;top:125;width:65;height:21' val='%25u662F%2C%25u662F%2C%u662F%3B%25u5426%2C%25u5426%2C%u5426' oType=rd class='undefined'><label for='rdglgx_0'><input id='rdglgx_0' name='rdglgx' value='是' onfocus='this.blur()' type=radio >是</label><label for='rdglgx_1'><input id='rdglgx_1' name='rdglgx' value='否' onfocus='this.blur()' type=radio checked>否</label></span>
<fieldset id='frm5' name='frm5' oType=frm style='position:absolute;left:135;top:110;width:125;height:65' class=''><legend>用技能加血</legend></fieldset>
<label id='lb15' oType=lb style='position:absolute;left:140;top:155;width:40;height:12'  class=''>血低于</label>
<input id='txjjgx' name='txjjgx' oType=tx txType=text value='' style='position:absolute;left:175;top:150;width:25;height:21'  class=''>
<label id='lb16' oType=lb style='position:absolute;left:205;top:155;width:50;height:12'  class=''>%喝红药</label>
<label id='lb17' oType=lb style='position:absolute;left:130;top:185;width:75;height:12'  class=''>用技能练级:</label>
<span name='rdjllj_span' style='position:absolute;left:200;top:180;width:65;height:21' val='%25u662F%2C%25u662F%2C%u662F%3B%25u5426%2C%25u5426%2C%u5426' oType=rd class='undefined'><label for='rdjllj_0'><input id='rdjllj_0' name='rdjllj' value='是' onfocus='this.blur()' type=radio >是</label><label for='rdjllj_1'><input id='rdjllj_1' name='rdjllj' value='否' onfocus='this.blur()' type=radio checked>否</label></span>

<label id='lb18' oType=lb style='position:absolute;left:130;top:205;width:25;height:12'  class=''>使用</label>
<input id='txjlgs' name='txjlgs' oType=tx txType=text value='' style='position:absolute;left:160;top:200;width:20;height:21'  class=''>
<label id='lb19' oType=lb style='position:absolute;left:185;top:205;width:65;height:12'  class=''>个技能练级</label>

<label id='lb51' oType=lb style='position:absolute;left:130;top:230;width:100;height:12'  class=''>辅助技能冷却时间</label>
<input id='txfzlq' name='txfzlq' oType=tx txType=text value='' style='position:absolute;left:225;top:225;width:35;height:21'  class=''>
<label id='lb52' oType=lb style='position:absolute;left:260;top:230;width:20;height:12'  class=''>秒</label>

<label id='lb23' oType=lb style='position:absolute;left:10;top:285;width:60;height:12'  class=''>隐藏窗口:</label>
<span name='rdycck_span' style='position:absolute;left:65;top:280;width:65;height:21' val='%25u662F%2C%25u662F%2C%u662F%3B%25u5426%2C%25u5426%2C%u5426' oType=rd class='undefined'><label for='rdycck_0'><input id='rdycck_0' name='rdycck' value='是' onfocus='this.blur()' type=radio >是</label><label for='rdycck_1'><input id='rdycck_1' name='rdycck' value='否' onfocus='this.blur()' type=radio checked >否</label></span>
<input id='btksgj' oType=bt  name='btksgj' type='button' value='开始挂机' style='position:absolute;left:135;top:280;width:125;height:30;background:buttonface' class='call'>
 <!-- LAScript - webForm数据岛 -->
 <div id='userdata' style='display:none' />
 </body>
</html>
<script>
var LAScript = external;
//---begin_webform_code---

</script><script language="javascript">
function NumericUpDown(div_elmt)
{
    var self = this;

    self.toString = function()
    {
        return '[class NumericUpDown]';
    }; 
   
 self.Initialize = function(elmt)
 {
     if ( !elmt.IsInitialized )
     {

         var inputs = elmt.all.tags('INPUT');
         if ( inputs.length == 1 )
         {
             elmt.Input = inputs[0];
         }
         else
         {
             throw 'must have an INPUT element in DIV.';
         }
   
         elmt.Current = elmt.Input.value;
         var current = parseInt(elmt.Current);
 
         var step = parseInt(elmt.Step);
         var previousSpan = self.CreateSpan();
         previousSpan.innerText = current - step;
         var nextSpan = self.CreateSpan();
         nextSpan.innerText = current + step;
         var currentSpan = elmt.all.tags('SPAN')[0];
         currentSpan.insertAdjacentElement('beforeBegin', previousSpan);
         currentSpan.insertAdjacentElement('afterEnd', nextSpan);
         self.ScrollTo.CurrentSpan = currentSpan;
         window.setTimeout(self.ScrollTo, 1);       
         elmt.IsInitialized = true;
      }
 };
 
 self.ScrollTo = function()
 {
      var currentSpan = self.ScrollTo.CurrentSpan;
      currentSpan.parentElement.scrollTop = currentSpan.offsetHeight;
      self.ScrollTopValue = currentSpan.offsetHeight;
 };
 
 self.CreateSpan = function()
 {
     var span = document.createElement('SPAN');
     span.style.display = 'block';
     span.style.whiteSpan = 'nowrap';
     span.style.height = 18;
     span.style.textIndent = 2;
     return span;  
 };
 
 self.ScrollBegin = 0;
 self.ScrollDirection = 0;
 self.ScrollTopValue = 0;
 
 self.DoScroll = function(elmt)
 {
     if ( !elmt || elmt.tagName != 'DIV' )
     {
         return;
     }
     if ( self.ScrollBegin == 0 )
     { 
      self.ScrollBegin = new Date().getTime();
      self.ChangeNumeric.Element = elmt;
      window.setTimeout(self.ChangeNumeric, 12);
     }
     else
     {
      var time = new Date().getTime();
      if ( self.ScrollDirection == 0 )
      {
           var scrollOffset = self.ScrollTopValue - elmt.scrollTop;
           self.ScrollDirection = scrollOffset > 0 ? 1 : -1;
           self.ScrollTopValue = elmt.scrollTop;
      }
     }
 };
 
 self.ChangeNumeric = function()
 {
     var elmt = self.ChangeNumeric.Element;
     status = self.ScrollDirection;
     self.ScrollTo();
     var span = elmt.all.tags('SPAN')[1];
     var step = parseInt(elmt.Step);
     var value = parseInt(span.innerText);
     var input = elmt.all.tags('INPUT')[0];
     span.innerText = value + self.ScrollDirection*step;
     input.value = span.innerText;
     self.ScrollBegin = 0;
     self.ScrollDirection = 0;
 };
 
 self.Initialize(div_elmt);
 
}

NumericUpDown.InitializeAll = function()
{
    var muds = document.all.tags('DIV');
    for ( var i=0 ; i < muds.length ; ++i )
    {
        var mud = muds;
        if ( typeof(mud.Step) != 'undefined' && mud.onscroll )
        {
           //创建一个新的数字微调控件对像
           mud.NumericUpDown = new NumericUpDown(mud);
        }
    }   
};
</script>

<script language="Javascript">
    NumericUpDown.InitializeAll();
</script>
]]
wb = web.new("about:blank");

wb:setTitle(true);

wb:write(_DEFINE_HTML);


local elesmz= wb:getEle("txrwgx");
elesmz:setAttribute("value",smz);

local elemfz= wb:getEle("txrwgl");
elemfz:setAttribute("value",mfz);

local elesmzmin= wb:getEle("txjjgx");
elesmzmin:setAttribute("value",smzmin);

local elejlgs= wb:getEle("txjlgs");
elejlgs:setAttribute("value",jlgs);

local elejuli= wb:getEle("txjuli");
elejuli:setAttribute("value",juli);

local elefzlq= wb:getEle("txfzlq");
elefzlq:setAttribute("value",fzlq);


local hwnd_wb = wb:getWindow();

win.sendStringXX(hwnd_wb,"武林小蜜蜂")
win.setForeground( hwnd_wb );--移动窗体到最前面

local x,y = win.getRect(hwnd_wb);

win.setRect(hwnd_wb,x,y,x+285,y+340);


wb:show(true);
wb:wait(-1); --等待窗体关闭
]]>
 </脚本区块>
 <脚本区块 语言="LAScript" 名称="init" 延时="0" 启用="true" 编辑密钥="" 运行公钥="">
 <![CDATA[ 
--区块名字前添加"init"前缀则不会重复运行
--import("std"); --从外部文件引用名字空间

_set = ape:loadSetting(); --读取自定义属性
stopPlay = function() --这个函数回放停止时被调用.
 ape:saveSetting(_set); --保存自定义属性
 collectgarbage();--清理内存
end;
--请在下面添加不需要重复运行的脚本
--[[ 添加横线取消注释块
do return false end; --退出程序
do return "区块名字"  end;--转向指定区块
do return  2 end;--转向第二个区块
--]]

_zhiye=tonumber(zhiye);--使用技能加血开关,0为使用技能加血(术士和医生),1为不使用技能加血(枪和剑)。
_juli=tonumber(juli);--设置怪物与挂机点之间的距离,如果怪物在这个距离之外咱就不打啦!
_jl=tonumber(jl);--使用技能开关,0为不用技能练级,如果用技能练级可以设为1。
_jlgs=tonumber(jlgs)--使用N个技能练级。
_smz=tonumber(smz);--生命值低于70%加血。
_smzmin=tonumber(smzmin);--生命值低于30%加血。紧急加血。
_mfz=tonumber(mfz);--魔法值低于30%加蓝。
_fzlq=tonumber(fzlq);

local eleycck = wb:getEle("rdycck_0");
hwnd = win.find("QElementClient Window","element client");
if (mem.openHWND(hwnd))then
   jizhi=mem.readInt(0x0012F82C,4);
    renwujizhi=mem.readInt(jizhi+0x24,4);
guaiwujizhi=mem.readInt(jizhi+0x8,4);
ECX=mem.readInt(guaiwujizhi+0x20,4);
jdxa=mem.readInt(jizhi+0x8,4);
jdxb=mem.readInt(jdxa+0x24,4);
local htmlycck = eleycck:getHtml();
if(string.find(htmlycck,"CHECKED"))then
 win.show(hwnd,false);
end;
ape:call("guaji");
else
    win.messageBox("对不起,你还没有启动游戏","错误提示");
    return  false;
end; ]]>
 </脚本区块>
 <脚本区块 语言="LAScript" 名称="guaji" 延时="0" 启用="true" 编辑密钥="" 运行公钥="">
 <![CDATA[
--请在下面添加脚本代码(重复运行)
n=0
fz=0
fztime=os.time()
local elerwsmz = wb:getEle("txrwsmz");
local elerwfy = wb:getEle("txrwfy");
local elerwdj = wb:getEle("txrwdj");
local elerwsmz = wb:getEle("txrwsmz");
local elerwmfz = wb:getEle("txrwmfz");
local elerwgj = wb:getEle("txrmgj");
local elerwfy = wb:getEle("txrwfy");
local elerwxy = wb:getEle("txrwxy");
local elegwxy = wb:getEle("txgwxy");
local elegwsmz = wb:getEle("txgwsmz");
local elegwdj = wb:getEle("txgwdj");

erwdj=mem.readInt(renwujizhi+0x24c,4);
 elerwdj:setAttribute("value",erwdj);

erwsmz=mem.readInt(renwujizhi+0x254,4);
erwsmzmax=mem.readInt(renwujizhi+0x26c,4);
 elerwsmz:setAttribute("value",erwsmz.."/"..erwsmzmax);

erwmfz=mem.readInt(renwujizhi+0x258,4);
erwmfzmax=mem.readInt(renwujizhi+0x270,4);
elerwmfz:setAttribute("value",erwmfz.."/"..erwmfzmax);

erwgja=mem.readInt(renwujizhi+0x2a4,4);
erwgjb=mem.readInt(renwujizhi+0x2a8,4);
elerwgj:setAttribute("value",erwgja.."-"..erwgjb);
erwfy=mem.readInt(renwujizhi+0x2b0,4);
elerwfy:setAttribute("value",erwfy);

rwx=mem.readFloat(renwujizhi+0x3dc);--读取你要挂机地点的xy坐标。
rwy=mem.readFloat(renwujizhi+0x3e4);
n1,f = math.modf(rwx)
n2,f = math.modf(rwy)
elerwxy:setAttribute("value",n1.."/"..n2);

function guaji()

time1=os.time()
if(fz==0 )then
fzjl=mem.readInt(renwujizhi+0x118,4);--读取辅助技能值。
if(fzjl==0)then
win.keyDown(hwnd,"F8");--辅助技能
delay(150)
win.keyUp(hwnd,"F8");
delay(200)
fztime=os.time()
fz=1
end;--条件判断语句
end;--条件判断语句

if(fz==1 )then
 if(os.difftime(time1,fztime)>_fzlq+1) then
win.keyDown(hwnd,"F8");--辅助技能
delay(150)
win.keyUp(hwnd,"F8");
delay(200)
fztime=os.time()
end;--条件判断语句
end;--条件判断语句

gwid=mem.readInt(renwujizhi+0x798,4);--找到怪物ID。
if(gwid==0 )then--如果没选中怪,那就找呗!地球人都知道按Tab键。
win.keyDown(hwnd,"TAB");
delay(50)
win.keyUp(hwnd,"TAB");
delay(100)
n=n+1
elegwxy:setAttribute("value",n);

jdx=mem.readInt(jdxb+0x14,4);--看看地上有没有东西,有1个捡2下,2个就捡3下。
jdx=jdx+1
if(jdx>4 )then
jdx=4
end;--条件判断语句
for i=1,jdx,1    do 
win.keyDown(hwnd,"F1");
delay(150)
win.keyUp(hwnd,"F1");
delay(100)
    end;
gwid=mem.readInt(renwujizhi+0x798,4);--找到怪物ID。
end;--条件判断语句

rwsmz=mem.readInt(renwujizhi+0x254,4);--读取人物生命值。
elerwsmz:setAttribute("value",rwsmz.."/"..erwsmzmax);
if(rwsmz/erwsmzmax<_smz/100)then--如果生命值低于所设比例。加血。
if( _zhiye==0  )then--如果是术和医生那么用技能加血。
win.keyDown(hwnd,"F5")
delay(150)
win.keyUp(hwnd,"F5")
delay(100)
else
win.keyDown(hwnd,"1")
delay(150)
win.keyUp(hwnd,"1")
delay(200)
end;--条件判断语句
if(rwsmz/erwsmzmax<_smzmin/100 )then--紧急加血,使用技能加血回血较慢。放止死亡。
win.keyDown(hwnd,"1")
delay(150)
win.keyUp(hwnd,"1")
delay(200)
if(rwsmz==0 )then
    win.messageBox("按停止热键退出脚本,默认停止热键Ctrl+Alt+L,否则5分钟后将自动关机!","你挂了:)!");
    delay(1000*300);
win.exit(1); --关机
end;
end;
end;

rwmfz=mem.readInt(renwujizhi+0x258,4);--读取人物魔法值。
elerwmfz:setAttribute("value",rwmfz.."/"..erwmfzmax);
if(rwmfz/erwmfzmax<_mfz/100 )then--如果魔法值低于所设比例,那么加蓝啦!
win.keyDown(hwnd,"F2")
delay(150)
win.keyUp(hwnd,"F2")
delay(200)
end;--条件判断语句;

MAX=mem.readInt(ECX+0x24,4);
pianyi=gwid+(0x7fffffff%MAX)*2+2
pianyi=pianyi%MAX
if(pianyi<0 )then
pianyi=pianyi+MAX
end;--条件判断语句
pianyi=pianyi*4--我晕啊,找个偏移值比造原子弹还要难啊!完美的人有病啊?搞这么复杂。
gwzhizen=mem.readInt(ECX+0x18,4);
gwzhizen=mem.readInt(gwzhizen+pianyi,4);
gwzhizen=mem.readInt(gwzhizen+0x4,4);
gwx=mem.readFloat(gwzhizen+0x3c);--读取怪物的xy坐标。
gwy=mem.readFloat(gwzhizen+0x44);

gwsmz=mem.readInt(gwzhizen+0x130,4);
gwsmzmax=mem.readInt(gwzhizen+0x148,4);
 elegwsmz:setAttribute("value",gwsmz.."/"..gwsmzmax);
gwdj=mem.readInt(gwzhizen+0x128,4);
 elegwdj:setAttribute("value",gwdj);

erwx=mem.readFloat(renwujizhi+0x3dc);
erwy=mem.readFloat(renwujizhi+0x3e4);
n3,f = math.modf(erwx)
n4,f = math.modf(erwy)
elerwxy:setAttribute("value",n3.."/"..n4);

local a=math.abs(rwx-gwx)>_juli;--如果大于所我们设置的距离就换怪,这样我们就可以实现定点了。
local b=math.abs(rwy-gwy)>_juli;

if(a or b )then
win.keyDown(hwnd,"TAB")
delay(50)
win.keyUp(hwnd,"TAB")
delay(100)

win.keyDown(hwnd,"F1");
delay(150)
win.keyUp(hwnd,"F1");
delay(100)

else
if(rwmfz>200 )then

if(_jl==1 )then

if(_jlgs==2 )then
win.keyDown(hwnd,"2")
delay(100)
win.keyUp(hwnd,"2")
delay(150)
win.keyDown(hwnd,"3")
delay(100)
win.keyUp(hwnd,"3")
delay(150)
end;--条件判断语句

if(_jlgs==1 )then
win.keyDown(hwnd,"2")
delay(100)
win.keyUp(hwnd,"2")
delay(150)
win.keyDown(hwnd,"F3")--终于开始打怪了!练级真辛苦!
delay(100)
win.keyUp(hwnd,"F3")
delay(50)
end;--条件判断语句

end;--条件判断语句

end;--条件判断语句
win.keyDown(hwnd,"F3")--终于开始打怪了!练级真辛苦!
delay(100)
win.keyUp(hwnd,"F3")
delay(50)

end;--条件判断语句
end;--条件判断语句

while(nStop())do
guaji();
end;
]]>
 </脚本区块>
 <数据区块 />
</ApeML>


本主题由 管理员 admin 于 2008-5-28 13:32:43 执行 设置精华/取消 操作
分享 转发
TOP

         怎么还没看到文章..希望能用到.顶顶..

TOP

新来的顶一下
TOP

怎么还没有出来啊/怎么搞的?

TOP

支持

TOP

好东西,怪物地址我很早就知道,只是不知道怎么用上去,这次多亏你了,呵呵
TOP

这个脚本很好用.特别是对医生.就是没有加盾的快键....还有不能多开....

烦请大大帮忙改下...

TOP

你写基址的地方呢~?我看了几遍都没找到啊

还有那个百分数的,数字到底在哪写啊 ?

TOP

本脚本已经实现了定点挂机。再也不会被人引走了。

另外本脚本除了设置一些快捷键外,像基址这些就不用改了,武林升级基本上也不用改,只要不是特别大的升级。





TOP

以下是引用xx在2007-2-6 20:51:00的发言:

你写基址的地方呢~?我看了几遍都没找到啊

还有那个百分数的,数字到底在哪写啊 ?

不知道你说的什么意思。这个脚本什么也不用改,你拿去就可以用了。只要设置一下快捷键就可以了。我用的武林的原始基址,一般升级也不用换基址的。
TOP