	NAME	untitled1(17)
	RSEG	RCODE(0)
	RSEG	IDATA0(0)
	RSEG	CDATA0(0)
	EXTERN	II
	PUBLIC	entered
	PUBLIC	intr
	EXTERN	plays
	EXTERN	pop_all
	EXTERN	push_all
	EXTERN	s
	EXTERN	?CLZ80B_4_06_L00
	EXTERN	?BANK_CALL_DIRECT_EXAF_L08
	RSEG	RCODE
; 1.	
; 2.	# include "all.h"
; 3.	
; 4.	extern AYSongInfo s;
; 5.	
; 6.	
; 7.	extern unsigned char II;
; 8.	
; 9.	char entered = 0;
; 10.	
; 11.	interrupt void intr (void)
; 12.	{
intr:
	PUSH	HL
	PUSH	AF
	EXX
	PUSH	HL
	EX	AF,AF'
	PUSH	AF
	EXX
; 13.	  II=1;         
	LD	A,1
	LD	(II),A
; 14.	        
; 15.	  if (!s.play || entered)        
	LD	A,(s+98)
	OR	A
	JR	Z,?0014
	LD	A,(entered)
	OR	A
	JR	NZ,?0014
?0012:
?0013:
?0010:
?0011:
; 16.	          return;
; 17.	
; 18.	  entered = 1;  
	LD	A,1
	LD	(entered),A
; 19.	  push_all();
	LD	A,BYTE3 push_all
	LD	HL,LWRD push_all
	CALL	LWRD ?BANK_CALL_DIRECT_EXAF_L08
; 20.	  plays();      
	LD	A,BYTE3 plays
	LD	HL,LWRD plays
	CALL	LWRD ?BANK_CALL_DIRECT_EXAF_L08
; 21.	
; 22.	  pop_all();
	LD	A,BYTE3 pop_all
	LD	HL,LWRD pop_all
	CALL	LWRD ?BANK_CALL_DIRECT_EXAF_L08
; 23.	  entered = 0;
	XOR	A
	LD	(entered),A
; 24.	}
?0014:
	EXX
	POP	AF
	EX	AF,AF'
	POP	HL
	EXX
	POP	AF
	POP	HL
	EI
	RETI
	RSEG	IDATA0
entered:
	DEFS	1
	RSEG	CDATA0
	DEFB	0
	END
