химия

[The Vampire]

мешает тотл ману,заливает в кег,кег ложит в сундук
дайте плз линк поиск почемуто глючит

[The Vampire]

ну очень прошу

[stickman]

хоть чутьчуть бы прошелся по форуму ради приличия... в соседнем разделе, сразу в первой теме:

Code: Select all

#******************************# 
#*********** 1.01 *************# 
#    Cooper & You Must Die     # 
#******************************# 
#******************************# 

sub Alchemy() 
var eye=' ' ; Тип Eyes of Newt 
var forpotion= 18000 ;Задержка на изготовление 
var potion=' ' ; Тип Маны 
var color=' ' ; Цвет Маны 
var sunduk=' ' ; Откуда брать, и куда складывать 
var bottle=' ' ;Тип бутылок 
var i 
      while not uo.Dead() 
          uo.DeleteJournal() 
          uo.FindType(eye,'-1','my') 
          if uo.GetQuantity('finditem') > 10 then 
              uo.FindType(bottle,'-1','my') 
              if uo.GetQuantity('finditem') > 10 then 
                  uo.WaitMenu('What sort of potion do you','Total Mana') 
                  uo.UseType(eye) 
                  wait(forpotion) 
                  CheckLag() 
                  i = 0 
                  repeat 
                      wait(100) 
                      k = k + 1 
                  until uo.InJournal('You put') OR uo.InJournal('You toss') or (k>50) 
                  if uo.InJournal('You put') then 
                      uo.DeleteJournal() 
                      uo.FindType(potion,color,'backpack') 
                      CheckLag() 
                      while uo.FindCount() 
                          uo.moveitem('finditem','10',sunduk) 
                          wait(500) 
                      wend 
                  end if 
              else 
                  uo.FindType(bottle,'-1',sunduk) 
                  uo.moveitem('finditem','100') 
                  wait(1000) 
              end if      
          else              
              uo.FindType(eye,'-1',sunduk) 
              uo.moveitem('finditem','100') 
              wait(1000) 
          end if 
      wend 
end sub 

sub CheckLag() 
UO.DeleteJournal() 
UO.Click('backpack') 
repeat 
wait(500) 
until UO.InJournal('backpack') 
end sub

[Кролик роджер]

Стикма.а есть такой же скрипт тока на пойзон???

[HellFire]

Поменяй

#******************************#
#*********** 1.01 *************#
# Cooper & You Must Die #
#******************************#
#******************************#

sub Alchemy()
var eye=' ' ; Тип Eyes of Newt тут
var forpotion= 18000 ;Задержка на изготовление
var potion=' ' ; Тип Маны тут
var color=' ' ; Цвет Маны тут
var sunduk=' ' ; Откуда брать, и куда складывать
var bottle=' ' ;Тип бутылок
var i
while not uo.Dead()
uo.DeleteJournal()
uo.FindType(eye,'-1','my')
if uo.GetQuantity('finditem') > 10 then
uo.FindType(bottle,'-1','my')
if uo.GetQuantity('finditem') > 10 then
uo.WaitMenu('What sort of potion do you','Total Mana') тут
uo.UseType(eye)
wait(forpotion)
CheckLag()
i = 0
repeat
wait(100)
k = k + 1
until uo.InJournal('You put') OR uo.InJournal('You toss') or (k>50)
if uo.InJournal('You put') then
uo.DeleteJournal()
uo.FindType(potion,color,'backpack')
CheckLag()
while uo.FindCount()
uo.moveitem('finditem','10',sunduk)
wait(500)
wend
end if
else
uo.FindType(bottle,'-1',sunduk)
uo.moveitem('finditem','100')
wait(1000)
end if
else
uo.FindType(eye,'-1',sunduk)
uo.moveitem('finditem','100')
wait(1000)
end if
wend
end sub

sub CheckLag()
UO.DeleteJournal()
UO.Click('backpack')
repeat
wait(500)
until UO.InJournal('backpack')
end sub

[moxnat]

Поменяй

#******************************#
#*********** 1.01 *************#
# Cooper & You Must Die #
#******************************#
#******************************#

sub Alchemy()
var eye=' ' ; Тип Eyes of Newt тут
var forpotion= 18000 ;Задержка на изготовление
var potion=' ' ; Тип Маны тут
var color=' ' ; Цвет Маны тут
var sunduk=' ' ; Откуда брать, и куда складывать
var bottle=' ' ;Тип бутылок
var i
while not uo.Dead()
uo.DeleteJournal()
uo.FindType(eye,'-1','my')
if uo.GetQuantity('finditem') > 10 then
uo.FindType(bottle,'-1','my')
if uo.GetQuantity('finditem') > 10 then
uo.WaitMenu('What sort of potion do you','Total Mana') тут
uo.UseType(eye)
wait(forpotion)
CheckLag()
i = 0
repeat
wait(100)
k = k + 1
until uo.InJournal('You put') OR uo.InJournal('You toss') or (k>50)
if uo.InJournal('You put') then
uo.DeleteJournal()
uo.FindType(potion,color,'backpack')
CheckLag()
while uo.FindCount()
uo.moveitem('finditem','10',sunduk)
wait(500)
wend
end if
else
uo.FindType(bottle,'-1',sunduk)
uo.moveitem('finditem','100')
wait(1000)
end if
else
uo.FindType(eye,'-1',sunduk)
uo.moveitem('finditem','100')
wait(1000)
end if
wend
end sub

sub CheckLag()
UO.DeleteJournal()
UO.Click('backpack')
repeat
wait(500)
until UO.InJournal('backpack')
end sub

Slux a kak prapisat stobi bi bral bolse odnogo tipa regov dapustim mne nada takie banki craftit ja prost ih crav4u ne dla skilla a dla prodazi v bolsom koli4estve vot dapustim regi catorie mne nuzni dla 1 banki
3 Garlic, 3 Ginseng, 3 Mandrake Roots, 1 Magic bottle

[Mental]

Кто умнее разесните пожалуйсто что в этом скрипте обозначено с буквой К ?Пожалуйсто

[kiskin]

Кто умнее разесните пожалуйсто что в этом скрипте обозначено с буквой К ?Пожалуйсто

repeat
wait(100)
k = k + 1
until uo.InJournal('You put') OR uo.InJournal('You toss') or (k>50)


Будет повторять это... и каждый раз к будет + 1 как только больше 50 скрипт пойдет читать дальше... вдруг у тебя по каким либо причинам не прошла варка и ничего не варится... тогда у тебя не будет ни физла ни бутылки.. вот в этом случае К и спасет

[Mental]

Я пускаю скрипт мне выкидывает Variable undefined - К . Как эту важную букву К дефенировать?Я пытался писать как букмц i типо
var k он выкинул: Bad operationfor this type of variable - K.
Так как с этой буквой обойтись? Я эксперементирую может что то нового научусь