;*********************************************************************
;*								*
;*	------------------------				*
;*		STARFOX2 					*
;*	------------------------				*
;*								*
;*	File 		: missobj.asm				*
;* 	Description	: Mission Explain 			*
;*			; OBJ-Animation & Display Message	*
;*	Date		: 1994.9.14				*
;*	Author		: H.Yajima				*
;*								*
;*********************************************************************
;
;
;
;
;---------------------------------------------------------------------
	INCPUB  missobj
;---------------------------------------------------------------------
;
;
;
;
;
;
;*********************************************************************
; 	mission explain initialize
;*********************************************************************
;
;
;
;
;---------------------------------------------------------------------
messageN	equ	Xwork3
message_px	equ	Xwork4
message_py	equ	Xwork5
message_ptr	equ	Xwork6
message_wid	equ	Xwork7
message_col	equ	Xwork8
;---------------------------------------------------------------------
;
;
;=====================================================================
;=====================================================================
;===========	MISSION EXPLAIN =========================================
;===========	MISSION EXPLAIN =========================================
;=====================================================================
;=====================================================================
;*********************************************************************
; 	mission explain initialize
;*********************************************************************

init_missobj_l
	Mbankprog
	php

	ai16
	lda	#0
	sta.l	raster_Vswitch	; !!! rasterV off !!!
	sta.l	raster_control	; !!! rasterH off !!!


	ldx	#bgdemo_switch  ; <====== what trigger ?
	stx	dcregister
	lda	#1
	sta	_dcinput,x

	plp
	Mbankrtl

;*********************************************************************
; 	mission explain main
;*********************************************************************

missobj_l	Mbankprog
	php

	ldy	sprpointer
	sty	sprite_register

	ai16
	jsr	missobj_entry

	ldy	sprite_register
	sty	sprpointer

	plp
	Mbankrtl

;---------------------------------------------------------------------
;
;
;
;
;
;
;
;
;
;---------------------------------------------------------------------
	longa
	longi
;=====================================================================
;=====================================================================
;===========	MISSION EXPLAIN =========================================
;===========	MISSION EXPLAIN =========================================
;=====================================================================
;=====================================================================
;*********************************************************************
;	explain
;*********************************************************************

missobj_entry
;-----------------------------------------------------
	ldx	#bgdemo_switch
	stx	dcregister
;-----------------------------------------------------
	jsr	dc_select
	dwcode	bank11_rts	; 0
	dwcode	demo11_entry	; open-demo
;-----------------------------------------------------








;*********************************************************************
;	mission object demo
;*********************************************************************
demo11_entry

	jsr	dc_program
	dwnext	init_target
	dwstop	main_target
;---------------------------------------------------------------------


;=====================================================================

init_target

	jsl	Init_objlist
      	Mobjinit 0,ys_big0,oamset_target,072h,28h
     	Mobjinit 1,ys_target,oamset_target,032h,28h
;;      	Mobjinit 0,ys_big0,oamset_target,092h,28h
;;     	Mobjinit 1,ys_target,oamset_target,062h,28h
	rts

;---------------------------------------------------------------------
oamset_target
	jmp.l	Newoamset
;---------------------------------------------------------------------

main_target

 	lda	KEnemyNumber
	and	#00ffh
	sta.l	Kenemy_backup
	cmp	#10
	bcc	.skip
	lda	#0
.skip	clc
	adc	#ys_big0	;0,1,2,3,4,5,6,7,8,9
 	Mobjanime 0

	jsl	Main_OBJ

	Mkeycheck trig0,button_ok
	beq	.exit
	inc	mew_ketteiflag	 ; mission explain exit !!
.exit	rts

;---------------------------------------------------------------------
;
;
;
;
;
;
;
;
;
;====================================================================
;====================================================================
; END END END END END END END END END END END END END END END END  
;====================================================================
;====================================================================