Renamed Echo Tester directory from src-68k to tester

1 files changed, 0 insertions, 263 deletions

diff --git a/src-68k/sound/echo.68k b/src-68k/sound/echo.68k
deleted file mode 100644
index 1d02800..0000000
--- a/src-68k/sound/echo.68k
+++ /dev/null
@@ -1,263 +0,0 @@
-;****************************************************************************
-; Echo_Z80Request
-; Requests the Z80 bus
-;****************************************************************************
-
-Echo_Z80Request macro
-    move.w  #$100, ($A11100)        ; Request Z80 bus
-@Echo_WaitZ80\@:
-    btst.b  #0, ($A11100)           ; Did we get it yet?
-    bne.s   @Echo_WaitZ80\@         ; Keep waiting
-    endm                            ; End of macro
-
-;****************************************************************************
-; Echo_Z80Release
-; Releases the Z80 bus
-;****************************************************************************
-
-Echo_Z80Release macro
-    move.w  #$000, ($A11100)        ; Release Z80 bus
-    endm                            ; End of macro
-
-;****************************************************************************
-; Echo_Z80Reset
-; Resets the Z80 and YM2612
-;****************************************************************************
-
-Echo_Z80Reset macro
-    move.w  #$000, ($A11200)        ; Assert reset line
-    rept    $10                     ; Wait until hardware resets
-    nop                               ; ...
-    endr                              ; ...
-    move.w  #$100, ($A11200)        ; Release reset line
-    endm                            ; End of macro
-
-;****************************************************************************
-; Echo_Init
-; Initializes Echo
-;
-; input a0.l ... Address of pointer list
-;****************************************************************************
-
-Echo_Init:
-    movem.l d0/a0-a1, -(sp)         ; Save registers
-
-    Echo_Z80Reset                   ; May not work without this...
-    Echo_Z80Request                 ; We need the Z80 bus
-
-    move.b  #$01, ($A01FFF)         ; Command: load pointer list
-
-    move.l  a0, d0                  ; Easier to manipulate here
-    move.b  d0, ($A01FFD)           ; Store low address byte
-    lsr.l   #7, d0                  ; Get high address byte
-    lsr.b   #1, d0                    ; We skip one bit
-    bset.l  #7, d0                    ; Point into bank window
-    move.b  d0, ($A01FFE)           ; Store high address byte
-    lsr.w   #8, d0                  ; Get bank byte
-    move.w  d0, d1                    ; Parse 32X bit separately
-    lsr.w   #1, d1                    ; Put 32X bit in place
-    and.b   #$7F, d0                  ; Filter out unused bit from addresses
-    and.b   #$80, d1                  ; Filter out all but 32X bit
-    or.b    d1, d0                    ; Put everything together
-    move.b  d0, ($A01FFC)           ; Store bank byte
-
-    lea     @Z80Program(pc), a0     ; Where Z80 program starts
-    lea     ($A00000), a1           ; Where Z80 RAM starts
-    move.w  #@Z80ProgSize-1, d0     ; Size of Z80 program (DBF adjusted)
-@LoadLoop:                          ; Go through all the program
-    move.b  (a0)+, (a1)+              ; Copy byte into Z80 RAM
-    dbf     d0, @LoadLoop             ; Go for next byte
-
-    Echo_Z80Reset                   ; Now reset for real
-    Echo_Z80Release                 ; Let the Z80 go!
-
-    movem.l (sp)+, d0/a0-a1         ; Restore registers
-    rts                             ; End of subroutine
-
-;****************************************************************************
-; Echo Z80 program
-; It should be located wherever Echo_ProgFile was defined
-;****************************************************************************
-
-@Z80Program: incbin "\Echo_ProgFile"
-@Z80ProgSize equ *-@Z80Program
-    even
-
-;****************************************************************************
-; Echo_SendCommand
-; Sends an Echo command (no address parameter)
-;
-; input d0.b ... Echo command
-;****************************************************************************
-
-Echo_SendCommand:
-    move.w  d1, -(sp)               ; Save register
-
-    Echo_Z80Request                 ; We need the Z80 bus
-
-@Try:
-    tst.b   ($A01FFF)               ; Check if Echo is ready
-    beq.s   @Ready                  ; Too busy?
-    Echo_Z80Release                   ; Let Echo continue
-    move.w  #$FF, d1                  ; Give it some time
-    dbf     d1, *                       ; ...
-    Echo_Z80Request                   ; Get Z80 bus back
-    bra.s   @Try                      ; Try again
-
-@Ready:
-    move.b  d0, ($A01FFF)           ; Write command ID
-    Echo_Z80Release                 ; We're done with the Z80 bus
-
-    move.w  (sp)+, d1               ; Restore register
-    rts                             ; End of subroutine
-
-;****************************************************************************
-; Echo_SendCommandEx
-; Sends an Echo command (with address parameter)
-;
-; input d0.b ... Echo command
-; input a0.l ... Address parameter
-;****************************************************************************
-
-Echo_SendCommandEx:
-    movem.l d0-d1, -(sp)            ; Save register
-
-    Echo_Z80Request                 ; We need the Z80 bus
-
-@Try:
-    tst.b   ($A01FFF)               ; Check if Echo is ready
-    beq.s   @Ready                  ; Too busy?
-    Echo_Z80Release                   ; Let Echo continue
-    move.w  #$FF, d1                  ; Give it some time
-    dbf     d1, *                       ; ...
-    Echo_Z80Request                   ; Get Z80 bus back
-    bra.s   @Try                      ; Try again
-
-@Ready:
-    move.b  d0, ($A01FFF)           ; Write command ID
-
-    move.l  a0, d0                  ; Easier to manipulate here
-    move.b  d0, ($A01FFD)           ; Store low address byte
-    lsr.l   #7, d0                  ; Get high address byte
-    lsr.b   #1, d0                    ; We skip one bit
-    bset.l  #7, d0                    ; Point into bank window
-    move.b  d0, ($A01FFE)           ; Store high address byte
-
-    lsr.w   #8, d0                  ; Get bank byte
-    move.w  d0, d1                    ; Parse 32X bit separately
-    lsr.w   #1, d1                    ; Put 32X bit in place
-    and.b   #$7F, d0                  ; Filter out unused bit from addresses
-    and.b   #$80, d1                  ; Filter out all but 32X bit
-    or.b    d1, d0                    ; Put everything together
-    move.b  d0, ($A01FFC)           ; Store bank byte
-
-    Echo_Z80Release                 ; We're done with the Z80 bus
-
-    movem.l (sp)+, d0-d1            ; Restore register
-    rts                             ; End of subroutine
-
-;****************************************************************************
-; Echo_PlaySFX
-; Plays a SFX
-;
-; input a0.l ... Pointer to SFX data
-;****************************************************************************
-
-Echo_PlaySFX:
-    move.w  d0, -(sp)               ; Save register
-    move.b  #$02, d0                ; Command $02 = play SFX
-    bsr     Echo_SendCommandEx      ; Send command to Echo
-    move.w  (sp)+, d0               ; Restore register
-    rts                             ; End of subroutine
-
-;****************************************************************************
-; Echo_StopSFX
-; Stops SFX playback
-;****************************************************************************
-
-Echo_StopSFX:
-    move.w  d0, -(sp)               ; Save register
-    move.b  #$03, d0                ; Command $03 = stop SFX
-    bsr     Echo_SendCommand        ; Send command to Echo
-    move.w  (sp)+, d0               ; Restore register
-    rts                             ; End of subroutine
-
-;****************************************************************************
-; Echo_PlayBGM
-; Plays a BGM
-;
-; input a0.l ... Pointer to BGM data
-;****************************************************************************
-
-Echo_PlayBGM:
-    move.w  d0, -(sp)               ; Save register
-    move.b  #$04, d0                ; Command $04 = play BGM
-    bsr     Echo_SendCommandEx      ; Send command to Echo
-    move.w  (sp)+, d0               ; Restore register
-    rts                             ; End of subroutine
-
-;****************************************************************************
-; Echo_StopBGM
-; Stops BGM playback
-;****************************************************************************
-
-Echo_StopBGM:
-    move.w  d0, -(sp)               ; Save register
-    move.b  #$05, d0                ; Command $05 = stop BGM
-    bsr     Echo_SendCommand        ; Send command to Echo
-    move.w  (sp)+, d0               ; Restore register
-    rts                             ; End of subroutine
-
-;****************************************************************************
-; Echo_ResumeBGM
-; Resumes BGM playback
-;****************************************************************************
-
-Echo_ResumeBGM:
-    move.w  d0, -(sp)               ; Save register
-    move.b  #$06, d0                ; Command $06 = resume BGM
-    bsr     Echo_SendCommand        ; Send command to Echo
-    move.w  (sp)+, d0               ; Restore register
-    rts                             ; End of subroutine
-
-;****************************************************************************
-; Echo_GetStatus
-; Gets the current status of Echo
-;
-; output d0.w ... Echo status
-;                   Bit #0: SFX is playing
-;                   Bit #1: BGM is playing
-;                   Bit #15: command still not parsed
-;****************************************************************************
-
-Echo_GetStatus:
-    moveq   #0, d0
-    Echo_Z80Request                 ; We need the Z80 bus
-    move.b  ($A01FF0), d0           ; Get the status flags
-    tst.b   ($A01FFF)               ; Check if command still has to be parsed
-    beq.s   @NotBusy                ; Any commands left to be parsed?
-    bset.l  #15, d0                 ; If so, set the relevant flag
-@NotBusy:
-    Echo_Z80Release                 ; Let the Z80 go!
-    rts                             ; End of subroutine
-
-;****************************************************************************
-; Echo_ListEntry
-; Defines an entry in a pointer list
-;****************************************************************************
-
-Echo_ListEntry macro addr
-    dc.b    $80|((addr)>>8&$7F)                 ; High byte of address
-    dc.b    (addr)&$FF                          ; Low byte of address
-    dc.b    ((addr)>>15&$7F)|((addr)>>16&$80)   ; Bank number
-    endm
-
-;****************************************************************************
-; Echo_ListEnd
-; Ends a pointer list
-;****************************************************************************
-
-Echo_ListEnd macro
-    dc.b    $00                     ; End of list mark
-    even                            ; Just in case...
-    endm