收藏 推荐 打印 | 录入:樊鹏华 | 阅读:
相关新闻      
背景:
阅读新闻

自动挖矿脚本

[日期:2007-03-25] 来源:  作者: [字体: ]

挖矿地点:新月月门进去的F矿洞

挖矿起点:月门入口

挖矿前提:

                1.背包里要有随身银行和铲子

                 2.银行中要有2个木箱子,一个用来放矿石,一个用来放挖矿工具



注意事项:

               1.运行脚本前请先关闭银行

                2.运行中请不要移动背包\银行\箱子的位置

                3.测试客户端使用的是心意网站下的客户端,如果你是其他客户端,请付我10W UO币后,我帮你解决

                4.为提高效率和减少出错几率,建议用工具房合把铲子,点数越多越好(我一般是2W点左右)

                 5,我的最高记录:1天晚上用了1.5W铲子

以下是脚本:

;================================================================
;版本:3.3.1
;测试使用的EUO版本:1.42.00A9
;测试使用的服务器:上海心意UO服务器
;测试使用的客户端:
;如发现任何问题,请发邮件到以下邮箱  
autodf@sohu.com
;================================================================
Set %MousePoint_X 284
Set %MousePoint_Y 237
Set %Tools_Box_id YAYa
Set %Ore_Box_id YaYa
Set %tools_id YaYa  
Set %bank_id WOSCMMD
set %dig_poistion 0
set %sysmsg_noore 購虘 G翑颯汷C鶴
set %sysmsg_notools `O夿`O刅錧WQ(UOW哊
set %sysmsg_packfull YOUR_BACKPACK_IS_FULL,_SO_THE_ORE_YOU_MINED_IS_LOST.
set %sysmsg_donotuse 購*NIR罷臺{?W`O虁S-NMB齹O(U僛Set %forge_type JBG  
Set %tools_type TWF
Set %box_type CUD
Set %ore_type DWJ
Set %tie_type ENK
;===================================

;---------------------------------------------------------
initevents
display ok 欢迎使用YaYa的自动挖矿脚本,背包中必须有银行!
finditem OOD c_ , #BackPackID
if #findid = X
  {
  msg 银行都没有,挖什么挖啊!$
  halt
  }
event pathfind 4011 306 0
wait 5s
loopasd:
msg bank$
wait 2s
set %bank_id #CONTID

set #LobjectID %bank_id
contpos 21 456
wait 20
if #CONTPOSX <> 21 || #CONTPOSY <> 456
  goto loopasd
loopfdd:
set #LobjectID #BackPackID
event macro 17 0
wait 20
contpos 0 239
wait 20
if #CONTPOSX <> 0 || #CONTPOSY <> 239
  goto loopfdd

gosub Setup_Ore_Box
gosub Setup_Tools_Box

set %dig_poistion 0

set #LobjectID #BackPackID
event macro 17 0
wait 20
contpos 0 239
wait 20
begin:
  gosub find_shovel
gosub dig_ore
goto begin
;----------------------------------------------------------------
sub find_shovel
finding:
finditem %tools_type c_ , #BackPackID
        wait 20
        if #findid <> X
{
  Set %tools_id #findid
  msg 找到铲子了! $
  Return
}
Else
{
  check_bank:
  msg bank$
  wait 20
  set #LobjectID %bank_id
  contpos 21 456
  wait 20
  set #LobjectID #BackPackID
  event macro 17 0
  wait 20  
  contpos 0 239
  wait 20
  set #LobjectID %Tools_Box_id
  event macro 17 0
  wait 20
  contpos 200 554
  wait 20
  finditem %tools_type c_ , %Tools_Box_id  
  wait 20
  if #FINDID = X
  {
   msg 银行中无铲子,罢工中,请补充工具$
   pause
   GoTo check_bank
  }
  Else
  {
   Event Drag #Findid
   target 1s
   Click 125 355
   target 1s
   GoTo finding
  }
}
return
;----------------------------------------------------------------
sub send_ore_bank
loopggg:
msg bank$
msg 背包满了,放银行哦$
wait 10
set #LobjectID %bank_id
contpos 21 456
wait 20
if #CONTPOSX <> 21 || #CONTPOSY <> 456
  goto loopggg
looplll:
;set #LobjectID #BackPackID
;event macro 17 0
;wait 20
;contpos 0 239
;wait 20
;if #CONTPOSX <> 0 || #CONTPOSY <> 239
; goto looplll

loopccc:
;msg bank$
;set #LobjectID %bank_id
;event macro 17 0
;wait 10
if #CONTPOSX <> 21 || #CONTPOSY <> 456
  goto loopggg
;set #LobjectID #BackPackID
;event macro 17 0
;wait 10
;if #CONTPOSX <> 0 || #CONTPOSY <> 239
; goto looplll
finditem  %ore_type c_ ,  #BackPackID
wait 10
if #findid = X
{
  return
}
Event Drag #Findid
wait 10
key enter
wait 10
;Click 67 705
Click %Ore_Box_x %Ore_Box_y
wait 10
GoTo loopccc


return
;----------------------------------------------------------------
;开始挖矿
;----------------------------------------------------------------
sub dig_ore
loopdd:
set #lobjectid %tools_id
event macro 17 0
;target 1s
click %MousePoint_X %MousePoint_Y
target 1s
;msg guard$
if  %sysmsg_packfull in  #SYSMSG
{
  gosub send_ore_bank
}
if  #WEIGHT >= ( #MAXWEIGHT - 40 )
{
  gosub send_ore_bank
}
if  #WEIGHT >= 420
{
  gosub send_ore_bank
}

if  %sysmsg_noore  in  #SYSMSG
{
  if %dig_poistion = 0
  {
   event pathfind 4015 303 0
   wait 3s
   set %dig_poistion 1
   goto loopdd
  }
  if %dig_poistion = 1
  {
   event pathfind 4019 306 0
   wait 3s
   set %dig_poistion 2
   goto loopdd
  }
  if %dig_poistion = 2
  {
   event pathfind 4021 309 0
   wait 3s
   set %dig_poistion 3
   goto loopdd
  }
  if %dig_poistion = 3
  {
   event pathfind 4025 312 0
   wait 3s
   set %dig_poistion 4
   goto loopdd
  }
  if %dig_poistion = 4
  {
   event pathfind 4027 316 0
   wait 3s
   set %dig_poistion 5
   goto loopdd
  }
  if %dig_poistion = 5
  {
   event pathfind 4034 313 0
   wait 3s
   set %dig_poistion 6
   goto loopdd
  }
  if %dig_poistion = 6
  {
   event pathfind 4034 316 0
   wait 3s
   set %dig_poistion 7
   goto loopdd
  }
  if %dig_poistion = 7
  {
   event pathfind 4037 319 0
   wait 3s
   set %dig_poistion 8
   goto loopdd
  }
  if %dig_poistion = 8
  {
   event pathfind 4037 325 0
   wait 3s
   set %dig_poistion 9
   goto loopdd
  }
  if %dig_poistion = 9
  {
   event pathfind 4037 331 0
   wait 3s
   set %dig_poistion 10
   goto loopdd
  }
  if %dig_poistion = 10
  {
   event pathfind 4036 337 0
   wait 3s
   set %dig_poistion 11
   goto loopdd
  }
  if %dig_poistion = 11
  {
   event pathfind 4033 340 0
   wait 3s
   set %dig_poistion 12
   goto loopdd
  }
  if %dig_poistion = 12
  {
   event pathfind 4026 342 0
   wait 3s
   set %dig_poistion 13
   goto loopdd
  }
  if %dig_poistion = 13
  {
   event pathfind 4021 345 0
   wait 3s
   set %dig_poistion 14
   goto loopdd
  }
  if %dig_poistion = 14
  {
   event pathfind 4016 344 0
   wait 3s
   set %dig_poistion 15
   goto loopdd
  }
  if %dig_poistion = 15
  {
   event pathfind 4015 337 0
   wait 3s
   set %dig_poistion 16
   goto loopdd
  }
  if %dig_poistion = 16
  {
   event pathfind 4010 338 0
   wait 3s
   set %dig_poistion 17
   goto loopdd
  }
  if %dig_poistion = 17
  {
   event pathfind 4014 334 0
   wait 3s
   set %dig_poistion 18
   goto loopdd
  }
  if %dig_poistion = 18
  {
   event pathfind 4020 336 0
   wait 3s
   set %dig_poistion 19
   goto loopdd
  }
  if %dig_poistion = 19
  {
   event pathfind 4025 337 0
   wait 3s
   set %dig_poistion 20
   goto loopdd
  }
  if %dig_poistion = 20
  {
   event pathfind 4030 337 0
   wait 3s
   set %dig_poistion 21
   goto loopdd
  }
  if %dig_poistion = 21
  {
   event pathfind 4034 332 0
   wait 3s
   set %dig_poistion 22
   goto loopdd
  }
  if %dig_poistion = 22
  {
   event pathfind 4031 327 0
   wait 3s
   set %dig_poistion 23
   goto loopdd
  }
  if %dig_poistion = 23
  {
   event pathfind 4032 323 0
   wait 3s
   set %dig_poistion 24
  }
  if %dig_poistion = 24
  {
   event pathfind 4032 316 0
   wait 3s
   set %dig_poistion 25
  }
  if %dig_poistion = 25
  {
   event pathfind 4025 317 0
   wait 3s
   set %dig_poistion 26
  }
  if %dig_poistion = 26
  {
   event pathfind 4020 316 0
   wait 3s
   set %dig_poistion 27
   goto loopdd
  }
  if %dig_poistion = 27
  {
   event pathfind 4016 320 0
   wait 3s
   set %dig_poistion 28
   goto loopdd
  }
  if %dig_poistion = 28
  {
   event pathfind 4013 317 0
   wait 3s
   set %dig_poistion 29
   goto loopdd
  }
  if %dig_poistion = 29
  {
   event pathfind 4016 313 0
   wait 3s
   set %dig_poistion 30
   goto loopdd
  }
  if %dig_poistion = 30
  {
   event pathfind 4010 310 0
   wait 3s
   set %dig_poistion 0
   goto loopdd
  }
}
if  %sysmsg_notools in  #SYSMSG
{
gosub find_shovel
}
if  %sysmsg_donotuse in  #SYSMSG
{
gosub find_shovel
}

goto loopdd
return
;========================================================
sub Setup_Ore_Box
display ok 等鼠标变圆圈后,点击放矿石的箱子,注意箱子一定要在银行里!
event sysmessage Now click on the ore container
wait 5
Set #targcurs 1
Set_ORE_BOX:
if CLICK notin #sysmsg
  {
  event sysmessage Now click on the ore container
  wait 5
  }
if #targcurs = 1
goto Set_ORE_BOX
Set %Ore_Box_id #ltargetid
Set %Ore_Box_x #cursorx
Set %Ore_Box_y #cursory
return
;========================================================
sub Setup_Tools_Box
display ok 等鼠标变圆圈后,点击放工具的箱子,注意箱子一定要在银行里!
event sysmessage Now click on the tools container
wait 5
Set #targcurs 1
Set_TOOLS_BOX:
if CLICK notin #sysmsg
  {
  event sysmessage Now click on the tools container
  wait 5
  }
if #targcurs = 1
goto Set_TOOLS_BOX
Set %Tools_Box_id #ltargetid
Set %Tools_Box_x #cursorx
Set %Tools_Box_y #cursory
return

[/replyview]