A.D.A. Amiga Demoscene Archive

  Welcome guest! Please register a new account or log in

  

  

  

Demos Amiga Demoscene Archive Forum / Coding / AHX replayer issues

 

Author Message
d0DgE
Member
#1 - Posted: 18 Dec 2011 21:58 - Edited
Reply Quote
Hi folks

For the sake of the musicians in my crew I wanted to implement the AHX replayer
to give a little more of a flexible environment.
So I fetched the AHX 2.3.3 version off the intarwebz and tried to make it fit with my
startup code - which of course didn't succeed because otherwise I wouldn't be writing this lines right now ;)

It pretty much seems to boil down to the "system killer" and level 6 interrupt matter, or at least that's what I
think it is.
I fitted the little replayer example that Dexter included to my working path and it ran just fine.
But this doesn't kill the system let alone resets the interrupt and DMA registers, 'n shit.
The replayer only comes as a binary and an include with a bunch of offsets to jump on, as you may all know.

I tried to adapt the CIA- interrupt for the system-killer-setting in the P61 replayer but it was not of any use.
The program just freezes.
I'm now at a point with the example, expanded with the startup/restore code I use, where I either just have
to set the right bits in the right registers or must establish an own interrupt which the AHX replayer can handle.
Dexter said something in the Documentation (which is rather slim) of "NO RTE !!".
So the situation looks as follows:


INTENASET = %1100000000000000
DMASET = %1000001111000000


incdir "sources:"
include "AHX/AHX-Offsets.I"


section Dexter\Abyss_rulez,Code
Start
movem.l d1-d7/a0-a6,-(sp)

; HERE MY STARTUP COMMENCES

move.l $4.w,a6
jsr -132(a6)
moveq #0,d0
moveq #0,d0
lea libname(pc),a1 ;name for gfx.lib
jsr -$228(a6) ;LVO_OpenLibrary()
beq.w error
move.l d0,a6
move.l a6,gfxbase
move.l 34(a6),Actiview ; Get active viewport
sub.l a1,a1 ; Find current task
jsr -222(a6) ; LoadView()
jsr -270(a6) ; WaitTOF()
jsr -270(a6) ; there must be at least 2 WaitTOFs

move.l $26(a6),OldCopper1 ; Store old CL 1
move.l $32(a6),OldCopper2 ; Store old CL 2

lea $dff000,a6
move.w $010(a6),adkbits ; Store old ADKCON
move.w $01c(a6),intbits ; Store old INTENA
move.w $002(a6),dmabits ; Store old DMA

; FROM HERE THE PROBLEMS SEEM TO START
; BECAUSE IN THE FOLLOWING LINES THE DMA & INTENA & INTREQ are being reset
move.w #$7fff,d0
move.w d0,$09a(a6)
move.w d0,$096(a6) ;clear dmacon
move.w d0,$09c(a6) ;clear interrupt req

;
;switch ON the DMA and Interrupt settings prepared above
;
move.w #INTENASET,$09a(a6)
move.w #DMASET,$096(a6)


; THIS IS PRETTY MUCH THE AHX EXAMPLE CODE SNIPPLET
.InitCIA
lea ahxCIAInterrupt,a0
moveq #0,d0
jsr ahxReplayer+ahxInitCIA
tst d0
bne .ahxInitFailed

.InitPlayer
sub.l a0,a0 ;auto-allocate public (fast)
sub.l a1,a1 ;auto-allocate chip
moveq #0,d0 ;load waves from hd if possible
moveq #0,d1
jsr ahxReplayer+ahxInitPlayer
;check d0=result normally here...

.InitModule
lea ahxMyModule,a0 ;module
jsr ahxReplayer+ahxInitModule
;check d0=result normally here...

.InitSubSong
moveq #0,d0 ;Subsong #0 = Mainsong
moveq #0,d1 ;Play immediately
jsr ahxReplayer+ahxInitSubSong

.ahxLetHimPlay
btst #6,$bfe001 ;not so system-friendly, i know!
bne.b .ahxLetHimPlay

.StopSong
jsr ahxReplayer+ahxStopSong

.KillPlayer
jsr ahxReplayer+ahxKillPlayer ;don't forget!

.RemoveCIA
jsr ahxReplayer+ahxKillCIA ;don't forget!

.ahxInitFailed
; AND HERE WE RESTORE THE WHOLE SH'BANG

move.w #$8000,d0 ;$8000 for the register switches
or.w d0,intbits ;set/clr bits in storef sysregs to 1
or.w d0,dmabits
or.w d0,adkbits
subq.w #1,d0 ;=$7fff
move.w d0,$09a(a6) ; Clear all INT bits
move.w d0,$096(a6) ;clear dma
move.w d0,$09c(a6) ;clear int-request

move.w #$0,$88(a6) ;touch the COPJMP1
move.w intbits(pc),$09a(a6) ; Restore INTENA
move.w dmabits(pc),$096(a6) ; Restore DMAcon
move.w adkbits(pc),$09e(a6) ; Restore ADKcon

move.l OldCopper1(pc),$80(a6) ; Restore old CL 1
move.l OldCopper2(pc),$84(a6) ; Restore old CL 2

move.l gfxbase(pc),a6
move.l Actiview(pc),a1 ; restore old viewport
jsr -222(a6) ; LoadView()
jsr -270(a6) ; WaitTOF
jsr -270(a6)
move.l $4.w,a6
move.l gfxbase(pc),a1
jsr -$19e(a6) ; LVO_CloseLibrary()
jsr -138(a6) ; LVO_Permit()
moveq #0,d0

; THIS TWO LINES WERE THE ORIGINAL EXAMPLE PROGRAM EXIT

movem.l (sp)+,d1-d7/a0-a6
RTS
error:
move.l $4.w,a6
jsr -138(a6)
moveq #0,d0
movem.l (sp)+,d1-d7/a0-a6
rts

cnop 0,4

;syspointers
spr dc.l 0
Actiview: dc.l 0
OldCopper1: dc.l 0
OldCopper2: dc.l 0
VBRSave: dc.l 0
memadr: dc.l 0
adkbits: dc.w 0
intbits: dc.w 0
dmabits: dc.w 0
storyboardCtrl: dc.b 0,0
gfxbase: dc.l 0
dosbase: dc.l 0
dosname: dc.b "dos.library",0,0
libname: dc.b "graphics.library",0

cnop 0,4

; THAT'S THE INTERRUPT HANDLER THAT CAME WITH THE EXAMPLE

ahxCIAInterrupt
move #0,$dff180
jsr ahxReplayer+ahxInterrupt
move #$aaa,$dff180
RTS

Section Pink\Abyss_rulez,Data

ahxReplayer IncBIN "AHX/Players/AHX-Replayer000.BIN"
ahxMyModule IncBIN "msx_arc/AHX.AgonyEnd"



The basic question is just this:

How the heck do I either set the right bits to make the out-of-the-box AHX calls work in a system killer
environment OR what do I need to do, to play a freakin' ultra neat sounding AHX chiptune in my intros
without the bitch dying on me when the replayer tries to initiate its CIA-interrupt ? >:(

Happy season and tasty Straf-Stollen :D
Angry Retired Bastard
Member
#2 - Posted: 19 Dec 2011 11:44
Reply Quote
I'm not 100% sure, but quite likely that it freezes up due to diskaccess (because you call ahxInitPlayer with d0 = 0 to load waves from disk if possible) while the "PORTS" interrupt (intbit 3) is disabled. I'd suggest changing d0 to something else than 0 to avoid this (and also to avoid having to store the wave datafile in your intros ;).
And if that doesn't work enable the ports interrupt... (I also have softints (bit2) enabled in my code, but that might be for another reason, or just leftover crap...)

Also, you may want to enable the audio DMA to get any sound... (at least I did, but it's quite possible the player handles this internally as well).
Reloaded
Member
#3 - Posted: 12 Apr 2016 12:12
Reply Quote
Hi. I'm looking for a AHX replay routine in asm. Do you know where can I find it?.

Thanks.
Angry Retired Bastard
Member
#4 - Posted: 12 Apr 2016 13:50
Reply Quote
As far as I know the only one ever released publicly (for amiga) is the one d0dge used above, which was bundled with the tracker itself. However, it's not actually "a replay routine in asm" in the sense that you can play with the replay code (it's just a small asm framework for calling into the binary blob).

The replayer itself was written in C++ and you can find (some version of) the code here: here
magicnah
Member
#5 - Posted: 14 Apr 2016 22:44
Reply Quote
Our Devolution and mOmento 64kb intro's uses ahx.. I will check which replayer routine is used and be back in this thread!
magicnah
Member
#6 - Posted: 17 Apr 2016 09:28
Reply Quote
Ok.. so.. we used Dexter/Abyss his ahx replayer
anybody interested in this?
Reloaded
Member
#7 - Posted: 17 Apr 2016 13:42
Reply Quote
Sure, can you share the files please?
Angry Retired Bastard
Member
#8 - Posted: 17 Apr 2016 15:12
Reply Quote
It's included in the archive on the official AHX page
Direct download here

 

  Please register a new account or log in to comment

  

  

  

 

A.D.A. Amiga Demoscene Archive, Version 3.0