Yoko

All sides of Injection
It is currently 2025-10-15 10:12:14

All times are UTC+02:00




Post new topic  Reply to topic  [ 8 posts ] 
Author Message
PostPosted: 2004-06-25 18:56:03 
Offline

Joined: 2004-04-23 13:50:10
Posts: 62
проблема такая немешает химию как я понял он не находит что мешять
и вот что пишет при проверке
Automenu added.Waiting for choise
0:[What sort] => [Explosion 5S]
No item found
а вот и сам скрипт
VAR Reg='0x0F8Ñ'
VAR Keg='0x1940'
VAR Potion='0x0F0D'
VAR MyBag='0x40FBDF34'
VAR RecCont='0x4002B8C0'
VAR ResCont='0x40BECD05'
VAR KegCont='0x40BECD05'


Sub Main()
VAR y
While NOT UO.Dead()
UO.Print('Find Reg')
CheckLag()
UO.FindType(Reg,'-1','my')
If UO.GetQuantity('finditem') < 50 Then
Load()
EndIf
UO.Print('Find Potion')
CheckLag()
UO.FindType(Potion,'-1','-1')
y = UO.FindCount('finditem')
UO.Print('Potion is '+str(y)+'')
If UO.FindCount('finditem') > 50 Then
Takekeg()
Fill()
EndIf
Wait(1000)
Eat()
CheckLag()
Alch()
Wend
End Sub

Sub Load()
CheckLag()
UO.UnSetReceivingContainer()
UO.FindType (Reg,'-1',ResCont)
UO.Grab('100','finditem')
Wait(1000)
End Sub

Sub Unload()
CheckLag()
UO.SetReceivingContainer(RecCont)
UO.FindType(Keg,'-1','my')
UO.Grab('0','finditem')
UO.Exec('Terminate Unload')
End Sub

Sub Eat()
UO.UseType('0x097B')
wait (100)
UO.Useskill('Spirit Speak')
wait (1000)
End Sub

sub CheckLag()
UO.DeleteJournal()
UO.Click('backpack')
Repeat
Wait(100)
Until UO.InJournal('backpack')
End Sub

Sub Alch()
UO.Exec("automenu 'What sort' 'Explosion (5 S'")
Wait(1000)
UO.DeleteJournal()
UO.UseType(Reg)
While NOT (UO.InJournal("toss the failed") or UO.InJournal("You put") or UO.InJournal("pack"))
Wait(1000)
Wend
End Sub

Sub Fill()
UO.WaitTargetType(Potion)
UO.UseType(Keg)
Wait (2000)
CheckLag()
UO.WaitTargetObject(MyBag)
UO.UseType (keg)
Wait (3000)

Unload()
End Sub

sub TakeKeg()
UO.Print('Take keg')
CheckLag()
UO.UnSetReceivingContainer()
UO.FindType(Keg,'-1',KegCont)
UO.Grab('1','finditem')
Wait (1000)
End Sub


Top
   
 Post subject:
PostPosted: 2004-06-25 18:57:01 
Offline

Joined: 2004-04-23 13:50:10
Posts: 62
ах да он запоминает что мешать и мешает что нада если я сам кликну на реги


Top
   
 Post subject:
PostPosted: 2004-06-25 19:56:12 
Offline
Expert!
User avatar

Joined: 2004-05-31 09:31:51
Posts: 838
Скрипт wrote:
ах да он запоминает что мешать и мешает что нада если я сам кликну на реги


Sub Alch()
UO.Exec("automenu 'What sort' 'Explosion (5 S'")
Wait(1000)
UO.DeleteJournal()
UO.UseType(Reg)
While NOT (UO.InJournal("toss the failed") or UO.InJournal("You put") or UO.InJournal("pack"))
Wait(1000)
Wend
End Sub

попробуй тут проверить ...я так понял что он у тя не юзает реги ........попробуй проверить Айди рега который у тя забит на REG (UO.UseType(Reg) )


Top
   
 Post subject:
PostPosted: 2004-06-25 20:10:01 
Offline

Joined: 2004-04-23 13:50:10
Posts: 62
рег вроде стоит правельно


Top
   
 Post subject:
PostPosted: 2004-06-25 20:24:57 
Offline

Joined: 2004-04-23 13:50:10
Posts: 62
странно заменил тейп на такойже самый и заработало


Top
   
 Post subject:
PostPosted: 2004-06-25 20:27:08 
Offline
Expert!

Joined: 2004-04-03 17:36:29
Posts: 2544
Location: Saint-Petersburg
Скрипт wrote:
странно заменил тейп на такойже самый и заработало


Посмотри внимательно на букву N в типе рега в твоем первом посте :)


Top
   
 Post subject:
PostPosted: 2004-06-26 12:10:36 
Offline

Joined: 2004-04-23 13:50:10
Posts: 62
поменял я руги потиуны тоесть другие уже мешатбь и выскакивает такая бойта
Script
External exception E06D7363
что это такое ? и это выскакивает када он должен мешать бутылку.. всё вроде находит


Top
   
 Post subject:
PostPosted: 2004-06-28 14:26:11 
Offline

Joined: 2004-04-23 13:50:10
Posts: 62
щас он вообще выдаёт что валатион какойто в файле инжектион.длл какието цыфры перед и после что это такое ?
это просиходит када скрипт должен мешать химию а он выдают окно выбора а выскакивает эта фигня а мешает он по вато меня и выскакивать меня выбора недолно как я понял погати пожалуйста


Top
   
Display posts from previous:  Sort by  
Post new topic  Reply to topic  [ 8 posts ] 

All times are UTC+02:00


Who is online

Users browsing this forum: No registered users and 1 guest


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