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

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

Прошу мастеров посмотреть [Delphi, Windows]


Страницы:   1 2 3

Аццкий_рыцарь ©   (2006-09-20 02:33:00) 

Я нюб в кодинге. Хотя начал кодить довольно давно, но времени на него мало посвящал. Я тут временами лазил и задавал вопросы. Вот снова решил "расконсервировать" :) мой нубский проэкт. Мне бы очень хотелось, чтоб вы посмотрели на мой код и рассказали об ошибках в нем. Написано на ДелфиХ.

вот собсна код:

http://file.cyfra.net/files.php/fed0151693f2b5b03a4e294441263abf/SuperGame.rar

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

з.ы. Cash привет, если помнишь :)


Аццкий_рыцарь   (2006-11-13 01:55:00) [21]

ANTPro, ты говоришь оставить только сорцы.

grouzd)ev, ты говоришь оставить скомпилированный ехе

кто-то еще говорит удалить скомпилированный ехе, потому что сильно много трафика :)))

grouzd)ev, установи плиз, неленись! :) буду ОЧЕНЬ ПРИЗНАТЕЛЕН!


grouzd)ev   (2006-11-13 01:27:00) [22]

Смогу. Почему нет скомпилированного exe? У меня нет DelphiX. Устанавливать что? Правильно, лень =)

---
... we are walking on a thin line and you better avoid the risk ...


ANTPro   (2006-11-13 01:21:00) [23]

> [28] Аццкий_рыцарь   (13.11.06 00:55)

Положи сорцы отдельно они около 5кб...
Я лично больше ЭТО качать не собираюсь...


Аццкий_рыцарь   (2006-11-13 00:55:00) [24]

а! вот так надо было! :) люди, ну вы даете. Разве можно быть таким ленивым?

Лана! Флуд закончен! Сможет ли кто-то раскритиковать моё ваяние и обьяснить мои ошибки?


rts111   (2006-11-12 17:59:00) [25]

Специально для ленивых программистов:

http://Megadich1.narod.ru/screenshot01.JPG


Ketmar   (2006-11-12 13:13:00) [26]

ни разу. ты проверь, проверь свои посты после отправки.

хинт: форум распознает линки, если они начинаются с "http". мне лично лениво делать лишние мышкодвижения. это надо клаву бросать, крысу искать, целиться... %-)


Аццкий_рыцарь   (2006-11-12 13:11:00) [27]

www.Megadich1.narod.ru/screenshot01.JPG

так лучше? :)


Ketmar   (2006-11-12 12:49:00) [28]

а теперь ссылку поленился прописать полностью. ну что ж у тебя как не одно, так другое?! %-)


Аццкий_рыцарь   (2006-11-12 07:14:00) [29]

Скриншот? пжалста!  

Megadich1.narod.ru/screenshot01.JPG


Ketmar   (2006-11-11 23:45:00) [30]

>[19] Аццкий_рыцарь 11-Nov-2006, 15:40
>Какая разница? Уйдет столько же трафика как и на скрин...
а такая, что в бровзере умеют показывать bmp, jpg, png, gif. а rar -- не умеют.

>российский сервак. А то я незнаю че у вас да как :)
я тоже не знаю, что в России да как.

>[21] Аццкий_рыцарь 11-Nov-2006, 16:19
>люди вы мне только скажите сервак куда можно кинуть скрин
>чтоб сразу открывался! Я сразу залью!
narod.ru


Аццкий_рыцарь   (2006-11-11 16:19:00) [31]

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

люди вы мне только скажите сервак куда можно кинуть скрин чтоб сразу открывался! Я сразу залью!


grisme   (2006-11-11 16:16:00) [32]

понимаешь, просто хочется ткнуть и сразу увидеть, что за скрин :0) а не тыкать, потом опять тыкать, выбирать где сохранить, тыкать, набирать в консоли, распаковывать, открывать :0) видишь какая разница в количестве действий? вот, а программисты - люди ленивые, в основном


Аццкий_рыцарь   (2006-11-11 15:40:00) [33]

Какая разница? Уйдет столько же трафика как и на скрин...

А ты не знаешь куда можно скрины выкладывать? Всмысле российский сервак. А то я незнаю че у вас да как :)


Ketmar   (2006-11-11 15:08:00) [34]

>[16] Аццкий_рыцарь 11-Nov-2006, 03:37
>упс, забыл! вот скрин http://slil.ru/23386921
какой это, в пень, скрин? это архив. в топку.


Аццкий_рыцарь   (2006-11-11 14:40:00) [35]

Пацаны! Ну плиз, посмотрите!


Аццкий_рыцарь   (2006-11-11 03:37:00) [36]

упс, забыл! вот скрин http://slil.ru/23386921


Аццкий_рыцарь   (2006-11-11 03:33:00) [37]

Всем снова хай:) Поднимаю топик, наконец-то снова добрался сюда.

вот сливаю вариант игры без темп файлов и экзешника. Он весит 746 кб, думаю это нормально :)

http://slil.ru/23386914

очень прошу посмотреть! укажите плиз на главные ошибки. И расскажите где и как можно модернизировать\ускорить\отладить код. И еще, почему игра показывает так мало ФПС?


ПЛОВ   (2006-09-25 18:23:00) [38]

Начинать нужно со скриншотов. Так делают культурные люди. :)


ANTPro   (2006-09-23 01:06:00) [39]

Аццкий_рыцарь   (22.09.06 23:33) [12]
Тоесть мне надо сделать чтоб графика хранилась в одном файле?

Только не так :) зачем?

Поправочка
ИМХО Сорцы не плохо бы по стандартам оформлять

Аццкий_рыцарь   (22.09.06 23:33) [12]
И как это "по стандартам" ?

Где то http://rsdn.ru/видел но там для сей
Качни любой сорец открытой проги (Inno Setup например)

У тебя все в куче:

...
 tick:=tick-1;
if explode=false then
  begin
if tick=0 then
begin
for kolchastic:=1 to trunc (20) do
begin
n:=random(100);
 particle[n].xloc:=trunc(x)-mirx+random(13);
 particle[n].yloc:=trunc(y)-miry+random(13);
end;
 tick:=1;
 end;
 end;
   collision;

   end;

     procedure Tfireball.DoCollision(Sprite: TSprite; var Done: Boolean);

 begin

 pixelcheck:=false;

   if Sprite is TObjectdo then   // see's if what the bullet collided with was an enemy
   begin
    image:=form1.DXImageList2.Items.Items[2];
 x:=x-20;
      y:=y-20;
      animlooped:=false ;
      explode:=true;

        end;

  if Sprite is Tkozel then
   begin

    if (y>sprite.y+15) and (y<sprite.y+70) and (x>sprite.x+30) and (x<sprite.x+65) or(y>sprite.y+15) and (y<sprite.y+80) and (x+15>sprite.x+30) and (x+15<sprite.x+65) or(y+15>sprite.y+15) and (y+15<sprite.y+80) and (x>sprite.x+30) and (x<sprite.x+65) or(y+15>sprite.y+15) and (y+15<sprite.y+80) and (x+15>sprite.x+30) and (x+15<sprite.x+65) then
    begin
   if TKozel(sprite).movego= true then
     begin
     frags:=frags+1;
        image:=form1.DXImageList2.Items.Items[2];
    tkozel(sprite).DoDie;
      x:=x-20;
      y:=y-20;
      explode:=true;
      animlooped:=false  ;
      end;
      end;

    end;
     end;
...


Аццкий_рыцарь   (2006-09-22 23:33:00) [40]

Тоесть мне надо сделать чтоб графика хранилась в одном файле? И как это "по стандартам" ?


Страницы:   1 2 3

Наверх

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