Jump to content


Toggle shoutbox Chat Open the Shoutbox in a popup

Прямая связь с администрацией по скайпу: gods.dragon
@  Gogogo : (Yesterday, 18:48) Sell full Gods chain + shield 20kk Sell gods bow 23 durba 8kk Sell gods krys +10 fs 80 durba 18kk Sell Hell Stallion 18kk Sell veteran pla5ik 60 durba 5kk sell veteran items 500 druba 20kk
@  Phobos : (Yesterday, 17:40) kto pomozet s skriptom dlja zapisji koordinat na mining?
@  Djukok : (Yesterday, 14:50) @intimka skype: Uragvaets
@  intimka : (Yesterday, 14:19) Djukok помоги пожалуйста 
@  kirko : (Yesterday, 13:07) http://forum.oldp.ne...howtopic=104141
prowu otvetitj administracii
@  Gogogo : (18 November 2018 - 13:46) Buy RP
@  Gogogo : (18 November 2018 - 13:45) Sell full Gods chain + shield 20kk Sell gods bow 23 durba 8kk Sell gods krys +10 fs 80 durba 18kk Sell Hell Stallion 18kk Sell veteran pla5ik 60 durba 5kk sell veteran items 500 druba 20kk
@  Djukok : (18 November 2018 - 11:48) @Phobos https://failiem.lv/u/74sz536s
@  Phobos : (18 November 2018 - 11:25) estk u kogo rabotajusija versija EasyUo? skype Arturinsh909 esli kto mozet skinjte :)
@  Borodina : (17 November 2018 - 12:51) Buy - Fame - Fame - Fame
@  Ypypy : (16 November 2018 - 21:02) KUPLJU RP
@  Gogogo : (16 November 2018 - 14:07) Sell Gods Kris +10 fs 80 durba 18kk
@  Gogogo : (16 November 2018 - 13:41) Sell veteran plawik 60durba 5kk sell veteran items 500 durba 20 kk sell full gods chain + shield 20 kk sell gods kris +9fs 39durba 12KK sELL gods bow eif 23 durba 8KK
@  sonyplayer : (16 November 2018 - 09:55) @Buldozer я не адекват по мнению 2х индивидумов, ставьте мне банан :D
@  Buldozer : (15 November 2018 - 22:56) Davajte uzhe reshim kto tut shto adekvatno pishit a kto net - kamu prosta ban nuzhen na forume:)
@  Buldozer : (15 November 2018 - 22:55) Stoljka let vsjo vseh ustraevaet po pvp priboram a kakueta pjatjorku postojanno shtota neustraevaet, i vot ani berut temi sozdajut i nojut
@  Buldozer : (15 November 2018 - 22:54) http://forum.oldp.ne...howtopic=104135 A vi bolshe takih ljudej slushajte tipo Lancelota i togda ,vsjo na servere vobshe vparjadke budet:)
@  Gogogo : (13 November 2018 - 17:42) Sell veteran plawik 60durba 5kk sell full gods chain+ shield 20kkSell 2 gods bow 23 durb i 69 20kk
@  kirko : (13 November 2018 - 15:14) cjo ze ti posti udaljaew?
@  kirko : (13 November 2018 - 15:14) Djukok

Photo

Помогите Найти Ошибку В Скрипте

Мининг на ньюб и айленде

  • Please log in to reply
8 replies to this topic

#1 Frankfurt

Frankfurt
  • Members
  • 4 posts

Posted 16 November 2017 - 19:03

Добрый день опытные игроки, помогите нубу.

Первый раз пользуюсь ИзиУО поэтому не совсем понимаю.

Взял макрос на мининг, дальше идет плавит, дальше идет скидывает все в банк и снова в копалку. Проблема в моменте когда он должен все скидать в банк

 

Вот кусок на котором макрос зависает постоянно кидает сам себе в сумку как я понял слитки либо не может найти куда их надо скинуть. Поясните что тут надо поправить пожалуйста (место где я предполагаю закралась ошибка выделил оранжевым)

 

 

msg Bank$
finditem %jashik
repeat
wait 10
if #findcnt = 0
repeat

{
finditem %item c_ , #backpackid
if #findcnt >= 1
{
 if world_save_has_been in #sysmsg
 wait 15s
exevent Drag #Findid #findstack
exevent Dropc %jashik

wait %dropDelay
}
}

 

 

Весь макрос ниже (хожу пешком, скилл шмотки не одеваю не знаю что это такое пока)

 

 

set %gameClass Archer ; Cleric or Archer
set %maxWeight 500 ; Max ves
set %jashik PZZWJMD ; ID korobki, gde sbrasivatj rudu
set %foodCont WNAXJMD ; ID korobki, gde stoit zapasi moloko i bekona
set %xCoord 5853 ; X koordinata okolo boxa
set %yCoord 2903 ; Y koordinata okolo boxa
set %dropAspen #true ; #true - sbrasivajet Aspen logi , #false - net
set %dropWillow #true ; #true - sbrasivajet Willow logi , #false - net
set %dropCedarMapleNoblefire #true ; #true sbrasivajet etie logi, #false - net
set %dropCherryEcalyptus #false ; #true sbrasivajet etie logi, #false - net
set %skillItemChange #false ; #true - menjajet skill shmotki, #false - net
set %recall #false ; #true - letajet s runebook, #false - begut peshkom
; Do Not Set These Items If %skillItemChange #false
set %skillRobe KIOSJMD ; Skill Roba (ID)
set %skillCloak TCNSJMD ; Skill Cloack (ID)
set %skillMask YSNSJMD ; Skill Mask (ID)
set %simpleRobe UTRVLMD ; Prostaja Roba (ID)
set %simpleCloak VARVLMD ; Prostoj cloack (ID)
set %simpleMask CSH ; Helm (TYPE/ID)
; Etix mozhno ne menjatj, esli %recall #false
set %runebookID NDWXJMD ; ID runebooka
set %runeNumberToHome 7 ; Nr runi na dom
set %runeNumberToWood 10 ; Nr runi na les
set %amountRecalls 10 ; Skolko recallov vzjatj, kogda ix netu
; special variables for Archer (tolka dlja archera):

set %item DWJ_TVj_GWJ_EWJ_ZLK_POF_RZF_SJG_CUD_IJG_HSF_RVH_FZH_UJG_DCI_FWL_NZH_RMK
set %loot DCI_POF_RZF_SJG_CUD_IJG_HSF_RVH_FZH_NZH_UJG_FWL
if %recall
{
gosub Instalyze runeNumberToHome 1
gosub Instalyze runeNumberToWood 2
}
if %dropMarganece
set %MarganeceCol 1750
if %dropTin
set %TinCol 1325
if %dropBronze
set %BronzeCol 1160
if %dropLead
set %LeadCol 2125
if %dropCorrundum
set %CorrundumCol 1548
if %dropGold
set %GoldCol 1093
if %dropTourmaline
set %TourmalineCol 1218
if %dropSilver
set %SilverCol 1153
if %dropMarble
set %MarbleCol 1950
if %dropZink
set %ZinkCol 38
if %dropGypsum
set %GypsumCol 995
if %dropSandstone
set %SandstoneCol 144
if %dropCopper
set %CopperCol 1537
if %dropIron
set %IronCol 0
if %dropTitan
set %TitanCol 1107
if %dropStone
set %StoneCol 2313
if %dropPlaster
set %PlasterCol 151
set %skill %skillRobe , _ , %skillCloak , _ , %skillMask
gosub gettingStarted
gosub initevents
set %k 0
set %lastK 0
start:

 GOSUB LJING 5491 2925 1343 0
 GOSUB LJING 5491 2924 1343 0
 GOSUB LJING 5491 2923 1343 0
 GOSUB LJING 5491 2922 1343 0
 GOSUB LJING 5491 2921 1343 0
 GOSUB LJING 5491 2920 1343 0
 GOSUB LJING 5492 2919 1342 0
 GOSUB LJING 5492 2920 1343 0
 GOSUB LJING 5492 2921 1342 0
 GOSUB LJING 5492 2922 1343 0
 GOSUB LJING 5492 2923 1343 0
 GOSUB LJING 5492 2924 1343 0
 GOSUB LJING 5492 2925 1343 0
 GOSUB LJING 5492 2926 1343 0
 GOSUB LJING 5493 2927 1343 0
 GOSUB LJING 5493 2926 1343 0
 GOSUB LJING 5493 2925 1343 0
 GOSUB LJING 5493 2924 1343 0
 GOSUB LJING 5493 2923 1343 0
 GOSUB LJING 5493 2922 1343 0
 GOSUB LJING 5493 2921 1343 0
 GOSUB LJING 5493 2920 1343 0
 GOSUB LJING 5493 2919 1343 0
 GOSUB LJING 5494 2919 1343 0
 GOSUB LJING 5494 2920 1343 0
 GOSUB LJING 5494 2921 1343 0
 GOSUB LJING 5494 2922 1343 0
 GOSUB LJING 5494 2923 1343 0
 GOSUB LJING 5494 2924 1343 0
 GOSUB LJING 5494 2925 1343 0
 GOSUB LJING 5494 2926 1343 0
 GOSUB LJING 5494 2927 1343 0
 GOSUB LJING 5494 2928 1343 0
 GOSUB LJING 5495 2929 1343 0
 GOSUB LJING 5495 2928 1343 0
 GOSUB LJING 5495 2927 1343 0
 GOSUB LJING 5495 2926 1343 0
 GOSUB LJING 5495 2925 1343 0
 GOSUB LJING 5495 2924 1343 0
 GOSUB LJING 5495 2923 1343 0
 GOSUB LJING 5495 2922 1343 0
 GOSUB LJING 5495 2921 1343 0
 GOSUB LJING 5495 2920 1343 0
 GOSUB LJING 5495 2919 1343 0
 GOSUB LJING 5496 2919 1343 0
 GOSUB LJING 5497 2919 1343 0
 GOSUB LJING 5497 2920 1343 0
 GOSUB LJING 5496 2920 1343 0
 GOSUB LJING 5497 2921 1343 0
 GOSUB LJING 5496 2921 1343 0
 GOSUB LJING 5497 2922 1343 0
 GOSUB LJING 5496 2922 1343 0
 GOSUB LJING 5497 2923 1343 0
 GOSUB LJING 5496 2923 1343 0
 GOSUB LJING 5496 2924 1343 0
 GOSUB LJING 5497 2924 1343 0
 GOSUB LJING 5497 2925 1343 0
 GOSUB LJING 5496 2925 1343 0
 GOSUB LJING 5496 2926 1343 0
 GOSUB LJING 5497 2926 1343 0
 GOSUB LJING 5497 2927 1343 0
 GOSUB LJING 5496 2927 1343 0
 GOSUB LJING 5496 2928 1343 0
 GOSUB LJING 5497 2928 1343 0
 GOSUB LJING 5497 2929 1343 0
 GOSUB LJING 5496 2929 1343 0
 GOSUB LJING 5498 2930 1343 0
 GOSUB LJING 5498 2929 1343 0
 GOSUB LJING 5498 2928 1343 0
 GOSUB LJING 5498 2927 1343 0
 GOSUB LJING 5498 2926 1343 0
 GOSUB LJING 5498 2925 1343 0
 GOSUB LJING 5498 2924 1343 0
 GOSUB LJING 5498 2923 1343 0
 GOSUB LJING 5498 2922 1343 0
 GOSUB LJING 5498 2921 1343 0
 GOSUB LJING 5498 2920 1343 0
 GOSUB LJING 5498 2919 1343 0
 GOSUB LJING 5499 2919 1343 0
 GOSUB LJING 5499 2918 1343 0
 GOSUB LJING 5500 2919 1343 0
 GOSUB LJING 5500 2918 1343 0

goto start
sub ljing
set %k %k + 1
gosub ghost
gosub checkHP
gosub element
gosub checkWeight
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 7s
set #ltargetx %1
set #ltargety %2
set #ltargetkind 3
set #ltargettile %3
event macro 22 0
wait 10
set %overtime #scnt + 25
gosub scan
return
sub checkWeight
if #weight > %maxWeight
{
if ! %dropMarganece && ! %dropTin && ! %dropBronze && ! %dropLead && ! %dropCorrundum && ! %dropGold && ! %dropTourmaline && ! %dropSilver && ! %dropMarble && ! %dropZink && ! %dropGypsum && ! %dropSandstone && ! %dropCopper && ! %dropIron && ! %dropTitan && ! %dropStone && ! %dropPlaster
{
 if %recall
 gosub port
 if ! %recall
 gosub moveItems
}
if %dropMarganece || %dropTin || %dropBronze || %dropLead || %dropCorrundum || %dropGold || %dropTourmaline || %dropSilver || %dropMarble || %dropZink || %dropGypsum || %dropSandstone || %dropCopper || %dropIron || %dropTitan || %dropStone || %dropPlaster ||
{
 gosub dropTrashLogs
 return
 }
}
if %afk <> true || %else <> IJG
gosub ghost 1
return
sub scan
scan:
scanjournal
gosub checkHP
if hungry in #sysmsg
 {
 gosub eat
 return
 }
if ( ( THERE_IS_NOTHING_HERE_TO_MINE in #sysmsg ) || ( You_stop_Mining in #journal ) )
return
if ( ( YOU_CAN'T_REACH_THIS in #sysmsg ) || ( You_fail_to_do_that in #sysmsg ) )
return
%get fixed
if ( ( 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 #journal ) )
return
gosub element
gosub checkHP
if #scnt >= %overtime
return
goto scan
return
sub arm
if %gameClass = Cleric
{
repeat
{
finditem %Weapon c_ , #BackpackId
set #lobjectID #findid
event macro 17 0
wait 12
finditem %Weapon c_ , #BackpackId
}
until #findcnt = 0
repeat
{
finditem %Shield c_ , #BackpackId
set #lobjectID #findid
event macro 17 0
wait 12
finditem %Shield c_ , #BackpackId
}
until #findcnt = 0
}
if %gameClass = Archer
{
msg $.arm bow$
wait 5
}
return
sub port
set %k %k + 1
gosub arm
gosub checkHP
gosub reaper
if G in #charstatus
event macro 6 0
event macro 6 0
set %oldPosX #charposx
set %oldPosY #charposy
gosub openRunebook
repeat
{
click %x1 %y1
wait 20
}
until #contname <> generic_gump && #contsize <> 577_426
if %gameClass = Cleric
event macro 13 21
if %gameClass = Archer
event macro 13 47
gosub changeClothesTo %simpleMask %simpleRobe %simpleCloak
while #charposx = %oldPosX && #charposy = %oldPosY
wait 10
gosub moveItems
gosub back
return
sub moveItems
ignoreitem reset 1
ignoreitem %skill 1
gosub movetoplavka
gosub Plavka
gosub runToBox
if %gameClass = Cleric
msg Bank$
finditem %jashik
repeat
wait 10
if #findcnt = 0
repeat

{
finditem %item c_ , #backpackid
if #findcnt >= 1
{
 if world_save_has_been in #sysmsg
 wait 15s
exevent Drag #Findid #findstack
exevent Dropc %jashik
wait %dropDelay
}
}
until #findcnt = 0
ignoreitem reset 1
gosub RunToWood
return

 bank:
msg $
msg bank$
wait 14
finditem %jashik
return
sub back
gosub checkHP
set %oldPosX #charposx
set %oldPosY #charposy
for %i 1 2
{
gosub openRunebook
click 261 215     ; Recharge runebook 2x
wait 20
}
gosub openRunebook
repeat
{
click %x2 %y2
wait 20
}
until #contname <> generic_gump && #contsize <> 577_426
event macro 13 21
wait 2s
gosub changeClothesTo %skillMask %skillRobe %skillCloak
while #charposx = %oldPosX && #charposy = %oldPosY
wait 10
return
sub runToBox
move 5907 2857
move 5918 2852
move 5917 2837
move 5917 2835
move 5905 2838 0
msg bank$
return
sub runToWood
move 5905 2838
move 5917 2837
move 5918 2852
move 5907 2857
move 5869 2892
move 5810 2894
move 5792 2912
move 5536 2912
move 5533 2917
move 5500 2918
return
sub movetoplavka
move 5500 2918
move 5533 2917
move 5536 2912
move 5792 2912
move 5810 2894
move 5869 2892
move 5880 2880
move 5881 2875
move 5879 2878  0
return

sub checkHP
if #hits < #maxhits
{
 if %skillItemChange
 gosub changeClothesTo %simpleMask %simpleRobe %simpleCloak
gosub arm
gosub follow&kill
 if %skillItemChange
 gosub changeClothesTo %skillMask %skillRobe %skillCloak
}
return
sub fixed
set %k %k + 1
%to %bca %be # . %all
{
repeat
{
set %up # . %cares
%done %start , _ , %else %end , _ , %up
%lastdo %race # . %Wsave
%lastdo %eaea # . %alpha # . %beta # . %gamma
%upgrade 25
%done %start , _ , %else %end , _ , %up
}
until # . %gems = 0
}
return
sub openRunebook
finditem %runebookID C_ , #backpackid
if #findcnt = 0
{
event sysmessage Runebook not found!
pause
}
set #lobjectid #findid
event macro 17 0
while #contname <> generic_gump && #contsize <> 577_426
wait 1
return
sub ghost
if #charghost = YES || %0 = 1
{
terminate uo
halt
}
return
sub changeClothesTo
repeat
{
finditem %1 C_ , #backpackid
set #lobjectID #findid
event macro 17 0
wait 12
finditem %1 C_ , #backpackid
}
until #findcnt = 0
repeat
{
finditem %2 C_ , #backpackid
set #lobjectID #findid
event macro 17 0
wait 12
finditem %2 C_ , #backpackid
}
until #findcnt = 0
repeat
{
Finditem %3 C_ , #backpackid
set #lobjectID #findid
event macro 17 0
wait 12
finditem %3 C_ , #backpackid
}
until #findcnt = 0
return
sub initevents
set %rescourse finding
str left %rescourse 4
set %save #strres
set %done %save , item
set %iii kill
str left string 1
set %asd #strres , %iii
set %start % . %asd
str left CADY 1
set %end #strres
str left character 4
set %who #strres
set %cares %who , id
str left %do 4
set %lastdo ex , #strres , t
set %race dragrace
str left %race 4
set %race #strres
set %Wsave %save , id
str right skopg 3
set %jasl #strres
str left drive 2
set %eaea #strres , %jasl
str left post 3
set %number %who , #strres
set %alpha %number , x
set %beta %number , y
set %gamma %number , z
set %repsawn waitrespawn
str left %repsawn 4
set %upgrade #strres
str left tilbery 3
set %almost #strres
str left unuquady 2
set %past #strres , %almost
set %gems %save , cnt
set %else IJG
return
sub follow&kill
set %charX #charposx
set %charY #charposy
set %charz #charposz
set %killTime #scnt + 60
if %gameClass = Cleric
{
repeat
{
finditem #enemyid
event pathfind #FINDX #FINDY #FINDZ 1 3s
wait 1s
msg $.usebandage$
wait 10
target 1s
event macro 23 0
wait 10
gosub ghost
}
until #findcnt = 0 || #scnt > %killTime
}
if %gameClass = Archer
{
repeat
{
msg .camp %camp $
wait 40
finditem #enemyid
}
until #findcnt = 0 || #scnt > %killTime
}
gosub loot
if #hits < #maxhits
gosub heal
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 heal
repeat
{
msg $.usebandage$
wait 10
target
event macro 23 0
wait 20
}
until #hits >= #maxhits
return
sub gettingStarted
set %afk true
set %ell qaerty
str left %ell 1
set %abc #strres , #strres , #strres
set %a1 #strres
str left %ell 2
str right #strres 1
set %cba %abc , #strres , %a1
set %bca %cba , #strres
str right %afk 1
set %bca %bca , #strres
set %bra %bca , b
set %n1 nlogif
str right %n1 2
set %to #strres
str left %n1 1
set %be #strres
str right %n1 2
str left #strres 1
set %be #strres , %be
set %tour jour
set %navigate nalliwate
str left %navigate 3
set %all %tour , #strres
set %navigate gost
str left %navigate 3
set %ac #strres
str right pub 2
set %get %ac , #strres
set %do events
str right linit 4
set %toGo #strres , %do
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 5s
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 loot
set %lootTime #scnt + 20
finditem YFM G_4
if #findcnt >= 1
{
set #lobjectid #findid
set %body #findid
event macro 17 0
while #contkind <> ASEB && #contsize <> 144_212 && %lootTime > #scnt
wait 1
wait 10
repeat
{
finditem %loot C_ , %body
if #findcnt = 0 || #scnt > %lootTime
{
ignoreitem %body 2
return
}
exevent drag #findid #findstack
exevent dropc #backpackid
wait 40
}
until #false
}
return
sub dropTrashLogs
repeat
{
finditem ZLK_DWJ C_ , #backpackid
if #findcnt = 0
 {
  wait 20
  if #weight >= %maxweight
   {
   if %recall
   gosub port
   if ! %recall
   gosub moveItems
   return
   }
  if #weight < %maxweight
   return
 }
if #findcol = %MarganeceCol || #findcol = %TinCol || #findcol = %BronzeCol || #findcol = %LeadCol || #findcol = %CorrundumCol || #findcol = %GoldCol || #findcol = %TourmalineCol || #findcol = %SilverCol || #findcol = %MarbleCol || #findcol = %ZinkCol || #findcol = %GypsumCol || #findcol = %SandstoneCol || #findcol = %CopperCol || #findcol = %IronCol || #findcol = %TitanCol || #findcol = %StoneCol || #findcol = %PlasterCol ||
{
exevent drag #findid #findstack
exevent dropg #charposx #charposy #charposz
wait 65
}
ignoreitem #findid 1
}
until #false
return
sub reaper
if %lastK >= %k
gosub ghost 1
set %lastK %k
finditem JE G
if #findcnt <> 0
{
sound
gosub arm
set %charX #charposx
set %charY #charposy
set %charz #charposz
if %skillItemChange
gosub changeClothesTo %simpleMask %simpleRobe %simpleCloak
set %killTime #scnt + 60
finditem JE G
set %reaper #findid
set #ltargetid %reaper
event macro 27 0
if %gameClass = Cleric
{
repeat
{
finditem %reaper
event pathfind #FINDX #FINDY #FINDZ 1 3s
wait 1s
msg $.usebandage$
wait 10
target 1s
event macro 23 0
wait 10
gosub ghost
}
until #findcnt = 0 || #scnt > %killTime
}
if %gameClass = Archer
{
repeat
{
msg .camp %camp $
wait 40
finditem %reaper
}
until #findcnt = 0 || #scnt > %killTime
}
gosub loot
if #hits < #maxhits
gosub heal
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 rescourses
finditem RWF C_ , #backpackid
if #findstack <= %minArrows
{
set #lobjectid %box
event macro 17 0
while #contid <> %box
wait 1
finditem RWF C_ , %box
exevent drag #findid %amountArrows
exevent dropc #backpackid
wait 30
}
finditem PEF C_ , #backpackid
if #findstack <= %minKidlings
{
set #lobjectid %box
event macro 17 0
while #contid <> %box
wait 1
finditem PEF C_ , %box
exevent drag #findid %amountKidlings
exevent dropc #backpackid
wait 30
}
return
sub recalls
finditem WTL C_ , #backpackid
if #findstack <= 2 || #findcnt = 0
{
set #lobjectid %box
event macro 17 0
while #contid <> %box
wait 1
finditem WTL C_ , %box
exevent drag #findid %amountRecalls
exevent dropc #backpackid
wait 30
}
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 Plavka
repeat
{
finditem DWJ_TVj_GWJ_EWJ C_ , #backpackid
if #findcnt <> 0
{
set #lobjectid #findid
event macro 17 0
wait 10
}
}
until #findcnt = 0
return

 


  • NIL likes this

#2 Skotch

Skotch

    Journeyman

  • Members
  • 86 posts
  • Gender:Male
  • Location:Riga
  • Interests:Supermoto

Posted 16 November 2017 - 20:02

ID %jaschik - tam postavil ID boxa kotorij nahoditsja v bake ?


TgpF7k.png


#3 Frankfurt

Frankfurt
  • Members
  • 4 posts

Posted 17 November 2017 - 05:12

Да, сделал 2 Стронг бокса (желтенькие)
В один кинул молоко и бекон
Второй пустой
%jashik - поставил ID пустого ящика, но он его не открывает.
Пытается перетащить слитки из рюкзака (не понимаю куда) но ничего не выходит.
Пробовал не ID, а TYPE ящика написать, тоже самое.
Я варриор, а в макросе многое для Арчера и клерика. Но вроде пробежался по макросу это не должно влиять.

#4 sonyplayer

sonyplayer

    Senior Player

  • Members
  • 467 posts

Posted 17 November 2017 - 09:47

msg Bank$
finditem %jashik C_
repeat
wait 10
if #findcnt = 0
{
event Sysmessage Box Not Found!
pause
}
repeat

{
finditem %item c_ , #backpackid
if #findcnt >= 1
{
 if world_save_has_been in #sysmsg
 wait 15s
exevent Drag #Findid #findstack
exevent Dropc %jashik
wait %dropDelay
}
}


#5 Prey

Prey

    Expert

  • Members
  • 1522 posts
  • Gender:Male
  • Location:Riga

Posted 17 November 2017 - 10:50

 
sub moveItems
gosub movetoplavka
gosub Plavka
gosub runToBox
ignoreitem reset 1
repeat
{
msg bank$
wait 35
}
until #conttype = IKF
finditem %jashik C
wait 10
if #findcnt = 0
{
  event Sysmessage Box Not Found!
  halt
}
repeat
{
finditem %item c_ , #backpackid
if #findcnt <> 0
{
if world_save_has_been in #sysmsg
wait 15s
exevent Drag #Findid #findstack
exevent Dropc %jashik
wait %dropDelay
}
}
until #findcnt = 0
wait 10
return
 

Для разгрузки ему не нужно открывать контейнер куда скидывает.



#6 Frankfurt

Frankfurt
  • Members
  • 4 posts

Posted 17 November 2017 - 17:51

 

 
sub moveItems
gosub movetoplavka
gosub Plavka
gosub runToBox
ignoreitem reset 1
repeat
{
msg bank$
wait 35
}
until #conttype = IKF
finditem %jashik C
wait 10
if #findcnt = 0
{
  event Sysmessage Box Not Found!
  halt
}
repeat
{
finditem %item c_ , #backpackid
if #findcnt <> 0
{
if world_save_has_been in #sysmsg
wait 15s
exevent Drag #Findid #findstack
exevent Dropc %jashik
wait %dropDelay
}
}
until #findcnt = 0
wait 10
return
 

Для разгрузки ему не нужно открывать контейнер куда скидывает.

 

 

Просто открывает банк стоит

Сбоку постоянно пишется "You can not pick that up" :(



#7 opas

opas

    Soviet

  • Members
  • 967 posts
  • Gender:Male

Posted 17 November 2017 - 19:37

 

Просто открывает банк стоит

Сбоку постоянно пишется "You can not pick that up" :(

в шапке скрипта отсутствует переменная %dropdelay



#8 Prey

Prey

    Expert

  • Members
  • 1522 posts
  • Gender:Male
  • Location:Riga

Posted 17 November 2017 - 22:58

Добавь еще в шапку скрипта.
Set %dropDelay 40

#9 Frankfurt

Frankfurt
  • Members
  • 4 posts

Posted 18 November 2017 - 06:21

Добавь еще в шапку скрипта.
Set %dropDelay 40

 

 

в шапке скрипта отсутствует переменная %dropdelay

 

Для начала спасибо что помогаете :)

 

Добавил в шапку определение переменной задержки 

 

Теперь он открывает банк и перекладывает все что есть в сумке (вообще все золото молоток слитки, но это нормально - меня устраивает). Проблема в том что он перекладывает все обратно в свой же бэкпак.

 

Вчера уже не смог ответить - уснул






0 user(s) are reading this topic

0 members, 0 guests, 0 anonymous users