Page 1 of 1
Комбинированый пвп скрипт,помогите доработать...
Posted: 2010-09-27 11:06:27
by BOSS manCCCP
Помогите пожалуйста у меня этот скрипт работает 50 на 50,то гладко то замирает и весит в активированой таблице скриптов,а бывает вообще может Connection Lost вызвать...Что я сделал тут не так?Выручайте плс...
sub bombi1()
UO.Cast("Paralyze","laststatus")
CastWait()
UO.Exec("usetype 0x0F0D")
uo.waittargetobject('laststatus')
wait(100)
UO.Cast("Weaken","laststatus")
CastWait()
UO.Cast("Weaken","laststatus")
CastWait()
UO.Cast("Weaken","laststatus")
CastWait()
UO.Exec("usetype 0x0F0D")
uo.waittargetobject('laststatus')
wait(100)
UO.Cast("Paralyze","laststatus")
CastWait()
UO.Cast("Weaken","laststatus")
CastWait()
UO.Exec("usetype 0x0F0D")
uo.waittargetobject('laststatus')
wait(100)
UO.Cast("Weaken","laststatus")
CastWait()
UO.Cast("Weaken","laststatus")
CastWait()
UO.Cast("Weaken","laststatus")
CastWait()
UO.Exec("usetype 0x0F0D")
uo.waittargetobject('laststatus')
wait(100)
UO.Cast("Paralyze","laststatus")
CastWait()
UO.Attack('lastattack')
end sub
BOSS manCCCP
Re: Комбинированый пвп скрипт,помогите доработать...
Posted: 2010-09-27 13:43:43
by admir
Зачем дублирвать?)
Re: Комбинированый пвп скрипт,помогите доработать...
Posted: 2010-11-12 12:09:56
by BOSS manCCCP
Потому что ждешь помощь от людей -) а её нету,вот и приходится дублить везде...
Re: Комбинированый пвп скрипт,помогите доработать...
Posted: 2010-11-12 12:12:17
by BOSS manCCCP
admir wrote:Зачем дублирвать?)
ВОТ КСТАТИ довесок с WaitCast-ом
он со сбоем порядочность частенько нарушается...хочется чтобы он четкий был,нажал и все как часы сработало...
sub CastWait()
var LastMana=UO.Mana
var LastHP = uo.life
UO.DeleteJournal()
REPEAT
If LastMana > UO.Mana or LastHP > uo.life Then
return
Else
If LastMana < UO.Mana Then
LastMana = UO.Mana
End If
if LastHP < uo.life Then
LastHP = uo.life
End If
End If
Wait(5)
Until UO.InJournal("You have been poizoned!")
end sub
Sub DeleteJournal(Message)
While UO.InJournal(Message)
UO.SetJournalLine(UO.InJournal(Message)-1,' ')
Wend
end sub
Re: Комбинированый пвп скрипт,помогите доработать...
Posted: 2010-11-16 11:43:28
by GMX
BOSS manCCCP wrote:Помогите пожалуйста у меня этот скрипт работает 50 на 50,то гладко то замирает и весит в активированой таблице скриптов,а бывает вообще может Connection Lost вызвать...Что я сделал тут не так?Выручайте плс...
sub bombi1()
UO.Cast("Paralyze","laststatus")
CastWait()
UO.Exec("usetype 0x0F0D")
uo.waittargetobject('laststatus')
wait(100)
UO.Cast("Weaken","laststatus")
UO.Attack('lastattack')
end sub
BOSS manCCCP
waittargetobject ставится перед использованием каста или вещи. Этой командой ты ставишь "ловушку" на таргет, который появится в будущем. Не путать с "WaitForTarget" в клиенте или в пилоте.
uo.waittargetobject('laststatus')
UO.Exec("usetype 0x0F0D")
Так правильнее. Ну по крайней мере это первый косяк, который сразу бросается в глаза.
Re: Комбинированый пвп скрипт,помогите доработать...
Posted: 2010-11-17 07:16:07
by BOSS manCCCP
GMX wrote:BOSS manCCCP wrote:Помогите пожалуйста у меня этот скрипт работает 50 на 50,то гладко то замирает и весит в активированой таблице скриптов,а бывает вообще может Connection Lost вызвать...Что я сделал тут не так?Выручайте плс...
sub bombi1()
UO.Cast("Paralyze","laststatus")
CastWait()
UO.Exec("usetype 0x0F0D")
uo.waittargetobject('laststatus')
wait(100)
UO.Cast("Weaken","laststatus")
UO.Attack('lastattack')
end sub
BOSS manCCCP
waittargetobject ставится перед использованием каста или вещи. Этой командой ты ставишь "ловушку" на таргет, который появится в будущем. Не путать с "WaitForTarget" в клиенте или в пилоте.
uo.waittargetobject('laststatus')
UO.Exec("usetype 0x0F0D")
Так правильнее. Ну по крайней мере это первый косяк, который сразу бросается в глаза.
А как насчет uo.waittargetlast() ?
оно за раниее тоже ставится как и uo.waittargetobject('laststatus') ?
Сейчас попробую переделать так как ты сказал и будет ясно ....
Re: Комбинированый пвп скрипт,помогите доработать...
Posted: 2010-11-17 08:26:10
by BOSS manCCCP
Теперь вообще не бросает,О ДА ....ппц
Re: Комбинированый пвп скрипт,помогите доработать...
Posted: 2010-11-17 09:48:39
by GMX
Code: Select all
sub bombi1()
uo.exec('addobject opponent')
while uo.targeting()
wait(100)
wend
UO.Cast("Paralyze","opponent")
CastWait()
uo.waittargetobject('opponent')
UO.Exec("usetype 0x0F0D")
wait(100)
UO.Cast("Weaken","opponent")
CastWait()
UO.Cast("Weaken","opponent")
CastWait()
UO.Cast("Weaken","opponent")
CastWait()
uo.waittargetobject('opponent')
UO.Exec("usetype 0x0F0D")
wait(100)
UO.Cast("Paralyze","opponent")
CastWait()
UO.Cast("Weaken","opponent")
CastWait()
uo.waittargetobject('opponent')
UO.Exec("usetype 0x0F0D")
wait(100)
UO.Cast("Weaken","opponent")
CastWait()
UO.Cast("Weaken","opponent")
CastWait()
UO.Cast("Weaken","opponent")
CastWait()
uo.waittargetobject('opponent')
UO.Exec("usetype 0x0F0D")
wait(100)
UO.Cast("Paralyze","opponent")
CastWait()
UO.Attack('opponent')
end sub
Так попробуй.
Re: Комбинированый пвп скрипт,помогите доработать...
Posted: 2010-11-17 11:50:42
by Mirage
я видимо не проснулся еще с утра.
Но я не врубаюсь как работает функция sub CastWait()
. Раза 3 перечитал но тайный мысл от меня ускользает...
Зачем это я интуитивно понимаю. Тут ЕСЛИ установленное значение больше текущего то выйдем из цикла.
Code: Select all
If LastMana > UO.Mana or LastHP > uo.life Then
return
Else
Но тогда зачем это:
Code: Select all
If LastMana < UO.Mana Then
LastMana = UO.Mana
End If
почему пауза в 5 миллисекунд (даже клиент такое не обработает)
причем тут цикл до сообщения об отравлении?
Code: Select all
UO.Cast("Weaken","laststatus")
CastWait()
UO.Cast("Weaken","laststatus")
CastWait()
UO.Cast("Weaken","laststatus")
CastWait()
^_ вот в этом куске вообще будет шурум бурум...
А если опонент спрячется то по собственному чару зарядит нехреновый каст.
Хотя может быть я все таки не проснулся...
PS написанное относится к авторским версиям скрипта.
Re: Комбинированый пвп скрипт,помогите доработать...
Posted: 2010-11-17 14:01:26
by GMX
Думаю, подразумевалось что-то вроде:
Code: Select all
sub CastWait()
var timer
var LastMana=UO.Mana
var LastHP = uo.life
UO.DeleteJournal()
REPEAT
timer=uo.timer()
If LastMana > UO.Mana or LastHP > uo.life Then
return
Else
If LastMana < UO.Mana Then
LastMana = UO.Mana
End If
if LastHP < uo.life Then
LastHP = uo.life
End If
End If
Wait(10)
Until UO.InJournal("poizoned|fizzle|reach that|see the target|line of sight") or uo.timer()==timer+20 #тут добавляем все случаи, когда каст может не удасться...
end sub
Re: Комбинированый пвп скрипт,помогите доработать...
Posted: 2010-11-19 11:24:59
by BOSS manCCCP
GMX wrote:Думаю, подразумевалось что-то вроде:
Code: Select all
sub CastWait()
var timer
var LastMana=UO.Mana
var LastHP = uo.life
UO.DeleteJournal()
REPEAT
timer=uo.timer()
If LastMana > UO.Mana or LastHP > uo.life Then
return
Else
If LastMana < UO.Mana Then
LastMana = UO.Mana
End If
if LastHP < uo.life Then
LastHP = uo.life
End If
End If
Wait(10)
Until UO.InJournal("poizoned|fizzle|reach that|see the target|line of sight") or uo.timer()==timer+20 #тут добавляем все случаи, когда каст может не удасться...
end sub
Красавец!Центы тебе нету -)) такой сервис еще поискать надо!Знаешь вот я просто вставил и все работает,ты все понятно разжувал для такого нуба в инжекте как я,за что тебе огромное спасибо!Тут просто много людей которые себя считают умниками и суть проблемы не улавливают,пишут всякую заумную шнягу которая не работает по факту,а вот ты один из самый самый ровных -) Вот чтоб всем там помогали -) !!!
Re: Комбинированый пвп скрипт,помогите доработать...
Posted: 2010-11-25 07:56:44
by Donjohnes
Ребят , а что делает этот чудо скрипт ?
Re: Комбинированый пвп скрипт,помогите доработать...
Posted: 2010-11-25 08:09:40
by Mirage
указываешь оппонента и твой чар закидывает его заклинаниями. Второй кусок это проверка чтобы касты не накладывались друг на друга.
Павда не учитывается что оппонент может спрятаться, сбежать, зайти за объект... ХЗ Имхо такие скрипты фигня (не по написанию а по применению). Грамотный ПВПешник вырулит на хоткеях.
Re: Комбинированый пвп скрипт,помогите доработать...
Posted: 2011-04-09 18:23:02
by mysteryua
sub CastWait()
var timer
var LastMana=UO.Mana
UO.DeleteJournal()
REPEAT
timer=uo.timer()
If LastMana > UO.Mana Then
return
Else
If LastMana < UO.Mana Then
LastMana = UO.Mana
End If
End If
Wait(10)
Until UO.InJournal("poizoned|fizzle|reach that|see the target|line of sight") or uo.timer()==timer+20
end sub
подскажите как добавить чтоб если прошло больше чем 1300мс он завершался
Re: Комбинированый пвп скрипт,помогите доработать...
Posted: 2011-04-10 20:06:22
by Mirage
на кулькуляторе посчитать и поменять цифру
Re: Комбинированый пвп скрипт,помогите доработать...
Posted: 2011-04-15 05:20:04
by mysteryua
Ладно и на том спасибо...
знал бы куда вписывать не спрашивал бы
Re: Комбинированый пвп скрипт,помогите доработать...
Posted: 2011-04-15 06:32:09
by Mirage
А ну тогда к калькулятору еще пригодится англо-русский словарь и умение набрать слово help (что в сумме дает очень редкую комбинацию). Да, еще голову отключить а то она всякую смуту в теле наводит.
Потому что перевести строку
uo.timer()==timer+20AND
набрать в строке браузера
http://yoko.com.ua/help/ где написано это злобное слово
TIMERAND
после посчитать сколько будет дваждыдва...
это дано не каждому а лишь избранным.
А для простых смертных мудрые создатели форума придумали уроки в которых это все написано.
Re: Комбинированый пвп скрипт,помогите доработать...
Posted: 2011-04-15 23:17:18
by mysteryua
Потратил весь день на то что бы понять как работает uo.timer() кидал через стринги чтоб понять какое у него значение и как оно течет
наверное те кто пользовались скриптом ниже встречали прикол когда он просто зависает
и я понял что лажа в этом скрипте у корня) а не в антиле:)
читайте доку, слушайте експертов!
ЗЫ меньше бы спрашивал у папок меньше бы времени потратил.
Code: Select all
не исправлено
sub CastWait()
var timer
var LastMana=UO.Mana
var LastHP = uo.life
UO.DeleteJournal()
REPEAT
timer=uo.timer()
If LastMana > UO.Mana or LastHP > uo.life Then
return
Else
If LastMana < UO.Mana Then
LastMana = UO.Mana
End If
if LastHP < uo.life Then
LastHP = uo.life
End If
End If
Wait(10)
Until UO.InJournal("poizoned|fizzle|reach that|see the target|line of sight") or uo.timer()==timer+20
#тут добавляем все случаи, когда каст может не удасться...
end sub