Форум

/@

Загрузить изображение, видео или мир

Для загрузки необходимо войти.

Лента (Популярное)

Изображение
Мемес
ID: 1352 | [Перейти к посту]
Аватар
Автор: pechenie ✓ Пурпурный
1
+1 / -0
Изображение
Тир лист игр PRISM
ID: 1351 | [Перейти к посту]
Аватар
Автор: pechenie ✓ Пурпурный
1
+1 / -0
Изображение
// Змейка — классическая игра на языке Ы
// Управление: стрелки / WASD
// q — выход

функция змейка() ::> {
сырой_режим(истина)
вывести("\x1b[?1049h\x1b[?25l")

своя т = размер_терминала()
своя ширина = т[0]
своя высота = т[1]
своя поле_ш = ширина - 2
своя поле_в = высота - 3
если (поле_ш < 10) ступень ::> { поле_ш = 10 }
если (поле_в < 10) ступень ::> { поле_в = 10 }

своя длина_тела = 3
своя голова_х = 5
своя голова_у = поле_в / 2
своя напр_х = 1
своя напр_у = 0

// тело[0] = голова (O), тело[1..] = хвост (o)
своя тело = (голова_у * поле_ш + голова_х)..(голова_у * поле_ш + голова_х + 1)
тело = тело ++ ((голова_у * поле_ш + (голова_х - 1))..(голова_у * поле_ш + голова_х))
тело = тело ++ ((голова_у * поле_ш + (голова_х - 2))..(голова_у * поле_ш + (голова_х - 1)))

своя еда_поз = 0
своя еда_годна = ложь
своя счёт = 0
своя работаем = истина
своя игра_идёт = истина

пока (работаем) ступень ::> {
если (не еда_годна) ступень ::> {
еда_поз = случайное(поле_ш * поле_в)
еда_годна = истина
своя к = 0
пока (к < длина_тела) ступень ::> {
если (тело[к] == еда_поз) ступень ::> { еда_годна = ложь }
к = к + 1
}
}

своя буфер = "\x1b[H"
своя к = 0
буфер = буфер ++ "#"
пока (к < поле_ш) ступень ::> {
буфер = буфер ++ "#"
к = к + 1
}
буфер = буфер ++ "#\r\n"

своя у = 0
пока (у < поле_в) ступень ::> {
буфер = буфер ++ "#"
своя х = 0
пока (х < поле_ш) ступень ::> {
своя поз = у * поле_ш + х
своя символ = " "
если (поз == еда_поз) ступень ::> { символ = "*" }
иначе ступень ::> {
своя з = 0
пока (з < длина_тела) ступень ::> {
если (тело[з] == поз) ступень ::> {
если (з == 0) ступень ::> { символ = "O" }
иначе ступень ::> { символ = "o" }
}
з = з + 1
}
}
буфер = буфер ++ символ
х = х + 1
}
буфер = буфер ++ "#\r\n"
у = у + 1
}

к = 0
буфер = буфер ++ "#"
пока (к < поле_ш) ступень ::> {
буфер = буфер ++ "#"
к = к + 1
}
буфер = буфер ++ "#\r\n"
буфер = буфер ++ " Счёт: " ++ счёт ++ " Q:Выход"
если (не игра_идёт) ступень ::> { буфер = буфер ++ " ИГРА ОКОНЧЕНА!" }
вывести(буфер)

своя кл = клавиша()
если (кл == "q") ступень ::> { работаем = ложь }
если (игра_идёт) ступень ::> {
если (кл == "\x1b[A") ступень ::> {
если (напр_у != 1) ступень ::> {
напр_х = 0
напр_у = -1
}
}
}
если (игра_идёт) ступень ::> {
если (кл == "\x1b[B") ступень ::> {
если (напр_у != -1) ступень ::> {
напр_х = 0
напр_у = 1
}
}
}
если (игра_идёт) ступень ::> {
если (кл == "\x1b[D") ступень ::> {
если (напр_х != 1) ступень ::> {
напр_х = -1
напр_у = 0
}
}
}
если (игра_идёт) ступень ::> {
если (кл == "\x1b[C") ступень ::> {
если (напр_х != -1) ступень ::> {
напр_х = 1
напр_у = 0
}
}
}
если (игра_идёт) ступень ::> {
если (кл == "w") ступень ::> {
если (напр_у != 1) ступень ::> {
напр_х = 0
напр_у = -1
}
}
}
если (игра_идёт) ступень ::> {
если (кл == "s") ступень ::> {
если (напр_у != -1) ступень ::> {
напр_х = 0
напр_у = 1
}
}
}
если (игра_идёт) ступень ::> {
если (кл == "a") ступень ::> {
если (напр_х != 1) ступень ::> {
напр_х = -1
напр_у = 0
}
}
}
если (игра_идёт) ступень ::> {
если (кл == "d") ступень ::> {
если (напр_х != -1) ступень ::> {
напр_х = 1
напр_у = 0
}
}
}

если (игра_идёт) ступень ::> {
своя нов_х = голова_х + напр_х
своя нов_у = голова_у + напр_у
своя нов_поз = нов_у * поле_ш + нов_х
если (нов_х < 0) ступень ::> { игра_идёт = ложь }
если (нов_х >= поле_ш) ступень ::> { игра_идёт = ложь }
если (нов_у < 0) ступень ::> { игра_идёт = ложь }
если (нов_у >= поле_в) ступень ::> { игра_идёт = ложь }
если (игра_идёт) ступень ::> {
своя к_т = 1
пока (к_т < длина_тела) ступень ::> {
если (тело[к_т] == нов_поз) ступень ::> { игра_идёт = ложь }
к_т = к_т + 1
}
}
если (игра_идёт) ступень ::> {
если (нов_поз == еда_поз) ступень ::> {
длина_тела = длина_тела + 1
счёт = счёт + 1
еда_годна = ложь
}
// Новое тело: [нов_голова, тело[0], тело[1], ..., тело[длина_тела-2]]
своя новое_тело = (нов_поз..(нов_поз + 1))
своя предел = длина_тела - 1
своя к_дв = 0
пока (к_дв < предел) ступень ::> {
новое_тело = новое_тело ++ (тело[к_дв]..(тело[к_дв] + 1))
к_дв = к_дв + 1
}
тело = новое_тело
голова_х = нов_х
голова_у = нов_у
}
}

пауза(150)
}

вывести("\x1b[?1049l\x1b[?25h")
сырой_режим(ложь)
вывести("Счёт: " ++ счёт)
}

змейка()


Ы скоро...
ID: 1350 | [Перейти к посту]
Аватар
Автор: oxi ✓ Мастер
1
+1 / -0
Изображение
Упоротыши
ID: 1345 | [Перейти к посту]
Аватар
Автор: pechenie ✓ Пурпурный
1
+1 / -0
Изображение
((1342)) если что они по приколу написанны, это юмористическое произвдение, не воспринимайте это серьёзно. Напоминаю, я сам в шоке, что у меня по литературе не 2
ID: 1343 | [Перейти к посту]
Аватар
Автор: pechenie ✓ Пурпурный
1
+1 / -0
Изображение
((oxi)) поздравляю с возвращением домой и хорошим отпуском
ID: 1341 | [Перейти к посту]
Аватар
Автор: pechenie ✓ Пурпурный
1
+1 / -0
Изображение
Сплав
ID: 1339 | [Перейти к посту]
Аватар
Автор: oxi ✓ Мастер
1
+1 / -0
Ну красавец, ну жених
pechenie✓Пурпурный22.07.2026 10:45((1339-401))
0
Изображение
Фанни Жирлинтайн
ID: 1333 | [Перейти к посту]
Аватар
Автор: pechenie ✓ Пурпурный
1
+1 / -0
Изображение
Крутой мужик был
ID: 1332 | [Перейти к посту]
Аватар
Автор: pechenie ✓ Пурпурный
1
+1 / -0
Изображение
Ну наконец-то скачалось
ID: 1331 | [Перейти к посту]
Аватар
Автор: pechenie ✓ Пурпурный
1
+1 / -0
Изображение
Отсылочка
ID: 1328 | [Перейти к посту]
Аватар
Автор: pechenie ✓ Пурпурный
1
+1 / -0
Изображение
Мемес
ID: 1327 | [Перейти к посту]
Аватар
Автор: pechenie ✓ Пурпурный
1
+1 / -0
Изображение
Мемес
ID: 1326 | [Перейти к посту]
Аватар
Автор: pechenie ✓ Пурпурный
1
+1 / -0
Изображение
Какой фиолетовый цвет красивее ?
ID: 1324 | [Перейти к посту]
Аватар
Автор: oxi ✓ Мастер
1
+1 / -0
У нашего сайта
pechenie✓Пурпурный22.07.2026 10:46((1324-403))
0
Изображение
скрафтил
ID: 1322 | [Перейти к посту]
Аватар
Автор: oxi ✓ Мастер
1
+1 / -0
Спидранер
pechenie✓Пурпурный22.07.2026 10:46((1322-404))
0
Музей полудрагоценных камней
oxi✓Мастер18.07.2026 02:18((1322-390))
0
Изображение
Панорама шедеврального вида на Алтае
ID: 1321 | [Перейти к посту]
Аватар
Автор: oxi ✓ Мастер
1
+1 / -0
Изображение
Был бы ты человеком Ебаный ты Эйден шмейден
ID: 1318 | [Перейти к посту]
Аватар
Автор: Главнокомандующий hitler
1
+1 / -0
Изображение
Ur20 выйдет ! Не знаю когда, но это будет одно из лучших обновлений, самой лучшей игры PRISM
ID: 1314 | [Перейти к посту]
Аватар
Автор: pechenie ✓ Пурпурный
1
+1 / -0
Изображение
Эхх, были времена ((1))
ID: 1309 | [Перейти к посту]
Аватар
Автор: bowserka0
1
+1 / -0
Изображение
Зацените новиночку
Спойлер
Покупал тут https://www.sound-barrier.ru/Ru/ChooseCatalog.aspx там сейчас на кучу пластинок скидка 50%
ID: 1306 | [Перейти к посту]
Аватар
Автор: pechenie ✓ Пурпурный
1
+1 / -0
Изображение
ID скопирован!
Правила
Обновлённые правила prism software 1. Не публиковать порнографический контент 2. Не публиковать шокирующий контент (трупы, увечия и тд) 3. Не заниматься пропагандой нацизма и/или терроризма 4. Не спамить (если вы случайно запостили один пост несколько раз, просто удалите копии) 5. Не заниматься мошенничеством 6. Прочие причины (например ввод людей в заблуждение, выдача себя за администрацию) Если вам кажется что какой-то пост нарушает правила напишете в тред reports/ id треда и его нарушение Бан по всем пунктам можно попытаться оспорить в личной переписки с главным администратором Текущий главный администратор: pechenie Отзыв подтвержденного аккаунта или звания администратора может быть использовано за длительное бездействие и/или нарушения Бан может быть выдан за нарушения правил сообщества Бан аккаунта по всем ip адресам и невозможность создать новый даётся только за серьёзные нарушения