Yoko

Сабж, помогите незнаю как сделаьт так...

####################### 
sub Terminate()
uo.exec ("Terminate all")
end sub
#######################

Это макрос на выключение других макросов
В хоткейс пишешь exec Terminate и сохраняешь

_________________
Нет ничего невозможного...
Кто ИЩЕТ, тот всегда найдёт...

sub UO() 
UO.Chto-To("S Chem-To") 
end sub

© I'm

хе, не плохо, тока как ещё сделать что бы я щёлкал на кнопку скрипт пускался, а при повторном нажатии выключался

exec xxx - где xxx название функции sub. Это в хоткейс и всё. И того у тебя будет 2 кнопки.

_________________
Нет ничего невозможного...

Кто ИЩЕТ, тот всегда найдёт...

sub UO() 
UO.Chto-To("S Chem-To") 
end sub

© I'm

что то я не допонял стукни в аську или стовою оставь ася:4721848

Первый макро - свитч, второй исполняет.

#==============================================================
#  Arrowm() - cast magic arrow on lastattack
#--------------------------------------------------------------

sub OnArrow()
; Assign on Num F1 in hotkeys
   If UO.GetGlobal('OnArrow')=='Off' Then
      UO.Exec("exec arrowm")
      UO.SetGlobal('OnArrow','On')
   Else
      UO.SetGlobal('OnArrow','Off')
      UO.Exec("terminate arrowm")
   Endif
end sub


sub Arrowm()
   VAR Exit=0
   UO.Set('lasttarget','lastattack')
   While Exit<>1
      If UO.Mana<4 Then
         UO.Usetype('0x0F0E','0x09DF')
      Endif
      UO.Cast('Magic Arrow','lastattack')
      wait(1200)
uo.Print(STR(UO.IsNpc('lastattack')))
      If UO.IsNpc('lastattack')==0 Then
         Exit=1
      Endif
   Wend
   UO.SetGlobal('OnArrow','Off')
end sub

Спасибо