
                            LD HL,ADDR
                            BIT N,(HL)
                            JR Z,ADDR1
              158. 室, ᫨ 뢠 ⪫祭.
                            LD A,I        -  ⮩  ﭨ
                                            ਣ 뢠
                                            ।  䫠 ⭮
                            JP PO,ADDR
               ࠧ 権 室     -
          樨 室, ᫨  , ॣ, 
          ..  .
              159. 室, ᫨ ᮤন  ࠢ 
         .
                            CP N
                            JR Z,ADDR
              160. 室, ᫨  ॣ 1.
                            DEC reg
                            JR Z,ADDR
                 楤   ਬ    ஢ન  祩
           樥 १ HL  १  ॣ.
              161. 室, ᫨  ॣ FF.
                            INC reg
                            JR Z,ADDR
                 楤   ਬ    ஢ન  祩
           樥 १ HL  १  ॣ.
+                                  - 150 -

              162. 室, ᫨ ᮤন  ࠢ  ᮤন-
          ॣ.
                            CP reg
                            JR Z,ADDR
              163. 室, ᫨ ᮤন  ࠢ ᮤন-
           .
                            LD HL,ADDR
                            CP (HL)
                            JR Z,ADDR1
              164. 室, ᫨  ॣ஢  ᮤন ᫮ NN.
                            LD HL,NN
                            AND A
                            SBC HL,rp
                            JR Z,ADDR
              165. 室, ᫨  ,   㪠뢠 HL,  -
         ন ᫮, ࠢ ᮤন ॣ.
                            AND A
                            SBC HL,rp
                            JR Z,ADDR
              166. 室, ᫨   㪠⥫ ⥪  ᮤন 
         ᫮.
                            LD HL,NN
                            AND A
                            SBC HL,SP
                            JR Z,ADDR
              167. 室, ᫨ ᮤন 㪠⥫ ⥪ ࠢ ᮤ-
          ॣ HL.
                            AND A
                            SBC HL,SP
                            JR Z,ADDR
              168. 室,  ᫨ ᮤন  ᭮ ॣ  ࠢ
         塠⭮ .
                            PUSH xy
                            POP rp
                            LD HL,NN
                            AND A
                            SBC HL,rp
                            JR Z,ADDR
+                                  - 151 -

              筮   樨 室   ᫮  "
         ࠢ".
              169. 室, ᫨ ᮤন  ⥫쭮.
                            AND A
                            JP P,ADDR
              170. 室, ᫨ ᮤন ॣ஢  ⥫-
         .
                            INC rph
                            DEC rph
                            JP P,ADDR
              171. 室, ᫨ ᮤন ॣ ⥫쭮.
                            INC reg
                            DEC reg
                            JP P,ADDR
              172. 室, ᫨ ᮤন  ⥫쭮.
                            LD HL,ADDR
                            INC (HL)
                            DEC (HL)
                            JP P,ADDR1
               
                            LD A,(ADDR)
                            AND A
                            JP P,ADDR
              173. 室, ᫨ ᮤন ᭮ ॣ -
         ⥫쭮.
                            PUSH xy
                            POP AF
                            AND A
                            JP P,ADDR
              174.  室,  ᫨  塠⭮  ᫮,  室饥   
           ⥫쭮.
                            LD A,(ADDR+1) - 筮 ஢ 訩
                            AND A           
                            JP P,ADDR1
              
                            LD HL,ADDR+1
                            BIT 7,HL      - ଠ  
                            JR Z,ADDR       ᮤন  襬 
+                                  - 152 -

              묨 ﬨ 믮  室  -
         ⥫쭮 .
              175. 室, ᫨ ᮤন  , 祬 -
          ᫮ ( ).  ᮡ 砩  ,  ᫨
         ࠭ ࠢ.  ⮬ 砥 室  ᮢ蠥.
                            CP N
                            JR C,END
                            JR NZ,ADDR
                  END:      NOP
              176. 室, ᫨ ᮤন   ᮤন-
          ॣ ( ).
                            CP reg
                            JR C,END
                            JR NZ,ADDR
                       END: NOP
              
                            LD reg1,A
                            LD A,reg
                            CP reg1
                            JR NC,ADDR
              
                            INC reg
                            CP reg
                            JR NC,ADDR
              177. 室, ᫨ ᮤন   ᮤন-
            ( ).
                            LD HL,ADDR
                            CP (HL)
                            JR C,END
                            JR NZ,ADDR1
                      END:  NOP
              
                            LD reg,A
                            LD A,(ADDR)
                            CP reg
                            JR C,ADDR1


+                                 - 153 -

              178. 室, ᫨ ᮤন ॣ HL  ᮤন-
          ॣ஢  ( ).
                            SCF
                            SBC HL,rp
                            JR NC,ADDR
              179.  室,  ᫨  ᮤন  HL  , 祬 
         16-⭮ ᫮ (  ).
                            LD rp,-NN-1
                            ADD HL,rp
                            JR C,ADDR
              180. 室, ᫨ ᮤন 㪠⥫ ⥪ , 祬
         ᮤন HL ( ).
                            AND A
                            SBC HL,SP
                            JR C,ADDR
              181. 室, ᫨ ᮤন 㪠⥫ ⥪  -
          16-⭮ ᫠ ( ).
                            LD HL,-NN-1
                            ADD HL,SP
                            JR C,ADDR
              182. 室, ᫨ ᮤন ᭮ ॣ 
          16-⭮ ᫠ ( ).
                            LD rp,-NN-1
                            ADD xy,rp
                            JR C,ADDR
              183. 室, ᫨ ᮤন ᭮ ॣ 
         ᮤন HL ( ).
                            PUSH xy
                            POP rp
                            AND A
                            SBC HL,rp
                            JR C,ADDR
              184. 室, ᫨ ᮤন   
          ᫠ ( ).
                            CP N          - ࠢ
                            JR C,ADDR     - 室, ᫨ ""
                            JR Z,ADDR     - 室, ᫨ "ࠢ"

+                                  - 154 -

              㣮 ਠ:
                            CP N+1
                            JR C,ADDR     - 室, ᫨ " "
              185. 室, ᫨ ᮤন    -
         ন  ॣ ( ).
                            CP reg
                            JR C,ADDR
                            JR Z,ADDR
              
                            LD reg1,A     -  ᮤন -
                            LD A,reg      - 﫨 ᮤন ॣ
                            CP reg1       - ࠢ
                            JR NC,ADDR    - 室, ᫨ " "
              
                            INC reg
                            CP reg
                            JR C,ADDR
              186. 室, ᫨ ᮤন    -
         ন   (  ).
                            LD HL,ADDR
                            CP (HL)
                            JR C,ADDR
                            JR Z,ADDR
              
                            LD reg,A
                            LD A,(ADDR)
                            CP reg
                            JR NC,ADDR
              187. 室, ᫨ ᮤন HL  , 祬 ᮤন
          ॣ஢  ( ).
                            SCF
                            SBC HL,rp
                            JR C,ADDR
              188. 室, ᫨ ᮤন  HL  , 祬  
         ᫮   (  ).
                            LD rp, -NN-1
                            ADD HL,rp
                            JR NC,ADDR
+                                  - 155 -

              189. 室, ᫨  ᮤন 㪠⥫ ⥪   ,
         祬 ᮤন ॣ HL (  ).
                            AND A
                            SBC HL,SP
                            JR NC,ADDR
              190. 室, ᫨  ᮤন 㪠⥫ ⥪   ,
         祬  塠⭮ ᫮ ( ).
                            LD HL,-NN-1
                            ADD HL,SP
                            JR NC,ADDR
              191.  室,  ᫨  ᮤন  ᭮  ॣ  
         , 祬  塠⭮ ᫮.
                            LD rp,-NN-1
                            ADD xy,rp
                            JR NC,ADDR
              192.  室,  ᫨  ᮤন  ᭮  ॣ  
         , 祬 ᮤন ॣ HL ( ).
                            PUSH xy
                            POP rp
                            AND A
                            SBC HL,rp
                            JR NC,ADDR
              193.  室,  ᫨  ᮤন   , 祬
          ᫮ (  ).
                            CP N
                            JR C,ADDR
              194.   室,   ᫨   ᮤন     
         ᮤন ॣ ( ).
                            CP reg
                            JR C,ADDR
              195.   室,   ᫨   ᮤন     
         ᮤন   ( ).
                            LD HL,ADDR
                            CP (HL)
                            JR C,ADDR



+                                  - 156 -
              196. 室, ᫨ ᮤন ॣ HL   ᮤন-
           ॣ (  ).
                            AND A
                            SBC HL,rp
                            JR C,ADDR
              197. 室, ᫨ ᮤন ॣ HL  
         塠⭮ ᫠ (  ).
                            LD rp,-NN
                            ADD HL,rp
                            JR NC,ADDR
              198. 室, ᫨ 㪠⥫ ⥪  HL ( ).
                            SCF
                            SBC HL,SP
                            JR NC,ADDR
              199.  室,  ᫨  㪠⥫  ⥪  塠⭮
         ᫠ (  ).
                            LD HL,-NN
                            ADD HL,SP
                            JR NC,ADDR
              200. 室, ᫨  ᮤন ᭮ ॣ  
          塠⭮ ᫠ (  ).
                            LD rp,-NN
                            ADD xy,rp
                            JR NC,ADDR
              201. 室, ᫨  ᮤন ᭮ ॣ  
         ᮤন ॣ HL ( ).
                            PUSH xy
                            POP rp
                            SCF
                            SBC HL,rp
                            JR NC,ADDR
              202.  室,  ᫨  ᮤন      
          ᫠ ( ).
                            CP N
                            JR NC,ADDR
              203. 室, ᫨      ॣ-
          ( ).
                            CP reg
                            JR NC,ADDR
+                                  - 157 -

              204. 室, ᫨      ᮤন -
           ( ).
                            LD HL,ADDR
                            CP (HL)
                            JR NC,ADDR1
              205. 室, ᫨ ᮤন ॣ HL   ᮤ-
           ॣ஢  (  ).
                            AND A
                            SBC HL,rp
                            JR NC,ADDR
              206.  室,  ᫨  ᮤন  ॣ  HL    
          塠⭮ ᫠ ( ).
                            LD rp,-NN
                            ADD HL,rp
                            JR C,ADDR
              207.  室,  ᫨  㪠⥫  ⥪     HL (
         ).
                            SCF
                            SBC HL,SP
                            JR C,ADDR
              208. 室, ᫨ 㪠⥫ ⥪  , 祬 
         塠⭮ ᫮ (  ).
                            LD HL,-NN
                            ADD HL,SP
                            JR C,ADDR
              209.  室,  ᫨  ᮤন  ᭮  ॣ  
         , 祬  塠⭮ ᫮ ( ).
                            LD rp,-NN
                            ADD xy,rp
                            JR C,ADDR
              210. 室, ᫨ ᮤন ᭮ ॣ  -
         , 祬 ᮤন HL ( ).
                            PUSH xy
                            POP rp
                            SCF
                            SBC HL,rp
                            JR C,ADDR

+                                  - 158 -

                   2.5.   

                         2.5.1. ᫮ 맮.
                         ~~~~~~~~~~~~~~~~~~~~~~~~~
              ⥫쭮    맮 ணࠬ, ॠ-
           ⥬  , ணࠬ  ਬ-
          אַ 맮 ணࠬ   ஬筮 뢠-
         饩 ணࠬ.   ⮬  砥 맮  믮 맮 ⮩
         ஬筮 ணࠬ,  ਬ, CALL  TRANS.   TRANS,
         筮 ⮨  塠 .  楤 TRANS -
          ࠢ  뢠 ணࠬ.   믮  㦥 
         १ CALL,  १ JP.  믮  뢠  -
         ணࠬ,   ன ⮨  RET.
               樨 楤 TRANS,  ᨬ   -
         ,  ।  뢠 ணࠬ, ਢ .

              211.  맮 । १ HL.
                   TRANS:   JP (HL)
              212.  -  ᭮ ॣ.
                   TRANS:   JP (xy)
              213.  -  DE.
                   TRANS:   EX DE,HL
                            JP (HL)
              214.  -  BC.
                   TRANS:   LD H,B
                            LD L,C
                            JP (HL)
                   
                            PUSH BC
                            RET
              ன ਠ ࠡ⠥ ,    HL.
              215.    ADDR  ADDR+1.
                   TRANS:   LD HL,(ADDR)
                            JP (HL)

                             2.5.2. ᫮ 맮.
                             ~~~~~~~~~~~~~~~~~~~~~~
               맮 ணࠬ  ᫮   ७
+                                   - 159 -

         ⠪  ,        ᤥ   ᫮ 室.
         ⢥  ,  ஥    ᤥ -  
          室   맮. ਬ,  JR NZ,ADDR
          ⠢ CALL NZ,ADDR   JP P,ADDR - CALL P,ADDR.

                          2.6.   

                         2.6.1. ᫮ .
                        ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
               RET  ⮬᪨ 믮  室   ,
          室  設 ⥪. ᫨     
         室 -  㣮  (ਬ  ॣ஢  
         , ᪠   祩 ),  । 㤠 ࠢ
          ᯮ 室  ᢥ 樥.

                         2.6.2.   ᫮.
                         ~~~~~~~~~~~~~~~~~~~~~~~~~~
                  ᫮    Z-80 믮 ﬨ,
         묨    ᫮  室.     ⮫쪮
           JR  JP  RET     室.

              ਬ,     RET NC       JP NC,NN
                            RET N        JP N,NN


                        2.6.3.   ᬥ饭.
                        ~~~~~~~~~~~~~~~~~~~~~~~~~~~~
               砩,    믮   筮
          , 室饬   設 ⥪,  ᪮쪮  
          , ਬ, ⮡ ய - , ࠬ-
         , ᯨ᪨  .. ᯮ .
              POP DE         頥  DE
              LD HL,NN      HL 㦠 稭 ᬥ饭
              ADD HL,DE       
              JP (HL)      室  ⠭ 

               ਠ,       -
         , ᮤঠ饬   設  ⥪,    室  
+                                  - 160 -

         㣮 , ᪠ NN.   ⢮ ⠪:

              LD HL,NN     㧪  HL   
              EX HL,(SP)     HL  㪠⥫ ⥪.  
                           ⥪ ᮤন   .

                     2.6.4.  ᫥ 뢠.
                     ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
              ᪮  筮  ࠡ  楤  ࠡ⪨ 뢠
         稭   ⮣,      ⥪ ᮤন 
         ॣ஢,    ᫥ 뢠  ந 
         ⠭   ॣ஢, 祬  冷 ⠭
         ண ⨢ 浪 ࠭. ਬ:

                    
                  PUSH AF          POP IY
                  PUSH BC          POP IX
                  PUSH DE          POP HL
                  PUSH HL          POP DE
                  PUSH IX          POP BC
                  PUSH IY          POP AF
                                   EI      ࠧ襭  뢠
                                   RETI    


                        2.7.  

                             2.7.1. 㧠.
                             ~~~~~~~~~~~~~
                    NOP,   祣  ,
         ஬  㢥稢   ᮤন ணࠬ  -
         稪 (ॣ PC).
                १    㣨 ⥬.  ᯨ-
         ᮪ ,  ⮦  믮  ⢨:
                 LD A,A       LD B,B       LD C,C       LD D,D
                 LD E,E       LD H,H       LD L,L


+                                  - 161 -

                        2.7.2.   ⥪.
                        ~~~~~~~~~~~~~~~~~~~~~~~~
              216. ࠭  ⥪ 筮 ॣ.
         PUSH reg           PUSH rp       ࠭ ॣ஢ 
         ~~~~~~~~           INC SP        뢠 襣 
              217. ࠭  ⥪ ᮤন 祩 .
         PUSH (ADDR)        LD A,(ADDR)     
         ~~~~~~~~~~~                      ᮤন 祩 
                            PUSH AF       ࠭ ᮤন  AF
                            INC SP         ᮤন 䫠
                                          ॣ
              218. ࠭   ⥪  ᮤন    
         祥  ADDR, ADDR+1.
                            LD HL,(ADDR)  ᮤন  
                                          頥  ॣ HL
                            PUSH HL       ࠭  ⥪
              219. ࠭  ⥪ ﭨ ਣ 뢠 IFF
                            LD A,I        ᫥ ⠪ 樨 ﭨ
                                          ਣ 뢠 
                                           䫠 / ய
                            PUSH AF       ࠭ 䫠 ॣ
              220. 맮   ⥪ ᮤন 筮  ॣ (
         ᫮,    ࠭ ⠬ ⠪,  㪠  .217).
                            DEC SP        㪠⥫ ⥪ ॢ 
                                            
                            POP rp        맮 ᮤন ⥪ 
                                          ॣ஢  (ᮤন
                                          襣   ⠥
                                          ।)
              221. 맮  ⥪ ᮤন  祩 .
                            DEC SP
                            POP AF
                            LD (ADDR),A    १ ࠡ ⮩
                                          樨 ।᪠㥬
                                           䫠 ॣ F
              222. 맮  ⥪ ᮤন  祥 .
                            POP HL
                            LD (ADDR),HL
+                                  - 161 -

              223. ⠭ ० 뢠 ⠪,    
          ࠭  ⥪.
                            POP AF        ⠭ 䫠
                                          ॣ
                            JP PE,ON      室  祭
                            DI            饭 뢠
                            JR EXIT       室  "室"
                  ON:       EI            ࠧ襭 뢠
                  EXIT:     NOP            室  楤


              2.7.3. 樨 筮 䬥⨪  筮
              ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
                           ࠦ (BCD-䬥⨪).
                           ~~~~~~~~~~~~~~~~~~~~~~~~~~~
              224. ஢ઠ  ,    ᮤন  -
         業 筮 ᫮.
                            LD reg,A      ᯮ  
                            ADD A,0
                            DAA           ॢ ᮤন
                                            BCD-䬥⨪
                            CMP reg        ?
                            JR NZ,NN      ᫨ ,    뫮
                                           筮 ᫮ 
                                          믮 室 
                                            NN
              225. 筮 饭 .
                            ADD A,1
                            DAA
              226. 筮 㬥襭 .
                            SUB A,1
                            DAA
               ਬ  ⠪ :
                            ADD A,99
                            DAA



+                                  - 162 -

                          2.7.4.   ⠡栬.
                          ~~~~~~~~~~~~~~~~~~~~~~~~~~
              227.    稭.   ॣ஢   HL
         ᮤন   ⠡,    - 浪
            ⮩ ⠡. ॡ    -
          ᮤন  .
                            LD E,A
                            LD D,0          
                                          16- 
                            ADD HL,DE     ।  
                            LD A,(HL)     頥    A
               楤 筮  ᯮ,    ந
         - ४஢ .
              228.  塠 ⮢.   室
          HL.    - 浪   .   ॡ
                ॣ஢  HL.
                            EX DE,HL        ७  DE
                            LD L,A
                            LD H,0        ८ࠧ  
                                          2-
                            ADD HL,HL     㤢  (室
                                          ⮬,   ⠡
                                          塠 ᫠  
                                           ⭮⥫쭮 砫
                                          ⠡   
                                          )
                            ADD HL,DE       
                            LD E,(HL)      訩 
                            INC HL        ३  襬 
                                          ⠡
                            LD D,(HL)      訩 
                            EX DE,HL      । १  HL

              ਬ砭:    㤢  ਬ﫮  樥 ADD
         HL,HL,   ६   뫮  ࠧ  ADD A,A.   
         ⮬,  ADD A,A ࠡ⠥  ⥫쭮 筮 䬥⨪,
          ⮬ १ 㤥 ७ ⮫쪮  ⮢  0  127, 
         ADD HL,HL  ᯮ짮  ⭮ ᫮.
+                                  - 163 -

                            3.    

                    ⮢  ⮩   
         ਬ  ணࠬ    設      몥 . 
         ᯥ⪠     ணࠬ     ਤ  㯮ॡ   ⠪
         뢠        ᥩ,  ୮,  ᠬ
         㤮 ६  ⮣, ⮡  ।⠢  ⮬,  
         ⠪.
               ᬮਬ ᫥騥  ४⨢: ORG, EQU,  DEFB, DEFW,
         DEFM  END,  ०  祬   ᬮ७,   ⢥म
          ᥡ :
              1. ४⨢       
         Z80   ⮬ ᫥ ⭮襭  設  Z80  .
              2.  -  ணࠬ,  ॢ  (࠭᫨-
         ) ⥪, ᠭ        ꥪ ,
         騩 設.   ४⨢  -  
           ᥬ饩  ணࠬ.      ࠭᫨  
         ꥪ    ,      ᠭ,   ᠬ
          - ⥭ ணࠬ, ᠭ  .
              3.  ணࠬ-      ⢮ 
              ᢮ ᮡ⢥ ४⨢.  
            ४⨢,  । ࠧ  ॡ
           㯮ॡ.  ᫮, ⭮ ᯮᮡ  ᯮ짮-
          ४⨢    ⠭  樨  
         ᥬ饩 ணࠬ, ன   (. EDITAS,
         GENS 3, GENS 4, ZEUS  ..).   ⠭⮢   ,
         ⥬    ᭮騥    뤥
         ,   -   ⠭.

                             3.1.   ਨ.
                             ~~~~~~~~~~~~~~~~~~~~
               筥  ᠬ ⮣ -  ਥ.   -
          ᫥ ᨬ ";" (窠  ⮩).
              , 筮 ⭮,  ,   ﬨ,
           設      -     祬.
          㦠 ⮫쪮  ⮣, ⮡  뫮 㤮  ࠧ
          ⨭,   ⠢  - 㣮     ᠬ, 
         -.
+                                 - 164 -

                    ਬ:

          10        60001      LD E,A    ; 㧨  ॣ E ᮤ-
          20                             ;  .
          30        60002      DEC E     ; 訫   .
                      ..............................................
               , ப   ⮫쪮  .


                                3.2.   ⪨.
                                ~~~~~~~~~~~~~
              ⪨ ⥫쭮  ᠭ ணࠬ  
         .   室 JP, JR, DJNZ, 맮  ண-
         ࠬ CALL      㪠뢠  ,     
         ᮢ 室,      ⠢  .   㣮
         ஭,   㤥      ⮣ ,  -
         ⠢   ⠬, ਬ:

              10    60001   BEGIN   LD B,04
              20    60003   AGAIN   INC HL
              30    60004           DEC DE
              40    60005           DJNZ, AGAIN
              ..............................
             250    60110           LD A,(HL)
             260    60111           CP 80H
             270    60113           JR NZ,BEGIN
             ..................................

               , 祭  㤮. ࠧ ,    ப  40
          ⢫  ⪥ AGAIN, ᫨ ॣ B   ⨣
         .  ப 270  ⢫  ⪥  BEGIN.
              ।      롨    ⪨ ⠪ ,
         ஥ ᮮ⢥⢮     ᯮ塞 樨  - 
         砥 ⥭   ⨭ ணࠬ.
                樨  ᥬ  ணࠬ ᠬ ⠥
         稭 室 ᬥ饭     ⠢
           ⮪. , ਬ,  ப 40  DJNZ AGAIN 
         ꥪ   DJNZ FCH,    ᠬ.
+                                 - 165 -

                             3.3.  ४⨢ EQU.
                            ~~~~~~~~~~~~~~~~~~~~~~
               ।饬 ਬ   ᯮ짮 ⪨  祭 ࠭-
         祭.   ⮬,    饭   ⪥  ᠬ ⪠  -
         室      ⮩   楤.      , ᫨  
             ⪥,   室   㣮 -
         ,    ᠫ  ⪮஢   ,   
         , ᫨    ᤥ 室   楤     
         ⮬  ᯮ짮 ⪮?   ⮬ 砥   
         ४⨢ EQU.  ᢠ ⪥ ᫮ 祭.  -
         ,    樨    ४⨢      設  
         ८ࠧ뢠,  ᫨   ⥪ ணࠬ  뫪  
          ,    㤥 ⠢ 祭, ⮥  
         ४⨢ EQU.

              ਬ,    襩  ணࠬ ⭮  室
         뢠 楤  , ᪠  CLEAR (1EACH=7852)   OUT-LINE
         (1856H=6230).      砫  襩  ணࠬ     
         ४⨢ EQU 祭 ᢮ ⪠, ਬ    CLEAR
          OUT_L.
                   10  CLEAR       EQU  7852
                   20  OUT_L       EQU  6230
                   30  LABEL       EQU  60016
               뢠  楤   ࠧ 室
          ⪥.
                   30  60001       LD HL,(LABEL)
                   40  60004       LD BC, 0008
                   50  60007       LD DE,(0452)
                   60  60010       CALL CLEAR
                   70  60013       CALL OUT_L
                   80  60016       ....................................
                   ....................................................
              ࠧ      ।।,    ਢ  
         ਬ    窨  ७ ணࠬ  ᫥.  ⮫쪮
         ਬ ⮣,  ᯮ    ४⨢ 
          ᫨  㦥  ਬ ॠ ,     
          ,  ᫥ ,   㤥 ࠧ  ࠪ-
         ᪨ ਥ ணࠬ஢.
+                                 - 166 -

                        3.4.  ४⨢ DEFB, DEFW, DEFM.
                        ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~

                ࠧ ﭥ  ।騩 ਬ.  ப 30
          뫠  ॣ஢  HL ,  ᮤন   ,
           㪠뢠 ⪠ LABEL,  , ᮣ᭮ ४⨢ EQU
         㪠뢠   60016.
              ⠪,  祩 60016  60017 ᮤঠ  ,
          ᫥⢨  ᯮ짮 ணࠬ.   -
            ᫠  祩 ᠬ । 樥.  ᮢᥬ
            ⮣ ਢ 設 . ࢮ砫  -
         祭  祩     ⠢    ४⨢
         DEFB, DEFW  DEFM.

              DEFB - DEFINE BYTE -  .
              DEFW - DEFINE WORD -  "᫮" ("᫮" -  
              ᫥⥫쭮 ᯮ . 筮  .)
              DEFM - DEFINE MESSAGE -  ᮮ饭 ( ᪮쪮
                ⮢). 筮 ᥬ騥 ணࠬ
              뢠 ࠭祭  , ᪮쪮 ⮢  
               ४⨢ DEFM, ᪠   .    
               . ᫨     ᮮ饭,
                ⠢  ⮫쪮 ப DEFM, ᪮쪮
              .

              ⠪, DEFB        (0...255), DEFW -
               (0...65535),   DEFM -  㯯 
          ⮢ - ⥪⮢ ᮮ饭, ᫮ ⠡  ..

               襬 ।饬 ਬ, ᫨  ⨬ ࠭  
         60016  60017 ஥ 塠⭮ ᫮, ப 80 ᫥
          , ਬ ⠪:
                             ..................................
                   80  60016     DEFW 5C92H
                   90  60018 ...................................

              ।,      稭     60135 ࠭
         ᫮ "Spectrum".
+                                 - 167 -

                   ⠬:
                      60135      DEFB  53H      ; 㪢 "S"
                      60136      DEFB  70H      ; 㪢 "p"
                      60137      DEFB  65H      ; "e"
                      60138      DEFB  63H      ; "c"
                      60139      DEFB  74H      ; "t"
                      60140      DEFB  72H      ; "r"
                      60141      DEFB  75H      ; "u"
                      60142      DEFB  6DH      ; "m"
                  ࠬ ⮢:
                      60135      DEFW  5370H    ; "Sp"
                      60137      DEFW  6563H    ; "ec"
                      60139      DEFW  7472H    ; "tr"
                      60141      DEFW  756DH    ; "um"
                 ࠢ쭥    ᮮ饭:
                      60135      DEFM  5370656374   ; "Spect"
                      60140      DEFM  72756D       ; "rum"

                ᮡ  砩    ணࠬ஢  ,
          ⥪  ணࠬ ⮦  室   १ DEFB 
         DEFM.   砩,      ணࠬ   ஥
         .  ᥬ  ணࠬ  ॢ  
         設    ,     祣    
               .    -
           ७   "஢᪮"  ,      樥
          ணࠬ, ࠧ饭         
                 ⭮襭. ᥬ
                 ᥬ  ணࠬ 
         㤠 ⮫쪮  ᫥⥫쭮 ᨬ ⮢,  ..
         १ DEFB  DEFM.
                   ࢮ   㯮ॡ﫨  ᪨
         祭    ,  ⨯  add,  stk_data s_lt 
         ..,    ᠫ      쪮  㪢    ⫨稥  
         .     ࠭   㤥  ।  ⮫쪮
         ࠤ      㤮⢠  . ணࠬ- ⠪
           ,     ᫮.
              ⠪,      DEFB,  DEFW    DEFM    砫
         祭 ணࠬ  ६,    ணࠬ  ⠡,
+                                 - 168 -

         ᮮ饭      稥  ᫥⥫쭮  ,   
         䨪,    ⠪  ⠪    ᫥⥫쭮, 
         ᥬ ணࠬ  ,   .

                        3.5.  ४⨢ ORG, END.
                        ~~~~~~~~~~~~~~~~~~~~~~~~~

               ⠫ ᬮ  ᠬ ਢ  ४⨢.
         ४⨢  ORG    ,  稭    ண   㤥
         ᥬ஢ ணࠬ.    ࢮ ४⨢ 
         室  ⥪,      ਭ樯,  ।       
         ਨ.
               ⨫   ,   襯ਢ ਬ
          ᫥ ᠫ ⮫ ᮢ,    ࠧ 
             .    ,  ⮣    ணࠬ஢ 
               .  筮    ᠬ  砫 
         ४⨢
                      10              ORG  63000
           ᥬ ணࠬ ᠬ ⠥   祩
          㤥 室    .  祭 頥
          ணࠬ஢.  ᫨     ⮢
         ⥪,  ᠬ ࠢ  .

              ४⨢ END  ⬥砥   ணࠬ. ᫨  ᫥ 
         -      㤥  ,     樨 
         ந.

                 ,   砫 ⮨   ४⨢
         .      ४⨢,      
         ,   ࠢ   ᯮ짮  ࠧ   -
         ࠧ,      讬       㤮⢮ 90
         業⮢    ॡ⥩    ଠ樨,    ⠫쭮 
          ௭   樨   ⮬  ,  
         ࠡ⠥.




+                                 - 169 -


                      4.     .

               ९ ࠪ᪨ 몮  । 襬
          ஡ ࠧ  ॠ 楤.
               ᬮ५   ⢥  ਬ஢ ⢥   
         ,   ᢮ 쬠    ⥫.  
         ࣠ 뢮     ࠭ 梥  ?  
            㧪 ଥ ஢ ணࠬ (ਬ,
         "BOMB  JACK",  "INTERNATIONAL  KARATE").    ⢫ 
         設  ࠢ  ⨪  ,   
         뢥 ⥪  ࠭  .?

                   4.1. 뢮   梥 .
                   ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
                1   ,  ࠢ ஬ ந-
           ६ 訬 ⠬  254 (FE HEX).   ࣠-
         樨 뢮 ࠧ梥    ⮬, ⮡ 뤠 
         ⮬       ,  祬   
           筮 ⮩. ᫨  ᨣ  
         梥   ஢  ⥫ ࠦ,
           㢨 ⮫쪮     梥  (  
         ०    㧪    䮭).  ᫨  
         ᫨誮 ᮪,      ࠭   㧪   묨,
         ⠪    梥 㤭 ࠧ.
                ਬ ஬㥬  祭  梥
          ࠧ筮 ਭ.
               ࠡ ணࠬ ⠪.  롨ࠥ -
               , ஢       ,
         ⠭   梥 ,  ࠢ 祭   ⮢
         ( 0  7)   뤥ন , ⥬ , 祬  
         稭  㯨襣  .  ᫥  ⮣  믮 ਥ
         ᫥饣     ..
               㧪  ணࠬ ⨯  "INTERNATIONAL KARATE"   
         ᠬ ந室  ਥ ।    䮭
         . ,   ᮦ,  襭   ᬮ 
         ஡  ࠡ뢠 ᨣ, 㯨訩  䮭,
         ᪮  믮  楤, ᮤঠ  , 
+                                  - 170 -

         室  ࠬ     ᬮ७ ஡   
         " "  "ZX-" N 4,5   1991 .     "
         ணࠬ"  "ZX-" N1,2  1993 . ⮬ ᬮਬ ࠢ-
          ஬  쭮 ਬ.  ⮫쪮,   ᭮-
           ᫮    ᠭ  楤 ⠭⭮ 㧪
         ⮨  ᨭ஭樨 ࠡ 楤  ⮩ 㯫
         ᮢ  䮭  ,  ⨣  ⥫
         ⮬  横.
              楤 ᥬ஢, 稭   26000 (6590HEX)
           ᪠ RANDOMIZE USR 26000.

           .       
         6590   11FF3F   LD   DE,3FFF   DE 頥   
         6593   210000   LD   HL,0000   HL - 砫 
         6596   7E       LD   A,(HL)        
         6597   E607     AND  07       訥 5 ⮢ ᪨ (-
                                       ),  訥 
         6599   D3FE     OUT  (FE),A   - 뤠  254- 
         659B   7E       LD   A,(HL)   ୮  - 㦠 
                                          
         659   47       LD   B,A       ७  ॣ B
         659D   10FE     DJNZ FE       騩 横, 騩
                                       ⥬ , 祬 
                                       㯨訩 .
         659F   23       INC  HL       室    
         65A0   1B       DEC  DE       襭 稪 ⮢
         65A1   7A       LD   A,D      ஢ઠ  ,   稪
         65A2   B3       OR   E        (DE) ⨣ 0
         65A3   20F1     JR   NZ,F1    ᫨ ,  室  
                                       ७  । 
         65A5   C9       RET           室  楤

              ᪮쪮 ᫮  ⮬,  ᫥ ࠪ⨪   訬
         楤ࠬ.
              筮,    ᥣ      ணࠬ 
         ( ࠢ   ).      ⢠ 
         訡   楤. ࠢ ⥪,    
           ᫥ ࠭   樨  -
+                                  - 171 -

         ⥩,  㧨 設   ࠡ  .
                 楤 (  100...200 ⮢)   ਭ樯
           楤 ᫥⥫  ⮢  -
           㣨   - ,  祡  業
         ⠪ 室 ,      砥  
         訡  ᯮ짮   ⫠     ᥬ.
         쪮    । ஡ ᪮  㧨 
         設   . ⭮ 訡    筮
              ன ࠧ.
               ᮢᥬ  쪨 楤  ⨯ ⮩,     ਢ
         ,    믮        .    ⮬ 
         ॢ ⭠         
         १  FOR...READ...DATA...POKE...NEXT,      ᯮ짮
         -  -ணࠬ   ⭠筮   稪.
         ⭠  稪       祭 訥
           ( ᪮쪨 ),    , 
              ( 256  ⮢) 祭 ᫮  
         ࠩ 室, ⮡      ஫ 㬬
         ᫥  㯯  ( 8-   16-) ⮢   ਬ塞
         ⭠ਭ  稪    믮  ஢   
         ஫ 㬬.
               ,    㦤 ᥡ ਬ -
             ,    浪 ᪫祭  ᯥ
         稪  楤  .
              10 DIM a(22)
              20 FOR i=1 TO 22
              30 READ a(i)
              40 POKE (25999+i),a(i)
              50 NEXT i
              60 DATA 17,255,63,33
              70 DATA 0,0,126,230
              80 DATA 7,211,254,126
              90 DATA 71,16,254,35
              100 DATA 27,122,179,32
              110 DATA 241,201
              120 RANDOMIZE USR 26000


+                                  - 172 -

                4.2 뢮   ࠭  設 .
                ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
                1  㦥  ਫ  ⮬,     ᨬ
          ࠭ ᯮ   RST 010 ( D7 HEX).
          뢠 ᯮ ⥬  楤  ,   
         믮  㦭   ᨬ.  ࠢ, ०,  祬 -
             RST010,      ।ᬮ, ⮡  ⮣
         ᨬ,    ,  饭   -
         .    ᨬ,  ࠢ ,  ᨬ 䨪
         짮⥫, ⮪ 祢 ᫮        "-
         筨..." (.3, ⠡.1).

             ⮣, ⮡ 믮 ,  ।⥫쭮 
          :
            -   ( ᨬ,   );
            -   ( 梥⮬,   䮭);
            -  ;
             ,   ࠭ "㬠"  24 ப  32  -
         樨, 祬     ப   ⥬  
         뢮 ᮮ饭  樮 ⥬      -
           ॡ   ᯥ樠  ७,        ⠬  
         .
                  饭    㦭
           맮 RST 010.

            ᬮਬ  ਬ. ⨬,   
          業 ࠭ ࠧ "ZX-Spectrum", 祬 믮  
         梥⮬  ᨭ 䮭.
             ,    砫     AT 11,10
         - ப ᢥ (  ⮬ 㫥 )   
          ᫥.
            ⮢    ⠭: INK = 6 (  -
         ); PAPER = 1 ( ᨭ 䮭).
             ०, 祬 稭   ࠭,   
         ࠭   ࠭.
               뢠   맮   ⥬   楤    
         "CHAN_OPEN", 室饩     1601,   ⪠ ࠭  -
         楤ன "Clear LINES", 室饩   044.
+                                - 173 -

          .       

         6502  3E02      LD   A,02
         6592  CD0116    CALL 1601    뢠  "S"
         6595  0618      LD   B,18    ⢮ 頥 ப (24DEC)
         6597  CD440E    CALL 0E44    ⪠ 24- ப
         659A  3E16      LD   A,16     - 頥 ࠢ.  AT 
                                        न 樨
                                      
         659C  D7        RST  10      뢮  AT
         659D  3E0B      LD   A,0B    ⠭  ப (11)
         659F  D7        RST  10        ப
         65A0  3E0A      LD   A,0A    ⠭  ⮫
         65A2  D7        RST  10        ⮫
         65A3  3E11      LD   A,11    ⠭  PAPER
         65A5  D7        RST  10        PAPER
         65A6  3E10      LD   A,01    ⠭ 梥 䮭
         65A8  D7        RST  10       梥 䮭 (ᨭ = 1)
         65A9  3E10      LD   A,01    ⠭  INK
         65AB  D7        RST  10        INK
         65AC  3E06      LD   A,06    ⠭ 梥 ᨬ
         65AE  D7        RST  10       梥 ᨬ ( = 6)
         65AF  3E5A      LD   A,5A    ⠭  㪢 Z
         65B1  D7        RST  10       㪢 "Z"
         65B2  3E58      LD   A,58    ⠭  㪢 "X"
         65B4  D7        RST  10       㪢 "X"
         65B5  3E2D      LD   A,2D    ⠭   "-"
         65B7  D7        RST  10        "-"
         65B8  3E73      LD   A,73    ⠭  㪢 "s"
         65BA  D7        RST  10        "s"
         65BB  3E70      LD   A,70    ⠭  㪢 "p"
         65BD  D7        RST  10       㪢 "p"
         65BE  3E65      LD   A,65    ⠭  㪢 "e"
         65C0  D7        RST  10       㪢 "e"
         65C1  3E63      LD   A,63    ⠭  㪢 "c"
         65C3  D7        RST  10       㪢 "c"
         65C4  3E74      LD   A,74    ⠭  㪢 "t"

+                                 - 174 -

          .         
         656  D7         RST 10         㪢 "t"
         657  3E72       LD  A,72      ⠭  㪢 "r"
         65C9  D7         RST 10         㪢 "r"
         65CA  3E75       LD  A,75      ⠭  㪢 "u"
         65CC  D7         RST 10         㪢 "u"
         65CD  3E6D       LD  A,6D      ⠭  㪢 "m"
         65CF  D7         RST 10         㪢 "m"
         65D0  C9         RET           

              ᪠  楤 RANDOMIZE USR 26000.
                  ᯥਬ஢    ࠢ
         . , 筮, ,  ஫ ࠥ ࠧ⥫ <,>
         ()     PRINT.  뢠   ⮣,
            ⮨  㣮  ࠭.  ⮣ ࠢ-
         饣  ᨬ  06.  ஡      65B6  2D
         ( )    06   ᭮  楤  RANDOMIZE
         USR 26000.
               ஡ ⠢ 㤠    0D (ENTER,   
         R - CARRIDGE RETURN =  ,   " ") 
           楤.
              ᫨ ,    ᤥ, 룫廊    ,  
         筮 ,   ⬥⨬,     "㬠"   
          魠 楤  .    ࠧ
         楫 ப ("ਭ"),  뢠 PR-STRING   室 
          203.  楤  ᮪ ஢, 祬 RST 10  
          ᢮ ࠡ ᯮ 饭   RST 10,    -
         ࠬ.
              ⮡ ᯮ짮  楤,   ॣ DE -
          ,   ஬ 稭   ⥪,    
         뤠   ( ࠢ騬   AT, TAB, INK, PAPER  
         .).  ⮩ ப 頥   BC,  뢠 -
         楤 CALL 203C.
               ࠢ    ⥪ ⮩ 楤.

          .        
         203  78        LD   A,B       ஢ઠ BC  0, .. -
         203D  B1        OR   C        ⠭  ப  
+                                 - 175 -

          .       

         203E  0B        DEC BC       襭 稪  .
         203F  C8        RET Z        ᫨  稪  0, .. 
                                      ப ⠭,  室.
         2040  1A        LD A,(DE)    㧪  - ।
                                      ᨬ  襩 ப.
         2041  13        INC DE       室  । ᨬ.
         2042  D7        RST 10        ᨬ.
         2043  18F7      JR 203C      室  .

                 ⮩  楤 ᯥ⠥    ࠧ
         ZX-spectrum  ⥬  ਡ⠬  ⮬   ࠭.
                襩  ப  =  11    ᨬ  +  3 
         ࠢ (AT, INK, PAPER) + 2 ᫠ ⠭ 樨  砫
          + 2 ᫠ ⠭ 梥⮢ ਡ⮢ = 18 (12HEX).

          .       

         6590  011200    LD BC,0012    BC 㦠  ப.
         6593  119A65    LD DE,659A    DE -  砫 ப.
         6596  CD3C20    CALL 203C    맮 楤  ப.
         6599  C9        RET            뢠 ணࠬ.
         659A  16                     "AT"
         659B  0B                     ப 11.
         659C  0A                     ⮫ 10.
         659D  11                     "PAPER"
         659E  01                      ᨭ.
         659F  10                     "INK"
         65A0  06                      .
         65A1  5A                     Z
         65A2  58                     X
         65A3  2D                     -
         65A4  73                     s
         65A5  70                     p
         65A6  65                     e
         65A7  63                     c
         65A8  74                     t
+                                  - 176 -

          .        
         65A9  72                      r
         65AA  75                      u
         65AB  6D                      m


                4.3. ࠢ ணࠬ  ⮭-⨪.
                ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
                1  㦥 ᠫ  ⮪   ⮭--
         ⨪.  訢  譥  31(1F)  IN 31.
         ਭ   ⠪:
               0 -  ࠢ       3 -  
               1 -          4 - ""
               2 -           5...7  ᯮ
               ⢥ ਬ ᬮਬ ணࠬ,  㤥 -
         ᮢ  ࠭ ᨭ     , ᫨   
         .  ⨨ ⮩  ந 室   ணࠬ-
         . 砫쭠   - AT (11,15) -  業 ࠭.
              ᪮ ணࠬ 룫廊 ᪮쪮 ஬,   
         ⥪ ᯮ㥬 ⪨.

          ⪠ .        ਩
         6590        3E02     LD   A,02
         6592        CD0116   CALL 1601      뢠   
                                              ࠭
         6595        0618     LD   B,18
         6597        CD440E   CALL 0E44      ⪠ ࠭
         659A        3E0F     LD   A,0F
         659C        322B66   LD   (XPOS),A  ⠭ 砫쭮 
                                              (15)  ६
                                             XPOS, ࠧ饭  
                                             662B
         659F        3E0B     LD   A,0B
         65A1        322C66   LD   (YPOS),A  ⠭ 砫쭮 ப
                                               YPOS
         65A4        CD1266   CALL PRINT     맮 楤 
                                             ᨬ
         65A7  REP   DB1F     IN   A,(1F)    ਥ   ⨪.
+                                  - 177 -

          ⪠ .        ਩
         65A9        E61F     AND  1F        뤥 5  ⮢
         65AB        28FA     JR   Z,REP     , ᫨ ⨪ 
                                              ஭
         65AD        DEFF     LD   C,FF      ⠭ ࠬ஢
                                             饣 横 1
         65AF  HERE  00       NOP
         65B0        06FF     LD   B,FF      ⠭ ࠬ
                                             饣 横 2
         65B2  PAUSE 10FE     DJNZ PAUSE     ன 騩 横
         65B4        0D       DEC  C
         65B5        20F8     JR   NZ,HERE    騩 横
         65B7        CB67     BIT  4,A       ஢ઠ  ""
         65B9        C0       RET  NZ        室  맢 ணࠬ-
                                             , ᫨ 
         65BA        CB47     BIT  0,A       ஢ઠ ⠪ "ࠢ"
         65BC        200C     JR   NZ,RIGHT  室  ணࠬ
                                              ࠢ
         65DE        CB4F     BIT  1,A       ஢ઠ ⠪ ""
         650        201A     JR   NZ,LEFT   室  ணࠬ
                                              
         65C2        CB57     BIT  2,A       ஢ઠ ⠪ ""
         65C4        2028     JR   NZ,DOWN   室  ணࠬ
                                              
         656        CB5F     BIT  3,A       ஢ઠ ⠪ ""
         65C8        2036     JR   NZ,UP     室  ணࠬ
                                              
         65CA  RIGHT 3A2B66   LD   A,(XPOS)   -  ᫥
                                             ⮫ 
         65CD        3C       INC  A          㢥稢  1
         65CE        FE1F     CP   1F        ஢ઠ  ⨦
                                             ࠢ 
         65D0        CAA765   JP   Z,REP     ᫨ ,   
                                             ⨪
         65D3        322B66   LD   (XPOS),A  ᫨ ,  
                                              ⮫
         65D6        CD1266   CALL PRINT      맢 ணࠬ
                                             
+                                  - 178 -

          ⪠ .        ਩
         65D9        C3A765   JP   REP          
                                             ⨪
         65DC  LEFT  3A2B66   LD   A,(XPOS)   ⥪饣 ⮫
                                             
         65DF        3D       DEC  A          ⮫  1
         65E0        FE00     CP   00        ஢ઠ  ⨦
                                              
         65E2        CAA765   JP   Z,REP     ᫨ ,   
                                              ⨪
         65E5        322B66   LD   (XPOS),A  ᫨ ,  
                                             ⮫
         65E8        CD1266   CALL PRINT     맮 ணࠬ 
         65ED        C3A765   JP   REP          ⨪
         65EE  DOWN  3A2C66   LD   A,(YPOS)   -  ᫥
                                             ப 
         65F1        3C       INC  A          㢥稢  1
         65F2        FE16     CP   16        ஢ઠ   ࠩ
         65F4        CAA765   JP   Z,REP     ᫨ ,   
                                              ⨪
         65F7        322C66   LD   (YPOS),A  ᫨ ,  
                                              ப  맢
         65FA        CD1266   CALL PRINT     ணࠬ 
         65FD        C3A765   JP   REP          
                                             ⨪
         6600  UP    3A2C66   LD   A,(YPOS)   ⥪饩 ப 
         6603        3D       DEC  A           ப  1
         6604        FE00     CP   00        ஢ઠ  ⨦
                                             孥 
         6606        CAA765   JP   Z,REP     ᫨ ,   
                                              ⨪
         6609        32266   LD   (YPOS),A  ᫨ ,  
                                             ப
