                 9.  2 -  


              ᫥  襭  㦤  ᭮  ।⠢
         ଠ樨  ᮡ⢥ ⥪⮢  ०    ।饩
         ,   ३      ᬮ७  ᮡ⥩  ࠡ  
         ᪮ ०.
                ᫥  㤨  ᫮  ।   "設
         䨪".   ᥡ 䨪 -  ;   
         ᫮  孨᪨ ᯥ⠬, ⠪  梥⮢
         ,  ᫥ ०  ࠭ ࠧ ᮤন
         ࠭.  ᫮, ᯥ .   ࠬ  
            㤥 㣫㡫  ⠫. ᫨   ७
         室 ᯮ짮 ᪮ ०  IBM/PC    
         祭  ᭮  ।,    ᫥  த ⥭. 
         ⨢ 砥, ਠ 饩    饭.
               ᪠  ࠭   IBM/PC,
           ⠪      ᮢ⨬       (᫥
         ।  믮 ந쭮 ணࠬ, 
         ⮬  ᫥    ᪮, ᠭ  IBM/PC). ᫨ 
           , ᯮ 樮 ⥬ MS-DOS,
          設⢮  㦤  筥.

              9.1. ᭮ 設 䨪

                ᭮ ᯮᮡ ନ஢ ᪨
         ࠦ  .  㤫    
         (࠭)                   -
         ।⠢, 業  , ஫  . ( 
         ⮬       ,    ᫥      㢨
         ᮡ⢥묨 .)
                ᯮᮡ  ᭮뢠      ୮,  
         ஢  (筮,  ᥫ쭮)   ਭ樯   ନ஢
         ࠦ,   㥬  ୮  ᥫ쭮
         䨪. 䨪 IBM/PC -    ᥫ쭠  䨪;  
         ⮬  䨪  㤥 ᭮ .
              (ନ  "",  ,  㦥  ᯮ짮  
         ᬮ७ 뢠.   砫  設 ᫮,
         ᮤঠ  ணࠬ, 믮饩 ࠡ 뢠;
           "஬"  १ אַ.   ࢠ,  
              ନ      ⥬᪨
         ࠫ,  묨   㤥  ᮯਪ.  
            ନ  ᬥ訢).
               ஥ ࠦ  ࠭ ᯫ  ।⢠
         ୮  䨪  ᯮ ⮫쪮 .  ⮬ 砥
         設 ணࠬ ᯥ  ࠩ 窨 אַ,  
         ᮡ⢥ ᯫ "஢"   .
              ᫨   ࠭ ᯫ -   ⥫
         ਥ     ନ -   砥 ஢
         ᪠஢  ஭   ,   騩   ࠦ
         ६頥    ⠭⭮  蠡, ࠧ㥬 ப
         ࠧ⪨,  騬    ࠭.     砥   ᯫ,
         ࠡ饣     ਭ樯  ୮  䨪,  ६饭
         ஭    ⢫      ,   饩
               묨  窠.  ࠬ ⥬
         ୮   ᪠஢,  ६饭   ஭   
         ⢫      砥  ࠥਨ,  
          ࠧ  ᥣ ⠭ 蠡.
              ୠ    䨪        冷   ⢥
         २ -    ᮪  ⪮,    筮,  
         ⠪  ࠢ⥫쭮 ᮪ த⢨.    
         䥪⨢      ୮  䨪,      ⠪   
         ஥  ᮡ ᫮   ᪨ ᯫ.
          ୮-᪨  ⥬  ᯮ    
         稢    (  ࠦ,     
         ।⠢   ᮢ㯭 ⪨ १).  ࠬ
         ⮩  ⥬  뢠    ࠦ
         梥⮬ ᫮ .  ᨫ쭮 㦠    
         ਬ.
                ᭮  ஢  ᥫ쭮 䨪  㣮
         ਭ樯. ࠭ ᯫ    ࠧ    אַ㣮
         ,          ⢠   砩   ⮢
         ࠦ, 뢠 ⠪ ᥫﬨ    .  
         ᥫ      ᢮⢮   ᢥ⨬.     ࠧ
         ࠦ ᨭ⥧  ⢠ ⤥ 祪.
                ᥫ    ﭨ      ⥫쭮
         뢠 ⠪ ࠧ,  ⮡  ஬⪨    
         ⢮.  ᫨  㯯  ᬥ  ᥫ  室  
         㦤 ﭨ (.. ᢥ),   ਭ
               ᮢ㯭 ⤥ 祪,   ᯫ譮
         ⮪. ᫨  窨 뫨  筮  ,      ⨯
         ᯫ    ஢     ⪮ 
         筮,  ,    設⢠  ஢  ᯫ  
         ⥫ ⠢  襣.
                ਭ樯,    ⥬  設   䨪   
         ᯥ  ந  梥,  ,  ᥣ, 梥
         樨  ஢ 䨪.  -  ᪨ (  
         ⢥)   㬥         ॢ室⢠  ⥬
         ஢ 䨪  ⥬ ୮ 䨪  ஢ 
           .  ᮡ ந ᯫ, אַ-
         ਢ 孮  梥    ஢  䨪
           ।⥫쭥  ୮  (᪫祭  ⠢
         ᯥ樠 ਫ, ਬ, 孨᪨ ⥦).
                 ᫥  ᯥ.    ⫨稥    ⥬ ୮
         䨪,     ࠦ         
         ᫥⥫쭮      (       
           ), ⥬   ஢   䨪   ᪠
         ᯮ짮  ࠭    ࠧ ࠭ ( 
          㦥 ᬠਢ ਬ⥫쭮   ⥪⮢  ࠧ).  
           IBM/PC       c⥬ ஢
         (ᥫ쭮)   䨪;   ࠢ   ᮬ   ஥
         ࠦ     ࠭  ᯫ  ⢫    
         ࠭  ࠧ  ࠭.     २⢠   ᯫ   
         ࠭묨   ࠧ  ࠭  ࠭    ஢
         ᯫ  IBM/PC -    । ᯮᮡ  
         뢠      ⮡ࠦ  ।⢥ 
          ᯫ.

              9.2. ⨥  ⮡ࠦ (ᥫ)

                    ᪠饣    ࠭ ᯫ
         ᢥ稢       ᥫ.  (  ࠩ    
         ᥫ,    室      ࠭;  
         ⮬,  ᪠騩  室    ।    
         ࠭,  ⠪ 뢠 "஢" .   
         ᮤন ᥫ, ,     ⠭ 梥.
           몥  ᨪ    ⮣ 㦨 ࠬ ࠭ 
         COLOR  ();  ஬  ⮣,      㭪権  㦨
         BIOS-      ᯮ짮  ⠭ ஢
         梥).
              ,    ⥪⮢  ०  ࠭  ᮭ쭮
           IBM/PC  ⮨    25  ਧ⠫ ⥪⮢
         ப;    ਠ  ।饩  ,  易   
         ᠭ  ,  ⭮  ⠪,       ᨬ
         梥⭮    ᪮    ᯫ     室     ᥬ
         ਧ⠫   ப   ࠧ⪨.      ᫥,   
         ⨪ ࠧ 饣 ᥫ쭮  IBM/PC ࠢ  200
         ப (825).
              ਧ⠫    ࠧ    ᥫ쭮        
         ஢.    ࠧ        ꥬ   ,
         ॡ㥬    ࠢ  ᥫﬨ,    ⠪   稭
         ᥫ (窨), ᢥ稢  ⮬      ᪮
         .
                IBM/PC      ࠧ  ਧ⠫
         ଠ  (ࠧ)  ᥫ쭮   ,   ⠭   
         ᨬ     ॡ㥬  ࠧ  (,  ᫥⥫쭮,  
         ⢠)  ᥫ().  ० । ࠧ襭 ਭ
         ࠭ ⠢ 320 祪,   ०  ᮪  ࠧ襭
         - 640  祪. (  IBM/PC  ᪠ ⠪ 
         ࠡ    ०    ࠧ襭,  ,    ०
         ࠪ᪨    ᯮ.    ०   ࠧ襭
         孮 ࠭  ।⠢        160100
         ᥫ.        梥⭮   ᪮   
         ন ०   ࠧ襭,  ,  ணࠬ
         প  ஢ BIOS- ).
                ࠧ,  ᪨  ०  । ࠧ襭
         ।ᬠਢ 稥 320 祪  ਧ⠫ ࠭  200
         祪  ⨪,   ६  ᪨ ० ᮪
         ࠧ襭  -  640  祪    ਧ⠫    200  祪  
         ⨪.  ⭮,  ࠦ, ।⠢  ०
         ᮪ ࠧ襭,  ᯮᮡ  ந    
         ⠫  ⮫쪮    ਧ⠫.    設⢠ ਫ
         ⢮ ࠦ ࠪ᪨ ⠫  , ᫨
          ० ᮪ ࠧ襭 ࠦ ࠬࠬ 320400.
               ᥫ  ࠭ ᯫ  室  
         ⨢ (ᢥ⨬),   ᨢ ﭨ;    ०
         । ࠧ襭   ந  梥.  ०
         ᮪ ࠧ襭 梥   ந,    -
         ᮡ⥩  樨 ࠦ,  - ⢨
         ⥫쭮 , 室  ந 梥.
              ᬮਬ    ॡ        ,   ।塞
         ᪨   ०   ᮪  ࠧ襭.  ᫨    
         ᢥ,  ᮮ頥    ᥫ,  ⭮  ⮫쪮 ਧ
         ⨢    ᨢ  ﭨ (稥  ⢨
         ᢥ⨬  ᥫ),     ᮮ頥  ᥫ, 
           ࠢ ᥫ 筮  , ਭ饣
         祭  0    1.    ०  ᮪  ࠧ襭 
         640200  (  128000) ᥫ.  ࠢ  ॡ
         128000  ,      ⮬  ⮣,    ⮨  쬨
         ⮢,  -  16000  .  ⠪  뤥 梥⭮
         ᪮  (㣫  16).
               । ࠧ襭 ॡ   襣  ᫠
         ᥫ.      16      뤥 
          ᥫ  .      ⮢    
         ।⠢    ࠧ 稭 (0, 1, 2, 3);  
           筮  ஡ ந  梥.
              ०, 祬     ⥫  ࠧ襭
         ஡  ந 梥  ᪮ ०, ⨬
            ⫨稥    ᯥ䨪  ᯮ짮  
         ᯫ    ᪮    ⥪⮢  ०.  ।饩
           ⭮  稨  ⥪⮢ ०  -  80-
         樮    40-樮.  䨪 ।⠢ ⠪
           ०:  ०  ।  ࠧ襭      ०
         ᮪  ࠧ襭.        ᫮  ⮡ࠦ
         ⮢  ०   ॢ蠥  ᫮  ⮡ࠦ
         ⮢   㣮   ०.   ⢥⢥    
         ॡ, ।塞  .   ⮬  室⢮  
           稢.  ᫨   ⥪⮢ ० ⥫쭠
           ᯮ    㢥祭  ᫠  ࠭,    
         ᪮  ०  ⥫쭠    ᯮ 
         㤢 ꥬ , ⢮   ᥫ.
               裡  ᯥ䨪  ࠢ  梥⮬    
         IBM/PC              ⢥   ६
         ᯮ㥬 梥⮢.  ⭮  ᪨      ࠭
           ᯮᮡ  ந     ⭠
          梥⮢      ᥫ.      
         ஡. ஡   ᯥ䨪樨 梥.
              ଠ   IBM           ᮧ  梥⭮
         ᪮  ,  饣   筮      
         ।⠢     梥⮢  ᥫ, 
          ⮣  ᤥ.    㦥  ਫ  ,    ०
         ᮪  ࠧ襭    ᥫ  ⢮ ⮫쪮 
         ,  ⮬      ਭ樯      ⮬   ०   
         ந    梥⮢ -   ୮.  ०
         ।  ࠧ襭    ᥫ  ⢮    ,
         ⮬  ந  梥⮢.
              ஡ 롮 ⮣     ,  饣  
           梥⮢,  襭 筮  㬭.   
         ६  ⨢  ⮫쪮     梥,      짮⥫
         ।⠢     ⠭      
         梥⮢  ᢮ ᬮ७. ⠫  ⠭  
         ࠬ  ⠪  뢠 .  ⢥ 樨 ଠ
         IBM ।⠢  롮       -  ࢠ
         ⮨    , ᭮  筥 ( 設⢥
         ᯫ ந  ),    -    樠,
           .
              ᫨     筮  㡥⥫쭮,  
         ᬮਬ       㣮 ஭.   梥
          ᥫ  ०  ।  ࠧ襭    ᯮ㥬
             0, 1, 2, 3.  ⮨  ⨬ ᫠?
         祣  ⪮  䨪஢.       ।   
          ᯥ䨪樨 ᯮ㥬 梥.   ९
           0     16  梥⮢.      1-3  ଠ  IBM
         ।    ⠭    (  ),  
         짮⥫    ,            㤥
         ᯮ짮. ⨬ ,  짮⥫   
          ⠢ .
                  ࠧ  ᫨  ந室饥. ᫨  ꥬ
           筮 ,            
         ᥫ    ᯮ짮         梥⮢   (16).   
         ⢨⥫쭮 ꥬ  ⠪,     ०  ᮪
         ࠧ襭  梥⮢    ᥫ ⮨ ⮫쪮 
          梥⮢,    ०  ।  ࠧ襭  -  ⮫쪮  
         .  짮⥫        ।⠢  
         ப    롮  梥,      ⮬
          ࠧࠡ稪 ᮭ쭮   諨.
                ०   ᮪   ࠧ襭   짮⥫   襭
           롨   梥 ( 梥)  ᢮
         ᬮ७; ⨬ 梥⠬   ⮫쪮   . 
         ०   ।  ࠧ襭  짮⥫    
         ᢮ 롮 梥⮢ .    梥⮢    梥
         ⠭   짮⥫  ந쭮.  ⠫  
         梥  ⠭    ࠬ           ண
         䨪஢ .
                ࠧ,    梥⭮  ᯫ    ᪮
         ०  ᯮ짮  梥, 祬   梥
         롨    1 (, , 筥), 
           2 (樠, , ).
              ᫨  梥⭮ ᯫ 室  ᪮ ०, 
         梥  ᥫ (  ⠢      梥⮢)
           ਬ  ⥬    ᮤন    ⮢,
         뢠  ᥫ.      
         ࠧ  梥  ᥣ  ࠦ;    ⮣  ᫥:  
          ,   梥 0,      
         㣮.     ᮡ⢥  ࠦ (⨭) 
         ,        梥().  (  ᪮
         ०    ࠧ襭  ।ᬮ७  筮 ⮢,
         ⮡  ᥫ  ந   16  
         梥⮢.   ࠧ襭    ॠ
           襬  ;  ⭠  প  ⮣   ०
         ॠ .  ணࠬ প  ஢
         BIOS-  . ᫨  㭪樨  ணࠬ  BIOS
         쬥   ᥡ ணࠬ 짮⥫,  ᪨ ०
          ࠧ襭 㤥 㭪樮஢).

              9.3. ⮡ࠦ ᥫ  ࠭

              ᪨  ०  ࠡ  ।⠢ ᮡ
          ᫮ ०. ᫨ ᯮ짮 楤 BIOS-,
         ਥ஢   㦨 ᪮ ० (ᠭ
           ࠣ 8.9),  ஢ ࠧ ࠭ 믮
         ⮬᪨.     稭  ப ᯮ짮.
             ,   室 ᯮ짮 ० אַ
         ࠢ,   ᫥   ⠫쭮      ਠ
         饣 ࠣ.
                筮  ⥫,    
         ࠦ   室.  ࢮ 室 ஭ 
         ६頥  ⮫쪮   ப ࠧ⪨; ᫥ ⮣
         ( ⭮ 室 ) ᪠   ப.
                ࠡ    ⥪⮢  ०    ⥫⢮ 
               ਭ,   ᪮   㭪樨   ࠢ
         ନ஢   ࠦ    믮  ஫
         .      ᪮   ०      ᮡ
         室 뢠.
              ஭ 奬 樨  ࠦ    ᪮
         ०   ਭ ⮪ ⮢, । ᥫ,
         祬 ਭ   ⮬ 浪,   ஬  ᪠騩
           ६頥    ࠭ - ᭠砫  ,  ⥬ 
          ப.  ⮩ 稭 ࠧ ࠭ ࠭   
         ⮬ ,  㤮  祫-    ணࠬ;
           ࠭ ࠧ ⢥砥 ॡ ஭
         奬 樨.  . 9.1 ந  .
                ⮣,  ⮡    ࠭  ࠧ   ࠭
         ᮮ⢥⢮ 堭 ᪠஢ ࠭,  ᯫ
         ࣠    , ᬥ饭묨  ⭮⥫쭮
         㣠    4.      ᮤন  ଠ  ᥫ
          ப,  ன    -   ᥫ    ப.
         ᬮਬ      ஡ (ᯮ  ⢥
         ਬ 䨪  ᮪ ࠧ襭).
               砫    ()    ᯮ  ,
         ࠢ騥  ᮬ  ⮡ࠦ   ࠭ ᯫ ࢮ
         ப, .. ப  ஬ 0. ப ᮤন 640 ᥫ
         (᪨  ०   ᮪ ࠧ襭),   ᥫ
         ॡ  樨 ᢮ ﭨ 1 .   ࠧ,
           ࠢ  ࢮ  ப  ॡ  640 ⮢  80
         ⮢.  ࠢ ᫥饩 ⭮  ப  (ப  
         ஬  2)  ⠪  ॡ  640 ⮢  80 ⮢  ..
            ࠢ 窮 ࠭ ᯫ, 室饩
           祭  㫥  ப    㫥  ⮫ (0,0),
         ᫥騩  ࠢ 窮 (0,1)  .. ᫥  窮
         ࢮ  ப    窠  (0,639);  ᫥   
         窠 (2,0)  ..      殢    ,  ࠭騩
           ப,  뢠  ௠,    ,
         ⭮  1,  稭    ,  ࠭騩   
         ப.
               ᪮ ०   ।  ࠧ襭  
         ࣠   筮   ⠪,      ⮩    ࠧ楩,  
         ਧ⠫쭠 न ࠭  ⮨    320  ᥫ,
         祬   ᥫ ।⠢  ⠬, 騬
         ।⠢  梥⮢  樨.   ।⠢  ப
         -०    ॡ   80   ⮢;      ।⠢
         ᯮ   :  -  ,  㣮  -
           ப.
              ⨬  ,      㤥  
         ⥬    ० ।, ⠪      ०  ᮪
         ࠧ襭.        砥 ᫮ ᥫ  
         (    襬   ⢥   ⮢,   ⢥   
         ।⠢    ᥫ),     㣮  砥  
           (ᮮ⢥⢥,  ⢮  ⮢,  ⢥  
         ।⠢  ᥫ      ࠧ  ).    室
          ࠭ ﭭ  ப   ०
         -   640   ⮢    80  ⮢.  ணࠬ,  ਢ  
         ਫ (⨭  9.1),      짮⥫,
         ணࠬ騬      ᪠,  䥪⨢  ࠢ  
         ᥫ.        ணࠬ    ⢫     室
         䬥᪨ ८ࠧ, 易  ⮬ 樨
         ᥫ    ࠭  ᯫ         ,   ࠭饩
         ஢  ࠧ ࠭,  짮⥫  ⨭
         ࠡ  ᫥ ᬥ饭 ⮢  ⮢.
              䥪⨢       楤   ⠭   ᮡ
         祢,     ॡ   ᮧ   த騥
         ணࠬ 樨 ࠦ.  ணࠬ, ⭮
          㪠 ,  ⥬   ᯮᮡ  ॢ
         ᥫ    ⨢  ﭨ  (ﭨ  ᢥ⨬)  
         ᨢ    .          ᯮ
         㭪樨  㦨  BIOS-, ᠭ   ।饩   
         ᫥ ,  㯮 ᪠-楤  (⨭
         9.1).  ᮪  த⢨ ணࠬ 樨 ࠦ
         ।,       ࠣ  㤥  㦥  
           ᪮    ࠧ  楫,      㤥
         ନ஢ ⭮.      ⮣  室  ந
           ࠦ      ப, ᫥
         祣  ᯥ    ࠧ饭    ᮮ⢥   
         .    ⥫⢮  ᨫ쭮  ᫮ 
         ன 樨 ࠦ.
              襭  ன 樨 ࠦ   
         ॡ⥩      ਭ ஬ᮢ.   
         室  ⮨    ࠧ   ࠦ      ⪨,
         頥       ( ᥫ  ० ।
         ࠧ襭  ᥬ ᥫ  ० ᮪ ࠧ襭).
         ਭ  ⠪ 奬,  ⢫ 㧪 ࠣ⮢ 
          ᪮  ⭮.   ⮤ 
         १  ᭨  ᫨⥫  ,   ⨢ 砥,
         ணࠬ   믮    権  㫨஢
         ⠬,   ⠪,   ਬ,     ᤢ,  ᪨  "",
         ᪨ ""  ..    ⠬  蠥  ᪮
         樨  ࠧ ਡ⥫쭮   ࠧ,  ᫮, 
         ᮡ⢥ ࠧ 㦥 ஥.
                  㣮,      ᯮᮡ  襭
         ᪮   樨   ࠦ.         ⮨  
         ᯮ짮 ⥪⮢ 䨪 (ᥢ䨪),  뢠
          ᫥饬 ࠣ.

              9.4.   ।⠢  ⥪  (ᨬ)    ᪮
         ०.

              ⮡ࠦ  ᨬ   ࠭ ᯫ  ।⠢
         ᮡ 㤠,  ᫨    ࠡ⠥    ᪮
         ०.         ⮬  砥  ।⠢    
         ᮢ㯭 ᥫ,    ᫨      뫨  ᪨
         ꥪ, 騥 ᮢ (稢).
               䨪樨 奬 稢 ᨬ    ᪮
         ०  ਭ  ᯥ樠  ᮣ襭. 頤, 
         ᨬ,  ।⠢          ࠧ஬   88
         ᥫ.  ਭ  ਭ樯 ஢  ਭ樯 祢.
          ந  ⠭  (㭪)  ᨬ  ⢮
         ᥬ   ⮢.  ᥬ   ⮢        ࠢ
         ﭨ  쬨  ᥫ    ப  㭪  ᨬ
         (㬥  ᥫ    ᫥ ࠢ). । 
         뢠 । ப  (㬥  ப  ⢫
         ᢥ ).
               .9.2 ।⠢ ࠬ  ⮡ࠦ  ᨬ
         (㪢), ᮤঠ  ᢥ  ᮡ ⢨ 
         ⠡楩 ᮢ ᨬ.  ⢥ ਬ ࠭ 㪢
         "".
                   ⢥  ⮩ ࠬ 
           ᮢ.   ப  ࠬ  ⢥
               뭮᭮     ᨬ  (),  ⠪,
         ਬ,  "墮" ய᭮ 㪢 "".  孨 ப
         ⢥      .    ⢥ , 
         ,  ਢ  㪢 "" (   
           ⨪  १, ᯮ訩  ), 
         ⠪  ய 㪢 䠢 (㪢 孥 ॣ).
         ४  "ࠢ  "  㪢  ࠧ    業
         ,  ᬥ (ࠢ )       ࠭,
         ⠪      ⮫ ࠢ 㦠   ⤥  ᨬ
           㣠.
               ନ஢ ᨬ  ᪮ ०  BIOS-
         ⢫    㭪  (ࠧ)  ᨬ  ७
         ⠡ ⮡ࠦ,   ⥬    ⠡筮  ᠭ
         ᯮ   ⨢樨 ᥫ.  ⥫쭮
         ⠤ ⠭ ᮮ⢥騥     ᯫ
         ⥬  뫪       ப  ᮮ⢥騥
          .
              ᪮  ᪮ ० ᮪  ࠧ襭 梥
           ந  (ந  ⮫쪮    
         梥),  㭮 (ࠧ) ᨬ ।⢥  ࠢ
         ⨢樥  ᥫ.    梥⭮ ० । ࠧ襭
         ந 梥  ⠭  (㭮)    䮭  梥.
           梥  -    梥, 祭  0; ⨬ 
           祭   16-    梥⮢.  
         ⠭  ⠭     3 ⥪饩 梥⮢
         ;   1   梥,        0  -
         筥/.
              楤  㫨஢  ᨬ   BIOS-   
         ⢫    뢠, ⠪   ᨬ. 㭪
         㦨   8    ⠪  楤ன.  
         ⥪⮢  ०    ஡   ⥭  ,
         ᪮     ᯫ  ࠭        ASCII
         ॡ㥬  ᨬ.   ᪮ ०  ⮨  ⠪
         , ᪮    ASCII      .
           ⮣    ᮤন 㯯 ⮢, ।⠢
           (ᥫ)  㭮  ᨬ.  ⮬  楤
         BIOS-  ⥭ ᨬ ⢫ ਢ 樨.
          ⠥ ᥫ   ᮯ⠢     ᮤন  ⠡
         㭪    (ࠧ)    ᨬ,   믮   ᢮   த
         ᯮ ࠧ.
                㭪  (ࠧ)  ᨬ  ⮨   
         ⥩  ।⠢  짮⥫ ⥫  .
         ࢠ    ⮩  ⠡ ࠭    ᮤন 
         128 ᨬ  ASCII,        ⠭  ᨬ
         䠢.   ⠡ ᮤন 㭪 ⠫ 128
         ᨬ  (..  ᨬ   CHR$(120)-CHR$(255)).   ᪮
         ࢠ    室      (㪠⥫      ண
         䨪஢),            ஢,  
              ⠡.   ⠡,  ⫨稥
           ࢮ,  ਥ஢    짮⥫;    ᮧ
         짮⥫   ॡ.
                  ஢  뢠  (뢠     31
         (1F(16)),  ࠧ饭      ⠡   ஢      
         124(7(16))  ᯮ    㪠      ⠡. 
         室 ﭨ ⠡     ࠢ  .
         ᫥  ᮧ  㦭 ⠡  㧪    
         뢠  饭  BIOS-     ᨬ  
            CHR$(128)-CHR$(255)  ਢ    ந  
         ࠭ ⮣ ᨬ.
                 室,   ᭮    ᢮  ।
         ⠡ 㭪 128 ᨬ      ।뫪
          ண ஥  ⨯ ᪨ ࠧ
         (᫮  䨪,  奬,   㭪,   ⠡,   ⥦,
         ࠬ   .). ᫨ ॡ  ࠦ ꥪ⠬ 
         ᫨誮  ᮪,    ᥣ      ।   ᠬ,
         騩    128  蠡  ( 蠡  ࠧ 88
         ᥫ)  ஢   ᭮  ꥪ.  祢,
             ᫮    ⠫  ࠧ      
         ஥ ⠪ ᯮᮡ.  -⠪ ᠬ,  騩  
         128  ।⥫쭮  । 蠡, 筮 ,
         ⮡    짮⥫᪨    ணࠬ        ᮪
         த⢨,   뫨       .    魮,
         楤 㦨 㭪 ᨬ BIOS-  (ᯮ
         ⠡,  ᮧ  짮⥫)      ᥡ ᭮
         ࠡ  樨 ࠧ; 짮⥫᪨ ணࠬ  
          㦭 ᨬ  㦭 樨 ࠭.
              ᠭ    樨  ᪨  ᨬ
           ᪫  ।⢥  㯠  
          ᯫ  ࠢ ⤥ ᥫ.  ᪮
         ० 짮⥫    .  
         㤮  -  ᯮ짮  ⠡  ᪨  ᨬ,  
         室 - 㫨஢ ᥫﬨ.    ⨬,
         ਬ,        ᥫ      ࠧ
         ᨬ, 㦥 뢥  ࠭.
                㭪 ᨬ ॡ  ᢮ ࠧ饭
         1024 ⮢ : 128 ᨬ  8  ⮢  (ॡ㥬  
          ᨬ).  ᪮ ०  । ࠧ襭
           ணࠬ  짮⥫    ᯮ짮  
         ࠢ   ࠧ,   騬      64   ᥫ,   
         ⭮  쬨  ⠬  ⮡ࠦ  ଠ樨.   
         ᮡ  ।  ॡ ⠪ 室  
         ᥬ ࠧ ᦠ ᪨ ࠧ  ⭮襭  室.
              ० 祬 ᯮ짮  , ᫥ 業
         ᫥⢨  ࠭祭, ࠭塞  ⮫쪮  ᫮
          蠡,    ᫮  ந  梥⮢  
         ०  ।  ࠧ襭.  ᫮  ⠪  梥⮢   
         ॢ  .    ०  梥⭮  䨪  
         ᯮ짮    4- 梥 ,   ६  
         ᯮ짮 ⥩ ஥ ࠦ    ᭮
         ᨭ⥧  ᨬ  ⢮ 梥⮢   㬥蠥 
         .
                  ,     ⠡   㭪   ᨬ,
         ନ㥬  짮⥫,    ਬ    ஥
         ࠦ     ᪮   ०,      ᯮ짮
         ᯥ樠  ᨬ   ७ .   
         ਬ    樨  ᨬ  ⥪⮢  ०,  
         ஥  ᯥ樠  蠡    䠢⮢.  ,  
           ⮩    䥪⨢  ᯮᮡ  樨   㣨
         樮 䠢⮢ - ᪮, ᫠᪮ (ਫ),
         ﯮ᪮ ().  ࠡ᪮ 몠      ⠪
           ।⠢, ,   㣨 ᫮
         -    ᫮,    易        ᮡﬨ     쬠
         (ࠢ-).

              ਫ 9.1.  ணࠬ 樨 ࠦ
                       (᪠).


         module listing_9_1;
         type
          word_bits_type       =  set of 0..15;
         high_res_pixel_type   = (off,on);
         medium_res_pixel_type =(color_0,color_1,color_2,color_3;
          graphics_screen_type=
            record
              even_pixel : array [0..99,0..39] of word_bits_type;
              filler     : array [1..192] of byte;
              odd_pixel  : array [0..99,0..39] of word_bits_type;
            end;
         var [static]
          graphics_screen_pointer  :  ads of graphics_screen_type;
          general_screen_pointer   :  adsmem;
          row,column               :  integer;
         value
          graphics_screen_pointer.s := #B800;
          graphics_screen_pointer.r := 0;
          general_screen_pointer.s  :=#B800;
          general_screen_pointer.r  :=0;
         {===================================================================}
                    

               graphics_screen_pointer ^ .odd_pixel [(row-1) div 2,column div 16]
         else
            work_byte :=
             graphics_screen_pointer ^ .even_pixel [row div 2, column div 16];
         work_value := column mod 16;
         if color = on then
           work_byte := work_byte + [work_value]
         else
           work_byte := work_byte - [work_value];
         if odd (row) then
           graphics_screen_pointer ^ .odd_pixel [(row-1) div 2, column div 16]
             := work_byte
         else
           graphics_screen_pointer ^ .even_pixel[row div 2, column div 16]
             := work_byte;
         end;
         {===========================================================}
         procedure set_medium_res_pixel (color : medium_res_pixel_type);
           var [static]
             work_byte : word_bits_type;
             work_set0 : set of 0..15;
             work_set1 : set of 0..15;
         begin
          if odd (row) then
            work_byte :=
           graphics_screen_pointer ^ .odd_pixel [(row-1) div 2, column div 8];
          else
            work_byte :=
           graphics_screen_pointer ^ .even_pixel [row div 2, column div 8];
          work_set0 := [(column mod 8) * 2];
          work_set1 := [(column mod 8) * 2 + 1];
          if color in [color_2,color_3] then
            work_byte := work_byte + work_set0
          else
            work_byte := work_byte - work_set0;
          if color in [color_1,color_3] then
            work_byte := work_byte + work_set1
          else
            work_byte := work_byte - work_set1;
          if odd (row) then
            graphics_screen_pointer ^ .odd_pixel [(row-1) div 2, column div 8]
             :=work_byte
          else
            graphics_screen_pointer ^ .even_pixel [row div 2, column div 8]
             := work_byte;
         end;
         {===========================================================}
         procedure clear_screen_graphics;
           var [static]
             i : word;
           begin
             for i := 0 to 16383 do
               general_screen_pointer ^ [i] := 0;
           end;
         {===========================================================}
         end.