Комбинированый пвп скрипт,помогите доработать...

[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

[admir]

Зачем дублирвать?)

[BOSS manCCCP]

Потому что ждешь помощь от людей -) а её нету,вот и приходится дублить везде...

[BOSS manCCCP]

Зачем дублирвать?)

ВОТ КСТАТИ довесок с 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

[GMX]

Помогите пожалуйста у меня этот скрипт работает 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")

Так правильнее. Ну по крайней мере это первый косяк, который сразу бросается в глаза.

[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")
UO.Attack('lastattack')
end sub

BOSS manCCCP

waittargetobject ставится перед использованием каста или вещи. Этой командой ты ставишь "ловушку" на таргет, который появится в будущем. Не путать с "WaitForTarget" в клиенте или в пилоте.

uo.waittargetobject('laststatus')
UO.Exec("usetype 0x0F0D")

Так правильнее. Ну по крайней мере это первый косяк, который сразу бросается в глаза.

А как насчет uo.waittargetlast() ?
оно за раниее тоже ставится как и uo.waittargetobject('laststatus') ?
Сейчас попробую переделать так как ты сказал и будет ясно ....

[BOSS manCCCP]

Теперь вообще не бросает,О ДА ....ппц

[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

Так попробуй.

[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 написанное относится к авторским версиям скрипта.

[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

[BOSS manCCCP]

Думаю, подразумевалось что-то вроде:

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

Красавец!Центы тебе нету -)) такой сервис еще поискать надо!Знаешь вот я просто вставил и все работает,ты все понятно разжувал для такого нуба в инжекте как я,за что тебе огромное спасибо!Тут просто много людей которые себя считают умниками и суть проблемы не улавливают,пишут всякую заумную шнягу которая не работает по факту,а вот ты один из самый самый ровных -) Вот чтоб всем там помогали -) !!!

[Donjohnes]

Ребят , а что делает этот чудо скрипт ?

[Mirage]

указываешь оппонента и твой чар закидывает его заклинаниями. Второй кусок это проверка чтобы касты не накладывались друг на друга.
Павда не учитывается что оппонент может спрятаться, сбежать, зайти за объект... ХЗ Имхо такие скрипты фигня (не по написанию а по применению). Грамотный ПВПешник вырулит на хоткеях.

[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мс он завершался

[Mirage]

на кулькуляторе посчитать и поменять цифру

[mysteryua]

Ладно и на том спасибо...
знал бы куда вписывать не спрашивал бы

[Mirage]

А ну тогда к калькулятору еще пригодится англо-русский словарь и умение набрать слово help (что в сумме дает очень редкую комбинацию). Да, еще голову отключить а то она всякую смуту в теле наводит.
Потому что перевести строку uo.timer()==timer+20
AND
набрать в строке браузера
http://yoko.com.ua/help/ где написано это злобное слово TIMER
AND
после посчитать сколько будет дваждыдва...

это дано не каждому а лишь избранным.

А для простых смертных мудрые создатели форума придумали уроки в которых это все написано.

[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