Jump to content


Toggle shoutbox Chat Open the Shoutbox in a popup

Прямая связь с администрацией по скайпу: gods.dragon
@  kirko : (Today, 16:01) da was 1 denj profa)) prosto pizi lutwe sdelatj cem was a ne prof,
@  Rtommy : (Today, 15:46) 1h vremeni koneshno naxer nado , 1 days proffa za lost
@  kirko : (Today, 15:28) na losti nado podnjatj prizi,ibo lost was sobratj narod eto redkostj
@  Grund1k_ : (Today, 13:55) Da mogu kaneshna :) Нету таких планов
@  DonBaron : (Today, 13:53) @ Grund1k_ : Pridlozhi svoy variant :) Ili eto ti i pridlogal -
@  Grund1k_ : (Today, 13:52) Bezpantoviji varianti tut. Vse mozhete bitj svabodni na sevodneshnij denj. :D
@  DonBaron : (Today, 13:50) @ Grund1k_ : Nagrelsya ? :D
@  DonBaron : (Today, 13:50) @ Rtommy : Nu eto uzhe pointeresnee :) Nu vot davayte meste chevota pridlozhit serveru - Otkroyte forume topik i pust kazhdij viskazivayetsa chtobi hotel videt na servere. :) Meste zhe vi SILA. :)
@  Grund1k_ : (Today, 13:48) pzdu log out kr4 :)
@  DonBaron : (Today, 13:48) Eto chto nepohozh na ivent , quest ? To schto ti pridlogal :)
@  DonBaron : (Today, 13:47) Grund1k_ : (Today, 12:26)Tak vot: Pustj Admin stavit kakovota bota v igre kto poivlajetsa raz v 2 chesa gdeto po miru. Vse idot ivo ubivatj i vam dajotsa za eto Prof na kakix 8h ili hz skoka :D i budet pvp okola monstra i budet aktivnostj v igre.
@  Grund1k_ : (Today, 13:45) KAKIE QUESTI :) TUT NAROD NENABERAJITSA SHTOBI PROITI QUESTI NA HP :) GDE NADO IGRATJ CTF I LOST
@  Rtommy : (Today, 13:43) Vse xotjat chegoto novogo oni 5 let po defu odni i teze stolbi bez izmeninie prizov i t.d
@  DonBaron : (Today, 13:42) Prosta vse hotjat vse bezplatno nu bezplatno zhe nekto nechevo dovat nebudet.
@  DonBaron : (Today, 13:41) A chto malo questov igre? Malo Stolbov Turnirnih ? :)
@  Grund1k_ : (Today, 13:28) A tak i vso zimu budem gretsa v mp na lavochku i letom zakrojit lavachku i vso GG
@  Grund1k_ : (Today, 13:26) Tak vot: Pustj Admin stavit kakovota bota v igre kto poivlajetsa raz v 2 chesa gdeto po miru. Vse idot ivo ubivatj i vam dajotsa za eto Prof na kakix 8h ili hz skoka :D i budet pvp okola monstra i budet aktivnostj v igre.
@  Ювелир*ЗМ : (Today, 13:18) @Grund1k_ все на скриптах ,ждут новый хот :yao:
@  Grund1k_ : (Today, 13:12) smatrju na forume bolshe narod tusujetsa v chem igre :D Nuka davai zahadite vse v Ultimu. i nebudet nitja cho gde kokda i.t.d
@  regi : (Today, 12:55) вернуть онлайн... помогли бы серверу. игре уже 20+ лет. Играйте и радуйтесь

Photo

Алхимия


  • Please log in to reply
3 replies to this topic

#1 osasjtim

osasjtim

    Newbie

  • Members
  • 19 posts

Posted 05 September 2019 - 11:24

Доброго дня, коллеги!

Вопрос, переделал скрипт под крафт банок на крафт хилинг поушенов. Всё вроде прописал, но готовые банки он в сундук не складывает, не понимаю где надо поправить. Реагент лежит в сумке - его вес вообще не ощущается, берет из одного сундука 50 банок пустых, крафтит поушены, но не скидывает их в другой сундук, почему не понимаю - посоветуйте, что поправить. Заранее спасибо!

 

initevents
 
initevent
uoswap:
if #charname <> Sjmage
{
UOXL swap
goto uoswap
}
 
set %BOX GJRHKMD ; where to take ings
SET %MUSORKA GJRHKMD ; where to put flacks
set %eatBOX DYUNKMD
SET %REG PGJ ;ings
SET %Skreg 50 ; quantity of ings to take
SET %ITEM VGJ; type of production
SET %Tool RQF ; tool
SET %TIME1 150 ; wait on the production screen
SET %TIME2 15 ; wait to transfer items
set %eatTIME 900
set %Drink ZBM
set %eat HND_GND
set %SCNT #SCNT + %eatTIME
GOSUB Craft
 
SUB Craft
    if #SCNT >= %SCNT
    gosub eat
    Finditem %Tool C_ , #BackpackID
    IF #Findkind <> -1 4
       SET #LobjectID #FindID
       Event Macro 17 0
       wait 10
       Click 486 453
    GOSUB Journal
     return
SUB Journal
    Deletejournal
       set %CNT #SCNT2 + %TIME1
       scan:
     event SysMessage
    Scanjournal
    IF You_are_hungry  in #Journal || You_are_hungry in #sysmsg
       GOSUB eat
    IF You_need IN #Journal ;|| IF You_need IN #Sysmsg
       GOSUB Tresh
    IF You_put IN #Journal ;|| IF You_put IN #Sysmsg
       GOSUB craft
    IF #SCNT2 > %CNT
       GOSUB craft
    goto scan
Return
return
 
SUB Tresh
       musorka:
       Finditem %ITEM C_ , #BackpackID
           IF #Findkind <> -1
    {
       exevent Drag #FindID #FindStack
       exevent Dropc %MUSORKA
       wait %TIME2
       goto musorka
       }
        Finditem %Banka C_ , #BackpackID
    IF #Findkind <> -1 3
       exevent Drag #FindID #FindStack
       exevent Dropc %BOX
       wait %TIME2
 
    Finditem %REG C_ , #BackpackID
    IF #Findkind <> -1 3
       exevent Drag #FindID #findstack
       exevent Dropc %BOX
       wait %TIME2
          reg:
       Finditem %REG C_ , %BOX
    IF #findstack >= 3 4
       exevent Drag #FindID %Skreg
       exevent Dropc #BackpackID
       wait %TIME2
      GOSUB Craft
      ignoreitem #findID
      goto reg
      return
 
sub eat
Finditem %eat C_ , %eatBOX
    IF #Findkind <> -1 3
       exevent Drag #FindID 1
       exevent Dropc #BackpackID
       wait %TIME2
Finditem %drink C_ , %eatBOX
    IF #Findkind <> -1 3
       exevent Drag #FindID 1
       exevent Dropc #BackpackID
       wait %TIME2
finditem %eat C_ , #backpackID
if #findkind <> -1 3
set #LobjectID #FindID
event macro 17
wait 5
finditem %drink C_ , #backpackID
if #findkind <> -1 3
set #LobjectID #FindID
event macro 17
wait 5
set %SCNT #SCNT + %eatTIME
return
 


#2 opas

opas

    Soviet

  • Members
  • 981 posts
  • Gender:Male

Posted 05 September 2019 - 16:30

SET %ITEM VGJ; 

Пробела не хватает VGJ ;



#3 osasjtim

osasjtim

    Newbie

  • Members
  • 19 posts

Posted 05 September 2019 - 16:51

понял =)

попробую - отпишу!



#4 osasjtim

osasjtim

    Newbie

  • Members
  • 19 posts

Posted 06 September 2019 - 10:47

SET %ITEM VGJ; 

Пробела не хватает VGJ ;

Всё заработало! Спасибо большое! =) 






0 user(s) are reading this topic

0 members, 0 guests, 0 anonymous users