#####################################################################
########             ᠭ 䥩             ##########
########          ࠭⭮ ।஢         ##########
########                  " SHELLEDIT "                    ##########
########                    2.0                      ##########
########              ணࠬ ᫮                 ##########
########                  . ᪢.                       ##########
########     .  㬠, -9;  ⥫. 263-63-88     ##########
########      @@@@@@@@@@;            ⥫. 524-05-59     ##########
########   裡 . -7, 143900, ᫮ ..    ##########
########   - TURBO PASCAL 5.5 . M - SHELLED.TPU.  ##########
#####################################################################

#####################################################################
     I.  ⠢.
#####################################################################
 1. shinter      - 䠩, ᮤঠ騩 ᠭ 䥩 ,
 2. shintrd      - 䠩, ᮤঠ騩 㪮⢮ 짮⥫,
 3. shexampl     - 䠩, ᮤঠ騩 ਬ ࠡ  㫥,
 3. shmacro1.lex - 䠩, ᮤঠ騩  LEXICON  ᮧ
                   ணࠬ,
 4. shmacro2.lex - 䠩, ᮤঠ騩  LEXICON  ᮧ
                   䠩-᮪,
 5. shelled.tpu  - 䠩, ᮤঠ騩 tpu-  ணࠬ.

#####################################################################
     II. ᠭ.
#####################################################################
      ࠭⭮ ।஢  " SHELLEDIT "  ।-
 祭  ⮩ ࠭樨 䥩 짮⥫  ணࠬ
 ᯥ祭  ⥪⮢ ० ࠡ .  ᢮ -
   ⠭  ᨮ 짮⥫,  ᤥ -
 쭮   ᯮ짮, 設⢮ ० ⠭ 
 㬮砭,    㤠    ᢮ ணࠬ
   ணࠬ⠬.
     짮⥫,   ⥪⮢ ।஬, ᮧ
 ⥪⮢ 䠩 ( , ⠪  㤥 뢮,  ⮬ ࠧ-
  ᯮ짮  ᨬ  ⠡   浪),
 ᮤন ண   楤  뢮  ࠭ 
  ᮮ⢥饣 ࠧ.   ⠭ 祢 ᨬ
  뢮 祭 ६.  ணࠬ, ᯮ 楤 -
 , 뢮 祭 ६,   뢠  뢥-
  䠩 (⮬  뢠 䠩-᪠), 稭  権, -
  祢묨 ᨬ.  뢮 祭 ⮬᪨
 ᢠ ਡ  ।஢:   室-
   祭, 梥 뢮  ..  ⠭ 
 㬮砭,    ணࠬ   . ண-
 ࠬ-।  짮⥫   뢥 -
 祭.  ६  ࠡ  ᯮ   筮 -
 :   ५  ६饭 , <INSERT> -
  ४祭 ० "⠢"/""  ..  ⮬ 
 ᥣ 室 ⮫쪮   ,   ࠧ襭 . -
  ࠧ   祭,  ᠬ ᪠  ⮬ ⠥
 㯭.
      砭 ࠡ । ६ ਬ 祭, -
 騥  ࠭,  訥  뢮, ᫨ 室  ।
 ந襫 ᫥   <ESC>.
       ࠡ । ஢ ᮮ⢥⢨ ⨯, 믮-
  㣨 ஢ન, ⠭ 짮⥫.  砥 訡
  㪮 ᨣ, 室  ।  ⮫쪮 ᫥
 ४⭮    <ESC>  ⮬ ࢮ砫쭮 ⠭-
  祭.  ᪫砥 ਭ⨥ ६묨 ࠢ -
 .   ᪮쪮 ० ࠡ,  ⠪ ⠭-
   㬮砭,    .
     ࠡ  ᫥騬 ⨯ TURBO PASCAL:
    - integer,
    - real,
    - string,
    - boolean.
 祬 integer, real ।⠢  ࠭  ଠ  䨪-
  ⮩, string ᪠ ᯮ짮  ⥪⮢ ᨬ-
   ⠡, boolean ।⢥  ࠭  뢮-
 ,  祭ﬨ true  false 뢠 ப ( ।
 짮⥫,   , ਬ: "TRUE"  "FALSE","祭"
  "몫祭", "⠭"  "", "ON"  "OFF"  ..)

#####################################################################
     III. ᫥⥫쭮 ⢨.
#####################################################################

#####################################################################
     A.  䠩-᪨.
#####################################################################
     1. ᯮ  ⥪⮢ ।, 騩 -
   ० "⠢"/"", ᮧ ⥪⮢ 䠩-.
     !  ᯮ ᨬ, ᠭ  ᯥ樠: "_"
 (ᨬ ન),"\" ( ᫥).
     ন ⮣ 䠩 㤥
 뢮  ࠭   ⮬᪨ ࣠  -
 ⢥饣 ࠧ, ⮬  ࠧ  ᮮ⢥⢮
 ० ࠡ  (   25 ப  80 ᨬ  
  ଠ쭮 ⥪⮢ ०  25  80 ), ࠢ-
 , ࠪ᪨  ࠧ ᪮쪮  ⮬,   -
 쭮 ࠡ 楤    ࠢ  -
  ࠭.
     2.  ० "" ⠭ 樨, 稭   㤥
 ந 뢮 祭, ᯮ  ⢥ 祢 ᨬ
  뢮 "_" (ᨬ ન). 뢠,   뢮
 祭 뢮 ,   ଠ쭮 ࠡ  
  㬥   ப , ⥫쭮,  ᨬ, ⫨-
   ஡. ᫨  뢮  ࠥ  ࠭ ᨬ 䠩
 -᪨, ⫨  ஡,  樨   ப  
 뢮,  㯭  ।஢.  ⨢ 砥 -
 㯭 ࠭⢮  ।஢ -  祢 ᨬ 
 ᫥饣 ᨬ, ⫨筮  ஡.  ⭮  -
 뢭 ᯮ짮  ᪨,   뢮  ࠭ -
 ⭮,    뢠  祭, ஥  ⮬
 ࠥ . ⠫ , 訥 㯭묨  ।-
 ஢,  ஡.
     3. ० "⠢" ⠭ 祢 ᨬ, 稭  -
  㤥 ந  梥 뢮  ࠭ ᨬ-
 . ᫥   ᫥ ஡.  ࠭  뢮 
 .
     \N - 室    䠩 梥   N  뢮 ᨬ-
 ,
     \ -   ⠭  ணࠬ 梥  뢮
 ᨬ,
     \\N - 室    䠩 梥   N  뢮 -
 ,
     \\ -   ⠭  ணࠬ 梥   N 
 뢮 䮭.

#####################################################################
     . 祭   ணࠬ.
#####################################################################
     1.  砫 ணࠬ,  ன    ࠭-
 ⭮ ।஢  " SHELLEDIT ",  " Uses
 Shelled; ", ⥬ ᠬ 㪠  ᯮ짮 譥 . 
 ஢  㪠,  室 䠩 Shelled.TPU
 (ᬮ 㪮⢮ 짮⥫ TURBO PASCAL).
     2.  ᮡ⢥ ணࠬ, ᯮ짮 ணࠬ -
   뢮 䠩-᪨ - MaskScrin, 뢥 䠩-  ࠭.
  ⢮   ᪮ , 㤠 , ᮧ-
   ।饬 饭  ணࠬ,  ਡ⮢ 
 祢 樨, 祭 " 㬮砭 ",  ⠭
   뢮,  ० ।, ⠭  -
   MaskScrin. ⮬, ᫨    ᪮ -
 뢭, 뢠    祭, ᯮ ணࠬ
 ⭮,  ६  饭  ,  -
 ࠭,  ᪨ ६.
     ᫥ 饭  楤 ࢮ 㤥   -
  祢   뢮.
     3. ᯮ ணࠬ   뢮 祭
 ६  ⥪:
     ६ ⨯ INTEGER - WriteI,
     ६ ⨯ REAL    - WriteR,
     ६ ⨯ BOOLEAN - WriteB,
     ६ ⨯ STRING  - WriteS,
     뢮 ⥪,.. ப  饩  ।஢ -
                               WriteT,
     뢮 祭   ६  饭ﬨ  -
      -
                               WriteD.
     祭  뢮, ᫥⥫쭮  祢 -
 樨  뢮 ᫥ ࠢ, ᫥ ⮣,   樨  ப
  ,   樨  ⮪ .
     ᫨ 室  ᫥⥫쭮 뢮, 㦭 -
 짮 ணࠬ SetPoint.
      뢮 ⠭ 祭 " 㬮砭" ਡ⮢ 
 ।஢,      楤:
    SetColor ( ᫥饩 뢮 ६ ⠭ 梥
    뢮),
    SetGoTo ( 뢥 ६ ⠭/᭨ -
  室  ᫥饩 樨  砭 ।஢
 ; ᫨  祭  﫮, ।  -
 ),
     SetInterval ( 뢥 ६ ⠭ ⨬
 ࢠ 祭, ஢  ।஢),
     SetMayChandg ( 뢥 ६ ⠭/᭨
   祭   ।஢;  室  -
  樨  । , ᫨ ⠭ 
   祭).
     SetMustChandg ( 뢥 ६ ⠭/᭨
 室  祭  ।஢;  室 
  樨, ᫨ ⠭ 室  祭,
 室  ।  ⮫쪮 ᫥  ⮣ 祭
   <ESC>).
     SetPoz ( 뢮 ᫥饩 ६ ⠭  -
 㯭 樨),
     SetQuit( 뢥 ६ ⠭/᭨ -
  室  ணࠬ ।஢  砥 
 祭 ,  ⮬, ᫨ 室 室 ⠭, 楤-
  EditScrin  砭 ।஢ ६ 蠥 ࠡ-
 ,  ࠬ EXITSYMBOL 頥 'Q'; ᫨  祭  -
 﫮, ।  ਡ).
      ⠭   楤  Connect(⭮  뢥-
  ६) ⮫쪮  祭,    ਭ -
 ६,   ᯨ᪠   ⢫ 롮  ।-
 ஢, .. ⠭ 塞 ⨯. ᯮ 楤
 SetMayConnect (⭮  뢥 ६)  ⠭/
    ᯨ᪠ 짮⥫  ।஢-
 .
     맢 楤 ConnectHelp (⭮  뢥 ६-
 ),   ப ᪠, 뢮  ।஢-
  ६. 뢮 易⥫쭮   樠஢ -
 ன HelpSit (⭮  ᥬ ᪠)  맮 ।,
  । 梥 ᨬ ப ᪠,  ࠧ饭.
     4.। 맮 ।   ०  ࠡ,
 ⠭  㬮砭  ६ 뢮 ᪨  ࠭.
     InsertEdit - ⠭ ० ⠢/  ।
 (  ।஢ -  <INSERT>).
     TimeInterrupt - ⠭ 室  楤 ।஢
 १ ஬⮪ ६. ᫨ 室 ⠭  짮⥫ 
  ଠ, १  ࢠ ந室 室  -
 ,  ⮬ 楤 EditScrin  ࠬ EXITSYMBOL -
 頥 'T'.
     EnterInterrupt - ࠧ蠥/頥 뢠 ।஢
  ⨨ <ENTER>. ᫨ 뢠 ࠧ襭, ᫥ 
 <ENTER> 楤  EditScrin 蠥 ࠡ , ࠬ
 EXITSYMBOL 頥 'R'.
     EditSelect - ⠭ 梥 뤥 ।㥬 樨.
     5.᫨   ⮫쪮 뢥 祭    , -
   뢠, ᫨    , ᫥ 
  祢 権 맮 ணࠬ-।  EditScrin.
     । 맮 ।   । न -
 樨,  ।஢ ன 室  (室 ࠬ
 EditScrin STROKA,NOMBER).  ⮬   ⠭ न
 樨,  ᠬ ᠫ  㯭  ।஢.
 室  ।,  㦥  ᬮ ३   ୮.
      砭 ࠡ ६ ਭ 祭, 騥 
 , ஬ 室  ० ।஢  ⨨ 
 <ESC>,  ⮬ 砥 ६ ਭ 祭, 訥 
 뢮 楤ࠬ .
     室  । ⢫  ⨨ :
 <ESC>,<F1>,<F2>,<F3>,<F4>,<F5>,<F6>,<F7>,<F8>,<F9>,<F10>,<PgUp>,
 <PgDn>, , ᫨  ࠧ襭   楤 EnterInterrupt,
 <RETURN>.
    ᯮ짮 㭪樮  , ஠-
 ஢ EXITSYMBOL -  室 ணࠬ EditScrin, 易 
 蠬 । ᫥⥫쭮 ⢨.  
 ᯮ    室 (室 ࠬ EditScrin -
 STROKA, NOMER), ⭥   ⭮ ६. ᫨  
 㤮⢮ ⠪ ⢮ ,   ࠧࠡ稪.
       ﭨ   室, ⮬ 
 ᤥ   짮⥫ 室  ணࠬ, ࠡ
  室   室  ணࠬ.  ⮣ 筮 
  ࠬ  묨 ந襫 室 -  室, 
 ப  祢 ᨬ    ப - STROKA, NOMER, 짮-
   ஬⪠  饭ﬨ  । 楤ன WriteD
 (! 뢮     ⮫쪮 ᫥  -
 樨 楤ன 뢮 । ⨯:WriteI, WriteR, WriteB,
 WriteS,  WriteT).
      EditScrin ஢ ᮮ⢥⢨ ⨯,  訡
 ,  砥 訡  㪮 ᨣ. 室  ண-
 ࠬ  ⮬ 砥   ᫥ ४⭮ , 
 ᫥   <ESC>.
      ᫨   ࠡ  । 뢮 室 
 , 뢥  ࠭,    ᪨
 ६, ᮧ  饭  ணࠬ MaskScrin, -
  楤ன RefreshMaskScrin.
      ஢   ६, ᠭ  易⥫  -
 , 뫨    न ࢮ ,
 ᫨ ⠪ ,    楤 GetMustChandg.
     ᫥ 饭  楤 ࢮ 㤥   -
  祢   뢮.
     6.᫨  , ⮡ ६  ਭ﫨 祭, -
 訥  뢮 ६ 楤ࠬ , ਬ,  -
 ᪮ 訡  ।஢ ,   ᤥ,
 맢 ணࠬ ESCEdit.
     ᫥ 饭  楤 ࢮ 㤥  㤥 
  祢   뢮.
     7.᫨  ணࠬ ᠬ ࠧ頥   ᪮ -
 ,   室 ᨬ쭮 ᢮ ࠭⢮, 
 砭 ।஢ ᯮ 楤ன DeleteMaskScrin,
     ᮧ .
     ६  ୥ ࠭  ﭨ, 襥  -
   MaskScrin.
     ! ᫥ ⮣   ᬮ ࠡ  楤ࠬ -
    饭  MaskScrin, ..  ଠ 㤥 -
 ﭠ. ६, ⢥, ࠭ 祭, ⠭ 
 ।஢.
    8.᫥ ࠡ EditScrin  ⠭ ,   ⮣
 ⮡ ⠭ , 맮 ணࠬ CursorSize.

#####################################################################
     . 㪮⢮ 짮⥫ ।.
#####################################################################
     :
 ""/""
       ⨨ <INSERT>;
   ࠡ । ࠧ  ᨣ  ०
      ⨯ ।㥬 ६:
   - 塞 ⨯, ᯮ  롮 <+>, <->,
     , ᫨  ࠧ襭 楤ன EnterInterrupt,  <ENTER>,
  ଠ - ० ⠢,ᯮ
    <+> -    ஬   ᫥ (ᯮ 
      㢥祭 ᫠),
    <-> -    ஬   । (ᯮ 
      㬥襭 ᫠),
    <DEL> - 㤠 ᨬ  ஬,
    <BEACKSPEICE> - 㤠 ᨬ ᫥  ;
    <HOME> - ६    㯭 ;
    <END> - ६   ᫥ 㯭 ;
  । - ० 
    <DEL> - ⥪饥 祭  㤠,
    <BEACKSPEICE> - 㤠 ᨬ ᫥  ;
    <HOME> - ६   ࢮ ६;
    <END> - ६   ᫥ ६;
  让 - 塞 ⨯,   ᯨ᪠ ୠ-
    ⨢ 祭, ᯮ  롮 <+>, <->, , ᫨ ࠧ-
    襭 楤ன EnterInterrupt, <ENTER>,   -
    <DEL> - ⥪饥 祭  㤠,
    <BEACKSPEICE> - 㤠 ᨬ ᫥  ;
    ६饭 , 室  㣮 ६ ᯮ
  ࠢ ஬.
    砭 ࠡ ६ ਭ 祭, 騥  ,
 ஬ 室  ० ।஢  ⨨  <ESC>, 
 ⮬ 砥  ਭ 祭, 訥  뢮 楤ࠬ
 .
   ⢨, ९  㭪樮묨 蠬, ।
 ணࠬ⮬, ᯮ騬 .
#####################################################################
     IV. ਡ ६  ।஢.
#####################################################################
     MUSTEXIT - । 室 室  ணࠬ -
 ஢  砥  祭  ६:
     true  -  室,
     false -   室;
     MUSTGOTO - । 室 室  ᫥饩 樨
  砭 ।஢ ६,
     true  -  室,
     false -   室;
     MUSTCHANDG - । 室  祭  -
 :
     true  -  室 ,
     false -  室  ;
     CHANDG - ।, 﫮  祭 ६  -
 ஢,
     true  -  﫮,
     false -   﫮;
     MAYCHANDG - ।   祭  ६-
 ,
     true  -   ,
     false -   ;
     INTERVAL - ।   祭  ६
 ⮫쪮  ࢠ,
     true  -   室  ࢠ,
     false -    室  ࢠ;
     MAYCONNECT -  塞 ⨯ ।  -
  ᯨ᪠  祭  ६;
     true  -   ,
     false -   ;
     STROKA -  ப,  ᫠  祢   -
 ,  ன 室  뢮 ६;
     NOMBER -   ப,  ᫠  祢  
 뢮,  ன 室  뢮 ६;
     GOTOSTROKA -  ப  ᫠  祢  
 뢮,  ।஢ 樨, ன 室 ३;
     GOTONOMBER -   ப,  ᫠  祢 
  뢮,  ।஢ 樨  ன 室 ३.
     POZSTROKA -  ப,  ன 室  뢮
 ६, ⭮⥫쭮 ⥪饣 ,  ஥ 뢥 䠩-᪠,
     POZN - ࢠ 㯭 , ⭮⥫쭮   ⥪-
 饣 ,
     POZK - ᫥ 㯭 , ⭮⥫쭮  
 ⥪饣 ,
     COLORTEXT - 梥 ᨬ,
     COLORBACKGROUND - 梥 䮭,
     HELP - ப ᪠,
     MIN - 쭮  祭,
     MAX - ᨬ쭮  祭,
     TYPE - ⨯ 뢮 ६.

#####################################################################
     VI. ⠭ ਡ⮢ ६.
#####################################################################
 ********************************************************************
 *                 *  祭 ਡ,      *                *
 *     ਡ     *  ⠭         * 楤,           *
 *                 *   㬮砭  뢮 *  祭 *
 *                 *  ६ 楤ࠬ: * ਡ            *
 *                 *  WriteI, WriteR, WriteB, *                     *
 *                 *    WriteS,  WriteT    *                     *
 ********************************************************************
 *       1         *           2              *         3           *
 ********************************************************************
 * MUSTEXIT        *  false                   * SetQuit             *
 * MUSTGOTO        *  false                   * SetGoTo             *
 * MUSTCHANDG      *  false                   * SetMustChandg       *
 * CHANDG          *  false                   * EditScrin           *
 * MAYCHANDG       *  true ( ⥪-false) * SetMustChandg       *
 * INTERVAL        *  false                   * SetInterval         *
 * MAYCONNECT      *  false                   * SetMayConnect       *
 ********************************************************************
 * STROKA          *  (1)                     *       *
 * NOMBER          *  (2)                     *       *
 * GOTOSTROKA      *   ⠭      * SetGoTo             *
 * GOTONOMBER      *   ⠭      * SetGoTo             *
 * POZSTROKA       *  (3)                     *       *
 * POZN            *  (4)                     * SetPoz              *
 * POZK            *  (5)                     * SetPoz              *
 * COLORTEXT       *  (6)                     * SetColor            *
 * COLORBACKGROUND *  (7)                     * SetColor            *
 * HELP            *   ⠭      * ConnectHelp         *
 * MIN             *   ⠭      * SetInterval         *
 * MAX             *   ⠭      * SetInterval         *
 * TYPE            *  (8)                     *       *
 ********************************************************************
   (1),(2) STROKA,NOMBER - 㭨  ६ ⭮⥫쭮
 祢 権  뢮, ⠭ 楤ன MaskScrin,
 ᯮ ᥬ ணࠬ,  뢮  .
   (3),(4),(5) POZSTROKA,POZN,POZK - । ᯮ 権,
 ࠧ襭  뢮  㯭  ।஢, ⠭-
  楤ன MaskScrin,  뢮  .
   (6),(7) COLORTEXT,COLORBACKGROUND - । 梥  뢮
 祭  ࠭ , ⠭ 楤ன MaskScrin,
  뢮  .
   (8) TYPE - ⨯ ६, ⠭ ⮬᪨ 
 뢮.
    ਡ   㬥襭 ਮ:
     MAYCHANDG
     MAYCONNECT    INTERVAL
     MUSTCHANDG
     MUSTEXIT
     MUSTGOTO
    稥   ।  室  MUSTGOTO 
 ।஢ ६   ⠭ MAYCHANDG = false.

#####################################################################
     VII. ⠭ ० ।.
#####################################################################
 ********************************************************************
 *                         *  祭,           *            *
 *     ०               *  ⠭     * 楤,       *
 *                         *   㬮砭        *       *
 *                         *   뢮          * ०           *
 *                         *  ᪨  ࠭      *                 *
 ********************************************************************
 *       1                 *           2          *         3       *
 ********************************************************************
 * ""/""      *  ""            * InsertEdit  (1) *
 ********************************************************************
 *         *  true                * EnterInterrupt  *
 *   <RETURN>  *                      *                 *
 ********************************************************************
 *         *  false               * TimeInterrupt   *
 *   *                      *                 *
 ********************************************************************
 *    *  true                * SoundEdit       *
 *  ᨣ         *                      *                 *
 *       訡,         *  2000                *                 *
 *  ᨣ         *                      *                 *
 *       ⢥ত,  *  100                 *                 *
 * த⥫쭮       *                      *                 *
 *       ᨣ,        *  100                 *                 *
 ********************************************************************
 *   *  false               * EditSelect      *
 *                  *                      *                 *
 *  梥 ᨬ      *  15                  *                 *
 *  梥 䮭          *  0                   *                 *
 * 栭 ᨬ       *  false               *                 *
 ********************************************************************
 *    *  false               * HelpSit         *
 * ப                  *   ⠭  *                 *
 * ࢠ           *   ⠭  *                 *
 * ⢮ 㯭    *   ⠭  *                 *
 *       権           *                      *                 *
 *  梥⮢ 뢮       *   ⠭  *                 *
 ********************************************************************
 (1) ४祭 ० ""/""   ।஢
 ந室 ᫥  <INSERT>.

#####################################################################
     楤, 騥  ᨨ 2.0, 騥  2.1.
#####################################################################

     Connect,
     SetMayConnect,
     RefreshMaskScrin

#####################################################################
     楤, 騥  ᨨ 2.1, 騥  2.5.
#####################################################################

     EnterInterrupt,
     ConnectHelp
     HelpSit,
     SetGoTo,
     SetInterval,
     SetMustChandg,
     SetQuit,
     TimeInterrupt,
     DeleteMaskScrin,
     WriteD.

#####################################################################
     ⨥ ⥬, 㥬  ᨨ 3.0   .
#####################################################################
 -   ﬨ .
 -   ﬨ ࠭.
 - 20..30 % 㢥祭 ᪮ ࠡ.
 - ᠭ ਡ⮢ ६  䠩.
 -   䠩-᮪   䠩.
 -  ࠧ饭 䠩-᮪  㧮筮 㫥
   (䠩, ᮤঠ饬 ணࠬ).
 -  ࠭, ନ஢ 㬥⮢  ਭ.
 -   .
 -  HELP.
 -  室 ⥪⮢.
 -  ८। 祢 ᨬ.
 - ⮬᪮ ᯮ , ᬥ ०  ࠡ.
 -  UNDO, REDO.
 -  ࠧ饭 ।  ૥.
 -  ᮢ⨬  ࠭ ﬨ.
 - ࠡ⪠ 㣨  ⨯ TURBO PASCAL.
