
                   Recoded by Evgeny Muchkin 06.10.1998
                  SysOp of PALLY_STATION  tel: 176-74-19

                               () STINGER &
                               () CYRAX- (*)

                      㪮⢮  ணࠬ஢
                              General Sound.

                         v1.04.  004.

                 1. ⪨ 孨᪨ ࠪ⨪ GS.
                  --------------------------------------

: Z80, 12MHz,  横 wait
ROM      : 32k, 27256
RAM      : Static Ram  128k ᥣ,  112k  㯭  㫥   
            ᨨ
INT      : 37.5 KHz : 4 ᨬ 8-  ,    6-
            ஫ ஬.

             2. ⪮ ᠭ GS,   类 .
             ------------------------------------------------

  GS - 몠쭠 窠,  ।祭  ந뢠  몠
㫥  ⤥  (䥪⮢).

  㫨  GS -  ⠭   PC 4-  MOD 䠩,
  -   signed sample, ⠪  PC unsigned sample.

  ந뢠⥫ MOD  䠩    GS    ࠪ᪨    
ProTracker'    ᮧ  ⥭ᨢ  ᯮ짮  室-
 ProTracker'a. (室 뫨  Protracker' v2.1A by Lars "ZAP" Hamre
- Amiga Freelancers)

  MOD Player ন   Pro Tracker',  ᪫祭 :

 01 Filter On -ᯥ筠 , 砥 䨫 ᮪ .

 EFX Invert Loop     ,    ন  -
. ,  ন  -  .

  GS ।⠢  ᥡ,  -,  ய     ᢮
஬, ,   ⠬,  ᮫⭮     -
 㬠,   ,  ਬ,  㧨 ᢮   ,
 ,  㧨 ᥬ  ⢮   .  Soft
 GS    ᥡ  ந뢠 㪠,  樨
  ..  ணࠬ஢ GS' ᢮  ।   ⮬ -
 / ,   ⥬ ॡ ⮫쪮   ⨯: -
 ,  ⠭  ஬ ந뢠 ,   -
  #09   #02  ..

  ᫨ । 㧨    ,   GENERAL -
 㦠 砫 ,  ⥬ .

   㧪  祭 ४ ⠢  ᢮묨  2  ,
.. 㦠 㫨  ᨬ 110K.  ᫮   -
,   ᯮ 祭 ⥫쭮  楫 ᮢ⨬  ᫥-
騬 ﬨ.

  筮 祭 ४ ⠢  80      ,
ਬ, ᫨ ॡ 㧨 63-    18 , 
:

  Total_Sample_Length=112*1024-63*1024-2*1024-18*80=46688 

   㬬ୠ  ,   ⠪  饩  
㦥.

  ᫨ , ਬ, ॡ ᫨,  ᪮쪮    GS'
2-  ,    ᫥騬 ࠧ:

 112*1024/(2048+80)=53 .

   GS'  4 䨧᪨ ,   ந뢠 .

   0  1 - ,  2  3 - ࠢ.

                        3. 䥩  㬮.
                        ---------------------------

    GS ᬮ   4 ॣ஢:

1. Command register - ॣ ,  㯭      
187 (#BB).   ॣ 뢠 .

2. Status register  -  ॣ ﭨ,  㯭  ⥭   -
 187 (#BB).

   ॣ:

   7 - Data bit, 䫠 
   6 - ।
   5 - ।
   4 - ।
   3 - ।
   2 - ।
   1 - ।
   0 - Command bit, 䫠 

   ॣ  । ﭨ GS,  ⭮   -
   ।  ,   । ,  
..

3. Data register - ॣ ,  㯭      179
(#B3).   ॣ  뢠 , ਬ,    
㬥 .

4. Output register - ॣ 뢮,  㯭  ⥭     
179 (#B3).  ⮣ ॣ  ⠥ , 騥  GS.

  Command bit  ॣ ﭨ ⠭ ⭮  ᫥  
  ॣ . 뢠  0   ⮫쪮  GS,   ᨣ-
  । ⠯ ᯮ .

  Data bit  ॣ ﭨ   ⠭   襭    
 㬠,  ⠪    GS:    㬮    ॣ
  ⭮ ⠭  1,   ᫥ ⥭ GS'  ⮣ -
 뢠  0.   GS  ॣ 뢮  (   Data
bit) ⭮ ⠭  1,   ᫥ ⥭  ⮣  -
 뢠 ⭮  0.

  ᬮ  ,   ॣ   ॣ 뢮 ᯮ   -
࠭⢥ ᮢ ⮢    ⮬       
   ,     ᨬ묨 ॣࠬ.   祭,
 ࠧ ᠭ     ॣ஢,  ⠥    
 .

  ﭨ   祭  ।,  ᫨  ᯥ䨪樨 -
  । 祭 ⮣   । ⠯ ᯮ  -
,  ⨬  - ।  ⭮⥫쭮  祭
⮣ .

                           4. ⥬  GS.
                           ---------------------

  砫  ᥡ 讥 㯫  ᮡ⢥ ⥬  .
GS,   ⭮,  ।祭  ᭮  ந뢠 㫥  -
.    ᨨ (1.03) GS ROM 㪠 㧪   /-
  32 .

     㧪    砥 ᢮ 㭨 -
,  筮 । 饭     ,
 ॡ  .    㦥  砥  -
 (handle) = 1, ᫥騩 -  2,  ..

    ᠬ ਬ   ,    ⢥  㦥  -
 㤥  handle=1 ᫥ 㧪.

  ᮡ  ᨨ  ⠪ ,   砫 ॡ -
㦠 ,  ⥬ 㦥 .

  ᮡ ᠭ :

   뢠 ᫥騬 ࠧ:

 1. Hex  
 2.  
 3. 믮塞 ⢨  ᯮ 
 4. ଠ 
 5. ਨ  

  ଠ  뢠 ᫥騬 ࠧ:

 GSCOM EQU 187
 GSDAT EQU 179

SC #NN    : ᫠    ॣ 

          LD A,#NN
          OUT (GSCOM),A

WC      :   Command bit

     WCLP IN A,(GSCOM)
          RRCA
          JR C,WCLP

SD Data : ᫠   ॣ 

          LD A,Data
          OUT (GSDAT),A

WD      :    Data bit,  , ,   GS  ਬ
          ᫠  

     WDLP IN A,(GSCOM)
          RLCA
          JR C,WDLP

GD Data : ਭ   ॣ 

          IN A,(GSDAT)

WN      :   ⠭ Data bit,  ,  । 
           GS

     WNLP IN A,(GSCOM)
          RLCA
          JR NC,WNLP


                                 GS:

#00 Reset flags
    뢠 䫠 Data bit  Command bit.

    SC #00
    WC

    (Data bit=0, Command bit=0)

#01 Set silence (*)
    뢮     #80.   ⠭ 設.

    SC #01
    WC

#02 Set low volume (*)
    ⠭ ஬x     .

    SC #02
    WC

#03 Set high volume (*)
    ⠭ ஬     ᨬ.

    SC #03
    WC

#04 Set 'E' 3bits (*)
    ⠭  'E' ॣ GS 3    ᮮ⢥⢨   -
     祭 (2        魮    ஬  
    #00-#03).

    SD Chan (#00-#07)
    SC #04
    WC

#05 Out volume port (*)
    ⠭ ஬ ,  ண ᮤন  'E',  㪠-
     祭. ( ࠡ뢠  ᫮,   'E' 室 
    । #00-#03)

    SD Volume (#00-#3F)
    SC #05
    WC

#06 Send to DAC (*)
    뢮    , 㪠뢠  'E'.

    SD Byte
    SC #06
    WC

#07 Send to DAC and to volume port (*)
    뢮    ('E')   ஬.

    SD Byte
    SC #07
    WC
    SD Volume
    WD

#08 -      #00

#09 Sets one's byte volume. (*)
    ⠭ ஬ ,  ண   2  .

    SD Byte (ccvvvvvv)
    SC #09
    WC

    cc -  
    vvvvvv -  ஬

#0A DAC output (*)
      ।⢥ 뢮  .

    SD Byte
    SC #0A
    WC
    SD Chan (#00-#03)
    WD

#0B DAC and Volume output (*)
      ᫥ 뢮    ⠭ ஬.

    SD Fbyte
    SC #0B
    WC
    SD Sbyte (ccvvvvvv)
    WD

    祭 ⮢ Sbyte    .#09)

     #01  - #0B 㦠  ᭮  ஥ ࠧ  Covox'
     뢠⥫,   ⮬  ᫨誮 㣫㡫  ७ -
     GS.

    vvvvvv -  ஬

#0C DAC output (*)
      ।⢥ 뢮  .

#0C Call SounDrive Covox mode (*)
    뢠 ० 媠쭮 ,  ᫥⥫쭮  -
       .  室  ०  ⮬᪨  ᫥  뢮
    ⢥⮣ .

    SD CH1
    SC #0C
    WC
    SD CH2
    WD
    SD CH3
    WD
    SD CH4
    WD

#0D Call Ultravox mode (*)
    뢠 ० 㭨ᠫ쭮 ,   ᫥⥫쭮    -
       ,  ᫮  ॣ㫨 (1-4). ⫨稥 
    ।饣 ਠ ᨭ஭  ந.  室 ⠪ ந-
     ⮬᪨   ᫥ .

    SD CHANS
    SC #0D
    WC

    SD CH1
    SD CH2
    SD CH3
    SD CH4

    CHANS (4-  ) 㪠뢠     ⢮  -
     祭  ᮮ⢥騩   㦭  ⠭.᫨  
    몫祭,   㯨訩    ᫥騩  祭  
    (᫨ ᯥ :)


#0E Go to LPT Covox mode
    室  ० 쭮 ,       ॣ
        (ࠢ  ) .  室  ⮣ ० -
     #00  ॣ .

    SC #0E
    WC

    SD  \
    SD   \
    ...    뢮  
        /
    SD  /

    SC #00
    WC

#0F Go in Profi Covox mode (*)
    室  ० 媠쭮 ,       ॣ
        ,   ॣ     ண  .
    室  ⮣ ० -  #4  ॣ ,  ⥬  ᫥-
    ⥫쭮 #0F  #AA  ॣ .

    SD #59
    SC #0F
    WC

    SD  \
    SC   \
    SD    \
    SC       뢮  
    ...   /
    SD   /
    SC  /

    SD #4E
    WD
    SC #0F
    WC
    SC #AA
    WC

#10 Out to any port (*)
    뢮  o ७  GS (#00-#09).

    SD Port
    SC #10
    WC
    SD Data
    WD

#11 In from any port (*)
    ⠥   ७  GS (#00-#09).

    SD Port
    SC #10
    WC
    GD Data
    WN

#12 OUT to 0 port (*)
    뢮    䨣樨 GS (#00).

    SD Data
    SC #12
    WC

#13 Jump to Address (*)
    । ࠢ   .

    SD ADR.L
    SC #13
    WC
    SD ADR.H
    WD

#14 Load memory block (*)
    㧪    㪠    .

    SD LEN.L
    SC #14
    SD LEN.H
    WD
    SD ADR.L
    WD
    SD ADR.H

    SD \
    WD  \
    SD   \
    WD        LEN
    ...  /
    SD  /
    WD /

#15 Get memory block (*)
    㧪    㪠    .

    SD LEN.L
    SC #15
    SD LEN.H
    WD
    SD ADR.L
    WD
    SD ADR.H

    GD \
    WN  \
    GD   \
    WN        LEN
    ...  /
    GD  /
    WN /

#16 Poke to address (*)
    뢠    㪠 .

    SD ADR.L
    SC #16
    WC
    SD ADR.H
    WD
    SD Byte
    WD

#17 Peek from address (*)
    뢠    㪠 .

    SD ADR.L
    SC #17
    WC
    SD ADR.H
    WD
    GD Byte
    WN

#18 Load DE Pair (*)
    㦠 ॣ⮢  DE (⭮  GS,      -
     ன Main CPU) 㪠 ᫮.

    SD B.E
    SC #18
    WC
    SD B.D
    WD

#19 Poke to (DE) address (*)
    뢠    㪠  DE.

    SD Byte
    SC #19
    WC

#1A Peek from (DE) address (*)
    뢠 ᮤন , 㪠뢠  DE.

    SC #1A
    WC
    GD Byte
    WN

#1B Increment of DE Pair (*)
    稢  DE  .

    SC #1B
    WC

#1C Poke to (#20XX) address (*)
    뢠   , 訩  ண ࠢ #20.

    SD ADR.L
    SC #1C
    WC
    SD Byte
    WD

#1D Peek from (#20XX) address (*)
    ⠥   , 訩  ண ࠢ #20.

    SD ADR.L
    SC #1D
    WC
    GD Byte
    WN

#1E - #1F १ࢨ஢.
#F1 - #F2 १ࢨ஢.

#F3 Warm restart
    뢠  GS,   ய᪠  ⠯  ।  ⢠
    ࠭    ஢,   祭 ᨫ쭮 ᪮  樠-
    樨.

    SC #F3
    WC

#F4 Cold restart
     १ GS  ᥬ ஢ઠ.  , JP #0000.

    SC #F4
    WC

#F5 Busy on
    ⠭ 䫠   #FF

    SC #F5
    WC

#F6 Busy off
    ⠭ 䫠   #00

    SC #F6
    WC

   砫쭮 Busy=#00.  ᯮ    GS 믮   
 横  .   横  ᫮   ।-
  ⠪:

 1 if Command bit=0 then go to 1
 2 Execute Command
 3 if Command bit=1 then go to 2
 4 if Playing=0 then go to 1
 5 if Busy=#FF then go to 1
 6 Process Sound
 7 go to 1

  ᯮ  Busy  ਬ 樨஢  ந뢠  
   ⮬ ᪠  ࠬ ந뢠      
⮬    ६. ᫨    ᯮ짮  -
 ⠪ : 樨  ( ⠭ ந뢠  ⮫쪮
⮬ 樨 ன   ..)

#F7 Get HX Register (*)
     ᮤন ॣ HX (GS)
    HX   ࠡ⪥ 䫠 Busy.

    SC #F7
    WC
    GD HX
    WN

#F8 - #F9 १ࢨ஢.

#FA Out zero_to_zero
    뢮   㫥 (䨣樮)  GS.     ਮ⠭
    砭 모  ᫥饣 ⥭  .. .

    SC #FA

    WC

#FB - #FF १ࢨ஢.

#20 Get total RAM
     騩 ꥬ 㯭   GS. (  ᨨ  112)

    SC #20
    WC
    GD RAM.L( )
    WN
    GD RAM.M(। )
    WN
    GD RAM.H( )

Total RAM=65536*RAM.H+256*RAM.M+RAM.L

#21 Get free RAM
     騩 ' ᢮   GS.

    SC #20
    WC
    GD RAM.L( )
    WN
    GD RAM.M(। )
    WN
    GD RAM.H( )

 Free_RAM=65536*RAM.H+256*RAM.M+RAM.L

#23 Get number of RAM Pages
     ᫮ ࠭   GS.

    SC #23
    WC
    GD Number_RAM_Pages

      ᨨ 3 ࠭.

#24 - #29 १ࢨ஢.

#2A Set Module Master Volume
    ⠭ ஬ ந뢠 㫥.

    SD Module_Master_Volume [#00..#40]
    SC #2A
    WC
    [GD Old_Master_Volume] -  ஬.

    쪨 ਬ ᯮ짮  :

    (।,  ࠥ )

           LD B,#40

     LOOP: LD A,B
           OUT (GSDAT),A
           LD A,#2A
           OUT (GSCOM),A
           EI
           HALT
           DJNZ LOOP

           LD A,#32
           OUT (GSCOM),A

  襮ᠭ  ᭨ ஬ 饣 ,  ⥬ ⠭-
 .

#2B Set FX Master Volume
    ⠭ ஬ ந뢠 䥪⮢.

    SD FX_Master_Volume [#00..#40]
    SC #2B
    WC
    [GD Old_FX_Volume] -  ஬

  筮 ।饩 ,    .

        ॣ㫨஢  ஬⥩   
,  ..

#2E Set Current FX
    ⠭ ⥪騩 䥪.  ᢠ ६ CURFX  -
    祭. ᫨ -  ॡ   (sample handle), 
      ⮣    #00   ⠢ -
     ⮣  祭 ६ CURFX. (.  #38, #39, #40-#4F
      襨.)

    SD Cur_FX
    SC #2E
    WC

#30 Load Module
    㧪   .

    SC #30
    WC
   [GD Module_Handle]- 
   (Command bit=0, Data bit=0)
    SC #D1 (Open Stream- ⮪)
    WC

    SD \
    WD  \
    ...    
    SD  /
    WD /

    SC #D2 (Close Stream- ⮪)
    WC

    ਬ:
             LD HL,Mod_adress
             LD DE,0-Mod_length
             LD C,GSCOM

             LD A,#30
             CALL SENDCOM
             LD A,#D1
             CALL SENDCOM

             LD A,(HL)
     LOOP:   IN B,(C)
             JP P,READY
             IN B,(C)
             JP M,LOOP
     READY:  OUT (GSDAT),A
             INC HL
             LD A,(HL)
             INC E
             JP NZ,LOOP
             INC D
             JP NZ,LOOP
     WAIT:   IN B,(C)  ; ਭ
             JP M,WAIT ;᫥ 
             LD A,#D2
             CALL SENDCOM
             IN A,(GSDAT) ;  
             OUT (GSDAT),A
             LD A,#31

    SENDCOM: OUT (GSCOM),A
    WAITCOM: IN A,(GSCOM)
             RRCA
             JR C,WAITCOM
             RET

#31 Play module
    ந뢠 .

    SD Module_Handle -  
    SC #31
    WC

#32 Stop module
    ⠭ ந뢠 .

    SC #32
    WC

#33 Continue module
    த ந뢠  ᫥ ⠭.

    SC #33
    WC

#35 Set Module Volume
    ⠭ ஬ ந뢠 㫥.

    SD Module_Master_Volume [#00..#40]
    SC #35
    WC
   [GD Old_Master_Volume] -  ஬.

#36 Data on (*)
    ⠭ ॣ   #FF.

    SC #36
    WC
   [GD Data (#FF) ]

#37 Reinitialisation (*)
    ⠭ ७ ६  室 ﭨ.

    SC #37
    WC

#38 Load FX
    㧪  䥪  . 㦠   (PC type)

    SC #38
    WC
   [GD FX_Handle]- 
   (Command bit=0, Data bit=0)
    SC #D1 (Open Stream- ⮪)
    WC

    SD \
    WD  \
    ...    
    SD  /
    WD /

    SC #D2 (Close Stream- ⮪)
    WC

   㧪  ,   GS ᮧ  ⮣  -
,  ஬ 뢠 ࠧ ࠬ . ᫥ 㧪 
ࠬ ⠭  । 祭,  :

  Note=60,    Volume=#40,    FineTune=0,    SeekFirst=#0F,    SeekLast=#0F,
Priority=#80,  No Loop  ७ ६ CurFX ⠭ ࠢ
FX_Handle.

  ⥬  #40, #41, #42, #45, #46  #47   祭  㬮-
砭 ᬥ  ᢮.   ॡ ⮬   #39   樠樨
ந뢠  ᯮ 祭 ࠬ஢   .

   ᢮ ⢥   筮   ࠬ,  
ᦨ 筮  ,  ᫨ ॢ   Delta-,   ..
࠭  ᮫ 祭 ,    ⭮⥫쭮  ᬥ饭  ⭮-
⥫쭮 ।饣 .  ਬ୮  ⠪     ॢ    
Delta-:

            LD HL,Start_of_sample
            LD DE,0-Length_of_sample
            LD C,#00

      LOOP: LD A,(HL)
            SUB C
            LD C,(HL)
            LD (HL),A
            INC E
            JP NZ,LOOP
            INC D
            JP NZ,LOOP

         :

             LD IX,Parameters
             LD HL,Sample_adress
             LD DE,0-Sample_length
             LD C,GSCOM

             LD A,#38
             CALL SENDCOM
             LD A,#D1
             CALL SENDCOM

             LD A,(HL)
     LOOP:   IN B,(C)
             JP P,READY
             IN B,(C)
             JP M,LOOP
     READY:  OUT (GSDAT),A
             INC HL
             ADD A,(HL)
             INC E
             JP NZ,LOOP
             INC D
             JP NZ,LOOP
     WAIT:   IN B,(C)  ; ਭ
             JP M,WAIT ;᫥ 
             LD A,#D2
             CALL SENDCOM

      ;  ८।塞 ࠬ
      ;   㬮砭 ᢮
      ; 祭ﬨ

             LD A,(IX+#00)
             OUT (GSDAT),A  ; 
             LD A,#40
             CALL SENDCOM
             LD A,(IX+#01)
             OUT (GSDAT),A  ; ஬
             LD A,#41

    SENDCOM: OUT (GSCOM), A
    WAITCOM: IN A,(GSCOM)
             RRCA
             JR C,WAITCOM
             RET

#39 Play FX
    ந뢠 䥪.

    SD FX_Handle -  
    SC #39
    WC

   ᯮ ⮩  ந室 ᫥饥: ᬮ ,  㪠-
  SeekFirst ࠬ 襣 ,  ᫨ -    ᢮-
,     ந뢠 ,   ⨢ 砥 ᬮ  ,
㪠  SeekLast  ᫨    ᢮,     ࠥ  ,
᫨ ᢮ ,  ᬠਢ  ,  㪠 SeekLast,  
 롨ࠥ   訬 ਮ⮬  ࠢ   ਮ⮬
襣  (   ,    ⨬ ந),  ᫨  
⮣  㤥 訩 ਮ, 祬  , 㦥 饣  ,
 騩    㤥 ⠭,     㤥  饭  
⮬   ண .  ⠪  ਮ⭠ 奬...

    ᪠  ,   , ஬  ..  ࠬ-
 뢠       .

   饬 砥,  - ந   㦭묨 ࠬࠬ,   
⠭  ࠬ ᫥ 㧪   ᬥ ᯮ짮  -
 #39. ᫨  ࠬ  ,   㯠 ᫥騬 -
ࠧ:  #2E ᤥ ⥪騬 ॡ㥬 ,    #4x  -
  ࠬ,  ⥬ 㦥 ᪠   #39.

  ୠ⨢ ⮤ ᪠  ।⠢  #80..#9F,  
ᯮ    אַ    㪠뢠,     
ॡ  ,   ஬ ⮣,    ⠪ 㪠  
⮩ / ஬ ॡ  .

#3A Stop FX in channels
    ⠭ ந뢠 䥪⮢   ,   㪠뢠-
      ᪥  (Channel Mask).      n-    㪠-
      ,  䥪  n-  ॡ ⠭

    SD Channel_Mask
    SC #3A
    WC

  ᠭ    ਠ ࠡ  ,   ᮦ-
   ⠪   ⮬ ,      ⠪,   -
:    7 ⠭   㫥 ,  ..  ᫥-
   㤥 ࠢ,      ४ ⠭-
    ᪮ #FF.

#3D Set FX Volume
    ⠭ ஬ ந뢠 䥪⮢.

    SD FX Volume [#00..#40]
    SC #3D
    WC
   [GD Old_FX_Volume] -  ஬

#3E Load FX (Extended version)
    㧪  䥪  .  㦠   .
    (Amiga type)

    SD #01 (Signed sample)
    SC #3E
    WC
   [GD FX_Handle]- 
   (Command bit=0, Data bit=0)
    SC #D1 (Open Stream- ⮪)
    WC

    SD \
    WD  \
    ...    
    SD  /
    WD /

    SC #D2 (Close Stream- ⮪)
    WC

#40 Set FX Sample Playing Note
    ⠭   㬮砭  ⥪饣 䥪.

    SD Note [0..95]
    SC #40
    WC

Note=
 0 C-0
 1 C#0
12 C-1
24 C-2
36 C-3 (C-1  )
48 C-4 (C-2  )
60 C-5 (C-3  )
72 C-6
84 C-7

    ᨨ Sound Generators Wave 2,  3  ந ⠢ 3,
4  5,  ⮬ ⨬ 祭 ࠬ Note    36
 71.

#41 Set FX Sample Volume
    ⠭ ஬  㬮砭  ⥪饣 䥪.

    SD FX_Volume [#00..#40]
    SC #41
    WC

#42 Set FX Sample Finetune
    ⠭ Finetune  㬮砭  ⥪饣 䥪.

    SD FX_Finetune [#00..#40]
    SC #42
    WC

#43 - #44 १ࢨ஢.

#45 Set FX Sample Priority
    ⠭ ਮ  ⥪饣 䥪. (.  #39)

    SD FX_Priority [#01..#fe]
    SC #45
    WC

#46 Set FX Sample Seek First parameter
    ⠭ ࠬ Seek First  ⥪饣 䥪. (.  #39)

    SD FX_SeekFirst
    SC #46
    WC

#47 Set FX Sample Seek Last parameter
    ⠭ ࠬ Seek Last  ⥪饣 䥪. (.  #39)

    SD FX_SeekLast
    SC #47
    WC

#48 Set FX Sample Loop Begin (*)
    ⠭ 砫 横  ⥪饣 䥪.

    SD LEN.L
    SC #48
    WC
    SD LEN.M
    WD
    SD LEN.H
    WD

     ࠢ⢥ LEN.H - #FF 横  ந

#49 Set FX Sample Loop End (*)
    ⠭  横  ⥪饣 䥪.

    SD LEN.L
    SC #49
    WC
    SD LEN.M
    WD
    SD LEN.H
    WD

#4A - #4F १ࢨ஢.

#51 - #5F १ࢨ஢.

#60 Get Song Position
    祭 祭 ६ Song_Position  ⥪饬 㫥.

    SC #60
    WC
    GD Song_Position  [#00..#FF]

   ஢  ⢮ ந࠭ ୮ .  -
   ਭ 祭 0    㢥稢      ᫥
ந뢠 । ୠ.   ६  ᯮ짮  
ᨭ஭஢ ᮢ  㬥  ந뢠 .    ⮣
,  ਬ,   砫 楤 ࠡ⪨ 뢠 ᤥ SC  #60,
⥬ 믮 楤 ࠧ 権  ࠭,  ஫ 祪
 .. (.. ⮡ 뫠 筠  믮  প),  -
⥬  祭  179 (GD Song_Position),   ࠢ   -
㥬 ,  砥 ࠢ⢠, ३  ᫥  , ..

  if (Song_Position==My_Position)
  then goto Next_Part_Of_Demo

#61 Get Pattern Position
    祭 祭 ६ Pattern_Position  ⥪饬 㫥.

    SC #61
    WC
    GD Pattern_Position  [#00..#3F]

   祭 ᬥ饭  ୥ (⥪騩 ROW), ᯮ짮 - -
筮 ।饩 ,  ॡ ,   稭 -
 쭮 ,  ⮬

 if (Pattern_Position>=My_Position) then goto Next_Part_Of_Demo

#62 Get Mixed Position
     祭 Pattern_Position,  ᬥ蠭  Song_Position.

    SC #62
    WC
    GD Mixed_Position

    Mixed_Position: ( ⠬)

    7-Song_Position.1
    6-Song_Position.0
    5-Pattern_Position.5
    4-Pattern_Position.4
    3-Pattern_Position.3
    2-Pattern_Position.2
    1-Pattern_Position.1
    0-Pattern_Position.0

  . ᫨  Mixed_Position  ᤥ   AND #3F,     
뫨 Pattern_Position,   ᫨ ᫥ 祭   RLCA,   RLCA,
AND #02 -    訥   Song_Position. . ਬ砭  -
 #60  #61.

#63 Get Channel Notes
        .

    SC #63
    WC
    GD Note_of_channel_0
    WN
    GD Note_of_channel_1
    WN
    GD Note_of_channel_2
    WN
    GD Note_of_channel_3

  ᫨  -  祭     ᫥  ᯮ-
  #63,   7 祭 祭

            Note_of_channel_N

㤥  㫥, ᫨   祭   ᠬ,   뫮 ࠭,   
 㤥  .  訥 ᥬ ⮢   ᮡ⢥   0  95;
᫨  祭 ࠢ 127,    砥,      
 .   ।祭  ᭮  ஥   -
 ࠧ ஢.

#64 Get Channel Volumes
     ஬   .

    SC #64
    WC
    GD Volume_of_channel_0
    WN
    GD Volume_of_channel_1
    WN
    GD Volume_of_channel_2
    WN
    GD Volume_of_channel_3

   . ᠭ  #63

#65 Jump to position (*)
     室   .

    SD Position
    SC #65
    WC

#66 Set speed/tempo (*)
    ⠭ ᪮  । #01-#1F.  祭 #20-#FF ⠭-
     ⥬ ந뢠. 祭 ⥬ ᮮ⢥ ਣ 
    ᪮ ࠢ #06.

    SD Speed/Tempo
    SC #66
    WC

#67 Get speed value (*)
    ⥭ ⥪饩 ᪮.

    SC #67
    WC
    GD Speed
    WD

#68 Get tempo value (*)
    ⥭ ⥪饣 ⥬.

    SC #68
    WC
    GD Tempo
    WD

#6A - #7F १ࢨ஢.

#80 Direct Play FX Sample (#80..#83)
    ந뢠    .

    SD Sample_Number
    SC #80..#83 (訥  । ।⢥  , 
                 ஬ ॡ  ) WC

#88 Direct Play FX Sample (#88..#8B)
    ந뢠       ⮩.

    SD Sample_Number
    SC #88..#8B (訥  । ।⢥  , 
                 ஬ ॡ  ) WC SD Note [0..95] WD

#90 Direct Play FX Sample (#90..#93)
    ந뢠       ஬.

    SD Sample_Number
    SC #90..#93 (訥  । ।⢥  , 
                 ஬ ॡ  )
    WC
    SD Volume [#00..#40]
    WD

#98 Direct Play FX Sample (#98..#9B)
    ந뢠       ⮩  ஬.

    SD Sample_Number
    SC #98..#9B (訥  । ।⢥  ,    
                 ஬ ॡ  )
    WC
    SD Note [0..95]
    WD
    SD Volume [#00..#40]
    WD

#B0 - #F0 १ࢨ஢.

    ਬ砭: , ⬥祭  (*),   㬥஢묨
        ⭮ ⮫쪮  ᨨ 1.04.     ࠡᯮᮡ
       ᫥   ᠭ (2) ⢥⢥ 
    .
    2.,  ॣ ( ), 㯮  ⮬ ᠭ, ⭮-
     ⮫쪮  ⮫쪮  ७ ॣࠬ GS   ⭮襭  
    ॣࠬ ᭮   .


                           5. Heoo p...

                         op GS : ( 2 㪨 ;)

                           Caa Dangrous 
                                 (X-Trad)

 E pae e oa GS'a, aapaa peaa ooo, eoope
oea ooeo Soft'a GS'a,  a ae Amiga 1200,  a  oopo  o
poo e᪨e epe.  O ee  eoop po-
oe General Sound'a  eo o aee pooo  poae GS.

                               Stingr 

 o ,  aop eo oa    o-oee  a    epe  General
Sound'a.      papao稪o  eo  poeoo  Soft'a    GS'e  
peoaa  ae aa ᨬ eo. (a,   ae  aopo
eoopx xpx aopoo  aapao a GS'a,      aopo  ee
ox,  e᫨  e  e pe epae Cao,  ooﭭo oaoe
poea oe e. )

 Haa ooo 20  oa a o-oa,  paa,   eoo a,   o
e ooo oe a ooeo ex epᨩ GS'a, a-o:

 - Wave 4 Sound Generators opoox e oa.
 - opee a e ox poeo a 30-40 eepa樨 a.
 - Oe xoeo  popae STM'o o PC.
 - Paa ea oa.
 - Pae  ee  a  a
 - Xpaee aepo   aopeoao  e  (oae  ooo  15%  o
   aaoo oea).
 -  ooe poe

 Be popaoe oeeee  oo  paoa    a  oex  epx
po訢,   e᫨  oo  aao    ooe⢨    o  eoe묨
oeaﬨ  peoaﬨ.  poe oax oa  GS'e  ee  ee
ooe oeo oa,  oope e oepoa,      oa  a
oo  pao  e  x  a-oo  opao    oo   ooeo
oepoax oa pe aoe pee  ⨯a:  "B  oea樨
aao a, a  po訢e o paoae o po... "

  ap aeoe papee e oa,   pa op⨢-
 (eaeo ope) peoe.

Ta o, e᫨  o稢aee p  ee a peaop  GS
 oap㦨aee,  o a oe e xaae ao-o oa,  o  oe
e  aae peoe. (Teeo,  a,  oooo pa 㧭a e
oa ;)

                           Sanx 4 moral support:
                              a (X-Trade)
                               SParker (XLD)
                 _________________________________________

                               -= THE END =-

