ИТ в ОЭС (КР) / 6_Обучающая-сист_GPSS / SIM_GPS / SORCE / RUN1

/************************************************************************
 Џ®¤Їp®Јp ¬¬       RUN1
*************************************************************************

 ”г­ЄжЁЁ: ®ЎҐбЇҐзЁў Ґв ўлЎ®а ў Ј®аЁ§®­в «м­®¬ ¬Ґ­о.

 €бЇ®«м§®ў ­ЁҐ: run1( w2, ch ).

 ЋЇЁб ­ЁҐ Ї p ¬Ґвp®ў: w2 - ®Є­® ¬Ґ­о вЁЇ  wndist;
                     ch - ¬ ббЁў бва®Є-ўлЎ®а®ў ¬Ґ­о.

 ‚л§лў Ґ¬лҐ ¬®¤г«Ё: ­Ґв.

 Ђўв®p: ЁЈЁ­ ‚.€., ‹гЄмп­®ў ‘.Ђ. ( Њѓ’“ Ё¬.Ќ.ќ.Ѓ г¬ ­ , Є д.€“6 ).

 „ в  Ї®б«Ґ¤­Ёе Ё§¬Ґ­Ґ­Ё© 12.04.91.

*************************************************************************/

#include <pdefs.h>

int run1( w1,ch )
    HDL w1;
    char *ch[];
{
    static  int  ch_g = 0;
    while   ( chcedt( w1, &ch_g, ch, NULLPTR ) != RC_ENTER )
            sybeep();
    return  ( ch_g );
}