(c)  騭, ᪢

ZXNet : 500:95/462.53
E-mail: bestview@mtu-net.ru
WWW   : http://www.ivr.da.ru

      ஥ ⠡ ஬   Pro Tracker 3
      

(".  " 4/2004)

    몠 㫨, ᠭ  । Pro Tracker 3
( PT3), ந뢠   ᯥ樠쭮 
楤, 뢠 ஬.   ( ࠩ , 
ᨩ 3.3-3.6)  ⠪ 뢠 ⠡ ஬,
ᯮ  ᬥ饭 #110  砫    240
(#F0) ⮢.  ⠡ ।⠢ ᮡ 15 ப  16
祭  ப,  祭     
᫮  0  15.
     PT3     ஬  0  15,  ᠬ
   ந࠭  ஬  1  15 (㫥
஬  ᯮ).   । ஬
ந뢠 ।   祭 ஬  
஬ ⮣     㦭 ⠡.  祭
ப  ஬, ࠢ ஬ ,  ⮫  ஬,
ࠢ ஬   ,  室 ᪮ 祭
஬.
    ᫨ 㫨   ,  ⠡楩 ஬,
 ⮬   ணࠬ ࠣ  ஥ ⮩
⠡,   㯠 ணࠬ  먣.
⢨⥫쭮, ᫥⥫쭮 㫥   ⠡
ᮦ ࠧ  ᠬ ⠡,   
ࠣ ணࠬ, 饣 ⠡, 祭  ( 
㢨 ),  ⮬   ⮦   ᦠ.
    Pro Tracker 3 -  ப ᯮ㥬  饥
६ 몠 ।  ZX Spectrum, ᠭ  
㫨 ᯮ  ⢥ ணࠬ (, ஭
  ୠ, intro, demo). ⢥⢥, 
ਬ ⠪ ᯮᮡ 㬥襭  ணࠬ 頥
 쬠 ப.
     ਢ ⮪  ⠭⭮  Pro Tracker
3.3-3.4, ᮤঠ騩 ⠡ ஬.

         #0110: 0000 0000 0000 0000 0101 0101 0101 0101
         #0120: 0000 0000 0000 0101 0101 0102 0202 0202
         #0130: 0000 0000 0101 0101 0202 0202 0303 0303
         #0140: 0000 0000 0101 0102 0202 0303 0304 0404
         #0150: 0000 0001 0101 0202 0303 0304 0404 0505
         #0160: 0000 0001 0102 0203 0303 0404 0505 0606
         #0170: 0000 0101 0202 0303 0404 0505 0606 0707
         #0180: 0000 0101 0202 0303 0405 0506 0607 0708
         #0190: 0000 0101 0203 0304 0505 0606 0708 0809
         #01A0: 0000 0102 0203 0404 0506 0607 0808 090A
         #01B0: 0000 0102 0303 0405 0606 0708 0909 0A0B
         #01C0: 0000 0102 0304 0405 0607 0808 090A 0B0C
         #01D0: 0000 0102 0304 0506 0707 0809 0A0B 0C0D
         #01E0: 0000 0102 0304 0506 0708 090A 0B0C 0D0E
         #01F0: 0001 0203 0405 0607 0809 0A0B 0C0D 0E0F

      ,   ᯮ짮   ⮩
⠡  Pro Tracker',   筮 諠 ⠪ 
㫠:

                                     
                             (i+1)*j 
                   A(i,j) =   .
                               16    
                                     

     ⮩ 㫥  ᪮  뤥 楫
, i -  ப ⠡ (㬥  1), j - 
⮫ (㬥  0).
       PT3 ᥣ 稭   #XX00, 
⠡ ᯮ  ᬥ饭 #110  砫  , ⠪
ࠧ, ᥣ 稭   #XX10, 砥, 
न i  j  ⠡    襣
  ⮣ : 祭 襣 㡠 - 
i,  襣 - j.
    뢠  ᪠, 㤠  筮
⪨ ࠣ ணࠬ, 騩 ⠡:

        LD   HL,VOL_TAB ; ⠡ - ᫮  #XX10.
        LD   DE,#000F   ;D - 砫쭮 祭 i.  ࠭
                        ; 㢥稢 i ⤥쭮,  
                        ;  L.  i=0,  ।
                        ;᫥ ࢮ  ⠡
                        ;i 㢥  1. E - ⠭ #0F.
; 横.

M1      LD   A,L        ;訩   ⥪饣 .
        AND  E          ;=AND #0F - 稫 j.
        LD   C,A        ; j.
        JR   NZ,M2      ; ࠧ,  j=0 (.. 
        INC  D          ;稭 ࠡ뢠  ப),
                        ;㢥稢 i  1.
M2      LD   B,D        ;稪=i.
                        ; A=j.
M3      ADD  A,C        ;A=A+j.
        DJNZ M3

;᫨ A=(i+1)*j.    16.

        RRCA
        RRCA
        RRCA
        RRCA
        AND  E          ;=AND #0F.
        LD   (HL),A     ; 祭 .
        INC  L          ;室   ᫥饣 .
                        ;᫨  ⠡ ,  L=0.
        JR   NZ,M1      ;L<>0 - 室  砫 
                        ;横 (த  ⠡).

     ⮣ ࠣ - ᥣ 25 ⮢,   室
⠡, ᦠ⮩   HRUST 1.3, - 94  ( 
㦥 6 ⮢ 砥 䠩,   ࠭
䨪 "HR",  室    㯠
).  먣  ணࠬ ஥ ⠡
⠢ ਬ୮ 94-25=69 ⮢ (ਬ୮ -  ᪮쪨
稭: -,  ᦠ⨨ ᥩ ணࠬ,   ⮫쪮
⠡, ⠡  ᦠ   筮  94 ⮢;
-, ᦠ ᫥⥫쭮 㫥   ⠡ ⮦
 ᪮쪮- ,   祭 ; -,
ᬠਢ ࠣ ணࠬ ⠪   ᦠ).
    , ᫨  祭 - ॣ஢ 
 믮 ⮣ ࠣ,    
 ⥫쭠 ⨬. ਬ, ᫨ D=0, 
  LD DE,#000F  LD E,#0F,  ᫨ E=0,  
९ ࠣ ⠪, ⮡  ⠬ 㭪樨
ॣ஢ D  E, ⮣  LD DE,#000F 㤥 LD DE,#0F00, 
  㦥    LD D,#0F.  
室   ⠬ 㭪樨 ॣ஢ 
HL  DE (ਬ, ᫨   믮 ࠣ  DE 㦥
ᮤন  VOL_TAB).
      Pro Tracker 3.5-3.6 ᯮ ᪮쪮 㣠
⠡ ஬:

         #0110: 0000 0000 0000 0000 0101 0101 0101 0101
         #0120: 0000 0000 0101 0101 0101 0101 0202 0202
         #0130: 0000 0001 0101 0101 0202 0202 0203 0303
         #0140: 0000 0101 0101 0202 0202 0303 0303 0404
         #0150: 0000 0101 0102 0202 0303 0304 0404 0505
         #0160: 0000 0101 0202 0203 0304 0404 0505 0606
         #0170: 0000 0101 0202 0303 0404 0505 0606 0707
         #0180: 0001 0102 0203 0304 0405 0506 0607 0708
         #0190: 0001 0102 0203 0404 0505 0607 0708 0809
         #01A0: 0001 0102 0303 0405 0506 0707 0809 090A
         #01B0: 0001 0102 0304 0405 0607 0708 090A 0A0B
         #01C0: 0001 0202 0304 0506 0607 0809 0A0A 0B0C
         #01D0: 0001 0203 0304 0506 0708 090A 0A0B 0C0D
         #01E0: 0001 0203 0405 0607 0708 090A 0B0C 0D0E
         #01F0: 0001 0203 0405 0607 0809 0A0B 0C0D 0E0F

     ⮬ 砥  ⠪     ᫥
⮢ ⠡. ,  ,  㤠  ணࠬ
஥ ⠪ ⠡  [1].   ਢ 室 ⥪
 Pro Tracker 2.101,  ஬ ⠡ ஬ ந
ᯥ樠쭮 ணࠬ,   ࠢ 㦨,  
⠡ - ⠪ ,    Pro Tracker 3.5-3.6. ,
࠭: 室 ⥪   [1]  ப஢ 
"⠭ ந뢠⥫",   ⥬  ਣ쭮 
PT2 ⠡ ᮤন ।⢥,   ந
ணࠬ.
    ਢ  [1] ணࠬ  43   㤠
⢥ ⨬஢, ᪮쪮    ࠡ
 뢠,   ᯮ ⠡ - ᫮  #XX10.
 १ 稫  ⠪ ணࠬ  32 :

        LD   BC,VOL_TAB ; ⠡ - ᫮  #XX10.
        XOR  A
        LD   D,A

INITV2  ADD  A,#11      ;᫨  १ ⮣ ᫮
                        ; #100 (.. A=0  䫠 C=1),
        SBC  A,D        ; 0 ॢ  #FF ᫥ SBC A,D.
        LD   E,A
        LD   H,D
        LD   L,D        ;HL=0 (D ᥣ ࠢ 0).

INITV1  LD   A,L
        RLA
        LD   A,H
        ADC  A,D        ;=ADC A,0.
        LD   (BC),A
        ADD  HL,DE
        INC  C
        RET  Z
        LD   A,C
        AND  15
        JR   NZ,INITV1

        LD   A,E
        CP   #77
        JR   NZ,INITV2
        INC  A
        JR   INITV2

    ⮡ ᯮ짮    ।⢥ ࠨ
 ணࠬ ࠣ (⮡     CALL),
筮   RET Z  JR Z,M1 ( M1 - 
᫥饩  ࠣ⮬ ).  ࠣ ணࠬ
   - 33 .
    室 ⠡ ᦨ   HRUST 1.3  97 ⮢
(⠪   㦥 6 ⮢).  ࠧ, ਬ
먣  ணࠬ ஥ ⠡ PT 3.5-3.6 ⠢
97-33=64 .
     ᬮ७ ⮩ ணࠬ  ,  
 宦 ணࠬ  ஥ 㦥 ᬮ७
࠭ ⠡ PT 3.3-3.4:

        LD   BC,VOL_TAB ; ⠡ - ᫮  #XX10.
        LD   DE,#10

INITV2  LD   HL,#10
        ADD  HL,DE      ;᫥ ᫮ 䫠 C 襭.
        EX   DE,HL      ;DE=DE+#10.
        SBC  HL,HL      ;HL=0.

INITV1  LD   A,H
        LD   (BC),A
        ADD  HL,DE
        INC  C
        RET  Z
        LD   A,C
        AND  15
        JR   NZ,INITV1

        JR   INITV2

     ⮩ ணࠬ - 25 ⮢,   ଫ  
 ࠣ ணࠬ - 26 ⮢.  ࠢ  25-⮢
ࠣ⮬, ਢ  砫 , 먣  ࠧ 
稫.  -⠪ ࠡ 뫠 த  : 
 ꥤ  宦 ணࠬ -   । - 
 㭨ᠫ ணࠬ ஥ ⠡ ஬.
    ᫨ 室 ந뢠   ⥬  ஬ 㫨,
ᠭ  ࠧ  PT3,  ⥫쭮 ।
ந뢠   ஢,   ᨨ PT3 
ᠭ,   ᮮ⢥⢨  ⨬ ந 㦭 ⠡
஬.    㤥  ⠪,  뢠
 .  ⠪ ᤥ   ணࠬ BestView.
      ந뢠 PT3- ।⠢ ᮡ
ப "ProTracker 3.x",  x -  ᨨ.  ࠧ,
, ஢ਢ ,  ஬ ࠭ ᨬ x ( 室
 ᬥ饭 13  砫 ), 㧭,    ⠡
室 ନ஢.
     ਢ ⥪ 㭨ᠫ쭮 ணࠬ, 
   : ।,    ⠡ 
ந,  ந 㦭 ⠡. ⪠ MODULE -  
ந뢠 .

        LD   A,(MODULE+13) ;஢ઠ ᨨ.
        CP   "5"
        LD   HL,#11     ;⮢   ஥
        LD   D,H        ;⠡ PT 3.5-3.6.
        LD   E,H        ;DE=0.
        LD   A,#17      ;  RLA.
        JR   NC,M1      ;室, ᫨  - 3.5  3.6.
        DEC  L          ;HL=#10.
        LD   E,L        ;DE=#10.
        XOR  A          ;A=0 (  NOP).
M1      LD   (M2),A     ;  M2 㤥  NOP,  RLA.

        LD   BC,VOL_TAB ; ⠡ - ᫮  #XX10.

INITV2  PUSH HL         ;祭 ᫠ (#10  #11)
                        ;࠭  ⥪.
        ADD  HL,DE      ;᫥ ᫮ 䫠 C 襭.
        EX   DE,HL      ;DE=DE+#10  DE=DE+#11, ᬮ 
                        ;⠡ ந.
        SBC  HL,HL      ;HL=0.

INITV1  LD   A,L
M2      DB   #7D        ; 㤥 RLA  NOP.
        LD   A,H

;᫨   M2 室  NOP,  䫠 C ᥩ 筮
;襭 ( ᫥  SBC HL,HL,  ᫥ 
;AND 15   横),  ᫥    A.

        ADC  A,0
        LD   (BC),A
        ADD  HL,DE
        INC  C
        LD   A,C
        AND  15
        JR   NZ,INITV1

        POP  HL      ;⠭ 祭 ᫠.
        LD   A,E     ;᫨ ந ⠡ PT 3.3-3.4,
        CP   #77     ; E   㤥 ࠢ #77.
        JR   NZ,M3
        INC  E
M3      LD   A,C     ;᫨  ⠡ ,  C=0.
        AND  A
        JR   NZ,INITV2

        RET

     ⮩ ணࠬ - 53 ,   ଫ  
 ࠣ ணࠬ - 52 .  ,  , 祬
㬬ୠ   ⤥ ணࠬ   
।,     뢠.
    让 ਩  ⮩ ணࠬ. । ஥
⠡ ந室 ᠬ䨪 :   M2 
   NOP,    RLA,  ᨬ 
⮣,  ⠡  ந.   , 砫쭮
  M2 室  #7D. 祬  ? ⮬  
ࠢ 祭 ।饣  ࠣ -  
LD A,L.  ࠧ,  ணࠬ   ᫥  
㣮  ,  ⥫쭮 ᪠  ⥯ 
ᦠ. ஡  ⠪ ᯮᮡ ⨬樨 ᪠뢠 
[2].
    ᫨ ⠡  ந ⮫쪮  ࠧ,  ᫨
ணࠬ ஥ ⠡ ࠭  㯠 
(,   ஬)  ᯠ뢠  ।
 ந뢠  ,   ⥫쭮 
⨬஢.   M2 ⮣  ࠧ  
RLA,   砫 ணࠬ   LD A,#17 
⠢  M1  ᫥  (LD BC,VOL_TAB).
    ⠫ ,   㬥襭 ࠧ ணࠬ,
  ᯮ 몠 㫨 ( 易⥫쭮
ᠭ  Pro Tracker 3),  㦥 ࠣ ࠭. ,  [3]
ᬮ७ 襭 ᦠ 몠 㫥  
⮬᪮ ।  祥   ,
ࢮ砫 祭   ᯮ 
ந뢠,    祥 祭  ।饩
ᯮ㥬 祩.   [4], । 祣, ਢ
楤 ஥ ⭮ ⠡ - ⠪ ࠧ,  
࠭  ⠡      ⮣  ᦠ⨥
ணࠬ.


筨


1. VfNG/NEW. ᠭ ଠ 㫥 Pro Tracker 2.101.
   ஭  "Echo" #2.

2. .騭. "襭 ᦠ ணࠬ  ᥬ Z80".
   ".  " 4/2003.

3. .騭. "襭 ⥯ ᦠ 몠 㫥".
   ".  " 7/2002.

4. .騭. "⭠ ⠡  㫥 譮".
   "⥫.  " 6/2001, ". 
   " 7,8/2001.



    㣨    AY-몥:

1. "ࠢ쭮   饩  Pro Tracker 3".
   "⥫.  " 10,11/2000.

2. " ᮡ 몠쭮 ᮯ".
   "⥫.  " 11/2000,  ᥢ
   BV_Creator.

3. "⨬  ਬ intro 'Start'". ". 
   " 7-10/2001.
       ( ⮩    ᢥ  ணࠬ஢
   ந뢠 모.)
