#include <stdio.h>

#pragma nostandard
#ifndef  __ALPHA
globalvalue sys$gw_ijobcnt;
#else
globalvalue sys$gl_ijobcnt;
#endif
#pragma standard

main()
{
   FILE *fp;
   fp = fopen("Z.COM","w");
#ifndef  __ALPHA
   fprintf(fp,"$ write sys$output f$cvsi(0,16,f$fao(\"!AD\",4,%d)),\" interactive users\"\n",sys$gw_ijobcnt);
#else
   fprintf(fp,"$ write sys$output f$cvsi(0,32,f$fao(\"!AD\",4,%d)),\" interactive users\"\n",sys$gl_ijobcnt);
#endif
   fclose(fp);
}
