// VT320Keys
//
// This script creates two options on the User
// menu:
//
// VT320Keys
// This allows the VT320 function keys to be
// used without pressing ACTION. The 'normal'
// key functions are accessed using ACTION.
//
// StdKeys
// This reverts back to the usual Hearsay
// assignments.
//
// This script must be saved in the !Hearsay
// Library directory.
//
// Courtesy of Rob Sherratt  October 1991
//

void VT320Keys(void)
{
 delallmacros();

 defmacro("F1",   "{'A_F1}"   );
 defmacro("F2",   "{'A_F2}"   );
 defmacro("F3",   "{'A_F3}"   );
 defmacro("F4",   "{'A_F4}"   );
 defmacro("F5",   "{'A_F5}"   );
 defmacro("F6",   "{'A_F6}"   );
 defmacro("F7",   "{'A_F7}"   );
 defmacro("F8",   "{'A_F8}"   );
 defmacro("F9",   "{'A_F9}"   );
 defmacro("F10",  "{'A_F10}"  );
 defmacro("F11",  "{'A_F11}"  );
 defmacro("F12",  "{'A_F12}"  );
 defmacro("A_F1",   "{'F1}"   );
 defmacro("A_F2",   "{'F2}"   );
 defmacro("A_F3",   "{'F3}"   );
 defmacro("A_F4",   "{'F4}"   );
 defmacro("A_F5",   "{'F5}"   );
 defmacro("A_F6",   "{'F6}"   );
 defmacro("A_F7",   "{'F7}"   );
 defmacro("A_F8",   "{'F8}"   );
 defmacro("A_F9",   "{'F9}"   );
 defmacro("A_F10",  "{'F10}"  );
 defmacro("A_F11",  "{'F11}"  );
 defmacro("A_F12",  "{'F12}"  );

 defmacro("Print",   "{'A_Print}"    );
 defmacro("SLock",   "{'A_SLock}"    );
 defmacro("Break",   "{'A_Break}"    );
 defmacro("Insert",  "{'A_Insert}"   );
 defmacro("Home",    "{'A_Home}"     );
 defmacro("PageUp",  "{'A_PageUp}"   );
 defmacro("Delete",  "{'A_Delete}"   );
 defmacro("Copy",    "{'A_Copy}"     );
 defmacro("PageDwn", "{'A_PageDwn}"  );

 defmacro("A_Print",   "{'Print}"    );
 defmacro("A_SLock",   "{'SLock}"    );
 defmacro("A_Break",   "{'Break}"    );
 defmacro("A_Insert",  "{'Insert}"   );
 defmacro("A_Home",    "{'Home}"     );
 defmacro("A_PageUp",  "{'PageUp}"   );
 defmacro("A_Delete",  "{'Delete}"   );
 defmacro("A_Copy",    "{'Copy}"     );
 defmacro("A_PageDwn", "{'PageDwn}"  );

 defmacro("M_StdKeys", "{StdKeys()}");
}

void StdKeys(void)
{
 delallmacros();
 defmacro("M_VT320Keys", "{VT320Keys()}");
}

void main(void)
{
 defmacro("M_VT320Keys", "{VT320Keys()}");
}
