 	IDNT	st_tick.asm

	CSECT	text,0
	XDEF	@st_tick
	XDEF  @int_rxover
	XDEF  @int_txover
	XREF	_Tick
	XREF	_Clock
	XREF  @asy_rxover
	XREF  @asy_txover
	XREF  _etv_timer
	XREF  _rxover
	XREF  _txover
;
;  This routine calls the C function Tick from interupt level
;
@st_tick:
	addq.l	#1,_Tick							Increment Tick flag
	addq.l	#1,_Clock						Increment Tick counter
   move.l   _etv_timer,-(a7)           push address of old interupt routine 
   rts                                 run old routine via return
;
;  This routine calls the C function asy_rxover from interupt level
;
@int_rxover:
   movem.l  d0-d7/a0-a6,-(a7)				Save registers
   bsr      @asy_rxover                call function
   movem.l  (a7)+,d0-d7/a0-a6          restore registers
   move.l   _rxover,-(a7)           	push address of old interupt routine 
   rts                                 run old routine via return
;
;  This routine calls the C function asy_txover from interupt level
;
@int_txover:
   movem.l  d0-d7/a0-a6,-(a7)				Save registers
   bsr      @asy_txover                call function
   movem.l  (a7)+,d0-d7/a0-a6          restore registers
   move.l   _txover,-(a7)           	push address of old interupt routine 
   rts                                 run old routine via return
	END

