Jump to content


Toggle shoutbox Chat Open the Shoutbox in a popup

Прямая связь с администрацией по скайпу: gods.dragon
@  Pixels : (Yesterday, 17:57) Sell Relcit Cloack na nedelju=3kk Skype kelyXL
@  osasjtim : (Yesterday, 07:57) Buy Glory ings - mnogo!
@  WelcometoOld... : (19 September 2019 - 22:53) Buy MAgic Protection Bacelet
@  Salagaa : (19 September 2019 - 19:49) Menjaju crash gloves na drugio itema !!!
@  GM SOLAR : (19 September 2019 - 15:18) Buy Elik +200 skype: gm solarr
@  beatiful : (17 September 2019 - 16:50) SELL 1KKK FAME 45KK ILI 100 RP
@  bumbulbulis : (17 September 2019 - 10:11) BUY FAME
@  bumbulbulis : (17 September 2019 - 10:11) B U Y F A M E
@  Ganjakur : (16 September 2019 - 14:21) Buy: crash sleeves/gloves. Mahnu gods bow na gods club/kryss. skype - Aigars.Natra
@  Ganjakur : (15 September 2019 - 20:33) Kuplu crash sleeves, helm
@  Rtommy : (15 September 2019 - 09:48) Не кто мага не продает 12 ?
@  Ganjakur : (15 September 2019 - 08:06) buy crash sleeves, helm
@  Restless : (14 September 2019 - 22:51) Sell 200rp - 90KK (PM)
@  Rhastaaa : (14 September 2019 - 11:30) Buy Crash Chest , Helm , Legs ! 40+ dur !
@  beatiful : (13 September 2019 - 15:19) VOZMU RP
@  kialika1 : (13 September 2019 - 11:43) по чем рп?
@  Restless : (12 September 2019 - 12:02) Sell 200 RP
@  Drakula_ : (12 September 2019 - 09:06) всем привет! сколько сейчас стоит карго кожа и продает ли кто ?
@  OLDPFUN : (11 September 2019 - 16:59) buy reptile bones
@  Gogogo : (11 September 2019 - 12:52) Buy barbar itemi BUy crash itemi buy gods chain itemi Buy Eldian Dex banki !

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
  • 977 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