
1140         RET
1150 DWN_H   INC     H
1160         LD      A,H
1170         AND     7
1180         RET     NZ
1190         LD      A,L
1200         ADD     A,32
1210         LD      L,A
1220         RET     C
1230         LD      A,H
1240         SUB     8
1250         LD      H,A
1260         RET
1270 UP_D    DEC     D
1280         LD      A,D
1290         AND     7
1300         CP      7
1310         RET     NZ
1320         LD      A,E
1330         SUB     32
1340         LD      E,A
1350         RET     C
1360         LD      A,D
1370         ADD     A,8
1380         LD      D,A
1390         RET
1400 BUFF    DEFS    7488

7530: CD A3 75 11 FF 57 21 56 :68
7538: 93 06 D2 C5 D5 E5 78 01 :10
7540: 20 01 FE C1 30 1F 7A 2F :8D
7548: E6 07 20 19 7A 0F 0F 0F :8A
7550: E6 03 D5 E5 C5 57 21 17 :BC
7558: 76 19 F6 58 57 01 20 00 :22
7560: ED B8 C1 E1 D1 C5 E5 D5 :6C
7568: C5 01 20 00 ED B8 C1 D1 :FA
7570: E1 CD 06 76 7A FE 40 DD :A4
7578: E1 38 0E DD E5 10 E7 A7 :74
7580: ED 42 C1 04 7A FE 40 30 :D1
7588: DC E1 01 20 00 A7 ED 42 :B1
7590: D1 C1 78 FE C1 30 04 CD :CF
7598: 06 76 78 FE 41 30 01 76 :E7
75A0: 10 99 C9 AF D3 FE 21 00 :28
75A8: 58 11 01 58 01 FF 02 77 :58
75B0: ED B0 21 17 76 11 00 40 :C1
75B8: 01 00 18 ED B0 11 17 76 :81
75C0: 01 00 03 ED B0 21 00 40 :37
75C8: 06 C0 E5 C5 01 20 00 ED :BB
75D0: B0 C1 E1 CD F7 75 10 F2 :D2
75D8: D5 E1 13 70 01 3F 02 ED :B5
75E0: B0 21 00 40 11 01 40 70 :28
75E8: 01 FF 17 ED B0 13 23 01 :48
75F0: FF 02 36 47 ED B0 C9 24 :6D
75F8: 7C E6 07 C0 7D C6 20 6F :68
7600: D8 7C D6 08 67 C9 15 7A :67
7608: E6 07 FE 07 C0 7B D6 20 :A1
7610: 5F D8 7A C6 08 57 C9 00 :25
*******************************************************************************
(c) 誨 ᠭ, 1996

     ᠭ ।   ⥪:
     1. ᮪ ணࠬ:
INC  HL        [6 ⠪⮢]
DEC  BC        [6 ⠪⮢]
LD   A,B       [4 ⠪]
OR   C         [4 ⠪]
JR   NZ,LOOP   [7/12 ⠪⮢]

      :

CPI            [16 ⠪⮢]
JP   PE,LOOP   [10 ⠪⮢]

     1   ࠡ⠥ ॥.

     2.  ᫥饩 樨 ᮤন  㤥 㬥 
 ,  ⠭ ࠢ MIN, 쭥襣 㬥襭  ᫥.
CP   MIN+1
CCF
SBC  A,0
     ,  ⮣,  ਢ ணࠬ  ⥪   ⥬ ஫
⮣  ᭨    ᥫ. ⫨稥   ⮬,    ॡ
ᯥ樠쭮 .

 10         ORG     40000
 20 START   LD      HL,TXT
 30         PUSH    HL
 40 M1      LD      C,8
 50 M2      LD      B,20          ; ਭ   
 60         PUSH    BC
 70         LD      B,#63         ;    ᥫ
 80         LD      HL,#4806      ;   孥 㣫
 90 M3      PUSH    BC
100         LD      D,H
110         LD      E,L
120         INC     H
130         LD      A,H
140         AND     7
150         JR      NZ,$+12
160         LD      A,L
170         SUB     #E0
180         LD      L,A
190         JR      NC,$+6
200         LD      A,H
210         SUB     8
220         LD      H,A
230         LD      BC,20         ; ਭ   
240         PUSH    HL
250         LDIR
260         POP     HL
270         POP     BC
280         DJNZ    M3
290         EX      DE,HL
300         POP     BC
310         POP     HL
320         PUSH    HL
330 M4      PUSH    HL
340         PUSH    DE
350         LD      A,(HL)
360         INC     A
370         ADD     A,A
380         LD      H,0
390         LD      L,A
400         ADD     HL,HL
410         ADD     HL,HL
420         LD      DE,FONT-256
430         ADD     HL,DE
440         LD      A,L
450         SUB     C
460         JR      NC,$+3
470         DEC     H
480         LD      L,A
490         LD      A,(HL)
500         POP     DE
510         LD      (DE),A
520         POP     HL
530         INC     HL
540         INC     DE
550         DJNZ    M4
560         LD      B,4           ; ᪮ ६饭
570 M6      HALT
580         LD      A,#BF
590         IN      A,(#FE)
600         RRCA
610         JR      NC,EXIT
620         DJNZ    M6
630         DEC     C
640         JR      NZ,M2
650         LD      A,(HL)
660         OR      A
670         EX      (SP),HL
680         JR      NZ,M1
690 EXIT    POP     HL
700         RET
710 TXT     DEFM    "                    "
720         DEFM    "     Written by     "
730         DEFM    "    Andrijashkin    "
740         DEFM    "       @ 1996       "
750         DEFM    "                    "
760         DEFB    0
770 FONT    EQU     15616

     ⮡ 楤 ࠡ⠫ , , ⮡  ⥪ 뫠 ⭠
ਭ  (  砥 20),  ᫥ ⮣   0.

9C40: 21 A1 9C E5 0E 08 06 14 :4F
9C48: C5 06 63 21 06 48 C5 54 :9A
9C50: 5D 24 7C E6 07 20 0A 7D :7D
9C58: D6 E0 6F 30 04 7C D6 08 :A7
9C60: 67 01 14 00 E5 ED B0 E1 :DB
9C68: C1 10 E3 EB C1 E1 E5 E5 :0F
9C70: D5 7E 3C 87 26 00 6F 29 :E0
9C78: 29 11 00 3C 19 7D 91 30 :E1
9C80: 01 25 6F 7E D1 12 E1 23 :16
9C88: 13 10 E4 06 04 76 3E BF :A8
9C90: DB FE 0F 30 0A 10 F6 0D :61
9C98: 20 AC 7E B7 E3 20 A5 E1 :BE
9CA0: C9 20 20 20 20 20 20 20 :E5
9CA8: 20 20 20 20 20 20 20 20 :44
9CB0: 20 20 20 20 20 20 20 20 :4C
9CB8: 20 20 57 72 69 74 74 65 :13
9CC0: 6E 20 62 79 20 20 20 20 :45
9CC8: 20 20 20 20 20 41 6E 64 :17
9CD0: 72 69 6A 61 73 68 6B 69 :C1
9CD8: 6E 20 20 20 20 20 20 20 :C2
9CE0: 20 20 20 20 40 20 31 39 :C6
9CE8: 39 36 20 20 20 20 20 20 :B3
9CF0: 20 20 20 20 20 20 20 20 :8C
9CF8: 20 20 20 20 20 20 20 20 :94
9D00: 20 20 20 20 20 00 00 00 :3D

     , ᠭ । ᯮ짮  楤   
 蠡 㪢,   ADD HL,HL  ADD A,A.  ⮬ 
11-4=7 ⠪⮢.   ⮬   ᯮ짮 ᨬ    127.
   ᤥ   ன  ADD HL,HL, ᮪⨢ ᫮ ᨬ 
64.
     ᫨  ணࠬ ப  70  280 뤥  ணࠬ  뢠 
 ࠧ,    ஫ 㪢  .
*********************************************
(C)1996 ⮢ ࣥ, ਭ

    ZX- 96/4-5,  ࠧ "",  ⪭  楤  
. ਭ樯, ᯮ짮  .   ᮢᥬ ,  ᠬ ணࠬ 
맢   ७ . "誮  譨 ⮢!" - 㬠   
ᥫ  .
   ᪮  楤ન 㦥 뫨  ᠭ  ⫠. ਭ樯 ࠡ ⠫
०,   ࠧ  ⥫쭮  㬥訫. ⠪, "ᢥ" 楤:
Listing 1.  楤ન.

REDEF   ;    
        ; 室:
        ; B=訩   
        ; A=᪠ ⮩  ( ⠭  1)
        LD      BC,#FEFE ;   
LP_DEF  RRC     B        ;"஡"  
        IN      A,(C)    ;뢠   
        CPL              ;㥬  
        AND     #1F      ;뢠 3 㦭 
        JR      Z,LP_DEF ;᫨  ⨩,  த
        RET              ;  楤
;
TRANSF  ;  REDEF   ᨬ
        ; 室:
        ; B=訩   
        ; A=᪠ ⮩  ( ⠭  1)
        ; 室:
        ; A=  (C.S.=#E3, S.S.=#0E, ENTER=#0D)
        LD      H,B     ;H= 
        LD      B,#04   ;।塞
LPTR1   RRA             ; 浪
        JR      C,GOTR1 ; 
        DJNZ    LPTR1   ; 
GOTR1   LD      A,B     ;  拉
        ADD     A,A     ;㬭
        ADD     A,A     ; 
        ADD     A,A     ;  8
        LD      B,#07   ;।塞
LPTR2   RR      H       ; 浪
        JR      NC,GOTR2; 
        DJNZ    LPTR2   ; 鸞
GOTR2   ADD     A,B     ;ਡ塞 K 
        ADD     A,#05   ;ᬥ饭
        LD      L,A     ;  ⠡
        LD      H,#02   ; ⠡  : #0205
        LD      A,(HL)  ;A=   ⠡
        RET             ;室  楤

   ⪠ REDEF.   ⨥    (஬ RESET, ⢥),   
१ ࠡ 頥  ॣ  A    (  ᯮ: "ᨤ  
㡥!").  B  ᮤন  訩       (),  
   室 ᪠ ⮩  (ᮮ⢥騩  祭). 
 楤 13 .
   ⪠ TRANSF - ४஢   ᨬ.  ।饩 楤  
ࠡ뢠 ,  ᮮ⢥⢨  ⠡楩
  ( ⠡ #0205),    ᨬ 頥  .   
A=(#30..#39, #41..#5A) -   ய ᪨ 㪢.  ⠪  
⬥,  ᨬ 蠬 ᢮  ᫥騥 : SPACE - #20, 
CAPS SHIFT - #E3,  SYMBOL SHIFT - #0E, ENTER - #0D.  楤 28 .

    ZX- 96/3  . 51  㡫   ॥  
ࠡ⠭  楤ன  ࠩ  ஢ (ZX- 95/4, . 15).  
,   ᮣᥭ,  ᪮  㢥稫,       ॥.   
"ਣ쭮  ⬠, ਤ㬠 " -    , ⠪   
 ,  ᪠...
   ᮫⭮ ⠪     ࠪ᪨     
ணࠬ, ᯮ饩 ࠩ⮢ (஢) 䨪. ਬ  ணࠬ, 
᭮   ⮤,     ப ࠭ 
 "મ". ਬ, ZX FORUM'94 - ⠬ ५ 뢮   
⠪  ᯮᮡ.      ZX  95/5 -    . 29 楤 
 42 ᨬ  ப ᯮ   孨. 宦,  "⥭ 
ᨯ".
   ३  ⭮    ⭮ -   楤, ࠡ饩 
॥ ।饩. ࠩ, ᬥ饭   ⭮⥫쭮  ࠢ 0 
   ⤥쭮 ணࠬ    ࠭ ࠪ᪨  
.  ꥬ 室㥬   㢥稫,    ⥫쭮 
 ᪮ ணࠬ  ० ᥣ ᪮ 뢮  ࠭, ⠪ 
   ⠪   譮. , 楤  뢠    ᨪ, 
⠪   設 ,    㠫쭮.  楤 220 .

Listing 2.  뢮 ࠩ

;      SPRITE OUTPUT 2.3
;      (C)SERZHSOFT'1996
;DEF FN M(X,Y,L,H,A,O)=USR 65005
;
        ORG     65005   ; ᥬ஢
;
DEF_FN  ;窠 室  ᨪ  DEF FN
        LD      IX,(#5C0B)      ;IX= ࠬ஢ DEF FN
        LD      D,(IX+4)        ;X-न ࠩ
        LD      E,(IX+12)       ;Y-न ࠩ
        LD      B,(IX+20)       ;ਭ ࠩ  
        LD      C,(IX+28)       ; ࠩ  ᥫ
        LD      L,(IX+36)       ; ࠩ
        LD      H,(IX+37)       ;  
        LD      A,(IX+44)       ;० 뢮  ࠭
;
PUTSPR  ;窠 室  . 
        ;D: X-न, : Y-न
        ;B: ਭ, C: 
        ;HL:  ࠩ
        ;A: ० 뢮 (0=OR, 1=XOR, 2=AND)
        EX      AF,AF'  ;ୠ⨢ 
        XOR     A       ;  -
        EX      AF,AF'  ;  㤥 ᪠  ᤢ
        CP      1       ;஢ઠ:
        LD      A,180   ; ᫨ A<1 (.. A=0), 
        JR      C,GOPS1 ; A=180 (OR H)  室
        LD      A,172   ;᫨ A=1, 
        JR      Z,GOPS1 ; A=172 (XOR H)  室
        LD      A,164   ;᫨ A>1,  A=164 (AND H)
        EX      AF,AF'  ;ࠧ AND,  室
        CPL             ; AF'=255,  
        EX      AF,AF'  ; 믮塞 (A=0, CPL => A=255)
GOPS1   LD      (MODE_1),A      ;ࠢ塞
        INC     A               ; 室
        LD      (MODE_2),A      ;  뢮
        INC     A               ;  ᨬ
        LD      (MODE_5),A      ;  ० (OR, XOR, AND)
        EX      AF,AF'          ;A=᪠ ᤢ
        LD      (MODE_0+1),A    ;⨫ "㤠 "
        AND     D               ; ""  X-.
        AND     #07             ;⥯ A=0..7: ᬥ饭
        LD      (MODE_4+2),A    ;  ⠡ TBL_OR
        LD      A,D     ;न X
        AND     #07     ; ࢮ    ࠭
        EX      AF,AF'  ;  AF'
        PUSH    HL      ;㫨  ࠩ  ⥪
        LD      A,#BF   ;ᨬ쭠 Y-न
        SUB     E       ; न
        LD      E,A     ; ᭨-
        LD      A,E     ;------------------------
        RRA             ;    ࠭
        SCF             ;     न⠬:
        RRA             ;
        RRA             ; 室:
        AND     #5F     ; D=X-न
        LD      H,A     ; E=Y-न
        XOR     D       ;
        AND     #07     ; 室:
        XOR     D       ; HL=  ࠭
        RRCA            ;
        RRCA            ;D,E   
        RRCA            ;
        LD      L,A     ;ᯮ
        LD      A,E     ; 
        XOR     H       ;
        AND     #07     ;
        XOR     H       ;
        LD      H,A     ;------------------------
        EX      AF,AF'          ;ᯮ  
        JR      Z,NOSHFT        ;᫨ =0,  室
        LD      (JUMPER+1),A    ;⨫  JR  릪
        LD      IX,TBL_OR       ;IX= ⠡ TBL_OR
MODE_4  LD      A,(IX+0)        ;  ᬥ饭 0..7 
        LD      (MODE_3+1),A    ; ⠡ ( OR)
        POP     IX      ;IX= 砫 ࠩ
        EX      DE,HL   ;DE=   ࠭
LPPS1   PUSH    BC      ;࠭ ਭ  
        LD      A,E     ;࠭ ॣ E
        EX      AF,AF'  ;  AF'
LPPS2   LD      L,(IX+0);L= ࠩ
MODE_0  LD      H,#00   ;H=0  OR, XOR; H=255  AND
JUMPER  JR      $       ;릮 १ 譨 ADD HL,HL'
        ADD     HL,HL   ;-------------
        ADD     HL,HL   ;
        ADD     HL,HL   ;ᤢ 
        ADD     HL,HL   ; ࠩ
        ADD     HL,HL   ; 㦭
        ADD     HL,HL   ; ᫮ ࠧ
        ADD     HL,HL   ;
        ADD     HL,HL   ;-------------
        LD      A,(DE)  ;﫨   ࠭
MODE_1  OR      H       ;OR, XOR  AND
        LD      (DE),A  ;⠢ 
        INC     E       ;᫥騩  ࠭
        LD      A,L     ; ॣ L 㦭묨
MODE_3  OR      #00     ; 祭묨 ⠬ (-
        LD      L,A     ;  ADD HL,HL', A RLC HL')
        LD      A,(DE)  ;  ࠭
MODE_2  OR      L       ;OR,XOR  AND
        LD      (DE),A  ;⨫ ⭮
        INC     IX      ;᫥騩  ࠩ
        DJNZ    LPPS2   ; "ਭ" ࠧ
        EX      AF,AF'  ;⠭
        LD      E,A     ; ॣ E
        INC     D       ;᫥  ࠭
        LD      A,D     ;᫨ . 3  ॣ D
        AND     #07     ; ࠢ , 
        JR      Z,GOPS3 ; 室  ४஢
GOPS2   POP     BC      ;⠭ ਭ  
        DEC     C       ; 横
        JP      NZ,LPPS1; "" ࠧ
        RET             ;室  楤
GOPS3   LD      A,E     ;--------------------
        ADD     A,#20   ;
        LD      E,A     ;४஢ DE
        JR      C,GOPS2 ;  室 
        LD      A,D     ;  
        SUB     #08     ; ( ࠭)
        LD      D,A     ;
        JP      GOPS2   ;--------------------
;
NOSHFT  ;뢮 ࠩ  ⠬ (X-न ⭠ 8)
        POP     DE      ;DE= ࠩ  
LPPS3   PUSH    BC      ;࠭ ਭ  
        LD      A,L     ;
        EX      AF,AF'  ; ॣ L  AF'
LPPS4   LD      A,(DE)  ;﫨  ࠩ
MODE_5  OR      (HL)    ;OR, XOR  AND
        LD      (HL),A  ;⨫  ࠭
        INC     DE      ;᫥騩  ࠩ
        INC     L       ;᫥騩  ࠭
        DJNZ    LPPS4   ;横 "ਭ" ࠧ
        EX      AF,AF'  ;⠭
        LD      L,A     ; ॣ L
        INC     H       ;諨  ᫥饩  ࠭
        LD      A,H     ;᫨ 訥 3  ॣ H
        AND     #07     ; ࠢ , 
        JR      Z,GOPS5 ; ३  ४஢
GOPS4   POP     BC      ;ᯮ ਭ  
        DEC     C       ;ਫ
        JP      NZ,LPPS3; "" ࠧ
        RET             ;室  楤
GOPS5   LD      A,L     ;-------------------
        ADD     A,#20   ;
        LD      L,A     ;४஢ HL
        JR      C,GOPS4 ;  室
        LD      A,H     ;   
        SUB     #08     ; ( ࠭)
        LD      H,A     ;
        JP      GOPS4   ;-------------------
;
;⠡     ᫥  ᤢ
;( 樨  "RLC HL" १ ADD HL,HL)
TBL_OR  DB      #00,#7F,#3F,#1F,#0F,#07,#03,#01
;
;END OF SPRITE OUTPUT 2.3


Listing 3.  楤 SPRITE OUTPUT

FDED: DD 2A 0B 5C DD 56 04 DD :6C
FDF5: 5E 0C DD 46 14 DD 4E 1C :DA
FDFD: DD 6E 24 DD 66 25 DD 7E :2C
FE05: 2C 08 AF 08 FE 01 3E B4 :DF
FE0D: 38 09 3E AC 28 05 3E A4 :45
FE15: 08 2F 08 32 72 FE 3C 32 :62
FE1D: 7A FE 3C 32 A0 FE 08 32 :D9
FE25: 66 FE A2 E6 07 32 58 FE :9E
FE2D: 7A E6 07 08 E5 3E BF 93 :0F
FE35: 5F 7B 1F 37 1F 1F E6 5F :E6
FE3D: 67 AA E6 07 AA 0F 0F 0F :10
FE45: 6F 7B AC E6 07 AC 67 08 :E1
FE4D: 28 4C 32 68 FE DD 21 C1 :16
FE55: FE DD 7E 00 32 77 FE DD :30
FE5D: E1 EB C5 7B 08 DD 6E 00 :BA
FE65: 26 00 18 FE 29 29 29 29 :43
FE6D: 29 29 29 29 1A B4 12 1C :0B
FE75: 7D F6 00 6F 1A B5 12 DD :13
FE7D: 23 10 E2 08 5F 14 7A E6 :6B
FE85: 07 28 06 C1 0D C2 5F FE :A5
FE8D: C9 7B C6 20 5F 38 F4 7A :BA
FE95: D6 08 57 C3 88 FE D1 C5 :A7
FE9D: 7D 08 1A B6 77 13 2C 10 :B6
FEA5: F9 08 6F 24 7C E6 07 28 :C8
FEAD: 06 C1 0D C2 9C FE C9 7D :21
FEB5: C6 20 6F 38 F4 7C D6 08 :8E
FEBD: 67 C3 AE FE 00 7F 3F 1F :6E
FEC5: 0F 07 03 01 FD FD FD FD :D1

     ᥬ 㦥 ᪮쪮 ,   ६ ⠪    
ਭ樯 ࠡ (뤮誠!)  DAA (#27).   , 㧨 
ॢ STS,   ⠫쭮 ࠧࠫ  ⬥ ࠡ ⮩ 
樨, 祬    ⥬,   - 稭    ⮣  
ᤥ.
    ࠡ   䫠 C,H,N,  ⠪ ᮤন ॣ A. 
:
 1. ᫨ 䫠 N 몫祭 (ࠢ 0),   ᫥ 蠣 믮 
   ᫮. ᫨  祭 (ࠢ 1),   ⠭.
 2. ᫨   #90  䫠 C 祭,    
    ਡ (⠥) #60.   砩 ᠭ "". ᫨  
    A>#90,   CF=1,  ᫮ (⠭) #60  ந室 ᥣ   ࠧ.
 3. ᫨ 訩 㡠  #9   䫠 H 祭,  筮 .2  
     ਡ (⠥) #06.  ⠪ ࠡ⠥ ਭ樯 
    OR.

    ,     䥪⨢  ਥ ணࠬ஢...
   - ࠧ, ணࠬ  ᥬ,  ⮫   ஡.  
⥭ᨢ ࠡ  ࠭    ᯮ짮 讥 ⢮   
  横. ஢ ᪨  墠⠫,  ᯮ짮 ⥪  
।⠢﫮  -   ⠭  .
 室  -⠪ 襫.
   뫮 襭,   ॣ 㤥 ⢥ ࠧ  ᪮쪮 ६  
横.   , ਬ୮, 룫拉:
          ...
          LD   A,%00000101
   ;:         xxxyyzzz
   LP1    OR   %00010000
   LP2    OR   %10000000
   LP3    EX   AF,AF'
          ...
          EX   AF,AF'
          SUB  %00100000
          JR   NC,LP3
          AND  %00011111
          SUB  %00001000
          JR   NC,LP2
          AND  %00000111
          SUB  %00000001
          JR   NC,LP1
          ...
    ଠ 몮,   ६  横 ⢮   
᪮  ॣ A.  襯ਢ ਬ  ࠧ  
 :   0,1,2; 3,4; 5,6,7.  ᫮ 横 뫮 ᮮ⢥⢥ 6, 3, 5.  
  浪  ⮢, ⥬  横.  祭,   
  LD A,...; OR ...      ᫠ 믮塞 
横.  ᠬ 譥 横  SUB ...   DEC A  ᫥饩 
஢મ  䫠 Z.      ⮬ 砥   LD A,... 室  
ॠ쭮 ᫮ 横,   㬥襭  1.   AND ... 뢠
