;     Titan & MDEM Cooperational Demo
;     For Revision 2013
;
;     main.68k - Main program.  

Demo_Main:
;        move.w #250, d7
 ;       jsr WAITD7
 
	jsr circles
        
        jsr EmuDetect
        lea InstrumentList, a0
        jsr Echo_Init
        lea DemoTune, a0
        jsr Echo_PlayBGM
        
@needmusic
        waitframe
        Echo_z80request
        move.b ($A01200), d0
        move.b #0, ($A01200)
        echo_z80release
        tst.b d0
        beq.s @NeedMusic
        
        jsr LogoMania
        jsr setvdpdefaults
		jsr ClearEverything

        jsr Gunstar
    disableints
        MOVEQ #0, D0
        MOVEQ #0, D1
        MOVEQ #0, D2
        MOVEQ #0, D3
        MOVEQ #0, D4
        MOVEQ #0, D5
        MOVEQ #0, D6
        MOVEQ #0, D7
        jsr setvdpdefaults
		jsr ClearEverything
        
    disableints
        MOVEQ #0, D0
        MOVEQ #0, D1
        MOVEQ #0, D2
        MOVEQ #0, D3
        MOVEQ #0, D4
        MOVEQ #0, D5
        MOVEQ #0, D6
        MOVEQ #0, D7
        

        jsr SFMAin
    disableints
        MOVEQ #0, D0
        MOVEQ #0, D1
        MOVEQ #0, D2
        MOVEQ #0, D3
        MOVEQ #0, D4
        MOVEQ #0, D5
        MOVEQ #0, D6
        MOVEQ #0, D7
        
        
		jsr setvdpdefaults
		jsr ClearEverything
        
        jsr Plasma_FX
        DISABLEINTS
		jsr setvdpdefaults
		jsr ClearEverything
        
        jsr Twister
        DISABLEINTS
		jsr setvdpdefaults
		jsr ClearEverything
        
        jsr Axelay
        DISABLEINTS
		jsr setvdpdefaults
		jsr ClearEverything
        jsr liquify
        DISABLEINTS
		jsr setvdpdefaults
		jsr ClearEverything
        
        jsr palpix
        
        
        
        DISABLEINTS
        
		jsr setvdpdefaults
		jsr ClearEverything
        jsr CRAMDMASCROLLER

        
       
        jsr Circles
        
        
        jsr FullscreenBMP
        jsr Twister
    

    
		jsr setvdpdefaults
		jsr ClearEverything
        ;jsr CRAMDMASCROLLER
        
        jsr Twister
            jsr liquify
		jsr setvdpdefaults
		jsr ClearEverything
        jsr waveform
        
 ;     ;  jsr CRAMDMASCROLLER
;        jsr setvdpdefaults
  ;      jsr ClearEverything
    
        
		jsr setvdpdefaults
		jsr ClearEverything

        jsr End
        
        jsr Twister
		jsr setvdpdefaults
		jsr ClearEverything
		
        
		jsr SFMain
		jsr setvdpdefaults
		jsr ClearEverything
		;jmp * 
		
        ;jsr Axelay
        ;jsr setvdpdefaults
        ;jsr ClearEverything

		;jsr STarField
        ;jsr setvdpdefaults
        ;jsr ClearEverything

        ;jsr BITMAPTEST
        ;jsr setvdpdefaults
        ;jsr ClearEverything

        jsr LogoMania
        jsr setvdpdefaults
        jsr ClearEverything

        jsr Liquify
        jsr setvdpdefaults
        jsr cleareverything    

        jsr PLASMA_FX
;    jsr setvdpdefaults
;     jsr ClearEverything
        jsr Gunstar
        jsr setvdpdefaults
        jsr cleareverything    

    
        ;jsr CRAMDMASCROLLER
        jsr setvdpdefaults
        jsr ClearEverything
    
        jsr PLASMA_FX
;    jsr setvdpdefaults
;     jsr ClearEverything
    
        jsr Scalerator
        jsr setvdpdefaults
        jsr ClearEverything
    

        jsr BITMAPTEST
        jsr setvdpdefaults
        jsr ClearEverything
        jsr Spheres
