(c) .ᠭ஢, ..

    ணࠬ ந ᫥ 䠪ਠ. ᮡ   ⮬,  
। ᫥ ࠭祭,  ந  ⥪饣 ⥫.

10 INPUT A : CLS
20 LET E=0 : LET B=1
30 FOR C=1 TO A : LET B=B*C
40 IF B<10 THEN GOTO 80
50 LET B=B/10 : LET E=E+1
60 IF B>10 THEN GOTO 50
70 PRINT AT 0,0;C
80 NEXT C
90 PRINT AT 0,0;A;"!=";B;"E+";E : GOTO 10

********************************************************** 
(c) .稭楢, ஢᪠ .

      ⠫  ZX  95/2 ணࠬ ⮭ ७ " OPTION SELECTOR". 
  । ⥫ ᢮  "OPTION SELECTOR'".   150 
.
    ⮭  뤥 樨 ᯮ ਡ,   ᯮ 楤 
 ᨬ, 뢠   ࠦ  "OVER".  ⮭   
"OPTN" 㦠  ࠭ 㭪,    ணࠬ  室 
 㦭 . 祬, ᫨   㦭,   㧭  ࠭ 
㭪  ⪥ "NUM".

          ORG 40000
OPR       CALL PRINT
          CALL PAUSE
OPR1      LD A,#FD
          IN A,(#FE)
          BIT 0,A
          JR Z,DOWN
          LD A,#FB
          IN A,(#FE)
          BIT 0,A
          JR Z,UP
          LD A,#7F
          IN A,(#FE)
          BIT 0,A
          JR Z,FIRE
          JR OPR1
PAUSE     LD B,5
MM        HALT
          DJNZ MM
          RET
DOWN      CALL PRINT
          LD A,(YC)
;       1->
          CP 5
          JR Z,OPR
          INC A
          LD (YC),A
          LD A,(NUM)
          INC A
          LD (NUM),A
          CALL PAUSE
          JR OPR
UP        CALL PRINT
          LD A,(YC)
;       2->
          CP 0
          JR Z,OPR
          DEC A
          LD (YC),A
          LD A,(NUM)
          DEC A
          LD (NUM),A
          CALL PAUSE
          JR OPR
FIRE      LD A,(NUM)
          LD DE,VETKA
          LD L,A
          LD H,0
          ADD HL,HL
          ADD HL,DE
          LD E,(HL)
          INC HL
          LD D,(HL)
          EX DE,HL
          JP (HL)
PRINT     LD (IY+87),3
          LD HL,CUP
          LD A,(SH)
          LD B,A
L1        LD A,22
          RST 16
          LD A,(YC)
          RST 16
          LD A,(XC)
          RST 16
          INC A
          LD (XC),A
          LD A,(HL)
          RST 16
          DJNZ L1
          LD A,(XPC)
          LD (XC),A
          LD (IY+87),0
          RET
YC        DEFB 0
XC        DEFB 0
XPC       DEFB 0
NUM       DEFB 0
CUP       DEFB 143
SH        DEFB 10
          DEFW;    ADR1
          DEFW;                  ADR2
          DEFW;                   .
          DEFW;
           .
           .
           .
      ணࠬ:
    ⪠ YC -  樨;
          XC -   X;
          XPC-   ࠢ  ࢮ  ⪨ XC, ⮡   
               룠  ࠭;
          NUM-  樨;
          CUP-  ᨬ;
          SH - ਭ 樨;
          VETKA -  室.
     祭 "CP" ( 1->, 2->),   㢥  㬥 
⢮ 롥ࠥ 㭪⮢.
     ࠢ  ⮩ ணࠬ: Q, A, SP.
   ***********************************************************************
    ࣥ ᥥ  . ᪮ ᫠ ᪮쪮 ணࠬ.
    :     "⠣ 128"  AY,     ன  ⥬ 
,  ᤥ ।  ஢:

          ORG 40000
          LD HL,23290
          LD A,8
          LD E,3       ;梥 ᪨ 
          CALL KANAL
          LD HL,23291
          LD A,9
          LD E,5
          CALL KANAL
          LD HL,23292
          LD A,10
          LD E,7
          CALL KANAL
          RET
KANAL     LD BC,#FFFD
          OUT (C),A
          LD A,#3D
          LD (MODE),A
          IN A,(C)
          AND 15
          LD B,16
LOOP      CP 0
          CALL Z,STIR
LAB1      LD (HL),E
          PUSH DE
          LD DE,32
          SBC HL,DE
          POP DE
MODE      DEC A
          DJNZ LOOP
          RET
STIR      XOR A
          LD (MODE),A
          LD E,0       ;梥 ࠭
          RET

     樨 ⮩ ணࠬ  ᯮ짮 ᫥騩 BASIC-:

  10 INK 7: PAPER 0: BORDER 0: C
LEAR 39999: RANDOMIZE USR 15619:
 REM : LOAD "ind_ay"CODE
  15 INPUT "FILENAME "; LINE A$
  16 INPUT "ADRES "; LINE D$: IF
 D$="" THEN LET ADR=49152: GO TO
 20
  17 LET ADR=VAL D$
  20 RANDOMIZE USR 15619: REM :
LOAD A$CODE ADR
  30 INPUT "INIT "; LINE I$: IF
I$="" THEN LET INIT=49163: GO TO
 32
  31 LET INIT=VAL I$
  32 INPUT "NEXT "; LINE N$: IF
N$="" THEN LET NEXT=49166: GO TO
 40
  33 LET NEXT=VAL N$
  40 RESTORE 90: FOR N=0 TO 7: R
EAD A: POKE USR "A"+N,A: NEXT N
  50 FOR Y=8 TO 21: PRINT AT Y,2
6;"AAA": PRINT #0;AT 0,26;"AAA";
AT 1,26;"AAA"
  60 RANDOMIZE USR INIT
  70 RANDOMIZE USR NEXT: PAUSE 1
: RANDOMIZE USR 40000: IF INKEY$
="" THEN GO TO 70
  80 RANDOMIZE USR INIT
  90 DATA 238,238,2388,0,238,238
,238,0
******************************************************************************
    : ᠭ   .ப쥢᪠ ᫠ ᮪饭  5   
᪮७ ਠ "饩 ப", 㡫  ZX  95/6 (MUGY).

          LD HL,#401F;  孥 ࠢ 㣫  ப
          LD C,8
LOOP1     LD B,32    ; ਭ ப  
          LD E,L
          OR A
LOOP2     RL (HL)
          DEC L
          DJNZ LOOP2
          LD L,E
          INC H
          DEC C
          JR NZ,LOOP1
          RET

     ⠪ । ᢮ ਠ  稪 ࠭:

;  (C)    BY KABANOV ALEXANDR
          DI
          XOR A
          SUB 1
          EX AF,AF'
          LD C,COLOUR
          LD IX,#4000
          LD DE,#0020
          CALL #56A
          LD B,191
LOOP      PUSH BC
          LD H,C
          LD BC,224
          ADD IX,BC
          LD A,7
          DEFB #DD
          AND H
          JR NZ,PROD
          DEFB #DD
          LD A,L
          ADD A,32
          DEFB #DD
          LD L,A
          JR C,PROD
          LD BC,63488
          ADD IX,BC
PROD      LD C,H
          LD E,32
          CALL #5A9
          POP BC
          DJNZ LOOP
          LD D,3
          CALL #5A9
          EI
          RET

     稪 ५㥬,  61 .   -   
 , 騩 ࠩ⮬,   - ਡ.
  Ŀ
  COLOR                      
  Ĵ
   0,7    ୮-  ୮-멳
   1,6    ᨭ-   ᭮-㡮 
   2,5  ᭮-㡮   ᨭ-   
   3,4 ୮-멳  ୮-   
  
      맮  楤  #5A9   ॣ L  C.  ॣ 
C (訥  ) ᮤঠ 梥  .   ,  
訥  ⮢ ⮣ ॣ  ⠢ ﭭ묨.
******************************************************************************
(c) .쪮, .. 1996.
   ᫨  ஥ ࢮ  ZX FORUM,  㢨 ⠬ ணࠬ 
 ..,   ࣠ 㤮  ५ 䥩.  
祭 㤮 ணࠬ, ,   ,   ५  
 㤮⢮. ᫨  ᬮਬ  ணࠬ ,   ᫥ 
ணࠬ,  㢨,  ५,     , "" .   
ॠ  㭪?  ਢ ⥫ ࠡ⪨ 㪠 
ணࠬ,   ॠ  䥪.  㯮  
㣠 મ ,      ⬠.
    室 ⥪ ணࠬ   楤 START,  
⠫ ணࠬ  .
   ⠪,  ਢ ᭠砫 ணࠬ,  ⥬ ᪠,  㦭  
ᯥ譮 ࠡ ணࠬ.

START   LD HL,(CRDS)  ; ६ न 뢮 ५.
        LD A,255      ; ᨬ ᫮ 255   樨,    ⮬,
        LD (OPC1),A   ;  ५    .
        PUSH IX       ;   ⠪,   ணࠬ.
QO      CALL SCRBF
        CALL FORM
        HALT
        IN A,(31)
        PUSH AF
        CALL BFSCR
        POP AF
        LD C,A
        LD E,STEP
        LD D,254
        LD HL,CRDS+1
        BIT 0,C
        CALL NZ,PL
        BIT 1,C
        CALL NZ,MIN
        LD D,190
        DEC HL
        BIT 2,C
        CALL NZ,PL
        BIT 3,C
        CALL NZ,MIN
        BIT 4,C
        JR NZ,EXIT
        CALL COND     ; 뢠 楤 ஢ન  ५.
        CALL BAR      ; 뢠 楤 訢/࠭ 樨.
        JR QO
COND    LD IX,(TABLE) ;  IX ᨬ  .
        LD A,1        ; ᨬ  ࢮ 樨  ᯮ⥫
        LD (OPC),A    ; ६.
        LD HL,(CRDS)  ;  HL ⥪騥 न ५.
        SRL H         ;   न ५  ᥫ,  ணࠬ
        SRL H         ; ࠡ⠥  ⠬   न  8.
        SRL H
        SRL L
        SRL L
        SRL L
COND1   LD A,(IX+0)   ;  A न X .
        CP 255        ; ᫨ 255,   稫  ५   樨.
        RET Z         ; 室.
        LD D,A        ; ஢塞   X.
        LD A,H
        CP D
        JR C,PROPOPC  ; ᫨  樨, ய᪠ .
        LD A,D
        LD B,(IX+2)   ;  ॣ B  樨  .
        DEC B
        ADD A,B
        CP H
        JR C,PROPOPC  ; ᫨ ࠢ 樨, ய᪠ .
        LD A,(IX+1)   ;  A न Y.
        CP L
        JR NZ,PROPOPC ; ᫨  ᮢ  ⥪饩 न⮩ Y, ய᪠.
        LD A,(OPC)    ; ᫨  ஢ન 諨,   諨  樨
        RET           ; 㦠   A  室.
PROPOPC LD DE,3       ; 室   ᫥饩 樨.
        ADD IX,DE
        LD A,(OPC)    ;  ⥪饩 樨 㢥稢  1.
        INC A
        LD (OPC),A
        JR COND1      ;  ஢塞.
BAR     LD L,A        ; ᫥ 室  楤 COND  ॣ A 
                      ; 樨  255, ᫨ ५  .
        LD A,(OPC1)   ; ⨫  A  ।饩 樨, ࠢ 
        CP L          ;    ᫨  ࠢ,  訢  .
        RET Z         ; 室.
        CP 255        ; ᫨ ५ 諠  樨,     ,
        JR Z,BAR5     ;    ,    BAR5.
        PUSH AF
        LD A,L        ; ᨬ     ண.
        LD (OPC1),A
        POP AF
        CALL BAR1     ; ࠥ  .
BAR6    LD A,(OPC1)   ;  A   樨.
        CP 255        ; ᫨   ,    .
        RET Z         ; 室.
BAR1    DEC A         ; ⮢  ᪥  樨.
        LD H,0
        LD L,A
        PUSH HL
        POP DE
        ADD HL,HL
        ADD HL,DE
        EX DE,HL
        LD IX,(TABLE)
        ADD IX,DE
BAR3    LD H,(IX+0)
        LD L,(IX+1)
        CALL FILL     ; 楤 FILL 訢,  ࠥ .
        RET
BAR5    LD A,L
        LD (OPC1),A
        JR BAR6
FILL    LD A,L        ; 騥 ப 뢠  樨  ਡ.
        AND 7
        RRCA
        RRCA
        RRCA
        ADD A,H
        AND #18
        RRCA
        RRCA
        RRCA
        OR #58
        LD H,A
        LD A,(HL)     ; ६  ਡ.
        PUSH AF       ; 騥 ப    ⠬
        AND 7         ; INK  PAPER. BRIGHT  뢠.
        SLA A
        SLA A
        SLA A
        LD D,A
        POP AF
        AND 56
        SRA A
        SRA A
        SRA A
        OR D
        LD B,(IX+2)   ;  ॣ B  樨  .
FILL1   LD (HL),A     ; ᫨  ⠭  梥⭮ 䮭,   横
        INC HL        ; ᫥  ப, 稭  "६ 
        DJNZ FILL1    ; ਡ".
        RET
START1  LD (TABLE),HL ;  ⤥쭠 楤,   न
        LD A,(HL)     ; ५ ⠪, ⮡     .
        ADD A,A
        ADD A,A
        ADD A,A
        LD D,A
        INC HL
        LD A,(HL)
        ADD A,A
        ADD A,A
        ADD A,A
        LD E,A
        INC HL
        LD A,(HL)
        ADD A,A
        ADD A,A
        ADD A,A
        SUB 4
        LD D,A
        LD (CRDS),DE
        RET
TABLE   DEFW 0        ;  㤥  ⠡.
OPC     NOP           ;   樨.
OPC1    NOP           ;  ன 樨.
TABLE1 X,Y,L,X1,Y1,L1, ... ,255      ;  .

    ᯥ譮 ࠡ ॡ:
   ⠢ ⠡ ᠭ 権   ⠪ 浪 - ᭠砫  न
X, ⥬ Y, ⥬  樨  . X  Y   .
    ࠪ᪨ ᯮ짮 楤:

PROGRAM LD HL,TEXT    ; ⠥ ⥪ .
        CALL PRINT
        LD HL,TABLE1  ;  HL  ⠡  .
        CALL START1   ; ᨬ   ६ TABLE  業㥬 ५.
L1      CALL START    ; 맮 楤 ५.
        LD A,(OPC1)   ;  A 頥  樨,  ன  
                      ; ५ 﫠 ५.
        CP 255        ; ᫨  A 255,  ५       
        JR Z,L1       ; 㥬 ५ ( ॠ஢  㣮).
        CP 1          ;  ஢塞   樨 﫠 ५ 
        CALL Z,PROG1  ;  室  㦭 ணࠬ.
        CP 2          ;     ⮣  ⠭ 樨 
        JR Z,PROG     ; ࠭,    ⠢ ⠡.
         ..

   ᫥  ५  ⠥ ,     ᥣ  ਥ.
 ਭ㤨⥫쭮 襭 樨, ᫥  CALL START    
 CALL BAR6.
    । ⠪ ,      ,  室
,   ५ 㤠, 㤠  .  ⮣:

PROGRAM LD HL,TABLE1  ;  HL  ⠡,  ⮨ ⮫쪮   255
        CALL START1
        CALL START    ; 뢠 ணࠬ ५.
        LD HL,TABLE2  ;  HL  饩 ⠡ ᠭ.
        LD (TABLE),HL ; ᨬ   ६.
        CALL COND     ; 饬  樨. ᫥ 室  㤥  A,  
        CP 255        ;  ६ OPC1!!!
        JR Z,PROGRAM  ;  ࠡ뢠   㣮.
        CP 1
        CALL Z,PROG
         ..
TABLE1  DEFB 255      ;  ⠡.
TABLE2  X,Y,L,255     ;  ⠡.

    ⮬   ᢮ ⢮. , ᫨ -  
ଠ .
*******************************************************************************

(c) .ᨬ, .஢, 1996.

    ।  ࠧ "" ᪮쪮 ࠧࠡ⠭  楤. 
ࢠ - 楤    䠩 ਡ⮢  न:

 ਠ:

X-न  D
Y-न  E

LD   A,E
ADD  A,A
ADD  A,A
ADD  A,A
LD   L,A
LD   H,#16
ADD  HL,HL
ADD  HL,HL
LD   A,L
OR   A
LD   L,A

ன ਠ:

X-न  H
Y-न  L

LD   A,H
ADD  HL,HL
ADD  HL,HL
ADD  HL,HL
LD   H,#16
ADD  HL,HL
ADD  HL,HL
ADD  A,L
LD   L,A

 室  楤  HL -  䠩 ਡ⮢.

    ⨢   ⠪:

 HL - .
 ਠ:

LD   A,L
AND  #1F
ADD  HL,HL
ADD  HL,HL
ADD  HL,HL
LD   L,A
LD   A,H
AND  #1F
LD   H,A

 室:
 H-y न
 L-x न

ன ਠ:

LD   A,L
AND  #1F
ADD  HL,HL
ADD  HL,HL
ADD  HL,HL
LD   L,H
LD   H,A
LD   A,L
AND  #1F
LD   L,A

 室:
 H-x न
 L-y न.

      ⥭쪠 楤     ࠭ 䠩  
  䠩 ਡ⮢:

 HL-  䠩 ਡ⮢
LD   A,H
ADD  A,A
ADD  A,A
ADD  A,A
AND  #7F
LD   H,A
 HL- ࠭ 䠩

**************************************************************************** 
(c) .ਭ, 1996

       । ᢮ ਠ  ᨬ  ,  
 ᯮ ⥪ ଠ쭮,  㬥訫  ணࠬ.

 10         ORG     40000
 20 BEG     LD      DE,16384
 30         LD      HL,TEXT
 40 LK      LD      (TEMP),HL
 50         LD      BC,15360
 60         XOR     A
 70         LD      L,(HL)
 80         OR      L
 90         RET     Z
100         LD      H,C
110         ADD     HL,HL
120         ADD     HL,HL
130         ADD     HL,HL
140         ADD     HL,BC
150         PUSH    DE
160         LD      C,2
170 LKT     PUSH    DE
180         LD      B,4
190 LOOP    LD      A,(HL)
200         LD      (DE),A
210         INC     D
220         LD      (DE),A
230         INC     D
240         INC     HL
250         DJNZ    LOOP
260         POP     DE
270         LD      A,E
280         ADD     A,32
290         LD      E,A
300         DEC     C
310         JR      NZ,LKT
320         POP     DE
330         INC     DE
340         LD      A,E
350         AND     31
360         JR      NZ,OBH
370         LD      A,E
380         ADD     A,32
390         LD      E,A
400 OBH     LD      HL,(TEMP)
410         INC     HL
420         JR      LK
430 TEMP    DEFW    0
440 TEXT    DEFM    "HELLO ALL HACKERS"
450         DEFB    0

       ᯥ ,  室  ப  ஬ REM, ⮫쪮
   ⠢ 0   ⥪,   㤥  ࠧ 㭤.
        ਣ , ᫨ ⠢ ᫥ ப:
    215         XOR     A

       ਢ    楤  ଠ ⮬.

9C40: 11 00 40 21 7E 9C 22 7C :06
9C48: 9C 01 00 3C AF 6E B5 C8 :57
9C50: 61 29 29 29 09 D5 0E 02 :B6
9C58: D5 06 04 7E 12 14 12 14 :9D
9C60: 23 10 F8 D1 7B C6 20 5F :B8
9C68: 0D 20 ED D1 13 7B E6 1F :82
9C70: 20 04 7B C6 20 5F 2A 7C :96
9C78: 9C 23 18 CA 8F 9C 48 45 :6D
9C80: 4C 4C 4F 20 41 4C 4C 20 :1C
9C88: 48 41 43 4B 45 52 53 00 :25

       楤  ஬ RND.  室  楤 
ॣ஢  HL 㤥 ᫮  0  65535.

 10         ORG     40000
 20 BEGIN   LD      HL,(TEMP)
 30         LD      C,16
 40 S1      LD      A,H
 50         ADD     HL,HL
 60         AND     255
 70         JP      PE,S2
 80         INC     HL
 90 S2      DEC     C
100         JR      NZ,S1
110         LD      (TEMP),HL
120 TEMP    DEFB    1,0


9C40: 2A 53 9C 0E 10 7C 29 E6 :9E
9C48: FF EA 4D 9C 23 0D 20 F5 :FB
9C50: 22 53 9C 01 00 00 00 00 :FE

       ணࠬ  ᬮ   ⭠筮
:
 10         ORG     40000
 20 BEG     LD      HL,(ADDR)
 30         LD      DE,16384
 40         LD      B,8
 50 LK      PUSH    DE
 60         LD      C,8
 70 LOOP    LD      A,(HL)
 80         PUSH    HL
 90         PUSH    BC
100         CALL    PRINT
110         POP     BC
120         POP     HL
130         INC     HL
140         INC     DE
150         DEC     C
160         JR      NZ,LOOP
170         POP     DE
180         LD      A,E
190         ADD     A,32
200         LD      E,A
210         DJNZ    LK
220         LD      (ADDR),HL
230         RET
240 PRINT   PUSH    AF
250         SRL     A
260         SRL     A
270         SRL     A
280         SRL     A
290         CALL    PR
300         POP     AF
310         AND     15
320 PR      PUSH    DE
330         ADD     A,A
340         ADD     A,A
350         ADD     A,A
360         LD      L,ADRL
370         ADD     A,L
380         LD      L,A
390         LD      H,ADRH
400         LD      B,8
410 LOK     LD      A,(HL)
420         LD      (DE),A
430         INC     D
440         INC     HL
450         DJNZ    LOK
460         POP     DE
470         INC     DE
480         RET
490 ADRL    EQU     0
500 ADRH    EQU     135
510 ADDR    DEFW    40000

    ⢨ ⮩ 楤  த஢ ᫥饩 ணࠬ:
10 RANDOMIZE USR 40000: PAUSE 0: GO TO 10
      砫  ᤥ ᨬ ,  㤥 ᯥ뢠
.   ᫥饩 ணࠬ:

100 LET S=135*256: FOR A=15744 TO 15823: POKE S,PEEK A: LET S=S+1: NEXT A                                                                               
110 FOR A=15880 TO 15928: POKE S,PEEK A: LET S=S+1: NEXT A                                                                               
    ⮬ 砥  ப 490  500 ⠭  ᫠,  㦥  ⠬.

9C40: 2A 87 9C 11 00 40 06 08 :88
9C48: D5 0E 08 7E E5 C5 CD 63 :27
9C50: 9C C1 E1 23 13 0D 20 F3 :80
9C58: D1 7B C6 20 5F 10 E9 22 :A0
9C60: 87 9C C9 F5 CB 3F CB 3F :F1
9C68: CB 3F CB 3F CD 72 9C F1 :E4
9C70: E6 0F D5 87 87 87 2E 00 :99
9C78: 85 6F 26 87 06 08 7E 12 :53
9C80: 14 23 10 FA D1 13 C9 40 :4A
9C88: 9C 00 00 00 00 00 00 00 :C0

       ணࠬ 뢮  ࠭ 㭮 砩 ࠧ, ᯮ 
।騩 RND-. 室  ணࠬ ⢫    
SPACE.
 10         ORG     40000
 20 BEGIN   LD      HL,(TEMP)   ;᫥ 砩 ᫠
 30         LD      C,16
 40 S1      LD      A,H
 50         ADD     HL,HL
 60         AND     255
 70         JP      PE,S2
 80         INC     HL
 90 S2      DEC     C
100         JR      NZ,S1
110         LD      (TEMP),HL
120         LD      A,H         ;﫨 訩  ᫠
130         AND     #1F         ;㫨 訥  
140         OR      #40         ;稫  ࠭ 
150         CP      #5C         ; 室   ࠭ ?
160         JR      NC,BEGIN    ;᫨ ,  ᫨  
170         LD      H,A         ; 祭 
180         LD      BC,#4000    ;ᬥ饭  㦥 ࠭
190         PUSH    HL          ;࠭  ࠭
200         ADD     HL,BC       ;稫  㦥 ࠭
210         LD      A,(HL)      ;﫨 
220         POP     HL          ;⠭ 
230         LD      (HL),A      ;᫨   ࠭
240         LD      A,#7F       ;஢ઠ  ⨥ SPACE
250         IN      A,(#FE)
260         RRA
270         RET     NC
280         JR      BEGIN
290 TEMP    DEFB    1,0

      室 㧨     ⠢ ᬥ饭  ப 180 
᫮, ஥ 砥 ᫥騬 ࠧ:
       㦥 ࠭ - 16384

9C40: 2A 6D 9C 0E 10 7C 29 E6 :B8
9C48: FF EA 4D 9C 23 0D 20 F5 :FB
9C50: 22 6D 9C 7C E6 1F F6 40 :CE
9C58: FE 5C 30 E4 67 01 00 40 :0A
9C60: E5 09 7E E1 77 3E 7F DB :58
9C68: FE 1F D0 18 D3 01 00 00 :DD

*****************************************************************************
(c) .ࠢ, .஭, 1996

     쪨   ࠧ "".  楤 ᨬ筮
 ப ᨬ  . 宦 䥪    稪
MORTAL KOMBAT.

        ORG     40000
        ENT
        LD      A,6      ; INC.
        LD      HL,22528 ;  䠩 ਡ⮢
                         ; 㫥 ப ࠭.
        LD      BC,32    ;32 ᨬ  ப.
L1      PUSH    AF
L2      INC     (HL)
        DEC     A
        HALT
        JR      NZ,L2
        POP     AF
        INC     HL
        DJNZ    L1
        RET

   । 뢮 ⨭ 㦭 뢥  ࠭ , INK  PAPER
  묨.

   ணࠬ  BASIC'  樨 䥪:

5 GOTO 20
10 RANDOMIZE USR 15619: REM: LOAD "PROG" CODE 40000
20 INK 0: PAPER 0: BORDER 0: CLS
30 PRINT AT 0,0;" FLASH (C) AZH soft 1996"
40 RANDOMIZE USR 40000: INK 6


     ᮮ   筮.  ZX- 95/5  . 31
  210 TEXT DEFS 1  DEFS 0,    ᥬ 
  DEFS 0. ਬ TASM 128 ᠥ.

***************************************************************************** 
   () 客 ᫠
                . 祡, 1996

   樨  ࠩ⠬.

1.  ணࠬ 뢮  ࠭ ࠩ ந쭮 䨣樨, ਬ
 ⠪:

    Ŀ  Ŀ
    Ŀ  
       

   ଠ ࠩ:  - 1  - ⢮   ࠩ;
 ࠩ - 1  Y न, 2  X न (न
⭮⥫   孥 㣫 ࠩ).  8  蠡
.
   室 ࠬ: HL -  砫 ࠩ; DE - ᮫ X,Y
न  孥 㣫 ࠩ; A - ⮤ 뢮 ࠩ ( 
㭨⮦ 䮭 SP_PUT   ࠧ묨 ﬨ SP_OR, SP_XOR, SP_AND).
᫨  ࠩ   ࠩ 室  । ࠭,   
 ⠥.

SP_PUT    EQU  #00
SP_OR     EQU  #B6
SP_XOR    EQU  #AE
SP_AND    EQU  #A6
PTBL      LD   (MODE),A
          LD   A,(HL)
          INC  HL
PTBL_1    PUSH AF
          PUSH DE
          LD   A,(HL)
          ADD  A,E
          CP   #18
          JR   NC,PTBL_4
          LD   E,A
          INC  HL
          LD   A,(HL)
          ADD  A,D
          CP   32
