home *** CD-ROM | disk | FTP | other *** search
/ Frozen Fish 1: Amiga / FrozenFish-Apr94.iso / bbs / alib / d5xx / d523 / serlib.lha / SerLib / Examples / Lattice / sert.c < prev    next >
C/C++ Source or Header  |  1991-08-05  |  881b  |  36 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_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.         WriteSer(sld,"AT$\r",4);
  18.         Delay(20);
  19.         GetStatus(sld,&ss);
  20.         printf("Bytes unread: %ld\nStatus: %lx\n",ss.ss_unread,ss.ss_status);
  21.         Delay(20);
  22.         WriteSer(sld," ",1);
  23.         Delay(20);
  24.         GetStatus(sld,&ss);
  25.         printf("Bytes unread: %ld\nStatus: %lx\n",ss.ss_unread,ss.ss_status);
  26. loop:
  27.         len=ReadSer(sld,buf,2040);
  28.         buf[len]='\0';
  29.         printf("%s",buf);
  30.         GetStatus(sld,&ss);
  31.         if (ss.ss_unread>0) goto loop;
  32.         CloseSerial(sld);
  33.     }
  34.     CloseLibrary(SerLibBase);
  35. }
  36.