Выходные, выходные!..

Ура, ура, завтра уже!..

Планов громадье: куплю флешку 4 гиговую (щоб была, сейчас обхожусь как-то 32 мегабайтами); куплю карточку памяти для PSP (поиграю наконец, а то старая развалилась, новая сдохла); может быть куплю фондюшницу; скорее всего буду делать крылышки к пиву; попробуем брецели делать; сходим к теще не день рождения

Когда только все это успеть :)

---

Переделал процедуру тут одну, которую копи-пастил сто лет из проекта в проект, вычитывала свойства файла; старый вариант 300 метровый файл читал за 30 секунд, новый - за 5

А всего-то ушел от TFileStream к отображаемым файлам...

Пробивает на еду...

Обять озаботился покупкой фондюшницы...

Еда: хочется...

Очень хочется сделать/попробовать: крылышки в пиве

Ремонт: про розетку

Когда делали ремонт, сильно хотелось спрятать антенный провод, который сначала просто болтался по периметру комнаты, потом был прибит к плинтусу, но все равно интерьер не украшал; потом к нему добавился провод к модему, а в плане был еще сетевой провод...

В итоге провода попрятались, а для подключение на стене выстроился ряд розеток - сетевых 200 В, антенная, телефонная и сетевая (компутерная)

Про последнюю и поделюсь хитростью: не знаю, по какой такой маркетологической причине (других не придумаю), но розетка для телефона стоит относительно разумные деньги (что-то ок. 12 грн), а розетка для сети - совсем неразумные, что-то далеко за 80; при этом разница у них - насколько я понимаю - только в самом разьеме, в один стыкается 4-жильный провод, а в другой - 8-жильный

Переплачивать - не мой случай, мой случай - оченьумелые ручки :) , по порядку:

купил розетку для телефона:

Расчитана на 2, но разведена одна, вторая - про запас? Стоит что-то ок. 12 грн
Купил простенькую накладную розетку для сети:

Что-то или 4, или 6 грн
Дальше - интуитивно понятные действия по пересадке донорского органа:

Из минусов:
- надо поморочить голову с соединением провода с розеткой (нет удобного крепления), но - делается то это один раз, я спаял провода и запрятал спайки в термоусадочные трубки
- надо расширить место для колодки сетевого кабеля, неизбежны царапинки и/или неровности, но - будучи вставленной колодка все равно практ. все огрехи прикроет собой

Из плюсов - используется 2-я дырка (которая как еще может использоваться? не видел я что-то в продаже начинки, которую можно самостоятельно добавить), сэкономленные деньги можно потратить на пиво к примеру :)

Ремонт: подсветка

Подсветку я делал исходя из соображений, взятых чисто с потолка:

- шнуры дуралайт, которые продаются у меня на рынке: и дороги (30 грн/метр), и светятся как-то тускло;
- неон: и дорого, и потребляет мощности, и с моим мелким чадом, которое любит свет туда-сюда включать, долго не прожил бы
- светодиоды: светят точками (видел картинку на форуме домашних мастеров), много возни, зато экономный вариант

Так что я остановился на светодиодах; из примерного расчета - 1 диод каждые 10 см - получалось, что мне на моих ~ 4 метра * ~ 3 метра надо 140 диодов.

Диоды я купил с большим углом, белые, вот такие:

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

Для питания подсветки из деталей, найденных в кладовке, сначала сделал блок питания; понадобился:
- трансформатор, преобразующий 220 в 16 вольт
- диодный мостик, преобразующий переменный ток в постоянный
- стабилизатор напряжения, мой выдерживал ток в 1 А
- электролитический конденсатор, сглаживающий пульсации напряжения

В итоге у меня получился блок питания, выдающий (кажется... сделал и тут же забыл) 12 вольт, до 1 ампера:

Мостик, конденсатор и стабилизатор распаяны на небольшой плате, стабилизатор требует радиатора для охлаждения, поэтому я отрезал небольшой (5 см) кусок направляющего профиля, к нему прикрутил стабилизатор, всю плату спрятал внутрь профиля (заизолировав конечно все, что стоило изолировать), трансформатор и эту "коробочку" спрятал внутри короба

Мои диоды потребляли ток 20 милиампер (или 0,02 А), а питания требовали кажется 3 вольта; поэтому я решил разбить их на группы по 4 диода, 140 / 4 = 35 групп, каждая группа как раз питалась бы 12 вольтами и потребляла 20 мА, вся "елка" потребляла бы 35 * 0,02 = 0,7 А; позже методом научного тыка я решил добавить в каждую группу резистор (на 100 Ом - потом что их было много), чтобы ограничить яркость, получилась такая вот примерно схема:

! Нельзя для экономии делать такую схему:

Электрическая часть самая простая, сложнее было придумать и сделать саму конструкцию; идею предложила жена: после установки раздвижной двери в кладовку осталась секция пластиковая; по идее сначала хотели использовать доску пластиковую, осталась после общивки потолка, но вовремя попался на глаза этот кусок; от этой пластиковой доски отрезал куски шириной в неск. сантиметров (между ребрами жесткости как раз), длина доски 2 метра, так что помещалось 5 групп диодов, которые я клеил пистолетом с горячим клеем:

Просто и удобно, одно "НО" только - если при пайке перегреть деталь, клей разжижается и диоды отрываются

Долго искал на рынке провод для пайки групп, пока не осенило использовать проводники из сетевого провода (провода, который для локальной сети) - внутри 8 жил отличного медного жесткого провода:

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

Неожиданной проблемой оказалось размещение подсветки внутри короба: если просто положить ее на дно, то на потолке получалась очень резкая тень от края короба, которая исчезала по мере поднятия планки со светодиодами вверх. Поэтому пришлось придумать крепление планок со светодиодами повыше - вот так:

Это - мой короб в разрезе; из направляющего профиля я нарезал кусочков шириной в неск. сантиметров, согнул их в виде буквы "Г" и поклеил пистолетом на оптимально подобранной высоте внутри короба, потом еще поигрался с углом, чтобы свет падал больше внутрь короба

Получилось как получилось, вроде ничего; точек на потолке от источников света удалось избежать, или из-за частого (каждые 10 см) размещения, или (скорее всего) потому, что диоды с большим углом; с включенной подсветкой в комнате достаточно светло (можно читать при желании), правда свет бледноват, но против синих светодиодов жена (да и я) были категорически против, а с теплым свечением не было (бывают ли вообще в природе?)

По деньгам получилось терпимо: дешевле дуралайта и неона, на диоды потратил 200 грн, на кабели ок. 20, блок питания из старого хлама... Потребляемая можность - меньше 10 ватт, можно сутками не выключать (только зачем)

Мой ремонт, часть 0

Зачем мы устроили себе геморой с названием ремонт - самим не очень понятно... Обмен комнатами с дитями мы конечно планировали, но как-то срок все время был "потом", а тут чего-то решили - "пора"; так что первая причина - наш с женой переезд в комнату поменьше, а двух наших мальчиков - в комнату побольше

Ну а раз переезд - то и "надо бы освежить обои может быть?.." - хотя обои поклеены были хорошо, жене нравились и клеились сравнительно недавно - когда 2-й мальчик был еще в плане в животе мамы, т.е. 3 года назад... в процессе ремонта обнаружились письменные свидетельства летописца того ремонта - например вот:


Вторая причина - желание что-то сделать с потолком, точнее с выступами на нем: красоты никакой, клеить обои из-за этих выступов сложно; в общем, не любили мы их (и не только мы в общем-то). Что-то с ним сделать можно было только спрятав в коробки, от коробок хотелось получить какую-то пользу - например в виде дополнительного света в комнате

Ну и мелкие подпричины - двери в комнате давно пора было бы поменять, жена всегда хотела в детскую ковролин на весь пол, после установки кондиционера в стене оставалась незажеланная дыра

Так что план работ выглядел так:
- выступы с потолка скрыть в коробки;
- в коробки поместить точечный свет и подстветку потолка;
- со стороны балкона коробка прячет за собой карниз для штор;
- с противоположной стороны коробка тоже не доходит до стены, там будет шкаф на всю стену;
- входная дверь меняется;
- разные шнуры (антена, модем, сеть) прячуться с глаз долой;
- новое основное освещение на потолок;
- ковролин на всю площадь комнаты

После уточнения конструкции коробов точечные светильники решили оставить только по 2-м сторонам периметра комнаты - вдоль балкона и вдоль шкафа

Размер комнаты 5650х3100х2600 (причем комната сужается на 5 см, опускается тоже примерно на 5 см, выступ на потолке тоже сужается прим. на 10 см), высота выступа от 16 до 18 см

В строительстве я не мастер, хотя обои там клеить клеил всегда сам; почитав форум домашних мастеров (читал очень много, пока не дошло, что и как) поверил, что смогу все сделать сам, после чего пошел тратить деньги на инструменты и материалы:

Шуруповерт: без этого дивайса ничего бы не получилось; я читал, что некоторые обычной отверткой все умудрялись крутить - не знаю, на такие подвиги я точно не способен. Шуруповерт купил не самый дорогой и не самый дешевый:

Ок. $50, в комплекте 2 аккумулятора на 18 В (ну и зарядка конечно, время зарядки 1 час), умеет крутится на 2-х скоростях (поменьше для вворачивания шурупов и побольше для сверления дырок), умеет крутится в разные стороны (т.е. можно и заворачивать, и выворачивать шурупы), умеет регулировать силу закручивания, в комплекте еще набор сверел был и бит (тех штук, которые собственно закручивают шурупы). Нормальной биты не было, поэтому купил отдельно:

Золотистая штука на конце - регулятор глубины, не дает шурупу закрутится слишком глубоко. А отвертка у меня уже была, биты у них совместимые
Кроме этого купил также:
- водяной уровень: простая прозрачная трубка 7 м длиной, в нее наливаем воду и имеем сообщающиеся сосуды, разносим трубки к противоположным стенкам, прикладывае к стене и отмечаем уровень воды в трубках - все, имеем метки, идеально выровненые горизонтально (идеально - конечно сильно сказано: вода в трубках достаточно инерционна, поэтому надо знать, сколько времени ей надо, чтобы "устаканится"; кроме того влияет также на результат поверхностное натяжение, искривляющее поверхность воды в трубке - сложно "целится", как ставить метку, тем более что эту операцию надо делать вдвоем и у каждого представление, как ставить точку, свое)
- угольник; мелочь, но на глаз я по крайней мере не способен провести линию под прямым углом; купил подешевле, а надо было купить дороже: в моем линейка тонкая, а 2-я часть - толстая, т.е. в одной плоскости они не лежат, а иногда надо было
- уровень: здоровая (1,2 м) линейка с 3-я пузырьковыми уровнями. Я не знаю как его надо было проверить при покупке, понадеялся, что покупал не самый дешевый - НО у меня он оказался (причем не сразу) неправильным
- нож со сменными лезвиями: хороший нож режет намного лучше нехорошего, проверено практикой (раньше я пробовал резать нехорошими ножами, потому и не получалось... а я думал криворукость моя мешала)
- маркерная нитка (?): нитка, окрашенная порошком - ставим 2 точки на стене, натягиваем нитку между ними, оттягиваем как тетиву лука и отпускаем - по стене между двумя точками имеем линию. Очень удобно

- ножницы для металла: можно резать и ножовкой по металлу. Но это 1) долго, 2) издает очень неприятные звуки, хотя рез конечно получается ровный и красивый. Я все же купил ножницы, пришлось только долго учится резать - хотя главная хитрость как сейчас посмотрю - не пытаться разрезать сразу много :)
- шурупы: в общей сложности я потратил ок. 200 клопов, ок. 500 саморезов по металлу и не помню точно сколько дюбель-гвоздей
- картон: я купил кажется 5 листов обычного (т.е. не влагостойкого) потолочного (т.е. не 12 мм, а меньше) гипсокартона, расчитал достаточно точно, в остатки ушло что-то ок. 1 квадрата. Хотя и читал, что надо 12 мм, но поск. все делал сам, то аргумент "чем легче - тем легче" сыграл свою роль
- профили: ПН (направляющий профиль) 27Х27 и ПП (потолочный профиль) 60Х27, сколько уже и не помню, ошибся на 1 ПП (но куда-то позже пристрою)
- дрель-перфоратор: нужна обязательно, взял у тестя
- пластиковое ведро: для замешивания шпаклевок, нашлось в доме
- шпатели: узкий уже был, купил еще чуть шире (сантиметров 15?) и еще чуть шире (больше 30), и гладилку (что-то среднее); все пригодились

В принципе все, что купил, еще очень пригодится (без шуруповерта я вообще уже ничего не кручу, разве что самые маленькие винтики, для которых бит нету)

Цвет -> нецвет

Пока не забыл, запишу себе новую (не помню, чтобы использовал) формулу для перевода цвета в оттенки серого: Серый = 0,299 * Красный + 0,587 * Зеленый + 0,114 * Синий или же

  red = ( red * 77 + green * 150 + blue * 29 + 128 ) / 256
  green = red
  blue = red

Я закончил ремонт!

"Мы строили, строили, и наконец построили - ура!" - сказал Чебурашка как-то; я не Чебурашка, но могу проделать то-же самое - "Я ремонтировал, ремонтировал, и наконец доремонтировал!"
Вот так было -
и вот так стало -

Как обещал на сайте домашних мастеров, где меня научили все это (или почти все) сделать, опишу со временем что и как делал подробнее

Шкаф-купе

После нескольких лет размышлений "ну хорошо бы конечно..." сегодня наконец фаза размышлений перешла в фазу действий, и я заказал распил дсп для нового шкафа-купе
Военного там нет ничего, поэтому через недельку обещают привезти порезанные доски, из которых я думаю что-то все-таки да получится; когда начнет получаться, тогда и детали будут :)

House M.D.

Начал смотреть первый сезон... кино конечно очень интересное, одно "но" - мнительным/впечатлительным лучше не смотреть (как я) :) - сразу начинаешь в себе что-то не то чувствовать (я это еще после "Chicago Hope" и "Скорой помощи" заметил)

Но - кино интересное, поэтому буду делать над собой усилие

Сделали вывод, что у нас с такими случаями (червь в мозгу например) сдохнешь и никто ничего тебе не поможет (аспирин пропишут да и все)

Новый Chieftec

Несмотря на то, что сгоревший БП был Chieftec, купил такой же (в смысле той же конторы, только помощнее) Работает, работает тихо - что еще от блока питания надо...

Взорвался блок питания

Мда... собрал наконец назад после ремонта вчера компьютерный стол, собрал компьютер, включил - и в том что-то громко бахнуло в блоке питания Не вынесла душа блока_питания надругательств видимо... 3 года его 310 вт питали достаточно мощную начинку, может и срок его электронной душе пришел выйти из того конденсатора, который взорвался

Как добавить обработчик для типа файла (и пример)

К примеру, надо добавить thumbnail provider для flv файла:

• сначала надо в HKEY_CLASSES_ROOT найти нужное расширение файла (.flv)
• если нашли - читаем значение по умолчанию для ветки (KMPlayer например после добавления воспроизведения flv файлов на себя обозвал такие файлы как flv_auto_file)? если нет - создаем ветку и придумываем название для такого типа файлов, записывая его в значение по умолчанию для ветки
• теперь надо открыть (или создать) в HKEY_CLASSES_ROOT ветку, значение которой прочитали (flv_auto_file), и

1. проверить, есть ли в ней ветка Shell (потому что если ее нет, то даже если все остальное правильно, все равно ничего работать не будет... по крайней мере для эскизов я точно об этом знаю)
2. в ветке ShellEx добавить ветку с guid-ом нужного обработчика (например для обработчика эскизов - {E357FCCD-A995-4576-B01F-234630154E96}), и записать в значение по умолчанию guid сом-обьекта, который собственно и будет создавать эскизы

• для красоты можно записать в ветку flv_auto_file ключик Treatment - в висте он будет дорисовывать рамочку вокруг эскиза; например рамка в виде кадра кинопленки - значение 3.
• вообще говоря не относится к регистрации особо, но - если провайдер эскизов реализует интерфейс IInitializeWithFile, то в HKEY_CLASSES_ROOT\CLSID\provider_guid надо добавить ключик DisableProcessIsolation со значением 1

---

Простенький проект, который будет рисовать эскизы в проводнике для flv файлов (ахтунг, для висты! в хр используется другой интерфейс для показа эскизов):

library vista_thumb;

uses
  ComServ,
  thumbProvider_impl in 'thumbProvider_impl.pas';

exports
  DllGetClassObject,
  DllCanUnloadNow,
  DllRegisterServer,
  DllUnregisterServer;

{$R *.RES}

begin
end.

unit thumbProvider_impl;

interface

uses
  windows, graphics, sysutils, 
  ActiveX, ComObj, registry, propsys;

const
  CLSID_ThumbProvider: TGUID = '{C8F39152-17CA-42F9-9FC0-4499C6D74C92}';

type
  TThumbProvider2 = class (TComObject, IInitializeWithFile, IThumbnailProvider)
  public
    function IInitializeWithFile.Initialize = Initialize1;
    function Initialize1 (pszFilePath: LPCWSTR; grfMode: DWORD): HRESULT; stdcall;
    function GetThumbnail(cx: Cardinal; out phbmp: HBITMAP; out pdwAlpha: Cardinal): HRESULT; stdcall;
  end;

implementation

uses
  ComServ, ShlObj;

type
  TThumbProviderFactory = class (TComObjectFactory)
    procedure UpdateRegistry (Register: Boolean); override;
  end;

{ TThumbProviderFactory }

procedure TThumbProviderFactory.UpdateRegistry(Register: Boolean);
const
  shell_path = 'Shell';
  shellex_thumbnail = 'ShellEx\{E357FCCD-A995-4576-B01F-234630154E96}';
var
  reg: TRegistry;
  base_path: string;
begin
  reg := TRegistry.Create;
  try
    reg.RootKey := HKEY_CLASSES_ROOT;
    if Register then
    begin
      inherited UpdateRegistry (Register);
      reg.OpenKey ('.flv', true);
      try
        if reg.ValueExists ( '' ) then
          base_path := reg.ReadString ( '' )
        else
          base_path := 'flv_auto_file';
      finally
        reg.CloseKey;
      end;

      reg.OpenKey ( base_path, true );
      try
        if not reg.KeyExists ( shell_path ) then
          reg.CreateKey ( shell_path );
      finally
        reg.CloseKey;
      end;

      reg.OpenKey ( base_path, false );
      try
        reg.WriteInteger ('Treatment', 3);
      finally
        reg.CloseKey;
      end;

      if reg.OpenKey (base_path + '\' + shellex_thumbnail, true) then
      try
        reg.WriteString ('', GUIDToString (CLSID_FlashFilesThumbProvider));
      finally
        reg.CloseKey;
      end;

      if reg.OpenKey ( 'CLSID\' + GUIDToString (CLSID_FlashFilesThumbProvider), false ) then
      try
        reg.WriteInteger ('DisableProcessIsolation', 1);
      finally
        reg.CloseKey;
      end;

    end else begin
      reg.DeleteKey (base_path + '\' + shellex_thumbnail);
      inherited UpdateRegistry (Register);
    end;

    SHChangeNotify ( SHCNE_ASSOCCHANGED, SHCNF_IDLIST, nil, nil );
  finally
    reg.Free;
  end;
end;

{ TThumbProvider2 }

function TThumbProvider2.GetThumbnail(cx: Cardinal; out phbmp: HBITMAP; out pdwAlpha: Cardinal): HRESULT;
var
  bmp: TBitmap;
begin
  Result := E_FAIL;

  bmp := TBitmap.Create;
  try
    bmp.Width := cx; bmp.Height := cx div 2;
    bmp.PixelFormat := pf32bit;

    with bmp.Canvas do
    begin
      Brush.Color := clFuchsia;
      FillRect (ClipRect);
      TextOut (5, 5, format ('%d', [cx]));
      TextOut (5, 25, 'fuck U!');
    end;

    phbmp := bmp.Handle;
    bmp.ReleaseHandle;
    pdwAlpha := WTSAT_RGB;

    Result := S_OK;
  finally                                          
    bmp.free;
  end;
end;

function TThumbProvider2.Initialize1 (pszFilePath: LPCWSTR; grfMode: DWORD): HRESULT;
begin
  Result := S_OK;
end;

initialization
  TThumbProviderFactory.Create (ComServer, TThumbProvider2,
      CLSID_ThumbProvider, 'Thumbnail provider for Flash files',
      '', ciMultiInstance, tmApartment);


end.

Радио

Всегда любил слушать радио (начиная с 6-го класса, когда спаял первый приемник и слушал "Маяк")

Локальная музыка быстро приедается, а прелесть радио в рандомности... но конечно не нынешнего нашего fm, которое вываливает на тебя столько рекламы и прочего го*на (не говоря об "шансонах" и прочем)

О том, что есть радио в инете, я конечно знал и пару раз конечно пробовал слушать, что-то не срасталось - каналы узкие, передача все время затыкалась...

Но последнюю неделю слушаю радио из инета, defjay.com - "тематическое" r&b (под настроение попало)... а что, дома 1 мбит, на работе 8, бОльшая часть канала "простаивает ;)

Слушаю (как и всю остальную музыку последнее время) AIMP-ом

Ремонт заканчивается...

строительная его по крайней мере часть, мебельная - в перспективе

Наконец компьютер дома заработает

Прикол

Ненавижу флеш

Если надо сконвертировать флешку в видео, как это сделать лучше всего? Не считая конечно варианта кадр-в-кадр? Можно запустить флешку и скриншотить с заданной частотой окно плеера Можно выпендрится и сделать флешку, которая будет сама сигнализировать программе, что очередной кадр нарисован Но и в том и в другом случае есть грабли, которые заключакются в том, что: плеер (который флешку играет) НЕ гарантирует, что он проиграет ее с заданной скоростью - т.е. за секунду не обязательно будет показано то количество кадров, которое заявлено в swf файле (даже больше, явно НЕ будет показано такое количество) А раз так, то в первом случае сделаем скажем 12 кадров, в то время как плеер нарисует всего 10 - получится, что 2 кадра будут сдублированы... что на глаз очень даже заметно, особенно при невысоких fps Во втором случае за секунду сграбим те же 10 кадров вместо 12, но в видео вроде будет ожидаться 12 - "займем" из следующей секунды, из-за чего имеем рассинхрон видео и звука... Что в лоб, что по лбу - получается полная фигня

Прикольный Вини-Пух

Поющий ветер из жестких дисков

Это один из жестких дисков, которые я сейчас буду разбирать ( одного диска мало, так как в нем всего 2 блина) На одном из дисков был всего один такой спрятанный винтик, на другом их было аж 2 Вот что у диска внутри; завораживающе красиво... Чтобы снять блины, надо снять все остальное... механизм поворота головок в одном винте раскручивался со стороны платы (снаружи диска), во втором половина его просто держалась на магните и снялась "силой" Как (и можно ли) снять мотор я так на 2-х дисках и не понял; раскрутив эти винты блины можно снять с вала мотора между блинами прокладки из колечек Второй винт устроен примерно так же; верхнее прижимное колечко с отверстиями еще пригодится Получилось 4 блина; где-то еще дома болтается старый ноутбучный винт, очень маленький, если найду, вытяну блины оттуда, будет прикольно (они меньше наверное раза в два) Это будет "опора" для всей конструкции; колечко наклеено "моментом" и в итоге будет просто для красоты (сначала я думал использовать его для крепления, но тогда надо хорошо сбалансировать конструкцию) Вот так будут крепится блины - нитками (нет тонкого сверла по металу, да и блины толстенные, так что решил не мучаться). Жена обещала (осмотрев критически версию 0.9) дать ниток с блестками Дырки в основании для крепления сделал раскаленным на газовой плите гвоздем - "поющие диски" v. 0.9 К версии 1.0 поменяю нитки на "красивее" и способ крепления (текущий не виден, т.к. его в общем пока нет): нитки, закрепленные на блинах, будут зафиксированы в основании и прикреплены потом вместе к 2-му колечку (лежит на столе), за которое конструкция и будет вешаться Звук от столкновения приятный, плюс эффект от взаимоотражающихся блинов гипнотический - единственно, надо их протереть от отпечатков пальцев и отрегулировать взаимные высоты каждого диска так, чтобы они не стремились соприкоснуться плоскостями (иначе они ими, плоскостями, склеиваются, за счет идеальной гладкости плоскостей) Оба винта были собраны мелкими винтиками с 6-гранными дырками, открутить которые ничем из домашних приблуд не получалось - пришлось купить наборчик (лежит на столе рядом с большой отверткой), стоит на рынке < $3, самая мелкая "отвертка" уже стерлась :(