Yoko

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

_________________
"Когда человек не знает, к какой пристани он держит путь, для него ни один ветер не будет попутным"

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

_________________
все для альфы , [url=http://newvlad.nm.ru/prog]здесь[/url]
модернизация ремонт продажа игровых консолей
Sky: admirka1 Москва

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

_________________
"Когда человек не знает, к какой пристани он держит путь, для него ни один ветер не будет попутным"

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

_________________
"Когда человек не знает, к какой пристани он держит путь, для него ни один ветер не будет попутным"

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

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

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

_________________
Все мы славные ребята, простые русские парни, железные люди с деревянными головами...

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

_________________
"Когда человек не знает, к какой пристани он держит путь, для него ни один ветер не будет попутным"

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

_________________
"Когда человек не знает, к какой пристани он держит путь, для него ни один ветер не будет попутным"

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

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

_________________
Все мы славные ребята, простые русские парни, железные люди с деревянными головами...

я видимо не проснулся еще с утра.
Но я не врубаюсь как работает функция sub CastWait() . Раза 3 перечитал но тайный мысл от меня ускользает...
Зачем это я интуитивно понимаю. Тут ЕСЛИ установленное значение больше текущего то выйдем из цикла.

If LastMana > UO.Mana or LastHP > uo.life Then
return
Else

Но тогда зачем это:

If LastMana < UO.Mana Then
LastMana = UO.Mana
End If

почему пауза в 5 миллисекунд (даже клиент такое не обработает)
причем тут цикл до сообщения об отравлении?

UO.Cast("Weaken","laststatus")
CastWait()
UO.Cast("Weaken","laststatus")
CastWait()
UO.Cast("Weaken","laststatus")
CastWait()

^_ вот в этом куске вообще будет шурум бурум...
А если опонент спрячется то по собственному чару зарядит нехреновый каст.

Хотя может быть я все таки не проснулся...

PS написанное относится к авторским версиям скрипта.

_________________

YokoInjection CodeSweeper
Ошибка "Unhandled exception in parser"
Стрелялка для олдов.

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

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

_________________
Все мы славные ребята, простые русские парни, железные люди с деревянными головами...

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

_________________
"Когда человек не знает, к какой пристани он держит путь, для него ни один ветер не будет попутным"

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

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

_________________

YokoInjection CodeSweeper
Ошибка "Unhandled exception in parser"
Стрелялка для олдов.

подскажите как добавить чтоб если прошло больше чем 1300мс он завершался

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

_________________

YokoInjection CodeSweeper
Ошибка "Unhandled exception in parser"
Стрелялка для олдов.

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

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

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

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

_________________

YokoInjection CodeSweeper
Ошибка "Unhandled exception in parser"
Стрелялка для олдов.

Потратил весь день на то что бы понять как работает uo.timer() кидал через стринги чтоб понять какое у него значение и как оно течет
наверное те кто пользовались скриптом ниже встречали прикол когда он просто зависает
и я понял что лажа в этом скрипте у корня) а не в антиле:)
читайте доку, слушайте експертов!

ЗЫ меньше бы спрашивал у папок меньше бы времени потратил.

не исправлено
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