$MACRO Init;
  UnAssign_All_Keys;

{Default settings}
MACRO_TO_KEY(<F1>       ,'MAINHELP'        ,Edit ); {᭮ ࠭ Help      }
MACRO_TO_KEY(<F2>       ,'MEMENUS'         ,Edit ); {              }
MACRO_TO_KEY(<Btn0>     ,'MEMENUS'         ,Edit ); {              }
MACRO_TO_KEY(<F3>       ,'SAVEFILE'        ,Edit ); {࠭ 䠩           }
MACRO_TO_KEY(<CtrlF3>   ,'SAVEBLCK'        ,Edit ); {࠭   䠩   }
MACRO_TO_KEY(<ShftF3>   ,'LOADFILE'        ,Edit ); {㧨 䠩           }
MACRO_TO_KEY(<F6>       ,'SEARCH'          ,Edit ); {᪠                   }
MACRO_TO_KEY(<ShftF6>   ,'S_REPL'          ,Edit ); {᪠          }
MACRO_TO_KEY(<CtrlF6>   ,'REPSRCH'         ,EDIT ); {.. /}
MACRO_TO_KEY(<F7>       ,'MARKBLCK'        ,Edit ); {⬥ (ન஢.) }
MACRO_TO_KEY(<ShftF7>   ,'MCOLBLCK'        ,Edit ); {⬥ אַ.    }
MACRO_TO_KEY(<AltF7>    ,'MSTRBLCK'        ,EDIT ); {⬥. ᯫ.⥪ }
MACRO_TO_KEY(<Btn1>     ,'MSTRBLCK'        ,EDIT ); {⬥. ᯫ.⥪ }
MACRO_TO_KEY(<CtrlF9>   ,'BLOCKOFF'        ,Edit ); {⬥ ન஢      }
MACRO_TO_KEY(<AltU>     ,'UNDBLK'          ,Edit ); {            }
MACRO_TO_KEY(<AltI>     ,'INDBLK'          ,Edit ); {           }
CMD_TO_KEY(  <F9>       ,COPY_BLOCK        ,Edit ); {.⬥祭     }
CMD_TO_KEY(  <F10>      ,MOVE_BLOCK        ,Edit ); { ⬥祭.    }
CMD_TO_KEY(  <CtrlF10>  ,DELETE_BLOCK      ,Edit ); {. ⬥祭.      }
MACRO_TO_KEY(<ShftF9>   ,'COPYBL'          ,Edit ); {. ஢.  }
MACRO_TO_KEY(<ShftF10>  ,'MOVEBL'          ,Edit ); {.   }
MACRO_TO_KEY(<F8>       ,'RUNMAC'          ,Edit ); {              }
MACRO_TO_KEY(<CtrlF8>   ,'COMPILE'         ,Edit ); {஢ ணࠬ  }
MACRO_TO_KEY(<CtrlF2>   ,'CMPERROR'        ,Edit ); {᪠ ᫥.訡.. }
MACRO_TO_KEY(<AltE>     ,'CMPERROR'        ,Edit ); {᪠ ᫥.訡.. }
MACRO_TO_KEY(<AltF9>    ,'TEMPLATE'        ,Edit ); { ࠧ       }
MACRO_TO_KEY(<AltT>     ,'TEMPLATE'        ,Edit ); { ࠧ       }
MACRO_TO_KEY(<AltF6>    ,'MATCH'           ,Edit ); {஢ઠ  ᪮  }
MACRO_TO_KEY(<AltM>     ,'MATCH'           ,Edit ); {஢ઠ  ᪮  }
MACRO_TO_KEY(<ShftF1>   ,'NEXTWIN'         ,Edit ); {室  ᫥.   }
MACRO_TO_KEY(<Btn2>     ,'NEXTWIN'         ,Edit ); {室  ᫥.   }
MACRO_TO_KEY(<CtrlF1>   ,'LASTWIN'         ,Edit ); {.  ।.     }
MACRO_TO_KEY(<AltF1>    ,'SWITWIN'         ,EDIT ); {.    ᯨ  }
CMD_TO_KEY(  <CtrlF5>   ,ZOOM              ,Edit ); {   ࠭ }
MACRO_TO_KEY(<INS>      ,'INSTGL'          ,EDIT ); {४. ० ⠢   }
CMD_TO_KEY(  <DEL>      ,DEL_CHAR          ,Edit ); { ᨬ           }
CMD_TO_KEY(  <CtrlG>    ,DEL_CHAR          ,Edit ); { ᨬ           }
MACRO_TO_KEY(<AltD>     ,'DELEOL'          ,Edit ); {⪠   ப  }
MACRO_TO_KEY(<ShftDEL>  ,'DELWORD'         ,Edit ); {. ᫮ ।      }
CMD_TO_KEY(  <BS>       ,BACK_SPACE        ,Edit ); {⪠             }
MACRO_TO_KEY(<CtrlBS>   ,'BSWORD'          ,Edit ); {.  1 ᫮   }
CMD_TO_KEY(  <ShftF8>   ,DEL_LINE          ,Edit ); { ப           }
CMD_TO_KEY(  <CtrlY>    ,DEL_LINE          ,Edit ); { ப           }
CMD_TO_KEY(  <TAB>      ,TAB_RIGHT         ,Edit ); {ࠢ  ⠡.         }
CMD_TO_KEY(  <ShftTAB>  ,TAB_LEFT          ,Edit ); {  ⠡.          }
CMD_TO_KEY(  <CtrlF4>   ,INDENT            ,Edit ); {            }
CMD_TO_KEY(  <ShftF4>   ,UNDENT            ,Edit ); {             }
CMD_TO_KEY(  <F5>       ,MARK_POS          ,Edit ); {⬥ .   }
CMD_TO_KEY(  <ShftF5>   ,GOTO_MARK         ,Edit ); {室  ⬥. 樨 }
MACRO_TO_KEY(<CtrlS>    ,'PAGEBRK'         ,Edit ); {⠢ ࠧ ࠭}
MACRO_TO_KEY(<AltF5>    ,'ASCII'           ,EDIT ); {ASCII-               }
MACRO_TO_KEY(<AltA>     ,'ASCII'           ,EDIT ); {ASCII-               }
MACRO_TO_KEY(<AltF4>    ,'CONDENSE'        ,Edit ); { ० CONDENSE    }
MACRO_TO_KEY(<ENTER>    ,'CR'              ,Edit ); {.⪨ - "Enter"  }
CMD_TO_KEY(  <LF>       ,LEFT              ,Edit ); {              }
CMD_TO_KEY(  <RT>       ,RIGHT             ,Edit ); { ࠢ            }
CMD_TO_KEY(  <MsRT>     ,RIGHT             ,Edit ); { ࠢ            }
CMD_TO_KEY(  <UP>       ,UP                ,Edit ); { ࠢ            }
CMD_TO_KEY(  <MsUP>     ,UP                ,Edit ); { ࠢ            }
CMD_TO_KEY(  <DN>       ,DOWN              ,Edit ); {               }
CMD_TO_KEY(  <MsDN>     ,DOWN              ,Edit ); {               }
MACRO_TO_KEY(<HOME>     ,'HOME'            ,Edit ); {  砫 ࠭   }
MACRO_TO_KEY(<MsLF>     ,'MLEFT'           ,EDIT ); {  - "".  }
CMD_TO_KEY(  <END>      ,EOL               ,Edit ); {⪠   ப  }
CMD_TO_KEY(  <PgUp>     ,PAGE_UP           ,Edit ); { ࠭         }
CMD_TO_KEY(  <PgDn>     ,PAGE_DOWN         ,Edit ); { ࠭          }
CMD_TO_KEY(  <CtrlHome> ,TOF               ,Edit ); { 砫 䠩 (Top)     }
CMD_TO_KEY(  <CtrlEnd>  ,EOF               ,Edit ); {  䠩 (Bottom)   }
CMD_TO_KEY(  <CtrlPgDn> ,NEXT_PAGE_BREAK   ,Edit ); {।  ࠧ.࠭ }
CMD_TO_KEY(  <CtrlPgUp> ,LAST_PAGE_BREAK   ,Edit ); {  ࠧ.࠭  }
CMD_TO_KEY(  <CtrlLF>   ,WORD_LEFT         ,Edit ); {  ᫮       }
CMD_TO_KEY(  <CtrlRT>   ,WORD_RIGHT        ,Edit ); {  ᫮ ।     }
MACRO_TO_KEY(<CtrlT>    ,'TOPWIN'          ,Edit ); { 砫             }
MACRO_TO_KEY(<CtrlB>    ,'BOTWIN'          ,Edit ); {               }
MACRO_TO_KEY(<CtrlU>    ,'SCROLLUP'        ,Edit ); {         }
MACRO_TO_KEY(<CtrlD>    ,'SCROLLDN'        ,Edit ); {          }
MACRO_TO_KEY(<AltF8>    ,'GOTOLINE'        ,Edit ); {  ப    }
CMD_TO_KEY(  <F4>       ,ENTER_DOS_SHELL   ,Edit ); {    DOS shell      }
MACRO_TO_KEY(<AltF3>    ,'SHELLDOS'        ,Edit ); {맮 DOS  ।   }
CMD_TO_KEY(  <CtrlF7>   ,UNDO              ,Edit ); {"⪠"- ० UNDO      }
CMD_TO_KEY(  <CtrlENTER>,UNDO              ,Edit ); {"⪠"- ० UNDO      }
CMD_TO_KEY(  <AltF2>    ,CALCULATOR        ,Edit ); {      }
MACRO_TO_KEY(<AltR>     ,'REFORMAT'        ,EDIT ); {ଠ.       }
MACRO_TO_KEY(<AltP>     ,'REFORMAT'        ,EDIT ); {ଠ.       }
CMD_TO_KEY(  <AltF10>   ,KEY_RECORD        ,Edit ); {  (EDIT)       }
CMD_TO_KEY(  <AltF10>   ,KEY_RECORD        ,DOS_SHELL ); {          }
MACRO_TO_KEY(<AltC>     ,'FCMD'            ,Edit ); { ଠ             }
MACRO_TO_KEY(<F9>       ,'DOSLOAD'         ,DOS_SHELL ); { 䠩          }
MACRO_TO_KEY(<ShftF9>   ,'MARKLOAD'        ,DOS_SHELL ); { ⬥.㯯  }
MACRO_TO_KEY(<AltJ>     ,'JUSTIFY'         ,EDIT ); {ࠢ.  ࠢ.࠭.}
MACRO_TO_KEY(<ShftF2>   ,'DATETIME'        ,Edit ); {⠢   ६  }
CMD_TO_KEY(  <AltO>     ,CREATE_WINDOW     ,EDIT ); {         }
MACRO_TO_KEY(<AltL>     ,'LINEDRAW'        ,Edit ); {ᮢ            }
MACRO_TO_KEY(<AltD>     ,'DELWIN'          ,EDIT ); { ⥪饥      }
MACRO_TO_KEY(<AltX>     ,'EXIT'            ,Edit ); { ᥠ Multi-Edit  }
MACRO_TO_KEY(<AltK>     ,'KEYCODE'         ,EDIT ); {       }

Set_Global_Int('Default_Insert_Mode',1);
Set_Global_Str('SWITCHES','G');
Insert_Mode := Global_Int('Default_Insert_Mode');
Explosions := 0;
Backups := 0;
Page_Str := '';
Truncate_Spaces := 1;
AutoSave := 99;
Ctrl_Help := 1;
Tab_Expand := 8;
Mouse_H_Sense := 8;
Mouse_V_Sense := 8;
Word_Delimits := '    |0()"'',#$@!%^&*{}[]?/||;:.';
Default_Format := '                                                  
                                          ';
Ins_Cursor := 2;
Ovr_Cursor := 0;
Set_Global_Str('PRINTER_TYPE', 'Epson');
Set_Global_Str('PRINTER_TYPES1', 'IBM(PR)Okidata(PR)C.itoh(PR)Epson(PR)
Toshiba(PR)NEC(PR)HP LASERII(PR)');
Set_Global_Str('PRINTER_TYPES2', '');
Set_Global_Str('PRINTER_TYPES3', '');
Set_Global_Str('PC_IBM', '/10=/12=:/17=/L6=A/L8=0/DR=I1/NL=I3F
/DR=#1/UB=-/UE=-|0/EB=G/EE=H/IB=%G/IE=%H/DB=W1/DE=W0');
Set_Global_Str('PC_Okidata', '/10=/12=/17=/L6=6/L8=8/DR=0/NL=1F
/DR=0/UB=C/UE=D/EB=T/EE=I/IB=/IE=/DB=/DE=');
Set_Global_Str('PC_C.itoh', '/10=N/12=E/17=Q/L6=A/L8=B/DR=/NL=F
/DR=/UB=X/UE=Y/EB=!/EE="/IB=/IE=/DB=/DE=');
Set_Global_Str('PC_Epson', '/10=P/12=M/17=/L6=2/L8=0/DR=/NL=F
/DR=/UB=-/UE=-|0/EB=E/EE=F/IB=4/IE=5/DB=/DE=');
Set_Global_Str('PC_Toshiba', '/10=E12/12=E10/17=E07/L6=L08/L8=L06
/DR=*0/NL=*2F/DR=*0/UB=I/UE=J/EB=Q/EE=R/IB=/IE=/DB=!/DE="');
Set_Global_Str('PC_NEC', '/10=P/12=M/17=/L6=2/L8=0/DR=x|0
/NL=xF/DR=x|0/UB=-/UE=-|0/EB=E/EE=F/IB=4/IE=5/DB=W/DE=W|0');
Set_Global_Str('PC_HP LASERII', '/10=(s10H/12=(s12H/17=(s16.6H/L6=&l6D
/L8=&l8D/DR=/NL=/FD=/UB=/UE=/EB=(s3B/EE=(s0B/IB=(s1S/IE=(s0S
/DB=(s8.1H(0U/DE=(8U(s12H');
Set_Global_Int('RESTORE',0);
Set_Global_Int('BIG_COMPILE',0);


FLABEL('',12,Edit      );
FLABEL('',19,DOS_SHELL );
FLABEL('',9,DOS_SHELL );
FLABEL('',40,DOS_SHELL );
FLABEL('',40,Edit      );
FLABEL(' ',32,Edit      );
FLABEL('⪠ ',27,Edit      );
FLABEL('DOS',33,Edit      );
FLABEL('DOS',4,Edit      );
FLABEL(' ',38,Edit      );
FLABEL('',34,Edit      );
FLABEL('ASCII ',35,EDIT      );
FLABEL('⬥',15,Edit      );
FLABEL('⬊',5,Edit      );
FLABEL('',14,Edit      );
FLABEL('',24,Edit      );
FLABEL('',18,Edit      );
FLABEL('',25,Edit      );
FLABEL('Ꭺ',31,EDIT      );
FLABEL('।',21,Edit      );
FLABEL('',11,Edit      );
FLABEL('',36,Edit      );
FLABEL('ࠧ',39,Edit      );
FLABEL('᪎',22,Edit      );
FLABEL('',28,Edit      );
FLABEL('만',8,Edit      );
FLABEL('',20,Edit      );
FLABEL('',19,Edit      );
FLABEL('',30,Edit      );
FLABEL('',10,Edit      );
FLABEL('',9,Edit      );
FLABEL('',29,Edit      );
FLABEL('ၫ',37,EDIT      );
FLABEL('ﬁ',17,Edit      );
FLABEL('⬥',7,Edit      );
FLABEL('饇',26,EDIT      );
FLABEL('᪇',16,Edit      );
FLABEL('᪠',6,Edit      );
FLABEL('',13,Edit      );
FLABEL('',23,Edit      );
FLABEL('.',3,Edit      );
FLABEL('  ',2,Edit      );
FLABEL('ࠢ',1,Edit      );

{Filename extension specific}
Set_Global_Str('Extensions','.C(IN).PAS(IN).BAS(IN).ASM(IN).DOC(IN)
.SRC(IN).H(IN).TXT(IN)');
Set_Global_Str('Compiler1','NONE(IN)MICROSOFT(IN)TURBO PASCAL 4.0(IN)
TURBO C 1.0(IN)LATTICE C 3.0(IN)MULTI_EDIT(IN)MS PASCAL 3.3(IN)LOGITECH
 MODULA-2 3.0(IN)');
Set_Global_Str('Compiler2','');
Set_Global_Str('Compiler3','');
Set_Global_Str('Language1','NONE(IN)C(IN)ASM(IN)BASIC(IN)MULTI_EDIT(IN)
MODULA_2(IN)PASCAL(IN)');
Set_Global_Str('Language2','');
Set_Global_Str('Language3','');
Set_Global_Str('.C','LS=C(IN) COMP=TURBO C 1.0(IN) IND=S(IN) TS=2(IN)
RM=128(IN) SA=1(IN) LC=1(IN) CP=1(IN)');
Set_Global_Str('.C_Comp','MAKE -fG2.MAK');
Set_Global_Str('.PAS','LS=PASCAL(IN) COMP=TURBO PASCAL 4.0(IN) IND=S(IN)
 TS=2(IN) RM=128(IN)');
Set_Global_Str('.PAS_Comp','TPC <FILE> /Q');
Set_Global_Str('.BAS','IND=O(IN) LS=BASIC(IN) COMP=MICROSOFT(IN)');
Set_Global_Str('.ASM','COMP=MICROSOFT(IN) RM=132(IN) TS=8(IN) IND=A(IN)
LS=ASM(IN)');
Set_Global_Str('.ASM_Comp','masm <file>;');
Set_Global_Str('.DOC','IND=O(IN) WW=1(IN) RM=72(IN) DOC=1(IN)');
Set_Global_Str('.SRC','TS=2(IN) RM=79(IN) LS=MULTI_EDIT(IN)
COMP=MULTI_EDIT(IN) IND=S(IN)');
Set_Global_Str('.SRC_Comp','MEMAC -P<ME_PATH> <FILE>');
Set_Global_Str('.H','LS=C(IN) COMP=TURBO C 1.0(IN) IND=S(IN)
 TS=2(IN) RM=128(IN) SA=1(IN) LC=1(IN) CP=1(IN)');
Set_Global_Str('.H_Comp','MAKE -fG2.MAK');
Set_Global_Str('.TXT','IND=O(IN) RM=79(IN) LS=NONE(IN) COMP=NONE(IN)
CS=1(IN) SA=1(IN)');

END_MACRO;
