Ŀ
                              
           
                              


(c) .६

           

   ணࠬ     ࠬ
।祭   ணࠬ⮢-
⥫, ᢮  ணࠬ-
஢   ᥬ  Z80  
I8080.   ࠧ, ⮫-
  ᭮  , 
ਮ⥭ ࠪ⨪ ணࠬ-
஢  SPECTRUM'  (ਮ,
,  樠    .)
  業 -
ࠬ  IBM PC.
   ணࠬ-⥫,   
ᮢ襭⢥ ᢮訩  ணࠬ-
஢  8-ࠧ來 設,
⠫     ⥫묨
㤭ﬨ  ⪥  -
   ᯥ⨢   -
襭   PC.  
 㤭 맢    
ᯥ㬨⮢  ⮩ ⨥
PC,  ⭮ ᫮-
     㬭 ⮩  -
饬- 宩 設. ᭮
㤭,  묨  ⠫-
  "㮧 8-⭮ -
"  ⪥ ᢮ PC:
   1.    ᥣ-
஢    易  
⨬  ஡  ।  
ࠢ  .     
      8-ࠧ-
 ஢.
   2. 室   筮
 祭 DOS  "",
 ஢ ஢ 뢠 
,    ᢮  -
 ணࠬ, ..    ᠬ
 ணࠬ  10-15  -
 㦥 易  ⢮-
  DOS.
   3.    ᫮  ᨭ-
⠪ ᥬ  I86
(⠪   쭥襬    -
  ᥬ⢮ PC-  -
஢).
   4.       ᯥ㬨
⥬ .    ᠬ  -
쪠 ஡,    -
    㯮, .. I86 
Z80 쭮  த⢥-
,   設⢠  Z80
       ⥬
I86 (  !)
   ࠬ    
  ६  襭    
஡.     ணࠬ
 ࠬ   ,
  ᯮ    Z80,
   ⠯    蠣-
 ࠧ. ᯮ짮   -
⮩  १砩 㤮 -
⥬  I86 ⮫쪮 , -
     Z80 -
 ࠢ,      -
⮬,       冷
.

    ࠪ ᮡ
           ࠬ

   ணࠬ, ᠭ  -
ᥬ஢   ࠬ,   
᢮      ⫨-
砥   ணࠬ, ᠭ
 Spectrum.     -
  ⨯:

include "keyboard.lib"
include "standard.fnt"
include "disk.lib"
include "s320_200.lib"

   PROGRAMM        Z80

      ⠪,   -
ᠫ   GENS-4.  -
砥,       -
짮   ,  㤥
  ᪮,  -
    ஭   ,
-  뢮   ࠭
 ० 13h  㤮⢮-
 ⠭ 䮭⮬.
   㬥  㭪樨    PROGRAMM
ᮮ頥 ࠬ,     
 ᢮ ⥬  I86, 
     -
 Z80.  ⮬  ०  ࠬ
㤥      Z80
  室    
ᥭ  I86,   ᯮ짮-
  I86 ਢ  
 ⮬ ०.    ந-
쭮 ६訢    
  ஢, ࠬ  ࠧ-
.
    ᯮ짮  
Z80  㤥      ன
⠯, 㬥 Z80    㭪樨
PROGRAMM  ,  -
 㭪  뢠  .
஬ ᥣ 祣,  -
 , ࠨ -
   設,  ⠢
ଠ  ᫥饣 -
४⭮ 室   襩  ண-
ࠬ,     -  
   ୮  ࠡ,  
 ᤥ  ணࠬ  PC,
  ன ਢ ᯥ-
.
   ᫨ ᮢ   
ࠧ  ஢    㤠
 ᮡ  ᫮⥩,   ᮢ-
  ᨭ⠪, ᠬ -
,  .  ᪮
ᯮ짮 ࠬ  ।-
  ⥯  室  
ணࠬ஢          ⨫
Spectrum  ணࠬ஢  PC,
।⥭ 뫮 ⤠ ᨭ⠪-
  ᥬ   I86.    
訥 ⫨    
⠯  롮      
樠樨,      ࠬ-
    ᠬ,     襣
, ⠪    -
 ᮢᥬ .

   1. ,   ᥬ Z80
 ⠢  㣫  ᪮  
祭 ᢥ 樨,
ࠬ ॡ .

ਬ:   gens-4        LD      A,(HL)
        ࠬ        LD      A,[HL]       MOV     AL,[BX]

   2. ⪨   ६ -
ࠧ ꥪ.

   ⪠  ⠢  ⮫쪮
 ᯮ塞    
稢 稥,   
६        㪠뢠
⮫쪮     稥  
稢.

ਬ:   gens-4                        ࠬ

          CALL    PROC1                 CALL    PROC1
          ...........                   ............
  PROC1   LD      HL,(DATA)     PROC1:  LD      HL,[DATA]
          RET                           RET
  DATA    DW      #4000         DATA    DW      4000h

   ࠧ稥  
祭 HEX-ᥫ.

   3. ⪨     ६
  ⠭⠬   -
 ।⢥  ᯮ짮-
  ࠦ.   ॢ
⪨      ६  
⠭ 㦨    off-
set.

ਬ:   gens-4                        ࠬ
          LD      HL,NAME               LD      HL,offset NAME
  NAME    LD      DE,DATA       NAME:   LD      DE,offset DATA
          ..............                ......................
  DATA    DW      15000         DATA    DW      15000

   4. ᪮   I86   
16-ࠧ來 ( )  -
஬,   -
।,     ⥪-
 ணࠬ  ।-
 ࠧ  ࠭.    ⠪
 室  .

ਬ:   ࠢ쭮
          INC     [HL]    ;  ६㥬,   ᫮?

          ࠢ쭮
          INC     [BYTE HL]   ; ६     HL
          INC     [WORD HL]   ; ६ ᫮    HL

    樨   -
  ᫥  ᥬ-
஬, ⠪  ᫨    
筨 ⨯ ࠭,   㤨-
 祭 ᨫ쭮.
   , ᮡ⢥,    ⫨-
    ᨭ⠪,   
㦭  ,  ⮡  
ࠡ  ࠬ.  
㣨,     ⮫
㦥 ⮣,  ࠬ ⠭
  ன ⠯.
    窨 ७  ணࠬ,
ࠡ饣   ࠬ,   
ᯮ殮       
65536 , 祭  ᪮-
 䥩ᮬ    न
ᯫ  ।   ࠧ襭,
ࠡ騬  ०   㯭-
  255  梥⠬      
262144 梥.  ⥪  뭥ᥭ  
।  㯭    ᭮
࠭⢠      ⮬᪨
樠      ᪥
ணࠬ.  ࠭  뢠
ॠ   ⠪   ,     
Spectrum,   ⠭  -
 I     뢠  
  室. -
筮       ணࠬ
ࠧ ணࠬ ࠡ-
 뢠   १ࢨ஢-
  INTERRUPT,     -
 IM2 뢠  .
࠭    ⥪  ॣ  
ணࠬ 뢠 ⮦  
㦭. ࠬ  ⠪  
 ᠬ. ணࠬ -
뢠     -
 RETF.
      १ࢨ஢-
 ⪠ BEGIN.    
⬥祭 ,  ன  -
 ணࠬ  㤥  ⮢.
  HALT,   筮,  -
   㯫 -
 ᨬ   ⮣, 
० 뢠 (IM 0  IM 2)
⠭.    뢠-
 .  ⪥  
뢠  ࠫ MSDOS,
  ⮣  ௨. ४-
 室   DOS ⢫
  EXIT.

       㭪樨

   饭   譨  ன-
⢠  PC   ᥣ  -
 ⥬  ணࠬ  -
뢠. BIOS   DOS  ।⠢-
  ⮣  訥  -
,     짮
      ࠭祭, 
 稭饣   ᫮.
⮬  "ࠬ"  -
ࠧ       㤮
 饭  譨  -
ன⢠, ॠ㥬 ࠩ-
,   砥묨    
include  . ᬮ 
⥫ ꥬ,   ࠩ-
  ⭨      
  㯭 襩  ண-
ࠬ  ᭮    ࠭⢠
(65536 ).   ࠧ-
  㣮 ᥣ , 
 ⥪. ᬮਬ  -
⥫  ,  묨
   짮, -
稢 ᮮ⢥騩 ࠩ.

    (keyboard.lib)

  keyboard.lib  ⥬
  :

   KEYBOARD <㬥>
   KEY      <㬥>

   KEYBOARD ⠭
० ࠡ .

KEYBOARD 0 -  
             .
KEYBOARD 1 - ⥭  
              .
KEYBOARD 2 - ⨪ ०.

     KEY   ࠡ  
㫥 ०  ணࠬ  -
     -
.  ⨨   
। ASCII.
    ࢮ ०    KEY
  ⠭  ணࠬ,  
ࠧ 뤠 ASCII    襭-
  䫠  Z, ᫨  -
 ,  0FFh  -
 Z, ᫨    
    .  -
筮 㭪樨 INKEY BASIC'.
    ஬ ०   KEY
  㬥,    
ਭ 祭  0    13.
㬥 㪠뢠 㯯 -
㥬 . ਬ,  -
  㯯  室    
"५ ",  "५ -
",  "५ ",  "५
",  "   CTRL",   "
SHIFT", " ALT"   "".
 ,  筮  ࠧ-
鸞 Kempston-⨪,   -
 KEY  0    ஬  ०
  筠    
⥭       ⨪    
Spectrum.    -
  1    ᮮ⢥饬
ࠧ拉  .  -
        -
쪮 .

 7       6       5       4       3       2       1       0

0 Space   Alt l. Shift l. Ctrl l.  Down     Up   Right    Left
1 Enter   Back   Pg. DW.   End    Delete   Pg.Up  Home   INSERT

2   7       6       5       4       3       2      1      ~
3 Alt r. Ctrl r. Shift r.   +       -       0      9      8

4   U       Y       T       R       E       W      Q     Tab
5 祣 Pr.Scr.    \       ]       [       P      O      I

6   J       H       G       F       D       S      A  Caps Sh.
7 祣 祣  祣  祣     "       :      L      K

8   <       M       N       B       V       C      X      Z
9 祣 祣  祣  祣  祣  祣    ?      >

..
10  5       4       9       8       7       *      /  Num lock
11  +       -       .       0       3       2      1      6

12  F7      F6      F5      F4      F3      F2     F1    Esc
13 Pause EnterDig  ScrLock  F12     F11     F10    F9    F8


     ࠭ (s320_200.lib 
         s256_240.lib)

    ਭ樯,   ⠭-
   ०    ࠡ-
  . ࠩ s320_256.lib
⠭ ⠭ -
०  13h,  騩  ࠧ襭
320*200 ᥫ  256  梥⠬,
ਬ騩  設⢥  -
 PC. ࠩ  s256_240.lib
⠭ ⠭,  
㤮  ࠡ   8-⮢묨
묨 ० 256*240  256 梥-
⠬.  ०   -
  ᥫ,  ..   㦭
룫廊   㦭,    
  ਧ⠫ ,
 ⮥ । न.
 ᮢ㯭   -
 த⢨  ணࠬ
 2-3 ࠧ      ᪫祭
室     ᪮
४樨   ⮢  न
ᥫ.  ,  ..
ᯥ㬨    ᢮  -
த ,  ॠ쭮  -
    386SX-33, -
   㦥    ᥩ    襢
SCORPION    ,  ᫨   
ਮ  ண  SVGA--
,  ࠭ TV--
⮩  ࠡ   ⥫-
஬  । CGA--
஬.

   ࠩ    s320_200.lib    
s256_240.lib ।⠢ ண-
ࠬ 訥 .
   ᬮਬ ⥬  -
 .

   BORDER R,G,B

         ⠭
梥 ࠬ  ࠭  
 ࠬ,     -
  ।  ⥭ᨢ
ᮮ⢥饣 ࢨ筮 梥-
.  ࠬ    ਭ
祭  0  5,    ᮢ-
㯭  216 梥⮢.

   COLOR R,G,B

   ।     ,
ᮮ⢥騩  梥-
.    ࠬ஢    .
஬ ⮣      ଠ
⮩    ࠬ஬.
  ᬮਬ,    
 " 짮⥫".

   PLOT

     ࠬ  ⠭
 ࠭ ᥫ,  梥  ।-
 ᮤন  .
 ࠩ s256*240.lib  न-
 X । ॣ஬ L,
न Y -  ॣ஬  H.  
ࠩ  s320_200.lib  ᫥-
 न ᫮.  ন-
 ॣ HL(BX) ।
 㫥  HL=X+320*Y,   X 
Y - न ᥫ.   -
᫥ न 㤭  -
  ⭮⥫쭮  
 㬭  ,   
⮬ ०  த⢨  -
,  ᯥ㬨, ਢ-
襬  ९쥩 ᪮ ᢮
 設,   ⮬ -
砥   த⢨   
䠭᪨.
   ᫨    0FFh,
梥 ᥫ    .  
  뢮  ࠩ  
䮭   ᪠.  -
 ࠩ, १  
ᢥ稢 䮭, 㦭  ⠭-
  0FFh.

   PLOT T

   筮 PLOT,   梥  
 㬬   梥-
⮬ ᥫ.  뢮 -
஧ ꥪ -  ਢ-
, 뫪  ⪠   -
祥.

   PLOT ?

   ⥭       
梥  㪠 HL ᥫ.

   AT X,Y

   ⠭   -
 ᨬ   PRINT  
PRINT T. X  Y    -
 ।⢥,  ६묨
     ᮤন  
ॣ஢    㯯   HL,BC,DE
(BX,CX,DX).          ࠩ
s320_200.lib  ࠬ  16-ࠧ-
來, .. न X  
    頥,       
s256_240.lib - 8 ࠧ來. -
, ਬ,      AT
B,H.  ⮬ ᮤন ॣ-
 B ।  न  X, 
H - Y.

   INK R,G,B

     ᫥饣  뢮
ᨬ.

   PRINT

   뢮 ᨬ    AT.
ASCII  ᨬ    ,
⠭  ࠧ ᨬ  -
।  ⨢஢  䮭-
⮬. ᫥ 뢮 ᨬ  -
 ᫥饣 ᤢ  -
  稭, ।塞 -
ਭ ᨬ,   ⠭-
  ⨢樨  䮭.
  ᨬ   ᨬ-
 ࠭ (  PAPER
).

   PRINT T

   뢮  ஧  ᨬ-
. ⠫쭮 筮 PRINT.

   FONT <>

   ⨢ 䮭. ᫥ ⮩
 ⠭  ࠧ ᨬ-
 । ⨬  䮭⮬.
ᥣ  include  -
    ᪮쪮    䮭⮢,
⢥ ࠭祭  -  -
騩  ꥬ      ॢ-
 30 - 40 kB.  8*8 -
  2 kB,  9*16 - -
 5kB.

   PALET <⪠>, <⢮
   ९ணࠬ㥬 梥⮢>

   १砩  魠  ,
 묨  ।⢠
⨣ 㤨⥫ १-
⮢.  , 騥  -
 <R>,<G>,<B>, ஬ BORDER,
    .  ᫨  
  㬥  0  38,
 梥    ᥫ  㤥
। "ன 짮-
⥫",   室 ᥣ 39
梥⮢,    ⭮
८।    室  -
ࠬ.
   ⮡ ᯮ짮  -
ன 짮⥫,  㦭  -
ᮧ  :

TABCOLOR   DB       n,R0,G0,B0
           DB       m,R1,G1,B1
           ..................
           DB       z,Ri,Gi,Bi

  n,m,....z -     襣
梥,  䨣   -
 INK, COLOR    ,  
Ri,Gi,Bi - ⥭ᨢ  梥-
 ⠢   梥.
  ਭ 祭  
0  63. 㤭 , 
१    짮⥫  
砥    262144  梥-
⠬  ⥭.
   ⮡    -
⥫, 筮  -
 PALET TABCOLOR,5, ᫨  -
,  ਬ,  ⠭   5
梥⮢  襩 . ஬
⢮ 㯭 梥⮢ - 
ᠬ  ⮨⢮ -
 PALET.  ।⠢ ᥡ -
⨭: 筮 த,  䮭 -
ᠤ  筮  㡠 ⮨ -
楩᪠ 設,   -
⨫ 楩᪨  .  -
  ,  ਮ᪨  -
 梥  ४ -
,       ⡫᪨
梥⮬모,     
設, ६  ६ -
  ᨣ.   ⮬
 ᮢ뢠  ࠭ 
  !      楤
뢠  ࠡ⠥   쪠
ணࠬ    ᯮ짮
 PALET.  -  㦥, -
, 﫨.

     ᪠ (disk.lib)

   MSDOS  ।⠢    祭
訥   ࠡ 
᪮묨  ⥫ﬨ.  
ᯮ짮 㭪権 MSDOS -
  ।   ⮢.
 祭 ᪮  㦡
MSDOS     ६-
. ⮬    -
 ᯮ짮  ࠧ  -
 묨  묨  -
 ࠩ disk.lib.
    饭  -
 ।. 㬥, disk.lib
 ᯮ   10%  ⥭樠
MSDOS,   ⮣,   
,  릠  -
  TR-DOS,   -
 ⫥.
   砫    ࠭-
, 騥 disk.lib   ࠢ-
  MSDOS.  ࠡ ந-
      ⠫,   
  ⮬,   ண  뫠
饭    ணࠬ.  ᫨
ணࠬ 뫠 饭  ᪥-
,     ⠫    
C:\GAMES\DIZZY   ஭
᪠,       뢠
 㤥 ⮫쪮 㤠.  -
 ⢥ ࠭祭  
஢   ணࠬ,  ஭
ୠ  ⮫    ண-
ࠬ⠬-⥫ﬨ    "DEMO".
६ ᪠  ࠡ
⮫쪮   䠩.    -
ࠪ୮   TR-DOS,  ⠪  
ᯥ㬨 ᮡ 㤮 
.
   ᨬ ࠧ 䠩 -
࠭祭 16 MB.   ᪥ ⠪
䠩,  筮,    , ⠪
   ࠭祭    ⮫
譮.
     ন  ࠡ  
ਡ⠬  䠩.    -
짮 ⮫쪮  䠩.
     ᬮਬ    
disk.lib.

   FILE < 䠩>

   ⮩   㪠뢠, 
  䠩  ᮡࠥ  ࠡ-
. ᫨  䠩 饭, 
  ⢥    ᯮ
ப,   㪠뢠 -
஢  DE (DX).

   DELETE < 䠩>

    㪠 䠩. ᫮-
 㬮砭  .

   CREATE < 䠩>

       䠩  㫥
  㪠 .  ᫮-
 㬮砭  .

   LOAD  A,B,C,D

   ⥭    䠩, 㪠
᫥  FILE.
   ࠬ:
   A - , 㤠  㤥 ந-
 ⥭.   -
,  ६  ᠬ
६.  ᮫⭮  
  ,      
᫠. 祬?  㬠-
  .
   B - ⢮    뢠
.    ᮫-
,    ࠧ  ⮪  
ᮤন  ६.   -
 - 65535.
   C    D. ।  ᬥ饭
砫 ⥭ ⭮⥫쭮 -
 䠩. ᫨ 饭,   䠩
⠥    砫.    䠩
⠥ 騬  -
  ⢠  ࠭    256
,  筮  ᥪࠬ    
TR-DOS. C -  ࠭ (᫮-
,  0-65535), D -  ᬥ-
饭    ࠭   (,
 0-255).    ࠬ
   ।⢥-
    ६.
   ᫨     ᬥ饭
ॢ蠥  稭    ॠ쭮
䠩,  ⠭ 䫠  C
  뤠       
訡.  㯠  -
 disk.lib   ᫨誮 䠬-
୮ 饭.

   SAVE A,B,C,D

     䠩.  ࠬ-
஢  . ᫨   뢠
 䠩, 騥 ⠬  
  뢠묨.  ᫨
  饣  䠩   
    ॡ-
  ⢮    
⠭ ᬥ饭   
     ,  
䠩  ⮬᪨  㢥
 ॡ㥬.    ᯮ-
   60 kB   ᢥ-
ᮧ 䠩  㫥  -
.

         ࠬ

   ⮡  ࠡ    ࠬ-
, 㦭 ० ᥣ -
 .    tramplin.
com. ᫥ ᪠  㢨 
࠭     ᫥騬 -
⠬:

1. 
2. ᥬ  ⨭
3. ᥬ  ⨭
4. ஡ 
5. ᫮ ॣ樨

   室  DOS ⢫ 
ESC.
   ᫨     1, 
    䠩, 
  ᮡࠥ ࠡ.
 䠩     
ᥠ ࠡ,      ணࠬ
     ᯮ짮,
    .  ᫥
     ।-
,  ᬮ  ࠡ 
 䠩    த  
騬.  ᫥  室  
।    ஡
஠ᥬ஢     ணࠬ,
ࠢ 㭪 2   3.  ᫨  
ࠡ⠥  ஬ -  ஡-
 ,  ᫨   ,
㬠, ०  祬  롨
ᥬ஢      ⨭.
⨭ 让 ணࠬ  
 ࠧ 1.5-2 MB,  ஢-
       ࠧ饭
䠩  ந, ..  -
࠭  ࠧ    ⥭.
  ⭮...

   ᫨   ⨫  訡,
  ᫥    ᥬ஢
 ஡    ᬮ,
     﫨.  ᫨  
ணࠬ  ""  -
,    뫨   室-
  稢     ᢮
ணࠬ  EXIT  (易-
⥫쭮!),  ᫥ 室  
᭮  ୥    ࠬ  
ᬮ த ࠡ.

      訥 ᯥ⨢

    饥 ६  ࠡ
 ᮧ    
㫥:  ࠩ , ਭ-
, 㪠, ஥ ஭-
 ᪠.  㤥 ᠭ 
ࠩ  ᯫ    ਧ-
 ࠭, ࠡ騩   ⮤
"吝 ⮢".

   ਫ: ਬ ᯮ짮-
  㭪権.

          KEYBOARD 0
          ...............
          KEY
          CMP     AL,27
          JZ      KEY_ESC  ;   Esc
          ...............
KEY_ESC:  EXIT

          KEYBOARD 2
          ...............
          KEY     0
          CMP     AL,00010110b
          JZ      UP_RIGHT_FIRE   ;᫨ ६ 
                                  ;, ࠢ, Ctrl-left

          COLOR   0,5,0
          MOV     BL,128          ; X-न
          MOV     BH,120          ; Y-न
          PLOT                    ; મ 窠
                                  ;  業 ࠭
          INC     BL
          PLOT    ?               ; AL= 梥 ᥤ
                                  ;  ਧ⠫

          BORDER  1,2,3           ;   梥
          FONT    MICRO           ; ⠭ 䮭
                                  ; (᫨    )
                                  ;
          INK     0,1,3           ; 㤥  梥⮬
                                  ; ᪮ 
          AT      30,52           ;  孨 㣮 ᨬ
                                  ; 㤥  . X=30,Y=52
          PRINT   T               ; ⠥ ஧ ⮬

          PALET   NIGHT,5         ; . 5 ॣ஢ 
                                  ; ""
          ...............

          NIGHT   DB    0,0,10,22   ; 0 ॣ. 㡠 
                  DB    1,10,0,0    ; 1 ॣ.  ᨣ
                                    ;  㡠  㫨
                  DB    5,0,20,0    ; 5 ॣ.  誨
                  DB    11,17,17,17 ; 11 ॣ.  誠
                  DB    4,0,47,0    ; 4 ॣ.  ᢥ
          NIGHT1  DB    0
          WPAL    DW    offset PFL3

          CREATE  'NIGHT.PAL'          ; ᮧ 䠩
          SAVE    NIGHT,NIGHT1-NIGHT   ;  㤠 
          LOAD    [WPAL],4,0,7         ;   ⮣ 䠩
;  ६ PFL3 4  稭  8  砫 䠩

          MOV     DX, offset F_NAME
          DELETE

          ; 㤠 䠩,  ண  ६ F_NAME
          .........................

          F_NAME  DB      "NIGHT.PAL",0


    :  ᠬ   ணࠬ
     ⠫
 ZX .

           *   *   *