Игры на QBasic

только на кубэйсике?а как насчет Microsoft Small Basic или конструкторов игр?

 

SmallBasic — это вполне современный язык, а конструкторы здесь вообще перпендикулярно.

 

Начну, пожалуй.

F A L L I N G
_C I R C L E_

Простенький таймкиллер, задача - лететь падающим шариком сквозь прорехи в ползущих наверх планках и не дать ему коснуться верха экрана. За каждую пройденную планку даётся 10 очков. Каждые 50 очков скорость движения планок слегка увеличивается.
Есть бонусы, идут после 500 очков. К тому же каждые 700 очков происходит сброс скорости на первоначальную, но при этом увеличивается ускорение планок.
Управление - стрелки. Shift+F - показать FPS. Дебаг-режим найдёте в исходниках сами.
Также есть таблица рекордов.

Писалось всё это дело давным-давно, ещё в школе. Кодил я тогда вообще ужасно, но сорвать урок информатики таки умудрился. В прошлом году нашёл среди хлама на старом жёстком диске и от нечего делать доделал.

В интерпретаторе игра тормозит, поэтому рекомендую пользовать EXE.

 

Демки делал на QB 4.5

http://www.youtube.com/watch?v=rvziUKtnOuM

и сорцы с самим кубасиком, под досбокс прекрасно работает,
http://yadi.sk/d/2XDX32Ra6fsfw

 

Я помню, я взял NIBBLES.BAS ("Змейка" вдвоём) из стандартной поставки MS-DOS 6.22 и простейшим редактированием отключил исчезновение хвостов, переделав игру в игру (вдвоём) из фильма TRON.

 

Игра не моя, переписывал на GWBasic по памяти из "Науки и жизни". Претендует на звание самой короткой. Играть лучше толпой. В институте даже как-то втюхал ее под видом экспертной системы. Может использоваться при построении БД для уточнения критериев классификации сущностей:

Код:

10	OPTION BASE 1: DIM D$(1025): D$(1)="ЭТО КОТ": I=1: ON ERROR GOTO 80
20	PRINT D$(I);: INPUT O$: O$=LEFT$(O$,1)
30	IF I<512 THEN IF D$(I*2)<>"" GOTO 70
40	IF O$="Д" OR O$="д" THEN PRINT "УРРА-А!": I=1: GOTO 20
50	D$(I*2+1)=D$(I): INPUT "А КТО ЭТО";O$: D$(I*2)="ЭТО "+O$
60	INPUT "ЧЕМ ОТЛИЧАЕТСЯ";D$(I): I=1: GOTO 20
70	IF O$="Д" OR O$="д" THEN I=I*2: GOTO 20: ELSE I=I*2+1: GOTO 20
80	PRINT "НЕ ХВАТАЕТ МОЗГОВ!": END

 

Кстати, большинство программ/демок удобно и легко лягут под Blitz BASIC. Так покрасивше будет. Я сам так делал:
ВИЛЬНЮС БЕЙСИК -> QBasic -> Blitz BASIC -> ?
..жаль остался лишь прах на кассетах(((

 

Книга 101 BASIC Computer Games (редактор David H. Ahl, издана в 1978): http://www.atariarchives.org/basicgames/index.php
Правда, не все из этих 101 являются, на мой взгляд, именно играми.
Здесь программы из этой же книги, но не в сканах страниц, а в *.txt (ссылки во втором столбце таблицы): http://www.vintage-basic.net/games.html
Выше таблицы ссылки на архив с этими играми (bcg.zip, в нём их почему-то 106, а не 101) в *.bas (удивительно, но эту ссылку я до сегодняшнего дня не замечал).

 

Захотелось поднять эту тему снова.
Вот мой самый первый опыт в построении игр, написанный от нечего делать сегодня за 2 часа (да, я очень плохой программист..). До ужаса примитивная и неотлаженная игра про тараканьи бега. Писал в QBASIC под DOSBOX.

 

Игра со стрельбой по тарелочкам (управлять стрелками, стрелять пробелом, выходить эскейпом) и два рисунка. Сделано на QBasic

 

Помню что когда-то я видел код 3D игры на QBasic, кода я его скомпелировал, игра жутко тормазила на моем компьютере.

--- добавлено 5 июл 2018, предыдущее сообщение размещено: 5 июл 2018 ---

Это настоящий клад! Спасибо!

 

Люди, а вы вообще в курсе, что есть QBasic и есть QuickBasic, оба от Microsoft? В QuickBasic есть компилятор и компоновщик, а в QBasic - нет, там, насколько я понимаю, работает методом интерпретации. То есть QBasic (входящий в более поздние дистрибутивы MS-DOS) это урезанная версия QuickBasic.

 

@Grue13, про это даже педивикия в курсе не то что бородатые погромисты. Вот если бы кто то создал тему "Игры на Forth" - это было бы интереснее.

 

Читал про это когда-то.

--- добавлено 5 июл 2018, предыдущее сообщение размещено: 5 июл 2018 ---

в копилочку

исходники на QB
Файл из Облака Mail.Ru

 

Ого какая темка. Неужели кому то такие самоделки интересны.

Выложу свой архив самоделок, оставшийся с детства. Разумеется все является говнокодом. Архив не редактировал. Во всех программах задержка сделана через цикл, так что надо вручную регулировать скорость.

Сразу предупрежу, выложил только потому что такая тема тут есть, сами игры и программы представляют ужас в плане реализации и кода.

Soldier - полноценная игра с 51 уровнем. Делалось под впечатлением Chip's Challenge (PC), Fred (ZX Spectrum) и Socoban. Делал садист (то бишь я), в некоторых уровнях время ОЧЕНЬ ограничено. К сожалению редактор уровней и графики потерян. Игра недоделанная (планировалось гораздо больше уровней и элементов), но играбельная. Основная "фишка" игры - последнее прохождение уровня на аккаунте сохраняется и можно в любой момент посмотреть как проходил тот или иной уровень.
Soldier.new - хотел сделать ремейк с улучшенной графикой и палитрой, сделаны только редактор палитры и частично графический редактор.
Piton - где то на 80% сделан, графика готова вся, но игра недописана (запустить игру нельзя).
full3d - небольшая демка, вспоминал геометрию и черчение.
send и send2 - симулятор сыпящегося песка.
sun - делал дочке знакомой картинку с "палочек-кружочков", самому понравился результат, поэтому осталось.
ascii и ascii2 - утилиты для работы с таблицей символов.
function - строит график функции. Помогало в задачах по алгебре.
differ - проверяло правильность производной функции (визуально через построение касательной). Помогало в задачах в алгебре.

 

О! Спасибо!

 

Вот еще нашел у себя в документах, 3D графика :

 

Знаменитые старые игры на языке BASIC