скинь полный скрипт который в изи забит
Сейчас всё работает нормально, единственное иногда бывает не скидывает логи\инги в ящик в банке. Вот скрипт:
Spoiler
set %gameClass Archer ; Cleric or Archer set %maxWeight 500 ; Max ves set %box OEKMKMD ; ID banka Set %jashik WPMALMD ; ID korobki s logami set %foodCont CFOLMMD ; ID korobki, gde stoit zapasi moloko i bekona set %xCoord 635 ; X koordinata okolo boxa set %yCoord 835 ; Y koordinata okolo boxa set %dropAspen #false ; #true - sbrasivajet Aspen logi , #false - net set %dropWillow #false ; #true - sbrasivajet Willow logi , #false - net set %dropCedarMapleNoblefire #false ; #true sbrasivajet etie logi, #false - net set %dropCherry #false set %dropEcalyptus #false ; #true sbrasivajet etie logi, #false - net set %skillItemChange #true ; #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 %camp #spc ; #spc - the best camp, heal - healing campifre +5 set %minKidlings 10 ; minimalnoe kolichestvo kidlov v sumke set %amountKidlings 40 ; skolko kidlov vzjatj, kogda ix netu set %minArrows 150 ; minimalnoe kolichestvo strel v sumke set %amountArrows 400 ; skolko strel vzjatj, kogda ix netu ; special variables for Cleric(tolko dlja klerika): set %Weapon TOH ; oruzhie set %Shield OIK ; shild set %item ZLK_POF_RZF_SJG_CUD_IJG_HSF_RVH_FZH_NZH_UJG_FWL_DCI set %logi ZLK set %time wait 25 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 %dropAspen set %aspenCol 973 if %dropWillow set %willowCol 0 if %dropCedarMapleNoblefire 3 set %cedarCol 437 set %mapleCol 1233 set %noblefireCol 153 if %dropCherry set %cherryCol 38 if %dropEcalyptus set %ecalyptusCol 81 set %skill %skillRobe , _ , %skillCloak , _ , %skillMask gosub gettingStarted gosub initevents set %k 0 set %lastK 0 start: GOSUB LJING 684 792 3277 GOSUB LJING 676 777 3291 GOSUB LJING 672 777 3289 GOSUB LJING 676 771 3277 GOSUB LJING 680 768 3291 GOSUB LJING 684 771 3283 GOSUB LJING 688 771 3299 GOSUB LJING 692 777 3291 GOSUB LJING 692 774 3283 GOSUB LJING 688 765 3286 GOSUB LJING 688 762 3280 GOSUB LJING 684 765 3302 GOSUB LJING 688 756 3280 GOSUB LJING 688 753 3286 GOSUB LJING 692 750 3302 GOSUB LJING 692 747 3291 GOSUB LJING 672 762 3296 GOSUB LJING 664 774 3296 GOSUB LJING 660 768 3280 GOSUB LJING 660 762 3294 GOSUB LJING 657 755 3299 GOSUB LJING 664 756 3289 GOSUB LJING 664 753 3286 GOSUB LJING 672 750 3294 GOSUB LJING 664 747 3296 GOSUB LJING 660 738 3294 GOSUB LJING 664 738 3280 GOSUB LJING 672 735 3299 GOSUB LJING 676 732 3299 GOSUB LJING 668 735 3277 GOSUB LJING 668 732 3294 GOSUB LJING 656 733 3294 GOSUB LJING 660 732 3283 GOSUB LJING 660 724 3280 GOSUB LJING 664 720 3299 GOSUB LJING 664 732 3302 GOSUB LJING 668 732 3294 GOSUB LJING 676 732 3299 GOSUB LJING 676 726 3289 GOSUB LJING 688 723 3286 GOSUB LJING 688 729 3286 GOSUB LJING 688 741 3296 GOSUB LJING 692 747 3291 GOSUB LJING 692 750 3302 GOSUB LJING 700 756 3280 GOSUB LJING 708 750 3277 GOSUB LJING 704 756 3277 GOSUB LJING 704 762 3286 GOSUB LJING 712 768 3296 GOSUB LJING 708 771 3286 GOSUB LJING 712 771 3283 GOSUB LJING 720 765 3294 GOSUB LJING 720 771 3291 GOSUB LJING 728 768 3277 GOSUB LJING 728 771 3302 GOSUB LJING 728 774 3283 GOSUB LJING 732 780 3280 GOSUB LJING 728 780 3289 GOSUB LJING 728 792 3291 GOSUB LJING 736 795 3299 GOSUB LJING 740 798 3294 GOSUB LJING 736 801 3302 GOSUB LJING 736 798 3291 GOSUB LJING 732 798 3294 GOSUB LJING 732 804 3283 GOSUB LJING 732 807 3296 GOSUB LJING 736 807 3296 GOSUB LJING 740 807 3280 GOSUB LJING 740 810 3283 GOSUB LJING 740 816 3294 GOSUB LJING 744 825 3283 GOSUB LJING 744 828 3302 GOSUB LJING 744 831 3299 GOSUB LJING 744 834 3277 GOSUB LJING 748 837 3277 GOSUB LJING 740 837 3283 GOSUB LJING 744 846 3291 GOSUB LJING 748 852 3283 GOSUB LJING 744 852 3280 GOSUB LJING 748 858 3289 GOSUB LJING 740 860 3299 GOSUB LJING 733 860 3283 GOSUB LJING 732 852 3283 GOSUB LJING 728 849 3299 GOSUB LJING 724 846 3283 GOSUB LJING 728 837 3289 GOSUB LJING 724 840 3280 GOSUB LJING 716 852 3277 GOSUB LJING 712 855 3277 GOSUB LJING 704 855 3299 GOSUB LJING 704 849 3277 GOSUB LJING 708 843 3296 GOSUB LJING 708 840 3291 GOSUB LJING 692 822 3294 GOSUB LJING 692 813 3286 GOSUB LJING 696 813 3291 GOSUB LJING 692 807 3299 goto start sub ljing set %k %k + 1 gosub ghost gosub checkHP gosub element gosub checkWeight move %1 %2 1 finditem FSF C if #findcnt = 0 { display ok axe 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 ! %dropAspen && ! %dropWillow && ! %dropCherry && ! %dropEcalyptus && ! %dropCedarMapleNoblefire { if %recall gosub port if ! %recall gosub moveItems } if %dropAspen || %dropWillow || %dropCedarMapleNoblefire || %dropCherry || %dropEcalyptus { 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 ( ( you_can't_reach_this in #sysmsg ) || ( THERE_IS_NOTHING_HERE_TO_CHOP in #sysmsg ) + || ( use_that_in in #journal ) || ( It_appears_immune_to_your_blow in #sysmsg ) + || ( You_cant_do_that,_your_skill_is_to_low in #sysmsg ) ) 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 runToBox if %gameClass = Cleric msg Bank$ finditem %jashik repeat wait 50 if #findcnt = 0 repeat { finditem %logi C_ , #backpackid if #findcnt >= 1 { msg bank$ drag: if world_save_has_been in #sysmsg wait 15s exevent Drag #Findid #findstack wait %time exevent Dropc %jashik finditem %logi C_ , #backpackid if #findcnt >= 1 { wait 10 goto drag } } 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 683 812 move 678 831 move 648 859 move 634 859 move 634 856 wait 10 event macro 12 0 wait 5 move 634 834 msg bank$ return sub runToWood move 634 854 move 634 861 move 647 861 move 683 825 move 681 803 ;move 5544 2917 ;move 5566 2917 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 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 dropTrashLogs repeat { finditem ZLK 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 = %willowCol || #findcol = %aspenCol + || #findcol = %cedarCol || #findcol = %mapleCol || #findcol = %noblefireCol + || #findcol = %cherryCol || #findcol = %ecalyptusCol { exevent drag #findid #findstack exevent dropg #charposx #charposy #charposz wait 5 } ignoreitem #findid 1 } until #false 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