
         660        CD1266   CALL PRINT     맮 ணࠬ 
         660F        C3A765   JP   REP          ⨪
         6612  PRINT 06FF     LD   B,FF      ⠭ ࠬ
                                             饣 横 3
         6614  WAIT  10FE     DJNZ WAIT      ⨩ 騩 横
+                                  - 179 -

         6616        3E16     LD   A,16      ࠢ騩  AT
         6618        D7       RST  10
         6619        3A2C66   LD   A,(YPOS)     ⨪
         661C        D7       RST  10
         661D        3A2B66   LD   A,(XPOS)     ਧ.
         6620        D7       RST  10
         6621        3E10     LD   A,10      ࠢ騩  INK
         6623        D7       RST  10
         6624        3E01     LD   A,01       ᨬ - ᨭ
         6626        D7       RST  10
         6627        3E8F     LD   A,8F      C  ( 143)
         6629        D7       RST  10
         662A        C9       RET              뢠
                                             ணࠬ
         662B  XPOS  00       DEFB 00        न X
         662C  YPOS  00       DEFB 00        न Y

                   4.4. ࠢ ணࠬ  .
                   ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
              ,  ᮬ,  ⮦  ᥤ  ॡ.
         ࠧ 㪠  ,    ࠧ ⮤  
          -  易  ਥ   , 㯠-
           譥  ,  㣮  -  ᯮ짮  ⥬
         ६ KSTATE   LASTK.     ᬮਬ  ⮤,
         ..  筮  ਬ  ணࠬ.
              ᬮਬ ,   ।饩.  ⨬, 
         , ⮡   ࠭  ᮢ ᨭ     ⨨
         ᫥ :
              "P" - ࠢ                 "Q" - 
              "" -                   "" - 
                        "0" - 室  ணࠬ
               ᫮     ""  -
         ⢥ ४⥫ ० "/".

                                     1
                                    ~~~~~~~
                 ந   譥   254 (FE
         HEX). , ᪮     塠
+                                  - 180 -

         ᫮,  FE -  訬 ⮬  ,  訩
           ⠭ ।⥫쭮  .
               5   ⮢.   ⮬  ᫨  
         ,   祭  ( ⫨稥    ⮭--
         ). ⮬, ᫨     ,     -
          ᫮ 255,    뤠,  뤠 191.   
         ⮬,    6-    ﭨ  室  
         䮭  ᫨ ᨣ  㯠,  6-  몫祭  
         ⮬  砥 191,   255 (255-64 = 191).

          ⪠ .        ਩
         6590        3E02     LD   A,02
         6592        CD0116   CALL 1601      뢠   
                                              ࠭
         6595        0618     LD   B,18
         6597        CD440E   CALL 0E44      ⪠ ࠭
         659A        3E0F     LD   A,0F
         659C        325766   LD   (XPOS),A  ⠭ 砫쭮 
                                               ६ XPOS
         659F        3E0B     LD   A,0B
         65A1        325666   LD   (YPOS),A  ⠭ 砫쭮 ப
                                               YPOS
         65A4        3E8F     LD   A,8F       㪠뢠 
                                             ᨬ  (143)
         65A6        325A66   LD   (SIM),A    ᨬ ࠢ 
                                             ६ SYM.
         65A9        CD4766   CALL PRINT     맮 楤 
                                             ᨬ
         65AC  REP   0E4F     LD   C,4F      ⠭ ࠬ -
                                             饣 横 1.  
                                             , 祬  ணࠬ 
                                             ⨪, ⮬ ᮢ-
                                                ॥.
         65AE  HERE  06FF     LD   B,FF      ⠭ ࠬ
                                             饣 横 2.
         65B0  PAUSE 10FE     DJNZ PAUSE     ன 騩 横
         65B2        0D       DEC  C
         65B3        20F9     JR   NZ,HERE    騩 横
+                                  - 181 -

          ⪠ .        ਩
         65B5        3EEF     LD   A,EF        5- 
         65B7        DBFE     IN   A,(FE)     5- 鸞
         65B9        CB47     BIT  0,A       ஢ઠ  "0"
         65BB        C8       RET  Z         室  , ᫨ 
         65BC        3E7F     LD   A,7F        8- 
         65BE        DBFE     IN   A,(FE)     8- 鸞
         65C0        CB47     BIT  0,A       ஢ઠ  ""
         65C2        CC2C66   CALL Z,TOGGL   맮 ணࠬ  -
                                             祭 ⠥ ᨬ-
                                               ᯥ祭 ࠭
         65C5        3EDF     LD   A,DF        6- 
         65C7        DBFE     IN   A,(FE)     6- 鸞
         659        47     BIT  0,A       ஢ઠ  "P"
         65CB        2817     JR   Z,RIGHT   ࠢ, ᫨ 
         65D        CB4F     BIT  1,A       ஢ઠ  "O"
         65CF        2825     JR   Z,LEFT    , ᫨ 
         65D1        3EFD     LD   A,FD        2- 
         65D3        DBFE     IN   A,(FE)     2- 鸞
         65D5        CB47     BIT  0,A       ஢ઠ  "A"
         65D7        282F     JR   Z,DOWN    , ᫨ 
         65D9        3EFB     LD   A,FB        3- 
         65DB        DBFE     IN   A,(FE)     3- 鸞
         65DD        CB47     BIT  0,A       ஢ઠ  "Q"
         65DF        2839     JR   Z,UP      , ᫨ 
         65E1        C3AC65   JP   RET       ᫨    
                                             ,  ᭠砫
         65E4  RIGHT 3A5766   LD   A,(XPOS)   -  ᫥
                                             ⮫  
         65E7        3C       INC  A         㢥稢  1
         65E8        FE1F     CP   1F        ஢ઠ  ⨦
                                             ࠢ 
         65EA        CAAC65   JP   Z,REP     ᫨ ,   
                                              
         65ED        325766   LD   (XPOS),A  ᫨ ,  
                                              ⮫  맢
         65F0        CD4766   CALL PRINT     ணࠬ 

+                                  - 182 -

          ⪠ .        ਩
         65F3        C3AC65   JP   REP          
                                             
         65F6  LEFT  3A5766   LD   A,(XPOS)   ⥪饣 ⮫
                                             
         65F9        3D       DEC  A             1
         65FA        FE00     CP   00        ஢ઠ  ⨦
                                              
         65FC        CAAC65   JP   Z,REP     ᫨ ,   
                                              
         65FF        325766   LD   (XPOS),A  ᫨ ,  
                                             ⮫
         6602        CD4766   CALL PRINT     맮 ணࠬ 
         6605        C3AC65   JP   REP          
         6608  DOWN  3A5666   LD   A,(YPOS)   -  ᫥
                                             ப  
         660B        3C       INC  A         㢥稢  1
         660C        FE16     CP   16        ஢ઠ  ⨦
                                              
         660E        CAAC65   JP   Z,REP     ᫨ ,   
                                              
         6611        325666   LD   A,(YPOS)  ᫨ ,  
                                              ப  맢
         6614        CD4766   CALL PRINT     ணࠬ 
         6617        C3AC65   JP   REP          
                                             
         661A  UP    3A5666   LD   A,(YPOS)   ⥪饩 ப 
         661D        3D       DEC  A           ப  1
         661E        FE00     CP   00        ஢ઠ  ⨦
                                             孥 
         6620        CAAC65   JP   Z,REP     ᫨ ,   
                                              
         6623        325666   LD   A,(YPOS)  ᫨ ,  
                                              ப
         6626        CD4766   CALL PRINT     맮 ணࠬ 
         6629        C3AC65   JP   REP          
         662C  TOGGL 3E7F     LD   A,7F       ஢塞 ⨥
                                              "", .. 
+                                  - 183 -

          ⪠ .        ਩
         662E        DBFE     IN   A,(FE)    ⥯   饭
         6630        CB47     BIT  0,A        ० 
                                             ४ ⭮ 
                                             室 㤥 ।
         6632        28F8     JR   Z,TOGGL   , ᫨  
                                              饭
         6634        3A5A66   LD   A,(SYM)   ⮡ ४ ०,
                                              ᭠砫 ।,
         6637        FE8F     CP   8F         ᨬ ⠭ -
         6639        2806     JR   Z,NEXT    ᨭ  (8F) 
                                              (80)
         663B        3E8F     LD   A,8F      ᪮   ᨭ, 
         663D        325A66   LD   (SYM),A   ⠭  ६
                                             SYM  ᨭ 
         6640        C9       RET            
         6641  NEXT  3E80     LD   A,80      , , ࠧ  ᨭ,
         6643        325A66   LD   (SYM),A    ⥯ ⠭
                                               ("")
         6646        C9       RET            
         6647  PRINT 06FF     LD   B,FF      ࣠ 쥣
                                             饣 横
         6649  WAIT  10FE     DJNZ WAIT      ⨩ 騩 横
         664B        115566   LD   DE,TEXT    DE 㪠뢠 
                                              ⥪
         664E        010600   LD   BC,0006    ⥪ - 6 ᨬ
         6651        CD3C20   CALL 203C      맮 楤 
                                             ப  
         6654        9       RET              뢠
                                             楤
         6655  TEXT  16       DEFB 16         ࠢ 
                                             AT
         6656  YPOS  00       DEFB 00           ਧ.
         6657  XPOS  00       DEFB 00           ⨪.
         6658        10       DEFB 10        ࠢ騩 ᨬ INK
         6659        01       DEFB 01         ᨬ - ᨭ
         665  SYM   00       DEFB 00         ⠥ ᨬ.

+                                  - 183 -

                                    2
                                   ~~~~~~~
               ஢ ࠢ  ணࠬ     
         訢 譨 , 易  ,  ᯮ 
         ⥬ ६ "㬠". ᪮ ணࠬ   ⮬
         祭 宦  ।,    ⥪ ਢ   㤥,
           ⢥ ᮡ .

              1. ᯮ짮 ⥬ ६ LAST K.
               ⥬ ६ 室   23560.   
            ᨬ (⮪),  室饣   ᫥
         ⮩ . 祬,   ࠧ,  ᨬ  
         ⮣,    ୮  ॣ    뫠 .
         ਬ, ᫥   "" ⠬ 㤥 饭  70HEX
         (ᨬ ""),   ⨨ CAPS SHIFT  "P" -   50HEX (ᨬ
         ""),   ⨨ SYMB SHIFT "P" -  22HEX (ᨬ").
              ⠪, ࢮ ᮡ   ,       
           ᯮ짮   ࠧ ०  ࠧ .
         ᪮   ணࠬ   ࠢ ⭮   
           ० CAPS LOCK   筮 ०,    ।
         室  ஢   . ਬ,    "" -
         室  楤 ࠡ⪨  ࠢ:
                   ..................
                   CP        70
                   JR        Z,RIGHT
                   CP        50
                   JR        Z,RIGHT
                   ..................
              2.  ᮡ ⮨   ⮬,  ⥬  -
          "" 䠪  ᫥ . ᫨  
          १ 譨    ᨣ ⮫쪮   -
          ,     ᨤ  ६    , 
          㤥  - 㣠 ,  ⮣  ᬥ
         㣨.   砥, ਬ   ।饩  ணࠬ, 
         ⮨  ⮫쪮  ࠧ   "",   ᮢ
         ᨭ  㤥  ⠭筮,   㤥 ⨣
         ࠩ ࠭     ந ⨥ 㣮  . 
         ⠪ ࠢ ⮦  ਬ  ணࠬ,   ⮬
+                                  - 184 -

          .
              3. ᫨   ⮪   ⢥,   
         ᯮ짮  ⥬  ६  KSTATE.    8
         ⮢, 稭   23552  23559. ண ,   
          ६,        ,  ன
         楤 , ⢥騥   , ࣠  ᢮
         ६ ࠭ ଠ樨.  ᥭ    -
          , 祬    "" ⠬,  ,
          ⫨稥   ६ LASTK.       
         ᫥ ⮩ , 祬    "" ⠬,
          .  ࠭   横 뢠,   ᪮
          "㬥" 뢠 ந室  1/50 ᥪ㭤,  
         ࠭  ⮩ 祩 ਬ୮ 0.1 ᥪ㭤.
              4. , , ᫥  砭.  ⮣, ⮡  -
         ⥬ 楤    ந     -
         ⠭ ⥬  ६ LASTK   KSTATE,  室,
         ⮡ ᪨㥬 뢠  뫮 ࠧ襭.   㡥 
         ⮬,   ਭ㤨⥫쭮  । ᮬ    -
          EI ( FB HEX).

                    4.5. ஢ઠ ⨢  .
                    ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
              ਢ  ணࠬ ⠪     -
         ⥫쭮.   ࠡ ⠪. । 맮 ⮩ 楤
          ॣ஢   HL     ⠭ 砫 
         ஢塞  ,     -  ⮩ . -
         ઠ ஢     ⠯.    祩 뢠
         ஢ ,  ⥬  ஢,   㤠  ᠫ.
         ᫨ 뢠 訡,  ணࠬ 뢠   祭
         䫠 CARRY,  ᮤন  ॣ HL 㪠뢠    -
         筮 祩. ᫨  ஢ઠ 諠 ଠ쭮,   ஢塞
           ᫥ 室  㤥 ᮤঠ 㫨,   ᫨ ,
            㤥 ᮤঠ  ᫮, ஥ 뫮  -
         ᠭ  祩,   ந.
               ᥬ஢   ணࠬ     26000,   ,
         筮,   ।.
               ࢮ 室   뢠 㫨   ஢-
         .
+                                  - 185 -

                ஬  室  뢠  FF.    쥬  -  AA
         (10101010B).  ⢥⮬ - 55 HEX (01010101B).  室  -
         ஢ઠ  "騬" ⮬.  砫 頥 ᫮ 80  HEX
         (1000 000B),  ⥬  祭  ६頥 ࠢ,  
          ன     ந室 室   ஢થ ᫥-
         饣 .

          ⪠ .        ਩
         6590        7A       LD   A,D       ஢ઠ  
                                               0
         6591        B3       OR   E
         6592        C8       RET  Z         室, ᫨ ⠪
         6593        42       LD   B,D         - ࠧ 
         6594        4B       LD   C,E
         6595  TEST1 97       SUB  A           ,   LD A,0
         6596        CDC065   CALL FILL      맮 楤 
                                              ⮬
         6599        D8       RET  C         室, ᫨  訡
                                             (䫠  祭)
         659A  TEST2 3EFF     LD   A,FF
         659C        CDC065   CALL FILL
         659F        D8       RET  C
         65A0  TEST3 3EAA     LD   A,AA
         65A2        CDC065   CALL FILL
         65A5        D8       RET  C
         65A6  TEST4 3E55     LD   A,55
         65A8        CDC065   CALL FILL
         65AB        D8       RET  C
         65AC  TEST5 3E80     LD   A,80       - 㦥 
                                             10000000
         65AE  REP   77       LD   (HL),A      㦥 
                                             ஢塞 
         65AAF       BE       CP   (HL)         ஢
         65B0        37       SCF            砥 䫠   砩
                                             室  訡
         65B1        C0       RET  NZ        室, ᫨ 訡
         65B2        0F       RRCA            祭 
                                             ࠢ
+                                  - 186 -

          ⪠ .        ਩
         65B3        FE80     CP   80        ࠢ   
                                             1000 0000, .. ᤥ
                                                ?
         65B5        20F7     JR   NZ,REP    ᫨ ,   
                                              ஢ઠ
         65B7        3600     LD   (HL),00   ᫨ ,  ᭠砫
                                             㫨 ஢塞 祩
         65B9        23       INC  HL         ३  ஢થ
                                             ᫥饩, 㬥訢 稪
         65BA        0B       DEC  BC        ஢塞 祥 
         65BB        78       LD   A,B       ஢ઠ  
         65BC        B1       OR   C         ஢塞 
         65BD        20ED     JR   NZ,TEST5  室  ஢થ
                                             ᫥饩 祩, ᫨
                                               ௠
         65BF        C9       RET            室, ᫨ ௠


         65C0  FILL  E5       PUSH HL
         65C1        C5       PUSH BC          ⥪ HL  BC
         652        5F       LD   E,A       ६ ᢮  
                                             㣨 
         65C3        77       LD   (HL),A    뫪  ஢塞
                                             祩 ஢筮 ᫠
         654        0B       DEC  BC        襭 稪
                                             ஢塞 祥
         65C5        78       LD   A,B       ஢ઠ  ,  
         656        B1       OR   C         ௠
         65C7        7B       LD   A,E       ⠭ 
         65C8        2805     JR   Z,COMP    室  ஢, ᫨
                                              ஢塞 
                                             뫠 ᥣ 1 
         65CA        54       LD   D,H       ⮢  ਬ
         65CB        5D       LD   E,L         ன
                                             ॡ᪨   LDIR
         65CC        13       INC  DE         ਥ  
                                              筨
+                                  - 187 -

         65CD        EDB0     LDIR           ॡ᪠ 
         65CF  COMP  C1       POP  BC        ⠭  ⥪
         65D0        E1       POP  HL        ॣ஢ 
         65D1        E5       PUSH HL          ᮤঠ
         65D2        C5       PUSH BC        ⥪
         65D3  AGAIN EDA1     CPI            ࠢ
         65D5        2007     JR   NZ,ERROR  ᫨ ࠢ  諮,
                                              室  ணࠬ
                                             ࠡ⪨ 訡
         65D7        EAD365   JP   PE,AGAIN  ,   CPI
                                              䫠 ⭮, -
                                              ௠ ᯨ᮪ ࠢ-
                                             , .. ᫨ BC = 0
         65DA        C1       POP  BC        ⠭ ॣ஢ BC
         65DB        E1       POP  HL         HL । 室
         65DC        B7       OR   A         몫祭 䫠 C,
                                             ᪮ 訡 
         65DD        C9       RET            室
         65DE  ERROR C1       POP  BC        ⠭ ॣ஢
         65DF        D1       POP  DE        । 室
         65E0        37       SCF            祭 䫠 "",
                                             ᪮ 뫠 訡
         65E1        C9       RET            室


              4.6. ࠪ᪨ ਥ ࠡ  ஬.
              ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
                1  筮 ஡ ᢥ⨫ ਭ樯  ࠡ
         ஥  "㬠",   "ࠢ筨"  (
         3)   ᢮     㪠  ᮡ-
         ⥩   ਬ. ⥬     筮
         ,    ⥬  ࠪ᪮ ணࠬ஢ -
         騩 짮⥫  㯨ࠥ   ஡.    ࣠
           ᭮  㬥⮢ "㬠" -  ,
         設   ?
              ᫨     設   ⢫
         筮  १ 뤥  ணࠬ  ६-
         ,     頥 १ PEEK, POKE,   設
+                                   - 188 -

          १ LD...,   ஬   ᫮.
               㦥  ,   ࠡ   ந
          ᯥ樠쭮   - ⥪ . ᫨  
           㬥   ⮣, ⮡     -
           ⥪   (   設  ⥪ -
         ),   ஡    㤥.  ࠡ ⠪:
              -      ⥪ ;
              - ३  設 ;
              - ३  ;
              - ࠡ ;
              -   ;
              -   
                 ⥪  ࠭   ࠡ뢠
          ⨡⭮ (⥣ࠫ쭮) ଥ,  ⮬  ⮨  ஡.
         ,  筮,  ࣠  ⥪    㦭 
          , ⥬ ந    ।
            ⥣ࠫ ,  ⮬ १ POKE  
         ⥪ 㦭   ᫮,     祭 ⮬⥫쭮. 
          ਥ    ⠥ ᢮    
         ᯥ樠쭮 孨.
              ᬮਬ ⥩ -ப: LET P = Q + USR addr.
         , 筮, ,   ⠪  㤥 맢  -
          ணࠬ  設 ,  ᠭ,  稭
           addr.    㤥  -  ,   -
            ⮣,   ᠭ   ⮩ 設  ணࠬ.
           ᫥       ୥,    ᫥-
          Q + ....    .    ᪮ 設
          㪠 -ப    .   -
         頥 ᮤন ६ Q  設 ⥪ !!!
         , 筮,      ⨡⭮ ଥ. ᫨ ⥯  
         ࣠ 設    addr ⠪, ⮡   室
               ந  ࠡ  , 饭 
         ⥪,  ஡ 襭.
              ᬮਬ  ਬ. ⨬,   ᫨
         ࠦ P  = SQR(Q+1).  ⨬,   ᯮ  設
         , 稭   30000.
                LET P = Q + USR 30000. Q    -
         設 ⥪ ,   設 , 稭騩-
+                                  - 189 -

            30000.

                       
         30000   EF   RST 28        Q      祭 , Q 㦥
                                           室  ⥪
         30001   A1   stk_one      Q,1      ,
                                             ⥪ 
         30002   0F   add          Q+1      
                                           "᫮"
         30003   28   sqr        SQR(Q+1)  祭 ⭮ 
         30004   38   end calc             몫祭 
         30005   C9   RET                    .

                , ᫨  । ᫥⥫쭮  ?
          ᫨  । ᨬ ਭ?
               ⮬ 砥  ᯮ짮 ஬  DEF
         FN <> ().  㦨   㭪樨 짮⥫, -
             쭥襬    뢠   ᯮ 
         FN <> ().   㣫 ᪮    ᯨ᮪ ࠬ஢
         㭪樨 짮⥫, ⤥   㣠 묨.  -
           맮 㭪樨 짮⥫ 룫 -ࠧ   -
           ⮣,     ᫮묨   ਭ묨. -
         ਬ,   룫拉 ⠪:
              DEF FN A(K,L,M,C$,D$...) - ᫮ 㭪
              DEF FN A$(K,L,M,C$,D$...) - ᨬ쭠 㭪
              筮 룫  饭  :
              FN A(K,L,...);      FN A$(K,L,...)
              ⮡  ,  室 ,  ࠭
           ࠬ 㭪権 짮⥫.  ⮣  뤥
         ᯥ樠쭠  ,   㪠뢠 ⥬  -
         ६ DEFADD,       23563, 23564.
          ,  ண 稭 ࠧ饭 ࠬ஢  㭪-
         樨 짮⥫, ᫮:
              PRINT PEEK 23563 + 256*PEEK 23564
               ࠬ ᫮  㭪樨 짮⥫   8
         ⮢,   ਭ -   ⮢,   ࠭   ⠬  
         ᫥饬 ଠ:

+                                  - 190 -

               ᫮ 㭪樨:
          1 -  㭪樨 ( ᨬ);
          2 -  0;
          3...7 - 祭 ࠬ  ⨡⭮ ଥ;
          8 -  29, ᫨  ࠬ ᫥, ᫨  - 
                  2;
               ᨬ쭮 㭪樨:
          1 -  㭪樨 ( ᨬ);
          2 -  24;
          3 -  0;
          4...8 - 祭 ࠬ  ⨡⭮ ଥ;
          9 -  29, ᫨  ࠬ ᫥, ᫨  - 
                  2.
               ᬮਬ,  ᯨ᮪ ࠬ஢ 㭪樨 짮-
         ⥫   ᯮ짮  ।  設 ⥪ -
            ⨡⭮  ଥ.  ⮣    -
         짮 樨:
              DEF FN A(......) = USR addr -  ࠡ  ᫠;
              DEF FN A$(......) = P$ AND USR addr -  ࠡ 
                                  ਭ.
               ⥯   ࣠, 稭   addr
         ⠪ 楤  設 ,  ⠥ ।-
           ⢥ ࠬ 㭪樨 짮⥫ ᫮  ⨡-
          ଥ,    ⥪  ३  ॡ᪥ ᫥-
         饣 ᫠, ᫨  ࠬ   ᫥. -
         ਬ, ⠪ 楤  룫拉 ⠪:

         2A0B5C       LD   HL,(DEFADD)   㪠   ࠬ஢
                                         㭪樨 짮⥫ DEF FN
         23      REP  INC  HL            ⥯ HL 㪠뢠  2-
                                         ,  0  24
         7           LD   A,(HL)        ஢ઠ ⮣ 
         FE0E         CP   0E
         2801         JR   Z,NUMB        ।, ᫨ 㭪 ᫮
         23           INC  HL            ᫨ ᨬ쭠,  譨 
                                          ய
         23      NUMB INC  HL             HL 㪠뢠 
                                         ⨡ 
+                                  - 191 -

         CDB433       CALL 33B4          맮 楤  STACK-NUM,
                                          ࠢ ⨡⭮
                                         ᫮  ⥪ 
         7E           LD   A,(HL)
         FE2C         CP   2C            ஢ઠ  ,  
                                         ࠬ ᫥
         28F0         JR   Z,REP           , ᫨  ⠪
         C9           RET                室  .

               ।  ⠪   ६      ⥪
         . ࢮ,   ᤥ -     -
         ६  ⢥ ਭ   ⥪ ,   ⥬ -
         짮    "val"  ᫮  ६
          "val$"  ᨬ쭮.   ,    -
            ᨬ묨   ॣ   , .. 
         室  設 ,    RST 28,    ॣ 
          1D   "val"  18   "val$".
              ⮡   ६  設 ⥪  ⢥
         ਭ,   㤠   㯠 ଥ   ࢮ
         ᨬ, ⥬ ஢   ᨬ  -
          chr$, ⥬ ⮦   ண ᨬ, ᫨    -
          s_add   ..  ᨬ      ६.
         ᬮਬ  ਬ -  ᫮ ६    ப-
         .

                        । ᫮ ६.
                       ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
         .          
         061D       LD   B,1D      ।⥫쭠 ன ॣ B
                                    楫 ᫥饣 맮 
                                    val
         EF         RST  28        祭 
         344000041 stk_data 41      ⥪  㪢 (41 HEX)
         2F         chr$           ८ࠧ  41  ਭ ""
         3         execute_b      믮 ,  ன -
                                   ᠭ  ॣ , .. ८ࠧ
                                   ६    ᫮ 祭
         38         end_calc       몫祭 
+                                  - 192 -

                          । ப ६.
                          ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
                ६ B$.
         .          
         0618       LD   B,18      ।⥫쭠 ன ॣ B
                                    楫 ᫥饣 맮 
                                    val$
         EF         RST  28        祭 
         344000042 stk_data 42      ⥪  㪢 B(42 HEX)
         2F         chr$           ८ࠧ  42  ਭ "B"
         3440B00024 stk_data 24    饭  ⥪   $
         2F         chr$           ८ࠧ  24  ਭ "$"
         17         s_add          ﭨ ਭ  ਭ "$"
         3         execute_B      ८ࠧ  ਭ "B$" 
                                    祭.
         38         end_calc       몫祭 


               4.7  ਬ ᯮ짮 뢠 2- த.
               ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
                ࢮ    ⮩    ᬮ५ ⥮᪨
         ᯥ ᯮ짮 뢠  2- ⨯   짮⥫᪨
         ணࠬ.   ᬮਬ ᪮쪮  ਬ஢.
                  楯樨 ᯮ짮  뢠-
          祭 ,  ਢ ਬ ணࠬ ࠡ⪨ -
         뢠  祭 ०  "IM 2", ᠭ    
         ﬨ.  ⥫쭮  ।⥫쭮  ࠡ   ,
         ० 祬  ᮧ ᢮ ணࠬ.
              ,  ࠡ  "IM 2" 室 ᮧ  ண-
         ࠬ ࠧ : 饩 뢠 "IM 2" , ᮡ⢥,  ண-
         ࠬ ࠡ⪨  뢠.   ᫥ ᪠  ࢮ ணࠬ,
            㤠  .
              ᫨   㤥 짮  - ,  -
         ᪠騬  ⠭  ࠭樨 "ORG",  ਬ,
          ࠧ蠥 ணࠬ "ZEUS"  "CRYSTAL COMPUTING",  
           ணࠬ ⠪,   ।⠢   ⨭
         ணࠬ,   ਤ ࠧ ணࠬ    
         ࠭᫨஢   ⤥쭮     "ORG".
+                                  - 193 -

              1.   ணࠬ   ᬥ ⨯  뢠 
         "IM 1"  "IM 2" c 맮 㪠⥫   (. .III, .5 ).
         ᫥ ᪠ ணࠬ  ࠢ 孥 㣫  騩
         ୮- ਡ,  ᢨ⥫騩   ⮬,   뢠
         ४祭,     ,   祭 "IM 2",   ਡ
         㤥 ﭭ 祭.  ⮬  ᬮ ࠡ  
           㣨 ணࠬ (᫨, 筮,   ४뢠  -
           ,     ணࠬ  ࠡ⪨   뢠
         "IM 2"),    筮 ०.
           10          ORG 40000    ;  ࠭樨  ᪠ -
           20                       ; ࠬ ᬥ 뢠.
           30          DI
           40          LD A,33      ; 롨ࠥ  窨 뢠
           50          LD I,A       ; ࠢ 33485  㦠  "I"
                                    ;  .
           60          IM 2         ; ᬥ "IM 1"  "IM 2".
           70          EI
           80          RET

           90          ORG 33485    ; ணࠬ ࠡ⪨ "IM 2".
          100          DI
          110          PUSH HL
          120          LD HL,581FH  ;  ࠭  ਡ.
          130          LD (HL),C7H  ; 㦠    ਡ.
          140          POP HL
          150          JP 0038H     ; 室  ᪠஢
                                    ; .
              2.  ணࠬ ,  ࠡ騥  뢮騥 ६  
         ࠭   뢠.   ⮩ ணࠬ   ᢮ 楤
            ࠭ . , ᫨    -
             ࠭    ६  뢠,  訬 ᯮᮡ
           ᢮  ணࠬ , ..   ᯮ-
          ணࠬ           -
          ⮣  .
              ணࠬ  ᮢ  ᯮ     筮-筮
         ଥ,   ⠪ ଥ  室 । ᪮ ᮢ
          ६, ᠢ  祩 :

+                                  - 194 -

                         63667 - ,
                         63668 - ,
                         63669 - ᥪ㭤.
                ६    짮 ᫥-
         騬 ᯮᮡ.  ਬ,   ६ : 12 ᮢ  24 
         30 ᥪ㭤:
                63667 襬 1*16+2=18,
                      63668       - 2*16+4=36,
                      63669       - 3*16+0=48.
              .. ⪨ 㬭  16  ਡ塞 訩 ࠧ.
           10  HOUR   EQU 63667    ; 窠 ࠭ ᮢ.
           20  MIN    EQU 63668    ; -/-/-/-/- .
           30  SEC    EQU 63669    ; -/-/-/-/- ᥪ㭤.
           40  COR    EQU 63666    ; -/-/-/-/- ६ ४樨.
           50         ORG 65040    ; ࠭樨  ᪠ ணࠬ
           60                      ;ᬥ 뢠.
           70         DI
           80         PUSH HL
           90         LD A,FDH     ;  㪠⥫ FDFFH - 65023.
          100         LD I,A
          110         LD HL,FDFFH  ; 塞 㪠⥫ ᮬ 
          120         LD (HL),F7H  ; ணࠬ ࠡ⪨ "IM 2" -
                                   ; F7F7H - 63479
          130         INC HL
          140         LD (HL),F7H  ;
          150         POP HL
          160         IM 2
          170         EI
          180         RET
          190         ORG 63479    ;  ணࠬ ᮢ  "IM 2".
          200         PUSH IX
          210         PUSH AF
          220         PUSH BC
          230         PUSH DE
          240         PUSH HL
          250         DI
          260         LD A,(COR)   ; ஢ઠ  室 
          270         DEC A        ; 稪 ६.
+                                  - 195 -

          280         LD (COR),A
          290         JP NZ,WRITE  ; ᫨  ,  ࠧ  ,
          300         LD A,32H     ;  ⠭ ६ ४樨 
          310         LD (COR),A   ;    ६.
          320         LD A,(SEC)   ; ணࠬ  ᥪ㭤.
          330         AND A
          340         ADC A,01
          350         DAA
          360         LD (SEC),A
          370         CP 60H       ; ᫨  60,
          380         JP NZ,WRITE  ;  室  ,
          390         XOR A        ;  㫥 ᥪ㭤   .
          400         LD (SEC),A
          410         LD A,(MIN)   ; ணࠬ  .
          420         AND A
          430         ADC A,01
          440         DAA
          450         LD (MIN),A
          460         CP 60H
          470         JP NZ,WRITE
          480         XOR A
          490         LD (MIN),A
          500         LD A,(HOUR)  ; ணࠬ  ᮢ.
          510         AND A
          520         ADC A,01
          530         DAA
          540         LD (HOUR),A
          550         CP 24H       ; ஢ઠ  24- ᮢ 横.
          560         JP NZ,WRITE
          570         XOR A
          580         LD (HOUR),A
          590  WRITE  LD IX,4018H  ; ணࠬ 뢮   ࠭,
          600                      ;  IX ᮤন  砫 .
          610         LD A,(HOUR)  ; ⠥ .
          620         CALL PRFP
          630         LD A,0AH     ; ⠥ 稥.
          640         CALL PRCH
          650         LD A,(MIN)   ; ⠥ .
+                                  - 196 -

          660         CALL PRFP
          670         LD A,0AH
          680         CALL PRCH
          690         LD A,(SEC)   ; ⠥ ᥪ㭤.
          700         CALL PRFP
          710         LD HL,5818H  ; 塞   ६
          720         LD B,08      ; 騬 ୮-묨 ਡ⠬.
          730  FLAG   LD (HL),C7H
          740         INC HL
          750         DJNZ FLAG
          760         POP HL
          770         POP DE
          780         POP BC
          790         POP AF
          800         POP IX
          810         JP 0038H     ; 室  ᪠஢ .
          820  PRFP   PUSH AF      ; ணࠬ  ᥫ.
          830         SRL A        ; 塞  襩 .
          840         SRL A
          850         SRL A
          860         SRL A
          870         CALL PRCH    ; ⠥  .
          880         POP AF
          890         AND 0FH      ; 塞  襩 .
          900         CALL PRCH    ; ⠥  .
          910         RET
          920  PRCH   PUSH IX      ; ணࠬ  .
          930         LD HL,(5C36H); 㦠  .
          940         LD DE,0180H  ; ந 室 ᬥ饭.
          950         ADD HL,DE
          960         EX DE,HL
          970         LD L,A       ; 塞     
          980         LD H,00      ;  ⠡ .
          990         ADD HL,HL
         1000         ADD HL,HL
         1010         ADD HL,HL
         1020         ADD HL,DE
         1030         LD DE,0100H
+                                  - 197 -

         1040         LD B,08
         1050  PSET   LD A,(HL)    ; 뢮  ࠭ .
         1060         XOR FFH
         1070         LD (IX+00),A
         1080         INC HL
         1090         ADD IX,DE
         1100         DJNZ PSET
         1110         POP IX
         1120         INC IX
         1130         RET
              , ⭮ ⨫,   ணࠬ "PRCH"  ᬥ-
         饭     "0", ..    ᬥ-
         饭  48 ⮢  ࠢ  ⠡楩 ASCII. ,  
         ࠢ쭮,  頥 ணࠬ  ᥫ  .
              । ணࠬ  ६, ᫨  
          祭 㪠⥫   ᮤন ॣ "I".


                           5.    

                  稭  짮⥫  "㬠"  ⠪
         ,     ⮪    ,   
         ࣮  祭,      ᠬ     뢠
         ᭠ 楯,       
         ,  㣨 ᯮᮡ   ⠪ .
                ,     뢠  ⮪ 
         ,   ணࠬ  設 ,     -
         .
               ।⠢ ᥡ,   -  ஥  孨-
         ᪮  ன⢮,  ᯮ㥬   /뢮 ଠ樨.
         ,  ࠢ,,      -  ᥣ 孨᪮
         ன⢮. ,  ਬ,    䠩   ᪥ ,
         ᪠,      襣  .   䠩  ⮦ 
          ଠ    㤠 뢠.
                ᥣ  ।⠢  楯    ⮪ 
         ਬ ᪮ ०  ᫥묨    -
         .  ஭     ᫥    ४.
          ,      -   ,      ४,
+                                  - 198 -

             -  ⮪, 祭  .

                            5.1 ⠭ .
                            ~~~~~~~~~~~~~~~~~~~~~~~~
              ⠭묨    "㬠"   뢮 ଠ樨
           "" -    ப ࠭  (⥬ -
         ), "S" -    ࠭  "P" - ⠭  "ZX-ਭ-
         ".
               ⨬  ⠭⭮ 祭 ⮪:
              - ⮪ #0 -   "";
              - ⮪ #1 - ⮦ 祭   "K";
              - ⮪ #2 - 祭   "S";
              - ⮪ #3 -   "P".
               ࠧ, 뢠 묨 ᫥騥 
         /뢮:
             PRINT #0 "Hello"; A$ -   ᠬ,   INPUT "Hello"; A$
             PRINT "Hello" -   ᠬ,   PRINT #2 "Hello"
             LPRINT "Hello" -   ᠬ,   PRINT #3 "Hello"
             , 騩  ᫥   #   襯ਢ ਬ,
          ஬ ⮪. ᪮  ⮪ 祭  ⠭-
         ⭮    ९祭      ,  ணࠬ㥬 
           ᯮ㥬  INPUT, PRINT, LPRINT   㪠-
           ⮪.
                "㬥"       , ஥ ࠦ
          㪢 䠢. ,  "S" -  ࠭, ⮬,  
         -᪨ ᫮ ࠭ ,  "Screen".
               OPEN# 㦨   ⮣, ⮡  ⮪  
         . ,       OPEN#6,"S"   ⥬
         ᠬ  ⮩ ⮪  ࠭  ⮣  PRINT #6
         㤥   ⥪   ࠭ 筮  ⠪ ,    
         筠  PRINT.
              筮,    ।⠢,     - 
         ன⢮, ।祭    ଠ樨   ⮬ 
         ⮦ .     ""  (Keyboard - ).   
             ⮪  筮  ⠪  ,       
         ࠭. ਬ, OPEN #n,"K" - 砥   
         ⮪  n.
              ᥣ            ⭠ ⮪ 
+                                  - 199 -

         ࠬ  0  15. ⮪  ஬ 16   ,  ᫨
           ஡    ᯮ짮,      ᮮ饭  
         訡.
               㦥 ᪠  ⮬,  ⮪  0  3   ⠭-
         묨    ࣠    襣  .  ⠭⭮
         祭  ⠭ .
               "S"  "P" ।祭 ⮫쪮  뢮  ଠ-
         樨, ⮬ ਬ PRINT #2  PRINT #3 - ,  INPUT
         #2  INPUT #3 - .
               ⫨稥   ,   ""   ᯮ짮   
            뢮.
              INPUT  #0  -  ᠬ  筠    INPUT,  PRINT #0 -
         믮  襣 ᮮ饭     ப  ࠭,
          믮 ஫ "⥬ ".   ᠬ  ப,
            ଠ  ࠡ  INPUT.


                            5.2 稥 .
                            ~~~~~~~~~~~~~~~~~~
              ᫥ 祭 ⥫쭮 ਨ,  ᯮ饩
         ᢮ ,  ⠭    ⥫-
         . , ਬ,  祭 -1 (ZX-INTERFACE  1)
         ᮧ  짮⥫ ᪮쪮  :
              - "M" -  தࠩ;
              - "N" -  쭮 ;
              - "T" -  ਭ   ணࠬ (  165
                      ,  ⮪ 祢 ᫮
                      "㬠").
              - "B" -  ਭ    ( 
                        ᢮ 祭).

              ᪮  䥩      ⥫쭮 ᢮
         , ਬ,  "D"  ..       
           ᮧ  ᮡ⢥  .     ᮧ  
         ⨢    䥪⨢ ᯮ짮.    
         㤥 뢠 짮⥫᪨,   ⮣, ⮡  
          ᮧ,           
         .
+                                  - 200 -

                       5.3  ଠ樨  .
                       ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
               楯   ⮪    ⢮-
           ⨢   , 뢠 "-
          ଠ樨   ".      ।⢥
         । -,    .  ,    
         ⥬묨 ६묨  . 稭   ,  
          㪠뢠 ⥬ ६ CHANS, ᯮ  
          5C4FH  (23631)   稢 ⮬,   ஬ ⮨
         થ 80H.   㦥     -ணࠬ,   砫
         ன,    ⭮,  㪠뢠  ⥬ ६ PROG,
         ᯮ   5C53H (23635).
               ⮣, ⮡ ᮧ  ᢮ ,  ࠪ᪨  
         ८࣠   ⮩ ,    ࠧ
          , ६⨢  થ   祭 PROG, 
         ⠪ ࠧ    楤.  -  ᯥ祭
             (INPUT)    -  ᯥ祭  뢮 -
         (PRINT).
                        ଠ樨    -
         CHANNEL INFORMATION BLOCK (CIB).    ᯮ   
         ଠ樨  .   ⮬  ᮤন   ଠ,
         室   ⮣, ⮡     㭪樮஢. C⠭-
             "K",  "S",  "P"      ⨡⭮
         ,   ᪫祭.   ⠫ ,  ⮬ ᫥  
         ,  ᮧ ,     ⮬    ,
         祬  11 ⮢.

                     CIB  ⠭⭮ .
                    ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
               0  1 -  楤 뢮 (PRINT # );
               2  3 -  楤  (INPUT # );
               4 -   (  㪢 - "K", "S"  ..).

               CIB  , ᮧ ⠭⭮ ਥ.
              ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
              ᫨    祭  ⠭ ਩ ன
         ᮧ   ,    ଠ樨      11
         ⮢  . 筮   , 騬  ⮬
+                                  - 201 -

          ⥬ ᭮ 樨, ⨢  ॣ IX 
          砫 . , ਬ,  祭 -1
          ⥫   ᫥騩 ଠ:

               IX+0 (2 ) -  楤 ࠡ⪨ 訡 0008.
               IX+2 (2 ) -  楤 ࠡ⪨ 訡 0008.
               IX+4 (1 ) -  .
               IX+5 (2 ) -  楤 PRINT#.
               IX+7 (2 ) -  楤 INPUT#.
               IX+9 (2 ) -    (  000BH).
               IX+0B ( ) -  ⥫쭠 ଠ.

                   CIB  , ᮧ 짮⥫.
                  ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
               IX+0 (2 ) -  楤 뢮 (PRINT#).
               IX+2 (2 ) -  楤  (INPUT#).
               IX+4 (1 ) -  .
               IX+5 (2 ) - ᫮ "1234" -  ᢨ⥫ 
                                ⮬,   - 짮⥫᪨.
               IX+7 (2 ) -  뢠饩 楤 CLOSE#.
               IX+9 (2 ) -    (  000BH).
               IX+0B ( ) -  ⥫쭠 ଠ.

                       5.4 祭 ⮪.
                       ~~~~~~~~~~~~~~~~~~~~~~~~
              ,      ࠧࠫ     﫨,
               ⠪  ᫮,     ᥣ    ᯮᮡ
         ࣠樨    ⢨ 楤   
         㣮, ୥  ⮪.
              ।  ⥬  ६  ,   ६
         STRMS.    - 5C10H (23568).   祭 -  㪠 
          , 祭  ⮪.   ⮩  ६
         - 38  ⮢ ,  ᫨   ஢,      
         ६,  ᠬ   㪠⥫쭠 ⠡,   ன
          ⮪ ⤠  2   ⮣, ⮡ ࠭   
          ,  ஬ 祭  ⮪.
              ⥫ ⥫, 筮 ⨫,  16 ⮪  
         2   ⮪ ⠢ 32 ,  ⥬ ६
+                                  - 202 -

         STRMS  祬- 38 ⮢.    ⮬,     
         ⥬ ⮪, 騥 ᢮ "७"  
         ࠡ .   " ⨩" ⮪ (FD), " ன" (FE)
          " " (FF).  ࠧ, ⠡ STRMS  ।-
         ⠢,  19 塠 ⥬ ६:
                           STRMS_FD   5C10 (23568)
                           STRMS_FE   5C12 (23570)
                           .......................
                           STRMS_0F   5C36 (23606)
              ⮪ FD 祭    ""      ९-
         . 筮 ⮪ FE  祭   "S".  ᥭ
         ⮪ FF,   祭  "७"   "R" (  
             㯮,  ᪮  ⭮, ⮡  諮
         -   짮),        ࣠樥
         ᪮ ஢ ଠ樨   ⥩  
         㣨, ந  ⮬ "ࠧ" ଠ樨  ⠢
           । 饩.
              ⠪,      ⠡  ६  STRMS  믮
         ਢ離  ⮪    .  ᫨  -  ६ 
           STRMS  ᮤন  0000,     砥,   
         ⮪  祭   ,  ,   .
         ᫨  ⠬  ,      ⮪ 祭
          ⮬ .  ᪨  ⮪  祭  ⮬  ,
         ଠ樮    CIB  ண  室    ,  
           㪠뢠  ⥬  ६  CHANS  稭,
         ᮤঠ  STRMS   ⮪  :
                           (CHANS) + (STRMS_n) -1

              5.5.ࠪ᪨ ਥ ࠡ    ⮪.
              ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
              ⠪,  ,  ଠ   ࠭  , 
                ଠ樨  .
         筮,    祭    ⠬  祣    , 
         ଠ    ᮤন  ⮫쪮       樠樨
         ⥬      .    ࠭ ଠ樨
         ᤥ  ⢥ 蠣   짮⥫,     
            ଠ ⠪,     室. ᬮਬ,
         ਬ,  룫廊    ଠ樨   "S"  (
+                                  - 203 -

         ,   㦥 ⠭, 5 ⮢).
                 ন   ਩
              23739      244       9*256+244 = 2548 -  楤
              23740        9         㦨   뢮.
              23741      196       21*256+196 = 5572 -  楤
              23742       21         㦨   .
              23743       83         "S"
                ଥ ணࠬ  ⮣, ⮡  ᪠
         ࠦ    ࠭,  祭  ᫥  㧪 ଥ
         ࠭ ⠢,    楤 㦨  
         "S"  뢮.   祩 :
                               POKE 23739,82
                               POKE 23740,0
                 ⮬  㧪      㤥 믮
         ଠ쭮,    ࠭   program....,  bytes....  ..
         뢮  .
                ந室  ⮬,         82 (0052H)
         ᠭ  RET ( C9H)  饭 㤠   뢮
         ଠ樨   ࠭ ਢ        .  
           ⭨  ᮢ,      ᠭ    RET  
         ᯮ짮   뫮  .
              ᯮ짮    楫  CLOSE#2 - ਥ-
         .
              ᫥  㧪       ணࠬ   楤
         뢮 ⠭.
                               POKE 23739,244
                               POKE 23740,0
                ਥ 짮⥫  ਬ   ᢮
         楫.
              㣮,   ᭮ ਬ 楯樨  
         ⮪  ࠪ᪨ 楫 -   ᢮ ணࠬ  
         ᠭ樮஢  ⥫⢠.      
         ଠ樨       "R",     ᯮ   ⥬
              ࠡ  ७   ।.   筮
         :
                               POKE 23744,124
                               POKE 23745,0
         -  ।஢ 襩 ணࠬ ⠭ .
+                                  - 204 -

               䥪  , 㫨    -
         묨    ଠ樨  ,    묨   ⥬
         ६ STRMS (23568).     易   ।-
         묨 ⮪,  ९ ⮪  㣨 ,  -
         稬   䥪. ਬ,  ⮡   뢮   ࠭
         ଠ樨   ணࠬ   㧪    䮭, -
         筮   祩 23570 १  POKE  ᫠ 6
         ᫮ 16,  ९稢 ⮪-2,  易    "S"  
          "P", ᯥ稢騩 뢮  "ZX-ਭ".
              ९  ⠭      ⮪   
               ᨬ  ""  -  "#".  ஡ 
         ணࠬ   :
              10 PRINT #0; "    ࠭": PAUSE 0
              20 LPRINT #2; "  孥  ࠭": PAUSE 0
              30 LPRINT #3: "  ਭ": PAUSE 0
              40 LIST #1
               㡥,      ࠡ
         ᪮쪮 筮.
              ஬  ⥬  ६   CHANS  (23631/2)     STRMS
         (23568), ࠭  ଠ      ⮪, 
           ⥬  ६  CURCHL  (5C51H  - 23633),  ன
         ᠭ  ⨢஢    .  
         祭  ⮩  ६    ᯮ   뢮 
          RST 10H.
               ࠡ  ⠭묨  ,   
         ॡ    ଠ    䫠 ⥬
         ६:  FLAGS  (5C3BH  =  23611),  FLAGS2  (5C6AH=23658) 
         TVFLAG(5C3CH=23612).
              㫥  ६ TVFLAG ନ ⥬  ⮬,
         ᯮ    ࠭ ( ࠢ 0)  
         ( ࠢ 1).
                 ६ FLAGS  㪠뢠   ,   
         ᨬ 뢮   ਭ ( ࠢ  1)    ࠭ (
         ࠢ ).
              ⢥    ⥬  ६  FLAGS2  ।,
            "K" ࠡ稬 ( 祭)  ࠡ稬  (
         몫祭)  ⥪騩 .

+                                  - 205 -
                  ਫ    ⮬,    ଠ     
          ᠭ  -     ⥬ ᪮஢   .
         ⨬    ᯮ짮,  ਬ   ⮣, ⮡ 
            ଠ    ⠢  ⮫쪮   .
               ᢮襣    ⮬     㢥
         -   21 . , 筮, , 
          ᥭ ᠬ 室:

                         10 POKE 23635, PEEK 23631
                         20 POKE 23636, PEEK 23632
                         30 POKE 23631, 175
                         40 POKE 23632, 21

                ப 10  20  祭 ⥬  -
          PROG, 㪠뢠饩  砫 -ணࠬ.  
         㤥 稭    23755,    23734.  ப
