Закрытие UO в определенный момент

Anything and all.

Moderators: Murderator+, Murderator

Post Reply
KIL
Posts: 11
Joined: 2005-08-12 16:33:28
Contact:

Закрытие UO в определенный момент

Post by KIL »

Плиз помогите !! я изгалялся над скриптом(MakeTime) как мог !!! но к сожалению так и не понял как он работает !! ((( Вобщем мне надо чтобы UO в определенный момент закрывалось !!! как сделать так чтобы он определял время не говоря его !! Плизз помогите !! надо чтобы в 5:40 закрывалась ультима ! исправьте или предложите что полудше ! в скрипте закрывается в 6 с лишним и то невсегда срабатывает ((((

sub timer()
while (not uo.dead())
main()
wait(600000)
wend
endsub

sub main()
MakeTime()
Var Time
Time = MakeTime()
uo.say(Time)
wait(100)
if uo.injournal('Nick: 6') then
uo.closeuo()
endif
endsub

sub MakeTime()
VAR T, Ret, i, q
Ret = STR(UO.Time())
q = ""
For i = 0 To Len(Ret)
T = Ret[Len(Ret)-i] + q
If (I == 2) OR (I == 4) Then
T = ":" + T
EndIf
Next
RETURN T
end sub
Solaire
Posts: 163
Joined: 2005-05-21 07:12:12
Location: DRW

Post by Solaire »

Code: Select all

If UO.Time()>=174000 then
  UO.CloseUO()
endif
Askaneli
Sphere expert
Posts: 1143
Joined: 2004-10-01 08:27:38
Location: Уфа

Post by Askaneli »

Solaire wrote:

Code: Select all

If UO.Time()>=174000 then
  UO.CloseUO()
endif


Ай да умница, ай да красавица.
Чмок.
Сделал дело - флуди смело !!!
KIL
Posts: 11
Joined: 2005-08-12 16:33:28
Contact:

Post by KIL »

Solaire wrote:

Code: Select all

If UO.Time()>=174000 then
  UO.CloseUO()
endif


Хех это несовсем что мне нужно !! Ты хочеш сказать что если мне надо чтобы ультима закрывалать в 5:40 мне надо каждый раз выщитывать секунды )))) тебе самому не смешно !!!
Извини но я и сам до такого додумался !!! но это глупо !!
Нодеюсь будут идеи полудше ((((
Titanium
Posts: 73
Joined: 2004-10-20 22:46:03
Location: Moscow
Contact:

Post by Titanium »

KIL wrote:
Solaire wrote:

Code: Select all

If UO.Time()>=174000 then
  UO.CloseUO()
endif


Хех это несовсем что мне нужно !! Ты хочеш сказать что если мне надо чтобы ультима закрывалать в 5:40 мне надо каждый раз выщитывать секунды )))) тебе самому не смешно !!!
Извини но я и сам до такого додумался !!! но это глупо !!
Нодеюсь будут идеи полудше ((((


Не вижу в этом ничего глупого. По-моему гениальный по простоте скрипт который полностью соответствует задаче которую ты поставил.
Ты назвал точное время когда должна закрыться УО, этот скрипт сделает именно это. А если ты подразумевал что-то другое (например время выключения должно зависеть от чего-то еще), то будь добр уточни условия.
Да и что ты подразумевал под "каждый раз выщитывать секунды"? Если время точное, то просто указать его и ничего менять не нужно, если время от чего-то зависит, то считать его внутри скрипта...
I'm Titanium [Dragon] from Nova UO Shard
Adil
Posts: 32
Joined: 2005-08-13 05:35:29
Location: Almaty
Contact:

Post by Adil »

Он подумал что УО закроеться спустя 174000 секунд
$$$ Деньги - зло, но без денег ещё злее. $$$
Solaire
Posts: 163
Joined: 2005-05-21 07:12:12
Location: DRW

Post by Solaire »

KIL wrote:Хех это несовсем что мне нужно !! Ты хочеш сказать что если мне надо чтобы ультима закрывалать в 5:40 мне надо каждый раз выщитывать секунды )))) тебе самому не смешно !!!
Извини но я и сам до такого додумался !!! но это глупо !!
Нодеюсь будут идеи полудше ((((

174000=17ч 40 мин 00 сек. :D
KIL
Posts: 11
Joined: 2005-08-12 16:33:28
Contact:

Post by KIL »

Прошу прощения ! нетак понял спасибо !! попробую !!
Askaneli
Sphere expert
Posts: 1143
Joined: 2004-10-01 08:27:38
Location: Уфа

Post by Askaneli »

Solaire wrote:
KIL wrote:Хех это несовсем что мне нужно !! Ты хочеш сказать что если мне надо чтобы ультима закрывалать в 5:40 мне надо каждый раз выщитывать секунды )))) тебе самому не смешно !!!
Извини но я и сам до такого додумался !!! но это глупо !!
Нодеюсь будут идеи полудше ((((

174000=17ч 40 мин 00 сек. :D

Остаюсь при своём мнении :)
Сделал дело - флуди смело !!!
Solaire
Posts: 163
Joined: 2005-05-21 07:12:12
Location: DRW

Post by Solaire »

Askaneli wrote:Остаюсь при своём мнении :)

Да тебя никто и не разубеждает.)))
Askaneli
Sphere expert
Posts: 1143
Joined: 2004-10-01 08:27:38
Location: Уфа

Post by Askaneli »

Solaire wrote:
Askaneli wrote:Остаюсь при своём мнении :)

Да тебя никто и не разубеждает.)))

Приятно вести дела с такой умной и очаровательной девушкой просто.
Вот и радуюсь такой возможности.
Сделал дело - флуди смело !!!
Post Reply