Lord_BSS project:
ПМК-прг: Вирус
Ретро-программы для ретро-ЭВМ: самые первые игры!
●  Новости
●  Анонс
●  Карта сайта

Проекты:

Тематические
●  =Ад=
●  =Морг=
●  =Армия=
●  =Погост=
●  =Пещера=
●  =Балныц=
●  =Сеновал=
●  =Bar Wars=
●  =Ночлежка=
●  =Монастырь=
●  =Новая сказка=
●  =Мать героина=
●  =Голубой вагон=
●  =Убой на местах=
●  =Хижина д. Васи=

Полутематическиe
●  =Казино=
●  =Бардак=

ПоКлёпы
   Real-раздел
●  Кукулер
●  Зарница
●  Реклама BenQ
   Lit-раздел
●  Притчи
●  Алфавит
●  Анти-Гарри Поттер

ПоЖизненные
   Maf-раздел
●  Первые маф-шаги
●  Первый темат
●  Первая своя игра
●  Маф-слэнг
●  More al-$
●  Румафия
●  Ранние тематы
●  Правила маф-чата
●  Мемуары
●  Маф-непонятки
   Real-раздел
●  Наглядки
●  Эх, Общага!
●  Whois Lord_BSS

ПоПутные
●  ПоСcылки
●  mp3: ППЗ
●  ПМК программы
     · ПМК: история
     · ПМК: помощь
     · Elite
     · Ниндзя-терминатор
     · Фредди Крюгер
     · Bosconien
     · Эльфы
     · М-ский треугольник
     · Янтарный гугон
     · Джой
     · Командос
     · Командос-2
     · Фантастика
     · Сказка
     · Сталкер
     · Жокей
     · Спартак
     · Папаго
     · Воришка-видео
     · Вирус
     · Охота на дин-ов
     · Рыцарь
     · Страна монстров
     · Страна великанов
     · Путешествие
     · Аэропорт
     · Сокобан
     · Долина
     · Небоскрёб
     · Роботекс
     · АЭС

СвязЬное звено
●  LiveJournal
●  Мыло

Вирус — Владимир Трофимчук


[игровая программа для МК-52, МК-61]
#|00010203040506070809
00|СххП0хП6КсчхП1КсчПх7хK[х]Пх9
10|+хПВВ↑Ксч20хK[х]Пх3+
20|хПАFx=o25Пх6ПхЕС/ППх0+хП0Fx≠o
30|39Пх1Пх4Fcos-1–Fx<o39ПхДС/ППх0
40|Пх5–Fx≥o46ПхСС/П5хП1Пх2Пх0
50|5хПхА+ПхВПх3÷+4F10x
60|÷–ПхВххПВПх4ПхАПх3÷ПхВ
70|–Пх3÷Пх0+3F10x÷–ПхА
80|ххПАПх05FlgххП0FL148КПх6
90|КПхВПхВПх8–F√ПхВПхАK[х]Fx<o20
A0|CxБП20       
Регистры:
1.01 хП2; 100 хП3; 0.996 хП4; 600 хП5; 200 хП7; 1500 хП8; 6900 хП9; 66440482 В↑ 889909 KV хПС 7 F10x 1 + KV K{x} ВП 5 хПД; ПхС K{x} ВП 5 хПС; 8885808 В↑ 5565406 KV K{x} ВП 6 хПЕ.
Р-ГРД-Г⇒ "Р".

Игровая программа Владимира Трофимчука 'Вирус' Представьте, что Земля заражена неизвестным вирусом. Изобретён препарат, уничтожающий заражённые клетки, но он снижает кол-во лейкоцитов в крови больного. Известно, что при лейкоцитозе ниже 1500 человек умирает.
От принятия большой дозы препарата пациент может отравиться. Некоторым людям этот препарат вообще нельзя употреблять. Кому, как и в каких дозах назначать препарат врачи не знают, но Ваш долг - спасти больного и как можно быстрее.

Начало: В/О С/П.

RX="кол-во заражённых клеток в организме больного". RY="лейкоциты". R0="кол-во препарата в организме".
Ввести кол-во вводимого препарата (мг), С/П.

Если RX="rescoe" - пациент спасён. RY="затраченное время, ч".

Если RX="ЕГГОГ" - пациент умер от нехватки лейкоцитов.

Если RX="ЕГГОГ–2" - отравление.

Если RX="ЕГГОГ–3" - анафилактический шок.

Для спасения нового больного: В/О С/П.


Про прг и автора.
* Программа написана предположительно в 1990-м году.
* Была опубликована в 5-м номере "Экспресса" за 1991-й год.
* У программы есть "двойник": VIRUS.
* В то время автор жил в г. Владивосток.

Вернуться на главную страницу ПМК-проекта к ПОЛНОМУ списку прг-м ВСЕХ авторов.
Если у Вас возникли какие-либо проблемы с вводом прг - прочтите краткую справку.
Линки на эмуляторы ПМК и другие ретро-ресурсы можно взять здесь.

MAFIA's Top100 Яндекс.Метрика Top.Mail.Ru