
                                     
                                         
                                          
                                       
                                          
                                             
                                           



                                   
                                      
                                       
                              
                                      
                                     
                                   



                                  
                                         
                                             
                                              
                                               
                                             
                                     



                          
                                          
                                            
                                          
                                            
                                          
                              



                               
                                        
                                           
                                           
                                           
                                        
                                     



   㬥 祭  ॢ  ४  䠩 MACRO.HLP,
室饣    ⠭    ⠢ ⥪⮢ । Multi
Edit ᨨ 7.0.

  ॢ        㬥  믮 ਢ 
஢ (, ⥫. (812)-230-6690 20.00-22.00  㤭)

   ࠢ   㬥 ਭ ਢ . . ()



                                   


  ...............................................  3

   ..........................  4
    ......................................  4
    ....................................  5
    ...............................  5

  ......................................  6
   ...............................................  7
   ................................................  7

  .....................................  7
     .............................  7
   ..............................................  8
   ...............................................  9
       .................  9

  ......................................

 .................................................
    ..............................

,     ................
    MULTI-EDIT ........................
    .........................................
  CMAC- .......................................
   :   ...........................
       DOS ..........
    ........................................
      .............................
      ............................

 ...............................................

 .....................................................

  .......................................

  ..........................................

\ .........................................

     ....................


                                 - 2 -


  CMAC MULTI-EDIT .......................
     ......................................
     .......................
     ............................
      ..............................
     ......................................
       ............
       ...........
      ..........................
      .........................
       .................
    ..........................................
    ..................................
     .................................
      ................
      ........................
     ......................................
      ................................
     .......................
      ................
      .......................
      ...............................
     ...............................
    .........................................
       ...........
     .......................................
     .............................

       ................

 ................................................
   1 -   .....................
   ...................................................
   2 -    ...
   3 -   ........................
   4 -      ...........
   WINDOWS 3.1 CLIPBOARD .........................
     ...............................
    .......................................


                                 - 3 -


                               

   몥 Multi-Edit   ⨯ :

  
  ப
   ᫮
  ⢥ ᫮

  祭  ᨫ   ஫  ᮮ⢥⢨   ⨯  (ਬ,    ⪠
᢮ 楫 ப  㤥 ஢   訡  ࠭  ),  
᪫祭 ᨬ  ப,   ᮢ⨬.


 

   ন.  ⮣ ਭ ᮣ襭,   ஬ 
楫 ᫮  ࠢ 0 ।⠢ TRUE,  ࠢ 0 - FALSE.


 

   ६ (Char)  8 ⮢   ᮢ⨬ 
⨯ "ப". Char-६ ࠡ뢠  ப   1. ᫨
 ᢠ ப,    1  char-६,    㤥 -
짮 ⮫쪮   (ᨬ) ப.  ᫨    ᢠ
 ப (ப  0) char-६,     㤥  ᢮
祭 0 (⮩ 㪠⥫ ASCII).




  ।⠢ 32  ⠬            -2147483648  
+2147483647.


 

   ।⠢  1E-38  1E+38  ᮩ    11  
.




  ப - ᨢ ᨬ. ᨬ쭠    -  2048  ᨬ.  
뫪   (pos) ᨬ  ப  1  ᮮ⢥  ࢮ
ᨬ  ப.

  ᫨ ப ६ ᢮ 祭,  饥    ,
祬 । ᨬ쭠  (.   ) 祭
㤥 ᥪ.


                                 - 4 -


  ப ࠭  ᫥饬 ଠ:

   1 (  1  2 ) ᮤন  ப.
   2 (  3  4 ) ᮤন ᨬ .

   5... Max_length ᮤঠ ⥪ ப.

  . ⠪:  ,      -
  .


                     

   ᢠ -  ࠢ⢠ (=).


 

  ᢠ 楫 ६ 룫廊 ᫥騬 ࠧ:

                Int_Var = Int_expression;

...  Int_expression   㭪 (楫), ६   -
᪮ ࠦ.

  : PASS_NMBR = 1;

  騥 䬥᪨  ⨬  楫 ᥫ:

        +                   &&       ᪮ 
        -        ⠭          &        ࠧ來 
        *                  ||       ᪮ 
        /                    |        ࠧ來 
                                    ^        ࠧ來 XOR
        <<       ࠧ來 ᤢ .
        >>       ࠧ來 ᤢ ࠢ.
        %           .
        ++       祭  1.
        --       襭  1.

  樨 ࠢ ਬ  楫 ᫠:

     ==       ࠢ         >=         ࠢ
     >                <=         ࠢ
     <                !=        ࠢ

  樨 ࠢ  1 - true,  0 - false.

  : INT_VAR = 1 > 2;  /* INT_VAR ᢮ 0 (FALSE) */

  㣫 ᪮  ( !) ᯮ짮    浪
᫥.

  : INT_VAR = ((A + B) * C) / D;


                                 - 5 -


 

  ᢠ ப ६ 룫廊 ᫥騬 ࠧ:

                Str_Var = Str_expression;

...  Str_expression   㭪 (ப), ப ६
 ப ࠦ.

   + ᯮ  ⥭樨 ப.

  : Str_Var = 'This is a test' + Str_Var2 + File_Name + Str_Var3;

騥  ࠢ ਬ  ப:

    ==       ࠢ                 !=       ࠢ
    >                        <       
    >=         ࠢ      <=        ࠢ

樨 ࠢ  楫 1  True,  0  False.

  !!: ࠢ ப ⢨⥫  ॣ.

  :
                if ( Str_Var == 'ON' )
                {
                  Make_Message('ON');
                }
                else if ( Str_Var != 'OFF' )
                {
                  Make_Message('UNKNOWN');
                }
                else
                {
                  Make_Message('OFF');
                }


                        

  ᢠ ⢥ ६ 룫廊 ᫥騬 ࠧ:

                       Real_Var = Real_expression;

...  Real_expression   ⢥ 㭪, ⢥
६  䬥᪮ ࠦ.

  騥 䬥᪨  ⨬   ⢥ ࠦ-
:

    +                          *                
    -                ⠭         /                


                                 - 6 -



騥  ࠢ ਬ  ⢥ ᥫ:

    ==                       !=       ࠢ
    >                       <       
    >=         ࠢ     <=        ࠢ

㣫 ᪮  ( !) ᯮ짮   浪
᫥.

  : REAL_VAR = ((A + B) * C) / D;


                          

  ।塞 짮⥫    -   -
, ஥       ப,  -
ன ।.

        20 ᨬ .

     ࠧ  ⥬  ᠬ ᮣ襭, 
  ⮪.

  ६      ᯮ짮.    ⪠ -
짮 । ६ ਢ  訡 ࠭.

  ६ । ᫥騬 ࠬ:

        char char_var_name1, char_var_name2,...;

        int int_var_name1, int_var_name2,...;

        real  real_var_name1, real_var_name2, ... ;

        str   str_var_name1[L], str_var_name2[L], ... ;

   [L]  । ப  ६    易⥫쭠. -
쭠  ப ६ - 2048. ᫨   㪠,   
㬮砭 ᯮ 254.

   ६   ।    ᢠ  砫
祭, ਬ:

        str file_str[80] = "TEST.S";


                                 - 7 -




  쭠 ६    ᫥ ।,    
  . ਬ:

        macro test
        {
           int jx = 1;                 Ŀ
           if( jx == 1 ) {                                   
             int jy = 2;               Ŀ              
             make_message( str( jy ) );        jy      jx
           }                                         
           make_message( str( jx ) );                        
        }                              




  ப  믮 ४ᨢ  ᮤন  뢠 -
 ६  㤥 . ,   ६-
, ।  쭮 ணࠬ  ४ᨢ.
ਬ:

        macro test
        {
          sub1:
          {
            int jx;              // jx  ४ᨢ
            jx = 2++;
            call sub1;           //  맮  jx
            ret;
          }
        }


                          

  Multi-Edit ন  ப   楫 ६,   
ᮢ⭮   ᯮ짮      ப.       
६      ⭮    ६, ᪮ 
ᯮ짮   ᫥ ⮤ 㯠:

        1.   ६  ᥢ

        2. 㭪樨 㯠   ६


  

   ப  楫 ६  ⥯  । ᯮ-
,  ।   ६       -
쭮 .


                                 - 8 -


        ⢮  ᭠㦨  ப 
  ⨯,       ६    ।   
ᢠ  砫  祭.      㪠뢠 ᨬ
 ப.

    ப  ᪨.    ᥣ    ⮫쪮 ,
᪮쪮 ॡ  ⥪饩  ப.

   ६ । ⨬ ᯮᮡ   ᯮ짮
筮 ⠪     ६   ᪫祭 ⮣,    
    ।  㭪   ப ॡ ࠬ஢.
஬  ⮣,         㭪  Global_Int,   Global_Str,
Set_Global_Int  Set_Global_Str  ᠭ  㪮⢥  CMAC.

  ⮬       ६,   ।  १    㭪樨
Set_Global_xxx    ᮤঠ  ᨬ,   ⨬  
६ CMAC.  ন 堭 ᥢ.

        global
        {
           str gtest;
           int gtest2;
        }

        void global_test
        {
           gtest = "WOW!!";
           gtest2 = 20;
           ++gtest2;

           make_message( gtest + str(gtest2) );
           // ᫥ ப  ⮦,   ।
           make_message( global_str("gtest") + str(global_int("gtest2") );
        }




  ᥢ  ᯮ     楫   ࠧ襭     ࠭  
६,        ᮤঠ    㪢    ᨬ,    
"!IM_A_STRING","!HELLO?WORLD@@" " @@MULTI#EDIT^ULES@@".   饥
ᯮ짮    ᥢ  -    㭪ﬨ  㯠    
६,  SET_GLOBAL_STR()  GLOBAL_INT().

  ⠪  । ᥢ  쭮 ६:

                global
                {
                   str gtest "ALSO_GTEST";
                   int gtest2 "!GTEST_ALIAS@@";
                }


                                 - 9 -




  ⨯  ॡ  ப    ⮣,  ⮡      
ம।, 室騬   㣨  䠩. ⨯  ⮨
      ।   ப,      䠪᪮  .
⨯    祭 筮 ࠭   䠩   ⥬  ᠬ묨
,      䠪᪨  䠩,      SH-७.   
室 䠩 MESYS.S 㤥  䠩 ⨯ MESYS.SH.

⨯ । ᫥騬 ࠧ:

        prototype _䠩
        {
           ⨯ macro1(ࠬ);
           ⨯ macro2(ࠬ);
           //  ..
        }

  ࠬ   ।,   ᪮      室      ॠ쭮
ப,  ᪫祭 ⮣,   祭  㬮砭  
 ।.

ਬ:

        prototype TMACROS
        {
           void Upper( str &s );
           void FindFile( str fn );
           void message( ... );
           int test( int x, str ss );
           str munch_str( str s );
           //  ..
        }


                    

CREATE_GLOBAL_STR( Str_Var_Name, String_value ) 楤

       ப,   ஢ન ⮣,   쭠
  ப 㦥 .  ॥, 祬 ᯮ짮  SET_GLOBAL_STR,
    ᯮ짮 ⮫쪮 ⮣,     ப  
    ,        ࠭    
     쭮   ப.    ⮡   㤠   ᫥  ᮧ
          ப                 ,         ᯮ
  SET_GLOBAL_STR(Str_Var_Name,'').

  : CREATE_GLOBAL_STR ('Search_Str','END;');


                                - 10 -


FIRST_GLOBAL( Local_Int_Var ) 㭪 (ப)

  :  ࢮ 쭮 ६,  室 
              .    Local_Int_Var  (쭠   ६)   㤥
              ⠭  1 ᫨ 쭠 ६ - 楫  ⨯,
                  0  ᫨   쭠  ६  -  ப.   
              樠  饭    NEXT_GLOBAL,  
              ந    ᥬ ᯨ   ६.
              .   ਬ.


GLOBAL_INT( Int_Var_Name ) 㭪 (楫)

  : 祭 㪠 쭮 楫 ६.

    !!:       ᫨ ६  뫠 ⠭  । ।,
               頥 0.

  :  Int_Var = GLOBAL_INT('Common_Line') + 234;


GLOBAL_STR( Str_Var_Name ) 㭪 (ப)

  : 祭 㪠 쭮 ப ६.

    !!:       ᫨ ६  뫠 ⠭  । ।,
               頥  ப.

  :  Str_Var = GLOBAL_STR('Search_Str');


NEXT_GLOBAL ( Local_Int_Var ) 㭪 (ப)

  :  ᫥饩 쭮 ६  .
              頥  ப ᫨  ६
               .  Local_Int_Var 㤥 ⠭   1 ᫨
              쭠 ६ - 楫,   0 ᫨ ப.


SET_GLOBAL_INT ( Int_Var_Name, Integer_value ) 楤

  ᢠ 祭 楫 쭮 ६. ᫨ 쭠
  ६   ,   ᮧ.

   :         SET_GLOBAL_INT( 'Common_Line', 234 );


SET_GLOBAL_STR ( Str_Var_Name, String_value )  楤

  ᢠ 祭 ப 쭮 ६. ᫨
  쭠  ६   ,   ᮧ.

  :  SET_GLOBAL_STR('Search_Str','END;');


                                - 11 -


   !!:   ६  ⢨⥫  ॣ. 
        ६  ᮤঠ  ப ࠦ,
         Multi-Edit' 稬 ⮫쪮  20 ᨬ.

   !!:   ६, 稭騥  "! " 
       ⠭  砫  ᥠ ।஢ (᫨
       祭 session manager).


                          

     ।塞 짮⥫ 
६.    ࠡ뢠     ப
Multi-Edit',   䠪᪨ 믮 樨  ᢮
ᯮ짮.

      ᯮ짮  ࠬ  
㭪樨 ॡ饩  ६.

   ਬ  :

    BLOCK_COL1    /*  1-  ન஢  */
    BACKUP_PATH   /* ⠫  ࠭ backup-䠩 */
    DISPLAY_TABS  /* 1-뢠 ᨬ ⠡樨, 0- 뢠 */
    FILE_NAME     /*  䠩  ⥪饬  */


  ਫ 1 ᮤন 䠢 ᯨ᮪  ⥬ ६.


                               

 - 祭, ஥   ᢮ .


 (INTEGER) 

   ⠭  뢠  筮 .

  :
                Test_Integer = 27;
                if ( Test_Integer == -346 )
                {
                  Test_Integer = 346;
                }


 (HEX) 

  ⭠ ⠭⠬ ।  "0x"  "$".  
,  ᨬ쭮 ᫮    ⭠筮
⠭ - 8.

  :
                Test_Integer = 0xA9F7;     /*  */
                Test_Integer =  $A9F7;


                                - 12 -


 (REAL) 

  ⢥ ⠭   筮 ଠ,   
ᮤঠ  ࠩ    ᫥   ࠢ  筮
窨.

  :
                Test_Real = 123.0;
                if ( Test_Real == 0.2343 )
                {
                  Test_Real = 9.0134;
                }


  ()

  ப ⠭  㦠 묨  묨
窠.


  :
                Test_Str =  'This is a string constant';
                Test_Str2 =  "This is also a string constant";

   ᨬ ASCII   ।⠢  ப, 㦥
 窠 १ ᨬ '|'.  ᯮ  ⮣,
⮡   ப ⠥ ᨬ   ࠢ.

 !!:    CMAC  প ᮢ⨬  MEMAC.

  :
                '|13' -  ⪨;
                '|12|10' - ॢ ࠭ ᮯ஢ ॢ ப;
                '||' - ᨬ '|'.

   筮 窨 ( ' )  ⠢  ப ⠭
   窨.

  CMAC ন - ᨬ  ⭮  ⮩ 
 窠. ਬ, "\tTHIS IS A TEST\r\n" 㤥 ᮧ
ப, 稭 ⪮ ⠡樨  稢 ॢ
ப  ⮬ ⪨. ন ᫥騥 ᫥⥫쭮:

              ᫥.  祭     
              ------------------------
        \a          0x07          BEL
        \b          0x08          BS
        \f          0x0C          FF
        \n          0x0A          LF
        \r          0x0D          CR
        \t          0x09          HT
        \v          0x0B          VT
        \\          0x5C          \
        \"          0x22          "
        \xH           any        H = ப  16- 
        \XH           any        H = ப  16- 


                                - 13 -


 ,  

  #DEFINE   -   䠩 (  
᭠㦨 ப).

  ਬ:

        #DEFINE WOW ='THIS IS A NUMBER:  ' + str(jx)

 ਬ ᢠ  ᫥ "=" ⠭ WOW.


  ப  ᮤঠ -. ᫨ ⮫쪮 ⠭ ।,
  ⠥   ᥬ ப   䠩 ᫥
 .   ⠭  ८। 
 ६.


                       

  ਫ 2 ᮤন ᯨ᮪ ।।  ⠭,
ᯮ㥬  Multi-Edit.

  ਬ:

    TRUE             /* 1 */
    FALSE            /* 0 */
    RED              /* 4 */
    EDIT             /* 0 */

    Working_Color = (RED << 4) | 0x80;
          /* ⠭ 梥  "WORKING" */

  !!: , 祭 梥⠬ ᮮ⢥ ਡ⠬ DOS.
      祭 ० (EDIT, TERM, DOS_SHELL, ALL) ᯮ 
      祭   .


              ,    

  室 䠩   Multi-Edit'   
COMPILE,  ᮧ MAC-䠩, ᮤঠ騩 , 믮
MULTI-EDIT'.

  CMAC ⥯ ন ᫮ ࠭, ᭮ 
।塞 짮⥫ ⠭,  ࠡ뢠 ।
樥 ந筨.


                                - 14 -


                     MULTI-EDIT

 --   Multi-Edit ।⢥  ⢨⥫  ॣ.
     , 祭 ப ⢨⥫  ॣ. ᫨ 祭
     Test_Str 'on',  ( Test_Str == "ON" ) 㤥 FALSE.

 --  ਭ⮥ ७  室 䠩 - .S

 --  ਭ⮥ ७  䠩  ⪮஢ ப .MAC
     (  ਠ    짮⥫ 㤥
     訢  ப,  ७  
     ⫨筮  㬠稢 - Run A Macro...).

 --    稢 窮  ⮩ (;).

 --  ஡ ॡ   ஭  , ਬ ( + )
     ( = ).

 --   ᨬ  /*  */ , ਬ /* ਩ */.

 --  ᨬ쭠  ப  室 䠩 - 254 ᨬ.

 --  / 窨  ᯮ짮  砫  
       ப.

 --  <CtrlBreak> 筮 蠥 믮 ப, ᫨  
     ந室  横  ७ 樨 (File_Load, 
     ...).   ⮬ 砥, 㤥 १㦠 ⥬.


                             

   ப  ᮧ ᮣ᭮ ᯥ᪮
   ᮤঠ । .

  ᫥:

   [(ࠬ)] [TO ] [FROM ०] [ਡ]
  {
    <⥫ ப>
               .
               [#INCLUDE 䠩]
               .
               .
               .
               [return([祭]);]
             }


             (易⥫쭮 !!)

  । 砫 ப   ⨯. ப 
 祭  ⨯ int, str, real, void,  macro. Void 
macro     祭.


                                - 15 -


             (易⥫쭮 !!)

  ।  ப.   ᮤঠ  16 ᨬ. 
࠭稢 ᨬ 塞묨 DOS   䠩, 
᪫祭 ⮣,  窠 (-)   Multi-Edit'.


ࠬ

  ࠬ 易⥫. ᫨ ࠬ ,  㣫
᪮   ஢. . । ࠬ஢


TO 

  ।   (ਬ, <AltG>, <CtrlF1>) ன
㤥 祭  ப.  祭  ப
믮  ⨨ । 譮 樨  
६ ᫥ 㧪 ப  . 譠  
ᮮ⢥⢮ ᨭ⠪ ᠭ  ਫ 3.

 !!: ப   ﭭ 祭  
  ன  .


FROM ०

  ।   ० ப  믮. 
ਬ ⮫쪮  祭 譮 樨. ⮬
짮⥫ , ਬ,   ப, 祭 
<AltB>  ० ।஢ ⥪,   ப,
祭  <AltB>  ०  窨 DOS.

  ⨬ ०:

    EDIT
    DOS_SHELL ( 窠 DOS)
    TERM ( 裡)
    ALL

  ᫨ ० ,  ਭ EDIT.


ਡ

  ப   祭 ᫥騥 ਡ:

  TRANS

    ।,  ப   㦠    
  ॡ  䠪᪮ 믮. ࠧ ᫥ 믮
  ப   㦠  .

  TRANS2

    筮 TRANS,  ᫥ 믮 ப ⠥  .


                                - 16 -


  NO_BREAK

    ⪫砥 <CtrlBreak>  ६ 믮 ப.

  DUMP

    ।,  ப    㤠  
  ᫥ 믮.

{

    砫   ('{'  '}'  ⥫ ப).

⥫ ப

    㭪樮쭮 ᮤন ப.


#INCLUDE 䠩

     ४⨢  ⠢    䠩 
  祭 㣮 䠩  室.   䠩 祭
  ਭ ⠪    筨 (᫨  । ).
  砥 䠩   ᮤঠ ४⨢ #INCLUDE (  
   䠩  䠩  祭). 砥 䠩  
  । ⨯  饭  ப  㣨
  䠩.


return([祭])

     室  ப   । 祭
  , 맢襬 ப. 祭   ⨯ (str,
  int  real), ।   ப.  return
   ॡ  ப, ।  void  macro.
  , return()  ᯮ짮  室  ப 
   祭.


}

    稢 ⥪騩  .


                           CMAC-

   CMAC - 䠪᪨ 室 ,   ᯮ㥬
ନ ९, ⮡ 뫠   । 
७, ᫮ ࠭樨  祭 䠩.

!!: C, ।塞 짮⥫ ⠭ 筮  ப.
祢,  ନ 㤥    CMAC.

  CMAC ⥯ ন ᫮ ࠭, ᭮ 
।塞 짮⥫ ⠭.


                                - 19 -


  CMAC ᯮ ⢮   C-९.
।塞 짮⥫ ⠭  ᥬ  
䠩 ᫥  #DEFINE.

  ন ᫥騥 ४⨢:

#INCLUDE 䠩
     ४⨢  ⠢    䠩 
  祭 㣮 䠩  室.   䠩 祭
  ਭ ⠪    筨 (᫨  । ).
  砥 䠩   ᮤঠ ४⨢ #INCLUDE (  
   䠩  䠩  祭). 砥 䠩  
  । ⨯  饭  ப  㣨
  䠩.

#DEFINE  祭

    ।  ⠭.  -  ⠭, 祭 -
  ப ᨬ,  㦭 ᢮ ⠭. 祭 ⠭
    ᨬ  砫 祭   ப.

        ਬ:         #DEFINE max_buffers 10
                        #DEFINE test_str "This is a test str"
                        #DEFINE test_value t_int * 100

#UNDEF 
     । 짮⥫ ⠭.

#IFDEF 
    稭  ᫮ ࠭樨. ᫨  ।,   
   ᮮ⢥饣 #ENDIF  #ELSE 㤥 ஢. ᫨ 
   ।,   㤥 ய᪠.

#IFNDEF 
    筮 #IFDEF,  ᪫祭 ⮣,    ⮫쪮
  ᫨   ।.

#ELSE
     ᫥  #IFDEF  #IFNDEF.    #ELSE 㤥
  ஢ ⮫쪮 ᫨ ᮮ⢥饥 #IFDEF/#IFNDEF 뤠 FALSE.

#ENDIF
    뢠 #IFDEF, #IFNDEF  #ELSE .

᫮ ४⨢      㣠.


     CMAC

      । ⠭ (   ९ #DEFINE)
    ப CMAC.

        CMAC <室 䠩> -P<⠫ 祭> -#< ⠭>

ਬ:  CMAC test.s -Pmac -#debug =#test


                                - 18 -


                      :  

  室 䠩  ᮤঠ ⮫쪮  ப  
ࠧ ப.

  ᫨  室 䠩  ᪮쪮 ப,    
஢   .MAC 䠩,  㤥   ࢮ
ப.  , ᫨    㥬 .MAC 䠩
㣮   ஢  ᯥ᪨ ⠫,   
室 䠩  ।   㠫 ப
 macro_file,.
  .    ⥫쭮 ଠ樨 ⭮⥫쭮
 macro_file.


                 DOS

  ࠭祭    ⥬  ᤥ 室
 ப   ப DOS.

  :
                CMAC < 䠩> -P<> -D<⫠筠 窠   >

  :
                C:\ME>CMAC PASCAL -Pc:\me


   -P  짮⥫ । ⠫  .MAC 䠩.

   ⫠ -D   ਫ 4,  ᭥ 訡
  ६ 믮.

  㯮 ਬ 㤥 ஢ 䠩 PASCAL.SRC 
  c:\ME\PASCAL.MAC.

  筮,  樨 ப, MAC 䠩 ᮧ  ࠭
 ᪥  ⮬  ⠫,   ME 䠩.   ⠫ .MAC 䠩
  ஬ macro_file:

  :
                macro_file <><macro->

 macro_file     室 䠩.


                                - 19 -


                            

  ⪮஢ ப   믮   ᫥
ᯮᮡ:

'Run macro...'

  ᫨ ப   ⮣  ,   䠩  ᮤঠ騩,
     ।   䠩   ப.

  ଠ:
                            䠩^ப


      

   A. ᫨ ப 뫠 祭   ᯮ  TO
       室 䠩,    MULTI-EDIT KEYMAP,
       ᭠砫  㦠 䠩 १ "Run a macro" 
      १  "". ப ⮣  믮
      १ ⨥ ᮮ⢥饩 譮 樨.

       ,  ᫨ ப   Multi-Edit,
        ⮬᪨ 㦠  ,  ࠧ  㯭.

   B. ᫨ ப 뫠 祭 १ Keymap,  ⨥
      祭 譮 樨 ਢ  믮 ப.


    MULTI-EDIT

  ப   믮 ⮬᪨, ᫨ Multi-Edit 뢠
    ப  樥 '/R'.

  :

                ME /R < ப  䠩>

  :
                ME /R SETUP

  !!:    ஡  /R   ப  䠩
             易⥫!!

              䠩,  㦭 㧨 । 믮
             ப   ᫥  "/R".

             ਬ,

                      ME filename.ext /R SETUP



                                - 20 -


 "STARTUP"

    Multi-Edit,   ⮬᪨  䠩 STARTUP.MAC,
᭠砫  ⥪饬 ⠫,  ᫨  室,   ⠫
Multi-Edit. ᫨ STARTUP.MAC ,   믮.  STARTUP.MAC
 ᮧ ⠪, ⮡ ᮤঠ  楤 樠樨,
ॡ騥 짮⥫,  㧪  믮 㣨 ப.

 

  <CtrlBreak> 筮 蠥 믮 ப, ᫨ 
   ந室  横  ७ 樨 ( File_Load,  ... ).
   ⮬ 砥, 㤥 १㦠 ⥬.

  (  )

  ᯮ - , ப  뢠 筮 ⠪ ,
    ७ 㭪.  ( . 㭪樨/楤 )

  ਬ:
                j = square( 24 );

  ,    ।  ⮬  ᠬ 䠩 
  맮,  ப    ⨯,  맮 
     ⨯.

  ப   ॡ 祭 ,  砥 맮 
   楤.

  ਬ:
                  square( 24 );

  ᯮ ⨫  ப, ப  뢠 ⥬ 
  ᠬ ᯮᮡ,   믮   , ᯮ 㭪
  RUN_MACRO.

  ਬ:
                RUN_MACRO("䠩^^ந [ࠬ]");

   . ⨯  । ࠬ஢


                         

  ப   祭   १
 TO (.  ),  १ Keymap.


                        

  , ᫥    ᢮ 
.   設⢠   ⠪ ᢮ 㦥 ᤥ
(஢  Keymap  Install  ).


                                - 21 -


      ,    

BACK_SPACE                      EOL                     PAGE_UP
BLOCK_BEGIN                     FIRST_WORD              RIGHT
BLOCK_END                       GOTO_MARK               SAVE_FILE
BLOCK_OFF                       HOME                    STR_BLOCK_BEGIN
COL_BLOCK_BEGIN                 INDENT                  TAB_LEFT
COPY_BLOCK                      KEY_RECORD              TAB_RIGHT
CR                              LAST_PAGE_BREAK         TOF
DELETE_BLOCK                    LEFT                    UNDENT
DEL_CHAR                        MARK_POS                UNDO
DEL_LINE                        MOVE_BLOCK              UP
DOWN                            NEXT_PAGE_BREAK         WORD_LEFT
EOF                             PAGE_DOWN               WORD_RIGHT


                              

   ᨬ  /*  */  ஢ CMAC-࠭஬
Multi-Edit'.  - 㤮 ᯮᮡ  ਨ (  
묨)  ६ "㤠" ࠧ   ⮣, ⮡ 㤠 
䠪᪨.

  :

                /*  - ਬ  
                /* ணࠬ ࠡ⪨ 訡
                ERR_MSG:
                JX = 1;
                if ( JX != 0 )      /* ᫨ **JX  ࠢ 0 ⮣ */
                {
                  Call KILL_LINES;  /* 맢 KILL_LINES */
                }
                else                 /* ... */
                {
                  Make_Message('ERROR'); /* 뤠 ᮮ饭: ERROR */
                }
                ret;
                */

  ப  㤥 믮 ⮬,     祭
 /*  */.

  !!: ਨ  ⮬,     
      㬥  室 ⥪  ६ 㤠
       ப  楫  .

  ਨ ⨫ C++ ⮦ ন.  ᫥ //  
ப 㤥 ஢. ਬ:

        if( test )                // Check for condition

          call wow;                // If true then call subroutine


                                - 22 -


                                 

  ⪠ - ப ᨬ,  ᯥ   ⥫
ப. ⪨ । ( ⠪ ࠧ ) 
砫 ᯥ᪮ ணࠬ  ࠧ    맢 
믮 室  ⨯ CALL  GOTO.

    : [a-z A-Z _ 0-9]

  : 20 .

 : ⪠   稢 稥.  ⪠
뢠 믮騬 室 ஬  㣮  ப,
稥  ⠢.

  :
                macro inf_loop
                {
                  BEGIN_HERE:
                  goto BEGIN_HERE;
                }

     !!: ⪠ 쭠  ப  ன . 
         ⪨     ᪮쪨 ࠧ
         ப,  室  室 䠩.


                           

   ᫮ 室 ⢫  室 
⥪饩 窨 믮 ப  㣮.

break;

     break  ᯮ짮 ⮫쪮  横 (while,
  do  for-横)  ४⥫ switch.  蠥
  ४⥫ switch  横.   横   switch 
  ᬥ訢  뢠   㡨, 㡥,   break
  室  ࠢ쭮 横  ४⥫.   break 㤥
  ᥣ  ᠬ  横   switch.


call <⪠>;

    믮 ணࠬ  ப, ⢫ 室 
    <⪥>.    ᯮ  ret.


continue;

     continue  ᯮ짮 ⮫쪮  
    横.   । ࠢ ᫮   while  do-横,
      ࠦ 饭  for-横.


                                - 23 -


goto <⪠>;

    ⢫ ᫮ 室    <⪥>.


ret;

    室  ணࠬ. 頥  , ।⢥
    ᫥饬 ᫥ ᮮ饣  call.  ,
     ret  믮   call.


                            

  ᫮  室 㤥  믮    
믮 ᯥ᪮  ᫮.


 

        do                              /* DO/WHILE 横 */
          ;
        while (ࠦ)

        for (init-ࠦ; test-ࠦ; ࠦ 饭)
          ;

        while (ࠦ)               /* WHILE 横 */
          ;


 

        if (ࠦ)                  /* IF  */
          ;

        if (ࠦ)                  /* IF/ELSE IF/ELSE  */
          ;
        else if (ࠦ)
          ;
        else
          ;

        switch (楫 ࠦ)
        {
          case n :
          default :
        }


                                - 24 -


        switch (ப ࠦ)
        {
          case "1" : ; break;
          case "2" : ; ; break;
          case "3" : ; ; ; break;
          default     : ; ; ; ; break;
        }


  ᫮     ᫮.  ᫮  楫
᫮ (TRUE =  0, FALSE = 0 ).

   樨 ᫮:

                x == y  x ࠢ y
                x != y  x  ࠢ y
                x < y   x  y
                x > y   x  y
                x < = y x   ࠢ y
                x >= y  x 訩  ࠢ y
                x && y  x ᪨ AND y
                x & y   x ࠧ來 AND y
                x || y  x ᪨ OR y
                x | y   x ࠧ來 OR y

  祭 । switch    ப  ࠦ
  楫 ⨯. 祭 case   ⠭ 楫 ⨯ 
  ப.


                           \

  ⥬ 㭪 - ஥ 䨪,  믮
    祭. 㭪, । 짮⥫ -
 ப, ᠭ  - ⨫. ᫨ 㭪 
頥 祭,   㯮  楤. ᫨ 㭪
頥 祭,   㯮  㭪 (楫), 㭪
(ப), 㭪 (ᨬ쭠)  㭪 (⢥). 㭪
 믮  뤠 १ (१  뢠).

  :

    jx = Length( Str_Var );    /* 頥  Str_Var  ᢠ
                                   楫 ६ jx */
    Length( Str_Var );         //  믮 祣


:  ᯮ짮  - ⨫ ।
            ப, ।塞 짮⥫ 㭪樨 
              楤ࠬ/㭪  㣮 䠩
            ᯮ .


                                 -25-


                    

  CMAC ⥯   ⮤ । ࠬ஢.  ⮤ - ⮤
 ப,  ࠬ । ப  ⥪⮢ ଥ.

  ன ⮤ - C- ⮤,   ।
ࠬ ᯮᮡ, 祭 宦  C.

  CMAC ন  - ⮤  ⮤  ப.


  

  ࠬ   । ப  ⥪⮢ ଥ,
ᯮ ࠬ 楤 RM (Run Macro). ଠ:

                RM( "_ ப_ࠬ஢" );

  ꥤ ᨬ쭠  _ + ப_ࠬ஢ - 254
ᨬ.  ப_ࠬ஢  ⤥  _ ⮫쪮
஡.  ப_ࠬ஢  ࠡ뢠  뢠
ப १ 㭪 MPARM_STRING (.  ).

  祭 楫 ⨯    뢠 ப 
⥬ ६ RETURN_INT.

  祭 ப ⨯     ⥬ ६
RETURN_STR.

  RETURN_INT  RETURN_STR 㯭 쭮,    ।
  ப.

  㭪樨 PARSE_STR  PARSE_INT  ᯮ짮 뢠
ப   ப  祭 楫 ᫠ 
। ࠬ.


MPARM_STR 㭪 (ப)

 : ப ࠬ஢, । ப.


PARSE_INT( str1, str2 ) 㭪 (楫)

 : 祭 楫 ᫠ 뤥塞  str2   str1.
             ⠥ 筮 PARSE_STR  ᪫祭 ⮣, 
             ப,    ᫮ ப,
              ८ࠧ  楫 ᫮.

  !!:  㭪  PARSE_STR ⢨⥫  ॣ. ਬ, "/X="
       ⮦,  "/x=".


                                - 26 -


PARSE_STR ( str1, str2 ) 㭪 (ப)

 : ப 뤥塞  str2   str1.

   Str1 - 筮   "/name=",  name -  ⥪.

   頥  ப, ᫨ str1    str2.


RETURN_INT 楫 ६

  ᯮ   楫 ᫠  ப.


RETURN_STR ப ६

  ᯮ   ப  ப.


VAR_PARSE_INT( str1, str2, int_var ) 楤

  ⠥  PARSE_INT,  ᪫祭 ⮣,  ࠭ १
 int_var.


VAR_PARSE_STR( str1, str2, str_var ) 楤

  ⠥  PARSE_STR,  ᪫祭 ⮣,  ࠭ १
 str_var.


VAR_REMOVE_STR( parm_str, str_var ) 楤

  易  㭪ﬨ  楤ࠬ ࠧ.  㤠 ࠬ,
। parm_str  str_var.
  ਬ, ᫨ str_var - "/X=who/Y=when/Z=why",  parm_str - "/Y=",
  १ 㤥 "/X=who/Z=why".


C- 

  - ⮤  । ࠬ ᯮᮡ, 祭
宦  C.  ᯥ稢 ⨯ ࠬ - value, reference, 
optional.   ।  40 ࠬ஢,  
易⥫.


                                - 27 -


Value-ࠬ

  Value-ࠬ    ६, 
 砫쭮 祭  뢠饣 .  ࠧ,
ப । ⮫쪮  . ࠬ, । 
祭 (value- ࠬ) । 筮 
६,    砫 ᢮.

        ⨯ ( ⨯ var1 = , ⨯ var2 =  )

   ⨯ 易⥫. ᫨ 饭  ᫥ ࠬ஢, 
। ⨯ ।饣 ࠬ.

=   易⥫쭮,  ᯮ  祭 祭 
㬮砭.

ਬ:
                str Concat3Strings( str s1, s2, s3 )
                {
                    return( s1 + s2 + s3 );
                }

  ப ࠬ ।  祭  ᮤঠ
।  筮 ⠪ ,  ப  ६.

ਬ:
                Int ScanExtension ( str ext[3 ] )
                {
                    // ⥫
                }


Reference-ࠬ


  Reference-ࠬ 䠪᪨ ᮤঠ 㪠⥫  ࢮ砫쭮
筨 . 뢠騩  ப  ।
⮫쪮  ६ ( 㣨 ࠬ, । 
祭 )  뫪  ࠬ.  ப  
ࠬ,  䠪᪨  筨 .  ࠧ
쭠 ६ 뢠饣  㤥 .
ணࠬ ᪠    var-ࠬ.

  CMAC ᯮ C ++ ᨭ⠪  । ࠬ 뫪. ⮡
। ࠬ 뫪, ᯮ   ᠬ ᨭ⠪,   
। ࠬ, ।  祭,   &. ।
 ࠬ ( ⨯). ப ࠬ, ।  뫪 
 । ᨬ . ᨬ쭮 祭 
뢠  室 ६.

ਬ:
                void Upper( str &s )
                {
                    s = caps( s );
                }


                                - 28 -


 ப  뢠  ᫥饩 ப:

                void test
                {
                    str s = file_name;
                    Upper( s );
                }

  ६ s 䠪᪨  ப Upper.

   ,  ᫥饥 饭,  㤥 ஢
  訡 ࠭:

        Upper( file_name );

    ६  ࠬ   ।  뫪.


Optional-ࠬ

  Optional-ࠬ, ᫥   , 易⥫  
᪨ ஬ 㭪権.

  ⨢ ࠬ ।   C:  ellipsis  (...).
  Ellipsis   ᫥  ᯨ᪥ ࠬ஢.

  ⨢ ࠬ । ⮫쪮 祭,  
  ᫥騬 㭪:

int Get_Param_Type(  )
        :  0 = ࠬ "" 
                  1 = ࠬ - str.
                  2 = ࠬ - int.
                  5 = ࠬ - real

str Get_Param_Str(  )
        頥 ப ࠬ  

int Get_Param_Int(  )
        頥 楫 ࠬ  

real Get_Param_Real( count )
        頥 ⢥ ࠬ  

ਬ:
                /******************************************************
                 饭 頥  ப ᮮ饭.
                  ࠡ뢠  ࠬ஢  ⨯.
                 ਬ.
                 message("Current line is :", c_line, " Col is:", c_col);
                 ******************************************************/


                                - 29 -


                void message ( ... )
                {
                   int pc = 0, pt;
                   str tstr = "";
                   while( (pt = Get_Param_Type( ++pc )) > 0 )
                   {
                      switch ( pt )
                      {
                         case 1:   tstr += Get_Param_Str( pc );
                                   break;
                         case 2:   tstr += Str(Get_Param_Int( pc ));
                                   break;
                         case 5:   tstr += RStr(Get_Param_Real( pc ), 2, 10);
                                   break;
                      }
                   }
                   make_message( tstr );
                }


  । Optional-ࠬ஢ 㣮 

     । optional-ࠬ   ப 
㣮 १ 㭪 optional_params.  室 ப, 
ப    䠪⨢ ࠬ஢, 
optional_params - ⢥ ᯮᮡ,    ।
optional-ࠬ 㣮 ப.

ਬ:
        void messagef( str control_str, ... )
        {
           // ଠ⨧ ப   㭪樨 sprintf
           sprintf( control_str, control_str, optional_params );
           make_message( control_str );
        }

        !!: 室 ⥪ ப sprintf 砥 
        Multi-Edit  䠩 SPRINTF.S.  ப ⢫
        ⢮ C-㭪樨 sprintf.


    - 

   ,   ⥫쭮, ⮡ CMAC ন 
ப  - ⮤  ⮤ ࠬ஢  ப.
 ⥫쭮 砥 ࠡ.

   ப, ⭮⥫쭮  ᯮᮡ । ࠬ஢,
   㭪樨 MPARM_STR,  頥 ப ࠬ஢.
砫 祭,      ࠬࠬ
 ᨭ⠪᪨   ப.


                                - 30 -


ਬ:
                void FindFile( str fn = parse_str("/F=", mparm_str) )
                {
                   ... // ⥫
                }

     ப FindFile  뢠 
㭪:

                FindFile( "TEST.TXT" );

  ப:

                RM( "FindFile /F=TEST.TXT" );


                    CMAC MULTI-EDIT

ͻ
 樨                    䥩  樮 ⥬ 
 樨 樮஢    樨  ⢥묨 ᫠  
 樨 ࠡ  ᯫ          ࠭ 樨                 
 樨 䠩         樨 ᪠            
 樨  䠩                  樨 㫨஢ ப 
 樨  㭪樮쭮 .  Syntax Highlighting Operations    
 樨 ⥪⮢       樨 ⠡樨  ࠢ 
 樨 祭           樨 㫨஢ ⥪⮬  
                     ࠡ⪠ ६ ᮡ⨩       
 䥩  ﬨ .஢   樨 ⬥                   
 எ樨                       짮⥫᪨   䥩 
                   樨                  
 ࠧ 樨              樨 ⮢ ⥪⮢       
 樨 প                                                 
ͼ


                            

BLOCK_BEGIN 楤
  ⬥砥 砫 筮   ⥪饩 樨 .

BLOCK_COL1 楫 ६
  :  ࢮ ⮫  אַ㣮쭮 .

BLOCK_COL2 楫 ६
  :  ᫥ ⮫  אַ㣮쭮 
              (1000   ).

BLOCK_END 楤
  ⬥砥    ⨯  樨 .

BLOCK_LINE1 楫 ६
  :  ࢮ ப 筮 .


                                - 31 -


BLOCK_LINE2 楫 ६
  :  ᫥ ப 筮 .

BLOCK_OFF 楤
  몫砥 ⥪ ᢥ .

BLOCK_STAT 楫 ६
  : 0 -    ⬥祭;
              1 - ⬥祭  ;
              2 - ⬥祭 אַ㣮 ;
              3 - ⬥祭 ⮪ .

COLUMN_MOVE_STYLE 楫 ६
   ६饭 אַ㣮쭮 .
  ᫨ 0,  ०  㤥  ஡.
  ᫨ 1,   ஡  㤥.

COL_BLOCK_BEGIN 楤
  ⬥砥 砫 אַ㣮쭮   樨 .

COPY_BLOCK 楤
   ⬥祭   ⥪  .

DELETE_BLOCK 楤
   ⬥祭 .

MARKING 楫 ६
  TRUE, ᫨ ન஢  祭;  FALSE.

MOVE_BLOCK   楤
  ६頥 ⬥祭   ⥪  .

PERSISTENT_BLOCKS 楫 ६
  : TRUE (1) -  ﭭ (   ન஢).

STREAM_BLOCK_MODE 楫 ६
  䨣樨 筮  (/ ᨬ  ஬  
  )
        0 =  
        1 = 

STR_BLOCK_BEGIN   楤
  ⬥砥 砫 筮   樨 .

WINDOW_COPY ( window_num )  楤
   ⬥祭     ஬ window_num  ⥪饥 
   ⥪  .

WINDOW_MOVE ( window_num )  楤
  뫠 ⬥祭     ஬ window_num  ⥪饥 
   ⥪  .


                                - 32 -


                     

AT_EOL 㭪 (楫)
  : TRUE (1), ᫨  -     ப  ⥪饬 .

AT_EOF 㭪 (楫)
  : TRUE (1), ᫨  -     䠩  ⥪饬 .

C_COL 㭪 (楫)
  : 楫 ᫮, ᮤঠ饥  ⥪饣 ⮫ .

C_LINE 㭪 (楫)
  : 楫 ᫮, ᮤঠ饥  ⥪饩 ப .

C_ROW 㭪 (楫)
  : 楫 ᫮, ᮤঠ饥 ⥪騩  ப 
               ⥪饬 . (1 =  ப,   . )

  :
                / *  ६     ⥪饣 : * /
                while ( C_Row > 1 )
                {
                  Up;
                }

DOWN 楤
  ६頥     ப.

EOF 楤
  ६頥    䠩.

EOL 楤
  ६頥   ᨬ  ᫥  ⥪饩 ப.

FIRST_WORD 楤
  ६頥    ஡  ப.

GET_MARK ( mark_num ) 楤
  頥   , ࠭  ⪥ ந쭮 㯠 
  ஬ mark_num. ᫨ ⪠  ⠭,    樨
   㤥.

GET_MARK_RECORD( mark_num, group_num, var line, var col, var row,
                var offset ) 楤
  砥 ⢥  ⭮⥫쭮 ᯥ᪮ ⥪  ⪨
  ந쭮 㯠, ० ᥣ  楫  ⠭ .
  Mark_num     1 - 10. Group_num   1  ⪨
  ⥪,  2  ⪨ ந쭮 㯠. Line, col, row,  offset
    묨 楫묨 ६묨.

GOTO_COL( col_num ) 楤
  ६頥   । ⮫. Col_num   
  1  2048 ( ᨬ쭠  ப  Multi-Edit).

GOTO_LINE( line_num ) 楤
  ६頥   । ப. Line_num  
   1  2,147,483,647 ( ࠭祭 ᫠ ப Multi-Edit).

GOTO_MARK 楤
  ⠭    ᫥ , ⬥祭  ⥪
   㤠    ⥪.

HOME 楤
  ६頥   ⥪騩  饥 ६ ஢ 㯠.

LAST_PAGE_BREAK 楤
  ६頥   ப ᫥ ।饩 ப  ᨬ
   ࠭.

LEFT 楤
  ६頥     ᨬ. ᫨  -  ࢮ ⮫, 
   㤥 ६饭   ।饩 ப;  ⠢   㤠
  ⥪.

LEFT_OFFSET 楫 ६
  ⢮ ⮫殢,  ᪮쪮 ᤢ ࠭  ⠭ .

MARK_POS 楤
  頥 ⥪    ⥪ થ 樨  ⥪饣 .

MARK_STACK_COUNT 楫 ६
  ন ⥪騩 ࠧ ⥪ થ.

MS_LEFT 楤
  筮 LEFT,  ᪫祭 ⮣,   ⠭  ࢮ
  ⮫   㤥 ।  ।饩 ப.  ᯮ 
  ࠢ ஬   .

NEXT_PAGE_BREAK 楤
  ६頥   ப ᫥ ᫥饩 ப  ᨬ
   ࠭.

PAGE_DOWN 楤
  ६頥     .

PAGE_STR ப ६
  ப  ;
  筮 ⠭   ᨬ ॢ ࠭ (ASCII- 12),
      ப  10 ᨬ .

PAGE_UP 楤
  ६頥     .

POP_MARK 楤
     ⥪ થ  ⢨   .

RIGHT 楤
  ६頥  ࠢ  ᨬ;  ⠢   㤠 ⥪.

 ^2!!:   㤥    ப;   饭  
       ப ⮫쪮 ᫥ ⮣,  㤥 ⨣ ⮫ 2048.

SET_MARK ( mark_num ) 楤
  ⠭  ந쭮 㯠.
  Mark_num     1 - 10.

SET_MARK_RECORD( mark_num, group_num, line, col, row, offset ) 楤
  ⠭ ⢥  ⭮⥫쭮 ᯥ᪮ ⥪ 
  ⪨ ந쭮 㯠 ० ᥣ  楫  ⠭. 
  ࠬ ᮮ⢥ GET_MARK_RECORD (. ).

TOF 楤
  ६頥   砫 䠩.

UP 楤
  ६頥     ப.

WORD_DELIMITS ப ६
  । ࠧ⥫ ᫮,  ᯮ WORD_LEFT  WORD_RIGHT
   ⮣, ⮡ ᯮ 砫/ ᫮. 砭  ⮩ ६-
   室  䠩 "init.mac".

  :   Word_Delimits = '()"'',#$]?/||;: |255|9';

 ^2!!: ६ WORD_DELIMITS  ᯮ짮  
       ࠧ⥫,  । 砫   ᫮.

WORD_LEFT 楤
  ६頥     ᫮;  ⠢   㤠 ⥪.

WORD_RIGHT 楤
  ६頥  ࠢ   ᫮;  ⠢   㤠 ⥪.
  
CLOSE_DIR( dir_win_num ) 楤
  뢠  ⠫; dir_win_num     1-5;

DIR ( dir_string ) 楤
  ⮡ࠦ 䠩 ᮣ᭮ ᪥ dir_string.

DIR_ACTIVE ( dir_win_num ) 㭪 (楫)
  : TRUE (1), ᫨  ⠫ ।  dir_win_num .

DIR_ENTRY 㭪 (ப)
  : ப, ᮤঠ  ⥪饣 䠩  ⥪饬  ⠫.

DIR_ENTRY_STR 㭪 (ப)
  頥 ᢥ祭 ⠫  ⥪饬  ⠫. ப 砥
  , ६  ࠧ,  ᫨ ⥪騩 ० ⮡ࠦ ⠫ -
  ⮫殢.

DIR_INC_SEARCH ( search_str ) 㭪 (楫)
  믮    ⥪饣 ⠫.
  頥 TRUE ᫨ ᯥ譮.

DIR_LOCATE_MOUSE 㭪 (楫)
  ६襭 ᢥ稢 ⠫     ⮬  ⠫.

  :
        TRUE, ᫨ ᯥ譮

DIR_MASK 㭪 (ப)
  :  ⠢  ⠫ (  㯯 ᨬ),
                ⥬ ᬠਢ  饥 ६.

DIR_MODE 楫 ६
 : 0 =  ⠫,
             1 = ⮫殢 ⠫.

DIR_NUM 㭪 (楫)
  :  䠩,  ஬ 室   ᯨ᪥ 䠩
              ⥪饣 ⠫.

DIR_PATH 㭪 (ப)
  : ப, ᮤঠ   ⥪饬 ⠫.

DIR_SEARCH_ATTR 楫 ६
  筠 FILE_SEARCH_ATR,  ᪫祭 ⮣,
      ⠫.

DIR_SORT_STR ப ६
  ப ࠬ ஢  䠩 .

DIR_TOTAL 㭪 (楫)
  : 饥 ᫮ 室  ᯨ᪥ ⥪ ⠫,
               "."  ".." ⠫.

DIR_X1, DIR_Y1, DIR_X2, DIR_Y2 㭪樨 (楫)
  : न  ⥪饣 ⠫.

DISK_FREE ( drive_num ) 㭪 (楫)
  : 㯭 ᪮ ࠭⢮   ᪮.

    Drive_num = 0  ⥪饣 ᪮,
                1  ᪮ A:,
                2  ᪮ B:,  ...

DOS_DOWN 楤
  ६頥   ⥬     䠩.

DOS_FILE_ATTR 㭪 (楫)
  : 楫 ᫮, ᮤঠ饥 ਡ ⥪饣 䠩.

    ਡ: 0x01 = Read Only
              0x02 = Hidden
              0x04 = System file
              0x08 = Volume ID
              0x10 = Directory
              0x20 = Archive

DOS_HOME 楤
  ६頥   ⥬    ᯨ᪠ ⠫.

DOS_LEFT 楤
  ६頥   ⥬  ।騩 室 ⠫.

DOS_RIGHT 楤
  ६頥   ⥬  ᫥騩 室 ⠫.

DOS_UP 楤
  ६頥   ⥬    䠩.

FILE_MARKED 㭪 (楫)
  : TRUE (1), ᫨ 䠩  ஬ 室  ⬥祭.

MARK_FILE 楤
  ४砥 ⬥祭 ﭨ 䠩  ஬ 室 
   ⥬.

OPEN_DIR ( dir_win_num ) 楤
  뢠  ⠫; dir_win_num     1-5;

REDRAW_DIR 楤
  뢠  ⥪饣 ⠫. ਬ   䠩
  .

SIZE_DIR ( x1, y1, x2, y2, row_offset ) 楤
  ⠭ ࠧ ⨢  ⠫.
  Row_offset - ᫮ ப  孥  ,  䠪᪨ 
  ⮡ࠦ 室 ⠫.   뢠  室
  ⮡ࠦ   ப  ᪮.

SWITCH_DIR ( dir_win_num ) 楤
    ⠫ ⨢; dir_win_num     1-5.

UPDATE_DIR 楤
  ⠢  ⥬ ஢ ᯨ᮪ ⠫.
   
CAPS_COL 楫 ६
   ⮫ ࠭,   ப ﭨ  ⮡ࠦ
   Caps Lock.

COL_COL 楫 ६
   ⮫ ࠭,   ப ﭨ  稭 
  ⮫.

CTRL_HELP 楫 ६
  饥 ﭨ  ࠢ Ctrl-Keypad.

  TRUE  (1) =  ࠢ Ctrl-keypad 祭.
  FALSE (0) =  ࠢ Ctrl-keypad 몫祭.

DISPLAY_TABS 楫 ६
  1 = ⮡ࠦ c ⠡樨
  0 =  ⮡ࠦ c ⠡樨

EOL_CHAR 楫 ६
   ⮢ ६, ᮤঠ 祭 ASCII ᨬ-⥫
   㦭 ᯮ짮   ப  .

FKEY_ROW 楫 ६
   ப ࠭  ன ⮡ࠦ ⪨ 㭪樮쭮 ;
  0 =  ⮡ࠦ ⪨ 㭪樮쭮 ;

INSERT_COL 楫 ६
   ⮫ ࠭,   ப ﭨ  ⮡ࠦ 
  Insert/Overwrite.

INS_CURSOR 楫 ६
  ਡ    ० ⠢.

                0 = ન
                1 = 1/2 .
                2 = 2/3 .
                3 =  

LINE_COL 楫 ६
   ⮫ ࠭,   ப ﭨ  稭 
  ப.

MAX_WINDOW_COL 楫 ६
  訩  ⮫, ⮡ࠦ  .

MAX_WINDOW_ROW 楫 ६
  訩  ப, ⮡ࠦ  .

MENU_BAR_COL 楫 ६
   ⮫  .

MENU_BAR_ROW 楫 ६
   ப  .

MENU_BAR_STR ப ६
    .

MESSAGES 楫 ६
  ᫨ 1,   ᪠ ᮮ饭, ᣥ஢ ஬ ( 祭
  ).  ᥣ ᮮ饭  ப.   
  .

MESSAGE_COL 楫 ६
   ⮫ ࠭,   稭 ⮡ࠦ ᮮ饭
  (. ⠪ MESSAGE_ROW).

MESSAGE_LENGTH 楫 ६
  ᨬ쭠  ப ᮮ饭  MAKE_MESSAGE.

MESSAGE_ROW 楫 ६
   ப ࠭,  ன  ⮡ࠦ ப ᮮ饭;
  0 = ப ᮮ饭  ⮡ࠦ;

MIN_WINDOW_COL 楫 ६
  訩  ⮫ ࠭,    ⮡ࠧ.

MIN_WINDOW_ROW 楫 ६
  訩  ப ࠭,    ⮡ࠧ.

MODE_COL 楫 ६
   ⮫ ࠭  ப ﭨ,   稭 ⮡ࠦ
   ०.

NAME_LINE 楫 ६
  0 = ⮡ࠦ  䠩  孥 ப .
  1 = ⮡ࠦ  䠩   ப .

OVR_CURSOR 楫 ६
  ਡ     ० .
  . INS_CURSOR  ᯨ᪠ ਡ⮢.

RECORD_COL 楫 ६
   ⮫ ࠭  ப ﭨ,   稭 ⮡ࠦ
   Keystroke Recording.

STATUS_MACRO ( macro_name_string ) 楤
   ப,  㦭 믮 ( ⮣, ⮡ ᯮ짮
  ७ ணࠬ)  ⮡ࠦ ப ﭨ.

  .  ⮣ ࠧ  ਬ ᯮ짮 ⮣ ,
    ਬ ணࠬ ⮡ࠦ ப ﭨ.

STATUS_ROW 楫 ६
   ப ࠭  ன  ⮡ࠦ ப ﭨ;
  0 = ப ﭨ  ⮡ࠦ;

STATUS_STR ப ६
  ப,   ⮡ࠦ  ப ﭨ.

TIME_COL 楫 ६
   ⮫ ࠭,   稭 ⮡ࠦ /.

TIME_ROW 楫 ६
   ப ࠭,   稭 ⮡ࠦ /.
  0 -  ⮡ࠦ /.

WORKING_COL 楫 ६
   ⮫ ࠭  ப ﭨ,  㤥 稭 ⮡ࠦ
   WORKING.

ZOOM_CHAR ப ६
    ࠦ, ஥  ⮡ࠦ   䠩, ⮡
  㪠  ,   㤥  ࠧ.   
  䥪  zooming.

. 䠩 STATSET.SRC  ਬ ⠭ ࠭.
  
BACKUPS 楫 ६
  0 =  ᮧ १ࢭ 䠩
  1 =  .BAK 䠩
  2 = ஢ १ࢭ 䠩  ⠫, । BACKUP_PATH

BACKUP_PATH ப ६
    ⠫  ࠭ १ࢭ 䠩.  ६
  ᯮ ⮫쪮 ᫨ BACKUPS=2.

BUFFER_ID 㭪 (楫)
  : 䨪樮  䠩-,  ஬ ᮥ
              ⥪饥 .

COPY_FILE ( File1, File2, Flag )  㭪 (楫)
   File1  File2.
  ᫨ Flag = 0, 믮  .
  ᫨ Flag = 1,  File1 ⥭   2.
  頥 0  DOS- 訡.

CTRL_Z 楫 ६
  ᫨ 1,    䠩 㤥  ᨬ Ctrl-Z ( ASCII 26 ).

CUR_FILE_ATTR 楫 ६
   ਡ 㦥 䠩.

CUR_FILE_SIZE 㭪 (楫)
  頥 ࠧ 䠩  ᪥, 易  ⨢ .

EOF_CR 楫 ६
  ᫨ 1,    䠩 㤥  CR/LF.

EOF_IN_MEM 㭪 (楫)
  : TRUE (1) ᫨  䠩 室  ;
              FALSE(0) ᫨ EOF   ᪥.

FEXPAND ( File_Str ) 㭪 (ப)
  頥  ᯥ஢ ( ᪮  ⠫)
   䠩 File_Str.

FILE_ATTR ( filename ) 㭪 (楫)
  : ਡ 䠩   .

     Error_Level  ࠢ , ᫨ 䠩  , 
            ந諠 訡  ⥭ ਡ⮢.

  ਡ: 0x01 = Read Only
            0x02 = Hidden
            0x04 = System file
            0x08 = Volume ID

FILE_CHANGED 楫 ६
  ᫨  䫠 - TRUE (1),  䠩  ᫥ 㦠 
  ࠭. ࠭ 䠩 㤥 ⠭  䫠  FALSE (0).


FILE_EXISTS ( filename ) 㭪 (楫)
  : 0 =   
              1 =  
              2 =  - ⠫
  :
                FStr = 'TEST.SRC';
                if ( File_Exists(FStr) )   /* If TEST.SRC exists, then */
                {
                  Load_File( FStr );       /* load it */
                }
                if ( Error_Level != 0 )
                {
                  RM('MEERROR');
                }

FILE_NAME ப ६
   䠩 ।㥬  ⥪饬 ; ᨬ쭠  = 65 ᨬ.

  :
                File_Name = 'C:\ME\INIT.SRC';

FILE_SEARCH_REC ப ६
  DOS DTA ᯮ㥬  FIRST_FILE  NEXT_FILE.

FIRST_FILE ( filename ) 㭪 (楫)
   ࢮ  䠩 (  㯯 ᨬ DOS ( * ? )
    ).

  : 0 - ᫨ 䠩 .
              , 頥  訡 DOS 18.

  : (. NEXT_FILE )

FIRST_SAVE 㭪 (楫)
  : TRUE (1), ᫨ ⥪騩 䠩 ࠭  ࠩ  1 ࠧ
               砫 ᥠ ।஢.

FIXED_LINE_LENGTH 楫 ६
  ᫨ = 0,  ப  ७   宦 ਧ 
  ப  ᫥ 2048 ᨬ.  ଠ ०  ।஢
  ⥪⮢ 䠩.
  ᫨ > 0,  ਧ  ப  ࠡ뢠   㣮
  ᨬ  ப    FIXED_LINE_LENGTH ᨬ.  - 
  ।஢  䠩.

LAST_FILE_ATTR 㭪 (楫)
  : ਡ ᫥   FIRST_FILE  NEXT_FILE
              䠩.

LAST_FILE_NAME  㭪 (ப)
  :  ᫥   FIRST_FILE  NEXT_FILE
              䠩.

  :  (. NEXT_FILE )

LAST_FILE_SIZE 㭪 (楫)
  : ࠧ ᫥   FIRST_FILE  NEXT_FILE
              䠩.

LAST_FILE_TIME 㭪 (楫)
  : ६   ᫥   FIRST_FILE  NEXT_FILE
              䠩.  ࠭  襬 ᫮ १,  ६
              ࠭  襬 ᫮. ६    
              ᫥騬 ࠧ:

                    ᠭ
                  11 - 15          ( 0 ..23 )
                   5 - 10          ( 0 ..59 )
                   0 - 4          㭤/2 ( 0 ..30 )
                   9 - 15          稭  1980 ( 0 ..119 )
                   5 - 8           ( 1 ..12 )
                   0 - 4           ( 1 ..31 )

LINE_CHANGED 楫 ६
  ᫨ = 1,  ப  ஬  ᫥ 㧪 䠩.

LINE_TERMINATOR ப ६
  1  2 ᨬ. । ਧ  ப  ᪮ -뢮.
  祭  㬮砭 - CR/LF (ASCII 13 10).

LOAD_FILE ( filename ) 楤
  㧪 䠩 filename  ⥪饥 ;
  ஢  訡 १ ६ ERROR_LEVEL.

  (.  4,  )

  :
                Load_File('Test.Txt');             /* Load the file Test.Txt */
                if ( Error_Level != 0 )            /* If Error_Level not=0, then */
                {
                  RM( 'MEERROR' );          /* then run the error macro */
                }

 ^2!!:  ᯮ짮 LDFILES ப 
         䠩 MESYS  ᯮ짮 樨 LOAD_FILE.
         LDFILES ⮬⨧ 讥 ⢮ ⠫, ணࠬ஢
          筮 祭 ⮬⥫쭮.

MAKE_DATE_STR( year, month, day ) 㭪 (ப)
  頥 ப, ।⠢  (ᯮ 祭 祭
   LAST_FILE_TIME). ଠ ப ⢨⥫   ଠ ६/
  ᪮䨣஢  DOS.

        :
                make_message(make_date_Str((last_file_time >> 25) + 1980,
                             (last_file_time >> 21) & $F,
                             (last_file_time >> 16) & $1F));

MAKE_TIME_STR( hours, minutes, seconds ) 㭪 (ப)
  頥 ப, ।⠢ ६ (ᯮ 祭 祭
   LAST_FILE_TIME). ଠ ப ⢨⥫   ଠ ६/
  ᪮䨣஢  DOS.

        :
                make_message(make_time_Str((last_file_time >> 11) & $1F,
                             (last_file_time >> 5) & $3F,
                             last_file_time & $1F));


NEXT_FILE ** 㭪 (楫)
   ᫥饣 䠩, ।  FIRST_FILE.

  : 0, ᫨ 䠩 .
              , 頥 DOS- 訡 18.

  :
                /* Find all occurrences of TStr & load */
                TStr = '*.SRC';
                if ( FIRST_FILE(TSTR) == 0 )
                {
                  TStr = LAST_FILE_NAME;
                  Call Do_Load_File;  /* call routine to load file */
                  while ( (NEXT_FILE == 0) )
                  {
                    TStr = TStr2 + LAST_FILE_NAME;
                    Call Do_Load_File;
                  }
                }

READ_ONLY 楫 ६
  TRUE  (1) =  ᬠਢ 䠩,   .
  FALSE (0) =  ଠ쭮 ।஢.

RENAME_FILE ( old_name, new_name ) 㭪 (楫)
  २뢠 old_name  new_name.
  0 -  訡,  DOS- 訡.

SAVE_FILE 楤
  ࠭ ⥪騩 䠩;
  ஢  訡 १ ६ ERROR_LEVEL.

  (.  4,  )

  :
                Save_File;
                if ( Error_Level != 0 )
                {
                  RM('MEERROR');
                }

SET_FILE_ATTR(File_Name,Attr) 楤
  ⠭  ਡ File_Name  Attr.

SWITCH_FILE ( filename ) 㭪 (楫)
  ⠥ ४  ,  ஬ । 䠩 filename.
  Filename   ᮮ⢥⢮  䠩  .

  : TRUE (1), ᫨  䠩 뫮 .

S_CLOSE_FILE (Han) 㭪 (楫)
  뢠 䠩 c ࠡ稪 Han.
  頥  DOS- 訡  0.

S_CREATE_FILE(Name,Han) 㭪 (楫)
    䠩    Name,  ⠭ 
  楫 ६ Han  ணࠬ ࠡ⪨ 䠩.
  ᫨ 䠩 ,  㤥 ᥪ ⮡ 㫨 .
  頥  DOS- 訡  0.

S_GET_FILE_PTR(Han,Pos) 㭪 (楫)
  ⠭  楫 ६ Pos  ⥪騩 㪠⥫ 䠩
   䠩  ࠡ稪 Han.
  頥  DOS- 訡  0.

S_MOVE_FILE_PTR(Han,Mode,Ofs) 㭪 (楫)
  ६頥 㪠⥫ 䠩  䠩  ࠡ稪 Han  ofs.
  ᫨ mode = 0, 㤥 ६  ⥪饣 ,
  ᫨ mode = 1, 㤥 ६  ।⠢ ᯮ,
  ᫨ mode = 2, 㤥   .
  頥  DOS- 訡  0.

S_OPEN_FILE(Name,Mode,Han) 㭪 (楫)
  뢠 騩 䠩 Name,  ⠭  楫
  ६ Han  ணࠬ ࠡ⪨ 䠩.
  頥  DOS- 訡  0.

         ⠭ ᫥騬 ࠧ:

                    祭 (⭠筮)

         Share mode
              Open mode
               
      7 6 5 4 3 2 1 0
      ---------------
                0 0 0       00        Read-only access
                0 0 1       01        Write-only access
                0 1 0       02        Read/write access
      0 0 0                 00        Compatibility mode (dos versions < 3)
      0 0 1                 10        Deny Read/Write mode (Exclusive mode)
      0 1 0                 20        Deny Write mode
      0 1 1                 30        Deny Read mode
      1 0 0                 40        Deny None mode

S_READ_BYTES(Buf,Han,Amount) 㭪 (楫)
  ⪠  amount   䠩 c ࠡ稪 Han  
  ப ६ Buf. ᫨  Buf  amount, ⮣ 뢠
   䠩.
  ⮢,    Buf >= amount.
  頥  DOS- 訡  0.

S_WRITE_BYTES(Str,Han,Amount) 㭪 (楫)
  뢠 Str  䠩  ࠡ稪 Han  ࠭ ⢮ ᠭ
    쭮 ६ Amount. ᫨ Amount , 祬  Str,
    .
  頥  DOS- 訡  0.

TEMP_PATH ப ६
    ⠫,  Multi-Edit  ࠭ ६ 䠩
  (६ 䠩  ᮧ,  Multi-Edit  뢠
  ଠ   - 墠⪨ ).

TMP_FILE 㭪 (楫)
  : TRUE (1), ᫨ ६ 䠩 ᯮ ⨬ ஬.

TMP_FILE_NAME 㭪 (ப)
  :  ६ 䠩, ᯮ㥬 ⨬ ஬.

TRUNCATE_SPACES 楫 ६
  TRUE (1) = ᫥ 㧪 䠩, Multi-Edit 㤥 ᥪ  
             ஡  ப.
  FALSE(0) =  ᥪ  ஡  㧪 䠩.

XLOAD_FILE ( filename ) 楤
  ,   LOAD_FILE,  ᪫祭 ⮣,  ᮤন 䠩  㤥
  䠪᪨      饭, ਬ,  ୮
  뢮 .  楤   㧪  䠩 ⮬, 
  ।஢  䠪᪨ 稭  㧪  䠩.
    
FLABEL (string, key_num, mode ) 楤
    .

   string - ப ᨬ쭠 ६   ࠫ, ।⠢騩
             㭪樮쭮 ,  㤥   ࠭.

  Key_num ।⠢  㭪樮쭮 ,  
  ᫥騬 ࠧ:

                <F1>     - <F10>     =  1 - 10
                <ShftF1> - <ShftF10> = 11 - 20
                <CtrlF1> - <CtrlF10> = 21 - 30
                <AltF1>  - <AltF10>  = 31 - 40

  ⪨  <F11>  <F12>    ࠭ ⮫쪮  ਭ ࠭
   80 ⮫殢:

                <F11> = 41
                <F12> = 42
                <ShftF11> = 43
                <ShftF12> = 44
                <CtrlF11> = 45
                <CtrlF12> = 46
                <AltF11> = 47
                <AltF12> = 48

   㣨  .

  mode - ० Multi-Edit,  ஬ 㤥 ᯮ짮 ⪠.
      0 = EDIT,
      1 = DOS_SHELL ( ⥬),
      255 = ⥪騥 ⪨, ᨬ  ०.

POP_LABELS 楤
  ⠫ ⥪騩  ⮪ 㭪樮쭮   ⥪,
  ⠭ ।騩 .

PUSH_LABELS 楤
  頥   ⮪ 㭪樮쭮   ⥪.
    
䠩 MEHELP.SRC ᮤন  ਬ  権.

HELP_CHAPTER_LENGTH 㭪 (楫)
  頥 ⢮ ப  ⥪饩 .

HELP_CHAPTER_TITLE 㭪 (ப)
  頥 ⥪騩  .

HELP_CURRENT_CHAPTER 㭪 (ப)
  頥  ⥪饩  ࠢ.

HELP_CURRENT_LINK 楫 ६
    ࠢ,   饥 ६ ᢥ稢 .

HELP_CURRENT_OFFSET 楫 ६
  ᫮ ப  砫 ࠢ ⥪  砫 ⮡ࠦ.

HELP_DONE 楤
  室  ⥬ ࠢ.

HELP_DOWN 楤
  ६饭  ࠢ .

HELP_END 楤
  ६饭    .

HELP_FIND_INDEX(Index_String) 楤
  ᬮ  ⥪饩  ࠢ   Index_String  ।,
  ᫨ .

HELP_HI_LINK 楤
  祭 ᢥ⪨   ࠢ.

HELP_HOME 楤
  ६頥   砫 .

HELP_LEFT 楤
  ६饭  ࠢ, 易 ᠬ  ᫥.

HELP_LINK( link_num )  㭪 (ப)
  頥 ப 易  link_num.

HELP_LINK_X ( link_num ) 㭪 (楫)
  頥 X-न 裡  "link_num".

HELP_LINK_Y ( link_num ) 㭪 (楫)
  頥 Y-न 裡  "link_num".

HELP_LINK_W ( link_num ) 㭪 (楫)
  頥 ਭ ப "link_num".

HELP_LINK_COUNT 㭪 (楫)
  ⮢ ⢮ 痢  ⥪饩 .

HELP_LO_LINK 楤
  ᮢ ⥪饩 裡  ଠ 梥.

HELP_OPEN_FILE(File_Name) 楤
  㧪 䠩 File_Name  ⥬ ࠢ.

HELP_PGDN 楤
  ६饭   ࠭ ࠢ ।.

HELP_PGUP 楤
  ६饭   ࠭ ࠢ .

HELP_REPEAT_SEARCH 楤
  ७ ᫥ ᪠  ࠢ.

HELP_RIGHT 楤
  ६饭  ࠢ, 易 ᠬ  ࠢ.

HELP_SCROLL_DOWN 楤
  ஫ ࠭ ࠢ    ப.

HELP_SCROLL_LEFT 楤
  ஫ ࠭ ࠢ   4 ᨬ.

HELP_SCROLL_RIGHT 楤
  ஫ ࠭ ࠢ ࠢ  4 ᨬ.

HELP_SCROLL_UP 楤
  ஫ ࠭ ࠢ   4 ப.

HELP_SEARCH(Search_String,Mode) 楤
  ᪮ Search_String.
  ᫨ mode = 0 -  ⥪饩 
  ᫨ mode = 1 -  ᥬ ࠢ筮 䠩

HELP_SELECT(Index) 楤
 ࠢ   ᮬ.

HELP_SIZE_WINDOW(X1,Y1,X2,Y2) 楤
   ࠧ  ࠢ  न⠬ X1  Y1 (孨  㣮),
  X2  Y2 ( ࠢ 㣮 ).

HELP_START 楤
  뢠 ⥬ ࠢ.

HELP_UP 楤
  ६饭  ࠢ, 易 ᠬ  ᢥ.

HELP_UPDATE 楤
  䨪 ⥪饣 ࠭ ࠢ.
   
CMD_TO_KEY ( key_code, cmd_constant, mode ) 楤
  筠 MACRO_TO_KEY  ᪫祭 ⮣,   ப
    砥  Multi-Edit.  ᯨ᮪  ᢠ
        ࠧ  "祭 ப
   ".

  :
                / * 砥  WORD_RIGHT  
                   Control-५ ࠢ  ० ।஢ * /

                CMD_TO_KEY(<CtrlRT>, WORD_RIGHT, Edit);

GLOBAL_TO_KEY ( key_code, global_var_name, mode ) 楤
  砥  ⨩ , ࠭  쭮 ப,
   .   ࠭  쭮 ப  
  keycode:scancode. ⨥ 祭  믮  ப .

  :
                / * 祭  <AltB>   <END>  ⥬
                    ⥪ 'BOLD' * /

                Set_Global_Str('!OUR_KEY_MACRO', '|0|79B|0O|L|0D|0');
                GLOBAL_TO_KEY(<AltB>, '!OUR_KEY_MACRO', EDIT);

INQ_KEY ( keycode1, keycode2, mode, str_var ) 㭪 (楫)
  訢 ⭮⥫쭮 ⥪饣 祭 .

               str_var is a local ப ६ where the name of the
               macro or keystroke global is to be returned.

  :  0 = No key assignment
            1 = Macro assignment

  : keycode1  keycode2 ⠢ keycode;
               mode - ० Multi-Edit
               (0 = Edit, Dos_shell (File Manager) = 1, Terminal = 3);

               Str_var - 쭠 ப ६,  ன 㤥
                 ப  쭮 ६
                .

  : 0 = 祭 
              1 = 祭 
              2 = 祭 ப ,
            > 255 = ப: 訩  (int and $FF ) -  㭪樨
                    Multi-Edit.

            㭪樮     ᢠ 蠬
            ᫥  (  㭪樮  ⭮ 
              inq_key ):

                   #                 # 

      BACK_SPACE                281     LAST_PAGE_BREAK          268
      BLOCK_BEGIN               284     LEFT                     257
      BLOCK_END                 285     MARK_POS                 272
      BLOCK_OFF                 292     MOVE_BLOCK               288
      COL_BLOCK_BEGIN           286     NEXT_PAGE_BREAK          267
      COPY_BLOCK                287     PAGE_DOWN                264
      CR                        314     PAGE_UP                  263
      DELETE_BLOCK              291     RIGHT                    258
      DEL_CHAR                  280     SAVE_FILE                297
      DEL_LINE                  282     STR_BLOCK_BEGIN          289
      DOWN                      260     TAB_LEFT                 277
      EOF                       266     TAB_RIGHT                276
      EOL                       262     TOF                      265
      FIRST_WORD                275     UNDENT                   279
      GOTO_MARK                 273     UNDO                     283
      HOME                      261     UP                       259
      INDENT                    278     WORD_LEFT                269
      KEY_RECORD                323     WORD_RIGHT               270

      :

       str  aname;
       int  result;
          /*  孠祭  <F10> */
       result = INQ_KEY(0, 68, EDIT, aname);
          /* ᫨  ,  믮 */
       if ( result == 1 )
       {
         RM( aname );
       }

KEY_TO_WINDOW( key_code, macro_spec ) 楤
   MACRO_TO_KEY  ᪫祭 ⮣,  祭 
  ᮥ  ⥪饬  (⮫쪮 ० EDIT). 直 ࠧ,
    㭨⮦,  㦠 䠩, 祭 
  㭨⮦.

MACRO_TO_KEY ( key_code, macro_spec, mode ) 楤
  砥 ப    । ०.
    key_code, Multi-Edit 㤥  믮 ப
  । macro_spec, 筮 ⠪,  ᫨  맢 楤 RM.

  Key_code -  ⨬ ⠭  
  (.   )

   ਫ 3 ਢ  ᯨ᮪ ⨬ ⠭  , 
   楫 ᥫ,  ࢮ ᫮ - keycode,  ஥ - scancode.
  Macro_spec - ப   ᮤঠ ⨬  ,
   䠩,  易⥫ ப ࠬ஢.

  ଠ   ᫥騬:

                Macro_file_name^^Macro_name Parameter_String

  Mode - ० Multi-Edit,  ண  뢠 ப.
   饥 ६ ন ० EDIT, DOS_SHELL (File Manager),
  TERM  ALL.

  :
                MACRO_TO_KEY( <AltF9>, 'RUNPROG', Edit);
                        OR
                MACRO_TO_KEY( 0x7000, 'RUNPROG', Edit);

UNASSIGN_ALL_KEYS 楤
   祭   .

  ^K: ^k   㤥 ࠧ   keymap.
    ᯮ , ᫨  ,  ⢮.
   ᯮ ᪨ !!

UNASSIGN_KEY( key_code, mode ) 楤
   祭    ०.

  :

                UNASSIGN_KEY(<AltF5>,EDIT);
   
GET_RECORD_BUFFER 㭪 (ப)
  頥 ப  ( ᨬ), ᮤঠ  
  ᫥ ᠭ 譮 ப.
   室   : ࢨ - - ७ -.

KEY_IN( keystroke_string ) 楤
  楤 KEY_IN ᯮ  । ।  ,
  ।⠢塞 keystroke_string. Keystroke_string    祪.

  :
                KEY_IN(This is a test string<ENTER>);

    㤥 ⠢ ᨬ "This is a test string"  䠩
   ⥪饬  c ⥪饩 樨 , ᮯ஢  ⮬ ⪨.
   ,  ப ६   ᯮ짮  ⨬
  ஬. Keystroke_string   ப  .

KEY_RECORD 楤
  稭  ⠭  譮 ப.

PLAY_KEY_MACRO ( key_code1, key_code2, ० ) 楤
  믮  ப 祭 keycode (key_code1, key_code2).
  祭 key_code1  key_code2     READ_KEY
   CHECK_KEY. PLAY_KEY_MACRO 㤥 㭪樮஢ ⮫쪮  ०,
   祭 譮 ப.

  . ⠪  3,   .
    
CPU 㭪 (楫)
  :  0 = 8086/8088
               1 = 80186/80188
               2 = 80286
               3 = 80386/80486

INTR( interrupt_num ) 楤
  믮 ணࠬ 뢠.
  । 祭  ॣ஢ ६ ᫥ .
  頥 祭     ᠬ ६.

MAKE_STR(Seg,Ofs,Count) 㭪 (ப)
  頥 ப   , 稭饣  ᥣ Seg,
   ᬥ饭 Ofs,  Count.
  Returns a string from any memory address starting at segment Seg, Offset
  Ofs, with a length of Count.

MEMB( address, value ) 楤
  ⠭    祭.  - 楫 ᫮  32 ⠬,
  ஥   ⨯ 8086 ᮤন  ᥣ (襥 ᫮ )
   ᬥ饭 (襥 ᫮).  ᮬ  믮 䬥᪨
  樨   ,    맮 室  ᫥騩 ᥣ.

MEMB( address ) 㭪 (楫)
  :  祭    .

MEMP( address, value ) 楤
  ⠭ 祭 㪠⥫  (  ⨯ 8086 - 
  32-⮢ 祭, ஥ 砥  ᥣ  ᬥ饭).

MEMP( address ) 㭪 (楫)
  : 32-⮢ 祭 㪠⥫ .

MEMW( address, value ) 楤
  ⠭ 祭 ᫮   .

MEMW( address ) 㭪 (楫)
  : 祭 ᫮   .

MEMSTR( address, count ) 㭪 (ப)
  : ப, ᮧ  count ᨬ (), 稭
                .

OFS( local_variable ) 㭪 (楫)
  : ᬥ饭  local_variable (   ⨯).

PEEK( segment, offset ) 㭪 (楫)
  :   ᥣ:ᬥ饭.
               㭪 - ᯥ᪠  設 ⨯ 8086.

   楤  㭪樨 MEMB, MEMW  MEMP ।⥫쭥 ⮬,  
   ७ᥭ  㣨 設 ⥪.

POKE( segment, offset, value ) 楤
  ⠭   ᥣ:ᬥ饭.
               㭪 - ᯥ᪠  設 ⨯ 8086.

   楤  㭪樨 MEMB, MEMW  MEMP ।⥫쭥 ⮬,  
   ७ᥭ  㣨 設 ⥪.

R_AX, R_BX, R_CX, R_DX, R_SI, R_DI, R_DS, R_ES, R_BP, R_FLAGS 楫
                                                                  ६

  ஢ ६, ᯮ㥬  INTR,  ᠭ .
  ᯮ ⮫쪮 訥 16   ६.

SEG( local_variable ) 㭪 (楫)
  : ᥣ  local_variable (   ⨯).
 


@@CONFIG_MACRO@@  ப ६
  global_str("@@CONFIG_MACRO@@")
   쭠 ப ᯮ  । ᮢ,  
  믮 ᫥ ⮣,  ࠭ 䨣.
  ᪮쪮 ப   ⤥ ";". ࠢ ᯮᮡ
  ᯮ짮:

        str macro_name = "TEST^^TestConfig";
        if( xpos(macro_name, global_str("@@CONFIG_MACRO@@"), 1) == 0)
        {
          set_global_str("@@CONFIG_MACRO@@", global_str("@@CONFIG_MACRO@@") +
                         ";" + macro_name );
        }

DEBUG_MACRO(Macro_Name) 楤
  뢠 ம⫠稪  ப macro_name.

FIRST_MACRO 㭪 (ப)
  :  ࢮ ப  .
              樠  NEXT_MACRO, ⢫饬  
              ᥬ ᯨ ப  .

FIRST_RUN 㭪 (楫)
  : TRUE (1), ᫨  -  맮 ப
              ᫥ 㧪; , FALSE (0).

INQ_MACRO( macro_name ) 㭪 (楫)
  : -1  - ப  㦥

            TRUE (>0) ᫨ ப । macro_name
            㦥  . 饭 祭 ᮤন ਡ
            ப,  ஢ ᫥騬 ࠧ:
                 0: 0=First Time Executed
                 1: 1=NO DUMP ALLOWED
                 2: 1=NO REPLACE ALLOWD
                 3: 1=Disable Control-Break
                 4: 1=TRANS2
                 5: 1=Dump when done (used internally)
                 6: 1=New parameter type
                 7: 1=Transient

  :
                / * ᫨ TEST.MAC    ⮣ * /
                if ( Inq_Macro('Test') == FALSE )
                {
                  Load_Macro_File('Test');          /* load TEST.MAC */

                  /* If there is an error condition then */
                  if(  Error_Level != 0  )
                  {
                    /* notify the user of the error */
                    Make_Message( 'Error on loading macro.');
                    Error_Level = 0;         /* reset the error level to 0 */
                  }                          /* end nested IF/THEN */
                }                            /* end IF/THEN */

LOAD_MACRO_FILE( macro_file_name ) 楤
  㦠  䠩  ,   믮.
  ஢ 䫠 ERROR_LEVEL  訡.

  :

                Load_Macro_File('Test');    /* Load the macro named Test */
                /* If the error level is not 0, then */
                if ( Error_Level != 0 )
                {                           /* Alert user with beep sound */
                  Beep;                     /* And inform user of problem */
                  Make_Message('Can''t load macro!');
                  Error_Level = 0;          /* Reset error level */
                }
                else                        /* Otherwise */
                {
                  RM('Test');        /* Run the macro named Test */
                }                               /* End this IF/THEN/ELSE loop */

NEXT_MACRO 㭪 (ப)
  :  ᫥騩 ப  ᯨ᪥ ( .FIRST_MACRO,  ).
              頥  ப, ᫨    ப
               ᫥.



RUN_MACRO( macro_spec ) procedure OR
RM( macro_spec ) 楤
  믮 ப,  macro_spec ⮨   ,
  䠪⨢  䠩,  䠪⨢ ப ࠬ.
  ଠ:

                Macro_file_name^^macro_name Parameter_string

     ᨬ ^ (^^) ࠧ⥫   䠩 
   ,  ஡( )-ࠧ⥫     ப
  ࠬ஢.  Macro_file_name  macro_name   묨 ⨬묨
   䠩 DOS ( ).  Multi-Edit  믮
  ப,  ᭠砫  .MAC 䠩  . ᫨  ⠬ , 
  ஢ ⠫ Multi-Edit ( 㭪樥 ME_PATH). ᫨
  ப  ,  ERROR_LEVEL 㤥 ⠭ ⫨  .
  ਭ .MAC ७  䠩.

  :

                /* Run the LOADFILE macro; if it is not in memory, get it
                from the macro file, MEUTIL1.MAC; pass a numeric
                parameter( /NP) of n and a string parameter (/SP of
                xxx.) */

                RM('MEUTIL1^^LOADFILE /NP=n /SP=xxx');

UNLOAD_MACRO( macro_name ) 楤
  㦠 ப  .

   :
                Unload_Macro('Test');
 
BEEP 楤
  ਢ  짮⥫ 㪮 ᨣ.

  :
                /* If an error occurred then */
                if ( Error_Level != 0 )
                {
                  Beep; /* alert the user */
                }  /* end IF/THEN */

DELAY( number ) 楤
  প  number ᥪ㭤.

  :
                /* Wait for 1/10 second */
                Delay(100);

INIT_VIDEO_MODE 楫 ६
  ᯮ  ப INIT  ⠭ 砫쭮
  ०.   ᠬ 祭,    㭪樨 VIDEO_MODE.

MODE 楫 ६
  ᫥ ६, ᯮ㥬  ⠭ ⥪饣 ०.

                        0 = ० ।஢.
                        1 = 䠩 ⥬.
                        2 = ( ᯮ)
                        3 =  裡.

NOT( integer ) 㭪 (楫)
  : ᫨ integer ⫨筮  ,  NOT 㤥   0.
              ᫨ integer ,  NOT 㤥   1.
              ( ᯮ  ࠦ ⨯ TRUE/FALSE)

PRINT_MARGIN 楫 ६
  ᯮ  ⠭     䠩  .

SOUND( frequency ) 楤
  뤠 㪮 ᨣ   ( ).
  ⠭   0 몫砥 ᨣ.

  :
                /* Play a tone */
                Sound(520);  /* start tone */
                Delay(500);  /* wait half a second */
                Sound(0);    /* turn tone off */

USER_ID ப ६
  ப (0-3 ᨬ), ᮤঠ 㭨 設  짮⥫᪨
   䨪樨,  㦭 ᯮ짮  ࠡ  .
   ६   믮  ⥢ ᨨ.
  .    襣 ⢠ ଠ樨
  ⭮⥫쭮 USER_ID.

VERSION 㭪 (ப)
  : ப, ᮤঠ ⥪騩  ᨨ Multi-Edit'.
  
CUR_H_SCROLL_POS 㭪 (楫)
  蠥  ਧ⠫쭮  ப⪨ ⥪饣 .

CUR_SCROLL_POS 㭪 (楫)
  蠥  ⨪쭮  ப⪨ ⥪饣 .

DIR_SCROLL_POS 㭪 (楫)
  頥     ⨢  饥 ६
   ⠫  ᯨ᪠.

MOUSE_MODE 楫 ६
   ࠡ⠥   ०:

  MOUSE_MODE = 0      ᮡ⢥  (祭  ଠ쭮
                    饣  ⥪ ). Keycode-ᮡ ( READ_KEY
                     CHECK_KEY)   ⮫쪮  ⨨ 
                     ᫥騥 keycod' :

                    Key1 = 0, Key2 = 250      
                    Key1 = 0, Key2 = 251     ࠢ 



  MOUSE_MODE = 1    The mouse returns keystrokes for every movement, and
                    button press.  The following keycodes are returned:

                    Key1 = 0, Key2 = 240     Mouse moved up
                    Key1 = 0, Key2 = 241     Mouse moved down
                    Key1 = 0, Key2 = 242     Mouse moved left
                    Key1 = 0, Key2 = 243     Mouse moved right
                    Key1 = 0, Key2 = 244     Left mouse button
                    Key1 = 0, Key2 = 245     Right mouse button

  MOUSE_MODE = 1     頥 keycod'   , 
                    ⨩ .
                     ᫥騥 keycod' :

                    Key1 = 0, Key2 = 240      ६饭 
                    Key1 = 0, Key2 = 241      ६饭 
                    Key1 = 0, Key2 = 242      ६饭 
                    Key1 = 0, Key2 = 243      ६饭 ࠢ
                    Key1 = 0, Key2 = 244      
                    Key1 = 0, Key2 = 245     ࠢ 
                    Key1 = 0, Key2 = 246     । 

MOUSE_H_SENSE 楫 ६
  ⠭ ਧ⠫쭮 ⢨⥫쭮 .
    祭, ⥬  ⢨⥫쭠 㤥 .
  ਬ   MOUSE_MODE = 1.

MOUSE_REPEAT 楫 ६
  쪮  MOUSE_MODE = 1.
  ⠭ MOUSE_REPEAT  TRUE (1) 㤥 ⠢   ᮡ
   㤥ঠ . 筮 FALSE.

MOUSE_V_SENSE 楫 ६
  ⠭ ⨪쭮 ⢨⥫쭮 .
    祭, ⥬  ⢨⥫쭠 㤥 .
  ਬ   MOUSE_MODE = 1.

MOU_CHECK_STATUS 楤
  ஢ ⥪饥 ﭨ .   MOU_LAST_STATUS,
  MOU_LAST_X, MOU_LAST_Y.

MOU_DISAPPEAR 楫 ६
  ᫨ 1,    㤥 祧  ᯮ짮 .

MOU_DOUBLE_CLICK 㭪 (楫)
  ᯮ ᮢ⭮  READ_KEY  CHECK_KEY.
  :
        TRUE =  ⨥.
        FALSE= 筮 ⨥.

MOU_DRAW_PTR 楤
  ⮡ࠦ 㪠⥫ "  ". ^2 !!: ন ७ 稪,
   㬥蠥  饭  MOU_REMOVE_PTR,  㢥稢 
  楤ன. ⥫  ⮡ࠦ  稪 >= 0.

MOU_INSTALLED 㭪 (楫)
  : TRUE (1), ᫨ ࠩ  .

MOU_LAST_Y 㭪 (楫)
  頥 ᫥ न Y ( ᨬ , 1 ᢥ) ,
  ⠭ ᫥ 饭  MOU_CHECK_STATUS.

MOU_LAST_X 㭪 (楫)
  頥 ᫥ न X ( ᨬ , 1 ᫥) ,
  ⠭ ᫥ 饭  MOU_CHECK_STATUS.

MOU_LAST_STATUS 㭪 (楫)
  頥  ﭨ  , ⠭ ᫥ 饭 
  MOU_CHECK_STATUS.

                     0          
                        1        ࠢ  
                        2        ।  

MOU_REMOVE_PTR 楤
   㪠⥫   ࠭. . MOU_DRAW_PTR .

MOU_REPEAT 楫 ६
  ᫨ 1, ᪠ 㦥 㤥ন  .

MOU_RESET
  믮 ७  稪    MOUSE_MODE = 1.
     MOUSE_MODE = 0.

MOU_SET_LIMITS ( x1, y1, x2, y2 ) 楤
  ࠭稢    אַ㣮쭮   ࠭.
  MOU_SET_LIMITS ( 1, 1, Screen_Width, Screen_Height ) ⠭ "  "
  ⭮  ᢮ ६饭  ᥬ ࠭.

MOU_SET_POS ( x, y ) 楤
  ६頥      ࠭.

MOUSE  楫 ६
  Turns recognition of mouse functions on (1) and off (0).  Setting MOUSE
  to any value resets the mouse to its initialization status.
   
CHANGE_DIR( path_string ) 楤
   ⥪騩 ⠫.  ⥬    ⨢.
  Error_Level 㤥 ⫨  , ᫨ ந諠 訡.

  :
                Change_Dir ( '\DOCUMENT' );
                if ( Error_Level != 0 )
                {
                  Make_Message('Error changing directory');
                  Error_Level = 0;
                }

COMSPEC 㭪 (ப)
  : ப, ᮤঠ   COMMAND.COM.

  :
                /* Execute COMMAND.COM */
                SHELL_TO_DOS(Comspec, FALSE);

COPY_FILE ( source_filename, destination_filename ) 㭪 (楫)
   䠩 source_filename  䠩 destination_filename.

  : 0, ᫨  ᯥ譠,  DOS- 訡.

DATE 㭪 (ப)
  : ப, ᮤঠ ⥪ ⥬   ଠ mm/dd/yy.

  :
                TEXT('The date of this document is:' + Date);

DEL_FILE ( filename_string ) 楤
   䠩  ᪠. 㯯 ᨬ  ᪠.
   ⥬    ⨢.
  Error_Level 㤥 ⫨  , ᫨ ந諠 訡.

DOS_BACK 㭪 (楫)
  : 梥 䮭,  ᯮ짮 DOS । 맮
  Multi-Edit.

DOS_COLOR 㭪 (楫)
  : 梥 ᨬ,  ᯮ짮 DOS । 맮
  Multi-Edit.

DOS_OUTPUT_WINDOW 楫 ६
    楤 SHELL_TO_DOS.
  TRUE =  뢠 楤 SHELL_TO_DOS, 뢮 ࠭ 㤥
         ⮡ࠦ  .
  FALSE = ⮣  㤥.

DOS_PROMPT ப ६
  ᯮ   ப   ᪠  室  DOS.
  ਬ:  Set_Global_Str( "DOS_PROMPT", "(My Prompt" +
                            Get_Environment("PROMPT") );

         !!:   DOSPROMPT.BAT,  ᯮ짮 Multi-Edit'
         ࠭ ᨩ  ⠭ ᪠ DOS 㤠.
        Multi-Edit ⥯  ᪠ १ DOS_PROMPT.

DOS_VERSION 㭪 (楫)
  :  ᫮, ᮤঠ饥  ᨨ DOS:

            訩  =   ᨨ.
            訩  =   ᨨ.

 :       /* Get the DOS version and display it */

                JX = DOS_VERSION;
                JL = JX & $00FF;
                JH = JX >> 8;
                Make_Message('DOS Version = ' + Str(JL) + '.' +
                Str(JH));
                /* If jx equals 2003 hex, the DOS version number would
                be 3.20 */

DOS_WIN_X1, DOS_WIN_X2, DOS_WIN_Y1, DOS_WIN_Y2 楫 ६
  ᠥ DOS_OUTPUT_WINDOW.  - न   .

EMS_IN_USE 㭪 (楫)
  頥 ⢮ EMS   饥 ६ 㯭 
  ᯮ짮 Multi-dit'.

EMS_TOTAL 㭪 (楫)
  頠 ⢮ EMS , 㯭  砫 ࠡ Multi-Edit'.

ENVIRONMENT_MODE 楫 ६
  ।,  ⠭ ६ 㦥  ।
  , ⨢஢ 饭  㭪 SHELL_TO_DOS  EXEC.
     0 = ᯮ짮  ।, ਭ Multi-Edit'.
           ⥬ ६ 㦥  ⢨⥫.
     1 = ᯮ짮 ⥬ ६ 㦥, 뢠
          䨪 㭪樥 SET_ENVIRONMENT.

EXIT_CODE 㭪 (楫)
  :  襭 DOS ᫥ 믮 SHELL_TO_DOS.

  NOTE: ᫨  ᯮ COMMAND.COM ( Cmd_Flag = TRUE ),  
          襭 㤥    COMMAND.COM,    ணࠬ,
          । Cmd_string. . ⠪ SHELL_TO_DOS.

FILE_LOCKING 楫 ६
  ᫨ 1,  ᪠ ⥢ ᯮ짮 䠩.

GET_ENVIRONMENT( entry_name ) 㭪 (ப)
  : 祭 ६ 㦥 DOS entry_name.

  :
                Tstr = Get_Environment('ME_PATH');

INIT_ADDITIONAL_MEM ( amount, type ) 楤
  樠 ᯮ짮 ⥫쭮 .
  Amount - ⢮ ⥫쭮 ,  㦭 ⠢ 㯭
  ( ,  0  16000).
  Type: 1  EMS,
        2  XMS.

LINES_IN_MEM 㭪 (楫)
  : ⢮ ப ⥪饣 䠩,  室  .

MAX_USER_COUNT 㭪 (楫)
  : ᨬ쭮 ᫮ ॣ஢ 짮⥫  ⥢
  ᨨ Multi-Edit.

ME_PATH 㭪 (ப)
  : ப, ᮤঠ  DOS  ૥ 䠩 ME.

MKDIR ( directory_name_string ) 㭪 (楫)
   ⠫.
  : 0 ᫨  ᯥ譠,   訡 .

PARAM_COUNT 㭪 (楫)
  :  An integer containing the number of parameters passed to
            Multi-Edit on the DOS command line.

PARAM_STR ( param_number ) 㭪 (ப)
  :  A string containing the specified command line parameter.


PARAM_COUNT 㭪 (楫)
  : ᫮ ࠬ஢ । Multi-Edit'   ப DOS.

PARAM_STR ( param_number ) 㭪 (ப)
  : ப, ᮤঠ  ࠬ  ப.

             DOS ᨨ 3  , 祭 param_number=0 㤥 
             ,  맢 Multi-Edit. DOS ᨨ 2 㤥
              ப  param_number=0.
  :
                /* Get the first parameter on the command line */
                /* if a parameter was entered, then */
                if ( Param_Count > 0 )
                {
                  /* Make Test_Parameter equal Parameter String number one */
                  Test_Parameter = Param_Str(1);
                }           /* End IF/THEN */

QUIT( return_code ) 楤
  室  Multi-Edit'. Return_code - 楫 ᫮,    ஠-
  ஢   䠩 樥 DOS ERRORLEVEL.  ,
   ᫨ 䠩 뫨    ࠭,    .

  :
                Save_File;               /* Save current file */
                if ( Error_Level == 0 )  /* If no errors, then */
                {
                  Quit;                  /* Quit */
                }

RESTORE 楫 ६
  global_int("RESTORE")
   쭮 楫 ᫮  ⥯  ᫥騥 祭:
     0     몫 ⠭
     1      䠩 STATUS.ME   ⠫
     2     ᯮ짮   䠩 STATUS.ME
     3     ᯮ짮 ஢  䠩 ﭨ  
           ⠫

REST_DOS_SCREEN  楤
  ⠭ ࠭ DOS ࠭ ⮬᪨ ᫥ ᪠
  Multi-Edit  ᫥ ᫥ 饭  SAVE_DOS_SCREEN.
    ⠭ 믮 ⮬᪨ ᫥ 室 
  Multi-Edit'.    ᫨  室  DOS  ப.


SAVE_DOS_SCREEN 楤
  ࠭ ⥪騩 ࠭ DOS.

  :

  REST_DOS_SCREEN; / * ⠭ ।騩 ࠭, ⠪  뢮
                      ᫥ 権 DOS   ଠ쭮 ࠭
                      DOS  ࠭ Multi-Edit * /
  SHELL_TO_DOS ('MAKE_LST', TRUE ); / *  믮  䠩 * /
  SAVE_DOS_SCREEN;                  / * ࠭  ࠭ DOS 
                                       ᯮ짮 ᫥ 室
                                        Multi-Edit * /

SET_ENVIRONMENT ( str var_name, str value ) 㭪 (楫)
  ⠭ ६ 㦥   ।. Var_name -  ६
  㦥.       "\". Value - ப 
  ᢠ.

  :  0 -  ⪠   㦥,  ᯮ DOS
                        ᨨ  3.
                 0 - ᯥ譮.

SHELL_TO_DOS( cmd_string, cmd_flag ) 楤
  室  DOS  믮 cmd_string. ᫨ cmd_flag TRUE,  ᯮ
  COMMAND.COM;  Multi-Edit ⠥ 믮 cmd_string ।⢥.
  ⮡ 믮   ७  DOS ⨯ DIR, DEL  COPY,
  cmd_flag   TRUE. ᫨ cmd_string  = '' ( ப), 
  믮 COMMAND.COM.

  :
                /* Copy a file */
                SHELL_TO_DOS('COPY ME.HLP A:', TRUE);
                Error = EXIT_CODE;

SWAP_MEM 楫 ६
  ꥬ  ( ࠣ  16 ), 室    믮
   DOS.

SWAP_MODE 楫 ६
   窨  믮  DOS.

                        0 =  窨.
                        1 = 窠 ⮫쪮  .
                        2 = 窠 ⮫쪮  EMS/XMS.
                        3 = 窠  EMS/XMS   .

TIME 㭪 (ப)
  : ப, ᮤঠ ⥪饥 ⥬ ६.
            ଠ ਪ᪨: hh:mm:ssam ( pm)

WRITE_SOD( string ) 楤
  뢠 ப  ன⢮ ⠭⭮ 뢮 (筮 ࠭),
   ⢨  ⥪騩 䠩.

 :
                /* Write message + CR/LF to standard output */
                Write_SOD('Verify this code!|13|10');

. ⠪ 䥩 設 ஢.

XMS_IN_USE 㭪 (楫)
  頥 ꥬ XMS , ᯮ㥬  饥 ६ Multi-Edit'.

XMS_TOTAL 㭪 (楫)
  ⮢ ꥬ XMS , 㯭  砫 ᥠ ।஢.
   
INT_R ( real_value ) 㭪 (楫)
  : 楫 ᫮, 祭 ८ࠧ  ।
              ⢥ 祭.
  :
                Int_Var = INT_R (Real_Var) + 12;

REAL_I( int_value )  㭪 (⢥)
  : ⢥ ᫮, 祭 ८ࠧ  ।
              楫 祭.
  :
                Real_Var = 124.023 + REAL_I(Int_Var);


RSTR( real_value, int_val1, int_val2 ) 㭪 (ப)
  real_value - ⢥ ᫮, ஥ 㦭 ८ࠧ  ப;
  int_val1   - 饥 ᫮ ᨬ  ப ।⠢ (ࠢ
                 );
  int_val2   - ᫮  ᫥ 筮 窨.

  : ப ।⠢ real_value.

  :
                /* Convert Test_Real to a string containing 6 significant
                digits and 4 digits after the decimal point. */
                Test_Str = RSTR( Test_Real, 6, 4 );

RVAL( result_real, string )  㭪 (楫)
  ८ࠧ뢠 ப ।⠢ (string)
   ⢥ ᫮ (result_real).

  : 楫 ᫮ 0, ᫨ 訡 ८ࠧ  뫮
                ࢮ ᫮ ᨬ.

 :
                Test_Str = '899.25';
                /* Convert Test_Str to a real number */
                if ( RVal( T_Real, Test_Str ) != 0  )
                {
                  /* Error occurred, inform user */
                  Make_Message('ERROR Converting string to Real');
                }
                else
                {
                  /* No Error,  display result of conversion */
                  Make_Message(  'Value is:  '  +  RStr( T_Real ));
                }
  
BOX_COUNT 楫 ६
  ᫮ ࠬ  ࠭.

  :
                / *   ࠬ  ࠭ * /
                while ( Box_Count > 0 )
                {
                  Kill_Box;
                }

CLEAR_SCREEN ( attribute_byte ) 楤
  頥 ࠭  ⠭ 梥  ।  attribute_byte,
   訥 4  - 梥 ᨬ, ᫥騥 3  - 䮭 梥,
   訩  - /ન.

CLR_VP 楤
  頥 ।  饥 ६  ᬮ.

DRAW_ATTR( column, line, attribute, count ) 楤
   ਡ count ᨬ ࠭  attribute 稭  
  樨.

DRAW_CHAR( char_code, column, line, attribute, count ) 楤
  뢠   樨 ࠭  ⢮ ࠧ 
  ᨬ  묨 ਡ⠬.

DRAW_MENU_BAR 楤
  頥    ࠭ (᫨   ࠧ襭).

DRAW_OUTLINE( ul_col, ul_row, lr_col, lr_row, attribute ) 楤
  뢮 ࠬ   न⠬.  頥   ࠭ 
   ࠬ.

EXPLOSIONS 楫 ६
  TRUE(1)  = ࠬ    "뢠".
  FALSE(0) =  뢮.

EXT_VIDEO_MODE 楫 ६
  ন 祭, ᮮ⢥饥 譥 ०.
   饥 ६ ᯥ稢 ᫥騥 Ultravision-०:
                11        80x25           22        108x43/50
                13        80x34/36        24        108x60/63
                12        80x43/50        31        120x25
                14        80x60/63        39        120x36
                19        94x25           32        120x43/50
                1B        94x36           3A        120x63
                1A        94x43/50        33        132x25
                1C        04x63           3B        132x36
                21        108x25          34        132x44/50
                23        108x34/36       3C        132x60

EXT_VIDEO_STATUS 楫 ६
  ᫨ 0,  Multi-Edit 㤥 ᯮ짮 ᮡ⢥ ७ ०.
  ᫨ 1,  Multi-Edit 㤥 ᯮ짮 Ultravision ७ ०,
  । EXT_VIDEO_MODE.

GOTOXY ( x, y) 楤
  樮 䨧᪨      ࠭. 
  ,        㠫쭮 
  .

GOTOXY_VP ( ⮫, ப ) 楤
  ६頥   । ⮫  ப   饥 ६
  ।  ᬮ.

KILL_BOX 楤
  ࠥ ᫥ ᮧ ࠬ  ࠭, ⠭ ।饥
  ᮤন ࠭  ⠫ ࠬ  ⥪.

MAKE_MESSAGE ( message_string ) 楤
  뢠 message_string  ப ᮮ饭 ( 㬮砭 2 ப).

  :
                /* Display the current character */
                Make_Message('The character is: ' + Cur_Char);

POP_BOX 楤
  ⠫ ࠬ  ⥪  㭨⮦.

PUT_BOX( ul_col, ul_row, lr_col, lr_row, bg_color, fg_color,
                title_string, shadow ) 楤

  頥 ࠬ  ࠭   न. Bg_color - 䮭 梥,
  fg_color - 梥 ᨬ.  Bg_color   㫥, ⮣ fg_color 
  ᮤঠ  ਡ 梥 (. ).
  Title_string । ,  㤥 業஢  孥
   ࠬ. ᫨ shadow TRUE,   㤥  ⥭.
  ᫨ ⥭ ।,      ப  
  ⮫,   ⥭,  ࠧ .  , 
   ࠭,  뢮 ࠬ ࠭  ⥪.   
   ⠭ 樥 Kill_Box.

  :

                /* Put a box on the screen for error messages */
                Put_Box(5, 4, 62, 12, White, Red, 'ERROR', TRUE);
                /* Prompt user */
                Write('Press any key to continue',6,5,White, Red);
                Read_Key; /* Wait for keypress */
                Kill_Box; /* Erase box */

PUT_COL_NUM( num ) 楤
  頥 ।  (楫 ᫮)  ᯫ C: ⥪饣 .

PUT_LINE_NUM( num ) 楤
  頥 ।  (楫 ᫮)  ᯫ L: ⥪饣 .

RESTORE_BOX 楤
   c  KILL_BOX,  ᪫祭 ⮣,   ⠫ ࠬ
   ⥪.

SAVE_BOX ( x1, y1, x2, y2 ) 楤
   PUT_BOX,  ࠭   ࠭  뢮 ࠬ.
  ⠭ ᮤন    KILL_BOX.

SCREEN_LENGTH 㭪 (楫)
  : 楫 ᫮, ᮤঠ饥 ᫮ ப, ⮡ࠦ  ࠭.

SCREEN_WIDTH 㭪 (楫)
  : 楫 ᫮, ᮤঠ饥 ᫮ ⮫殢, ⮡ࠦ  ࠭.

SCROLL_BOX_DN( x1, y1, x2, y2, attribute ) 楤
  ,   Scroll_Box_Up,  ᪫祭 ⮣,  ⠥  ࠭
  .

SCROLL_BOX_UP( x1, y1, x2, y2, attribute ) 楤
  ⠥  ࠭   1 ப. Attribute -  
  ᯮ㥬  ⠭ 梥  ப. 訥 4  - 梥
  ᨬ, ᫥騥 3  - 梥 䮭,  訩 ࠧ - /.

  :
                Scroll_Box_Up(1,1,80,25, (Back_Color shl 4) or Text_Color);

SET_VP ( x1, y1, x2, y2 ) 楤
  ࠭稢  ᬮ 묨 न⠬.
  SET_VP ( 1, 1, Screen_Width, Screen_Length ) ⠭ 
  ᬮ   ࠭.

SET_VIDEO_MODE( mode ) 㭪 (楫)
  ⠭ ० (. VIDEO_MODE ).

TEXT_COLOR_VP 楫 ६
  ⮢ ਡ   ᬮ.

UPDATE_STATUS_LINE 楤
   ப ﭨ Multi-Edit'.  ,   
   ப   ⮫ ( ⮣ ᯮ PUT_COL_NUM
   PUT_LINE_NUM).

VIDEO_CARD 㭪 (楫)
  :
            0 = IBM CGA
            1 = IBM Monochrome
            2 = MONROE Color
            3 = MONROE Monochrome
            4 = Sigma Color 400
            5 = EGA Color
            6 = Hercules Monochrome
            7 = VGA Monochrome
            8 = VGA Color
            9 = EGA Monochrome
            10 = Wyse 700

VIDEO_MODE 㭪 (楫)
  :
            0 =    25 ப
            1 = 30/33 ப
            2 = 43/50 ப
            255 = ⢮ ப  ࠬࠬ /X  /Y.

WHEREX 㭪 (楫)
  : 䠪᪠ न X 䨧᪮  ࠭.
                  裡  㠫쭮 樥  .

WHEREX_VP 㭪 (楫)
  : ⥪ ਧ⠫쭠   (X) ⭮⥫쭮
  ⥪饩  ᬮ. 1 -    ᬮ.

WHEREY 㭪 (楫)
  : 䠪᪠ न Y 䨧᪮  ࠭.
                  裡  㠫쭮 樥  .

WHEREY_VP 㭪 (楫)
  : ⥪ ⨪쭠   (Y) ⭮⥫쭮
  ⥪饩  ᬮ. 1 -    ᬮ.

WORKING 楤
  뢠 ᢥ稢 ᮮ饭 'WORKING' ப ﭨ Multi-Edit'.
  饭 㤪 ᢥ稢  맮 REDRAW  NEW_SCREEN.

WRITE( string, col, row, bg_color, fg_color) 楤
  뢮 string, 稭   न  묨 ਡ⠬.
  Bg_color   0, ⮣ fg_color  ᮤঠ  梥⮢
  ਡ (. ).

  ^2 !!:      ⥪  ᥬ ,  
         뢮  ࠭.

WRITE_VP ( string ) 楤
  뢮 ப  ⥪饩 樨 .
  ࠡ뢠 ᨬ  ⪨ (ASCII 13), ॢ ப
  (ASCII 10)     ᨬ (ASCII 8).

VP_BS 楫 ६
  ᫨ 1,  backspace ࠡ뢠  ࠧ騩 ᨬ.
  ᫨ 0,  backspace ࠡ뢠  ࠧ騩 ᨬ.

VP_LF 楫 ६
  ᫨ 1,   ⪨ ࠡ뢠  CR/LF.
  ᫨ 0,   ⪨ ࠡ뢠  CR.

VP_WRAP 楫 ६
  ᫨ 1,  ᪠ ப   ਭ  ᬮ.
  ᫨ 0,  ப 㤥 ᥪ.


                         
  Multi-Edit  ஥ ⮤  ⥪  ࠭  ᫥⥫쭮
  ० ( ନ).  ᬮ  ࠭稢 
  אַ㣮쭨  ࠭.    権  
  ᬮ 㪠뢠 ⭮⥫쭮 孥  㣫  ᬮ.


                        

CLEAR_VIRTUAL_DISPLAY 楤
  頥  㠫쭮 ᯫ.

OVERRIDE_SCREEN_SEG 楤
  筮 楤 SAVE_BOX ࠭  㠫쭮 ᯫ 
  ᫥ ⮣,  楤 뫠 맢 SET_VIRTUAL_DISPLAY.
   楤, 맢 ᫥ SAVE_BOX, १뢠 ࠭ 
  묨  ࠭.    믮 RESET_SCREEN_SEG 
  ᫥ 楤 SAVE_BOX.

RESET_SCREEN_SEG   楤
  ⠢ 楤 SAVE_BOX  ᥡ 筮.

RESET_VIRTUAL_DISPLAY  楤
  頥 প 㠫쭮 ᯫ, ⮬  䨪樨
  㠫쭮 ࠭ ⮡ࠦ   ࠭.

SET_VIRTUAL_DISPLAY 楤
  稭 প  㠫쭮 ᯫ. - 뢥  ࠭
  㤥 뢠   㠫쭮 ࠭.
  ନ஢ 㦭  ࠧ ࠭     ࠦ
    楤 UPDATE_VIRTUAL_DISPLAY.

     ⥫   ⠭ ଠ쭮 ﭨ
  ᯫ   楤 RESET_VIRTUAL_DISPLAY ᫥ ⮣,  প
  㠫쭮 ᯫ   㦭.

UPDATE_VIRTUAL_DISPLAY ** 楤
  । ᮤন  㠫쭮 ᯫ   ࠭ 
  ⪠  㠫쭮 ᯫ.

UPDATE_VIRTUAL_WINDOW ( X1, Y1, X2, Y2) 楤
   ᥡ  UPDATE_VIRTUAL_DISPLAY  ᪫祭 ⮣, 
  ࠭稢  । न⠬ X1, Y1 (孨 
  㣮)  X2, Y2 ( ࠢ 㣮), ⠪  頥  㠫쭮
  ᯫ.

VIRTUAL_DISPLAY 㭪 (楫)
  頥 1, ᫨ প 㠫쭮 ᯫ ⨢, 0 ᫨ .
  ᫨  , প 㠫쭮 ᯫ 㤥 ⪫, ⮡
    .
   
^2 !!: .     襣 ⢠ ଠ樨
           ⭮⥫쭮 ᯮ짮  .

FIND_TEXT( str searchstr, int linecount, int flags) 㭪 (楫)
  Searchstr - ࠦ ᪠.
  Linecount - ⢮ ப  ᪠,  0  ᪠   䠩.
  Flags     - ⠭  ᪠.

  騥 ⠭     প ⮣:

      _RegExp          0x01          ࠦ  ꥤ
      _OldExp          0x02         .
      _CaseSensitive   0x04         ਬ:
      _Backward        0x08             _RegExp | _Backward | _CaseSensitive

  Find_Text() ন ॣ ࠦ Unix-⨫   ME-⨫ .

FOUND_STR ப ६
  ப,  뫠  ᫥ ᪮.

IGNORE_CASE  楫 ६
  TRUE  (1) =   ⢨⥫  ॣ 㪢.
  FALSE (0) =  ⢨⥫  ॣ 㪢.

REG_EXP_STAT 楫 ६
  TRUE (1)  = ॣ ࠦ ⨬  . ॣ ࠦ
  FALSE (0) = ॣ ࠦ ⨬

GLOBAL_INT ('REG_EXP_STYLE') global 楫 ६
    ⠭    ⠭ 䥩 짮⥫
  TRUE (1) = UNIX-⨫ ॣ ࠦ
  FALSE(0) = ᪨ Multi-Edit-⨫ ॣ ࠦ

   !!:  REG_EXP_STYLE ਬ ⮫쪮  ᯮ짮 
                     ப S_AND_R (  ).



REPLACE( replace_string ) 楤
  ᫥ ᮮ⢥⢨ ᪠   replace_string.
      .
   ,     ।  砫 ᪠.

  :
                /*   宦 'WHAT'  'WHERE'   
                 'WHY',  ॣ */
                Ignore_Case = True;
                while ( Search_Fwd('{WHAT}||{WHERE}', 0) )
                {
                  Replace( 'WHY' );
                }

SEARCH_BWD( search_string, num_lines ) 㭪 (楫)
     search_string  ⥪饩 樨   ᫠ ப
  । num_lines. ᫨ num_lines = 0,  믮  砫
  䠩.

  :  TRUE (1)  - ப 
               FALSE (0) - ப  

SEARCH_FILE( file_name, search_str, flags ) 㭪 (楫)
   file_name  search_str, ᮣ᭮ 祭  䫠.
   ন _RegExp, _OldExp,  _CaseSensitive ⠭.

  :
        0 - 㤠
      > 0 - ப  search_str    . ॣ ࠦ

SEARCH_FWD( search_string, num_lines ) 㭪 (楫)
   ।  search_string  ⥪饩 樨   ᫠ ப
  । num_lines. ᫨ num_lines = 0,  믮  
  䠩. ᫨ search_string ,  㤥 ⠭  
  ᨬ  ப.

 : TRUE (1) - ப 
             FALSE(0) - ப  

NOTE 1:  㭪樨SEARCH_FWD  SEARCH_BWD ࠡ ⮫쪮  
⨫ ॣ ࠦ.  ᯮ짮 FIND_TEXT .

NOTE 2: 㭪 REPLACE ᯮ ⨫ ॣ ࠦ ᫥
樨 ᪠.
  
ASCII( string ) 㭪 (楫)
  : 楫 ᫮, ᮤঠ饥 祭 ASCII ࢮ ᨬ 
              ப. ᫨ ப , १ 㤥 0.
   :
                JX = ASCII('A'); /* The ascii value of 'A' */

CAPS( string ) 㭪 (ப)
  ८ࠧ ப   ய묨 㪢.

  :  Good_Str = CAPS(Good_Str);

CHAR( integer_value ) 㭪 (ப)
  : ᨬ  । 祭 ASCII.

CONVERT_STRING ( string ) 㭪 (ப)
  : । ப  묨 宦ﬨ ᨬ 9 ASCII
           (⠡), 10 (ॢ ப), 13 ( ⪨), 92 (\)
             255 ८ࠧ묨 ᮮ⢥⢥  "\T", "\L", "\C", "\\"
             "\N".   ᯥ稢 饭  ᨬ  䠩,
               ᯮ짮 ⮡  ப,
             ⪨ ⠡樨,  ... ᯮ 㭪
            RECONVERT_STRING, ⮡  ८ࠧ ᫥⥫쭮 "\"
            ⭮  ࢮ砫 .

COPY( string, pos, num ) 㭪 (ப)
  :  ப ,稭  樨 pos  num. ᫨ pos
                ப, 㤥   ப.
              ᫨ pos  1   2048, 㤥  
              ப. ᫨ num  ⢠ 㯭 ᨬ 
              ஢,   ᪮஢ ⮫쪮 㯭 ᨬ.

  :
                /* Get the first 3 characters of Temp_Str */
                Temp_Str = Copy( Temp_Str, 1, 3 );

FEXPAND ( filename ) 㭪 (ப)
  :  ᯥ஢    䠩, ᭮ 
              । filename.  ਬ, ᫨  । FEXPAND 
             'ME.EXE',     ப 'C:\ME\ME.EXE'.

GET_EXTENSION( filename ) 㭪 (ப)
  : ப, ᮤঠ ७ । filename.

  :  Extension = Get_Extension(Old_file);

GET_PATH( filename ) 㭪 (ப)
  : ப,  ᮤঠ  (  ⠫)  filename.

HEX_STR ( integer ) 㭪 (ப)
  :  ⭠  । 楫 ᫠.

LENGTH  ( string ) 㭪 (楫)
  :  ப.

  :
                if ( Length(Test_String) > 80 )
                {
                  Text('String is too long.');
                }

LOWER( string ) 㭪 (ப)
  ८ࠧ ப   묨 㪢.

MAKE_LITERAL( string ) 㭪 (ப)
  : । ப,   "@@"   祭
              ॣ୮ ࠦ ᪮ ⨫ Multi-Edit', 
              ८ࠧ   ࠫ  ᯮ짮 SEARCH_FWD 
               SEARCH_BWD.

MAKE_LITERAL_X( string ) 㭪 (ப)
  : । ப,   "@@"   祭
              ॣ୮ ࠦ UNIX-⨫ Multi-Edit', 
              ८ࠧ   ࠫ  ᯮ짮 SEARCH_FWD 
               SEARCH_BWD.

PAD_STR( str_var, amount, pad_char ) 楤
  樠 str_var ᨬ pad_char   amount  ᨬ쭮
   str_var.

RECONVERT_STRING ( string ) 㭪 (ப)
  : । ப  묨 宦ﬨ ᫥⥫쭮⥩ "\"
              ।  CONVERT_STRING, ८ࠧ묨 ⭮ 
              ᨬ ASCII.

REMOVE_SPACE( string ) 㭪 (ப)
  : ப,  㤠묨 砫묨  묨 ஡,  
              묨 ᫥⥫쭮ﬨ   ஡  .

SHORTEN_STR( string ) 㭪 (ப)
  : । ப,  㤠묨 묨 ஡  c
              ⠡樨.

STR( integer_value ) 㭪 (ப)
  : ப ।⠢ integer_value.

  :
                / * 頥 ⥪騩  ப  ப ᮮ饭 * /
                Make_Message('Processing line: ' + Str(C_Line));

STR_DEL( string, pos, num ) 㭪 (ப)
    string ப  num ᨬ 稭  樨 pos.

  :  Test_String = STR_DEL(Test_String, 9, 4);

STR_CHAR( local_string_variable, position ) 㭪 (ப)
  : ᨬ ᮤঠ騩  । 樨
              local_string_variable.

STR_INS( target_string, dest_string, pos ) 㭪 (ப)
  : १ ⠢ target_string  dest_string  樨 pos.

  :
                /* Insert 'HELP' into Test_String at position 9 */
                Test_Str = STR_INS('HELP',Test_String,9);

SVL( local_string_variable ) 㭪 (楫)
  :  local_string_variable.  ॥, 祬 ᯮ짮
  LENGTH,  ⮫쪮 ࠡ⠥ c 묨 ப묨 ६묨.

TRUNCATE_EXTENSION( filename ) 㭪 (ப)
  : ப filename   ७  䠩.

TRUNCATE_PATH( filename ) 㭪 (ப)
  : ப ᮤঠ  䠩  .

VAL( result, string ) 㭪 (楫)
  ८ࠧ ப string  ᫮ result.

  : 0 - ᫨ 訡  㦥,
                 string,  ந諠 訡.
              ᫨ ப ,  㤥  0.

  :
                if ( Val(Temp_Value, '1000') == 0 )
                {
                  New_Value = Old_Value + Temp_Value;
                }

XPOS( substring, string, start_position ) 㭪 (楫)
  : 楫 ᫮, ᮤঠ饥  ப  ப.
              頥 0, ᫨ ப  .  㤥
              稭  樨 start_position.

  :
                What_Pos = XPos( 'WHAT', Test_String, 12 );
   
    㭪権  ⥬ ६  ࠢ ᮡﬨ
뤥 ᨭ⠪᪨  (祢 ᫮). ᭮ 뤥
祢 ᫮ - 쭠  , 뢠 KEYWORD,
 ᮤন ᪮쪮 祭 ப,  । ⥪ 
뤥  梥⮢ ਡ 뤥.

KEYWORD_CLINE_OVERRIDE 楫 ६
  TRUE (1) = ⥪騩 梥⮢ ਡ ப  設⢮  뤥
             ᨭ⠪᪨ .
  FALSE(0) = 

KEYWORD_HIGHLIGHTING 楫 ६
  TRUE  (1) = ᪠ 뤥 祢 ᫮
  FALSE (0) =  ᪠ 뤥 祢 ᫮

KEYWORDS_STR ப ६
   ᯥ᪠ ६  .  ᮤন   裡 
  ⥪騬     易 co ன KEYWORD.

SET_KEYWORDS( name, case_sens, reserved_word_scan_chars, scan_chars,
              reserved_words1, reserved_words2, reserved_words_attr, symbols,
              symbols_attr, string_chars, string_attr, literal_char,
              eol_comment, eol_comment_attr, open_comment1, close_comment1,
              comment1_attr, open_comment2, close_comment2,
              comment2_attr )  楤

   楤 樠   KEYWORD.   모
  ணࠬ஢ ॡ  ࠬ஢ ⮩   
  易⥫ ࠬ   ⠭   ப  
  ᫮ .

  Name -  ப ࠦ,   ⠭ KEYWORDS_STR.

  Case_sens - 楫 ᫮. TRUE 㤥 ⠢ Multi-Edit 
  १ࢨ஢ ᫮ ⢨⥫묨  ॣ.

  Reserved_word_scan_chars - ப ᨬ,  ਭ  
  ᨬ   祢 ᫮  reserved_words1  reserved_words2.
    ᨬ ᬮ  ⥫쭮 ᪮ ᬮ
   १ࢨ஢ ᫮, ᨬ,  ...

  Scan_chars - ப ᨬ  ਭ   ப  ⮩
   㣮 祬 १ࢨ஢ ᫮.

  Reserved_words1 -  祢 ᫮, ࠧ塞 ஡.
                    ᨬ쭠   -  255 ᨬ.

  Reserved_words2 - ⮦,   reserved_words1.
                    ᯮ, ᫨   १ࢨ஢ ᫮
                    祬 㤮⢮  reserved_words1.

  Reserved_words_attr - 梥⮢ 祭 ਡ.
                         梥⮢ ਡ  ⮩  
                        - 楫 ᫠  16 ⠬.
                         0-3 - 梥 ᨬ.
                         4-7 - 䮭 梥.
                         8 ⨢ 梥 ᨬ.
                         9 ⨢ 䮭 梥.

  Symbols - ப ᮤঠ  ᨬ  ᫮ ࠬ,
            㣫 ᪮, 䨣 ᪮,  ...

  Symbols_attr - 梥⮢ ਡ  ᨬ. . reserved_words_attr 
                 ᭥ 梥⮢ ਡ.

  String_chars - ப ᮤঠ ᨬ,   ப
                 ⠭.  設⢥ 砥  筠 窠 (')
                 /  窠 (").

  String_attr - 梥⮢ ਡ  string_chars. . reserved_words_attr
                 ᭥ 梥⮢ ਡ.

  Literal_char: ᫨  ணࠬ஢  ᯥ樠 ᨬ (
                뢠 ESC-ᨬ),    ⠢
                ᨬ  ࠬ string_chars ()  ப
                ⠭,  ।騩  ᯥ樠 ᨬ
                । .

        ਬ:  C, ᨬ ESC -    (\). ᫨  
                ⠢    ப ⠭, 
                㤥   -  த ⮣:

                mystr = "This is a quote\"";

                        ࠬ
                literal_char.

  Eol_comment - ᫥⥫쭮 ᨬ,  砥 砫
                   ப.

  Eol_comment_attr - 梥⮢ ਡ  eol_comment. . reserved_words_attr
                      ᭥ 梥⮢ ਡ.

  Open_comment1 - ᫥⥫쭮 ᨬ,  砥 砫
                  筮 .

  Close_comment1 -᫥⥫쭮 ᨬ,  砥 
                  筮 .

  Comment1_attr - 梥⮢ ਡ  open_comment1  close_comment1. .
                  reserved_words_attr  ᭥ 梥⮢ ਡ.

  Open_comment2, close_comment2  comment2_attr - 筮 襨,
                  ᯮ, ᫨    ᫥⥫쭮
                 砫/ .
   
CRUNCH_TABS ( local_string_variable, local_integer_variable )
  Multi-Edit ᯮ ᨬ ASCII 255  ७ c ⠡樨
  㠫묨 ஡.  믮 GET_LINE, 頥 ப
   ᮤঠ ᪮쪮 㠫 ஡. 筮   ஡
   ⮡ࠦ ப. CRUNCH_TABS 㤠 㠫 ஡
  (ASCII 255)  local_string_variable.
  Local_integer_variable -   㪠     ப
  ᫥ 㤠 㠫 ஡.

EXPAND_TABS( local_string_variable, local_integer_variable ) 楤
    ⠡樨 (ASCII 9)  local_string_variable 㠫묨
  ஡ (ASCII 255) ᫨ TAB_EXPAND=TRUE,  ஡ (ASCII 32) ᫨
  TAB_EXPAND=FALSE.
  Local_integer_variable -   㪠    ᫥
  䨪樨 ப.

INDENT 楤
  믮 TAB_RIGHT ( १⠬ ᨬ묨  ᫮ ᭥ 
  TAB_RIGHT,  );
  ⠭ ஢ 㯠   樨 .

INDENT_LEVEL 㭪 (楫)
  :  ⮫ 㯠  ࠢ ⥪饣 䠩.
                 ன 㤥 ६   믮
              CR ( ⪨)  HOME.

SET_INDENT_LEVEL 楤
  ⠭ ஢ 㯠 ⥪饣 䠩  ⥪  ⮫.

TABS_TO_SPACES ( local_string_variable ) 楤
  ८ࠧ  ⪨ ⠡樨  㠫 ஡ 
  local_string_variable  ஡.

TAB_EXPAND  楫 ६
  TRUE  (1) = ᯮ짮 c ⠡樨  㠫 ஡.
  FALSE (0) = ᯮ짮 ஡  c ⠡樨 
              㠫 ஡.

TAB_LEFT 楤
  ६頥    ⠡樨 .
   ᨬ  ⠢   㤠.

TAB_RIGHT 楤
  ᫨ Insert_Mode = TRUE  ⥬ ६ TAB_EXPAND = TRUE, 
     ⠢ 㠫 c ⠡樨  ⥪
  ६頥   ⠡樨 ࠢ;
  ᫨ Insert_Mode = TRUE  TAB_EXPAND = FALSE,    ⥪
  ६頥    ⠡樨 ࠢ  ⠢ ஡ 
  ᫥ 樨  ⥪饩 樨.
  ᫨ Insert_Mode = OFF  TAB_EXPAND = TRUE, c ⠡樨 㤥
  뢠  ᨬ  ⥪饩 樨 ;
  ᫨ Insert_Mode = OFF  TAB_EXPAND = FALSE,  㤥  
   ᫥  ⠡樨.

UNDENT 楤
  ६頥     ⠡樨 ⭮  ⠭ ஢
  㯠   ;     饣 ⥪.
   
BACK_SPACE 楤
  ६頥   ᫨ Insert_Mode TRUE,  ⥪騩 ᨬ ᫥
  㤥 㤠. ᫨  -  ⮫ 1, ⥪ ப 㤥
  ⥭஢  ।饩 ப. ᫨ Insert_Mode FALSE
  (  ० ),  ᨬ ᫥  ஡  
  ⥭ ப  㤥 ந室.

CR 楤
  믮  ⪨. 㤥 ࠧ ப, ᫨ 祭 ०
  ⠢.

CUR_CHAR 㭪 (ப)
  :  The character on which the cursor is sitting in the currently
            active window.  If the cursor is on virtual space or beyond
            the end of a line, ASCII 255 will be returned.

  :  Temp_String = Temp_String + Cur_Char;

CUR_CHAR 㭪 (ப)
  : ᨬ,  ஬  室   饥 ६
  ⨢ . ᫨  室  㠫쭮 ஡   
  ப, 㤥  ASCII 255.

DEL_CHAR 楤
   ᨬ  樨    饥 ६ ⨢ .

DEL_CHARS( count ) 楤
   count ᨬ, 稭 c 樨    饥 ६
  ⨢ .

DEL_LINE 楤
   ப  ன 室    饥 ६ ⨢
  .

FORWARD_TILL( Delimit_String )
  ६頥  । ( ⥪饩 ப)   ,  
    ᨬ  Delimit_String   㤥 ⨣ 
  ப.  ⠢   ᨬ, ᮮ⢥饬 ᨬ 
  Delimit_String,     ப.

FORWARD_TILL_NOT( Char_String )
  ६頥  । ( ⥪饩 ப)   ,  
    ᨬ,  室騩  Char_String   㤥
  ⨣  ப.  ⠢   ᨬ, ᮮ⢥饬
  ᨬ,  室饬  Char_String,     ப.

GET_LINE 㭪 (ப)
  :  ᥩ ⥪饩 ப.

GET_LINE_FROM_WIN( line_num, window_num ) 㭪 (ப)
  易  PUT_LINE_TO_WIN.
  頥 ᮤন "ப" line_num   window_num.
   -   ஢.

GET_WORD( delimit_string ) 㭪 (ப)
  :  ⥪饩 ப, 稭饩  ⥪饩 樨  
  稢騩 ।  ᨬ  delimit_string    ப.
  ६頥    饭 ப.

  :  New_Word = Get_Word(' $*().!{}' ); /*  ᫮ */

GET_WORD_IN ( include_string ) 㭪 (ப)
  :  ⥪饩 ப, 稭饩  ⥪饩 樨  
  稢騩 । ⮭宦  ᨬ  室饣 
  include_string.  ६頥    饭 ப.  㭪
  ⨢ GET_WORD.

INSERT_MODE  楫 ६
  ᫨  䫠 TRUE (1) - । 室  ० ⠢.
   -  ० .
   ,   祭 ⮣ 䫠 㤥  
  .

PUT_LINE (string) 楤
   ப  ன 室  ப string.

PUT_LINE_TO_WIN( string, line_num, window_num, undo ) 楤
  頥 ப string,  ப line_num,   window_num.
  ⠭ undo  TRUE(1), ᫨  ࠭ ஥ ᮤন ப
    ⬥.   -   ஢.

QSORT_LINES( start, end, descend, col, length, ignore_case ) 楤
   䠩  ப  ࠬ start  end.
  ᫨ descend=TRUE, ஢ 㤥  뢠,   ⠭.
  Col - 砫 ⮫  ஢.
  Length -   ஢.
  ᫨ ignore_case TRUE,   ஢  㤥 ࠧ ॣ 㪢.

TEXT (String) ** 楤
  ⠢ ( ) ப  ⥪饩 樨 .
  楤 ⢨⥫쭠  ० ⠢/.
  
ப   祭  맮  ᯥ᪨ ࢠ ६.
 ࢠ ६  ⨪. ⠭ PC - 18.2 ⨪  ᥪ㭤.

KILL_TIMER_EVENT ( event_handle ) integer 楤
    ᮡ⨥ ⠩.
   ,  ᫨ ᮡ⨥ 믮 (   ஡
  㤠 ᮡ⨥  ᥡ),  㤠 㤥 㤠.

LAST_EVENT_TIME 㭪 (楫)
  : ᫥ ६ 맮 ᮡ ⠩.

LAST_KEYPRESS_TIME 㭪 (楫)
  : 祭 ६,   ᫥ ࠧ  .

LAST_UPDATE_TIME 㭪 (楫)
  : ६ ( ⥬ ⨪) ᫥ 䨪樨 ⥪饣 .

SET_TIMER_EVENT ( macro_cmd, time_interval, mode ) 㭪 (楫)
  砥 ப macro_cmd ࢠ ६ time_interval. Mode
  ⠭ ० Multi-Edit',  ஬  뢠 ᮡ⨥
  ($FF=).

  : ணࠬ ࠡ⪨ ᮡ,  0 ᫨ ந諠 訡.
            ணࠬ ࠡ⪨    㤠 ᮡ.

  :
           Timer_Handle = set_timer_event('MECOM^^COM_DATE_TIME', 18,Term);

  ^2 !!: . ப COM_DAT_TIME  COMMOD.SRC   ਬ
         ப, 뢠 ᮡ⨥ ⠩.

SYSTEM_TIMER 㭪 (楫)
  : ⥪饥 ६ ⥬  ⨪.

. ப AUTOSAVETIMER  䠩 MESYS
 ਬ ᯮ짮 権 ᮡ ⠩
 
 ⬥ ন   䠩, 㦥  Multi-Edit.
 ⬥   䠩  ᮤঠ ࠭祭 ᫮
⥪⮢ ,  ,  権  . 楤 UNDO
⬥  , ࠭     ⬥. 砫
   ⬥ । 楤ࠬ PUSH_UNDO  POP_UNDO.
PUSH_UNDO  POP_UNDO     㡨  32767 ஢.

MAX_UNDO 楫 ६
  ⠭ ᨬ쭮 ᫠ UNDO-ᥩ  䠩 (0-65535)

POP_UNDO  楤
  ।   ⬥.

  :
                /* This code can be reversed with a single undo command. */
                PUSH_UNDO;         /* start undo */
                Del_Chars( 10 );   /* delete 10 chars */
                Goto_Col( 1 );
                Text( 'Undo me' );
                POP_UNDO;          /* stop undo */

PUSH_UNDO  楤
  । 砫  ⬥.

REDO 楤
  ⬥ ᫥ UNDO.

UNDO 楤
  ⬥ ᫥  ⥪⮢ 権.

UNDO_STAT 楫 ६
  TRUE  (1) = 쭠 ⬥ 祭
  FALSE (0) = 쭠 ⬥ 몫祭
    
^2 !!:  ,    㭪樨 ᪠ Multi-Edit' 室
        䠩 USERIN.  . 㬥 
        ⮣ 䠩  ଠ樨. , ॢ室 ਬ
        ᯮ짮  㭪権 ᮤন  室 䠩 EXAMPLE.S

CHECK_KEY 㭪 (楫)
  : TRUE (1), ᫨  ;  READ_KEY,
             ਮ⠭ 믮. -  
             १ ६ KEY1  KEY2

  :
         /* If a key has been pressed, then inform user of the type of key */
         if ( Check_Key )
         {
           if ( Key1 == 0 )
           {
             Make_Message('You pressed an extended key.');
           }
           else
           {
             Make_Message('You pressed a normal key.');
           }
         }

KEY1 楫 ६
   ᫮, ᮤঠ饥   ᫥ ⮩ .
  0 㪠뢠,   ७ .

KEY2 楫 ६
   ᫮, ᮤঠ饥 ன  ᫥ ⮩ .
  ()  .

  :
                /* If F1 was pressed, then goto end of macro */
                if ( (Key1 == 0) && (Key2 == 94) )
                {
                  Goto End_Of_Mac;
                }

PASS_EVENT_THROUGH 楤         
  । keycode/scancode Multi-Edit'  맮 ப EVENT_MACRO.
   㭪 ᯮ ० ᥣ  ப, ।
  EVENT_MACRO.

PASS_KEY ( keycode, scancode ) 楤
  । keycode/scancode Multi-Edit',  믮 祭
    ப.  楤 ᯮ ப REPEAT.

PUSH_KEY ( keycode, scancode ) 楤
  頥 ।  keycode/scancode ( 16) ⭮  
  .

  :
                / *   ७  * /
                Read_Key;
                if ( (Key1 == 0) )
                {
                  Push_Key( Key1, Key2 );
                }

READ_KEY 楤
  ਮ⠭ 믮    ;
  頥 -    ६ KEY1  KEY2 (. ).

  :
                /* Get keycode */
                Read_Key;
                /* If Key1 == 0, then extended key was pressed */
                if ( Key1 == 0 && Key2 == 59 )
                {
                  Make_Message('You pressed F1!');
                }
  
㠫   ஢  ࠧ묨 ᯮᮡ:

1.  ᮧ , 砥 ,  ।⠢
    ᫥⥫쭮   ᯨ᪥   㯮  ᭥
      Win_Num.    , ᪮  㤠
     ᮧ . ᫮  ,  ᮮ⢥ 祭
    ᨬ ( A, B, C,  ... )  ᯫ ᯨ᪠  (<AltF1>).
    Win_Num ⢮  訬 ⢮  権.

2.    ᮧ 砥 㭨  䨪樨 .
   㭪  饭  ⮬  -  WINDOW_ID.   
   .   ४   १ Window_Id
   㭪樥 SWITCH_WIN_ID.

3.    ᯮᮡ ।ࠡ뢠  , ।
    ।祩   Multi-Edit', ᯮ ᯥ  
    ६ EVENT_MACRO.

CREATE_WINDOW 楤
     ।஢. ᫨ ᮧ  128 , 
  Multi-Edit   । 筮 ⢠   
  ,  ERROR_LEVEL 㤥 ⫨  . (.  4,  )

CUR_WINDOW 㭪 (楫)
  : 騩  .

  :
                /* ४  ᫥饥  */
                Switch_Window(CUR_WINDOW + 1);

DELETE_WINDOW 楤
   㤠 ⥪饥     ᮤন.

  ^2 !!:   ,   ,    
         ,    SAVE_FILE , 
        !  ᫥, ࠭  ᪥,  䠩 㤥
        ஭.

  :
                / * ᫨   ⥪饬 䠩 ,  㤠 ⥪饥
                ,  ᭠砫 ࠭ 䠩,  ⮬ 㤠  * /
                if ( File_Changed == 0 )
                {
                  Delete_Window;
                }
                else
                {
                  Save_File;
                  if ( Error_Level != 0 )
                  {
                    RM('MEERROR');
                  }
                  else
                  {
                    Delete_Window;
                  }
                }

ERASE_WINDOW 楤
  ࠥ ᮤন ⥪饣 ,   㤠 .

  ^2 !!:   ,   ,    
         ,    SAVE_FILE , 
        !  ᫥, ࠭  ᪥,  䠩 㤥
        ஭.

EVENT_MACRO ப ६
   ᯥ᪠   ६ 㪠뢠 ப, 
  㦭  믮 ।  ⨥   ᮡ⨥   
  ࠡ⪨ ஬ Multi-Edit.
  믮塞 ப    ᫥騬 ࠧ:

          int name()

  ࠬ   ।  ଥ  ப.
   - ࠬ஢ । .
  ᫨ EVENT_MACRO 頥 0,  Multi-Edit  㤥 ࠡ뢠 .
  ᫨ EVENT_MACRO 頥 1,  Multi-Edit 㤥 ࠡ뢠 .
  ஬ ⮣, 㭪 Pass_Event_through() । key1  key2
   Multi-Edit.
  稭,  ன Pass_key   ᯮ짮  ,
   Pass_Key 㤥  ⠢ ப event_macro 믮
  ᭮, 뢠 ⠪ ࠧ ᪮ 横.
  ⥬ 㭪 Pass_Event_Through, 頥    ஢
  .

  :

      void main()
      {
        // ᮧ     楫 㭪樨 Key_Scramble
        //  ࠡ뢠     ⮬ 
        //
        create_window;
        event_macro = 'Key_Scramble /ARG=CRAZY';
      }

      int Key_Scramble()
      {
        int ss = (parse_str('/ARG=',mparm_str) == 'CRAZY');
        if ( ss )    // ࠡ稪  #1
        {
          // 墠뢠 ⨥  SaveFile  ⨥  EXIT.
           if ( key1 == 0 and key2 == 60 )
           {
             key1 = 0;
             key2 = 45;
             pass_event_through;
           }
         }
         else         // keystroke scrambler #2
         {
          // ஢  㣨  , ஬ ⠡樨,
          //  ன ⢨ 室  Multi-Edit'  ࠭
           if ( key1 == 9 and key2 == 15 )
           {
             quit(0);             // Not nice!
           }
         }

LINK_STAT 㭪 (楫)
  : ᫮ ⥫    ਪ ⥪騩
              ; 0 ᫨   ⮫쪮  ⥪騬 .

LINK_WINDOW ( win_num ) 楤
   ⥪饥   , ஢ win_num.
   ,  楫    - ६
  ᬮ / ।஢ ࠧ ⥩  䠩.

NEW_SCREEN 楤
  ୮ 뢮  ࠭.

REDRAW 楤
   ⠭ ࠦ ⥪饣  ।஢.

REFRESH 楫 ६
   䫠 㤥 /몫 ஢  (1=.,
  0=몫.). ⠭ REFRESH  0 㤥 ⥫쭮 㢥稢 䥪⨢
  襣 ⢠ ப.

SCREEN_NUM 楫 ६
  ন 㠫  ࠭,  ᯮ ⨬ 
  (: 0 - 32767 ). ᫨ SCREEN_NUM ⠭  0,  
  ࠡ뢠 ᨬ,    ࠭ . .  
     㪮⢥ ணࠬ Multi-Edit.

SIZE_WINDOW( ul_col, ul_row, lr_col, lr_row ) 楤
   ࠧ ⥪饣 . ࠬ    
    ਭ ࠭. ᫨ । ࠬ  , 
  Multi-Edit 㤥 ஢  Size_Window.

  ( . SCREEN_WIDTH  SCREEN_LENGTH )

  :
         / *   ࠧ ⥪饣  * /
          Size_Window(3,1,23,80);

SWITCH_WINDOW ( win_num ) 楤
  ४砥    ஬ win_num  ᯨ᪥ . ᫨ win_num 
  ᫠ ⨢ , ⮣ SWITCH_WINDOW 㤥 ४   1.

SWITCH_WIN_ID ( id_integer ) 㭪 (楫)
  ४祭    䨪 .
  : TRUE, ᫨ id_integer  ,   ४祭.

UNLINK_WINDOW 楤
  ᪮ ⥪饥 .

UPDATE_SCROLL_BAR
    ⥪饣 .

UPDATE_WINDOW 楤
  ⠥  REDRAW,  ᪫祭 ⮣,   ⮫쪮
   ⥪ .

WINDOW_COUNT 㭪 (楫)
  : ᫮  饥 ६  
  ( Win_Num ᫥   ᯨ᪥  ).

  :
                / * ४  ᠬ ᫥  * /
                Switch_Window(Window_Count);

WINDOW_ATTR 楫 ६
  ਡ ⥪饣 .
  祭 ࠧ冷 ᫥騥:

           0 = 1 - ⮥ ,
                  0 -  ⮥ ,
           1 = 1 - ଠ ﭨ  ⮡ࠦ,
                  0 - ଠ ﭨ ⮡ࠦ,
           2 = 1 - ࠭  ⮡ࠦ,
                  0 - ࠭ ⮡ࠦ,
           3 = 1 - ⨪   ⮡ࠦ,
                  0 - ⨪  ⮡ࠦ,
           4 = 1 - ਧ⠫   ⮡ࠦ,
                  0 - ਧ⠫  ⮡ࠦ,
           7 = 1 -   .   㤥 ⮡ࠦ  
                      ᯨ᪥ ,   ࠭  autosave.  筮
                      ᯮ  ᯥ樠 ஢,  䠩
                      䨣樨 MECONFIG.DB.

WINDOW_ID 㭪 (楫)
  : Win_Id -  ⥪饣 .

WINDOW_NAME ப ६
  4-ᨬ쭠 ப, ᮤঠ   ஥   
  孥 㣫 ( A, B, C  ..).

WIN_X1 㭪 (楫)
  : 孨   ⥪饣 .
              ᫨ 頥 , ⮣  ࠭  㤥
              ⮡ࠦ.  ᨬ쭮 祭 ࠭稢 ਭ
              ࠭  2.

WIN_X2 㭪 (楫)
  :  ࠢ  ⥪饣 .
              쭮 祭 - 4.
              ᨬ쭮 祭 - ਭ ࠭  1 ( 㤥 ⠢
              ࠢ ࠭  ⮡ࠦ ).

WIN_Y2 㭪 (楫)
  :    ⥪饣 . 쭮 祭 = 5;
              ᨬ =  ࠭ +1.

WIN_Y1 㭪 (楫)
  :  孥  ⥪饣 . 쭮 祭 - 3.
              ᨬ =  ࠭ - 3.

W_BOTTOM_LINE 楫 ६
W_BOTTOM_LINE 楫 ६
  TRUE = ⥪饥   ⮡ࠦ ࠭    .


                                

     ᮡ⢥  梥⮢ ਡ⮢.
  ਡ ।   ᫥ 楫 ६ (  
  ⥪饬  ):

          T_Color        梥 ⥪
          B_Color        梥 
          S_Color        Status (or bold) color
          C_Color        梥  ⥪
          H_Color        梥 ᢥ稢 (    )
          EOF_COLOR      梥 થ End-Of-File
          L_Color        梥 ⥪饩 ப ⥪饣 
          LB_Color       梥 ⥪饩 ப   ⥪饣 

   ६ WINDOW_COLOR_STAT ᯮ ⮡ । ᯮ
   梥  㬮砭  ᮡ⢥ 梥. ᫨  ⠭
 묨 梥⠬, Window_Color_Stat   ⠭  TRUE. 
㤥 । ப 梥⮢ ᮢ .
  
C_PAGE 㭪 (楫)
  : ⥪騩  ࠭, 稭  1.
             (ᯮ  ० 㬥)

DOC_MODE 楫 ६
  TRUE (1) = Multi-Edit 室  ० 㬥.

FORMAT_LINE ப ६
  ப ଠ  ⥪饣 䠩.

  ^2 !!:  ASCII 16 ᯮ ⮡ ।⠢ 樨 ⠡樨 
         ப ଠ. 'R'  ⠢  ப ⮡ ⠭
         ࠢ  ( .  ६ RIGHT_MARGIN ).  㣨 ᨬ
          ࠡ뢠 ᮡ. ப ଠ    2048 ᨬ
         .

FORMAT_STAT 楫 ६
  TRUE (1) = ப ଠ ࠭   䠩.

INDENT_STYLE 楫 ६
   㯠  ⥪饣 䠩.

  0 = 筮  ( () <TAB > ࠢ ப )
  1 = ⮬᪨  ( ⠭    ࠢ 
      ।饩 ப )
  2 = ⥫㠫쭮 ⮬᪮ ࠢ ࠢ
      . 㪮⢮ ணࠬ Multi-Edit  襣 ⢠
      ஡⥩

PG_LINE 㭪 (楫)
  : ᬥ饭 ப  ⥪饩 ࠭ (० 㬥)

RIGHT_MARGIN 楫 ६
  ࠢ   ⥪饣 䠩. ᯮ  室   ப 
  業஢.

USE_FORMAT_LINE 楫 ६
  TRUE =  ⥪饥  㤥 ᯮ짮 ப ଠ  㤥
          ஢ ⠭   ⠡権.
  FALSE = 

WORD_WRAP_LINE ( wrap_to_eop, restore_cursor ) 楤
  稭  ⮬᪮ ७ ᫮  ⥪饩 ப.
  ᯮ  ଠ஢ ப  ࠣ.
   wrap_to_eop TRUE (1),  ଠ஢ 㤥   
  ࠣ,  ଠ஢ 㤥 ⠭  ⨦
  ࠢ .
  ᫨ restore_cursor - TRUE (1),   㤥 ⠭ 
  ࢮ砫 ,   㤥 ⠢  
  ଠ㥬 ⥪.

WORD_WRAP_STYLE 楫 ६
  ᫨ 0, 室   ப 㤥  " ".
  ᫨ 1, 室   ப 㤥     㩤  ப.

WRAP_STAT  楫 ६
  TRUE (1) =  ⮬᪨ ७ ᫮ 祭  ⥪饬 .
      
   - 쭠  ,  ᨢ,   
।   ᮤঠ騥 3 ப ( 2048 ᨬ )
 3  楫  ᯮ㥬 ⥬묨 ப TOPMENU,
SUBMENU  DATA_IN  ᮧ    .

 ᭠砫 㭪樥 MENU_CREATE ᮧ   ࠭ ணࠬ
ࠡ⪨, 饭  楫 ६. ᫥ ⮣  ⠭
ࠧ ப  楫      ( ᨢ) 
믮 ᮮ⢥ ப.  ࠡ⠫    
㤠 ,   㤥   .

 TOPMENU  SUBMENU:
        STR1        ন   .
        STR2        ন  () ( "<F1>",  ... ).
        STR3        ন ࠬ.
        INT1          ⠭  1, ᫨   
                    ய᪠.

 DATA_IN:
        STR1        ন  .
        STR2        ᮤন ப ६, ᫨ ⨯ - ப.
        STR3        ন ࠬ.
        INT1        ন ⨯ .
        INT2        ᮤন 楫 ६, ᫨ ⨯ - 楫.

    ᭥ ⮣  ᯮ짮 MENU, .室 䠩
EXAMPLE.S.

MENU_CREATE 㭪 (楫)
      頥 ணࠬ ࠡ⪨ (楫 ᫮),
   ᯮ ⮡    .

MENU_DELETE( handle ) 楤
     易  ணࠬ ࠡ⪨ handle.

MENU_ITEM_INT( handle, item_number, int_number ) 㭪 (楫)
  頥 ।  MENU_CREATE 楫 ᫮ (1-3).

MENU_ITEM_STR( handle, item_number, str_number ) 㭪 (ப)
  頥 ।  MENU_CREATE ப (1-3).

MENU_SET_INT( handle, item_number, int_number, int_value ) 楤
  ,  MENU_SET_STR,  ᯮ  ⠭ 楫 (1-3).

MENU_SET_ITEM( handle, item_number, str1, str2, str3, int1, int2,
               int3 ) 楤
    ⠭       ࠧ. Handle
   뫠   , ᮧ MENU_CREATE.
  Item_number    1  65535.

MENU_SET_STR( handle, item_number, string_number, str_value ) 楤
  ) 楤
  ⠭ ப 1, 2  3  str_value.
  String_number    1  3.

           Ŀ
            .1 -              
            .2 -        
            .3 -        
            .4 -       
            .5 -  CLIPBOARD WIDNDOWS 3.1
           ٱ
             
 1 -  
BACKGROUND_COLOR
BACKUPS
BACKUP_PATH
BLOCK_COL1
BLOCK_COL2
BLOCK_LINE1
BLOCK_LINE2
BLOCK_STAT
BOX_COUNT
BUTTON_COLOR
BUTTON_KEY_COLOR
BUTTON_SHADOW_COLOR
B_COLOR
CAPS_COL
CB_H_COLOR
CB_S_COLOR
CB_T_COLOR
COLUMN_MOVE_STYLE
COL_COL
CTRL_HELP
CTRL_Z
CUR_FILE_ATTR
C_COLOR
DIR_MODE
DIR_SEARCH_ATTR
DIR_SORT_STR
DISPLAY_TABS
DOC_MODE
DOS_OUTPUT_WINDOW
DOS_PROMPT
DOS_WIN_X1
DOS_WIN_X2
DOS_WIN_Y1
DOS_WIN_Y2
D_B_COLOR
D_H_COLOR
D_S_COLOR
D_T_COLOR
EMS_CONFIG
ENVIRONMENT_MODE
EOF_COLOR
EOF_CR
EOL_CHAR
ERROR_COLOR
ERROR_LEVEL
EXPLOSIONS
EXT_VIDEO_MODE
EXT_VIDEO_STATUS
FILE_CHANGED
FILE_LOCKING
FILE_NAME
FILE_SEARCH_ATTR
FILE_SEARCH_REC
FIXED_LINE_LENGTH
FKEY_COLOR
FKEY_ROW
FNUM_COLOR
FORMAT_LINE
FORMAT_STAT
FOUND_STR
HELP_CURRENT_LINK
HELP_CURRENT_OFFSET
H_B_COLOR
H_COLOR
H_F_COLOR
H_H_COLOR
H_R_COLOR
H_S_COLOR
H_T1_COLOR
H_T2_COLOR
H_T3_COLOR
H_T_COLOR
IGNORE_CASE
INDENT_STYLE
INIT_VIDEO_MODE
INSERT_COL
INSERT_MODE
INS_CURSOR
KEY1
KEY2
LB_COLOR
LEFT_OFFSET
LINE_CHANGED
LINE_COL
LINE_TERMINATOR
L_COLOR
MARK_STACK_COUNT
MAX_UNDO
MAX_WINDOW_COL
MAX_WINDOW_ROW
MEM_COL
MENU_BAR_COL
MENU_BAR_ROW
MENU_BAR_STR
MESSAGES
MESSAGE_COL
MESSAGE_COLOR
MESSAGE_LENGTH
MESSAGE_ROW
MIN_WINDOW_COL
MIN_WINDOW_ROW
MODE
MODE_COL
MOUSE
MOUSE_H_SENSE
MOUSE_MODE
MOUSE_REPEAT
MOUSE_V_SENSE
MOU_DISAPPEAR
MOU_REPEAT
M_B_COLOR
M_H_COLOR
M_K_COLOR
M_S_COLOR
M_T_COLOR
NAME_LINE
OVR_CURSOR
PAGE_STR
PERSISTENT_BLOCKS
PRINT_MARGIN
READ_ONLY
RECORD_COL
REDUCE_MEM
REFRESH
REG_EXP_STAT
RESTORE
RETURN_INT
RETURN_STR
RIGHT_MARGIN
R_AX
R_BP
R_BX
R_CX
R_DI
R_DS
R_DX
R_ES
R_FLAGS
R_SI
SCREEN_NUM
SHADOW_CHAR
SHADOW_COLOR
STAT1_COLOR
STAT2_COLOR
STATUS_ROW
STATUS_STR
SWAP_MEM
SWAP_MODE
S_COLOR
TAB_EXPAND
TEMP_PATH
TEXT_COLOR_VP
TIME_COL
TIME_ROW
TRUNCATE_SPACES
T_COLOR
UNDO_STAT
USER_ID
USE_FORMAT_LINE
VP_BS
VP_LF
VP_WRAP
WINDOW_ATTR
WINDOW_COLOR_STAT
WINDOW_NAME
WORD_DELIMITS
WORD_WRAP_STYLE
WORKING_COL
WORKING_COLOR
WRAP_STAT
W_BOTTOM_LINE
W_B_COLOR
W_C_COLOR
W_EOF_COLOR
W_H_COLOR
W_LB_COLOR
W_L_COLOR
W_S_COLOR
W_T_COLOR
ZOOM_CHAR

騥 ⥬ 楫 ६ ⭮  梥⠬ ࠭.
 ᮤন 梥  ⥪  䮭. 訥 4  - 梥 ᨬ.
騥 4  - 䮭 梥. .  2  
।। 梥⮢ ⠭.

        W_T_COLOR                梥 ⥪   㬮砭
        W_H_COLOR                梥 ᢥ⪨   㬮砭
        W_B_COLOR                梥 ࠬ   㬮砭
        W_C_COLOR                梥  ⥪  㬮砭
        W_S_COLOR                梥 ﭨ   㬮砭
        W_EOF_COLOR              梥 થ EOF  㬮砭
        M_T_COLOR                梥 ⥪ 
        M_S_COLOR                梥 ﭨ 
        M_K_COLOR                梥 롨ࠥ 㭪 
        M_B_COLOR                梥 ࠭ 㭪 
        M_H_COLOR                梥 ᢥ⪨ 
        CB_T_COLOR               梥 ⥪ ࠤ
        CB_S_COLOR               梥 ࠭ ࠤ
        梥 CB_H_COLOR          梥 ᢥ祭 ࠤ
        BUTTON_COLOR             梥  ⢨
        BUTTON_KEY_COLOR         梥    ⢨
        BUTTON_SHADOW_COLOR      梥 ⥭  ⢨
        D_T_COLOR                梥 ⥪ 䠩 ⥬
        D_S_COLOR                梥 ﭨ 䠩 ⥬
        D_B_COLOR                뤥騩 梥 䠩 ⥬
        D_H_COLOR                 ᢥ⪨  ⥬
        H_T_COLOR                梥 ⥪ 
        H_S_COLOR                梥 ﭨ ࠢ
        H_B_COLOR                뤥騩 梥 ࠢ
        H_H_COLOR                 ᢥ祭 ⥪ ࠢ
        H_R_COLOR                梥  ࠢ
        H_F_COLOR                 㭪樮쭮  ࠢ
        H_T1_Color               梥 ⥪⮢ ਡ 1 ࠢ
        H_T2_Color                । ⥪⮢ ਡ 2
        H_T3_Color                । ⥪⮢ ਡ 3
        FKEY_COLOR               梥 ⥪ 㭪樮쭮 
        FNUM_COLOR               梥  㭪樮쭮 
        STAT1_COLOR              梥 ப ﭨ
        STAT2_COLOR              梥 뤥 ப ﭨ
        MESSAGE_COLOR             ப 饭
        WORKING_COLOR              "WORKING"
        ERROR_COLOR               ⥪ 饭  訡
        SHADOW_COLOR              梥
        SHADOW_CHAR               ᯮ㥬  ⥭
        BACKGROUND_COLOR           ࠭    
                                  ப ﭨ,  ...
                                   梥 "ࠡ祣 ⮫".


  

  ࠢ 梥⮬ ⥪饩 ப (ப  ஬) ᫥騬
⥬묨 ६묨 :

        L_Color       騩 梥 ப ⥪饣 
        LB_Color      騩 梥 ப  
        W_L_Color     祭  㬮砭  L_Color
        W_LB_Color    祭  㬮砭  LB_Color

  몫 ⥪騩 梥 ப ⠭  ६  0.

   ᮡ⢥  梥⮢ ਡ⮢.
⮢ ਡ 易  ᫥騬 ⥬묨 ६묨:

        T_Color         梥 ⥪
        B_Color         梥 
        S_Color         梥 ﭨ
        C_Color         梥  ⥪
        H_Color         梥 
        EOF_COLOR       梥 થ End-Of-File

६ ⥬ LINE_ATTR   ᫥   
ਡ 梥 ⥪饩 ப. ᫨ LINE_ATTR - 0, ⮣ ப 㤥
ᯮ짮 梥  㬮砭.

६ ⥬ WINDOW_COLOR_STAT ᯮ ⮡ ।,
ᯮ   梥  㬮砭  ᮡ⢥ 梥. ᫨ 
⠭  묨 梥⠬, Window_Color_Stat   ⠭
 TRUE.

. APPENDIX -2     ᯨ᪠
㯭 梥⮢.
 2 -   
                  TRUE = 1             EDIT = 0
                  FALSE = 0            DOS_SHELL = 1
                  BLACK = 0            ALL = 255
                  BLUE = 1             DARKGRAY = 8
                  GREEN = 2            LIGHTBLUE = 9
                  CYAN = 3             LIGHTGREEN = 10
                  RED = 4              LIGHTCYAN = 11
                  MAGENTA = 5          LIGHTRED = 12
                  BROWN = 6            LIGHTMAGENTA = 13
                  LIGHTGRAY = 7        YELLOW = 14
                  WHITE = 15           TERM = 3
 3 -  
                                 



 ͻ
    Name      Code    <Shft..>  <Ctrl..> <Alt..> <CtrlShft><AltShft>
 ͹
 <F1>          0, 59      0, 84    0, 94   0, 104  253, 94  254, 104
 <F2>          0, 60      0, 85    0, 95   0, 106  253, 95  254, 105
 <F3>          0, 61      0, 86    0, 96   0, 106  253, 96  254, 106
 <F4>          0, 62      0, 87    0, 97   0, 107  253, 97  254, 107
 <F5>          0, 63      0, 88    0, 98   0, 108  253, 98  254, 108
 <F6>          0, 64      0, 89    0, 99   0, 109  253, 99  254, 109
 <F7>          0, 65      0, 90    0, 100  0, 110  253, 100 254, 110
 <F8>          0, 66      0, 91    0, 101  0, 111  253, 101 254, 111
 <F9>          0, 67      0, 92    0, 102  0, 112  253, 102 254, 112
 <F10>         0, 68      0, 93    0, 103  0, 113  253, 103 254, 113
 <F11>         0, 133     0, 135   0, 137  0, 139  253, 137 254, 139
 <F12>         0, 134     0, 136   0, 138  0, 140  253, 138 254, 140
 <ENTER>      13, 28     ------   10, 28   0, 28   253, 28  254, 28 
 <TAB>         9, 15      0, 15    0, 148  0, 165  253, 148 254, 165
 <ESC>        27, 1      ------   ------   0, 1    253, 1   254, 1  
 <BS>          8, 14     ------  127, 14   0, 14   253, 14  254, 14 
 <UP>          0, 72     56, 72    0, 141  0, 152  253, 141 254, 152
 <DN>          0, 80     50, 80    0, 145  0, 160  253, 145 254, 160
 <LF>          0, 75     52, 75    0, 115  0, 155  253, 115 254, 155
 <RT>          0, 77     54, 77    0, 116  0, 157  253, 116 254, 157
 <PGUP>        0, 73     57, 73    0, 132  0, 153  253, 132 254, 153
 <PGDN>        0, 81     51, 81    0, 118  0, 161  253, 118 254, 161
 <HOME>        0, 71     55, 71    0, 119  0, 151  253, 119 254, 151
 <END>         0, 79     49, 79    0, 117  0, 159  253, 117 254, 159
 <CNTR>        0, 76     53, 76    0, 143  ------  253, 143 --------
 <INS>         0, 82     48, 82    0, 146  0, 162  253, 146 254, 162
 <DEL>         0, 83     46, 83    0, 147  0, 163  253, 147 254, 163
 <Grey->      45, 74     ------    0, 142  0, 74   253, 142 254, 74 
 <Grey+>      43, 78     ------    0, 144  0, 78   253, 144 254, 78 
 <Grey*>      42, 55     ------    0, 150  0, 55   253, 150 254, 55 
 <Grey/>      47, 224    ------    0, 149  0, 164  253, 149 254, 164
 <GreyENTER>  13, 224    ------   10, 224  0, 166  253, 224 254, 166
 <ScrollLockOn> 0, 238    ------   ------- -------  -------- --------
 <ScrollLockOff>0, 239    ------   ------- -------  -------- --------
 <a>          97, 30     65, 30    1, 30   0, 30   253, 30  254, 30 
 <b>          98, 48     66, 48    2, 48   0, 48   253, 48  254, 48 
 <c>          99, 46     67, 46    3, 46   0, 46   253, 46  254, 46 
 <d>         100, 32     68, 32    4, 32   0, 32   253, 32  254, 32 
 <e>         101, 18     69, 18    5, 18   0, 18   253, 18  254, 18 
 <f>         102, 33     70, 33    6, 33   0, 33   253, 33  254, 33 
 <g>         103, 34     71, 34    7, 34   0, 34   253, 34  254, 34 
 <h>         104, 35     72, 35    8, 35   0, 35   253, 35  254, 35 
 <i>         105, 23     73, 23    9, 23   0, 23   253, 23  254, 23 
 <j>         106, 36     74, 36   10, 36   0, 36   253, 36  254, 36 
 <k>         107, 37     75, 37   11, 37   0, 37   253, 37  254, 37 
 <l>         108, 38     76, 38   12, 38   0, 38   253, 38  254, 38 
 <m>         109, 50     77, 50   13, 50   0, 50   253, 50  254, 50 
 <o>         111, 24     79, 24   15, 24   0, 24   253, 24  254, 24 
 <p>         112, 25     80, 25   16, 25   0, 25   253, 25  254, 25 
 <q>         113, 16     81, 16   17, 16   0, 16   253, 16  254, 16 
 <r>         114, 19     82, 19   18, 19   0, 19   253, 19  254, 19 
 <s>         115, 31     83, 31   19, 31   0, 31   253, 31  254, 31 
 <t>         116, 20     84, 20   20, 20   0, 20   253, 20  254, 20 
 <u>         117, 22     85, 22   21, 22   0, 22   253, 22  254, 22 
 <v>         118, 47     86, 47   22, 47   0, 47   253, 47  254, 47 
 <w>         119, 17     87, 17   23, 17   0, 17   253, 17  254, 17 
 <x>         120, 45     88, 45   24, 45   0, 45   253, 45  254, 45 
 <y>         121, 21     89, 21   25, 21   0, 21   253, 21  254, 21 
 <z>         122, 44     90, 44   26, 44   0, 44   253, 44  254, 44 
 < >          32, 57     ------  252, 57   0, 57   253, 57  254, 57 
 <`>          96, 41 <~>126, 41   ------   0, 41   -------  254, 41 
 <1>          49, 2  <!> 33, 2    ------   0, 120  -------  254, 120
 <2>          50, 3  <@@> 64, 3     0, 3    0, 121  253, 3   254, 121
 <3>          51, 4  <#> 35, 4    ------   0, 122  -------  254, 122
 <4>          52, 5  <$> 36, 5    ------   0, 123  -------  254, 123
 <5>          53, 6  <%> 37, 6    ------   0, 124  -------  254, 124
 <6>          54, 7  <^^> 94, 7    30, 7    0, 125  253, 7   254, 125
 <7>          55, 8  <&> 38, 8    ------   0, 126  -------  254, 126
 <8>          56, 9  <*> 42, 9    ------   0, 127  -------  254, 127
 <9>          57, 10 <(> 40, 10   ------   0, 128  -------  254, 128
 <0>          48, 11 <)> 41, 11   ------   0, 129  -------  254, 129
 <->          45, 12 <_> 95, 12   31, 12   0, 130  253, 12  254, 130
 <=>          61, 13 <+> 43, 13   ------   0, 131  -------  254, 131
 <\>          92, 43 <|>124, 43   28, 43   0, 43   253, 43  254, 43 
 <[>          91, 26 <{>123, 26   27, 26   0, 26   253, 26  254, 26 
 <]>          93, 27 <}>125, 27   29, 27   0, 27   253, 27  254, 27 
 <;>          59, 39 <:> 58, 39   ------   0, 39   -------  254, 39 
 <'>          39, 40 <"> 34, 40   ------   0, 40   -------  254, 40 
 <,>          44, 51 <<> 60, 51   ------   0, 51   -------  254, 51 
 <.>          46, 52 <<> 62, 52   ------   0, 52   -------  254, 52 
 </>          47, 53 <?> 63, 53   ------   0, 53   -------  254, 53 
 Ķ
                               MOUSE EVENTS                                        
 Ķ
 <MEVENT>      0, 250     0, 220   0, 223  0, 226  -------  ------- 
 <MEVENT2>     0, 251     0, 221   0, 224  0, 227  -------  ------- 
 <MEVENT3>     0, 252     0, 222   0, 225  0, 228  -------  ------- 
 ͼ
 4 -     
讥 ⢮ 権, ᮡ 樨  䠩,  ஢
訡 ⨯ '  '  'ன⢮  ⮢'.  訡 
樨  ⠭ ६ ERROR_LEVEL  ᯥ᪮ 祭,
易  ஬ 訡 ( - ண ६ Multi-Edit,   
 裡  㭪樥 DOS   䠩 ERRORLEVEL). ஢ 訡
ࠢ  㪠뢠  ,   訡  ந諮.  ,
 ⠭ ६ ERROR_LEVEL    ᠭ.

直 ࠧ,  뢠    ⥭  樨
訡 (ᮡ ᫨ 뢭 믮 ப   ᯥ
⮩ 樨), ६ ERROR_LEVEL  ஢  ⫨筮  
祭. ᫨ 頥 ⫨筮   祭,  ப 
ࠡ뢠 訡  ᯮᮡ,  ⥬ ⠭ ६
ERROR_LEVEL ⭮  0. ᫨  ப ।ᬮ७   
⭮襭   訡,    訬 ⨫ ணࠬ஢
 Multi-Edit.

  :
                Load_File('C:\ME\INIT.SRC');  /* Load a file */
                if ( Error_Level != 0 )
                {                             /* If an error occurred then */
                  RM('MEERROR');       /* Run the ME-ERROR macro */
                  Goto EXIT;                  /* and exit */
                }

ERROR_LEVEL 楫 ६
   ᫥ 訡.

                           MULTI-EDIT

1001   ᮧ  . CREATE_WINDOW 뢠  㦥 ⢮
      100 .
1002  筠   襭 樨.
1003  ⨣ ᨬ쭠  ப. ⠢ ⥪ 諠  2048
      ᨬ쭮 ࠭祭.
1004  ⨬ (ন) .
1006  ⨬ ᫮ . ᫮ ᨬ,  ᫮  .
1007  ME.HLP  .
1010  ⨬ ப ᪠. SEARCH_FWD 
      SEARCH_BWD 뢠  ⨬ ᨭ⠪ᮬ
      ॣ୮ ࠦ.   ஡ - ࠢ襭
      䨣 ᪮  㯯.
1011  室   .
1012   㯥 ⮫쪮  ⥭.
1013   ࠭ ࢠ 짮⥫.
1015   ࢠ 짮⥫. ந室, ਬ,  <CtrlBREAK>.
1016     UNDO-.  ந室 
      Multi-Edit   ᢮ 筮 ⢮  ⮡
      ࠭ ⥪⮢    ⬥.
1017  訡  ࠭ १ࢭ 䠩.
1020   ᮧ ६ 䠩.
1030  ⨬  DIR-.
1031  DIR-   .
1050   ᫨誮    ⬥.
          訡  ,   㤥 뢠   .
           砥    㤥 ᯮᮡ ⬥.
2002  ਭ  ⮢.
3002    .
3003    .
3005  ⪠  㯥. ⪠   䠩 ⮫쪮  ⥭.
3007  襭 ࠢ騥   DOS.
3008  筮 .
3010  ⨬ ।. ७ 訡 DOS.
3015  ⨬ ᯥ䨪 ᪮.
3018    䠩. FIRST_FILE  NEXT_FILE    ஢ 
          訡.
3021  ᪮  ⮢.
3031  騩 ⪠ ᪮.
3150   饭  
3152  ன⢮  ⮢
3153  ⭠  ( DOS 訡 ).
3154  訡   ᪥
3158      ᪥.
3159  ਭ  㬠.
3160  訡  . (宩   䥪 ᪮).
3161  訡  ⥭. (宩   䥪 ᪮).
3162  騩 ⪠ ᪮
3241   .
5001  ப  .
5005  㦠 ப - ᮢ⨬ .
        㤥 ந室, ᫨  ⪠ 㧨 ப,
         ஢   ࠭ ᨥ ࠭.

ERROR_STR 㭪 (ப)
  ᫨ ERROR_LEVEL = 5001 ( ப   ),  㤥  
   ப  ன  ⪠ 믮.
 WINDOWS 3.1 CLIPBOARD

䠩 WIN3.MAC ,  প 䥩  clipboard
Windows 3.1. WIN3.S 砥  ᨮ쭮 ᨥ Multi-Edit.

WIN3_CLIPBOARD () 㭪 (楫)
        頥 TRUE, ᫨  clipboard   ⥪.

WIN3_COPY() 㭪 (楫)
  ⠥ ஢ ⬥祭   clipboard.
  Clipboard   ࠡ뢠  64  ⥪ ६. ஬
  ⮣, ᫨ Multi-Edit 믮  訬 ࠭祭ﬨ , 
   ஢  16  ⥪  clipboard.

        :
                0        ᯥ譮
                1,2,3     
                4,5,6    Clipboard  㬥 ਭ ⥪
                10       Windows   ७ ०

WIN3_PASTE () 㭪 (楫)
        ⠥ ⠢ ⥪饥 ⥪⮢ ᮤন clipboard  ⥪騩
        䠩 c ⥪饩 樨 .
        Win3_Paste() -  ⥬  ᠬ묨 ࠭祭ﬨ ,  
        Win3_Copy().
        Win3_Paste()  頥   ᠬ 祭,   Win3_Copy().

WIN3_STATUS() 㭪 (楫)
  頥 0 ᫨ Multi-Edit 믮   DOS-.
  , 頥   ᨨ Windows  襬 ,  
  ᨨ  ᫥饬 .

        ਬ:
                        major_version = Win3_Status() & 0x0ff;
                        minor_version = (Win3_Status() >> 8) & 0x0ff;
  
訡 ६ 믮   ஢  
⥫⢠. ᫨ ந室 ⠪ 訡,  㤥  
    ணࠬ 稪  訡( ⭠筮
).  ଠ    ᠭ, ..   訡
    室 ⥪.

⮡   訡   맢 ࠭   ப
DOS ᫥騬 ࠧ:

                         CMAC macro_file_name -Dpc macro_name
                         (pc - ணࠬ 稪)

        :         C:\ME>CMAC LANGUAGE -D002A TEMPLATE

                        

02     RET  CALL.
03       .
04     ⢥ ᫮  ८ࠧ  楫  .
05     ⪠ 뢠  10  ப.
07     襭 ப.    .
101    訡  㧪 transient-ப.
102, 103, 104  筮 .
110    ९ ⥪.
 
訡 ࠭樨    - ࠢ쭮 
窨 ७ ᨭ⠪.

ଠ 訡 ࠭樨:

            (ப,⮫): ERROR : ᮮ饭

:
            LANGUAGE.SRC(92,22): ERROR 1: Syntax Error: 'THIN'


                           

01      ࠭  ᯮ ⮡ࠦ .
02       ࠧ⥫. ⮡ࠦ ࠧ⥫ (㣫 ᪮,
        ,  ..) ,   .
04       窠  ⮩.
05      ⪠ ᫨誮  ( 祬 20 ᨬ).
06      誮 讥 ⢮ ⮪.  500 ⮪ ।
         ப.
07      ( .
08       .
09      ) .
10       । ⪨.
13       ६.
14      ⪠ <>  .
15      ᮮ⢥⢨ ⨯  訡 ᨭ⠪.
16         ᮤঠ   16 ᨬ.
17      誮 讥 ⢮  ६.
         ᨬ쭮 ᫮  ६ - 200.
18      ப ६ .
24      Keycode .
25       ० Multi-Edit (EDIT, DOS_SHELL).
27      }   ᮮ⢥ {.
28      "Macro"  "macro_file" .
29      ப ॢᨫ 16 .
           筠 ப  䠩   ᮤঠ
           16  .
30      "Macro_file" 㦥 ।.
          ⨬ ⮫쪮  । 室 䠩.
31      ப ⠭ ᫨誮  (> 254 ᨬ).
32        Multi-Edit. ⪠ 祭 饭
           .
33       ";"  䬥᪨ .
34      ப  2048 ᨬ.
35      ⨬ ⭠筠 ⠭.
36      ⪠ । १ࢨ஢ ᫮   ६.
37      Include-䠩    묨.
38      室饥 ࠧ饭 "break"  "continue".
39      "case"   ᫥ "default".
40      "default" 㦥 ।.
41      䨪  20 ᨬ.
42      ਩  
43        
100     ०६  䠩.
101     室 䠩  .
102     訡  室 䠩.
103     ணࠬ 稪, ।  ࠬ -D ⨬.
104      ⫠ 室  .
200      訡, । ࠬ஬ -D.
