Yoko

Posted: **2005-03-30 20:29:57**

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

Posted: **2005-03-30 20:41:51**

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

Это макрос на выключение других макросов

В хоткейс пишешь exec Terminate и сохраняешь

Posted: **2005-03-30 20:45:18**

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

Posted: **2005-03-30 21:24:24**

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

Posted: **2005-03-30 23:20:47**

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

Posted: **2005-03-31 00:55:40**

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

Code: Select all

#==============================================================
#  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

Posted: **2005-03-31 17:17:52**

Спасибо

Yoko

Как сделать что бы скрипт включался и выключался на кнопку?

Как сделать что бы скрипт включался и выключался на кнопку?