Если можете помогите

Anything and all.

Moderators: Murderator+, Murderator

Post Reply
No***Name
Posts: 90
Joined: 2006-02-26 22:41:09

Если можете помогите

Post by No***Name »

Здрасте! Мужики дайте плиз вот такой скрипт: чтоб когда теа заатачили , твой чар кидал вар на атакуюшего

з.ы если возможно :roll:
Scripts Writer
Posts: 2259
Joined: 2005-04-19 18:00:29
Location: Московская область
Contact:

Post by Scripts Writer »

Code: Select all

sub Auto_Attack()
var opponent
  while not uo.Dead()
    if uo.InJournal('is attacking you') then
      opponent=uo.JournalSerial(uo.InJournal('attacking you')-1)
      uo.Attack('opponent')
    else
      wait(1000)
    end if
    uo.DeleteJournal()
  wend
end sub


Не проверял скрипт. Что касается очистки журнала- в зависимости от применения скрипта ставь либо вначале, либо в конце. (вначале если тебя еще не атаковали и ты бегаешь или стоишь на скрипте. вконце если тебя в куче пвп ктото задел -чтобы взять его ид сразу же по журналу а не удалить.)

Также если стоишь на ночном скрипте то цикл пусть остаётся. Если же единичный случай в ПвП или еще где-цикл убери.
DerMeister =)
Expert!
Posts: 1032
Joined: 2006-02-25 21:48:38

Post by DerMeister =) »

You Must Die wrote:

Code: Select all

sub Auto_Attack()
var opponent
  while not uo.Dead()
    if uo.InJournal('is attacking you') then
      opponent=uo.JournalSerial(uo.InJournal('attacking you')-1)
      uo.Attack('opponent')
    else
      wait(1000)
    end if
    uo.DeleteJournal()
  wend
end sub


Не проверял скрипт. Что касается очистки журнала- в зависимости от применения скрипта ставь либо вначале, либо в конце. (вначале если тебя еще не атаковали и ты бегаешь или стоишь на скрипте. вконце если тебя в куче пвп ктото задел -чтобы взять его ид сразу же по журналу а не удалить.)

Также если стоишь на ночном скрипте то цикл пусть остаётся. Если же единичный случай в ПвП или еще где-цикл убери.


Хммм, а вдруг у него серийник у is attacking you == self ??
ЗЫ: Такое на ZHI, например ;)
DerMeister сейчас на нейрале!
Scripts Writer
Posts: 2259
Joined: 2005-04-19 18:00:29
Location: Московская область
Contact:

Post by Scripts Writer »

Ну согласись что мининг один, а шахт много. =) Подправит под себя.
No***Name
Posts: 90
Joined: 2006-02-26 22:41:09

Post by No***Name »

:cry: не работает
Scripts Writer
Posts: 2259
Joined: 2005-04-19 18:00:29
Location: Московская область
Contact:

Post by Scripts Writer »

Собственно и не должен .
Ищи ошибку.
GimFlex
Expert!
Posts: 766
Joined: 2005-01-07 13:22:19
Contact:

Post by GimFlex »

Code: Select all

sub Auto_Attack() 
var opponent
  while not uo.Dead()
    if uo.InJournal('is attacking you') then
      opponent=uo.JournalSerial(uo.InJournal('attacking you')-1)
      uo.Attack(opponent)
    else
      wait(1000)
    end if
    uo.DeleteJournal()
  wend
end sub
Post Reply