 **************************************************************************
;
; Filename : EPR2_JMP.ASM
; -----------------------
;
; (c) 1993 by Thomas Lehmann
;
;
; Jackophone V5.00
;
;
; Sprung aus Eprom 2 ins Eprom 1
;
;
;**************************************************************************

MODUL_START	set	*	; Größe des Moduls berechnen


	; ====================================
	; Sprung Tabelle für JMP`s aus Eprom 1
	; ====================================

	jmp extcmd_task
	jmp acia_init
	jmp acia_irq
	jmp key_tmode
	jmp wta_tmode

	; Telefonbuch Funktionen
	jmp key_telbuch
	jmp telb_name
	jmp put_telnt
	

; =========================================================================
;
; Funktion	: Sprung ins Eprom 1
;
; Eingang	: -------
;
; Ausgang	: -------
;
; Register	: -------
;
; (c) by Thomas Lehmann März 1993
;
; =========================================================================

JMP_OFFS	set 0

Epr1Jmp	macroseg
	pha
	lda #JMP_OFFS	; Sprungadr. low Byte
	bra epr1_jmp
JMP_OFFS	set JMP_OFFS+3	; nächste Adresse
	endmacro


key_ende	?Epr1Jmp
set_led	?Epr1Jmp
set_prgled	?Epr1Jmp
put_nt	?Epr1Jmp
keynam_sp	?Epr1Jmp
nxt_task	?Epr1Jmp
task_wait	?Epr1Jmp
task_delay	?Epr1Jmp
init_stk	?Epr1Jmp

key_ltg	?Epr1Jmp
key_trenn	?Epr1Jmp
wta_wahl	?Epr1Jmp


	; ================
	; Sprung ausführen
	; ================
epr1_jmp	sta jmp_adr	; low Byte Sprung Ziel eintragen
	lda #>EPR1_PAGE2	; dito, high Byte
	sta jmp_adr+1
	pla		; Accu zurück
	jmp (jmp_adr)	; und Sprung ins Eprom 1


; --------------------------------------------------------------------------

HLP	set	*
_EPR1_JMP	equ	HLP-MODUL_START		; Größe des Moduls