С Новым 2010 Годом!!!

[TheBloodTear]

Уважаемые пользователи и гости этого чудесного портала, я думаю вряд ли будет возможность поздравить всех позже, поэтому:

Желаю всем хорошо встретить Новый Год и еще лучше его провести! ;)..
Чтобы в Новом Году было гораздо больше приятных открытий, новшеств и моментов(в AutoIt'е тоже ).. Ну и конечно же всем "Счастья, Здоровья и Любви" - а остальное приложится ;)..

 

[Rjevsky]

Re: С Новым Годом!!!

Присоеденюсь! Отдельное пожелание модераторам: не мучайте своими предупреждениями, хотя бы в этот период! Станьте чутоточку добрее! :beer:

 

[Medic84]

Re: С Новым Годом!!!

Поздравляю всех с НОВЫМ ГОДОМ! Отдельное пожелание пользователям: не делайте ошибки, следуйте правилам - тогда гнев админов и модераторов вас обойдет стороной :D

 

[Nik_rus]

Re: С Новым Годом!!!

Happy New Year!!! :D

 

[Rjevsky]

Re: С Новым Годом!!!

Поздравляю всех с НОВЫМ ГОДОМ! Отдельное пожелание пользователям: не делайте ошибки, следуйте правилам - тогда гнев админов и модераторов вас обойдет стороной :D

шутку оценил :laugh:

 

[madmasles]

Re: С Новым Годом!!!

Поздравляю всех с наступающим Новым годом!

Желаю всем изящных скриптов и поменьше ошибок!

 

[Belfigor]

Re: С Новым Годом!!!

Присоединяюсь, удачно пережить эту ночь

 

[SyDr]

Re: С Новым Годом!!!

С наступающим! :laugh:

 

[Nik_rus]

Re: С Новым Годом!!!

Немножечко кодинго-оффтопа
Через сколько там Новый Год?

if @MON = 12 AND @MDAY = 31 Then
	$h = 23 - @HOUR
	$m = 60 - @MIN
	if $m = 60 Then
		$m = 0
		$h = $h + 1
	EndIf
	MsgBox(0,"Новый год","Новый год через " & $h & " часа " & $m & " минут!")
EndIf

 

[CreatoR]

Re: С Новым Годом!!!

Nik_rus [?]

Через сколько там Новый Год?

#include <GUIConstantsEx.au3>
#include <Date.au3>

$hGUI = GUICreate("Happy New Year!", 300, 120)

GUICtrlCreateLabel("До нового года осталось: ", 40, 40, 260)
GUICtrlSetFont(-1, 14)

$nLabel = GUICtrlCreateLabel("", 120, 70, 260, 25)
GUICtrlSetFont(-1, 11, 800)
GUICtrlSetColor(-1, 0x0000FF)

_CheckNewYear_Proc()
AdlibEnable("_CheckNewYear_Proc", 1000)

GUISetState(@SW_SHOW, $hGUI)

While 1
	Switch GUIGetMsg()
		Case $GUI_EVENT_CLOSE
			Exit
	EndSwitch
WEnd

Func _CheckNewYear_Proc()
	Local $sDateDiff = _DateDiff("s", _NowCalc(), "2010/01/01 00:00:00")
	Local $iHours, $iMins, $iSecs
	
	_TicksToTime($sDateDiff * 1000, $iHours, $iMins, $iSecs)
	
	GUICtrlSetData($nLabel, StringFormat("%02i:%02i:%02i", $iHours, $iMins, $iSecs))
	
	If ($iHours + $iMins + $iSecs) = 0 Then
		MsgBox(64, 'Happy New Year!', 'С новым годом!', 0, $hGUI)
		Exit
	EndIf
EndFunc

Добавлено:

Сообщение автоматически объединено: 1 Янв 2010

С наступающим, хотя у нас уже наступил :beer:

 

[Guezt]

Re: С Новым Годом!!!

Всех, С Новым Годом!!! :beer:

 

[Бумбликус]

Re: С Новым Годом!!!

всех с наступившим :D