nsinreal Nov 18 2009 at 17:51

Свой сапер на своих батниках

6 min

13K

Abnormal programming*

+213

118

Comments 118

UFO just landed and posted this here

Levsha100 Nov 18 2009 at 23:02

Пошел учить как писать батники :)

bolk Nov 19 2009 at 00:21

Да зачем? Есть Windows script Host и PowerShell.

nsinreal Nov 19 2009 at 00:25

Так не интересно

bolk Nov 19 2009 at 01:12

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

nsinreal Nov 19 2009 at 01:25

Ну вот, изучаю WSH. Возник вопрос.

Есть js-файл. Каким образом заставить его юзать java? Т.е. вписать в WSH скрипт что-то типа:

MyIP = new String(java.net.InetAddress.getLocalHost().getHostAddress())

И радостно пользоваться java.

rengo Nov 19 2009 at 03:28

Если Java экспортирует COM-объекты — всё можно сделать.

bolk Nov 19 2009 at 11:24

Почему вы решили что это так должно работать?

Levsha100 Nov 19 2009 at 14:08

Я его уже знаю :)

nsinreal Nov 19 2009 at 17:42

Учите ассемблер и структуру exe файлов. Сможете написать заметку как с помощью debug.exe написать сапер. Это будет гораздо круче!!!

UFO just landed and posted this here

kegf Nov 18 2009 at 17:56

ты безумен!

+28

Revult Nov 18 2009 at 17:58

Отлично! Ждем «Морской бой» и его сетевую версию.

nsinreal Nov 18 2009 at 18:00

Хорошо, почитаю правила морского боя и постараюсь сделать. По поводу сети — необходимо работать с файлами через сетевой каталог, никаких сокетов и телнетов.

nsinreal Nov 18 2009 at 18:02

Хотя… Еще ftp есть. Но это уже будет не default-only — для создания ftp-сервера нужно самому выполнить установку ftp-сервера

romka777 Nov 18 2009 at 18:31

можно поднять один ftp в интернете «на всех», зашить его настройки, а «сетевая игра» переименовать в «игра по интернету»

hTLK Nov 18 2009 at 18:35

Ага, и туда все кому не лень сразу файлов понакидают :)

nsinreal Nov 18 2009 at 18:40

Если добавить ауторизацию по паролю…

Dragonizer Nov 18 2009 at 20:49

… который опять же любой желающий сможет выковырять из батника. (Спасибо, что оставили многоточие в конце для возможности продолжения :)).

nsinreal Nov 18 2009 at 20:58

А вот если имя/пароль вводить ручками и в батнике просто отправлять данные ftp-серверу…

nsinreal Nov 18 2009 at 18:37

Ну да, единственное — будут некоторые траблы с правами доступа. Ну никак не хочется чтобы мой сервер был дыряв. Решить м.б. можно паролями.

Revult Nov 18 2009 at 18:07

А сервер с доступом по телнету не подойдет?

nsinreal Nov 18 2009 at 18:09

Сколько я не рыскал по форумам — управлять телнетом невозможно. Может быть такая штука есть в wsh, но вряд-ли

Deepwalker Nov 18 2009 at 20:29

А netcat нету? Просто спросил, правда правда.

nsinreal Nov 18 2009 at 20:36

Честно, нету в стандартной поставке Windows. Да и не во всяком дистрибутиве сразу после установки встретишь.

bolk Nov 19 2009 at 00:22

На «Хабре» были крестики-нолики по сети на батниках, посмотрите там, там через сетевую шару было сделано.

CAH4A Nov 18 2009 at 18:08

О! Ждём сразу Quake ]|[…

alexxxst Nov 18 2009 at 18:08

Аааааа!!!

UFO just landed and posted this here

Kakysha Nov 18 2009 at 18:13

Ну теперь то я смогу её пройти на последнем уровне?

a_v Nov 18 2009 at 18:13

Следующей программой будет Сапёр на Brainfuck? :)

nsinreal Nov 18 2009 at 18:18

Нет, следующей программой должен был BrainFuck. Но из-за особенностей восприятия треугольных скобок cmd.exe, это не является осуществимой задачей.

+10

vasfed Nov 18 2009 at 23:07

Тогда впору подумать о Whitespace (http://en.wikipedia.org/wiki/Whitespace_%28programming_language%29 ) :)

vasfed Nov 18 2009 at 23:09

простите, вот ссылка: Whitespace(wikipedia)

yonyonson Nov 18 2009 at 18:15

Хорошо!
Даёшь сапёр на sed.

Kapatskiy Nov 18 2009 at 22:27

Да чего уж там! Даешь Galaxy Invaders!!! :)

Sannis Nov 19 2009 at 01:54

Вам не хватает тетриса? :)

yonyonson Nov 19 2009 at 02:00

и целого мира мало ;)

usja Nov 18 2009 at 18:16

Полчаса из жизни за игрой улетели :)

slik Nov 18 2009 at 18:31

а виндовая cmd.exe не позволяет расскаживать текст?

Dragonizer Nov 18 2009 at 20:51

Насколько я знаю, можно сменить только общий цвет фона и общий цвет символов, и все. Так что, в любом случае два цвета.

porchini Nov 18 2009 at 18:38

неправильный у тебя сапёр получился…
в виндовом невозможно взорваться на первом ходу. В твоём можно.

Serzhenko Nov 18 2009 at 18:42

Я совершал невозможное.

Пруф?

Guria Nov 18 2009 at 18:59

возможно это было на старых версиях?
вообще в виндовом сапере генерация поля происходит после первого хода исключая эту клетку

UFO just landed and posted this here

porchini Nov 18 2009 at 18:59

респект тебе, повторить сможешь? :)

Serzhenko Nov 18 2009 at 21:22

Не смогу, в виду отсутствия у меня виндового сапёра, а также винды и wine'а :)

-1

Guria Nov 18 2009 at 19:00

пруф с вас, собственно.

Zyava Nov 18 2009 at 19:05

Ага, сапер из Вин 98. Не одну пару так коротал и подтверждаю, там случался взрыв на первом ходе.

-2

nsinreal Nov 18 2009 at 19:06

Хм, а у меня и в Хрюше такие несчастья были.

-2

porchini Nov 18 2009 at 19:09

ребят, «случался» и «10 из 10 раз при первом ходе на o 22» — это разные вещи, не правда ли?

-1

nsinreal Nov 18 2009 at 18:44

И хлеб раньше был по пять копеек. Это возможно. Правда там довольно редко подрываются при открытии точкии 1:1, а у меня часто.

porchini Nov 18 2009 at 18:59

ок, давай я перефразирую :)
в виндовом сапёре даже при самых хардкорных кастомных параметрах (сетка 9x9, 64 мины) проиграть на первом же клике весьма маловероятно. Крайне маловероятно.
За мою многолетнюю карьеру мне ни разу не посчастливилось проиграть на первом же ходу.

Levsha100 Nov 18 2009 at 23:40

Потому, что мины расставляются уже после клика.

Levsha100 Nov 18 2009 at 23:44

На одном форуме проверяли это таким способом:

Win 3.x: Hажмите Shift и набеpите XYZZY. Отпyстите клавишу и опять набеpите XYZZY. Левый веpхний пиксел клетки бyдет чеpным, если под клеткой есть мина, и белым — если нет. Вкушайте!
win.by.ru/HiddenTips.html

nsinreal Nov 18 2009 at 23:45

Эх, какая разница, все равно теперь у меня все работает замечательно

iPavel Nov 18 2009 at 19:00

Подтверждаю. Препод доказывал с помощью Spy++

porchini Nov 18 2009 at 19:13

[zanuda mode]
Короче, nsinreal, у тебя в левом верхнем углу лежит магнит, который влияет на рандомность расположения мин. Они все смещены к верхнему левому углу.
[/zanuda mode]

nsinreal Nov 18 2009 at 19:16

Угу, понял. Разбираюсь с магнитом. Он тянет просто влево.

Kalobok Nov 18 2009 at 19:39

Может, дело в %random:~0,2%? Ведь вероятность получить числа от 0 до 32 заметно больше, чем 33-99.

Kalobok Nov 18 2009 at 19:49

Упс, извиняюсь, там еще хитрее. Три диапазона: 0-9, 10-32 и 33-99. Их вероятности соотносятся примерно как 1:1000:100. ИМХО, правильнее было бы брать последние две цифры от random.

nsinreal Nov 18 2009 at 19:56

Черт, вы правы. Сейчас еще кое-что подкоректирую и перезалью

nsinreal Nov 18 2009 at 21:30

Исправлено.

nsinreal Nov 18 2009 at 21:31

Исправлено.

petrovi4 Nov 18 2009 at 18:38

Ты маньяк! И ты крут! ))

shiko_1st Nov 18 2009 at 18:41

Это нечто воистину прекрасное!

Serzhenko Nov 18 2009 at 18:42

Автор! Вы мой кумир! :)))

Serzhenko Nov 18 2009 at 18:43

Отсыпал ТС плюсов куда смог :)

nochnoy Nov 18 2009 at 18:47

Строчки format c: не нашёл, но всё равно играть ссыкотно.

nsinreal Nov 18 2009 at 19:10

Плохо искали!

akmute Nov 18 2009 at 18:48

Боже… найдите себе девушку! :)

+14

jkeks Nov 18 2009 at 19:08

Не писали ли вы серверное удаленное управление на батнегах?
так сказать шелл…

xdisa Nov 18 2009 at 19:08

Нужно сделать сетевой сапер. Суть в следующем: при подрыве на мине, игра завершается только для того, кто подорвался. Батник пишет эту информацию в расшаренный файл на сервере, другие батники игроков читают, и также раскрывают мину :)

4udik Nov 18 2009 at 19:10

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

UFO just landed and posted this here

4udik Nov 18 2009 at 19:26

сделал допущение по третьей строке — две двойки в 63 и 53 должны были дать с большой вероятностью в 52 окошко ;)

nsinreal Nov 18 2009 at 19:34

Такие ситуации возникают почти во всех саперах (точнее — во всех которые я знаю)

UFO just landed and posted this here

4udik Nov 18 2009 at 19:44

а еще бывает вот такая подлянка:

4udik Nov 18 2009 at 19:45

в 11 было безопасно :((

vovkasolovev Nov 18 2009 at 19:57

Рамочки надо такие:
╔═╗
╟─╢
╚═╝

UFO just landed and posted this here

nsinreal Nov 18 2009 at 20:00

Учтем-с

nsinreal Nov 18 2009 at 21:34

Исправлено распределение мин, мины на первом ходу ~~уходят в небеса~~ перемещаются, теперь нужно открыть как минимум одну клетку для перебора флагов (лень было добавлять еще одну строку)

CyberZlodey Nov 18 2009 at 20:09

До кучи можно добавить сохранение :)

nsinreal Nov 18 2009 at 20:09

Всмысле? Запись в файл как в таблицу рекордов?

CyberZlodey Nov 18 2009 at 20:39

Да, что то вроде пункта «Чемпионы» виндового Сапера. Хотя конечно возможен и вариант с сохранением текущего состояния открытых полей, дабы при следующем запуске продолжить с того же места )

nsinreal Nov 18 2009 at 20:45

Последнее делать не буду — поле маленькое. А вот таблица рекодов будет выводиться по команде r

FTM Nov 18 2009 at 20:45

Итак, особенности данного продукта:
Оригинальное лого

Особенно порадовало ))).

sleeplessaek Nov 18 2009 at 21:19

Реально заборная вещь. Неплохо реализовать возможность загрузки минного поля и его сохранение. Как задачки для ума. В шахматах есть, почему бы и в сапере не заиметь.

epRVaA Nov 18 2009 at 21:45

Они везде! Фанаты сапера! Сам писал лет 6 назад на турбо паскале эту игру. Вполне играбельно было, но для открытия клетки следовало вводить координаты что затягивало процесс.
PS. В оригинальном сапере 78 сек на профессиональном уровне. Не рекорд конечно, но тоже неплохо

nsinreal Nov 18 2009 at 21:47

Ну, здесь та же трабла.

karlicos Nov 18 2009 at 21:53

А тут учтена такая ситуация?
***
***
***
То есть если * — мина, центральную мину невозможно будет как-либо обнаружить)

nsinreal Nov 18 2009 at 21:59

Нет, не учтена. Покажите мне программу, которая учитывает такую ситуацию.
Но такие ситуации довольно редки и их можно, впринципе, определить по количеству флагов и бомб

karlicos Nov 18 2009 at 22:13

Программ не знаю)) Просто после ежедневного задротства в сапера по пути домой пришла такая идея, но вообще таких ситуаций никогда не встречал) Всегда тыкаю в центральную в таком случае — там восьмерка)

UFO just landed and posted this here

aryeh Nov 19 2009 at 00:46

Даёшь 3Д Кваку на батниках!!!

nsinreal Nov 19 2009 at 00:53

У вас мандельброт уже досчитался?

aryeh Nov 19 2009 at 12:50

Ой, не видел. Сейчас запущу, досчитается — отчитаюсь :-)

deniamnet Nov 19 2009 at 07:19

вы — псих, вам говорили? :)

Sta2s Nov 19 2009 at 11:02

Прочитал название и сразу как отркылась статья стал скроллить вниз в целях найти кнопку или ссылку скачать.

ystein Nov 19 2009 at 11:05

В сапере есть одна особенность: если рядом с клеткой 0 бомб, то открываем рядом стоящие клетки (не по диагонали).

А вот это пофиксить никак нельзя, чтобы и по диагонали? А то как-то непривычно получается…

ystein Nov 19 2009 at 11:15

И еще одну ошибку нашел — после первого хода авто-открывание не работает.

ystein Nov 19 2009 at 11:49

И еще: Я заменил все вопросительные знаки (?) на точки (.) — Стало гораздо удобнее.
А в обработчике команд — убрать команду «o». Вместо нее — просто номер клетки.

nsinreal Nov 19 2009 at 12:00

Окей, будет сделано. С багом автооткрытия клеток разбираюсь — почему-то он не всегда проявляется

nsinreal Nov 19 2009 at 12:03

По-моему нашел проблему — я не дописал функцию переноса бомбы

nsinreal Nov 19 2009 at 12:37

Все ваши замечания исправлены. Проверяйте.

ystein Nov 19 2009 at 12:45

Проверил. Спасибо, супер вещь!

nsinreal Nov 19 2009 at 12:37

Обновил сапер

EugeneKudashev Nov 19 2009 at 13:17

Класс. Ну в топике ~~добра~~ любителей сапёра можно написать о другой классной sweep-based игре: Nonosweeper. Оформление такое же, но принцип логического «вскрытия» поля — другой (нонограммы). Затягивает жутко. Рекомендую попробовать для любителей сапёра как занятную альтернативу.