помогите модернезировать скрипт

Anything and all.

Moderators: Murderator+, Murderator

Post Reply
Profile
Posts: 10
Joined: 2005-04-18 22:39:27

помогите модернезировать скрипт

Post by Profile »

sub Target()
UO.Exec('addobject Target') # добавляется таргет в обжекты
end sub

Хочется вызвать таргет в ручную кликнуть по целе, а после этого чтобы он добавился в обжекты и скастовалась магия стрелки в него.
Незнаю может проще сделать чтобы сначало кастовалась стрелка в цель а потом из ласттаргета ставилась в обжекты... незнаю как реализовать =(. Хочется с однйо кнопки иметь каст на чель и добавление в таргеты. Зарание спасибо
flake
Expert!
Posts: 746
Joined: 2004-08-11 23:56:17
Location: The Citadel
Contact:

Post by flake »

Code: Select all

sub Arrow()
UO.Exec('addobject Enemy')
While UO.Targeting()
Wait(500)
Wend
UO.Cast("Magic Arrow", 'Enemy')
end sub
Profile
Posts: 10
Joined: 2005-04-18 22:39:27

Post by Profile »

спасиб :D
Profile
Posts: 10
Joined: 2005-04-18 22:39:27

Post by Profile »

а вот у меня еще вопрос =)
я ударяю оружием с пойзоном(описан в общектах) вижу фраз В журнале "You see: *You see (имя атакуемого) poisoning*" после этого персонаж берет голд веп(описаный в обжектах) и паралейно запускается секундный отщет слево в экране до 3х (3 2 1)
Очень буду признателен..
flake
Expert!
Posts: 746
Joined: 2004-08-11 23:56:17
Location: The Citadel
Contact:

Post by flake »

Code: Select all

sub check_poison()
 repeat
  If UO.InJournal('You see (имя атакуемого) poisoning') Then
    UO.UseObject('Gold_Weapon')
    UO.Print('3')
    wait(1000)
    UO.Print('2')
    wait(1000)
    UO.Print('1')
  Else
    wait(500)
  EndIf
 until UO.Dead()
end sub
Profile
Posts: 10
Joined: 2005-04-18 22:39:27

Post by Profile »

sub poison()
uo.DeleteJournal()
UO.UseObject('poison_w')
repeat
If UO.InJournal('*You see ') Then
UO.UseObject('Gold_w')
wait(6000)
EndIf
UO.Print('3')
wait(1000)
UO.Print('2')
wait(1000)
UO.Print('1')
EndIf
end sub
ммм малость нетак как задумано... вот отталкиваясь от этого шаблона хотелос бы чтобы голд веп небрался и отщет не начинался до тог окак фраза в журнале непоявится... незнаю как так изменить (


а еще уж для кучи хотелось бы макрос немного изменить еще один.
sub Wall() #каст стенки на ласттаргет
uo.waittargetobject("Last")
UO.Exec("usetype scr_Wall")
end sub
чтобы скрол кастовался не в обжект(чар) а под него... на землю...

опять же благадарю =)
flake
Expert!
Posts: 746
Joined: 2004-08-11 23:56:17
Location: The Citadel
Contact:

Post by flake »

Что-то ты насчет поизона совсем запутал. Не могу разобрать, что ты там хочешь сделать и как.

А на стенку есть вот такой набросок:
Тести, я не проверял его.

Code: Select all

sub stone() 
UO.Set('lasttarget','laststatus')
uo.waittargettile("400",str(uo.getx("Last")),str(uo.gety("Last")),str(uo.getz("lasttarget")))
UO.Exec("usetype scr_Wall")
end sub
Post Reply