Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

Мутанчики (2D Demo) [Delphi, Windows]


Страницы:   1 2

NE_Parovoz ©   (2005-07-02 20:02:00) 

Зацините вот ето, или покритикуйте:
http://neparovoz.boom.ru/Mut.rar(~800kb)

цель игры пока не продумана.


dmk   (2005-07-20 22:35:00) [1]

Играл во что-то подобное лет 13-14 назад на Электронике-86М.
Только там игра поинтереснее была. "Tanks" по-моему
называлась.

PS. Просто вспомнил =)


NE_Parovoz   (2005-07-20 20:56:00) [2]

>А исходник дадите игры?????
я думаю их лучше никому не видеть :]
ничего интересного там нет, вот хотябы раздел var(глобальный):

 Form1: TForm1;
 buf:TBitmap;  
 pip,pip2:TBitmap;
 ex,ex2:TBitmap;
 cur:TBitmap;
 Fon,Fonv:array[1..4] of TBitmap;   //*
 Pl,tur,flr:TBitmap;
 WF:TBitmap;
 pul:array[1..3] of TBitmap;
 Main,MainFon,But,SubMain:TBitmap;
 gr:array[1..3] of TBitmap;
 exp:array[1..6] of TBitmap;
 lc:array [1..3] of TBitmap;
 brz:array [1..4] of TBitmap;
 bot:array[1..3,1..5] of TBitmap;
 xg,yg,st,ug:array[1..30] of integer;             //
 xz,yz,stz,uz,upz:array[1..15] of integer;        //
 xl,yl,stl,ul:array[1..30] of integer;            //
 xe,ye,ste,ue:array[1..3] of integer;             //
 xpi,ypi,stpi,upi:array[1..20] of integer;        //
 xf,yf,stf,uf:array[1..20] of integer;            //
 scb,anb,htb,ub,spb,vdob:array[1..20] of integer; //
 xb,yb:array[1..20] of integer;           //
 smx,smy,smv:array[1..100] of integer;    //
 pulx,puly,pult:array[1..30] of integer;  //
 xp,yp,o,xn,yn,un,pht:integer; //
 xm,ym:integer;                //
 od,g:integer;                 //
 fl,str,pp,mbl,gm:boolean;     //
 pt,ptg:integer;  //
 xc,yc:integer;   //
 xmf,vrm,xst,hgst,lng:integer; //
  Vsego:int64;    //
  Tfra:integer;   //
  Pfra:integer;   //

 xmc,ymc:integer;
 i,i2,i3,i4,i5,i6,i7:integer;
 sin_a,cos_a:array[0..360] of real;

 keys:array [0..255] of Boolean;
 esc:Boolean;

 Time,Time_,Freq:Int64;
 TF,IFreq,ones:Double;


КиТаЯц   (2005-07-20 15:00:00) [3]

Неплохо. После продолжительной стрельбы из пулемета вылезло "invalid floating point operation". После неоднократного нажатия esc догадался пульнуть из пушки. Игра продолжилась как не в чем не бывало. :)


-virus-   (2005-07-20 12:23:00) [4]

Игра крутая! ;) Мне до такой еще далеко.
Особенно хорошо сделана озвучка!


drakoga   (2005-07-20 09:19:00) [5]

А исходник дадите игры?????


Caridi   (2005-07-15 11:56:00) [6]

У меня тоже не качает...
Даже " http://neparovoz.boom.ruи там на ссылку"


NE_Parovoz   (2005-07-07 09:40:00) [7]

GrayFace
3-й считая c 0-го т.е. мой :
http://neparovoz.boom.ruи там на ссылку


GrayFace   (2005-07-06 23:40:00) [8]

Grell ©   (05.07.05 15:13) [25]
см 3-ий пост!

В каком смысле? Как я понял из [3], у тебя выдается ошибка 404 Not found. Ты имел ввиду что-то иное??


Green_Templar   (2005-07-05 20:14:00) [9]

>Звуковые? :)
Да, забыл дописать :)


Grell   (2005-07-05 15:13:00) [10]


> "У вас нет прав для просмотра этой страницы"

см 3-ий пост!


GrayFace   (2005-07-05 15:00:00) [11]

NE_Parovoz   (02.07.05 20:02)
http://neparovoz.boom.ru/Mut.rar

"У вас нет прав для просмотра этой страницы"


cyborg   (2005-07-05 12:52:00) [12]


> Единственное, что мне понравилось - спецэфекты

Звуковые? :)


Green_Templar   (2005-07-05 09:30:00) [13]

Блин, меню можно текстаутом спокойно выводить, будет даже красивее, бо этот интерфейс не стоит 1,5 мегабайтов.
Почему фпс такой нехороший и танк такой медленный? Я не знаю, есть ли там ещё уровни, но убить больше 4 врагов у меня просто не хватило терпения.
Музыка отстой. Нет плавного перехода и трэки рваные.
Единственное, что мне понравилось - спецэфекты и управление :)


cyborg   (2005-07-04 17:20:00) [14]


> [17] Grell ©   (04.07.05 13:08)

Чтобы заголовка окна небыло, создавай его с флагом WS_POPUP.


Grell   (2005-07-04 14:46:00) [15]

NE_Parovoz
А я вроде и не предлагал переделывать под ОГЛ!


NE_Parovoz   (2005-07-04 14:35:00) [16]

cyborg
в микрофон ты там "бдыщ" говорил :)
это не я :) я там только "тараканов" озвучивал, а что плохо?
>>графика страшная
зато своя :)

Asteroid
Grel
>>Не надо VCL форму переводить в полноэкранный режим
Ну не хочу я это под OGL пределывать, я её писал 1-2 год назад
там такой код, что я сейчас сам не понимаю как оно работает :)


Asteroid   (2005-07-04 13:29:00) [17]

> Grell ©   (04.07.05 13:08) [17]
Согласен, упустил из виду :)


Grell   (2005-07-04 13:08:00) [18]


> Не надо VCL форму переводить в полноэкранный режим :) Инициализируй
> графику (DX/OGL) в полноэкранном режиме - оно все тебе переведет
> и без глюков в виде сдвинутых окон. У обоих (DX/GL) есть
> соотв. флаг

Не знаю как в ОГЛ, но в ДДРОУ даже если ставишь флаги DDSCL_FULLSCREEN+DDSCL_EXCLUSIVE то окно максмимизируется но заголовок остается! ИМХО надо вызывать
 SetWindowLong(Handle, GWL_STYLE, WS_VISIBLE or WS_CLIPSIBLINGS or WS_CLIPCHILDREN);
 SetWindowLong(Handle, GWL_EXSTYLE, 0);


Asteroid   (2005-07-04 11:54:00) [19]

> NE_Parovoz
Не надо VCL форму переводить в полноэкранный режим :) Инициализируй графику (DX/OGL) в полноэкранном режиме - оно все тебе переведет и без глюков в виде сдвинутых окон. У обоих (DX/GL) есть соотв. флаг.

А в целом неплохо :)


cyborg   (2005-07-04 08:05:00) [20]

Посмотрел, прикольно, играл минут 15 :) не смотря на то, что графика страшная, музыка плохая и обрезанная, звуки коже не ахти, в микрофон ты там "бдыщ" говорил :)
Grell тебе всё правильно сказал.


Страницы:   1 2

Наверх

Титульная страница Поиск, карта сайта Написать письмо