home *** CD-ROM | disk | FTP | other *** search
/ Frozen Fish 1: Amiga / FrozenFish-Apr94.iso / bbs / alib / d5xx / d523 / serlib.lha / SerLib / Examples / Lattice / mini.c < prev    next >
C/C++ Source or Header  |  1991-08-05  |  1KB  |  43 lines
  1. #include "serlibbase.h"
  2. #include "serlib.h"
  3.  
  4. struct SerLibBase    *SerLibBase;
  5. struct SerStatus ss;
  6. struct SerLibData    *sld;
  7.  
  8. char buf[2048];
  9. ULONG len;
  10. main()
  11. {
  12.     SerLibBase=(struct SerLibBase *)OpenLibrary("serlib.library",3L);
  13.     sld=OpenSerial("serial.device",0,2400,8,1,(ULONG)(SERF_RAD_BOOGIE|SERF_7WIRE|SERF_SHARED));
  14.     if (!sld) printf("Couldn't open...");
  15.     else {
  16.         ChangeData(sld,2400,8,1,(ULONG)(SERF_RAD_BOOGIE|SERF_7WIRE|SERF_SHARED));
  17.         printf("`.' to exit...\n> ");
  18.         scanf("%s",buf);
  19.         while (buf[0]!='.') {
  20.             strcat(buf,"\r\n");
  21.             if (CheckCD(sld))
  22.                 printf("Got a carrier!\n");
  23.             printf("Current unread: %ld\n",SerBuffer(sld));
  24.             SendSer(sld,buf,strlen(buf));
  25.             WaitSer(sld,0L);
  26.             Delay(20);
  27. loop:
  28.             len=SerBuffer(sld);
  29.             if (len>1040) len=1040;
  30.             RecvSer(sld,buf,len);
  31.             WaitSer(sld,0L);
  32.             buf[len]='\0';
  33.             printf("%s",buf);
  34.             GetStatus(sld,&ss);
  35.             if (ss.ss_unread>0) goto loop;
  36.             printf("> ");
  37.             scanf("%s\n",buf);
  38.         }
  39.         CloseSerial(sld);
  40.     }
  41.     CloseLibrary(SerLibBase);
  42. }
  43.