Добавил:
lublyanka
Опубликованный материал нарушает ваши авторские права? Сообщите нам.
Вуз:
Предмет:
Файл:ИТ в ОЭС (КР) / 6_Обучающая-сист_GPSS / SIM_GPS / SORCE / TEST
.C/************************************************************************
Џ®¤Їp®Јp ¬¬ TEST
*************************************************************************
”гЄжЁЁ: ў § ўЁбЁ¬®бвЁ ®в par Ё pri ўл¤ Ґв б®®ЎйҐЁҐ Ё ®ЇаҐ¤Ґ«пҐв help Ё
repeat;
€бЇ®«м§®ў ЁҐ: test( par,&help,&repeat,pri ).
ЋЇЁб ЁҐ Ї p ¬Ґвp®ў: par - бЁ¬ў®« ўлЇ®«ҐЁп Ї®¤ЇгЄв ;
help - Ё¤ЁЄ в®а Ї®¤бзҐв ३⨣ Ї® Ї®¤ЇгЄвг;
repeat - Ё¤ЁЄ в®а а §аҐиҐЁп а Ў®вл ў Ї®¤ЇгЄвҐ;
pri - Ё¤ЁЄ в®а Ї®¤бзҐв ३⨣ Ї® Ї®¤вҐ¬Ґ.
‚л§лў Ґ¬лҐ ¬®¤г«Ё: Ґв.
Ђўв®p: ЁЈЁ ‚.€., ‹гЄмп®ў ‘.Ђ. ( Њѓ’“ Ё¬.Ќ.ќ.Ѓ г¬ , Є д.€“6 ).
„ в Ї®б«Ґ¤Ёе Ё§¬ҐҐЁ© 29.04.91.
*************************************************************************/
#include <pdefs.h>
test( par,help,repeat,pri )
char par;
int *help, *repeat, pri;
{
HDL wnd_mess, wndist();
int key;
*help=1;
*repeat=1;
if( pri != 0 )
if( par == '*' )
{
wnd_mess=wndist( 5, 24, 2, 25, 1 );
wndbox( wnd_mess, 1 );
wndsetactv( wnd_mess );
wndtotop( wnd_mess );
vdspls( 0, 0, "\n ќв Ї®¤вҐ¬ 㦥 Ё§гзҐ .\n"
"\r •®вЁвҐ Ї®ўв®аЁвм ? (Y/N)" );
key=kbnec();
wndtobot( wnd_mess );
wndrls( wnd_mess );
if( key == 121 || key == 89 ) /* ¤ */
*help=0;
else
*repeat=0;
}
else ;
else
*help=0;
}