home *** CD-ROM | disk | FTP | other *** search
/ OS/2 Shareware BBS: 5 Edit / 05-Edit.zip / me34src.zip / me3 / ed / main.c < prev    next >
C/C++ Source or Header  |  1995-01-14  |  1KB  |  53 lines
  1. /* Craig Durland    Public Domain
  2.  *   Distributed "as is", without warranties of any kind, but comments,
  3.  *     suggestions and bug reports are welcome.
  4.  */
  5.  
  6. #include <const.h>
  7. #include "ed.h"
  8. #include "led.h"
  9.  
  10. extern char *Ltext;        /* the text the user input */
  11. extern int Lerrorno;        /* LEDs error number */
  12.  
  13. extern Lmacs();
  14.  
  15. /* ******************************************************************** */
  16. /* ************************* TEST ************************************* */
  17. /* ******************************************************************** */
  18.  
  19. callback(kc,fcn) EKeyCode kc; int fcn;
  20. {
  21.   switch (fcn)
  22.   {
  23.     case 1: return Ldo_fcn(LF_INSERT_KEYCODE,'a',LF_STOP);
  24.     case 2: return Ldo_fcn(LF_INSERT_STRING,"<Callback 2>",LF_STOP);
  25.     case 3:
  26.       Led("(Recursing) ","",(pfi)NULL);
  27.       break;
  28.   }
  29.   return LF_NOOP;
  30. }
  31.  
  32. extern int Lncol, t_ncol;
  33. main(argc,argv) int argc; char **argv;
  34. {
  35.   char buf[80], *spoof();
  36.   int n;
  37.  
  38.   t_open();
  39.   init_Led(); Lmacskeys();
  40.  
  41.   Ldo_fcn(LF_BINDKEY,
  42.     LF_CALLBACK,1,'A', LF_CALLBACK,2,'~', LF_CALLBACK,3,META|'R',
  43.     LF_STOP,LF_STOP);
  44.   for (n = 1; 1; n++)
  45.   {
  46.     sprintf(buf,"Led[%d]: ",n);
  47.     if (LF_ABORT == Led(buf,"",callback)) break;
  48.     printf("\nYou typed: \"%s\"\n",Ltext);
  49.   }
  50.   t_close();
  51.   printf("\nAll done.\n");
  52. }
  53.