Ну если брать в расчёт что у нас халявный .hot 1 раз в 3 месяца то я думаю тут ничего страшного нету.

Budet dohera levih acc 10lvl

Есть идея не следить до начала нового сезона за антимакросом.

 

Что думаете? Кто за? Кто против?

Ja dumaju esli snemat antimakros nado ubirat bezplatnij .hot dla vseh stob hot kakto dengi vivadilis

Buy + 10 Alchemy Mask

        + 10 Inscription robe,braclet,clock

Est full set Skype KelyXL

Привет!

 

Возникла проблема с настройкой скрипта на пвм, нужна помощь.

Запуская скрипт, чар подбегает к сундуку где лежат все беги, открывает сундук и через пару секунд скрипт полностью останавливается.

Методом тыканья "старт" "пауза" в easyuo, (в момент паузы видно какая строка скрипта считывается), я обнаружил, что скрипт обрывается на строке "gosub TakeTools" (строка 1015)

Sub LetRepair 
gosub TakeTools
Gosub Repair %Weapon %MaterialColor1 %Material1 %Tool
Gosub Repair %Armor %MaterialColor2 %Material2 %Tool
Gosub Repair %Armor2 %MaterialColor3 %Material3 %Tool
Gosub Repair %Armor3 %MaterialColor4 %Material4 %Tool2
Gosub Repair %Shield %MaterialShieldColor %Material4 %Tool
Gosub DropTools
return

Я перепроверил ID тулза для ремонта, Type ингов для ремонта, ID бокса, сумки и прочего, вроде бы все правильно. Перепроверил параметры %Armor, %Armor1 и остальные, все настроено правильно.

 

Также я уверен, что проблема именно в этой части скрипта, поскольку если отключить его (поставить " ; " перед Sub LetRepair, то все начинает работать, чар начинает летать по рунбуку, бить мобов, возвращаться домой и лететь обратно бить мобов.

Может быть я где-то что-то упустил, или банально где-то какая-то запятая стоит не на своем месте? Не хочу флудить в теме и заливать весь свой скрипт в это сообщение. Если найдется добрый человек готовый помочь, скину скрипт ему.

 

Ну или поделитесь, пожалуйста, рабочим скриптом 

 

_____________________________________________________________________________

 

Также хочу поделиться своим наблюдением, вдруг кому-то поможет:

 

В тех частях скрипта, которая считывает скрипт из инжекта, стоит команда ",exec", к примеру 

msg $,exec %InjectWarmodeOffCommand $

Мой инжект который удалось настроить и запустить не воспринимает команду ",exec", а в вместо нее воспринимает "_exec", иначе говоря нужно заменить запятую на нижнее подчеркивание. 

msg $_exec %InjectWarmodeOffCommand $

Полагаю, что это связано с более свежей версией инжекта.

Napeshi skype KelyXL pomagu

Все работает прекрасно, спасибо

esli che obroshaisa ! 

А куда конкретно? или без разницы? я не силён в скриптах, подскажи ))

 

; Set Up The Following Variables:
set %maxWeight 800       ; Max svars
set %box IXOUJMD         ; id korobki
set %foodCont IXOUJMD    ; kur staav rezerves piens un bekons
set %xCoord 1923         ; X koordinaata rjadom boxa
set %yCoord 376         ; Y koordinaata rjadom boxa
set %dropMarganece #true ; #true - sbrasiveat Marganece ruudu , #false - ne sbrasiveat
set %skillItemChange #false ; #true - menjajet skill itemi, #false - net
set %tracking #false     ; #true - izpolzujet tracking, #false - net
set %runebookID RSWHKMD ; Runebook ID
set %runeNumberToGZ 7     ; NR runi na GZ
set %runeNumberToCave 8  ; Nr runi na mesto kapalki
set %trackingWait 200s ; skoka zhdatj gz, kogda uvidit playera
; Do Not Set These Items If %skillItemChange #false
set %skillRobe PBJKKMD  ; Skill Roba (ID)
set %skillCloak HQIKKMD ; Skill Cloack (ID)
set %skillMask EYIKKMD  ; Skill Mask (ID)
set %simpleRobe JVBQLMD ; Parasta Roba (ID)
set %simpleCloak HMMWJMD ; Parastais cloack (ID)
set %simpleMask OSH ; Platemail helms (ID)
; End Of Changable Clothes List
; Do Not Set These Numbers If %recall #false
set %runeNumberToHome 6  ; Runas Nr uz maaju
set %recall #false    ; #true - lidos ar runebook, #false - skries taapat
set %amountRecalls 10 ; skoljko vzjat recall esli ih net
set %password  ; password
 
 
 
set %item DWJ_TVj_GWJ_EWJ_ZLK_POF_RZF_SJG_CUD_IJG_HSF_RVH_FZH_NZH_UJG_RMK
set %loot DCI_POF_RZF_SJG_CUD_IJG_HSF_RVH_FZH_NZH_UJG
 
 
gosub Instalyze runeNumberToHome 1
gosub Instalyze runeNumberToCave 2
gosub Instalyze runeNumberToGZ 3
event sysmessage Setting Paperdoll in right position..
event macro 8 1
wait 30
event macro 8 1
wait 30
contpos 780 -26
finditem QRM_FJM_GKM C_ , #backpackid
if #findcnt <> 0
{
set #lobjectid #findid
event macro 17 0
wait 30
}
 
start:
  
 
GOSUB MINING 0 0 0 ;koordinati suda
GOSUB MINING 0 0 0 ;koordinati suda
 
  
 
goto start
 
sub MINING
gosub ghost
gosub checkHP
gosub element
gosub checkWeight
if %tracking
gosub tracking
move %1 %2 1
finditem NPF_QPF C
if #findcnt = 0
{
  display ok Pickaxe wasn't found!
  pause
}
set #lobjectid #findid
event macro 17 0
target 2s
set #ltargetx %1
set #ltargety %2
set #ltargetkind 3
set #ltargettile %3
event macro 22 0
wait 15
set %overtime #scnt + 8
gosub scan
return
 
sub checkWeight
if #weight > %maxWeight
{
if ! %dropMarganece
{
if %recall
gosub port
if ! %recall
gosub moveItems
}
if %dropMarganece
{
gosub dropMarganece
return
}
}
return
 
sub scan
scan:
gosub element
scanjournal
gosub checkdisconnect
gosub checkHP
if hungry in #sysmsg
{
gosub eat
return
}
if ( ( THERE_IS_NOTHING_HERE_TO_MINE in #sysmsg ) || ( You_stop_Mining in #journal )
+ || ( YOU_CAN'T_REACH_THIS in #sysmsg ) || ( You_fail_to_do_that in #sysmsg )
+ || ( Try_mining_elsewhere in #sysmsg ) || ( You_have_no_line_of_sight_to_that_location in #sysmsg )
+ || ( You_can't_use_the in #journal ) || ( You_cannot_mine_so_close_to_yourself in #sysmsg ) )
return
gosub checkHP
if #scnt >= %overtime
return
goto scan
return
 
sub port
msg .arm$
gosub checkHP
gosub element
if G in #charstatus
event macro 6 0
event macro 6 0
set %oldPosX #charposx
set %oldPosY #charposy
gosub openRunebook
if %trackingAlarm
click %x3 %y3
else
click %x1 %y1
event macro 13 21
wait 5s
while #charposx = %oldPosX && #charposy = %oldPosY
wait 10s
if %trackingAlarm
{
str ins #time : 3
str ins #strres : 6
set %Time #strres
str ins #date #dot 3
str ins #strres #dot 6
execute cmd.exe /c echo >>TRACK.txt #charname saw someone #strres @ %Time
wait %trackingWait
click 170 67 r
wait 10
gosub back
gosub tracking
return
}
gosub moveItems
gosub back
return
 
sub moveItems
ignoreitem reset 1
gosub runToBox
event macro 13 21
finditem %box G_3
wait 10
if #findcnt = 0
{
  event Sysmessage Box Not Found!
  halt
}
repeat
{
finditem %item c_ , #backpackid
if #findcnt <> 0
{
exevent Drag #Findid #findstack
exevent Dropc %box
wait 15
}
}
until #findcnt = 0
ignoreitem reset 1
if %recall
gosub recalls
gosub food
return
 
 
repeat
{
finditem DWJ_TVj_GWJ_EWJ C_ , #backpackid
if #findcnt <> 0
{
set #lobjectid #findid
event macro 17 0
wait 10
}
}
until #findcnt = 0
return
 
sub back
set %trackingAlarm #false
gosub checkHP
set %oldPosX #charposx
set %oldPosY #charposy
for %i 1 2
{
gosub openRunebook
click 261 215 ; Recharge runebook 2x
wait 20
}
gosub openRunebook
click %x2 %y2
event macro 13 21
wait 5s
while #charposx = %oldPosX && #charposy = %oldPosY
wait 5s
return
 
sub runToBox
repeat
{
move %xCoord %yCoord 0 3s
wait 5s
}
until #charposx = %xCoord && #charposy = %yCoord
return
 
sub follow&kill
msg .arm$
set %charX #charposx
set %charY #charposy
set %charz #charposz
repeat
{
finditem #enemyid
event pathfind #FINDX #FINDY #FINDZ 1 3s
wait 1s
gosub ghost
}
until #findcnt = 0
wait 20
gosub loot
set %time #scnt + 20
repeat
{
event pathfind %charX %charY %charz 1 3s
wait 1s
gosub ghost
if #scnt > %time
return
}
until #charposx = %charX && #charposy = %charY
return
 
sub checkHP
if #hits < #maxhits
{
msg .arm$
sound
if %skillItemChange
gosub changeClothesTo %simpleMask %simpleRobe %simpleCloak
gosub follow&kill
if %skillItemChange
gosub changeClothesTo %skillMask %skillRobe %skillCloak
}
return
 
sub openRunebook
finditem %runebookID C_ , #backpackid
if #findcnt = 0
{
  event sysmessage Runebook not found!
  halt
}
set #lobjectid #findid
event macro 17 0
while #contname <> generic_gump && #contsize <> 577_426
wait 1
return
 
sub ghost
if #charghost = YES
{
terminate uo
halt
}
return
 
sub changeClothesTo
repeat
{
finditem %1 C_ , #backpackid
set #lobjectID #findid
event macro 17 0
finditem %1 C_ , #backpackid
}
until #findcnt = 0
repeat
{
finditem %2 C_ , #backpackid
set #lobjectID #findid
event macro 17 0
finditem %2 C_ , #backpackid
}
until #findcnt = 0
repeat
{
Finditem %3 C_ , #backpackid
set #lobjectID #findid
event macro 17 0
finditem %3 C_ , #backpackid
}
until #findcnt = 0
return
 
sub eat
finditem ZBM C
set #lobjectid #findid
event macro 17 0
wait 10
finditem GND C
set #lobjectid #findid
event macro 17 0
wait 10
event macro 17 0
wait 2s
return
 
 
sub Instalyze
if % . %1 <= 8
set %x . %2 260
else
set %x . %2 420
if % . %1 = 1 || % . %1 = 9
set %y . %2 260
if % . %1 = 2 || % . %1 = 10
set %y . %2 275
if % . %1 = 3 || % . %1 = 11
set %y . %2 290
if % . %1 = 4 || % . %1 = 12
set %y . %2 305
if % . %1 = 5 || % . %1 = 13
set %y . %2 320
if % . %1 = 6 || % . %1 = 14
set %y . %2 335
if % . %1 = 7 || % . %1 = 15
set %y . %2 350
if % . %1 = 8 || % . %1 = 16
set %y . %2 365
return
 
sub dropMarganece
dropLoop:
finditem DWJ C_ , #backpackid
if #findcnt = 0
{
  wait 10
  if #weight >= %maxweight
   {
   if %recall
   gosub port
   if ! %recall
   gosub moveItems
   return
   }
  if #weight < %maxweight
   return
}
if #findcol = 1750 || #findcol = 1218 || #findcol = 1325 || #findcol = 1095 ||  #findcol = 21 ||  #findcol = 553 ||  #findcol = 0 || #findcol = 1936 ||  #findcol = 1537 ||  #findcol = 1089 ||  #findcol = 1950 || #findcol = 144 || #findcol = 2313 ||  #findcol = 151 || #findcol = 1156 || #findcol = 306 || #findcol = 2197 ||
{
exevent drag #findid #findstack
exevent dropg #charposx #charposy #charposz
wait 40
}
ignoreitem #findid 1
goto dropLoop
return
 
sub loot
finditem YFM G_4
if #findcnt > 0
{
set #lobjectid #findid
event macro 17 0
while #contkind <> ASEB && #contsize <> 144_212
wait 1
wait 20
if #conttype = YFM
set %corpse #contid
set %lootOverTime #scnt + 30
repeat
{
finditem %loot C_ , %corpse
if #findcnt = 0 || #scnt > %lootOverTime
{
ignoreitem %corpse 2
return
}
exevent drag #findid #findstack
exevent dropc #backpackid
wait 45
}
until #false
}
return
 
sub element
finditem ED G
if #findcnt <> 0
{
msg .arm$
set %charX #charposx
set %charY #charposy
set %charz #charposz
sound
if %skillItemChange
gosub changeClothesTo %simpleMask %simpleRobe %simpleCloak
finditem ED G
set %element #findid
msg .arm$
set #ltargetid %element
event macro 27 0
repeat
{
finditem %element
event pathfind #FINDX #FINDY #FINDZ 1 3s
wait 1s
gosub ghost
gosub place
gosub checkpvp
}
until #findcnt = 0
wait 20
gosub loot
if %skillItemChange
gosub changeClothesTo %skillMask %skillRobe %skillCloak
set %time #scnt + 20
repeat
{
event pathfind %charX %charY %charz 1 3s
wait 1s
gosub ghost
if #scnt > %time
return
}
until #charposx = %charX && #charposy = %charY
}
return
 
sub food
finditem ZBM C_ , #backpackid
if #findcnt = 0
{
set #lobjectid %foodCont
event macro 17 0
while #contid <> %foodCont
wait 1
finditem ZBM C_ , %foodCont; 1 pitcher of milk
exevent drag #findid 1
exevent dropc #backpackid
wait 30
}
finditem GND C_ , #backpackid
if #findcnt = 0
{
finditem GND C_ , %foodCont
exevent drag #findid 4; 4 baocn slices
exevent dropc #backpackid
wait 30
finditem ZBM C_ , %foodCont; 1 pitcher of milk
exevent drag #findid 1
exevent dropc #backpackid
wait 30
}
return
 
sub tracking
if #charstatus = G
event macro 6 0
event macro 6 0
msg ,exec tracking$
wait 10
set %lagg #scnt + 20
repeat
{
if #contname = objpicker_gump
{
  set %trackingAlarm #true
  gosub port
  return
}
if You_see_no_signs_of_players_to_track in #sysmsg
return
}
until #scnt > %lagg
return
 
Sub CheckPvP
scanjournal 1
If You_cannot_do_this_now in #journal : notin #journal
{
ignoreitem #findid 1
}
return
 
sub recalls
finditem WTL C_ , #backpackid
if #findstack <= 6 || #findcnt = 0
{
set #lobjectid %box
event macro 17 0
while #contid <> %box
wait 1
wait 10
finditem WTL C_ , %box
exevent drag #findid %amountRecalls 6
exevent dropc #backpackid
wait 30
}
return
sub checkdisconnect
    if #contname = waiting_gump
    {
        click 402 336
        wait 120s
        click 370 400
        wait 25
        msg %password
        msg $
        gosub waitforgump CONTNAME MainMenu_gump
        click 617 456
        gosub waitforgump CONTNAME normal_gump
        click 617 456
        gosub waitforgump CONTNAME Login_gump
        click 617 456
    }
return
 
sub WaitForGump
   set %gumptimeout #scnt
   _WaitForGump:
   if # . %1 <> %2
   {
      wait 1
      if %gumptimeout + 5 < #scnt
         return #false
      goto _WaitForGump
   }
return #true
 
sub place
;if #charposx > 1920
;ignoreitem #findid 1
;return
 
Sub CheckPvP
scanjournal 1
If You_cannot_do_this_now in #journal : notin #journal
{
ignoreitem #findid 1
}
return

Приветствую, подскажите в скрипте есть функция плавить оре в инги ? он у меня не переплавляет, оре скидывает

 

V samom scripte nado dabavit paru strok

etat scp rabochii

На нём задержка на лут выскакивает (

tak ti razobralsa ili net ?

Orion Options Main>Options1>Move Items delay 1750

function PVMloot()

{

 

var list = Orion.FindList('pvmloot', lastcontainer);

Orion.Wait(50);

for (var i = 0; i < list.length; i++)

{

Orion.MoveItem(list[i], 0, backpack);

Orion.Wait(1750);

PVPloot();

return;

}

Orion.Print('Loot Done');

}

Спасибо бро,с этим я разобрался, у меня проблема с задержкой на лут, допустим в мобе падает гп,пандопа и бижа, он лутит гп а на пандору и бижу с лева выскакивает задержка на лут( you must wait 10 ms! ) повторно скрипт не лутит  

Orion Options Main>Options1>Move Items delay 1750

vas ort flam это массовая магия что работает не только кримом

Segodna toze pobegal mne cherez 5lvl defenc kazdij vas ort flam po 250 i hui znaet kakoe tam rastojanie tocno ne 2 kletki