Yoko

All sides of Injection
It is currently 2025-11-05 11:20:22

Unanswered topics | Active topics


» » »

All times are UTC+02:00



Post new topic  Reply to topic  Page 1 of 1
  [ 16 posts ] 
  Print view Previous topic | Next topic 
Author Message
kexwer
PostPosted: 2007-04-12 11:28:27 
Offline
User avatar

Joined: 2005-06-19 19:21:28
Posts: 159
У меня проблема... Что я только не пробывал, постоянно утром просыпаюсь и я мёртвый в випке, либо от элема, либо от вортекса, сам не пойму почему!

Посмотрите, что тут не так, вроде бы всё перепробывал...


Code:
sub killelem() 
VAR Count, LastTimer, Elem, Vortex
uo.exec('usetype 0x0f0e 0x0631')
wait(3000)
UO.FindType('0x0010',-1,'ground') 
Elem=UO.GetSerial('finditem') 
repeat
   if UO.mana > 25 then
   Uo.print("Маны мильён ещё!")
   else
   wait(12000)
   uo.exec('usetype 0x0f0e 0x09DF')
   endif
 wait(300) 
      uo.exec('usetype 0x1F66')
      uo.waittargetobject('self')
   wait(20000)
until UO.IsNPC(Elem)==0 
wait(3000)

UO.FindType('0x000D',-1,'ground') 
Vortex=UO.GetSerial('finditem')
repeat
  if UO.mana > 25 then
  Uo.print("Маны мильён ещё!")
  else
  uo.exec('usetype 0x0f0e 0x09DF')
  wait(15000)
  endif
 uo.DeleteJournal()
 wait(300) 
 uo.exec('usetype 0x1F62')
 uo.waittargetobject('self') 
 wait(7000) 
   until UO.IsNPC(Vortex)==0 
   wait(3000)
# собираем руду и копаем дальше # 
      UO.SetReceivingContainer('backpack') 
      UO.FindType('0x19B9',-1,'ground') 
      if UO.GetQuantity('finditem')>0 then 
         UO.Grab('0','finditem') 
         wait(2000) 
      endif 
      UO.FindType('0x19B7',-1,'ground') 
                   if UO.GetQuantity('finditem')>0 then 
               UO.Grab('0','finditem') 
               wait(2000) 
      endif 
      UO.FindType('0x19BA',-1,'ground') 
      if UO.GetQuantity('finditem')>0 then 
         UO.Grab('0','finditem') 
         wait(2000) 
      endif 
      UO.FindType('0x19B8',-1,'ground') 
      if UO.GetQuantity('finditem')>0 then 
         UO.Grab('0','finditem') 
         wait(2000) 
      endif 
      UO.FindType('0x0EED',-1,'ground') 
      if UO.GetQuantity('finditem')>0 then 
         UO.Grab('0','finditem') 
         wait(2000) 
      endif 
      UO.UnSetReceivingContainer() 
   endif 
wait(60000) 
end sub
Top
   
Reply with quote  
to4a
 Post subject:
PostPosted: 2007-04-12 14:34:26 
Offline

Joined: 2006-03-10 00:19:11
Posts: 265
Location: http://drw.ru/
сделай проще - стань в 4 тайлах от левой стенки, в 3 от нижней, и копай в хайде не обращая внимания на элемов, из этого тайла можно разгружатся в сундук не выходя из хайда, я лично так копаю по несколько суток с гномской киркой и норм. за несколько месяцев ещё ни одной кирки не потерял

зы: в випке моментальный логаут так что на крайний случай можно просто сделать проверку типа:
Code:
if UO.GetHP()<50 then
UO.CloseUO()
endif

я так и копаю, выходит оно крайне редко, раз в пару суток
Top
   
Reply with quote  
Nmy
 Post subject:
PostPosted: 2007-04-12 15:10:13 
Offline
Expert!
User avatar

Joined: 2005-09-14 15:31:58
Posts: 2152
Location: Latvia
Code:
If UO.Dead() Then
uo.showjournal( 100 )
Endif

_________________
Уроки языка Injection
Основные команды языка Injection
Yoko Injection Code Sweeper
Drw (2009) скрипты
2017 Начал играть на Uorpg.net
Top
   
Reply with quote  
Nort777
 Post subject:
PostPosted: 2007-04-13 11:30:05 
Offline

Joined: 2005-06-21 20:31:26
Posts: 80
а может какой нибудь добрый скриптер написать вместо этого скрипта скрипт: когда появляется элька чар пьет инвизку кричит all kill 2 раза и таргетом оба раза на элю, ну потом лутает и продолжает копать дальше :oops:
ну пожааааалуста :oops:
Top
   
Reply with quote  
Scripts Writer
 Post subject:
PostPosted: 2007-04-13 16:05:13 
Offline

Joined: 2005-04-19 18:00:29
Posts: 2259
Location: Московская область
и потом утром тамим дракона
Top
   
Reply with quote  
Nort777
 Post subject:
PostPosted: 2007-04-13 23:16:56 
Offline

Joined: 2005-06-21 20:31:26
Posts: 80
You Must Die wrote:
и потом утром тамим дракона

ну пожаааалуста :roll:
Top
   
Reply with quote  
kexwer
 Post subject:
PostPosted: 2007-04-14 06:01:02 
Offline
User avatar

Joined: 2005-06-19 19:21:28
Posts: 159
to4a wrote:
сделай проще - стань в 4 тайлах от левой стенки, в 3 от нижней, и копай в хайде не обращая внимания на элемов, из этого тайла можно разгружатся в сундук не выходя из хайда, я лично так копаю по несколько суток с гномской киркой и норм. за несколько месяцев ещё ни одной кирки не потерял

зы: в випке моментальный логаут так что на крайний случай можно просто сделать проверку типа:
Code:
if UO.GetHP()<50 then
UO.CloseUO()
endif

я так и копаю, выходит оно крайне редко, раз в пару суток



нету моментального логаунта в этой випке =\(я хз почему) И эта проверка у меня уже давно стоит,т.к. когда копал в другой випке, то был моментальный логаут....
Я сам думал встать на этой точки, да вот руда не успевает респиться... Придёться весь трэш копать =(((
Top
   
Reply with quote  
!
 Post subject:
PostPosted: 2007-04-14 21:33:24 
Offline

Joined: 2007-04-12 15:46:23
Posts: 9
to4a wrote:
сделай проще - стань в 4 тайлах от левой стенки, в 3 от нижней, и копай в хайде не обращая внимания на элемов, из этого тайла можно разгружатся в сундук не выходя из хайда, я лично так копаю по несколько суток с гномской киркой и норм. за несколько месяцев ещё ни одной кирки не потерял

зы: в випке моментальный логаут так что на крайний случай можно просто сделать проверку типа:
Code:
if UO.GetHP()<50 then
UO.CloseUO()
endif

я так и копаю, выходит оно крайне редко, раз в пару суток

скинь плз скриптик этот :roll:
Top
   
Reply with quote  
to4a
 Post subject:
PostPosted: 2007-04-14 22:43:50 
Offline

Joined: 2006-03-10 00:19:11
Posts: 265
Location: http://drw.ru/
kexwer wrote:
нету моментального логаунта в этой випке =\(я хз почему) И эта проверка у меня уже давно стоит,т.к. когда копал в другой випке, то был моментальный логаут....
Я сам думал встать на этой точки, да вот руда не успевает респиться... Придёться весь трэш копать =(((


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

а по поводу выложить скрипт - выложу, тока позже сейчас нет возможности...
Top
   
Reply with quote  
<FaTe>
 Post subject:
PostPosted: 2007-04-17 18:43:53 
Offline
User avatar

Joined: 2006-09-15 18:16:29
Posts: 35
Вот работающий скрипт:
Code:
ub KillElem() 
   UO.FindType('0x0F0E','0x0631','backpack') 
    if UO.GetQuantity('finditem')>0 then 
       UO.UseType('0x0F0E','0x0631') 
       Vortex:
       end if
   wait(300) 
   uo.cast('Energy Vortex','self') 
   repeat 
      wait(4000) 
   until uo.injournal("fizzles") or uo.injournal("Vortex") 
   if uo.injournal("fizzles") then 
     goto Vortex 
     else  
        end if
      wait(12000) 
        uo.deletejournal()
      vasanort:
      UO.FindType('0x0F0E','0x09DF','backpack') 
     if UO.GetQuantity('finditem')>0 then 
         UO.UseType('0x0F0E','0x09DF')
         end if
      wait(300) 
      uo.cast('Mass Dispel','self') 
      wait(6000) 
      if uo.injournal("fizzles") then 
         goto vasanort 
      endif 
       uo.deletejournal()
      UO.SetReceivingContainer('backpack') 
      UO.FindType('0x19B9',-1,'ground') 
      if UO.GetQuantity('finditem')>0 then 
         UO.Grab('0','finditem') 
         wait(2000) 
      endif 
      UO.FindType('0x19B7',-1,'ground') 
          if UO.GetQuantity('finditem')>0 then 
          UO.Grab('0','finditem') 
          wait(2000) 
      endif 
      UO.FindType('0x19BA',-1,'ground') 
      if UO.GetQuantity('finditem')>0 then 
         UO.Grab('0','finditem') 
         wait(2000) 
      endif 
      UO.FindType('0x19B8',-1,'ground') 
      if UO.GetQuantity('finditem')>0 then 
         UO.Grab('0','finditem') 
         wait(2000)
       endif
         UO.FindType('0x0EED',-1,'ground') 
      if UO.GetQuantity('finditem')>0 then 
         UO.Grab('0','finditem') 
         wait(2000)
       UO.UnSetReceivingContainer() 
       end if
end sub
Top
   
Reply with quote  
MADnegativ
 Post subject:
PostPosted: 2007-10-25 21:45:50 
Offline

Joined: 2007-10-25 21:40:29
Posts: 1
слушь а подскажи как его в мининг вставить чтоб он автоматом срабатывал при появление элема? :roll: :oops: :oops:
Top
   
Reply with quote  
Scripts Writer
 Post subject:
PostPosted: 2007-10-25 22:52:35 
Offline

Joined: 2005-04-19 18:00:29
Posts: 2259
Location: Московская область
<FaTe> wrote:
Вот работающий скрипт:
Code:
ub KillElem() 
   UO.FindType('0x0F0E','0x0631','backpack') 
    if UO.GetQuantity('finditem')>0 then 
       UO.UseType('0x0F0E','0x0631') 
       Vortex:
       end if
   wait(300) 
   uo.cast('Energy Vortex','self') 
   repeat 
      wait(4000) 
   until uo.injournal("fizzles") or uo.injournal("Vortex") 
   if uo.injournal("fizzles") then 
     goto Vortex 
     else  
        end if
      wait(12000) 
        uo.deletejournal()
      vasanort:
      UO.FindType('0x0F0E','0x09DF','backpack') 
     if UO.GetQuantity('finditem')>0 then 
         UO.UseType('0x0F0E','0x09DF')
         end if
      wait(300) 
      uo.cast('Mass Dispel','self') 
      wait(6000) 
      if uo.injournal("fizzles") then 
         goto vasanort 
      endif 
       uo.deletejournal()
      UO.SetReceivingContainer('backpack') 
      UO.FindType('0x19B9',-1,'ground') 
      if UO.GetQuantity('finditem')>0 then 
         UO.Grab('0','finditem') 
         wait(2000) 
      endif 
      UO.FindType('0x19B7',-1,'ground') 
          if UO.GetQuantity('finditem')>0 then 
          UO.Grab('0','finditem') 
          wait(2000) 
      endif 
      UO.FindType('0x19BA',-1,'ground') 
      if UO.GetQuantity('finditem')>0 then 
         UO.Grab('0','finditem') 
         wait(2000) 
      endif 
      UO.FindType('0x19B8',-1,'ground') 
      if UO.GetQuantity('finditem')>0 then 
         UO.Grab('0','finditem') 
         wait(2000)
       endif
         UO.FindType('0x0EED',-1,'ground') 
      if UO.GetQuantity('finditem')>0 then 
         UO.Grab('0','finditem') 
         wait(2000)
       UO.UnSetReceivingContainer() 
       end if
end sub


Пример того как скрипты писать не надо
Top
   
Reply with quote  
prof
 Post subject:
PostPosted: 2007-10-26 13:14:03 
Offline

Joined: 2005-01-01 04:00:14
Posts: 76
kexwer
10kk gp
и ты получишь полноценный кил элемов
Top
   
Reply with quote  
Zenkovsky
 Post subject:
PostPosted: 2007-10-27 19:05:00 
Offline

Joined: 2007-10-27 18:59:26
Posts: 3
А можно ли в скрипт дописать проверку на то: ЕСЛИ ЭЛЕМЕНТАЛ убил вортекса,то выполнить повторный каст вортекса?!Просто частенько элементал вортекса киляет и чар стоит и тупит,элем исчезает а чар всеравно стоит и чего то ждет.
Если кто знает как это написать,напишите плз.
Top
   
Reply with quote  
Scripts Writer
 Post subject:
PostPosted: 2007-10-28 16:40:23 
Offline

Joined: 2005-04-19 18:00:29
Posts: 2259
Location: Московская область
Zenkovsky wrote:
А можно ли в скрипт дописать проверку на то: ЕСЛИ ЭЛЕМЕНТАЛ убил вортекса,то выполнить повторный каст вортекса?!Просто частенько элементал вортекса киляет и чар стоит и тупит,элем исчезает а чар всеравно стоит и чего то ждет.
Если кто знает как это написать,напишите плз.


Code:
ищем элементаль 
  пока найдена
    ищем вортекса
      если найден то
        ждём
      иначе
        по координатам элементали 
        ищем свиток вортекса
        если найден то
          используем его и автоматически срабатывает ловушка на тайл в котором элементаль
        иначе
          кастуем 
  если не найдена 
то продолжаем скрипт 


Top
   
Reply with quote  
krestii
 Post subject:
PostPosted: 2008-07-06 13:29:49 
Offline
User avatar

Joined: 2008-07-05 19:57:30
Posts: 13
вот у меня такой код
Code:
sub AttackEnts() 
uo.DeleteJournal() 
var Enemy='0x00000000' 
repeat 
if uo.InJournal('is attacking you') or uo.InJournal('OOPS!!!') or uo.InJournal('Wis Quas') then 
uo.Exec('terminate Lumberjacking')  
Enemy=uo.JournalSerial(uo.InJournal('is attacking you')-1) 
##uo.PlayWav(LumberSound) 
if CastAtAttack==1 then 
 uo.UseObject('parabow')
 uo.WarMode(1)
 uo.attack(Enemy) 
end if  

repeat
wait(100)
until uo.InJournal('Body')
uo.WarMode(0)
 
end if 
wait(1000) 
until false 
end sub


как сделать чтоб он продолжал люмберджетить?
я команду ненаю :oops:
он у меня тупо стоит после кила
Top
   
Reply with quote  
Display posts from previous:  Sort by  
Post new topic  Reply to topic  Page 1 of 1
  [ 16 posts ] 

» » »

All times are UTC+02:00

Who is online

Users browsing this forum: No registered users and 5 guests

You cannot post new topics in this forum
You cannot reply to topics in this forum
You cannot edit your posts in this forum
You cannot delete your posts in this forum
You cannot post attachments in this forum

Search for:
Jump to:  
Powered by phpBB® Forum Software © phpBB Limited