Помогите плиз...скрипт перестает работать((

Anything and all.

Moderators: Murderator+, Murderator

Post Reply
AvantriX
Posts: 35
Joined: 2004-04-25 23:23:27

Помогите плиз...скрипт перестает работать((

Post by AvantriX »

Code: Select all

sub alchemy1() 
# BETEPa„? #
VAR Exit=0, LastTimer
uo.print('Ñóíäóê ñ ðåãàìè è áóòûëêàìè')
uo.exec('addobject Bag')
while uo.targeting()
wait(100)
wend
uo.print('Ñóíäóê êóäà áóòûëêè áðîñàòü')
uo.exec('addobject Bag2')
while uo.targeting()
wait(100)
wend
while Exit<>1
UO.DeleteJournal()

UO.FindType('0x0F07','0x0000','backpack') ;òî ÷òî èçãîòîâèëè
If UO.GetQuantity('finditem')>0 Then
UO.SetReceivingContainer('Bag2')
wait(1000)
UO.Grab('all','finditem')
wait(1000)
UO.UnSetReceivingContainer()
Endif


UO.FindType('0x0F84','0x0000','backpack') ; NS
   If UO.GetQuantity('finditem')<20 then
      UO.FindType('0x0F84','0x0000','0x4000E0BC'); NS, container
      wait(1000)
      uo.useobject('0x4000e0bc')
      wait(200)
      UO.Grab('300','finditem')
      wait(500)
      end if
LastTimer=UO.Timer()
UO.WaitMenu('What','Cure') ; menu
UO.UseType(0x0F84) ; Ginseng

UO.FindType('0x0F0E',-1,'backpack')
If UO.GetQuantity('finditem')<10 then
UO.FindType('0x0F0E','0x0000','Bag')
wait(1000)
UO.Grab('100','finditem')
wait(500)
Endif


while NOT UO.InJournal("You put") AND NOT UO.InJournal("You toss the failed")
wait(500)
wend

If UO.InJournal("You toss the failed") then
repeat
wait(100)
until UO.Timer()>=LastTimer+100
Else
EndIf
wend
end sub

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


незнаю из-за чего, а в закладке скрипт он есть , тоесть по сути он работает но в уо никакх действие не выполняет....
помогите пожалуста...заранее признателен
BETEPAH
Expert!
Posts: 838
Joined: 2004-05-31 09:31:51
Contact:

Post by BETEPAH »

Что точно не работает ?
Все просто.
BETEPAH ™
Sfagnum
Expert!
Posts: 1284
Joined: 2004-07-04 00:14:58
Contact:

Post by Sfagnum »

2 BETEPAH
как тебе не стыдно????
кто будет настройки в начало выносить???
кто будет полукилометровое описалово рисовать???
:D :D :D
BETEPAH
Expert!
Posts: 838
Joined: 2004-05-31 09:31:51
Contact:

Post by BETEPAH »

Sfagnum wrote:2 BETEPAH
как тебе не стыдно????
кто будет настройки в начало выносить???
кто будет полукилометровое описалово рисовать???
:D :D :D


Я этот скрипт написал когда инжу тока 2 недели в глаза видел ))
И темболее там какая то белебирда ..много не моего )
Все просто.
BETEPAH ™
Post Reply