Вот так работает))) хочу проверку)))
sub carpentry()
Repeat
UO.DeleteJournal()
UO.UseType('rubanok')
Wait(100)
UO.LDblClick(112,64)
Wait(12000)
until uo.dead()|| uo.injournal('ñòðîêà êîãäà êîí÷èëü ...
Search found 7 matches
- 2004-05-20 23:19:29
- Forum: Scripting Ore
- Topic: Что тут не правильно??
- Replies: 9
- Views: 3746
- 2004-05-20 21:23:22
- Forum: Scripting Ore
- Topic: Что тут не правильно??
- Replies: 9
- Views: 3746
z dhjlt ljuyfk? rjhjxt rjulf dscrfrbdftn jrjirj nj nfv gjl eljxrjq ytn yflgbcb ybrfrjq((( b jyf gjzdkztncz njkmrj gjckt njuj rfr rehcjh yfdtlti yf ytt(((...круто)))..........я догнал....в окошке нет подписи под удочкой((( подпись появляется после того как наводиш курсор на удочку((( щас попробуем ...
- 2004-05-20 21:15:35
- Forum: Scripting Ore
- Topic: Что тут не правильно??
- Replies: 9
- Views: 3746
- 2004-05-20 21:09:20
- Forum: Scripting Ore
- Topic: Что тут не правильно??
- Replies: 9
- Views: 3746
- 2004-05-20 21:00:21
- Forum: Scripting Ore
- Topic: Что тут не правильно??
- Replies: 9
- Views: 3746
- 2004-05-20 20:59:05
- Forum: Scripting Ore
- Topic: Что тут не правильно??
- Replies: 9
- Views: 3746
- 2004-05-20 20:41:19
- Forum: Scripting Ore
- Topic: Что тут не правильно??
- Replies: 9
- Views: 3746
Что тут не правильно??
sub carpentry()
Repeat
UO.DeleteJournal()
UO.WaitMenu ( 'Weapons & Tools', 'fishing' )
UO.UseType('rubanok')
While NOT UO.InJournal('You put','you fail')
Wait(500)
Wend
endsub
по идее должен делать удочки и отслеживать журнал и делать следующую..........нифига не арбайтн(((
Repeat
UO.DeleteJournal()
UO.WaitMenu ( 'Weapons & Tools', 'fishing' )
UO.UseType('rubanok')
While NOT UO.InJournal('You put','you fail')
Wait(500)
Wend
endsub
по идее должен делать удочки и отслеживать журнал и делать следующую..........нифига не арбайтн(((