31 мар. 2009 г.

Nefor II: War of Kalinborn. Postrelease.

Некрофилия, да..
Тем не менее, игрушка была весёлая, хоть и чрезвычайно глючная.

Краткая история болезни:
Нефор 2 - некое подобие RPG, нагло использующая систему SPECIAL.
Собственно вся игра востоит из заимствований из Fallout, Diablo, NWN, а в поздней версии, которую я успешно потерял, боевая система содрана с Fahrenheit ) и конечно же текстовой игры GOPNIK, которую я выложу позже.

Написано это чудо на Visual Basic. И это всё таки закрытое ПО, по простой причине - код просто стыдно показывать, я вообще далеко не хороший программист, а в далеком 2005-2006 году был вообще пипец))

Скриншоты:





Скачать сие чудо можно с моего drop.io

В архив также входит дев-билд Нефора 1 - еще более эпической игры))

Да, вот еще, Credits:
Идея и сюжет - Николай [veo] Хозеев
Тестирование и всяческая помощь - Иван [Vik Mefisto] Ефремов
Поддержка - Анна Бородай, Ирина Ступина, Антон Алексеев.
Программизм - Виктор [m0nochr0me] Терещенко

ЗЫ: будте внимательны при открытии html-документов из архива - к некоторым из них прицепился вредный iframe.

26 мар. 2009 г.

Кулер для ноутбука своими руками

Близится лето. И это чувствуется даже у нас, и даже в марте - температура в нашей комнатушке 7х5, где стоят и работают два сервака и 6 обычных компов приближается к критически-некомфортной, несмотря на работающий кондиционер..
А тут еще и мой алюминиевый ноут с чуть-ли не нулевым охлаждением :)

Немного помозговав, я решил сделать для него внешнее охлаждение.
Собственно, вот что получилось:







Пока это всего лишь рабочая модель, не более. Если эффективность будет подтверждена то займусь более серьёзно.

В создании использовались материалы:
  • Кулер типолразмера 92мм
  • 2 листа А4
  • Обрезок неэкранированной витой пары длинной 1.5 метра
  • Молекс типа "папа"
Питание берется от стационарного компа за соседним столом, именно поэтому используется витуха - по 2 пары скручены на +12 и GND.

Приблизительная эффективность по результатам получаса работы - средняя -
правая половина корпуса холодная(впрочем такая она и была), левая - теплая, хоть и менее чем была.

Недостатки конструкции:
  • Хрупкость - бумага далеко не самый надежный материал.
  • Возможность засасывания посторонних предметов - "паутинки" на 92мм у меня не оказалось и мой волшебный пылесос чуть было не высосал пакетик чая из моей кружки :)
  • Отсутствие функции "вкл/выкл" - исключительно мой косяк ><
  • Блокируется доступ к портам на правой стороне корпуса.
  • Незначительный шум.
  • Малая совместимость с другими ноутбуками, по крайней мере с ASUS F5R точно. Возможно придется изобретать сменные насадки.
ЗЫ: Если кому интересно - нарисую в гимпе развертку.

6 мар. 2009 г.

Скрипт проверки баланса на БВК

Всвязи с переходом на CDMA-интернет в качестве основного, снова возникла необходимость следить за состоянием баланса.

Около полугода назад я было взялся сам писать такой скрипт на питоне, знаний не хватило. А сегодня нашел уже готовый в интернете. Лёгкий взмах напильником и он даже заработал :)

Собственно вот.

#!/usr/bin/perl -w
#############################################################
##
## BWC (http://www.bwc.ru) balance checker
## by Qwadrat, qwadrat@gmail.com
## Modified by M0nochr0me, m0nochr0mex@gmail.com
##
#############################################################


use strict;
use warnings;
use LWP;

my $prefix='902'; #код
my $phone='1234567'; #7 цифр телефона
my $passwd='xxxx'; # пароль на issa.bwc.ru
my $agent = LWP::UserAgent->new;
my $url = 'http://issa.bwc.ru/cgi-bin/cgi.exe?function=is_login';
$agent->cookie_jar({});
my $response = $agent->post($url,
[ 'mobnum' => $prefix.$phone,
'Password' => $passwd
]
);
die "$url error: ", $response->status_line
unless $response->is_success;
$response = $agent->get("http://issa.bwc.ru/cgi-bin/cgi.exe?function=is_account");
$response->content =~ /<td class=light width="50%">&nbsp;<em>(.+?)<\/em>&nbsp;/;
my $rc = (defined $1)?($1):("**.**");
print "Актуальный баланс: ", $rc, "руб.\n";
$response->content =~ /(cgi-bin\/cgi.exe?function=is_exit)\"/;
$response = $agent->get("http://issa.bwc.ru");


Чтобы оно заработало нужно поставить пакет perl-libwww, по крайней мере в арче.

PS: кое как этот код сюда упихнул без парсинга >_<



Update 23/11/2009:

Обновленные скрипты: на питоне и на перле.
Для перлового варианта нужно будет доустановить пакет libcrypt-ssleay-perl.

Спасибо Александру, заметившиму ошибку.