Yoko
http://forum.yoko.com.ua/

Комбинированый пвп скрипт,помогите доработать...
http://forum.yoko.com.ua/viewtopic.php?f=17&t=15876
Page 1 of 1

Author:  BOSS manCCCP [ 2010-09-27 11:06:27 ]
Post subject:  Комбинированый пвп скрипт,помогите доработать...

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

Author:  admir [ 2010-09-27 13:43:43 ]
Post subject:  Re: Комбинированый пвп скрипт,помогите доработать...

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

Author:  BOSS manCCCP [ 2010-11-12 12:09:56 ]
Post subject:  Re: Комбинированый пвп скрипт,помогите доработать...

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

Author:  BOSS manCCCP [ 2010-11-12 12:12:17 ]
Post subject:  Re: Комбинированый пвп скрипт,помогите доработать...

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

Author:  GMX [ 2010-11-16 11:43:28 ]
Post subject:  Re: Комбинированый пвп скрипт,помогите доработать...

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")

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

Author:  BOSS manCCCP [ 2010-11-17 07:16:07 ]
Post subject:  Re: Комбинированый пвп скрипт,помогите доработать...

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') ?
Сейчас попробую переделать так как ты сказал и будет ясно ....

Author:  BOSS manCCCP [ 2010-11-17 08:26:10 ]
Post subject:  Re: Комбинированый пвп скрипт,помогите доработать...

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

Author:  GMX [ 2010-11-17 09:48:39 ]
Post subject:  Re: Комбинированый пвп скрипт,помогите доработать...

Code:
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


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

Author:  Mirage [ 2010-11-17 11:50:42 ]
Post subject:  Re: Комбинированый пвп скрипт,помогите доработать...

я видимо не проснулся еще с утра.
Но я не врубаюсь как работает функция sub CastWait() :? . Раза 3 перечитал но тайный мысл от меня ускользает...
Зачем это я интуитивно понимаю. Тут ЕСЛИ установленное значение больше текущего то выйдем из цикла.
Code:
If LastMana > UO.Mana or LastHP > uo.life Then
return
Else

Но тогда зачем это:
Code:
If LastMana < UO.Mana Then
LastMana = UO.Mana
End If

почему пауза в 5 миллисекунд (даже клиент такое не обработает)
причем тут цикл до сообщения об отравлении?
Code:
UO.Cast("Weaken","laststatus")
CastWait()
UO.Cast("Weaken","laststatus")
CastWait()
UO.Cast("Weaken","laststatus")
CastWait()

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

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

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

Author:  GMX [ 2010-11-17 14:01:26 ]
Post subject:  Re: Комбинированый пвп скрипт,помогите доработать...

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

Code:
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

Author:  BOSS manCCCP [ 2010-11-19 11:24:59 ]
Post subject:  Re: Комбинированый пвп скрипт,помогите доработать...

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

Code:
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



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

Author:  Donjohnes [ 2010-11-25 07:56:44 ]
Post subject:  Re: Комбинированый пвп скрипт,помогите доработать...

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

Author:  Mirage [ 2010-11-25 08:09:40 ]
Post subject:  Re: Комбинированый пвп скрипт,помогите доработать...

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

Author:  mysteryua [ 2011-04-09 18:23:02 ]
Post subject:  Re: Комбинированый пвп скрипт,помогите доработать...

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

Author:  Mirage [ 2011-04-10 20:06:22 ]
Post subject:  Re: Комбинированый пвп скрипт,помогите доработать...

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

Author:  mysteryua [ 2011-04-15 05:20:04 ]
Post subject:  Re: Комбинированый пвп скрипт,помогите доработать...

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

Author:  Mirage [ 2011-04-15 06:32:09 ]
Post subject:  Re: Комбинированый пвп скрипт,помогите доработать...

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

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

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

Author:  mysteryua [ 2011-04-15 23:17:18 ]
Post subject:  Re: Комбинированый пвп скрипт,помогите доработать...

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

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

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

Page 1 of 1 All times are UTC+02:00
Powered by phpBB® Forum Software © phpBB Limited
https://www.phpbb.com/