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

[Krbisa]

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

[SAMURAI]

Code: Select all

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

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

[Krbisa]

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

[SAMURAI]

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

[Krbisa]

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

[Savage]

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

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

[Krbisa]

Спасибо