Сапер(Игра)

@ShaZooke · Регистрация: 28.02.2010

Студворк — интернет-сервис помощи студентам

Все(ну мож и не все) мы знаем игру Сапёр (Я лично иногда люблю в неё зарубаться=))
Нужно написать программу-игру "Сапёр"
Если это осуществляется в делфи то просьба модераторам перекинуть тему на форум делфи и удалить это предложение=)))

@iama · 29.06.2011, 23:17

Сообщение от ShaZooke

перекинуть тему на форум делфи и удалить это предложение

Может тогда и на билдере сойдет? Правда, там мрак кромешный

@Puporev · 30.06.2011, 10:04

Вот простая на Делфи. Можно доделывать.

@ShaZooke · 02.07.2011, 21:53 **[ТС]**

А кто может ,не в двух-трёх, а хотбы в пяти словах описать как работает и вообще как нужно рассуждать чтобы написать сапёра? Так-сказать логический путь через основные принципы работы=))

@ShaZooke · 02.07.2011, 22:08 **[ТС]**

Сообщение от Puporev

Вот простая на Делфи. Можно доделывать.

Вот я скачал, архив который мне выложили...а вы мне можете объяснить почему там несколько различных файлов а EXEшник только 1, я так понимаю это какие вспомогательные коды? И зачем вообще так делают? В чём фишка?
Чесно говоря я дурачка не строю и не пристаю специально, просто интересуюсь как и где=))

@Puporev · 02.07.2011, 22:37

ShaZooke, Научитесь сначала писать что-то типа Hello World! А потом беритесь за нормальные программы.

@Андрей Борисови · 02.07.2011, 22:59

Алгоритм сапера очень хорошо и доступно расписан в справке стандартного виндового сапера

@ShaZooke · 02.07.2011, 23:01 **[ТС]**

Сообщение от Puporev

ShaZooke, Научитесь сначала писать что-то типа Hello World! А потом беритесь за нормальные программы.

Я писал средние программы, различные программы для алгеброических вычислений, небольшие приколы различные, хеллоу ворлд пишу на 7 языках, ну самой чоткой программой была интерактивная азбука формул по математике,физике, геометрии,алгебре с поддержкой меню...
Мне нада развиваться, стремиться к более сложному...вот сейчас пытаюсь паскалевскую графику освоить...и ненужно меня тормозить на "Hello World"
Не хотите мне помочь? Ладно, я не заставляю и права заставлять не имею...если вы можете только высмеивать то пожалуйста, переживу...

@ShaZooke · 02.07.2011, 23:02 **[ТС]**

Сообщение от Андрей Борисови

Алгоритм сапера очень хорошо и доступно расписан в справке стандартного виндового сапера

Спасибо, не знал=))

@Puporev · 02.07.2011, 23:04

Сообщение от ShaZooke

а вы мне можете объяснить почему там несколько различных файлов а EXEшник только 1,

Сообщение от ShaZooke

Мне нада развиваться,

Вот и прочитайте для начала первые страниц 50 из любого учебника по Делфи. А то такое ощущение, что Вы ни разу не видели исходников программ.

@ShaZooke · 02.07.2011, 23:15 **[ТС]**

Сообщение от Puporev

Вот и прочитайте для начала первые страниц 50 из любого учебника по Делфи. А то такое ощущение, что Вы ни разу не видели исходников программ.

Честно говоря, с делфи практически незнаком, я прислушаюсь к вашему совету, "откопаю" гденибудь учебник и прочту первые 50 страниц, для общего развития=))

murderer · 03.07.2011, 13:32

http://www.wasm.ru/forum/files... EXMINE.zip

@ShaZooke · 18.07.2011, 06:43 **[ТС]**

Сообщение от murderer

http://www.wasm.ru/forum/files... EXMINE.zip

Все стенки и антивири орут на эту ссылку, мол неходи туда, вири всякие да трояны!
Скажите хоть на что ссыль была?

@Puporev · 18.07.2011, 08:34

Сообщение от ShaZooke

Все стенки и антивири орут на эту ссылку

Никто ни на кого не орет, нормальный архив. Антивирь нормальный нужно иметь. У меня тоже когда-то Аваст стоял, так на экзешники Паскалевские орал, вообще не давал писать программы.
Написанный на asm вот такой сапер.

@Просто лис · 18.07.2011, 11:52

Дешево и сердито

Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
uses CRT;
Type
mas=array[1..10,1..10] of shortint;
procedure vivod(var a:mas; var i,j:shortint);
Var x,y:shortint;
begin
for x:=1 to 10 do
begin
for y:=1 to 10 do
begin
if (x=i) and (y=j)
then write(a[x,y],' ')
else Write('* ');
end;
writeln;
end;
writeln;
end;
Var a:mas; i,j,k:shortint;
begin
randomize;
for i:=1 to 10 do
begin
for j:=1 to 10 do
begin
a[i,j]:=random(9);
Write('* ');
end;
Writeln;
end;
Writeln;
k:=1;
repeat
Writeln('Õîä',k);
Writeln('Ââåäòå x,y');
readln(i,j);
if a[i,j]<>0
then begin k:=k+1;
vivod(a,i,j); end
else Writeln('Ïðîèãðàë');
until a[i,j]=0;
readln;
end.

murderer · 18.07.2011, 20:48

Вот ещё исходник на Делфи (108 строк).

@Просто лис · 19.07.2011, 01:37

murderer, а почему при попадании на мину игра никак не реагирует и игра продолжается?

murderer · 19.07.2011, 17:27

Немного переделал.

@Просто лис · 20.07.2011, 02:58

murderer, вот сейчас нормально

Новые блоги и статьи Все статьи Все блоги /
My Business CRM MaGz GoLd 16.04.2026 Всем привет, недавно возникла потребность создать CRM, для личных нужд. Собственно программа предоставляет из себя базу данных клиентов, в которой можно фиксировать звонки, стадии сделки, а также. . .	Знаешь почему 90% людей редко бывают счастливыми? kumehtar 14.04.2026 Потому что они ждут. Ждут выходных, ждут отпуска, ждут удачного момента. . . а удачный момент так и не приходит.	Фиксация колонок в отчете СКД Maks 14.04.2026 Фиксация колонок в СКД отчета типа Таблица. Задача: зафиксировать три левых колонки в отчете. Процедура ПриКомпоновкеРезультата(ДокументРезультат, ДанныеРасшифровки, СтандартнаяОбработка) / / . . .	Настройки VS Code Loafer 13.04.2026 { "cmake. configureOnOpen": false, "diffEditor. ignoreTrimWhitespace": true, "editor. guides. bracketPairs": "active", "extensions. ignoreRecommendations": true, . . .
Оптимизация кода на разграничение прав доступа к элементам формы Maks 13.04.2026 Алгоритм из решения ниже реализован на нетиповом документе, разработанного в конфигурации КА2. Задачи, как таковой, поставлено не было, проделанное ниже исключительно моя инициатива. Было так:. . .	Контроль заполнения и очистка дат в зависимости от значения перечислений Maks 12.04.2026 Алгоритм из решения ниже реализован на примере нетипового документа "ПланированиеПерсонала", разработанного в конфигурации КА2. Задача: реализовать контроль корректности заполнения дат назначения. . .	Архитектура слоя интернета для сервера-слоя. Hrethgir 11.04.2026 В продолжение https:/ / www. cyberforum. ru/ blogs/ 223907/ 10860. html Знаешь что я подумал? Раз мы все источники пишем в голове ветки, то ничего не мешает добавить в голову такой источник, который сам. . .	Подстановка значения реквизита справочника в табличную часть документа Maks 10.04.2026 Алгоритм из решения ниже реализован на примере нетипового документа "ПланированиеПерсонала", разработанного в конфигурации КА2. Задача №1: при указании работ (справочник РаботыПоРемонтуСпецтехники),. . .

@ShaZooke Жираф в квадрате 32 / 32 / 2 Регистрация: 28.02.2010 Сообщений: 282

	Сапер(Игра) 29.06.2011, 23:11. Показов 7212. Ответов 18 Метки нет (Все метки) Все(ну мож и не все) мы знаем игру Сапёр (Я лично иногда люблю в неё зарубаться=)) Нужно написать программу-игру "Сапёр" Если это осуществляется в делфи то просьба модераторам перекинуть тему на форум делфи и удалить это предложение=))) 0

@ShaZooke Жираф в квадрате 32 / 32 / 2 Регистрация: 28.02.2010 Сообщений: 282
	02.07.2011, 21:53 [ТС]
	А кто может ,не в двух-трёх, а хотбы в пяти словах описать как работает и вообще как нужно рассуждать чтобы написать сапёра? Так-сказать логический путь через основные принципы работы=)) 0

@Puporev Почетный модератор 64319 / 47615 / 32743 Регистрация: 18.05.2008 Сообщений: 115,167
	02.07.2011, 22:37
	ShaZooke, Научитесь сначала писать что-то типа Hello World! А потом беритесь за нормальные программы. 0

@Андрей Борисови 714 / 402 / 33 Регистрация: 04.10.2009 Сообщений: 1,686
	02.07.2011, 22:59
	Алгоритм сапера очень хорошо и доступно расписан в справке стандартного виндового сапера 1

murderer 4195 / 1841 / 223 Регистрация: 06.10.2010 Сообщений: 4,127
	03.07.2011, 13:32
	http://www.wasm.ru/forum/files... EXMINE.zip 0

@Просто лис Путешественник вселенной 189 / 161 / 119 Регистрация: 01.03.2011 Сообщений: 664
	19.07.2011, 01:37
	murderer, а почему при попадании на мину игра никак не реагирует и игра продолжается? 0

@Просто лис Путешественник вселенной 189 / 161 / 119 Регистрация: 01.03.2011 Сообщений: 664
	20.07.2011, 02:58
	murderer, вот сейчас нормально 0