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

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

А не устраивать ли нам небольшие конкурсы по кодингу? [Delphi, Windows]


Страницы:   1 2 ... 44 45 46 47 48 49 50 51 52 53

Darthman ©   (2004-06-21 23:23:00) 

Собственно, а почему нет?
Смотрите: Объявляется конкурс, далее не позже какого-то срока идет "сдача" проекта с полными исходниками публике. Все аспекты можно оговаривать в условиях конкурса (использование наработок, чужой графики, vcl или api для вывода графики....).
Что скажите господа?

Если есть интересующиеся, то я как следует обдумаю вопрос и могу стать, собственно, устроителем этих конкурсов (мыслей у меня много).

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


ПсихЪ_клон   (2004-06-26 15:28:00) [981]

Ну, я никогда не заморачивался микро-программами, вот, заценю ваши исходники и проникнусь этой фишкой!!! (:

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

Ладно, пофиг! Всё равно прикольно... (:

На самом деле меня больше всего интересует мнение по алгоритму. Ибо я тетрисы никакие никогда не делал. Т.е. делал вс с полного нуля.

Дарз, cyborg, вы какое АПИ юзаете?


> cyborg ©   (26.06.04 14:52) [71]

Нифига я не буду настаивать! Это моё поражение и нефиг тут ни на чём настаивать! Буду учится на ваших исходниках... (:


cyborg   (2004-06-26 14:52:00) [982]


> [68] Darthman   (26.06.04 14:45)

Так не честно, Фрипаскаль не умеет неиспользуемые функции отрубать, я не виноват в размере ;). Кстати, я не стал делать удаление по диагонали, мне лень, хотя они так же делаются как по горизонтали и вертикали. Можешь мне потом за это очки сизить, я не обижусь ;), главное я доказал себе, что могу сделать то, что ещё не делал, сделать быстро, стоит только захотеть.


Darthman   (2004-06-26 14:48:00) [983]

о звуках никто не говорит. Это конкурс на программирование, а не на звук. Да я и еще подумаю, мож в 64К еще и звуки впихну :)


Darthman   (2004-06-26 14:45:00) [984]

cyborg: стоит, стоит ;) но это не главное.
Фишки в полоске могут быть и все три одного цвета... не воспрещается.
Ну 75кб, ты не впроигрыше психу, но в проигрыше (в этом аспекте) мне, например.... я использую делфи7


Servelat   (2004-06-26 14:45:00) [985]

2 Darthman
Да нет,если бы 64 Kb, то просто пришлось бы от фоновых звуков отказаться...


Darthman   (2004-06-26 14:36:00) [986]

smb: вообще горизонтальные не подразумеваются. От трех естественно просчитывать... 4, 5, 6... сколько выстроиться

Упрощать, упрощать и еще раз упрощать. Для этого я и сделал 256кб ограничение. Мог бы вету на 64кб+ наложить, тогда просто бы желающих меньше было бы.


cyborg   (2004-06-26 13:58:00) [987]


> [65] ПсихЪ_клон   (26.06.04 10:20)
> Очень даже стоит судить по размеру.

Всётаки не стоит. Ты и сам сечас будешь настаивать на этом ;), у меня игра получилась почти в два раза меньше твоей.


ПсихЪ_клон   (2004-06-26 10:20:00) [988]


> cyborg ©   (26.06.04 08:58) [63]

Очень даже стоит судить по размеру. Ибо работа программиста, это не только напистаь алгоритм, но и оптимизировать. Ибо если это и не критично в таком маленьком проекте, то в крутейшем 3D-шутере будет очень нужно.

Кстати, я надеюсь никто не будет пользоваться пробелами и недоговорённостями в правилах и не будет использовать Ассемблер?

Я сейчас перенёс всё механику игры на движок, юзающий для вывода OpenGL, весит 150кб. Сейчас всяких наворотов добавлю, чтобы ровно в 256 уместиться и вышлю.

Использую 3 цвета шаров. Может ещё сделаю усложнение на их форму.
Шары уничтожаются только по 3, по ходу просчёта алгоритма. В алгоритме обнаружились 2 прикольных побочных эффекта, которые решено было зачислить в ФИЧИ, ибо действительно забавно... (:


cyborg   (2004-06-26 08:59:00) [989]


> Если в стакане в одном ряду (горизонтальном, вертикальном,
> диагональном) имеются квадратики одного цвета, то они удаляются
> и все оставшиеся квадратики в "стакане" падают вниз.


Забыл уточнить квадратики одного цвета в ряду в колличестве от трёх и более.


cyborg   (2004-06-26 08:58:00) [990]

[61] Servelat ©   (26.06.04 02:54)

В общем, как я понял, должно быть так:

Падает фигура вертикальная палочка из трёх квадратиковразных цветов.
Клавишами можно менять положение квадратиков смещая их вверх и вниз в этой палочке.
Клавишами вправа и влево можно менять положение этой палочки по горизонтали (она не переворачивается на бок).

Если в стакане в одном ряду (горизонтальном, вертикальном, диагональном) имеются квадратики одного цвета, то они удаляются и все оставшиеся квадратики в "стакане" падают вниз.

Darthman ©
Может по размеру не стоит судить? :) Так, как разные компиляторы разные размеры генерируют.


lokid7   (2004-06-26 05:27:00) [991]

Времени очень мало даете, нужно где-то недельку или чуть по-больше.


Servelat   (2004-06-26 02:54:00) [992]

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

Конечно, путано, но суть (надеюсь), уловить можно.

ЗЫ При задавании вопроса, я считал, что возможна горизонтальная палка (в [56] smb в этом усомнился), исходя из фразы:
>Игрок может стрелочками менять положениепри падении фигуры в стакан.
Хотя, тут можно понять по разному. Жду, что скажет Darthman.


Алекс А   (2004-06-26 02:00:00) [993]

Могу предложить задание.

Программа на логическом языке программирования РЕФАЛ - 5:
http://www.citforum.ru/programming/digest/morfolog.shtml

-----------------------
/* программа по распознаванию морфологии слов руссского языка */
/* по окончанию и приставке слова */
/* язык программирования РЕФАЛ 5 */
/* автор Ермолаев Д.С. dimonas_long@yahoo.com */
/* ввод одного слова с консоли */
$ENTRY Go { = <Prout <Question (<Card>) >>; };
/* таблица1. слова, которые имеют неправильное окончание */
WordsMissTable { =
( ('сел') 'сесть' )
( ('рек') 'чего' )
} ;
/* таблица2. окончания, по которым можно определить основу */
CompletionTable { =
 /* для глаголов */
( ('нули') 'ать')
( ('нул') 'ать')
( ('ает') 'ать')
( ('еть') 'ать')
( ('еч') 'ать')
( ('ал') 'ать')
( ('ел') 'ать')
 /* для прилагательных */
( ('вые') 'вый')
( ('вая') 'вый')
( ('ая') 'ой')
( ('ие') 'ой')
( ('ую') 'ой')
};
/* сама программа распознавания морфологической формы слова */
Question {
/* берем слово и ищем подходящее по шаблону в таблице1 */
(e.Word), <WordsMissTable>: e.L((e.Word)e.Qst)e.R = e.Qst;
/* иначе, бере окончание слова и ищем по шаблону в таблице2 */
(e.1 e.End), <CompletionTable>: e.L((e.End)e.Qst)e.R = e.1 e.Qst ;
/* иначе, слово неизменяемо */
(e.1) = e.1;
};


Автор в конце статьи пишет следующее :

Программа на РЕФАЛЕ состоит из трех предложений!

Интересно, сколько бы предложений программы пришлось бы написать для решения такой задачи на алгоритмическом языке? Например С++?


Кто может сделать самый короткий перевод на Дельфи ?


smb   (2004-06-25 22:06:00) [994]

Колбасьев    (25.06.04 21:56) [58]
File->New->Application
Project->Remove from Project->Unit1
Project->View Source


Колбасьев   (2004-06-25 21:56:00) [995]

Пардон это уже было в 53. Проглядел....
А как упрощять?


Колбасьев   (2004-06-25 21:54:00) [996]

По поводу праил: 256 - это не мало. Delphi по умолчанию генерирует где-то 200 (насколько помню D1-3) либо 300 (в 6-й).
Т.е. даже с "голой" программой, без смыслового кода, я уже на пройду!?


smb   (2004-06-25 21:35:00) [997]

Я еще новый ник придумать не успел, а вы тут замутили :)
Вот вопросы у меня некоторые:
> трехгоризонтальных, вертикальных или диагональных фишек одного цвета.
Только трех, или от трех до 5???
Можно ли, что бы при выпадении фигурки(палки) две клетки были одинаковые?
Палка должна быть ТОЛЬКО вертикальная? Или можно и горизонтальную?
Но с горизонтальной появятся еще вопросы.
Можно ли делать всего 6 цветов?
Должен ли быть интерфейс?


ПсихЪ_клон   (2004-06-25 14:22:00) [998]

Дык с формой!!! Без неё примерно так же весить будет. Ладно, пойду дописывать механику!


Darthman   (2004-06-25 14:14:00) [999]

>>Размер "стакана"
Такой какой счатаешь оптимальным в свой игре, чтобы было интересно и не слишком сложно.

>>ейчас, вместе с VCL-формой прога весит 375 кило. ):
Упрощать, батенька, упрощать...
Моя пока что весит 26Кб


ПсихЪ_клон   (2004-06-25 13:49:00) [1000]

Некоторые непонятки:
Размер "стакана", т.е. количество шаров, которое поместится с "стакан" по вертикали и горизонтали. Я использую "стакан" 9х12.

// ---
Собственно механика игры почти готова. Реализовал на GDI. Осталось только скриэтить форму на Api или заюзать DirectDraw, чтобы прога меньше весила.

Сейчас, вместе с VCL-формой прога весит 375 кило. ):


Страницы:   1 2 ... 44 45 46 47 48 49 50 51 52 53

Наверх

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