Просмотр сообщений

В этом разделе можно просмотреть все сообщения, сделанные этим пользователем.


Темы - Hz

Страницы: [1]
1
Разное / Ищу видео с CD дисков quake 4
« : 23 Май 2021, 07:43:53 »
Когда игра только вышла, у нас в городе она продавалась кажется на 4 CD дисках. Вместе с игрой, на одном из дисков было видео, около 5 минут (или даже меньше). В этом видео что-то рассказывали разработчики, показывали куски геймплея, и всё это под музыку. Если не ошибаюсь, музыка была Rob Zombie - Reload (этот трек я на тот момент не слышал, да и вообще не знал про Rob Zombie), или что-то похожее, но без слов, просто музыка. Сам файл был с расширением exe, т.е. приложение/программа. При запуске просто открывалось окно с видео, вроде без всяких кнопок. Может есть у кого-нибудь? Или на ютуб может видео выложили? Давно пытался найти, и не один раз.
upd.: опять ... создал тему и нашёл (видео на youtube) ...
Как оказалось, это было видео с бонусного диска. Видео про оружие и технику в игре. Но... это видео, как я понял, есть на бонусных DVD. А у меня, если не ошибаюсь, это было на CD дисках и именно в exe, т.е. запускалось как отдельное приложение, а не просто видеофайл, и было одно это видео.
P.S.: может кто-нибудь знает название трека? Если его можно где-нибудь скачать/послушать.

2
Привет. Всем фанатам МК известны 3 кода, которые открывают дополнительные пункты в главном меню игры. Но где-то пару лет назад я узнал что есть четвёртый. Об этом писали в инете - нашли новый, четвёртый код. Я его даже проверял, он работает. Но забыл его, а теперь не могу найти. Может кто-нибудь помнит?
upd.:
Не знаю как у меня это получается, но не первый раз уже... Нашёл сразу после того, как создал тему на форуме.
С↑←А↓А←А→С↑←

3
(VBS скрипты)
Запуск Warface с аккаунтом НЕ mail.ru
Dim o, WFLogin, WFPassword, WFToken, WFUid, WFSessionKey, WFPersId, WFKey, wsh

WFLogin = "login@gmail.com"
WFPassword = "pass"

Set o = CreateObject("Microsoft.XMLHTTP")
o.open "POST", "https://authdl.mail.ru/ec.php?hint=GcAuth", False
o.setRequestHeader "Content-Type", "application/x-www-form-urlencoded"
o.setRequestHeader "Content-Length", Len("<?xml version=""1.0"" encoding=""UTF-8""?><GcAuth Username="""&WFLogin&""" Password="""&WFPassword&""" ChannelId=""0""/>")
o.setRequestHeader "User-Agent","Downloader/4300"
o.send "<?xml version=""1.0"" encoding=""UTF-8""?><GcAuth Username="""&WFLogin&""" Password="""&WFPassword&""" ChannelId=""0""/>"

Set xmlParser = CreateObject("Msxml2.DOMDocument")

xmlParser.loadXML(o.responsetext)

WFToken = xmlParser.getElementsByTagName("GcAuth").Item(0).getAttribute("Token")
WFUid = xmlParser.getElementsByTagName("GcAuth").Item(0).getAttribute("Uid")
WFSessionKey = xmlParser.getElementsByTagName("GcAuth").Item(0).getAttribute("SessionKey")

o.open "POST", "https://authdl.mail.ru/ec.php?hint=EnazaGetOrdersList", False
o.setRequestHeader "Content-Type", "application/x-www-form-urlencoded"
o.setRequestHeader "Content-Length", Len("<?xml version=""1.0"" encoding=""UTF-8""?><EnazaGetOrdersList Uid="""&WFUid&""" SessionKey="""&WFSessionKey&""" UidType=""3""/>")
o.setRequestHeader "User-Agent","Downloader/4300"
o.send "<?xml version=""1.0"" encoding=""UTF-8""?><EnazaGetOrdersList Uid="""&WFUid&""" SessionKey="""&WFSessionKey&""" UidType=""3""/>"

o.open "POST", "https://authdl.mail.ru/sz.php?hint=AutoLogin", False
o.setRequestHeader "Content-Type", "application/x-www-form-urlencoded"
o.setRequestHeader "Content-Length", Len("<?xml version=""1.0"" encoding=""UTF-8""?><AutoLogin ProjectId=""1177"" SubProjectId=""0"" ShardId=""1"" GcToken="""&WFToken&"""/>")
o.setRequestHeader "User-Agent","Downloader/4300"
o.send "<?xml version=""1.0"" encoding=""UTF-8""?><AutoLogin ProjectId=""1177"" SubProjectId=""0"" ShardId=""1"" GcToken="""&WFToken&"""/>"

xmlParser.loadXML(o.responsetext)

WFPersid = xmlParser.getElementsByTagName("AutoLogin").Item(0).getAttribute("PersId")
WFKey = xmlParser.getElementsByTagName("AutoLogin").Item(0).getAttribute("Key")

Set wsh = WScript.CreateObject("WScript.Shell")
wsh.Exec("Game.exe --shard_id=0 +online_server s0.warface.ru -uid "&WFPersid&" -token "&WFKey&" ")
Запуск Warface с аккаунтом mail.ru
Dim o, o2, accesstoken, uid, token, wsh, location, str, mpop, str2,a1,a2
Set o = CreateObject("Microsoft.XMLHTTP")

o.open "POST", "https://o2.mail.ru/token", False
o.setRequestHeader "Content-Type", "application/x-www-form-urlencoded"
o.setRequestHeader "Content-Length", Len("client_id=gamecenter.mail.ru&grant_type=password&username=login@mail.ru&password=pass")
o.setRequestHeader "User-Agent","Downloader/4300"
o.send "client_id=gamecenter.mail.ru&grant_type=password&username=login@mail.ru&password=pass"
Set xmlParser = CreateObject("Msxml2.DOMDocument")
xmlParser.loadXML(o.responsetext)
str = right(o.responsetext,50)
accesstoken = left (str, 48)

o.open "POST", "https://authdl.mail.ru/ec.php?hint=MrPage2", False
o.setRequestHeader "Content-Type", "application/x-www-form-urlencoded"
o.setRequestHeader "Content-Length", Len("<?xml version=""1.0"" encoding=""UTF-8""?><MrPage2 SessionKey="""&accesstoken&""" Page=""http://dl.mail.ru/robots.txt""/>")
o.setRequestHeader "User-Agent","Downloader/4300"
o.send "<?xml version=""1.0"" encoding=""UTF-8""?><MrPage2 SessionKey="""&accesstoken&""" Page=""http://dl.mail.ru/robots.txt""/>"
xmlParser.loadXML(o.responsetext)
str2 = o.responsetext
location = xmlParser.getElementsByTagName("MrPage2").Item(0).getAttribute("Location")
Replace location, "&", "&"

o.open "GET", location, false
o.setRequestHeader "User-Agent","Downloader/4300"
o.send
mpop=o.getResponseHeader ("Set-Cookie")
a1=instr (mpop,"Mpop")
a2=instr (mpop,"ru:")
mpop=mid (mpop,a1+5, a2+3-a1-5)

o.open "POST", "https://authdl.mail.ru/sz.php?hint=AutoLogin", False
o.setRequestHeader "Content-Type", "application/x-www-form-urlencoded"
o.setRequestHeader "Content-Length", Len("<?xml version=""1.0"" encoding=""UTF-8""?><AutoLogin ProjectId=""1177"" SubProjectId=""0"" ShardId=""1"" Mpop="""&mpop&"""/>")
o.setRequestHeader "User-Agent","Downloader/4300"
o.send "<?xml version=""1.0"" encoding=""UTF-8""?><AutoLogin ProjectId=""1177"" SubProjectId=""0"" ShardId=""1"" Mpop="""&mpop&"""/>"
xmlParser.loadXML(o.responsetext)
uid = xmlParser.getElementsByTagName("AutoLogin").Item(0).getAttribute("PersId")
token = xmlParser.getElementsByTagName("AutoLogin").Item(0).getAttribute("Key")
Set wsh = WScript.CreateObject("WScript.Shell")

wsh.Exec("Game.exe --shard_id=0 +online_server s2.warface.ru -uid "&uid&" -token "&token&" ")
То же самое для аккаунта mail.ru на делфи. Специально старался написать минимум кода, чтобы желающим было проще разобраться.
uses  comobj,windows,sysutils,activex;
var
  o,xmlparser:OleVariant;
  accesstoken,str,location,mpop,uid,token:string;
  a1,a2:Integer;
begin
CoInitialize(0); ;
o:=CreateOleObject('Microsoft.XMLHTTP');
xmlparser:=CreateOleObject('Msxml2.DOMDocument');
o.open ('POST', 'https://o2.mail.ru/token', False);
o.setRequestHeader ('Content-Type', 'application/x-www-form-urlencoded');
o.setRequestHeader ('Content-Length', Length('client_id=gamecenter.mail.ru&grant_type=password&username=login@mail.ru&password=pass'));
o.setRequestHeader('User-Agent','Downloader/4300');
o.send ('client_id=gamecenter.mail.ru&grant_type=password&username=login@mail.ru&password=pass');
xmlParser.loadXML(o.responsetext);
accesstoken := copy (o.responsetext, (Length(o.responsetext)-49),48 );
o.open ('POST', 'https://authdl.mail.ru/ec.php?hint=MrPage2', False);
o.setRequestHeader('Content-Type', 'application/x-www-form-urlencoded');
o.setRequestHeader('Content-Length', Length('<?xml version="1.0" encoding="UTF-8"?><MrPage2 SessionKey="'+accesstoken+'" Page="http://dl.mail.ru/robots.txt"/>'));
o.setRequestHeader('User-Agent','Downloader/4300');
o.send ('<?xml version="1.0" encoding="UTF-8"?><MrPage2 SessionKey="'+accesstoken+'" Page="http://dl.mail.ru/robots.txt"/>');
xmlParser.loadXML(o.responsetext);
location := xmlParser.getElementsByTagName('MrPage2').Item(0).getAttribute('Location');
StringReplace (location, 'amp;', '&',[rfreplaceall,rfignorecase]);
o.open ('GET', location, false);
o.setRequestHeader ('User-Agent','Downloader/4300');
o.send;
str:=o.getResponseHeader ('Set-Cookie');
a1:= pos('Mpop=',str); a2:= Pos('ru:;',str);
mpop:= copy (str, a1+5, a2-a1-2);
o.open ('POST', 'https://authdl.mail.ru/sz.php?hint=AutoLogin', False);
o.setRequestHeader ('Content-Type', 'application/x-www-form-urlencoded');
o.setRequestHeader ('Content-Length', Length('<?xml version="1.0" encoding="UTF-8"?><AutoLogin ProjectId="1177" SubProjectId="0" ShardId="1" Mpop="'+mpop+'"/>'));
o.setRequestHeader ('User-Agent','Downloader/4300');
o.send ('<?xml version="1.0" encoding="UTF-8"?><AutoLogin ProjectId="1177" SubProjectId="0" ShardId="1" Mpop="'+mpop+'"/>');
xmlParser.loadXML(o.responsetext);
uid := xmlParser.getElementsByTagName('AutoLogin').Item(0).getAttribute('PersId');
token := xmlParser.getElementsByTagName('AutoLogin').Item(0).getAttribute('Key');
WinExec(PAnsiChar('Game.exe '+'--shard_id=0 +online_server s2.warface.ru -uid '+pansichar(uid)+' -token '+pansichar(token)),1);
end.

4
Возможно ошибся разделом или форумом, но может кто-нибудь подскажет...
За что отвечают первые 4 байта в bin файлах Diablo 2? Например в armor.bin, runes.bin, treasureclassex.bin и т.д...

5
Ромхакинг и программирование / UMK на PC
« : 08 Апрель 2014, 01:26:24 »
Давно уже интересует вопрос, сделает ли кто-нибудь сеговский UMK на PC? Может кто-нибудь занимается этим? :) Или это вообще никому не интересно?
Кабал сделал отличный хак для сеги, но всё-таки в версии для ПК можно реализовать больше возможностей, например бои 2 на 2 (и больше при желании :)).

Страницы: [1]