мининг

[vertijok]

Code: Select all

var kirka, a, name, run, MageChest
var myXX, myYY, p
p=0				; Хайд =0(отключён) =1(включён, недоработан не включать)


var kalitka='0x0847'    ; Тип закрытой калитки
var door='0x06A5'		; тип закрытой двери в дом

var OreBox, bag, bankbox, rune, CraftChest
var bagreg, chest
var MaxWeight
bag='0x0E76'				;тип мешка с регами
bankbox='0x40355E29'		;Id банка (для того, что бы узнать ID банка, командой ",info" -
							;- на любой предмет и скопировать из полученной информации -
							;- значение C= -> 0x40156896 <-
 
rune='0x1F14'			; Тип руны может быть 2-х типов
						; '0x1F14' и '0x1F15'

CraftChest='0x402C32D2'		; Сундук Крафта с паками под руду и инготы

MaxWeight='60'

MageChest='0x402B6E6A'		; Сундуг Мага с паками и мешком-с-регами для Рекола

kirka = "0x0E85" 		;Тип кирки. 2 вида может "0x0E85" и "0x0E86"

OreBox = "0x4050B366"		;Контейнер для руды

var text1, text2

text1="There is no ore|You have no line|That is to far away|You can't think|You have no line of|too far away|mining in rock."

text2="You put the|You loosen some|You can't think|That is to far away|There is no ore|You have no line of|too far away|mining in rock."

run=118				; Код клавиши с биндом "AlwesRun"

################################################################
###Функция Main ##########################################
################################################################
sub main()
  uo.exec("exec ressurect")
  uo.exec("exec FindMan")
  uo.exec("exec mine")
end sub

################################################################
### Функция mine ############################################
################################################################
sub mine()		; Копание
  uo.ignorereset()
  walker(2578,480,1)
  var pause=0
  myXX=uo.getX(); запоминает место откуда начал копать
  myYY=uo.getY();
  var PX, PY, PZ, IX, IY
  PX = UO.GetX()
  PY = UO.GetY()
  PZ = UO.GetZ()
  while UO.Weight <= uo.str*4
    For Iy=-4 to 4
      For Ix=-4 to 4
        uo.deletejournal()
        while not UO.InJournal(text1)
          if p==1 then
          endif
          UO.WaitTargetTile(-1,Str(PX+Ix),Str(PY+Iy),Str(PZ))
          uo.usetype(kirka)
          InJournal(text2,0) 
          if uo.injournal('You loosen some') then
            pause=pause+1
            if pause>4 then
              wait(10000)
              pause=0
            endif
          else
            pause=0
          endif
        endif
        wait(200)
      wend
    next
    wait(200)
  next
  wait(200)
wend
GoBrit()
end sub

Помогите плиз вставить вес

Когда он наберает вес чтобы сработало GOBrit()

[Kynep]

Code: Select all

 while UO.Weight <= uo.str*4

Он и так копает пока веса меньше чем твоя сила умноженная на 4.

[ADEPT_ABP]

Интересно, а почему у меня про это не спросил? Всё же мой скрипт, хоть и не доведённый до ума. Там много недочётов, может выложить посмотрите? А то я, что-то запарился...

[Kynep]

Интересно, а почему у меня про это не спросил? Всё же мой скрипт, хоть и не доведённый до ума. Там много недочётов, может выложить посмотрите? А то я, что-то запарился...

Где копирайты? ©

[ADEPT_ABP]

Где копирайты? ©

Я ему по аське скидываю. А нах копирайты? Это народное творчество! Просто в моей "аранжировке".

P.S. Kynep, что со ссылкой на архив скриптов?