таминг+шринк+пак(+рекол.. для высшего пилотажа)

Anything and all.

Moderators: Murderator+, Murderator

Gromiz
Posts: 444
Joined: 2005-02-08 18:39:50
Location: Moscow

Post by Gromiz »

Savage wrote:Ты меня пугаешь! У тебя было два варианта, мог бы и сам попробовать. Ну раз пробовать не хочешь то ставь туда где VAR Count.....


неа нехочет перетаскивать.....шринкует и все...таргет остается (
Savage
Expert!
Posts: 1205
Joined: 2004-04-04 11:13:54
Location: Балаково, Саратовская обл.
Contact:

Post by Savage »

Покажи скрипт, что получилось в итоге.
Gromiz
Posts: 444
Joined: 2005-02-08 18:39:50
Location: Moscow

Post by Gromiz »

Savage wrote:Покажи скрипт, что получилось в итоге.



Code: Select all

sub Taming() 
var count2='0x20F6'              ;тип лошади(+)
var shrink='0x0F09'         ; тип шринка (+)

uo.print('Тотем')
uo.exec('addobject TOT')
while uo.targeting()
wait(100)
wend
UO.DeleteJournal()
while NOT UO.Dead()
UO.DeleteJournal()
UO.WaitTargetObject('TOT')
UO.UseSkill('Animal Taming')
repeat
wait(1000)
until UO.InJournal('You fail') OR UO.InJournal('It seems')
If Uo.InJournal('It seems')  Then
wait(5000)                               ; пусть педали подбегут
UO.FindType('shrink',0x0388,'backpack')             ;  где 0x0388-цвет шринка
uo.moveitem('finditem',1,'TOT')           
uo.findtype(count2,-1,'ground')         
uo.waittargetobject('finditem')
uo.grab('all')
uo.cast('Recall','0x40164DD0') ; runa
Endif
wend
end sub
Savage
Expert!
Posts: 1205
Joined: 2004-04-04 11:13:54
Location: Балаково, Саратовская обл.
Contact:

Post by Savage »

Попробуй так:
Gromiz wrote:
Savage wrote:Покажи скрипт, что получилось в итоге.



Code: Select all

sub Taming() 
var count2='0x20F6'              ;тип лошади(+)
var shrink='0x0F09'         ; тип шринка (+)

uo.print('Тотем')
uo.exec('addobject TOT')
while uo.targeting()
wait(100)
wend
UO.DeleteJournal()
while NOT UO.Dead()
UO.DeleteJournal()
UO.WaitTargetObject('TOT')
UO.UseSkill('Animal Taming')
repeat
wait(1000)
until UO.InJournal('You fail') OR UO.InJournal('It seems')
If Uo.InJournal('It seems')  Then
wait(5000)                               ; пусть педали подбегут
UO.FindType('shrink',0x0388,'backpack')             ;  где 0x0388-цвет шринка
uo.moveitem('finditem',1,'TOT')           
UO.WaitTargetGround(count2)
wait(500)
uo.grab('all')
uo.cast('Recall','0x40164DD0') ; runa
Endif
wend
end sub
Gromiz
Posts: 444
Joined: 2005-02-08 18:39:50
Location: Moscow

Post by Gromiz »

неа не пашет....все как было -((
Savage
Expert!
Posts: 1205
Joined: 2004-04-04 11:13:54
Location: Балаково, Саратовская обл.
Contact:

Post by Savage »

наверное паузы нехватает перед waittargetground'ом поставь перед ним вайт на 500
Gromiz
Posts: 444
Joined: 2005-02-08 18:39:50
Location: Moscow

Post by Gromiz »

Savage wrote:наверное паузы нехватает перед waittargetground'ом поставь перед ним вайт на 500



неа не из-за паузы...все как было
Savage
Expert!
Posts: 1205
Joined: 2004-04-04 11:13:54
Location: Балаково, Саратовская обл.
Contact:

Post by Savage »

Ну тогда последний выстрел в голову :) Проверяй галочки.
www.jetta.ru/inj-switch.jpg

Все остальное вроде правильно, если ты токо с типом шринканутой педали не напутал.
Gromiz
Posts: 444
Joined: 2005-02-08 18:39:50
Location: Moscow

Post by Gromiz »

Savage wrote:Ну тогда последний выстрел в голову :) Проверяй галочки.
www.jetta.ru/inj-switch.jpg

Все остальное вроде правильно, если ты токо с типом шринканутой педали не напутал.


мде...да нее..все прально и тип и галки ...
..
...
...мож просто этот скрипт не пишится
Savage
Expert!
Posts: 1205
Joined: 2004-04-04 11:13:54
Location: Балаково, Саратовская обл.
Contact:

Post by Savage »

Неможет такого быть.
Начинаем ковырять руками :)
В клиенте пиши ,findtype 0x0000 -1 ground
соответственно тип педали подставь, педаль лежит на земле. Далее
,grab all finditem
Gromiz
Posts: 444
Joined: 2005-02-08 18:39:50
Location: Moscow

Post by Gromiz »

Savage wrote:Неможет такого быть.
Начинаем ковырять руками :)
В клиенте пиши ,findtype 0x0000 -1 ground
соответственно тип педали подставь, педаль лежит на земле. Далее
,grab all finditem




получилось....но пока идею не понимаю
Savage
Expert!
Posts: 1205
Joined: 2004-04-04 11:13:54
Location: Балаково, Саратовская обл.
Contact:

Post by Savage »

Gromiz wrote:
Savage wrote:Покажи скрипт, что получилось в итоге.



Code: Select all

sub Taming() 
var count2='0x20F6'              ;тип лошади(+)
var shrink='0x0F09'         ; тип шринка (+)

uo.print('Тотем')
uo.exec('addobject TOT')
while uo.targeting()
wait(100)
wend
UO.DeleteJournal()
while NOT UO.Dead()
UO.DeleteJournal()
UO.WaitTargetObject('TOT')
UO.UseSkill('Animal Taming')
repeat
wait(1000)
until UO.InJournal('You fail') OR UO.InJournal('It seems')
If Uo.InJournal('It seems')  Then
wait(5000)                               ; пусть педали подбегут
UO.FindType('shrink',0x0388,'backpack')             ;  где 0x0388-цвет шринка
uo.moveitem('finditem',1,'TOT')           
wait(500)
uo.findtype(count2,-1,'ground')         
uo.grab('all','finditem')
uo.cast('Recall','0x40164DD0') ; runa
Endif
wend
end sub
Gromiz
Posts: 444
Joined: 2005-02-08 18:39:50
Location: Moscow

Post by Gromiz »

ёёёёуу......получилось, тока не телепкается и скрипт не заканчивается... но кулл
Savage
Expert!
Posts: 1205
Joined: 2004-04-04 11:13:54
Location: Балаково, Саратовская обл.
Contact:

Post by Savage »

Может у тебя регов нету? теперь заканчивается.
Savage wrote:Покажи скрипт, что получилось в итоге.



Code: Select all

sub Taming() 
var count2='0x20F6'              ;тип лошади(+)
var shrink='0x0F09'         ; тип шринка (+)

uo.print('Тотем')
uo.exec('addobject TOT')
while uo.targeting()
wait(100)
wend
UO.DeleteJournal()
UO.WaitTargetObject('TOT')
UO.UseSkill('Animal Taming')
repeat
wait(1000)
until UO.InJournal('You fail') OR UO.InJournal('It seems')
If Uo.InJournal('It seems')  Then
wait(5000)                               ; пусть педали подбегут
UO.FindType('shrink',0x0388,'backpack')             ;  где 0x0388-цвет шринка
uo.moveitem('finditem',1,'TOT')           
wait(500)
uo.findtype(count2,-1,'ground')         
uo.grab('all','finditem')
uo.cast('Recall','0x40164DD0') ; runa
Endif
end sub
Gromiz
Posts: 444
Joined: 2005-02-08 18:39:50
Location: Moscow

Post by Gromiz »

оооо......работает все...........УРЯЯ...сенкс.. :D


это был написан самый рульный таминг -))
Savage
Expert!
Posts: 1205
Joined: 2004-04-04 11:13:54
Location: Балаково, Саратовская обл.
Contact:

Post by Savage »

В скрипте был цикл закручен он физлил каст тамингом.
SAMURAI
Posts: 203
Joined: 2004-07-10 00:38:43
Location: From DrW
Contact:

Post by SAMURAI »

Gromiz wrote:оооо......работает все...........УРЯЯ...сенкс.. :D
это был написан самый рульный таминг -))

ИХМО будет рульнее, если дописать выпивание инвизки перед началом тамки и скажем ещё 1 перед реколлом :roll: :mrgreen:
Нет ничего невозможного...
Кто ИЩЕТ, тот всегда найдёт...

Code: Select all

sub UO() 
UO.Chto-To("S Chem-To")
end sub

© I'm
Savage
Expert!
Posts: 1205
Joined: 2004-04-04 11:13:54
Location: Балаково, Саратовская обл.
Contact:

Post by Savage »

Зачем ресурсы тратить? Если чел тамит на скрипте значит там не опасно и не везде кстати в инвизе тамить можно.
Gromiz
Posts: 444
Joined: 2005-02-08 18:39:50
Location: Moscow

Post by Gromiz »

ммм....кхе...1 косяк есть-- после первой попытки тама скрипт останавливается -))
SAMURAI
Posts: 203
Joined: 2004-07-10 00:38:43
Location: From DrW
Contact:

Post by SAMURAI »

Savage wrote:Зачем ресурсы тратить? Если чел тамит на скрипте значит там не опасно и не везде кстати в инвизе тамить можно.
Я и неспорю, написал-же вроде ИХМО :shock: :mrgreen:
Нет ничего невозможного...
Кто ИЩЕТ, тот всегда найдёт...

Code: Select all

sub UO() 
UO.Chto-To("S Chem-To")
end sub

© I'm
Locked