/****************************************************************************/
/*                                                                          */
/*             PSEUDO WORDSTAR EMULATION FOR THE ME EDITOR                  */
/*                                                                          */
/*  I am not really familiar with Wordstar (TM of Micropro), so please      */
/* feel free to enhance and correct this macro file. Any ehnacements would  */
/* be a welcome addition to our macro library, so please send whatever      */
/* you accomplished back here!                                              */
/*                                                                          */
/* Marc Adler   Magma Systems    5/88                                       */
/****************************************************************************/

#include mekeys.h

init()
{
  /* cursor movement */
  assign_key("left",    CTRL_S);
  assign_key("right",   CTRL_D);
  assign_key("up",      CTRL_E);
  assign_key("down",    CTRL_X);
  assign_key("nextword",CTRL_F);
  assign_key("prevword",CTRL_A);

  /* scrolling */
  assign_key("nextscreen", CTRL_C);
  assign_key("prevscreen", CTRL_R);
  assign_key("scrollup",   CTRL_W);
  assign_key("scrolldown", CTRL_Z);

  /* delete */
  assign_key("delchar",    CTRL_G);
  assign_key("delline",    CTRL_Y);

  /* block menu - CTRL_K */
  assign_key("writefile", CTRL_K, 's');
  assign_key("exit",      CTRL_K, 'd');
  assign_key("exit",      CTRL_K, 'x');
  assign_key("bookmark",  CTRL_K, '0');
  assign_key("readfile",  CTRL_K, 'r');
  assign_key("mark",      CTRL_K, 'b');
  assign_key("mark",      CTRL_K, 'k');
  
  /* quick menu - CTRL_Q */
  assign_key("fsearch",   CTRL_Q, 'f');
  assign_key("fsubst",    CTRL_Q, 'a');
  assign_key("deleol",    CTRL_Q, 'y');
  assign_key("gobof",     CTRL_Q, 'r');
  assign_key("goeof",     CTRL_Q, 'c');
  assign_key("home",      CTRL_Q, 'e');
  assign_key("bottom",    CTRL_Q, 'x');
}

scrollup()
{
}

scrolldown()
{
}
