// #LAYOUT# M65 BASIC_0 #TAKE
// #LAYOUT# *   *       #IGNORE

//
// Proxies for calling Mega65 segment BASIC_0 and KERNAL_0 routines from BASIC_1
//


proxy_B1_peek_via_OLDTXT:

	jsr map_NORMAL
#if CONFIG_MEMORY_MODEL_60K
	.error "not implemented"
#else // CONFIG_MEMORY_MODEL_38K
	lda (OLDTXT),y
#endif
	jmp map_BASIC_1

proxy_B1_poke_via_OLDTXT:

	jsr map_NORMAL
#if CONFIG_MEMORY_MODEL_60K
	.error "not implemented"
#else // CONFIG_MEMORY_MODEL_38K
	sta (OLDTXT),y
#endif
	jmp map_BASIC_1


proxy_B1_JCHROUT:

	jsr map_NORMAL
	jsr JCHROUT
	jmp map_BASIC_1


proxy_B1_print_integer:

	jsr map_NORMAL
	jsr print_integer
	jmp map_BASIC_1


proxy_B1_print_return:

	jsr map_NORMAL
	jsr print_return
	jmp map_BASIC_1


proxy_B1_print_space:

	jsr map_NORMAL
	jsr print_space
	jmp map_BASIC_1


#if CONFIG_SHOW_PAL_NTSC

proxy_B1_print_pal_ntsc:

	jsr map_NORMAL
	jsr print_pal_ntsc
	jmp map_BASIC_1

#endif

#if CONFIG_SHOW_FEATURES

proxy_B1_print_features:

	jsr map_NORMAL
	jsr print_features
	jmp map_BASIC_1

#endif