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-1Fx<o39ПхДС/ППх0
40|Пх5Fx≥o46ПхСС/П5хП1Пх2Пх0
50|5хПхА+ПхВПх3÷+4F10x
60|÷ПхВххПВПх4ПхАПх3÷ПхВ
70|Пх3÷Пх0+3F10x÷ПхА
80|ххПАПх05FlgххП0FL148КПх6
90|КПхВПхВПх8F√ПхВПхА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