热血江湖吧 关注:440,973贴子:19,937,055
  • 5回复贴,共1

按键精灵刀全自动挂机脚本共享升级-按键精灵网游脚本编写教程

只看楼主收藏回复

二楼发布,一楼喂熊。

热血宝宝你可以不用收费了


1楼2012-11-26 12:41回复
    先带领大家了解一下按键精灵的使用方法,见百度文档。
    http://wenku.baidu.com/view/265cab1b10a6f524ccbf85bf.html


    2楼2012-11-26 12:42
    回复
      按键精灵热血江湖刀全自动挂机脚本刀的自动挂机,会自动喝药,攻击,找怪,回城补药的。
      [General]Description=中间渐开垂直打怪
      BeginHotkey=122
      BeginHotkeyMod=0
      PauseHotkey=0
      PauseHotkeyMod=0
      StopHotkey=123
      StopHotkeyMod=0
      RunOnce=1
      EnableWindow=
      Enable=1
      AutoRun=0
      [Repeat]Type=0
      Number=1
      [Relative]SetupOCXFile=
      [Comment]Content=


      3楼2012-11-26 12:44
      回复
        [Script]UserVar hongBF=70 血量少于百分之多少时,自动吃红。
        UserVar lanBF=30 蓝少于百分之多少时,自动吃蓝。
        UserVar dihui=15 血量少于百分之多少时,自动回城。
        UserVar hongyanshi=128 补红延时,1000=1秒
        UserVar lanyanshi=128 补蓝延时,1000=1秒
        UserVar wuguaiT=600 无怪时间,超过多少秒时间找不到怪自动报警。
        UserVar fhong=DropList{F1:0|F2:1|F3:2|F4:3|F5:4|F6:5|F7:6|F8:7|F9:8|F10:9}=0 红位置
        UserVar flan=DropList{F1:0|F2:1|F3:2|F4:3|F5:4|F6:5|F7:6|F8:7|F9:8|F10:9}=1 蓝位置
        UserVar fdanJN=DropList{F1:0|F2:1|F3:2|F4:3|F5:4|F6:5|F7:6|F8:7|F9:8|F10:9}=2 第一击JN位置
        UserVar fqunJN=DropList{F1:0|F2:1|F3:2|F4:3|F5:4|F6:5|F7:6|F8:7|F9:8|F10:9}=3 群JN位置
        UserVar fjianqu=DropList{F1:0|F2:1|F3:2|F4:3|F5:4|F6:5|F7:6|F8:7|F9:8|F10:9}=4 捡东西小手
        UserVar f15JN=DropList{F1:0|F2:1|F3:2|F4:3|F5:4|F6:5|F7:6|F8:7|F9:8|F10:9}=7 15级跑JN
        UserVar fhuicheng=DropList{F1:0|F2:1|F3:2|F4:3|F5:4|F6:5|F7:6|F8:7|F9:8|F10:9}=8 回城F
        UserVar beidong=DropList{是:0|否:1}=0 直接群攻UserVar fightT=30 技能防卡时间,为打死一只怪的最大时间(秒)。
        UserVar Fanwei=40 战斗范围,请大于20
        UserVar quanshu=3 搜索圈数
        UserVar StepX=82 左右搜索距离
        UserVar StepY=66 上下搜索距离
        UserVar SearchT=32 搜索时间间隔,越小搜怪越快,1000=1秒
        UserVar baojing=DropList{回城打坐:0|回城报警:1|回城关机:2}=0 回城后
        VBS dim NumA,NumB,NumC,NumK,NumN,CenterX,CenterY,GBX,GBY,colorVBS Dim objFMVBS Set objFM=CreateObject("QMDispatch.QMFunction")
        VBS Dim ScreenWidth,ScreenHeightVBSCall GetScreenResolution(ScreenWidth,ScreenHeight)CenterX = (ScreenWidth \ 2) - 1CenterY = (ScreenHeight \ 2) - 1VBS Dim MonX,MonY,TargetX,TargetY,DirectSIN,DirectCOS,MouseX,MouseY,lngHoldVBS MonX=0:MonY=0:DirectSIN=0:DirectCOS=1Gosub 快捷键设置Gosub LookDownGosub 补红蓝
        VBSCall GetCurXY(CurX,CurY)@<find.vbs>
        VBS TargetX=CurX
        VBS TargetY=CurYSayString CurX


        4楼2012-11-26 12:47
        回复
          http://wenku.baidu.com/view/c5521e380912a21614792939.html
          这是文章详细内容,具体的多家学习慢慢的也会代码。


          5楼2012-11-26 12:47
          回复
            楼主能不能帮我编写一个在土城循环坐标来回的脚本,帮帮忙撒 ! 谢谢


            6楼2014-11-09 02:33
            回复