; disable player's movement and wobble:
	setfadedown	quick
	mapwaitfade
	setbg	intro
	initbg

;	m_range	8192
	m_scale	1

	mapcode_jsl	initblack_l
	setvar		stayblack,10

	setfadeup	quick
;--------------------------------------------------
	ifeq	1

	mapobj		0,5000,-100,1000,q,krot_istrat

	pathobj		0,0600,0,1000,wave,sprite_0,10,10
	pathobj		0,0720,0,1000,wave,sprite_0,10,10
	pathobj		0,0840,0,1000,wave,sprite_0,10,10
	pathobj		0,0960,0,1000,wave,sprite_0,10,10

	pathobj		0,0960,0,1000,item_00,sprite_0,10,10
	mapobj		0,5000,0,4000,batte_0,kstrat_istrat
	mapobj		0,4000,0,7000,batta_0,kturn360R_istrat
	pathobj		0,2000,0,6000,batta_0,krobo_0,10,10
	mapobj		0,3000,-40,2000,robo_0,kturn360R_istrat
	mapobj		0,2500,-30,6000,robo_1,kturn360R_istrat
	pathobj		0,5000,-30,4000,robo_1,krobo_0,10,10
	mapobj		0,2500,-40,6000,gun_walk,kturn360R_istrat
	pathobj		0,5000,-40,3000,gun_shot,krobo_0,10,10
	pathobj		0,5000,-40,4000,gun_look,krobo_0,10,10
	mapobj		0,5800,-120,7000,shark_0_sp,kturn360R_istrat
	mapobj		0,5800,-0100,7000,shark_0_sp,kszaco_5_istrat
	mapobj		0,2000,-0100,2000,zaco_5_sp,kszaco_5_istrat
	m_inertobj	5000,-100,7000,0,shark_0,kturn360R_istrat
	m_inertobj	$0100,0,$0100,0,tank_0,kturn360R_istrat
	m_inertpath	0000,-200*2,0000,0,daruma_2,kbase0
	m_inertpath	2000,0000,2000,0,bu_6,kbuild
	m_inertpath	11000,0000,11000,0,bu_5,kbuild
	m_inertobj	-3000,-30,0,0,box_5,kbox1_istrat
	m_inertobj	0500,-30,500,0,box_5,kbox2_istrat
	m_inertpath	7000,-0080,1000,0,training,kring3
	m_inertpath	1000,-0080,0000,0,item_7,kring2
	mapobj	0000,0000,0000,2000,box_1,null_istrat
ioz	=	10000
	 REPT	20000/3000+1
	m_inertobj	-9000,0000,ioz,0,saka_5,hill_istrat
	m_inertobj	-6000,0000,ioz,0,saka_8,seesaw_istrat
	m_inertobj	2000,0,ioz-400,0,saka_8,seesaw2_istrat
	m_inertobj	1500,0,-500,0,saka_6,springboard_istrat
	m_inertobj	-1000,0,-1500,0,saka_7,hill_istrat
;	m_inertobj	-1000,-500,600,0,box_4,cube_istrat
ioz	=	ioz-3000
	ENDR
	m_inertpath	0,0,4000,deg180,houdai_0,houdai1
	m_inertpath	100,0,10000,deg180,friendship_4,fakeplayer

	endc
;--------------------------------------------------
;corners
	m_inertpath	-7100,0000,-7100,0,bu_2,kbuild
	m_inertpath	-7100,0000,07100,0,bu_2,kbuild
	m_inertpath	07100,0000,07100,0,bu_2,kbuild
	m_inertpath	-7100,0000,-7100,0,bu_2,kbuild
	m_inertpath	-7100,0000,00000,0,bu_0,kbuild
	m_inertpath	07100,0000,00000,0,bu_0,kbuild
	m_inertpath	00000,0000,-7100,0,bu_0,kbuild
	m_inertpath	00000,0000,-7100,0,bu_0,kbuild
;====== zaco ======
	m_inertobj	0000,-40,4000,0,ship_0,kturn360R_istrat
	mapobj		0,500,-120,4400,zaco_0,kturn360R_istrat
	mapobj		0,-500,-100,3500,zaco_1,kturn360R_istrat
	mapobj		0,000,-250,4000,zaco_2,kturn360R_istrat
	m_inertobj	0,-40,-4000,deg180,ship_0,kturn360R_istrat
	mapobj		0,500,-150,-3500,zaco_0,kturn360R_istrat
	mapobj		0,-500,-80,-4500,zaco_1,kturn360R_istrat
	mapobj		0,0000,-250,-4000,zaco_2,kturn360R_istrat
	m_inertobj	0,-40,4000,0000,ship_0,kturn360R_istrat
	m_inertobj	4000,-40,0,0000,ship_0,kturn360R_istrat
	m_inertobj	-4000,-40,0,deg180,ship_0,kturn360R_istrat

;--------------- RING ---------------
	IFEQ	0

	m_inertpath	-2000,-0080,5000,deg90,training,kring
	m_inertpath	-3000,-0180,4000,deg45,training,kring
	m_inertpath	-4000,-0080,3000,0,training,kring
	m_inertpath	-5000,-0080,2000,-deg45,training,kring
	m_inertpath	-6000,-0080,1000,-deg90,training,kring
	endc
;------------------------------------------
.lp	mapwait	5000
	mapgoto	.lp