home *** CD-ROM | disk | FTP | other *** search
- //
- // $Log: main.c,v $
- // Revision 1.4 1994/07/11 21:54:53 hakan
- // *DUMB* mistake. This one cost me about two week's motivation :-)
- //
- // Revision 1.3 1994/06/19 18:57:24 hakan
- // Global variables and SAS/C _WB* handling added
- //
- // Revision 1.2 1994/06/14 21:22:13 hakan
- // Elementary Eventloop
- //
- // Revision 1.1 1994/06/14 20:26:41 hakan
- // Initial revision
- //
- //
-
- static char* RCSId = "$Id: main.c,v 1.4 1994/07/11 21:54:53 hakan Exp $";
-
-
-
- #include <dos.h>
- #include "extern.h"
-
-
-
- long __oslibversion = 37L;
- long __netlibversion = 37L;
-
- long NP_Config = 0;
- long NP_ScanTime = 0;
- long NP_ScanPackets = 0;
- char* NP_ScanHost = "localhost";
-
-
-
- int main (int argc, char* argv[])
- {
- //
- // Ain't SAS nice?
- //
- if (argc == 0)
- {
- argc = _WBArgc;
- argv = _WBArgv;
- }
-
- //
- // Usual code
- //
- if (CreateUI (argc, argv))
- {
- if (CreateTimer ())
- {
- if (CreateEnvoy ())
- {
- EventLoop ();
-
- DestroyEnvoy ();
- }
- else
- {
- puts ("Envoy initialization failed");
- return (20);
- }
-
- DestroyTimer ();
- }
- else
- {
- puts ("Timer initialization failed");
- return (20);
- }
-
- DestroyUI ();
- }
- else
- {
- puts ("UI initialization failed");
- return (20);
- }
-
-
- return (0);
- }
-