//Тестирование МФЦ (стационарная версия)
Переменные: ДИАГН, ЗНАЧ, МАССА, РОСТ, ЭКГ, ПОЛ, ИД_МАССА, ДИУРЕЗ, ВРЕМЕНИ_ПРОШЛО, ДОЗА_НИТРО, \
            ЧСС0=120, НИАДС0=200, НИАДД0=150, SpO20=98, ЧДД0=30, ТЕМП0=36.5, \
            Д=3, ДТ=0.2, Использ, инф_номер
БЛОК ВХОД 
	//установка интервалов измерения переменных параметров (стандартных //переменных)
        ДИАГН = -1  
//ВЫЗОВ_ВРАЧА("Установить скорость инфузии 100 мл/час и время инфузии 4 мин для Перистальтической инфузионной помпы. Запустить инфузию Перистальтической инфузионной помпы.", 1мин)
	УСТАНОВИТЬ_ИНТЕРВАЛ(ЧСС, 10сек)
	УСТАНОВИТЬ_ИНТЕРВАЛ(ЧДД, 10сек)
	УСТАНОВИТЬ_ИНТЕРВАЛ(ТЕМП, 10сек)
	УСТАНОВИТЬ_ИНТЕРВАЛ(АД, 5мин)
	УСТАНОВИТЬ_ИНТЕРВАЛ(СПО2, 10сек) 
        //-- 
        Использ=Истина
		//ВЫЗОВ_ВРАЧА("Поехали...", 1мин)
        ПОКА(Использ)
		//ВЫЗОВ_ВРАЧА("Тест...", 1мин)
        ЕСЛИ ((ЧСС >= ЧСС0-Д) И (ЧСС <= ЧСС0+Д) И (ЧДД >= ЧДД0-Д) И (ЧДД <= ЧДД0+Д) И \
              (ТЕМП >= ТЕМП0-ДТ) И (ТЕМП <= ТЕМП0+ДТ) И \
              (САД >= НИАДС0-10) И (САД <= НИАДС0+10) И \
              (ДАД >= НИАДД0-10) И (ДАД <= НИАДД0+10) И \
              (СПО2 >= SpO20-Д) И (СПО2 <= SpO20+Д)) то
		ВЫЗОВ_ВРАЧА("Тестовое неотложное состояние диагностировано.", 1мин)
//Лекарственное средство #1
                инф_номер=ВВЕСТИ(1, Лекарственное_средство_1 , 1 мл/час, 4мин)
                инф_номер=ВВЕСТИ(2, Лекарственное_средство_2 , 10 мл/час, 4мин)
                инф_номер=ВВОДИТЬ_И_ЖДАТЬ(3, Лекарственное_средство_3 , 100 мл/час, 4мин)
                //ВЫЗОВ_ВРАЧА("Через 1мин потребуется ввод Лекарственного препарата №4 и запуск перистальтической помпы.", 1мин)
                //Спать(1мин)
                инф_номер=ВВОДИТЬ_И_ЖДАТЬ(0, Лекарственное_средство_4 , 100 мл/час, 4мин)
                ВЫЗОВ_ВРАЧА("Установить скорость инфузии 100 мл/час и время инфузии 4 мин для Перистальтической инфузионной помпы. Запустить инфузию Перистальтической инфузионной помпы.", 4мин)
                Спать(4мин)
                Использ=Ложь

        ИНАЧЕ 
		//ВЫЗОВ_ВРАЧА("Диагноз не определен.", 1мин)
        КОНЕЦ_ЕСЛИ
        Спать(2сек)
        КОНЕЦ_ПОКА
КОНЕЦ_БЛОКА // конец БЛОК ВХОД
