Скрипты

[xalat_]

Как нащёт таво штоби сюда кидать все свои скрипти если вы меня подержите буду благодарен

[666Man666]

Вот тибе хороший скрипт на самотренинг, тренируйся пока лолинг не будет ГМ )))

Code: Select all

sub lol()
var x=0
repeat
x = x+1
UO.msg("Я лоль")
until x==10
end sub

[Optical]

Code: Select all

sub lol()
var x=0
repeat
x = x+1
UO.msg("Я лоль")
until x==10
wait(1000)
end sub

вот так правельнее =))) задержку забыл поставить

[Edred]

Вот скрипт на котором у меня периодически стоит ночами чар:

Code: Select all

#####################################################################
sub NechegoDelat()
	SpSpeak()
	VAR SpiritTime = UO.Timer()
	repeat
		If ( UO.Timer() - SpiritTime ) / 600 > 5 Then
			; Прошло 5 минут с момента последней прокачки Spirit Speak
			SpSpeak()
			SpiritTime = UO.Timer()
		Else
			wait(500)
		Endif
	until UO.Dead()
endsub

; Spirit Speak v.1.00b (c) Edred
;
; Разовая прокачка спирит спика. Предназначена для вызова из других скриптов.
;
Sub SpSpeak()
	VAR mod = UO.WarMode(), num1
	VAR fizzle = 'You fail your attempt'
	VAR success = 'You establish a connection'
	UO.WarMode( 0 )
	DeleteJournal( success )
	repeat
		DeleteJournal( fizzle )
		UO.UseSkill( 'Spirit Speak' )
		num1 = 1
		repeat
			wait(100)
			num1 = num1 + 1
		until UO.InJournal( fizzle ) OR UO.InJournal( success ) OR num1 > 600
	until UO.InJournal( success )
	UO.WarMode( mod )
endsub