вторник, 25 марта 2008
00:48

Тотальная неудачница и убийца жёстких дисков.
#post-id: 2798-21-10
#original-date: 24.03.2008 Mon
#original-time: 9:10 PM
#original-day:  2798
#original-host: WinXP Prof SP2 (Build 2600)

Поставила свитч ^^ Господи, сколько проблем с этими проводами, особенно когда стол маленький, и всё приходится выгибать бантиком... Мало того что кабели неохотно принимают нужную форму, так ещё коннекторы... Вот сколько имею с ними дело, всё время раздражает меня то, что на всех сетевых интерфейсах гнёзда защёлкой вверх, а кабель обязательно выгнется так, что защёлка будет внизу >_<

Мда... Только модем поверх свитча смотрится не по-фэншую, а езё из-за проводов места для мусорной корзинки не осталось...

Зато меня сегодня дважды блондинкой обозвали. При чём один раз в любимой редакции, при чём индиректом. Главбух сказала, что новый главвред сокрушалась, что Линда хуже "знает компьютер". Полагаю, она имела в виду PageMaker, но всё равно обидно. А второй разменя обозвали блондинкой по причине того что я не разбираюсьв танках и не знаю как называется та фигня, которая задняя часть башни. Уж не знаю, плакать или улыбаться по этому поводу. Я девочка, мне в танках как бы не положено разбираться ^^'

#music: Need For Speed III: Hot Pursuit\EMPRROCK

URL
00:48

Тотальная неудачница и убийца жёстких дисков.
#post-id: 2798-20-40
#original-date: 24.03.2008 Mon
#original-time: 8:40 PM
#original-day:  2798
#original-host: WinXP Prof SP2 (Build 2600)

- Когда вырасту, я стану пиратом. Если мама с папой разрешат. А если не разрешат, то, наверное, капитаном.

#music: Need For Speed III: Hot Pursuit\ALPIROCK

URL
00:48

Тотальная неудачница и убийца жёстких дисков.
#post-id: 2798-19-49
#original-date: 24.03.2008 Mon
#original-time: 7:49 PM
#original-day:  2798
#original-host: WinXP Prof SP2 (Build 2600)

Цитата #395741
... но особенно меня порадовал довольно запутанный исходник, который, по-видимому, выложивший человек не смог перевести. В результате он просто приписал "код содержит интуитивно помятные комментарии на шведском языке". Это мне напомнило скрипты для игры earth 2150, авторы которой написали "если возникнут вопросы - смотрите образец. Если вам непонятны комментарии - учите польский".

Это в каком-то CHM справочнике по Delphi было.

Цитата #395739
Warlock9000: Сегодня на "религиях мира" чето у них не срослось с лекторами и пару вести взялась какая то бабушка из деканата..я многое слышал, но следующая фраза отправила меня под стол до конца лекции. дословно,поскольку я записал:

"Генетик,который нарушил нравственные запреты,не успеет выполнить свой зловещий план-он будет безжалостно уничтожен Вакуумным Супермозгом"

ппц..вот что значит учится на факультете информатики...


Цитата #395744
Читал статьи Честертона.. заклинило на фразе "На востоке профессиональный сказитель ходит из селения в селение с ковриком под мышкой."


Цитата #395742
Zmey
блин я бы хотел глянуть один фильм в жизни)))

Zmey
чтобы индия пересняла фреди крюгира)


Цитата #395740
Demixoid: Тут, кстати, друг хохму рассказал:).

Demixoid: Есть у него камрад-тинейджер, который очень любил смотреть порно на папкином компе.

Demixoid: А папка у него был сисадмин и всякие левые *.dll размером под гигабайт палил нещадно и пацан регулярно огребал по ушам:).

Ricoshet: Похвальное занятие)

Ricoshet: ))

Demixoid: Собственно, до чего дошло сисадминское чадо...

Demixoid: Он отрубил в настройках своп, положил свои "веселые картинки" в C:\ и переименовал в pagefile.sys:).

Ricoshet: Безпалевный своп)

Ricoshet: Точнее баспалевный сис)

Demixoid: Отче его только через месяц попалил, когда полез проверять "а чего у меня так памяти не хватает?".

Demixoid: Говорят, к сыну даже санкций не было применено. За смекалку:).


Цитата #395739
Warlock9000: Сегодня на "религиях мира" чето у них не срослось с лекторами и пару вести взялась какая то бабушка из деканата..я многое слышал, но следующая фраза отправила меня под стол до конца лекции. дословно,поскольку я записал:

"Генетик,который нарушил нравственные запреты,не успеет выполнить свой зловещий план-он будет безжалостно уничтожен Вакуумным Супермозгом"

ппц..вот что значит учится на факультете информатики...


Цитата #395735
-узнал почему вращается кулер
-и что там?
-магия х*ле,к маленьким гоблинам подключены провода,когда по ним проходит ток, они начинают вращать адскую машину,если кто-то из гоблинов отлынивает его бьет током еще сильней, за всем наблюдает злая ведьма из белоснежки


Цитата #395730
Только в нашей стране делают ямы на дорогах по ГОСТу =)))

"Согласно ГОСТ 50597-93, размеры ям не должны превышать 15 см по длине, 80 см по ширине и 5 см по глубине"


Цитата #395728
<GooDer> Новый фильм "Стритрейсеры" от режиссера, посмотревшего "Форсаж" и "Форсаж 2"


Цитата #395726
Лазила на сайте Агаты кристи увидела это)

"Мы с другом лет с 14 качались в спорт зале под вашу музыку.
Теперь, он сошёл с ума, а я мастер спорта.
Вы великая группа. "


Цитата #395724
Седня в ванной сидел, учился играть на губной гармошке.Бацал в основном мелодию из титаника(тока её и умею пока), и вроде охуенно всё получалось...пришол в себя от стука в стенку и истошного крика: КОГДА Ж ТЫ, СУКА, ПОТОНЕШЬ!??!?!

URL
понедельник, 24 марта 2008
05:31

Тотальная неудачница и убийца жёстких дисков.
#post-id: 2797-18-22
#original-date: 23.03.2008 Sun
#original-time: 6:22 PM
#original-day:  2797
#original-host: WinXP Prof SP2 (Build 2600)

Оказалось, что в VB6 контейнер для контрола можно динамически менять. Например, у нас есть фрэйм и несколько дочерних элементов в нём. Допустим, нам нужно сделать десять таких. Если в цикле вызывать для каждого элемента Load, то новые элементы будут в том же контейнере, что и самый первый элемент. Поэтому все фрэймы кроме того что был уже загружен, когда стартовала программа, будут пустыми.

Но! Оказалось, что скойство Container, которое возвращает контейнер для элемента, не Read-only! Таким образом если для каждого элемента после загрузки установить контейнером новозагруженный фрейм, то всё будет очень красиво.

Вот некий код, который иллюстирует то что я сказала:

Private Sub LoadTabs()
  Dim TMP As Long
  
  ' Уже загружено...
  Tabs.AddTab Me.pnlDesktopSettings(0)
  
  For TMP = 1 To MAX_DESKTOP
    Load Me.pnlDesktopSettings(TMP)
    Load Me.lblTag(TMP)
    Load Me.lblTag2(TMP)
    Load Me.cboHotKey(TMP)
    Load Me.chkModAlt(TMP)
    Load Me.chkModCtrl(TMP)
    Load Me.chkModShift(TMP)
    Load Me.chkModWin(TMP)
    Load Me.txtShellFileName(TMP)
    Load Me.cmdBrowse(TMP)
    
    Me.pnlDesktopSettings(TMP).Visible = True
    Me.lblTag(TMP).Visible = True
    Me.lblTag2(TMP).Visible = True
    Me.cboHotKey(TMP).Visible = True
    Me.chkModAlt(TMP).Visible = True
    Me.chkModCtrl(TMP).Visible = True
    Me.chkModShift(TMP).Visible = True
    Me.chkModWin(TMP).Visible = True
    Me.txtShellFileName(TMP).Visible = True
    Me.cmdBrowse(TMP).Visible = True
    
    Set Me.lblTag(TMP).Container = Me.pnlDesktopSettings(TMP)
    Set Me.lblTag2(TMP).Container = Me.pnlDesktopSettings(TMP)
    Set Me.cboHotKey(TMP).Container = Me.pnlDesktopSettings(TMP)
    Set Me.chkModAlt(TMP).Container = Me.pnlDesktopSettings(TMP)
    Set Me.chkModCtrl(TMP).Container = Me.pnlDesktopSettings(TMP)
    Set Me.chkModShift(TMP).Container = Me.pnlDesktopSettings(TMP)
    Set Me.chkModWin(TMP).Container = Me.pnlDesktopSettings(TMP)
    Set Me.txtShellFileName(TMP).Container = Me.pnlDesktopSettings(TMP)
    Set Me.cmdBrowse(TMP).Container = Me.pnlDesktopSettings(TMP)
    
    Tabs.AddTab Me.pnlDesktopSettings(TMP)
  Next TMP
  
  ' Десктоп по умолчанию...
  Me.txtShellFileName(0).Text = "*"
  Me.txtShellFileName(0).Enabled = False
  Me.cmdBrowse(0).Enabled = False
  
  For TMP = 0 To MAX_DESKTOP
    Me.lblTag(TMP).Font.Bold = True
    Me.lblTag2(TMP).Font.Bold = True
  Next TMP
  
  Tabs.ArrangeTabs True
  Tabs.PopTab 1, True, True
End Sub



#music: Yuki Kajiura\Fiction\zodiacal sign

URL
05:29

Тотальная неудачница и убийца жёстких дисков.
#post-id: 2798-03-03
#original-date: 24.03.2008 Mon
#original-time: 3:03 AM
#original-day:  2798
#original-host: WinXP Prof SP2 (Build 2600)

Странно... Есть форма, на которой PictureBox и таймер. Таймер с интервалос 250 милисекунд. На PictureBox картинка 1024x768. А таймер выполняет такой код:

Private Sub tmrUpdate_Timer()
  Dim hDC As API_HANDLE
  
  hDC = GetDC(GetDesktopWindow())
  If hDC = 0 Then
    MsgBox "GetDC() == 0", vbCritical
  Else
    BitBlt hDC, 0, 0, 1024, 768, Me.Picture1.hDC, 0, 0, SRCCOPY
    ReleaseDC GetDesktopWindow(), hDC
  End If
End Sub



И ведь такое ощущение, что не сказывается вообще это на производительности! Даже в диспетчере задач процессорное время у процесса по нулям, но на рабочем столе без запущенного Explorer картинка на рабочем столе перерисовывается очень быстро и оперативно...

Не понимаю... Кэширование чтоли какие-то? Перерисовываются только недействительные участки окна?

#music: Need For Speed III: Hot Pursuit\ALPIROCK

URL
05:29

Тотальная неудачница и убийца жёстких дисков.
#post-id: 2798-00-46
#original-date: 24.03.2008 Mon
#original-time: 12:46 AM
#original-day:  2798
#original-host: WinXP Prof SP2 (Build 2600)

Ха... Добавила буквально строку кода, и вылеты прекратились:

Private Sub mnuContext_Click(Index As Integer)
  Select Case Index
    Case 0
      ShowWindowStations
    
    Case 11
      frmSettings.Show vbModal
      ' Вот это вот я добавила!
      Set frmSettings = Nothing
    Case 12
      SwitchAutorun
    
    Case 22
      asUnloadForm Me.hWnd
  End Select
End Sub



И что это за дела? Раньше такого не наблюдалось!

А в тестовом проекте повторить не удаётся... Может быть это как-то связано с тем, что на форме, которая выводится, очень много использовался оператор Load?

Ладно. Фиг с ним... Всё равно я тут просто забыла поставит эту строку, а обычно я её всегда пишу.

Если кому будет интересно, то вот файлы с отладочной информацией:

http://files.mail.ru/O8667S

#music: Need For Speed: High Stakes\Roll the Dice

URL
05:29

Тотальная неудачница и убийца жёстких дисков.
#post-id: 2798-00-40
#original-date: 24.03.2008 Mon
#original-time: 12:40 AM
#original-day:  2798
#original-host: WinXP Prof SP2 (Build 2600)

Обнаружился неожиданный глюк. Долго пыталась понять, в чём дело, потом вспомнила, что в VB есть галочка для включения отладочной информации. Вот что показло Доктор Ватсон:

*----> Обратная трассировка стека <----*
WARNING: Stack unwind information not available. Following frames may be wrong.
*** ERROR: Symbol file could not be found.  Defaulted to export symbols for C:\WINDOWS\system32\USER32.DLL -
*** ERROR: Symbol file could not be found.  Defaulted to export symbols for C:\WINDOWS\system32\ntdll.dll -
ChildEBP RetAddr  Args to Child              
kernel32!RaiseException+0x52
MSVBVM60!RaiseVbaException+0x23
MSVBVM60!EbRaiseException+0x7a (FPO: [EBP 0x0012fbb0] [1,0,4])
MSVBVM60!EbRaiseExceptionCode+0x5f (FPO: [1,0,2])
MSVBVM60!HresultCheck+0x32
MSVBVM60!RaiseEventOnBasicClass+0xc0
MSVBVM60!__vbaRaiseEvent+0x16 (FPO: [3,0,0])
SysTray0200!SysTray__SendEvent+0x23a (FPO: [EBP 0x0012fcdc] [3,12,4])
SysTray0200!modSysTray__SubWndProc+0x8b
USER32!GetDC+0x6d
USER32!GetDC+0x14f
USER32!DefWindowProcW+0x184
USER32!DefWindowProcW+0x1d0
ntdll!KiUserCallbackDispatcher+0x13
USER32!PeekMessageA+0xfb
MSVBVM60!ThunderMsgLoop+0x4e
MSVBVM60!CMsoCMHandler__FPushMessageLoop+0x19 (FPO: [2,0,2])
MSVBVM60!SCM__FPushMessageLoop+0xae
MSVBVM60!SCM_MsoCompMgr__FPushMessageLoop+0x2b (FPO: [4,0,3])
MSVBVM60!CMsoComponent__PushMsgLoop+0x26 (FPO: [EBP 0x0012ffb8] [1,0,4])
MSVBVM60!ThunRTMain+0xa0
PrivateDesktops!__vbaS+0xa

Я вырезала адреса. SysTray глючит... Придётся тестировать...

#music: Need For Speed III: Hot Pursuit\SRV2

URL
05:29

Тотальная неудачница и убийца жёстких дисков.
#post-id: 2797-23-58
#original-date: 23.03.2008 Sun
#original-time: 11:58 PM
#original-day:  2797
#original-host: WinXP Prof SP2 (Build 2600)

Кстати, всё хотела написать, что у меня с работой. Когда я пришла в редакцию, там была временно одна женщина из варягов. Поначалу было тотальное недопонимание, но потом как-то привыклось. Кроме того, у меня понедельники-вторники сразу перешли в разряд выходных ^^ Были, конечно, бякости, но совсем немного, терпимо. Хотя дама, нужно сказать, настоящий мужик ^_^ А уж как курила - это хоть пожарных вызывай ^^

Да. Но халява уехала, и вместо неё пришла другая, которая явно ненавидит уехавшую. Кроме того она в очень хороших отношениях с врединой, которая мне в прошлом немало крови попортила (главбух сказала, что самая главная вредина в налоговой по сравнению с ней - ангел, и я согласна), а вредина эта выходит через месяц, и будет моим начальством, и тогда будет совсем несмешно. Началось всё с того что в понедельник и во вторник мне никто не позвонил и не сказал, что можно не приходить. Меня хотели видеть на работе, и я два дня умирала от безделья, шляясь по Инету. Да. А в четверг появилась вредина, и началась революция. Всё что делала уехавшая объявили непрофессионализмом (ага, при том что её как раз прислали привести газету в норму), переделали буквально всё, что она придумала, даже заказанную дизайнеру шапку заменили обратно на старый примитивизм, написанный шрифтом Courier New. Короче, из строгово сугоя газета снова провалилась в серо-жёлтую древность. Вернулись радости "поджимания" размерами шрифтов, от которых меня было отучили. Короче, газета превратилась в любительскую листовку, зато у текущего главвреда самомнение огого - своё имя впихивает во все дыры.

И это только начало... В любом случае, несмотря на то что меня вроде как хотят задержать там подольше, я уже озадачилась поисками новой работы. Ибо нефиг, я присягала на верность другому главвреду.

В налоговую не вернусь.

Кстати, прикол был очень красноречивый. Главвред хаит каждую точку в газете, поднимает очи на часы и выдаёт: "Часы чего так низко певесили?" Ноу комментс.

Зато забавно было наблюдать как главвред насторожилась, когда я сказала что хочу получить должностные инструкции. А вот когда она начала вспоминать, кем я там работаю, я чуть не упала. Сказали, что я там работаю... сисадмином! Ага, на две машины ^^ При чём одна вообще не моя, а вторая временная ^^ Да. А сервер там только один: NT4 Server на флэшке ^^

И ещё бу. Вообще, обычно голос очень хорошо говорит о человеке. По крайней мере вредные люди обычно не могут контролировать тональность и постоянно кричат. А очень вредные люди... Вот например у вредины такой голос с какими-то визжащими нотками, что постоянно кажется, что она вот вот завизжит в гневе. Ага. И уж тем более меня раздражает когда этим голосом у меня интересуются: "А ты книжку по Фотошопу читаешь?" Нет, не читаю. "Ты его хорошо знаешь?" Да, хорошо (лукавлю, но вдаваться в подробности не охота). "И ты всё знаешь? Как ретушировать, как то, как это?" Ага.

Нет, дорогая моя, ты у нас самая умная, поэтому я вообще думаю, что Фотошоп - это такой велосипед. В общем, это не крик души - налоговая меня закалила ^^ Но с главбухом теперь сидим и качаем головами на очередные закидоны командного состава ^^'

В общем, интузиазм испарился как-то на удивление быстро ^^ При чём не то чтобы я гореа желанием работать до смены власти, но я работала, всё было нормально и замечательно. А теперь... А! Особенно убивает что мадам эта совмещает две должности, поэтому в редакции толком не бывает. Вкратце изложит идеи и сбегает. Я, разумеется, не экстрасенс, поэтому приходится хватать её и сажать рядом чтобы не играть в угадайку. Но даже при этом из неё приходится всё вытягивать, ибо "Вот это на вторую и пару фотографий" не говорит мне ни о чём кроме того что что-то как-то куда-то нужно положить.

Пока власть не поменялась, хотела у Анши спросить, как у них дела обстоят, а сейчас это уже потеряло смысл ^^

#music: Need For Speed III: Hot Pursuit\ALPITECH

URL
05:29

Тотальная неудачница и убийца жёстких дисков.
#post-id: 2797-23-05
#original-date: 23.03.2008 Sun
#original-time: 11:05 PM
#original-day:  2797
#original-host: WinXP Prof SP2 (Build 2600)

На радостях от обновления Private desktops устрою маленький скриншотофлуд ^^ Итак, национальное достояние Японии ^_^ /* Вспоминаем Ицки из лайв экша ^^ */



Лолиты ^_^



И та самая Хачироку ^_^ Мне вообще очень интересно, что сподвигло авторов её там поставить. Толи намёк на Такуми, толи вспомнили бессмертие этой машинки...



Такси. Уж не знаю чем, но мне понравился этот момент. Кстати! Не знаю как вас, а меня убило обилие полупустых дорог в фильме. Не верю! Я смотрела YUA, где как раз про дороги, и там постоянно было не всё в порядке. Именно поэтому, кстати, там так много Mini patoro и мотоциклов, которые патрулируют там, где особо не развернуться. Да.

А вот те два полицейских в шлемах - это было в YUA ^^ Только нестыковочка. Если машина в стандартной комплектации, то зачем шлемы? Вообще, в YUA в одной серии подчёркивалось, что на таких дорогах совсем другие машины, и Mini patoro туда не пускают (в смысле не пускают преследовать нарушителя) ^^

Только одна вещь. Хан сказал, что те полицейские не погнались за ними потому что не смогут догнать. Так-то оно так, да не так. Они вполне могли (что в YUA как раз и делали) передать на следующий пост чтобы дорогу перекрыли.



Ещё одна занятная машинка. Кажется Isuzu Porter.



Фирменной улыбки Рэй так не хватало...



/* А мальчик, кстати, на сыночка моего похож. Толкьо причёска другая. */

Хммм... Вот всегда было интересно, что это за ворота - попадаются они в самых неожиданных местах, даже посреди озёр... Знаю что такие перед храмами бывают. А тут что они делают?



Опять они... Кстати, интересно, что это вообще за место? Дорога без рельсов безопасности, зато с какими-то лампочками...





Красивые поворот, Ирохазаку напоминает - там дорожное полотно тоже таке фигурное...



Честно говоря, я не в большом восторге от кузовного тюнинга в фильме - из разряда "Ух ты!" быстро скатывается в разряд "Приелось". Но вот эта машинка зацепила ^^ А вот itasha не наблюдалось...



Как хочется закончить скриншотом из Initial D ^^



#music: Brian Ice\Initial D Fourth Stage D Selection 2\I Believe In Lovin' You

URL
05:29

Обновление на сайте

Тотальная неудачница и убийца жёстких дисков.
#post-id: 2797-23-00
#original-date: 23.03.2008 Sun
#original-time: 11:00 PM
#original-day:  2797
#original-host: WinXP Prof SP2 (Build 2600)



  • Programs.

    • Обновила "AJPapps - My quick tray 1.00.0013".

    • Обновила "AJPapps - Global hotkeys 1.03.0085".

    • Обновила "AJPapps - Private desktops 1.01.0011".




  • Ariel's shrine.
    • Добавила несколько ссылок.





#music: Brian Ice\Initial D Fourth Stage D Selection 2\I Believe In Lovin' You
#mood: Программизм...

URL
05:29

Тотальная неудачница и убийца жёстких дисков.
#post-id: 2796-23-24
#original-date: 22.03.2008 Sat
#original-time: 11:24 PM
#original-day:  2796
#original-host: WinXP Prof SP2 (Build 2600)

Хммм... Постоянно когда слушаю MIDI файлы, ловлю себя на мысли о том, что похоже на музыку из очередной хентайной игры. В конце концов, все хентайные игры вышли из MIDI и часто до сих пор используют их как основную музыку или альтернативную для слабых машин. Crowd, например, не так давно предлагал на выбор MIDI или CD-DA.

#music: Yuki Kajiura\Fiction\zodiacal sign

URL
05:29

Тотальная неудачница и убийца жёстких дисков.
#post-id: 2797-19-48
#original-date: 23.03.2008 Sun
#original-time: 7:48 PM
#original-day:  2797
#original-host: WinXP Prof SP2 (Build 2600)

Хочу журнал MSDN Magazine... Там порой такие занятные статьи бывают...

А ещё периодически в примерах смайлики попадаются. Жду с нетерпением, когда появятся японские смайлики ^^

#music: Speedman\Initial D Third Stage\Speed Lover

URL
05:28

Тотальная неудачница и убийца жёстких дисков.
#post-id: 2797-16-55
#original-date: 23.03.2008 Sun
#original-time: 4:55 PM
#original-day:  2797
#original-host: WinXP Prof SP2 (Build 2600)

Как хочется снова взяться за Wallpaper Changer, и как боязно ^^ Слишком сложная система. Хотя кое-что упростится, когда я перетащу все данные в Application Data.

#music: Akino Arai\NOIR Original Soundtrack 1\Kirei Na Kanjou [Beautiful Feeling]

URL
05:28

Тотальная неудачница и убийца жёстких дисков.
#post-id: 2797-16-04
#original-date: 23.03.2008 Sun
#original-time: 4:04 PM
#original-day:  2797
#original-host: WinXP Prof SP2 (Build 2600)

В фильме ни где не говорилось как зовут героиню, которую Кейко Китагава играла, а в титрах написали. Сюрприз, её зовут Рэйко ^_^

URL
05:28

Тотальная неудачница и убийца жёстких дисков.
#post-id: 2797-15-14
#original-date: 23.03.2008 Sun
#original-time: 3:14 PM
#original-day:  2797
#original-host: WinXP Prof SP2 (Build 2600)

Ещё одно наблюдение, не подтверждённое YUA. Судя по Тойкийскому дрифту, в Японии не жалеют денег на краску, когда рисуют на дороге разметку. Разумеется, то в городе ^^

URL
05:28

Тотальная неудачница и убийца жёстких дисков.
#post-id: 2797-14-50
#original-date: 23.03.2008 Sun
#original-time: 2:50 PM
#original-day:  2797
#original-host: WinXP Prof SP2 (Build 2600)

Какой я кадр поймала ^_^ Там где главгерой уже стал крутым и гоняла в гараже, на одном повороте стояла Хачироку с кузовом как у Ватару ^_^ Как же я сразу не заметила? ^^

URL
05:28

Тотальная неудачница и убийца жёстких дисков.
#post-id: 2797-14-32
#original-date: 23.03.2008 Sun
#original-time: 2:32 PM
#original-day:  2797
#original-host: WinXP Prof SP2 (Build 2600)

Хммм... О переднеприводной LanEvo я слышала. А задний привод? Иначе как бы главгерой упражнялся в дрифте на полном приводе? ^^

URL
05:28

Тотальная неудачница и убийца жёстких дисков.
#post-id: 2797-13-56
#original-date: 23.03.2008 Sun
#original-time: 1:56 PM
#original-day:  2797
#original-host: WinXP Prof SP2 (Build 2600)

Мда... Решила пересмотреть Токийский Дрифт. Отлично в самом начале придурок на Вайпере колотился в Мустанг задним крылом. Странно, что его сразу не развернуло, учитывая задний привод и отличный крутящий момент ^^'

URL
05:28

Тотальная неудачница и убийца жёстких дисков.
#post-id: 2797-06-30
#original-date: 23.03.2008 Sun
#original-time: 6:30 AM
#original-day:  2797
#original-host: WinXP Prof SP2 (Build 2600)

Хммм... Видимо на ImageShack что-то поменяли, поэтому старая панелька пришедний XML сильно искаверкала, хоть и вытащила нужные ссылки... Надо бы обновиться. А где? Тоесть как?

#music: Yuki Kajiura\Madlax OST\the day, too far

URL
05:27

Тотальная неудачница и убийца жёстких дисков.
#post-id: 2797-05-49
#original-date: 23.03.2008 Sun
#original-time: 5:49 AM
#original-day:  2797
#original-host: WinXP Prof SP2 (Build 2600)

Продолжаю крутить самый дурацкий алгоритм. Чтобы было точно, я решила не делить количество дней прошедших с моего дня рождения на очень приблизительное число дней в году, а сделала немного другое. Вот какой был алгоритм:

Age = DateDiff("yyyy", DateSerial(1983, 11, 1), Now)



DateDiff(), как оказалось, возвращает Long и как-то странно округляет цифру. Поэтому сейчас, судя по алгоритму, мне 25. Поэтому я сделала иначе:

Private Function GetMyAge() As BStr
  Dim TXT As BStr
  Dim XNow As Date
  Dim Years As Long
  
  XNow = Now
  Years = Year(XNow) - 1983
  
  If DateSerial(1069, Month(XNow), Day(XNow)) < DateSerial(1969, 11, 1) Then
    Years = Years - 1
  End If
  
  GetMyAge = "Мой возраст: " & Years
End Function



Для начала я беру разницу. Наверное также поступает и DateDiff() ^^' Потом смотрю, сегодняшнее число меньше дня рождения или нет - я пролсто сравниваю два значения Date. Тут учитывается что в день дня рождения мне уже на год больше. Если нет, то я отнимаю единичку ^^ Честно говоря, несмотря на то что тут обычная математика, у меня с математикой всё очень плохо, поэтому я всё равно не до конца охватываю весь глубинный смысл онимания еденички. Писала просто по интуиции ^^

Кстати, судя по всему, тут учитывается и нулевой возраст, а если меня ещё не было - отрицательный ^^

#music: Yuki Kajiura\Madlax  ED Single\inside your heart

URL