home *** CD-ROM | disk | FTP | other *** search
/ OS/2 Professional / OS2PRO194.ISO / os2 / editor / me / wordstar.m < prev    next >
Text File  |  1994-01-31  |  2KB  |  61 lines

  1. /****************************************************************************/
  2. /*                                                                          */
  3. /*             PSEUDO WORDSTAR EMULATION FOR THE ME EDITOR                  */
  4. /*                                                                          */
  5. /*  I am not really familiar with Wordstar (TM of Micropro), so please      */
  6. /* feel free to enhance and correct this macro file. Any ehnacements would  */
  7. /* be a welcome addition to our macro library, so please send whatever      */
  8. /* you accomplished back here!                                              */
  9. /*                                                                          */
  10. /* Marc Adler   Magma Systems    5/88                                       */
  11. /****************************************************************************/
  12.  
  13. #include mekeys.h
  14.  
  15. init()
  16. {
  17.   /* cursor movement */
  18.   assign_key("left",    CTRL_S);
  19.   assign_key("right",   CTRL_D);
  20.   assign_key("up",      CTRL_E);
  21.   assign_key("down",    CTRL_X);
  22.   assign_key("nextword",CTRL_F);
  23.   assign_key("prevword",CTRL_A);
  24.  
  25.   /* scrolling */
  26.   assign_key("nextscreen", CTRL_C);
  27.   assign_key("prevscreen", CTRL_R);
  28.   assign_key("scrollup",   CTRL_W);
  29.   assign_key("scrolldown", CTRL_Z);
  30.  
  31.   /* delete */
  32.   assign_key("delchar",    CTRL_G);
  33.   assign_key("delline",    CTRL_Y);
  34.  
  35.   /* block menu - CTRL_K */
  36.   assign_key("writefile", CTRL_K, 's');
  37.   assign_key("exit",      CTRL_K, 'd');
  38.   assign_key("exit",      CTRL_K, 'x');
  39.   assign_key("bookmark",  CTRL_K, '0');
  40.   assign_key("readfile",  CTRL_K, 'r');
  41.   assign_key("mark",      CTRL_K, 'b');
  42.   assign_key("mark",      CTRL_K, 'k');
  43.   
  44.   /* quick menu - CTRL_Q */
  45.   assign_key("fsearch",   CTRL_Q, 'f');
  46.   assign_key("fsubst",    CTRL_Q, 'a');
  47.   assign_key("deleol",    CTRL_Q, 'y');
  48.   assign_key("gobof",     CTRL_Q, 'r');
  49.   assign_key("goeof",     CTRL_Q, 'c');
  50.   assign_key("home",      CTRL_Q, 'e');
  51.   assign_key("bottom",    CTRL_Q, 'x');
  52. }
  53.  
  54. scrollup()
  55. {
  56. }
  57.  
  58. scrolldown()
  59. {
  60. }
  61.