;mode800,value2600
;\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\
;VXeJX^}CY̐ݒ
*makesystem
if %191 != 1 btndef clear
;ǂɂ}EXGĂȂƂ̏
exbtn_d ""
;og[h̏ꍇI[gŐi
if %191 == 1 btntime 1

*systemloop
textspeed %3000
ispage %105


;y[WłꍇAxzOɃeLXg
if %105 == 1 if %106 == 0 gosub *textinsart


if %105 == 0 lsph 50,":l/3,160,2;chip\cursor0.bmp",700,520:vsp 50,1
if %105 == 1 lsph 50,":l/3,160,2;chip\cursor1.bmp",700,520:vsp 50,1


;eLXg{^EFCg
textbtnwait %500



if %500=-5 goto *systemend

if %500=0 goto *systemend
if %500=-3 goto *systemend		;ʂ̃NbNƃzC[
if %500=-1 getscreenshot 208,159 : lsph 200,":a;system\glay.bmp",0,0 : vsp 200,1 : textoff : goto *rclk	;ENbN
;zC[
if %500=-2 gosub *lainstop : vsp 50,0 : vsp 190,0 : vsp 191,0 : vsp 192,0 : vsp 193,0 : vsp 194,0 : vsp 195,0 : goto *textback

goto *systemloop

*systemend
if %105 == 1 gosub *textbackreset
csp 50
repaint
texec
saveon
;zOւ̑֎~
mov %106,0
return
;\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\
;VXeZNg
*customsel
skipoff
;I\ꂽƂ̉
dwave 2,"majo\scenario\wave\cursor08.wav"
*csel_st
if %509 != 1 texton
btndef clear
if %16 != 194 if %191 != 1 lsph 209,":a/2,160,2;majo\scenario\pix\text\select.bmp",60,260:vsp 209,1
if %16 == 194 if %191 != 1 lsph 209,":a/2,160,2;majo\scenario\pix\text\select.bmp",300,210:vsp 209,1
;ǂɂ}EXGĂȂƂ̏
exbtn_d ""
;ꂼ̃VXe{^Ƀ}EXĂƂ̏
if %162 == 0 if %191 != 1 exbtn 210,1,""
if %162 == 0 if %191 != 1 exbtn 211,2,""
if %162 == 0 if %191 != 1 exbtn 212,3,""
if %162 == 0 if %191 != 1 exbtn 213,4,""
if %162 == 0 if %191 != 1 exbtn 214,5,""
if %162 == 0 if %191 != 1 exbtn 215,6,""
;og[h̏ꍇI[gŐi
if %191 == 1 btntime 1
getcselnum %190
getcursorpos %189,%188
cselbtn 0,500,%189,%188
add %188,26
cselbtn 1,501,%189,%188
if %190>2 add %188,26:cselbtn 2,502,%189,%188
if %190>3 add %188,26:cselbtn 3,503,%189,%188
if %190>4 add %188,26:cselbtn 4,504,%189,%188
if %190>5 add %188,26:cselbtn 5,505,%189,%188
if %190>6 add %188,26:cselbtn 6,506,%189,%188
;`Z[u㎩IɑII
if %509 == 1 csp 209:print 1:saveon:goto *saveno
*csel_loop

;pbhȂ
if %2700 == 0 textbtnwait %500

;pbhŗVԂƂ̖
if %2700 == 1 btntime 1 : textbtnwait %500 : goto *cselpadloop
*cselpadloopend

if %500=-2 if %162 == 0 vsp 209,0:vsp 210,0:vsp 211,0:vsp 212,0:vsp 213,0:vsp 214,0:vsp 215,0:vsp 216,0:vsp 230,0:setwindow3 78,100,28,28,20,20,0,2,0,1,1,#FFFFFF,70,90,650,700:vsp 216,0:gosub *textback:vsp 209,1:goto *csel_st
if %500=1 dwave 49,"majo\system\wave\kachi06.wav" :mov %171,1:mov %173,3:cell 210,0:print 1:getscreenshot 400,300:savescreenshot "savedate\savepixtmp.bmp":getscreenshot 80,60:vsp 210,0:vsp 211,0:vsp 212,0:vsp 213,0:vsp 214,0:vsp 215,0:vsp 216,0:mov %701,1:goto *save1
;if %500=1 vsp 209,0:vsp 210,0:vsp 211,0:vsp 212,0:vsp 213,0:vsp 214,0:vsp 215,0:vsp 216,0:vsp 230,0:systemcall save:vsp 209,1:goto *csel_loop
if %500=2 dwave 49,"majo\system\wave\kachi06.wav" :mov %171,1:mov %173,3:vsp 210,0:cell 211,0:vsp 212,0:vsp 213,0:vsp 214,0:vsp 215,0:vsp 216,0:vsp 230,0:mov %701,1:goto *load1
if %500=3 systemcall skip:goto *csel_loop
if %500=4 dwave 49,"majo\system\wave\kachi06.wav" :vsp 209,0:vsp 210,0:vsp 211,0:vsp 212,0:vsp 213,0:vsp 214,0:vsp 215,0:vsp 216,0:vsp 230,0:setwindow3 78,100,28,28,20,20,0,2,0,1,1,#FFFFFF,70,90,650,700:vsp 216,0:gosub *textback:vsp 209,1:goto *csel_st
if %500=5 dwave 49,"majo\system\wave\kachi06.wav" :mov %173,3 : vsp 210,0:vsp 211,0:vsp 212,0:vsp 213,0:vsp 214,0:vsp 215,0:vsp 234,0:vsp 216,0:goto *system
if %500=6 mov %173,3 : mov %171,1 : vsp 235,0:goto *titleback
if %500>=500 & %500<=506 csp 209:print 1:saveon:sub %500,500:cselgoto %500
goto *csel_loop
;\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\
;lݒ
*define
;	;j[
	deletemenu

	maxkaisoupage 1
	nsa
;	afltF[hAEg̏


	;VXeJX^}CY̒`
	textgosub *makesystem

	;^Cg̕ύX
	caption "̋ȏ@Textbook of Evil"

	;ǃXLbv̐ݒ
	kidokuskip

	windowback


	;O[oϐ̎gp錾
	globalon

	;G̈ʒuݒ
	humanz 500

;	afltF[hAEg̐ݒ

;	f[^[h
	loadgosub *loadset

;\\\\\\}EXݒ

	;zC[̎gp錾
	usewheel

;\\\\\\GtFNǧʐݒ

	effect 10,10,200
	effect 11,10,400
	effect 12,10,600
	effect 13,10,800
	effect 14,10,1000
	effect 15,10,1500
	effect 16,10,2000
	effect 17,10,3000
	effect 18,10,4000
	effect 19,10,5000

;	E獶
	effect 20,12,500
	effect 21,12,250

;	Vb^[
	effect 25,2,500
	effect 26,2,1000
	effect 27,2,2000


	effect 79,18,1500,"cutin\effect\effect1.bmp"
;	GtFNg
	effect 80,18,500,"cutin\effect\effect1.bmp"
;	Qڂ
	effect 81,18,3000,"cutin\effect\effect2.bmp"
	effect 82,18,3000,"cutin\effect\effect3.bmp"
;	_E
	effect 83,18,2000,"cutin\effect\effect4.bmp"
	effect 84,18,5000,"cutin\effect\effect4.bmp"
;	
	effect 85,18,500,"cutin\effect\effect5.bmp"
;	E獶փtF[h
	effect 86,18,450,"cutin\effect\effect6.bmp"
	effect 87,18,1000,"cutin\effect\effect6.bmp"


;	EփtF[h
	effect 90,18,500,"cutin\effect\effect7.bmp"
	effect 91,18,1000,"cutin\effect\effect7.bmp"

;	GfBO
	effect 92,18,1000,"cutin\effect\effect8.bmp"

;\\\\\\dllɂʐݒ
	setlayer 0,100,"oldmovie.dll/1"
;	JEDLLǂݍ
	setlayer 1,100,"snow.dll"
;	gt
	setlayer 2,100,"hana.dll"


;\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\
	game
;\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\
;Q[Jn̏
*start

	mov %60,100

	if %3004 == 0 mov %3000,40
	if %3004 == 0 mov %3001,80
	if %3004 == 0 mov %3002,80
	if %3004 == 0 mov %3003,2
	if %3004 == 0 mov %3004,1

	if %3003 == 1 menu_window
	if %3003 == 2 menu_full
	bgmvol (%3001*%60/100)
	sevol %3002
	voicevol %3002

;\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\
;S\
*logo
	bg black,1

	wait 1000

	dwave 10,"title\logo\noiz.wav"
	bg "title\logo\noiz.jpg",1

	wait 100

	bg black,1

;	\
;	trap *logoend

	delay 2000

	lsph 10,":l/16,0,3;title\logo\dust.bmp",0,0
	lsp 2,"*0"
	layermessage 0,"s|2,12,10,200,160,10"

	bg white,16

	bgmonce "title\logo\horror1.mp3"

	bg "title\logo\rogo.jpg",10

	delay 3000

	bg black,16

	delay 3000

	bg "title\logo\cyuui.jpg",10

	delay 10000

	csp 2
	csp 10

	bg black,16


	delay 3000

*logoend
trap off
bgmstop
csp 2
csp 10

;\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\
;Q[Jn̏
*defreset
	saveoff
	;GtFNgEBhEȂ
	erasetextwindow 0

;	EBhẼGtFNg
	windoweffect 10,500

goto *titlestart
;\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\
;^Cg
*titlestart
	saveoff
;	bgmvol %2600

	bg "title\title_01.jpg",14

	wait 500

	bgm "title\Main-Theme.mp3"

	bg "title\title_02.jpg",14

	delay 500

*title

	btndef clear

	lsp 10,":a/2,0,3;title\hajime.bmp",550,200 : spbtn 10,10
	lsp 11,":a/2,0,3;title\tuduki.bmp",550,260 : spbtn 11,11
	if %2704 == 0 lsp 12,":a;title\hosyuu0.bmp",550,320
	if %2704 == 1 lsp 12,":a/2,0,3;title\hosyuu1.bmp",550,320 : spbtn 12,12
	lsp 13,":a/2,0,3;title\settei.bmp",550,380 : spbtn 13,13
	lsp 14,":a/2,0,3;title\gekou.bmp",550,440 : spbtn 14,14

	bg "title\title_02.jpg",10

*titlebtnwaitloop

	btnwait %50

	if %50	== 10 goto *sentaku
	if %50	== 11 mov %718,2 : goto *saveload
	if %50	== 12 goto *scenario1puti
	if %50	== 13 gosub *system : goto *title
	if %50	== 14 mov %801,2 : goto *gameendcheck



	goto *titlebtnwaitloop

;\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\
;e͑I
*sentaku

	csp 10
	csp 11
	csp 12
	csp 13
	csp 14

	btndef clear

	transbtn

	exbtn_d "C30-34"

	lsph 30,":c;sentaku\name_yuuki.bmp",0,0
	if %2700 == 1 lsph 31,":c;sentaku\name_sei.bmp",0,0
	if %2701 == 1 lsph 32,":c;sentaku\name_sensei.bmp",0,0
	if %2702 == 1 lsph 33,":c;sentaku\name_haruka.bmp",0,0
	if %2703 == 1 lsph 34,":c;sentaku\name_ryouma.bmp",0,0


	lsp 22,":a/2,0,3;sentaku\yuuki.bmp",0,173 : exbtn 22,22,"P30C31-34"
	if %2701 == 1 lsp 23,":a/2,0,3;sentaku\sensei.bmp",175,0 : exbtn 23,23,"P32C30-31C33-34"
	if %2703 == 1 lsp 24,":a/2,0,3;sentaku\ryouma.bmp",525,68 : exbtn 24,24,"P34C30-33"
	if %2702 == 1 lsp 21,":a/2,0,3;sentaku\haruka.bmp",355,0 : exbtn 21,21,"P33C30-32C34"
	if %2700 == 1 lsp 20,":a/2,0,3;sentaku\sei.bmp",120,152 : exbtn 20,20,"P31C30C32-34"
	lsp 19,":a/2,0,3;sentaku\modoru.bmp",500,525 : exbtn 19,19,"C30-34"


	bg "sentaku\haikei.jpg",10

	if %2705 == 0 goto *taikencheck

*sentakubtnwaitloop

	btnwait %51

	if %51 == 20 mov $20,"*scenario2" : goto *sentakucheck
	if %51 == 21 mov $20,"*scenario4" : goto *sentakucheck
	if %51 == 22 mov $20,"*scenario1" : goto *sentakucheck
	if %51 == 23 mov $20,"*scenario3" : goto *sentakucheck
	if %51 == 24 mov $20,"*scenario5" : goto *sentakucheck

	if %51 == 19 goto *sentakuend
	if %51 == -1 goto *sentakuend


goto *sentakubtnwaitloop
;\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\
;lImF
*sentakucheck
	dwave 50,"system\saveload\push59_a.wav"
	btndef clear

	lsp 8,":a;chip\window\window_sentaku.bmp",246,222
	lsp 7,":a/2,0,3;chip\window\yes.bmp",300,320 : spbtn 7,7
	lsp 6,":a/2,0,3;chip\window\no.bmp",430,320 : spbtn 6,6

	print 1

*sentakucheckloop

	btnwait %52

	if %52 == 7 csp 8 : csp 7 : csp 6 : goto $20

	if %52 == 6 csp 8 : csp 7 : csp 6 : goto *sentaku

goto *sentakucheckloop


;\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\
;̌ł̃`FbN
*taikencheck

	dwave 50,"system\saveload\push59_a.wav"
	btndef clear

	lsp 8,":a;chip\window\kirikae.bmp",246,222
	lsp 7,":a/2,0,3;chip\window\yes.bmp",300,320 : spbtn 7,7
	lsp 6,":a/2,0,3;chip\window\no.bmp",430,320 : spbtn 6,6

	print 1

*taikencheckloop

	btnwait %52

	if %52 == 7 csp 8 : csp 7 : csp 6 : mov %2700,1 : mov %2705,1 : goto *sentaku

	if %52 == 6 csp 8 : csp 7 : csp 6 : mov %2705,1 : goto *sentaku

goto *taikencheckloop

;\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\
;II
*sentakuend

	for %199=19 to 34
		csp %199
	next

goto *title
;\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\
;VXe
*system
	saveoff

	isfull %55

	if %55 == 0 mov %3003,1
	if %55 == 1 mov %3003,2

	csp 10
	csp 11
	csp 12
	csp 13
	csp 14

	btndef clear

	if %3000 != 80 lsp 50,":a/2,0,3;system\1_1.bmp",280,110 : spbtn 50,50
	if %3000 == 80 lsp 50,":a/2,0,3;system\1_2.bmp",280,110 : spbtn 50,50

	if %3000 != 60 lsp 51,":a/2,0,3;system\2_1.bmp",330,110 : spbtn 51,51
	if %3000 == 60 lsp 51,":a/2,0,3;system\2_2.bmp",330,110 : spbtn 51,51

	if %3000 != 40 lsp 52,":a/2,0,3;system\3_1.bmp",380,110 : spbtn 52,52
	if %3000 == 40 lsp 52,":a/2,0,3;system\3_2.bmp",380,110 : spbtn 52,52

	if %3000 != 20 lsp 53,":a/2,0,3;system\4_1.bmp",430,110 : spbtn 53,53
	if %3000 == 20 lsp 53,":a/2,0,3;system\4_2.bmp",430,110 : spbtn 53,53

	if %3000 != 0 lsp 54,":a/2,0,3;system\5_1.bmp",480,110 : spbtn 54,54
	if %3000 == 0 lsp 54,":a/2,0,3;system\5_2.bmp",480,110 : spbtn 54,54


	if %3001 != 20 lsp 60,":a/2,0,3;system\1_1.bmp",280,228 : spbtn 60,60
	if %3001 == 20 lsp 60,":a/2,0,3;system\1_2.bmp",280,228 : spbtn 60,60

	if %3001 != 40 lsp 61,":a/2,0,3;system\2_1.bmp",330,228 : spbtn 61,61
	if %3001 == 40 lsp 61,":a/2,0,3;system\2_2.bmp",330,228 : spbtn 61,61

	if %3001 != 60 lsp 62,":a/2,0,3;system\3_1.bmp",380,228 : spbtn 62,62
	if %3001 == 60 lsp 62,":a/2,0,3;system\3_2.bmp",380,228 : spbtn 62,62

	if %3001 != 80 lsp 63,":a/2,0,3;system\4_1.bmp",430,228 : spbtn 63,63
	if %3001 == 80 lsp 63,":a/2,0,3;system\4_2.bmp",430,228 : spbtn 63,63

	if %3001 != 100 lsp 64,":a/2,0,3;system\5_1.bmp",480,228 : spbtn 64,64
	if %3001 == 100 lsp 64,":a/2,0,3;system\5_2.bmp",480,228 : spbtn 64,64



	if %3002 != 20 lsp 70,":a/2,0,3;system\1_1.bmp",280,344 : spbtn 70,70
	if %3002 == 20 lsp 70,":a/2,0,3;system\1_2.bmp",280,344 : spbtn 70,70

	if %3002 != 40 lsp 71,":a/2,0,3;system\2_1.bmp",330,344 : spbtn 71,71
	if %3002 == 40 lsp 71,":a/2,0,3;system\2_2.bmp",330,344 : spbtn 71,71

	if %3002 != 60 lsp 72,":a/2,0,3;system\3_1.bmp",380,344 : spbtn 72,72
	if %3002 == 60 lsp 72,":a/2,0,3;system\3_2.bmp",380,344 : spbtn 72,72

	if %3002 != 80 lsp 73,":a/2,0,3;system\4_1.bmp",430,344 : spbtn 73,73
	if %3002 == 80 lsp 73,":a/2,0,3;system\4_2.bmp",430,344 : spbtn 73,73

	if %3002 != 100 lsp 74,":a/2,0,3;system\5_1.bmp",480,344 : spbtn 74,74
	if %3002 == 100 lsp 74,":a/2,0,3;system\5_2.bmp",480,344 : spbtn 74,74

	if %3003 != 2 lsp 75,":a/2,0,3;system\on_1.bmp",170,465 : spbtn 75,75
	if %3003 == 2 lsp 75,":a/2,0,3;system\on_2.bmp",170,465 : spbtn 75,75

	if %3003 != 1 lsp 76,":a/2,0,3;system\off_1.bmp",290,465 : spbtn 76,76
	if %3003 == 1 lsp 76,":a/2,0,3;system\off_2.bmp",290,465 : spbtn 76,76

	lsp 77,":a/2,0,3;system\kanryou.bmp",590,510 : spbtn 77,77


	lsp 80,":c;system\back.jpg",0,0

	print 10


goto *systembtnwaitloop

*systembtnrepaint

	if %3000 != 80 lsp 50,":a/2,0,3;system\1_1.bmp",280,110 : spbtn 50,50
	if %3000 == 80 lsp 50,":a/2,0,3;system\1_2.bmp",280,110 : spbtn 50,50

	if %3000 != 60 lsp 51,":a/2,0,3;system\2_1.bmp",330,110 : spbtn 51,51
	if %3000 == 60 lsp 51,":a/2,0,3;system\2_2.bmp",330,110 : spbtn 51,51

	if %3000 != 40 lsp 52,":a/2,0,3;system\3_1.bmp",380,110 : spbtn 52,52
	if %3000 == 40 lsp 52,":a/2,0,3;system\3_2.bmp",380,110 : spbtn 52,52

	if %3000 != 20 lsp 53,":a/2,0,3;system\4_1.bmp",430,110 : spbtn 53,53
	if %3000 == 20 lsp 53,":a/2,0,3;system\4_2.bmp",430,110 : spbtn 53,53

	if %3000 != 0 lsp 54,":a/2,0,3;system\5_1.bmp",480,110 : spbtn 54,54
	if %3000 == 0 lsp 54,":a/2,0,3;system\5_2.bmp",480,110 : spbtn 54,54


	if %3001 != 20 lsp 60,":a/2,0,3;system\1_1.bmp",280,228 : spbtn 60,60
	if %3001 == 20 lsp 60,":a/2,0,3;system\1_2.bmp",280,228 : spbtn 60,60

	if %3001 != 40 lsp 61,":a/2,0,3;system\2_1.bmp",330,228 : spbtn 61,61
	if %3001 == 40 lsp 61,":a/2,0,3;system\2_2.bmp",330,228 : spbtn 61,61

	if %3001 != 60 lsp 62,":a/2,0,3;system\3_1.bmp",380,228 : spbtn 62,62
	if %3001 == 60 lsp 62,":a/2,0,3;system\3_2.bmp",380,228 : spbtn 62,62

	if %3001 != 80 lsp 63,":a/2,0,3;system\4_1.bmp",430,228 : spbtn 63,63
	if %3001 == 80 lsp 63,":a/2,0,3;system\4_2.bmp",430,228 : spbtn 63,63

	if %3001 != 100 lsp 64,":a/2,0,3;system\5_1.bmp",480,228 : spbtn 64,64
	if %3001 == 100 lsp 64,":a/2,0,3;system\5_2.bmp",480,228 : spbtn 64,64



	if %3002 != 20 lsp 70,":a/2,0,3;system\1_1.bmp",280,344 : spbtn 70,70
	if %3002 == 20 lsp 70,":a/2,0,3;system\1_2.bmp",280,344 : spbtn 70,70

	if %3002 != 40 lsp 71,":a/2,0,3;system\2_1.bmp",330,344 : spbtn 71,71
	if %3002 == 40 lsp 71,":a/2,0,3;system\2_2.bmp",330,344 : spbtn 71,71

	if %3002 != 60 lsp 72,":a/2,0,3;system\3_1.bmp",380,344 : spbtn 72,72
	if %3002 == 60 lsp 72,":a/2,0,3;system\3_2.bmp",380,344 : spbtn 72,72

	if %3002 != 80 lsp 73,":a/2,0,3;system\4_1.bmp",430,344 : spbtn 73,73
	if %3002 == 80 lsp 73,":a/2,0,3;system\4_2.bmp",430,344 : spbtn 73,73

	if %3002 != 100 lsp 74,":a/2,0,3;system\5_1.bmp",480,344 : spbtn 74,74
	if %3002 == 100 lsp 74,":a/2,0,3;system\5_2.bmp",480,344 : spbtn 74,74

	if %3003 != 2 lsp 75,":a/2,0,3;system\on_1.bmp",170,465 : spbtn 75,75
	if %3003 == 2 lsp 75,":a/2,0,3;system\on_2.bmp",170,465 : spbtn 75,75

	if %3003 != 1 lsp 76,":a/2,0,3;system\off_1.bmp",290,465 : spbtn 76,76
	if %3003 == 1 lsp 76,":a/2,0,3;system\off_2.bmp",290,465 : spbtn 76,76

	lsp 77,":a/2,0,3;system\kanryou.bmp",590,510 : spbtn 77,77


	print 1

	bgmvol (%3001*%60/100)
	sevol %3002
	voicevol %3002
	if %3003 == 1 menu_window
	if %3003 == 2 menu_full


*systembtnwaitloop

	btnwait %53

	if %53 == 50 mov %3000,80 : goto *systembtnrepaint
	if %53 == 51 mov %3000,60 : goto *systembtnrepaint
	if %53 == 52 mov %3000,40 : goto *systembtnrepaint
	if %53 == 53 mov %3000,20 : goto *systembtnrepaint
	if %53 == 54 mov %3000,0 : goto *systembtnrepaint

	if %53 == 60 mov %3001,20 : goto *systembtnrepaint
	if %53 == 61 mov %3001,40 : goto *systembtnrepaint
	if %53 == 62 mov %3001,60 : goto *systembtnrepaint
	if %53 == 63 mov %3001,80 : goto *systembtnrepaint
	if %53 == 64 mov %3001,100 : goto *systembtnrepaint

	if %53 == 70 mov %3002,20 : goto *systembtnrepaint
	if %53 == 71 mov %3002,40 : goto *systembtnrepaint
	if %53 == 72 mov %3002,60 : goto *systembtnrepaint
	if %53 == 73 mov %3002,80 : goto *systembtnrepaint
	if %53 == 74 mov %3002,100 : goto *systembtnrepaint

	if %53 == 75 mov %3003,2 : goto *systembtnrepaint
	if %53 == 76 mov %3003,1 : goto *systembtnrepaint

	if %53 == 77 goto *systemkanryou
	if %53 == -1 goto *systemkanryou




goto *systembtnwaitloop

*systemkanryou

	for %199=50 to 80
		csp %199
	next

	saveon
return
;\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\
;f[^[hTu[`
*loadset


	bgmvol (%3001*%60/100)
	if $30 != "" dwaveloop 1,$30
	chvol 1,(%3002*%61/100)
	chvol 2,(%3002*%62/100)
	chvol 3,(%3002*%63/100)
	chvol 4,(%3002*%64/100)
	if %45 == 1 gosub *lain
	if %45 == 2 gosub *sakura


return
;\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\
;^Cgʂɖ߂
*titleback

	saveoff

	dwavestop 1

	for %199=0 to 198
		mov %%199,0
	next

	for %199=200 to 2599
		mov %%199,0
	next

	for %199=0 to 2599
		mov $%199,""
	next

	for %199=0 to 300
		csp %199
	next

	bg black,15

	bgmfadeout 2000
	bgmstop



	btndef clear

goto *titlestart

;\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\
;I
*gameend

	saveoff

	dwavestop 1

	for %199=0 to 198
		mov %%199,0
	next

	for %199=200 to 2599
		mov %%199,0
	next

	for %199=0 to 2599
		mov $%199,""
	next

	for %199=0 to 300
		csp %199
	next

	bg black,15

	bgmfadeout 2000
	bgmstop



	btndef clear


end


;\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\
;Ahx`[p[g
;Pu
*scenario1

	mov $100,"P"

	for %199=19 to 34
		csp %199
	next

	bg black,14

	bgmfadeout 2500

	bgmstop

	wait 4000

	dwave 10,"wave\KeyboardC1.wav"
	bg "cutin\00.jpg",1
	wait 200

	dwave 10,"wave\KeyboardD1.wav"
	bg "cutin\01.jpg",1
	wait 100

	dwave 10,"wave\KeyboardD1.wav"
	bg "cutin\02.jpg",1
	wait 150

	dwave 10,"wave\KeyboardC1.wav"
	bg "cutin\03.jpg",1
	wait 150

	dwave 10,"wave\KeyboardC1.wav"
	bg "cutin\04.jpg",1
	wait 125

	dwave 10,"wave\KeyboardC1.wav"
	bg "cutin\05.jpg",1
	wait 300

	dwave 10,"wave\KeyboardD1.wav"
	bg "cutin\06.jpg",1
	wait 350


	dwave 10,"wave\KeyboardD1.wav"
	wait 450

	dwave 10,"wave\KeyboardC1.wav"
	bg "cutin\07.jpg",1
	wait 200

	dwave 10,"wave\KeyboardC1.wav"
	bg "cutin\08.jpg",1
	wait 300

	dwave 10,"wave\KeyboardC1.wav"
	bg "cutin\09.jpg",1
	wait 325

	dwave 10,"wave\KeyboardC1.wav"
	bg "cutin\10.jpg",1
	wait 400

	dwave 10,"wave\KeyboardC1.wav"
	bg "cutin\11.jpg",1

	wait 1000

	bg black,0
	print 99,6000,"cascade.dll/dx"

	bg "bg\gakkou_rouka.jpg",0
	print 99,3000,"cascade.dll/dx"

	bgm "bgm\heart.mp3"

	wait 3000

	lsph2 10,":c;bg\gakkou_rouka.jpg",400,300,100,100,0
	lsph2 11,":c;bg\rouka_200.jpg",400,300,100,100,0

	vsp2 10,1



	for %199=1 to 6
		gettimer %90
		msp2 10,0,6,1,1,0
		print 1
		waittimer (%90+80)
	next
	for %199=1 to 10
		gettimer %90
		msp2 10,0,-6,1,1,0
		print 1
		waittimer (%90+70)
	next
	wait 300
	for %199=1 to 6
		gettimer %90
		msp2 10,0,6,1,1,0
		print 1
		waittimer (%90+60)
	next


	for %199=1 to 6
		gettimer %90
		msp2 10,0,6,1,1,0
		print 1
		waittimer (%90+80)
	next
	for %199=1 to 10
		gettimer %90
		msp2 10,0,-6,1,1,0
		print 1
		waittimer (%90+70)
	next
	wait 500
	for %199=1 to 6
		gettimer %90
		msp2 10,0,6,1,1,0
		print 1
		waittimer (%90+60)
	next


	for %199=1 to 6
		gettimer %90
		msp2 10,0,6,1,1,0
		print 1
		waittimer (%90+80)
	next
	for %199=1 to 10
		gettimer %90
		msp2 10,0,-6,1,1,0
		print 1
		waittimer (%90+70)
	next
	wait 500
	for %199=1 to 6
		gettimer %90
		msp2 10,0,6,1,1,0
		print 1
		waittimer (%90+60)
	next


	for %199=1 to 6
		gettimer %90
		msp2 10,0,6,1,1,0
		print 1
		waittimer (%90+80)
	next
	for %199=1 to 10
		gettimer %90
		msp2 10,0,-6,1,1,0
		print 1
		waittimer (%90+70)
	next
	wait 500
	for %199=1 to 6
		gettimer %90
		msp2 10,0,6,1,1,0
		print 1
		waittimer (%90+60)
	next


	for %199=1 to 6
		gettimer %90
		msp2 10,0,6,1,1,0
		print 1
		waittimer (%90+80)
	next
	for %199=1 to 10
		gettimer %90
		msp2 10,0,-6,1,1,0
		print 1
		waittimer (%90+70)
	next

	csp2 10

	bg black,10

	wait 2000

	bg "cutin\cutin_01.jpg",10

	wait 3000

	bg black,10

	bg "bg\gakkou_kyousitu.jpg",1
	dwave 10,"wave\noise01.wav"

	wait 200

	bg black,1

	wait 2000

	bg "cutin\cutin_02.jpg",10

	wait  3000

	bg black,10

	wait 2000

	bgmfadeout 1
	bgmstop
	dwave 10,"wave\dooropen07.wav"

	bg "bg\gakkou_kyousitu.jpg",20

	wait 3000

	setwindow 8,56,40,40,24,24,0,2,0,1,1,#888888,0,0,800,650


;	mov $401,"ߑOXPTBłɎƂn܂ĂB"
;	mov %120,401: mov %121,401:mov %122,24:gosub *messagefont
;	$401@
;
;	mov $402,"̔JƁA̎lɏWB"
;	mov %120,402: mov %121,402:mov %122,24:gosub *messagefont
;	$402@
;
;	mov $403,"@@"
;	mov $404,"u[A^cBxHv"
;	mov %120,403: mov %121,404:mov %122,24:gosub *messagefont
;	br
;	$404@
;
;
;	mov $405,"@@"
;	mov $406,"d炩钆Nj̍bB"
;	mov $407,"SC̐wtAu[cî͂j搶B"
;	mov %120,405: mov %121,407:mov %122,24:gosub *messagefont
;	br
;	$406
;	$407@
;
;	mov $408,"̖O͖YꂽǁA"
;	mov $409,"ƂɂĂ̂Łwu[xƂĂB"
;	mov $410,"@"
;	mov $411,"@"
;	mov $412,"@"
;	mov $413,"@"
;	mov $414,"@"
;	mov $415,"@"
;	mov $416,"@"
;	mov $417,"@"
;	mov $418,"@"
;	mov $419,"@"
;	mov $420,"@"
;	mov %120,408: mov %121,420:mov %122,24:gosub *messagefont
;	$408
;	$409\

	mov %130,401

	mov $401,"߂X_PTBCECnB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"CjCBWgB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $403,"@@"
	mov $404,"u݁C^cBHv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@


	mov $405,"@@"
	mov $406,"⁗ꐺINjIB"
	mov $407,"ǎCwVCqcc梌VB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"ґRYIC"
	mov $409,"ACkCȗLOwqxB"
	mov $410,"@"
	mov $411,"@"
	mov $412,"@"
	mov $413,"@"
	mov $414,"@"
	mov $415,"@"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\




	mov $401,"usDӎvC䐇唈Bv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"@@"
	mov $403,"u_ʁIv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"@@"
	mov $405,"梌V܊ދԁCAݏoΕ\㈍C"
	mov $406,"R@Cn㍹nʓ񎟕B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $407,"䜟nȓIʁCciB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"˓IwFIC"
	mov $409,"EdV񓞗aC{B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $410,"@@"
	mov $411,"䐥ޒC㱓_IwC"
	mov $412,"VpB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $413,"cc߁B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $414,"IC߁B|ٍIB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $415,"ݓIC\oC"
	mov $416,"}ZzvB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $417,"ArzIB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $418,"Ɩ琥rzIBޔБz@^ցB"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"LC"
	mov $402,"ɕ˗IʁB"
	mov %120,401: mov %121,402:mov %122,24:gosub *messagefont
	$401
	$402@

	mov $403,"ݓߗIjCC"
	mov $404,"֐@nꕛsuI\B"
	mov %120,403: mov %121,404:mov %122,24:gosub *messagefont
	$403
	$404@

	mov $405,"^WlC_JB"
	mov $423,"I\bōݜ܁B"
	mov %120,405: mov %121,405:mov %122,24:gosub *messagefont
	mov %120,423: mov %121,423:mov %122,24:gosub *messagefont
	$405@/
	$423/
	add $405,$423/
	@


	mov $406,"@@"
	mov $407,"CdvCCNB"
	mov %120,406: mov %121,407:mov %122,24:gosub *messagefont
	br
	$407@

	mov $408,"ߊSsmډېYrBissmB"
	mov %120,408: mov %121,408:mov %122,24:gosub *messagefont
	$408@

	mov $409,"vcفCvցc"
	mov $423,"ߐ꘢B"
	mov %120,409: mov %121,409:mov %122,24:gosub *messagefont
	mov %120,423: mov %121,423:mov %122,24:gosub *messagefont
	$409@/
	$423/
	add $409,$423/
	@

	mov $410,"@@"
	mov $411,"ޘC{svLB"
	mov $412,"vLm㈖{CvLB"
	mov $413,"控VIC՗VIwށxB"
	mov %120,410: mov %121,413:mov %122,24:gosub *messagefont
	br
	$411
	$412
	$413@

	mov $414,"@@"
	mov $415,"CVӏyݓIdޚGc"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	mov %120,414: mov %121,420:mov %122,24:gosub *messagefont
	br
	$415\

	textoff


	dwave 10,"wave\ZipperD11.wav"

	bg "cutin\baal.jpg",1

	wait 1500

	bg "bg\gakkou_kyousitu.jpg",1

	texton


	mov $401,"Cv֖vցCm꒵JB"
	mov %120,401: mov %121,401:mov %122,24:gosub *messagefont
	$401@

	mov $402,"wzoIIHC"
	mov $403,"鈓shIB"
	mov %120,402: mov %121,403:mov %122,24:gosub *messagefont
	$402
	$403@

	mov $404,"ޘ@Оc"
	mov %120,404: mov %121,404:mov %122,24:gosub *messagefont
	$404@

	mov $405,"œoEHO[^ȓIB"
	mov $406,"ʗ܁CސpUkqIc"
	mov %120,405: mov %121,406:mov %122,24:gosub *messagefont
	$405
	$406@

	mov $407,"@@"
	mov $408,"sޗdΗCJH"
	mov %120,407: mov %121,408:mov %122,24:gosub *messagefont
	br
	$408@

	mov $409,"p{o[[ƒIkqC"
	mov $410,"ACj@˘ϓIB"
	mov %120,409: mov %121,410:mov %122,24:gosub *messagefont
	$409
	$410@

	mov $411,"@@"
	mov $412,"@ʗpޘS͓QݐlIc"
	mov %120,411: mov %121,412:mov %122,24:gosub *messagefont
	br
	$412@

	mov $413,"kЊQJB"
	mov $414,"JcccAρI"
	mov $415,"@"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	mov %120,413: mov %121,420:mov %122,24:gosub *messagefont
	textspeed 200
	$413
	$414\


	textoff


;ʉFtHb
	dwave 2,"wave\swing10r.wav"
	wait 500
;ʉFKXbI
	dwave 2,"wave\hit80.wav"
;	ʃtbV
	drawfill 255,0,0:draw:repaint
	QUAKE 50,500
	wait 3000


;ʉFhTb
	dwave 2,"wave\ClothC.wav"
	QUAKE 10,200

	bg black,1

	wait 2000

;ʉFqk̔ߖ
	dwave 2,"wave\himei.wav"

	wait 3000

	bgm "bgm\free41.mp3"

;wiFȂ
	bg "cutin\opening\open_01.jpg",14
	wait 1000

;wiFuNɈĂ悤v
	bg "cutin\opening\open_02.jpg",14
	wait 1000

;wiFuU̐`ڊo߁v
	bg "cutin\opening\open_03.jpg",14
	wait 1000

;wiFu̐̈łƗ߂Ɂv
	bg "cutin\opening\open_04.jpg",14
	wait 1000

;wiFuSĂĂ悤v
	bg "cutin\opening\open_05.jpg",14
	wait 3000

;wiFȂ
	bg "cutin\opening\open_06.jpg",14
	wait 1000

;wiFufUCEr{@insiderv
	bg "cutin\opening\open_07.jpg",14
	wait 1000

;wiFuXNvg@LDNv
	bg "cutin\opening\open_08.jpg",14
	wait 1000

;wiFu@񂾁[ڂƁv
	bg "cutin\opening\open_09.jpg",14
	wait 3000

;ʍ
	bg black,16

	wait 3000

;űȏvI[vjO^Cgʁ@XɃtF[hC
	bg "cutin\opening\open_10.jpg",19

	wait 5000

;y45bɂȂ܂ŃEFCg
;ʏXɍtF[h
;BGMtF[hAEg

	bg black,19

	bgmfadeout 5000
	bgmstop

	wait 4000

;ʉFc񂾊wZ̃`C
	dwave 2,"wave\yugamichaim.wav"
	bg "cutin\subtitle01.jpg",19

	wait 5000

;ʉFw̎Gi[vȂj
	dwave 2,"wave\eki.wav"

	bg "bg\morioka_eki.jpg",14

	wait 3000

	bgm "bgm\free55.mp3"


	mov $401,"y擞⋁Ay͓Ie⋒͗́B"
	mov %120,401: mov %121,401:mov %122,24:gosub *messagefont
	$401@

	mov $402,"˓IBfoω͓IC"
	mov $403,"ݗ⋑Iʈ֏B"
	mov %120,402: mov %121,403:mov %122,24:gosub *messagefont
	$402
	$403@

	mov $404,"ʑOAOIqFB"
	mov %120,404: mov %121,404:mov %122,24:gosub *messagefont
	$404@

	mov $405,"ߗÊŋNrzIC"
	mov $406,"甉䊴sB"
	mov %120,405: mov %121,406:mov %122,24:gosub *messagefont
	$405
	$406@

	mov $407,"@ʔlvCIꕔc"
	mov $408,"ޔЙ[m݋|OB"
	mov %120,407: mov %121,408:mov %122,24:gosub *messagefont
	$407
	$408@

	mov $409,"@@"
	mov $410,"cVS瑌c"
	mov $411,"@"
	mov $412,"@"
	mov $413,"@"
	mov $414,"@"
	mov $415,"@"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	mov %120,409: mov %121,420:mov %122,24:gosub *messagefont
	br
	$410\


	mov $401,"^zcSfoB"
	mov %120,401: mov %121,401:mov %122,24:gosub *messagefont
	$401@

	mov $402,"꒼ȗs󓞓IߔmSB"
	mov %120,402: mov %121,402:mov %122,24:gosub *messagefont
	$402@

	mov $403,"Cvh趁CݗYrsvLB"
	mov $404,"C֔@CߌmS֐݁c"
	mov %120,403: mov %121,404:mov %122,24:gosub *messagefont
	$403
	$404@

	mov $405,"赍݈ݗCA诗B"
	mov $406,"ٍnc꒼xx赒CsmCB"
	mov %120,405: mov %121,406:mov %122,24:gosub *messagefont
	$405
	$406@

	mov $407,"@@"
	mov $408,"認ɁC荔doߐlsIB"
	mov $409,"ӛΒnxgC訏㗹ˁB"
	mov %120,407: mov %121,409:mov %122,24:gosub *messagefont
	br
	$408
	$409@

	mov $410,"pZuɓInC"
	mov $411,"\ҔE󒅁B"
	mov $412,"@"
	mov $413,"@"
	mov $414,"@"
	mov $415,"@"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	mov %120,410: mov %121,420:mov %122,24:gosub *messagefont
	$410
	$411\


	mov $401,"瓞⋓I͏CQl蟗؎B"
	mov $402,"lCrzϗÒB"
	mov %120,401: mov %121,402:mov %122,24:gosub *messagefont
	$401
	$402@

	mov $403,"ʈ֏螒qIC"
	mov $404,"vL꘢lőB"
	mov %120,403: mov %121,404:mov %122,24:gosub *messagefont
	$403
	$404@

	mov $405,"@@"
	mov $406,"ޏAI퐶B"
	mov %120,405: mov %121,406:mov %122,24:gosub *messagefont
	br
	$406@

	mov $407,"Ǝl⋓IpEmSaɋB"
	mov %120,407: mov %121,407:mov %122,24:gosub *messagefont
	$407@

	mov $408,"߈ߐlُC͉ٗI퐶B"
	mov %120,408: mov %121,408:mov %122,24:gosub *messagefont
	$408@

	mov $409,"@@"
	mov $410,"㐶܁CߓIg̖vLCݏB"
	mov %120,409: mov %121,410:mov %122,24:gosub *messagefont
	br
	$410@

	mov $411,"܁Cs[w蚁CȑaB"
	mov %120,411: mov %121,411:mov %122,24:gosub *messagefont
	$411@

	mov $412,"@@"
	mov $413,"ߜuɓꐥYr藁c"
	mov %120,412: mov %121,413:mov %122,24:gosub *messagefont
	br
	$413@

	mov $414,"VCVCsc"
	mov $415,"CuɁC蕊蓓I@shsDc"
	mov %120,414: mov %121,415:mov %122,24:gosub *messagefont
	$414
	$415@

	mov $416,"ޓccYrc"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	mov %120,416: mov %121,420:mov %122,24:gosub *messagefont
	$416\

;ʉFs|p|[
	dwave 2,"wave\call_up.wav"

	mov $401,"u萂W⋑Isܕԗ́C"
	mov $402,"W_QŔCCȕÍB"
	mov $403,"苑ޓȓv"
	mov %120,401: mov %121,403:mov %122,24:gosub *messagefont
	$401
	$402
	$403@

	mov $404,"@@"
	mov $405,"hI⋓dŒfIvB"
	mov %120,404: mov %121,405:mov %122,24:gosub *messagefont
	br
	$405@

	mov $406,"ŗ⋑I艁C肏AvW_PTB"
	mov %120,406: mov %121,406:mov %122,24:gosub *messagefont
	$406@

	mov $407,"C㱐W_ROB"
	mov $408,"swZc"
	mov %120,407: mov %121,408:mov %122,24:gosub *messagefont
	$407
	$408@

	mov $409,"@@"
	mov $410,"sqnCʈ֓IGC⋋NgB"
	mov %120,409: mov %121,410:mov %122,24:gosub *messagefont
	br
	$410@

	mov $411,"@ʍĕsÐgCܕԗ͏AvB"
	mov %120,411: mov %121,411:mov %122,24:gosub *messagefont
	$411@

	mov $412,"@ʔ\ߔ͉Ɓcc"
	mov $413,"SSB"
	mov %120,412: mov %121,413:mov %122,24:gosub *messagefont
	$412
	$413@

	mov $414,"ݏA񋎁Cٟ܁uszwZvC"
	mov $415,"@ʔ\܏oIԁcc"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	mov %120,414: mov %121,420:mov %122,24:gosub *messagefont
	$414
	$415\

	textoff

	bgmfadeout 2000
	bgmstop

	wait 1000

	bg "bg\morioka_sity02.jpg",12

;ʉF̎Gi[vȂj
	dwave 2,"wave\machi.wav"
	wait 3000

	bg "bg\morioka_sity01.jpg",12
	wait 3000

	bg "bg\gakkou_gaikan.jpg",12
	wait 3000

	bgmfadeout 1000
	bgmstop
	dwavestop 2

	texton

	mov $401,"耗KꒆwB"
	mov %120,401: mov %121,401:mov %122,24:gosub *messagefont
	$401@

	mov $402,"|鑽wZC"
	mov $403,"Cs~IZB"
	mov %120,402: mov %121,403:mov %122,24:gosub *messagefont
	$402
	$403@

	mov $404,"ZjIC"
	mov $405,"ŗkݍZqOI艕\B"
	mov %120,404: mov %121,405:mov %122,24:gosub *messagefont
	$404
	$405@

	mov $406,"W_QTBV|z㗹B"
	mov %120,406: mov %121,406:mov %122,24:gosub *messagefont
	$406@

	mov $407,"@@"
	mov $408,"嗹QiIwlC"
	mov $409,"ꎟޓZjI߈VC䎊y๐VB"
	mov %120,407: mov %121,409:mov %122,24:gosub *messagefont
	br
	$408
	$409@

	mov $410,"R㱓IwogC"
	mov $411,"C꘢ld_wIwCސvswB"
	mov $412,"lFR䐥VˁA_B"
	mov %120,410: mov %121,412:mov %122,24:gosub *messagefont
	$410
	$411
	$412@

	mov $413,"ޗCnsfzdlC"
	mov $414,"C甏LlsߕIsNIlB"
	mov %120,413: mov %121,414:mov %122,24:gosub *messagefont
	$413
	$414@

	mov $415,"C䐥^IrzIB"
	mov %120,415: mov %121,415:mov %122,24:gosub *messagefont
	$415@

	mov $416,"r֌uȐA@CS[xzB"
	mov %120,416: mov %121,416:mov %122,24:gosub *messagefont
	$416@

	mov $417,"@@"
	mov $418,"AC݉"
	mov $419,"@"
	mov $420,"@"
	mov %120,417: mov %121,420:mov %122,24:gosub *messagefont
	br
	$418\

	textoff

	bg "bg\gakkou_kyousitu.jpg",12



;ʉ:̃KKiiv[vj
	dwave 1,"wave\ambient.wav"
	wait 3000

	texton

	mov $401,"LCCrswB"
	mov %120,401: mov %121,401:mov %122,24:gosub *messagefont
	$401@

	mov $402,"@lApAڙVEړIԎVB"
	mov $403,"ݜލ掓IْԒCsB"
	mov %120,402: mov %121,403:mov %122,24:gosub *messagefont
	$402
	$403@

	mov $404,"@@"
	mov $405,"vLlŏāB"
	mov %120,404: mov %121,405:mov %122,24:gosub *messagefont
	br
	$405@

	mov $406,"vl䊖DCsClŏāB"
	mov %120,406: mov %121,406:mov %122,24:gosub *messagefont
	$406@

	mov $407,"A勎nB"
	mov $408,"ҒnCÒnȓIʏB"
	mov %120,407: mov %121,408:mov %122,24:gosub *messagefont
	$407
	$408@

	mov $409,"@@"
	mov $410,"svLFB"
	mov %120,409: mov %121,410:mov %122,24:gosub *messagefont
	br
	$410@

	mov $411,"݉ZIqC"
	mov $412,"LN঎RA݉ߌwIC"
	mov $413,"LkmmI~|肕FB"
	mov %120,411: mov %121,413:mov %122,24:gosub *messagefont
	$411
	$412
	$413@

	mov $414,"ACߍFsmIwC"
	mov $415,"\ޏwZB"
	mov %120,414: mov %121,415:mov %122,24:gosub *messagefont
	$414
	$415@

	mov $416,"dvIFCSsݗmB"
	mov %120,416: mov %121,416:mov %122,24:gosub *messagefont
	$416@

	mov $417,"@@"
	mov $418,"ȁCݜޘnvLFRIB"
	mov $419,"@"
	mov $420,"@"
	mov %120,417: mov %121,420:mov %122,24:gosub *messagefont
	br
	$418\


;ʉFwZ̃`Ci[vȂj
	dwave 2,"wave\chaim.wav"
	wait 2000


	mov $401,"ǉCnIkNC"
	mov $402,"LIwF]]B"
	mov %120,401: mov %121,402:mov %122,24:gosub *messagefont
	$401
	$402@

	mov $403,"ݑIʐgލINjBFIǎC梌VB"
	mov %120,403: mov %121,403:mov %122,24:gosub *messagefont
	$403@

	mov $404,"ґRgiLPVTЕāCȀdp嗹POOҁB"
	mov $405,"CߔǏ^C"
	mov $406,"hNҍw梒xB"
	mov %120,404: mov %121,406:mov %122,24:gosub *messagefont
	$404
	$405
	$406@

	mov $407,"ґRE\{CVNC"
	mov $408,"AˑRIǵC"
	mov $409,"Oܗ֘IopCIfB"
	mov %120,407: mov %121,409:mov %122,24:gosub *messagefont
	$407
	$408
	$409@

	mov $410,"A蕊ŒIlsuC"
	mov $411,"{ldukJB"
	mov $412,"@"
	mov $413,"@"
	mov $414,"@"
	mov $415,"@"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	mov %120,410: mov %121,420:mov %122,24:gosub *messagefont
	$410
	$411\


	mov $401,"u݉CkꉔBsh䍿ʏ㉔Iv"
	mov %120,401: mov %121,401:mov %122,24:gosub *messagefont
	$401@

	mov $402,"@@"
	mov $403,"ߐIÑC"
	mov $404,"⋒Il]]sȓIʁB"
	mov %120,402: mov %121,404:mov %122,24:gosub *messagefont
	br
	$403
	$404@

	mov $405,"ݓߌQlcc"
	mov %120,405: mov %121,405:mov %122,24:gosub *messagefont
	$405@

	mov $406,"L꘢qAʒ茑ֈcIlB"
	mov %120,406: mov %121,406:mov %122,24:gosub *messagefont
	$406@

	mov $407,"CMOB"
	mov $408,"݉ʓIwB"
	mov %120,407: mov %121,408:mov %122,24:gosub *messagefont
	$407
	$408@

	mov $409,"@@"
	mov $410,"Cw"
	mov $411,"CᔗB"
	mov %120,409: mov %121,411:mov %122,24:gosub *messagefont
	br
	$410
	$411@

	mov $412,"ɗBCwI_aȋNB"
	mov %120,412: mov %121,412:mov %122,24:gosub *messagefont
	$412@

	mov $413,"ߐБጲIuڌB"
	mov %120,413: mov %121,413:mov %122,24:gosub *messagefont
	$413@

	mov $414,"ٖ@ߔ㔗CzxCB"
	mov %120,414: mov %121,414:mov %122,24:gosub *messagefont
	$414@

	mov $415,"ቺْiqCÐÓґB"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	mov %120,415: mov %121,420:mov %122,24:gosub *messagefont
	$415\


	mov $401,"urCCn_kBccԙnwBv"
	mov $402,"uIv"
	mov %120,401: mov %121,402:mov %122,24:gosub *messagefont
	$401
	$402@

	mov $403,"@@"
	mov $404,"uwv"
	mov $405,"uIv"
	mov %120,403: mov %121,405:mov %122,24:gosub *messagefont
	br
	$404
	$405@

	mov $406,"@@"
	mov $407,"ufwv"
	mov $408,"uIv"
	mov %120,406: mov %121,408:mov %122,24:gosub *messagefont
	br
	$407
	$408@

	mov $409,"@@"
	mov $410,"NCᏊLlsEeݍʏC"
	mov $411,"VCn_B"
	mov $412,"@"
	mov $413,"@"
	mov $414,"@"
	mov $415,"@"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	mov %120,409: mov %121,420:mov %122,24:gosub *messagefont
	br
	$410
	$411\


	mov $401,"uCwv"
	mov %120,401: mov %121,401:mov %122,24:gosub *messagefont
	$401@

	mov $402,"uIv"
	mov %120,402: mov %121,402:mov %122,24:gosub *messagefont
	$402@

	mov $403,"@@"
	mov $404,"ʓICw瓚ꐺB"
	mov %120,403: mov %121,404:mov %122,24:gosub *messagefont
	br
	$404@

	mov $405,"pيIAيI\闹_B"
	mov %120,405: mov %121,405:mov %122,24:gosub *messagefont
	$405@

	mov $406,"@@"
	mov $407,"uwv"
	mov $408,"uIv"
	mov %120,406: mov %121,408:mov %122,24:gosub *messagefont
	br
	$407
	$408@

	mov $409,"@@"
	mov $410,"uؓwv"
	mov $411,"uIv"
	mov %120,409: mov %121,411:mov %122,24:gosub *messagefont
	br
	$410
	$411@

	mov $412,"@@"
	mov $413,"u^cNv"
	mov $414,"@"
	mov $415,"@"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	mov %120,412: mov %121,420:mov %122,24:gosub *messagefont
	br
	$413\

	textoff

	bg "bg\gakkou_kyousitu_bure.jpg",1

;	G\FDP@ʏ@ʒuF

	ld c,":a;tatie\yuuki\tuujyou.bmp",0
	print 11

	wait 2000

	texton

	mov $401,"uccBv"
	mov %120,401: mov %121,401:mov %122,24:gosub *messagefont
	$401@

	mov $402,"@@"
	mov $403,"畽ÒnꐺB"
	mov %120,402: mov %121,403:mov %122,24:gosub *messagefont
	br
	$403@

	mov $404,"Icc^cCcB"
	mov %120,404: mov %121,404:mov %122,24:gosub *messagefont
	$404@

	mov $405,"^cciȂ䂤jB"
	mov $406,"ސ_\IB"
	mov $407,"@"
	mov $408,"@"
	mov $409,"@"
	mov $410,"@"
	mov $411,"@"
	mov $412,"@"
	mov $413,"@"
	mov $414,"@"
	mov $415,"@"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	mov %120,405: mov %121,420:mov %122,24:gosub *messagefont
	$405
	$406\


	mov $401,"u]Nv"
	mov $402,"uBv"
	mov %120,401: mov %121,402:mov %122,24:gosub *messagefont
	$401
	$402@

	mov $403,"@@"
	mov $404,"u\䕔wv"
	mov $405,"uBv"
	mov %120,403: mov %121,405:mov %122,24:gosub *messagefont
	br
	$404
	$405@

	mov $406,"@@"
	mov $407,"_\[sCvLCg㇁B"
	mov %120,406: mov %121,407:mov %122,24:gosub *messagefont
	br
	$407@

	mov $408,"C畽KnCnB"
	mov %120,408: mov %121,408:mov %122,24:gosub *messagefont
	$408@

	mov $409,"@@"
	mov $410,"ޏAI퐶B"
	mov %120,409: mov %121,410:mov %122,24:gosub *messagefont
	br
	$410@

	mov $411,"Fō@ꍏzC[noȐ\B"
	mov $412,"@"
	mov $413,"@"
	mov $414,"@"
	mov $415,"@"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	mov %120,411: mov %121,420:mov %122,24:gosub *messagefont
	$411\

	textoff
	cl c,0
	bg black,16


;

;ʁFSd}iʏj
;wi
;ʉFs[
;wiFSd}Eʏ@EɃtF[h
;EɃtF[hAEg
;il̐S\oBƃtF[hS񂸂j
;
;EFCgQb

	mov %42,2
	gosub *sindenzu

	wait 2000


;


;ʉFwZ̃`CEZi[vȂj
	dwave 2,"wave\chaim.wav"
	bg "bg\gakkou_gaikan.jpg",12
	wait 3000


;ʉ:̃KKi[vȂj
	dwave 3,"wave\ambient.wav"
	bg "bg\gakkou_kyousitu.jpg",26
	wait 3000

	texton


	mov $401,"wAЉqECB@C"
	mov $402,"CډIN̈CCwFCnsËNB"
	mov %120,401: mov %121,402:mov %122,24:gosub *messagefont
	$401
	$402@

	mov $403,"VICOsB"
	mov $404,"T߈ꍱ^×ہwNxCIJB"
	mov %120,403: mov %121,404:mov %122,24:gosub *messagefont
	$403
	$404@

	mov $405,"N̈CIވ꒼ǍW@[rvB"
	mov $406,"TpߋޏCIv{vLB"
	mov $407,"@"
	mov $408,"@"
	mov $409,"@"
	mov $410,"@"
	mov $411,"@"
	mov $412,"@"
	mov $413,"@"
	mov $414,"@"
	mov $415,"@"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	mov %120,405: mov %121,420:mov %122,24:gosub *messagefont
	$405
	$406\


	mov $401,"FEsXߎC"
	mov $402,"ݐjPߕInB"
	mov %120,401: mov %121,402:mov %122,24:gosub *messagefont
	$401
	$402@

	mov $403,"c^ÕݍiCCnCOIJqB"
	mov %120,403: mov %121,403:mov %122,24:gosub *messagefont
	$403@

	mov $404,"@@"
	mov $405,"\CmS甉hs@JB"
	mov $406,"Ig̔䓯lvC"
	mov $407,"nsB"
	mov %120,404: mov %121,407:mov %122,24:gosub *messagefont
	br
	$405
	$406
	$407@

	mov $408,"C䐥ߔЕsHAYrshIw"
	mov $409,"lOCR݁C"
	mov $410,"h꘢羚ƏAfoB"
	mov %120,408: mov %121,410:mov %122,24:gosub *messagefont
	$408
	$409
	$410@

	mov $411,"@@"
	mov $412,"֔@C@I㐶p܉vYrݏB"
	mov $413,"IǵB"
	mov $414,"@"
	mov $415,"@"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	mov %120,411: mov %121,420:mov %122,24:gosub *messagefont
	br
	$412
	$413\



	mov $401,"u݁CrOIv"
	mov %120,401: mov %121,401:mov %122,24:gosub *messagefont
	$401@

	mov $402,"@@"
	mov $403,"yPaqIC⁗B"
	mov %120,402: mov %121,403:mov %122,24:gosub *messagefont
	br
	$403@

	mov $404,"ccCwB"
	mov %120,404: mov %121,404:mov %122,24:gosub *messagefont
	$404@

	mov $405,"@@"
	mov $406,"uVvOpaHv"
	mov %120,405: mov %121,406:mov %122,24:gosub *messagefont
	br
	$406@

	mov $407,"@@"
	mov $408,"ucBv"
	mov %120,407: mov %121,408:mov %122,24:gosub *messagefont
	br
	$408@

	mov $409,"@@"
	mov $410,"CwՒKIgC䏬n__B"
	mov $411,"ޔْԈNIC"
	mov $412,"{wۏoᑭIޏΐB"
	mov %120,409: mov %121,412:mov %122,24:gosub *messagefont
	br
	$410
	$411
	$412@

	mov $413,"݉IiqēIpaB"
	mov $414,"ȑOOpaCAC}CȕsĐB"
	mov %120,413: mov %121,414:mov %122,24:gosub *messagefont
	$413
	$414@

	mov $415,"}ΓI߈ꍏC"
	mov $416,"ssmOpa\CkyB"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	mov %120,415: mov %121,420:mov %122,24:gosub *messagefont
	$415
	$416\


	mov $401,"uȑOIߍOparaHv"
	mov %120,401: mov %121,401:mov %122,24:gosub *messagefont
	$401@

	mov $402,"@@"
	mov $403,"ގc_In⁗IB"
	mov %120,402: mov %121,403:mov %122,24:gosub *messagefont
	br
	$403@

	mov $404,"ՒyNIKcwcc"
	mov $405,"|ΒŒB"
	mov %120,404: mov %121,405:mov %122,24:gosub *messagefont
	$404
	$405@

	mov $406,"@@"
	mov $407,"uh貗ccv"
	mov %120,406: mov %121,407:mov %122,24:gosub *messagefont
	br
	$407@

	mov $408,"@@"
	mov $409,"uCVPIpaEHv"
	mov %120,408: mov %121,409:mov %122,24:gosub *messagefont
	br
	$409@

	mov $410,"@@"
	mov $411,"uskIv"
	mov $412,"@"
	mov $413,"@"
	mov $414,"@"
	mov $415,"@"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	mov %120,410: mov %121,420:mov %122,24:gosub *messagefont
	br
	$411\


	mov $401,"usCޏ𕽊pa֐^V貜iIAꉔv"
	mov %120,401: mov %121,401:mov %122,24:gosub *messagefont
	$401@

	mov $402,"@@"
	mov $403,"㓯wIԉ痎CIp⁗JB"
	mov %120,402: mov %121,403:mov %122,24:gosub *messagefont
	br
	$403@

	mov $404,"ԙnKijB"
	mov $405,"gމICBӑsHC"
	mov $406,"ݔǗޑ͏\CG܌^lB"
	mov %120,404: mov %121,406:mov %122,24:gosub *messagefont
	$404
	$405
	$406@

	mov $407,"@@"
	mov $408,"CAAԙnB"
	mov $409,"ގOlE퍬݈NB"
	mov %120,407: mov %121,409:mov %122,24:gosub *messagefont
	br
	$408
	$409@

	mov $410,"FÌVە\FC"
	mov $411,"̈E䐥ßC"
	mov $412,"\槈GtIlB"
	mov $413,"VFّFIhvssցB"
	mov $414,"@"
	mov $415,"@"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	mov %120,410: mov %121,420:mov %122,24:gosub *messagefont
	$410
	$411
	$412
	$413\


	mov $401,"YCݖ琥ρCƈNc䐄QC"
	mov $402,"ȍwExtB"
	mov %120,401: mov %121,402:mov %122,24:gosub *messagefont
	$401
	$402@

	mov $403,"ݑŁA}΁AJDccޛEƏ趗B"
	mov %120,403: mov %121,403:mov %122,24:gosub *messagefont
	$403@

	mov $404,"@@"
	mov $405,"uߑFIpas琥sIAEHv"
	mov %120,404: mov %121,405:mov %122,24:gosub *messagefont
	br
	$405@

	mov $406,"udV֓aIԎVC^ᑭIv"
	mov %120,406: mov %121,406:mov %122,24:gosub *messagefont
	$406@

	mov $407,"Fms{܏oϓIՁB"
	mov %120,407: mov %121,407:mov %122,24:gosub *messagefont
	$407@

	mov $408,"@r}MCs訌sC"
	mov $409,"VCވ_F퐴^B"
	mov %120,408: mov %121,409:mov %122,24:gosub *messagefont
	$408
	$409@

	mov $410,"@@"
	mov $411,"ccȁCˉC߁B"
	mov $412,"@"
	mov $413,"@"
	mov $414,"@"
	mov $415,"@"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	mov %120,410: mov %121,420:mov %122,24:gosub *messagefont
	br
	$411\

	textoff

	bg black,14
	wait 2000

	texton

	mov $401,"耓ꐔIZKꒆwB"
	mov %120,401: mov %121,401:mov %122,24:gosub *messagefont
	$401@

	mov $402,"PIC{CcIjCȋyoZjIpFB"
	mov %120,402: mov %121,402:mov %122,24:gosub *messagefont
	$402@

	mov $403,"ݜލAs^Iw@C"
	mov $404,"pUAfَAওI"
	mov $405,"|HIEB"
	mov %120,403: mov %121,405:mov %122,24:gosub *messagefont
	$403
	$404
	$405@

	mov $406,"adlٙrI@sLw蚈ЁB"
	mov $407,"VC@pYrCv\⋍ݐlVAsB"
	mov %120,406: mov %121,407:mov %122,24:gosub *messagefont
	$406
	$407@

	mov $408,"lՕz{SB"
	mov $409,"wZDCDCIːƁB"
	mov $410,"Uo荁CAĖsB"
	mov %120,408: mov %121,410:mov %122,24:gosub *messagefont
	$408
	$409
	$410@

	mov $411,"CVFFlaB"
	mov %120,411: mov %121,411:mov %122,24:gosub *messagefont
	$411@

	mov $412,"LƒrݛwqcXБOA甑FZnC"
	mov $413,"FlB"
	mov %120,412: mov %121,413:mov %122,24:gosub *messagefont
	$412
	$413@

	mov $414,"@@"
	mov $415,"lAlAlAlcc"
	mov $423,"CSslB"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	mov %120,414: mov %121,420:mov %122,24:gosub *messagefont
	mov %120,423: mov %121,423:mov %122,24:gosub *messagefont
	br
	$415@/
	$423/
	add $415,$423/
	\


	mov $401,"퓊ޔЁwl៑xIwFC"
	mov $402,"KlB"
	mov %120,401: mov %121,402:mov %122,24:gosub *messagefont
	$401
	$402@

	mov $403,"ޔАSNag̓skIlC퉨GB"
	mov %120,403: mov %121,403:mov %122,24:gosub *messagefont
	$403@

	mov $404,"C䓾ޘƌXGˍsB"
	mov $405,"CޔЍzC䐬iB"
	mov %120,404: mov %121,405:mov %122,24:gosub *messagefont
	$404
	$405@

	mov $406,"ϔ݋N}΁C"
	mov $407,"EIꕔB"
	mov $408,"@"
	mov $409,"@"
	mov $410,"@"
	mov $411,"@"
	mov $412,"@"
	mov $413,"@"
	mov $414,"@"
	mov $415,"@"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	mov %120,406: mov %121,420:mov %122,24:gosub *messagefont
	$406
	$407\

	windoweffect 10,500
	textoff
	bg black,14

	bg "cutin\cutin_03.jpg",14

	wait 3000

	bg "cutin\cutin_04.jpg",14

	wait 5000

;ʉFwZ̃`CEZi[vȂj
	dwave 2,"wave\chaim.wav"

;wiF@Vb^[tF[h
	bg "bg\aozora.jpg",26
	wait 4000

	bg "bg\gakkou_ground.jpg",14

	wait 3000

	bgm "bgm\free0257.mp3"
	windoweffect 10,500
	texton

	mov $401,"jCŉHыB"
	mov $402,"ޏAVICeB"
	mov %120,401: mov %121,402:mov %122,24:gosub *messagefont
	$401
	$402@

	mov $403,"HuIVayuIC՗IԁB"
	mov %120,403: mov %121,403:mov %122,24:gosub *messagefont
	$403@

	mov $404,"撅`IB"
	mov $405,"FEqlCnّŗB"
	mov %120,404: mov %121,405:mov %122,24:gosub *messagefont
	$404
	$405@

	mov $406,"@@"
	mov $407,"c쌦g@CFqҁB"
	mov $408,"ғI@klCƘ̑⋍ݑOra"
	mov $409,"@rIlᕪB"
	mov $410,"@"
	mov $411,"@"
	mov $412,"@"
	mov $413,"@"
	mov $414,"@"
	mov $415,"@"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	mov %120,406: mov %121,420:mov %122,24:gosub *messagefont
	br
	$407
	$408
	$409\


	mov $401,"R̈Vጎw܏C"
	mov $402,"FjAӒnCnpB"
	mov %120,401: mov %121,402:mov %122,24:gosub *messagefont
	$401
	$402@

	mov $403,"R\ȌrCFUB"
	mov %120,403: mov %121,403:mov %122,24:gosub *messagefont
	$403@

	mov $404,"㓯waԙnwIojSėeB"
	mov %120,404: mov %121,404:mov %122,24:gosub *messagefont
	$404@

	mov $405,"ٖʍRC}៉FIÚB"
	mov $406,"FEҁB"
	mov %120,405: mov %121,406:mov %122,24:gosub *messagefont
	$405
	$406@

;ʉFob
	dwave 2,"wave\bosu32.wav"
	QUAKE 10,200


	mov $407,"@@"
	mov $408,"CnCԙnwIAnhٕҌށB"
	mov %120,407: mov %121,408:mov %122,24:gosub *messagefont
	br
	$408@

	mov $409,"RCŒٕI꘢w@ߋN"
	mov $410,"CSZBWCB"
	mov $411,"@"
	mov $412,"@"
	mov $413,"@"
	mov $414,"@"
	mov $415,"@"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	mov %120,409: mov %121,420:mov %122,24:gosub *messagefont
	$409
	$410\


;ʉFob
	dwave 2,"wave\bosu32.wav"
	QUAKE 10,200


	mov $401,"ގ㐳ʐڏZߘC"
	mov $402,"R@ٕwڏWIn勎B"
	mov %120,401: mov %121,402:mov %122,24:gosub *messagefont
	$401
	$402@

;ʉFob
	dwave 2,"wave\bosu32.wav"
	QUAKE 10,200

	mov $403,"Cs甑FpڏZCyroIꈯC"
	mov $404,"ٕIꖼwB"
	mov %120,403: mov %121,404:mov %122,24:gosub *messagefont
	$403
	$404@

	mov $405,"sCCvN{ݒnIC"
	mov $406,"F񗈁B"
	mov %120,405: mov %121,406:mov %122,24:gosub *messagefont
	$405
	$406@

;ʉFob
	dwave 2,"wave\bosu32.wav"
	QUAKE 10,200

	mov $407,"Rٖ@ّICFӎlB"
	mov $408,"@"
	mov $409,"@"
	mov $410,"@"
	mov $411,"@"
	mov $412,"@"
	mov $413,"@"
	mov $414,"@"
	mov $415,"@"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	mov %120,407: mov %121,420:mov %122,24:gosub *messagefont
	$407\


	mov $401,"vNB"
	mov %120,401: mov %121,401:mov %122,24:gosub *messagefont
	$401@

	mov $402,"@C^Ð_E萓ICAAԙnOl"
	mov $403,"CUh៓IjS͗ʁB"
	mov %120,402: mov %121,403:mov %122,24:gosub *messagefont
	$402
	$403@

	mov $404,"ґR摼F䐥\lC甐ls[C"
	mov $405,"ޔWoIGܗ́C"
	mov $406,"smC甐lukρB"
	mov %120,404: mov %121,406:mov %122,24:gosub *messagefont
	$404
	$405
	$406@

	mov $407,"s[IƌFCprL_ߕ瑼FB"
	mov %120,407: mov %121,407:mov %122,24:gosub *messagefont
	$407@

	mov $408,"@@"
	mov $409,"sʔcQَC"
	mov $410,"ڕsZߔ̑ݓIB"
	mov %120,408: mov %121,410:mov %122,24:gosub *messagefont
	br
	$409
	$410@

	mov $411,"CnCAmvlىLҁB"
	mov %120,411: mov %121,411:mov %122,24:gosub *messagefont
	$411@

	mov $412,"蕉䎩ȖvYr҉B"
	mov %120,412: mov %121,412:mov %122,24:gosub *messagefont
	$412@

	mov $413,"B\ICTA"
	mov $414,"pȐg̏ÍCݐle@nB"
	mov $415,"@"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	mov %120,413: mov %121,420:mov %122,24:gosub *messagefont
	$413
	$414\


	mov $401,"ґR_CEڋߔB"
	mov $402,"oҌޓIKlslܐlEB"
	mov %120,401: mov %121,402:mov %122,24:gosub *messagefont
	$401
	$402@

	mov $403,"{vLYrnUgB"
	mov $404,"䔻fo꘢ŋNňSInCR@勎B"
	mov %120,403: mov %121,404:mov %122,24:gosub *messagefont
	$403
	$404@

	mov $405,"@@"
	mov $406,"Acc"
	mov %120,405: mov %121,406:mov %122,24:gosub *messagefont
	br
	$406@

;ʉFh
	dwave 2,"wave\hit_p04.wav"
	bgmfadeout 1
	bgmstop
	QUAKE 25,500


	mov $407,"p刍Ia꘢CÓIw㗹"
	mov $408,"㗹B"
	mov %120,407: mov %121,408:mov %122,24:gosub *messagefont
	$407
	$408@

	mov $409,"tIߘwClI߁B"
	mov %120,409: mov %121,409:mov %122,24:gosub *messagefont
	$409@

;ʉFob
	dwave 2,"wave\bosu32.wav"
	QUAKE 10,200

	mov $410,"ٕICa刓Iw"
	mov %120,410: mov %121,410:mov %122,24:gosub *messagefont
	$410@

	mov $411,"ICR@{nB"
	mov $412,"@"
	mov $413,"@"
	mov $414,"@"
	mov $415,"@"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	mov %120,411: mov %121,420:mov %122,24:gosub *messagefont
	$411\

	textoff

	bg "bg\gakkou_ground_bure.jpg",1

;	G\FDP@ʏ@ʒuF
	ld c,":a;tatie\yuuki\taisou_tuujyou.bmp",0
	print 11

	texton

	mov $401,"uccٕsNBv"
	mov %120,401: mov %121,401:mov %122,24:gosub *messagefont
	$401@

	mov $402,"@@"
	mov $403,"ސӊOB"
	mov $404,"IC"
	mov $405,"qlsSNB"
	mov %120,402: mov %121,405:mov %122,24:gosub *messagefont
	br
	$403
	$404
	$405@

	mov $406,"ccAρB"
	mov %120,406: mov %121,406:mov %122,24:gosub *messagefont
	$406@

	mov $407,"߁CґRρC"
	mov $408,"A֐uȘ֗C]B"
	mov %120,407: mov %121,408:mov %122,24:gosub *messagefont
	$407
	$408@

	mov $409,"@@"
	mov $410,"RC䓹]擡cI\pcc"
	mov %120,409: mov %121,410:mov %122,24:gosub *messagefont
	br
	$410@

	mov $411,"ܓxIۓ{B"
	mov %120,411: mov %121,411:mov %122,24:gosub *messagefont
	$411@

	mov $412,"ًNCyN@"
	mov $413,"pЉI\B"
	mov %120,412: mov %121,413:mov %122,24:gosub *messagefont
	$412
	$413@

	mov $414,"ފ_ccaB"
	mov $423,"ӛΓވ_CEB"
	mov %120,414: mov %121,414:mov %122,24:gosub *messagefont
	mov %120,423: mov %121,423:mov %122,24:gosub *messagefont
	$414@/
	$423/
	add $414,$423/
	@

	mov $415,"@@"
	mov $416,"u`IIv"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	mov %120,415: mov %121,420:mov %122,24:gosub *messagefont
	br
	$416\

	textoff


;ʉFYKb

	dwave 2,"wave\hit76_d.wav"
	ld c,":a;tatie\yuuki\taisou_damage1.bmp",1
	QUAKE 50,500

	wait 1000

	bgm "bgm\free39.mp3"

	texton


	mov $401,"{CIځB"
	mov $402,"ޔЕsŉ˓IlC{smr爯B"
	mov %120,401: mov %121,402:mov %122,24:gosub *messagefont
	$401
	$402@

	mov $403,"BBӓӒnꉺBꐺƓIkNCt⁕ՑSgB"
	mov %120,403: mov %121,403:mov %122,24:gosub *messagefont
	$403@

	mov $404,"VIC甐lEsZzNI莒ɁB"
	mov %120,404: mov %121,404:mov %122,24:gosub *messagefont
	$404@

	mov $405,"@@"
	mov $406,"ueccIv"
	mov %120,405: mov %121,406:mov %122,24:gosub *messagefont
	br
	$406@

	mov $407,"@@"
	mov $408,"uߜމƌCdVIv"
	mov %120,407: mov %121,408:mov %122,24:gosub *messagefont
	br
	$408@

;ʉFh
	dwave 2,"wave\hit_p04.wav"
	QUAKE 50,500

	mov $409,"@@"
	mov $410,"^螏Z璆InC"
	mov $411,"EuɁCpe\nc䐄cB"
	mov %120,409: mov %121,411:mov %122,24:gosub *messagefont
	br
	$410
	$411@

	mov $412,"pv󈻓IEڌ~ZǵC"
	mov $413,"ZvLד|B"
	mov %120,412: mov %121,413:mov %122,24:gosub *messagefont
	$412
	$413@

	mov $414,"@@"
	mov $415,"uٕsNccٕsNccIv"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	mov %120,414: mov %121,420:mov %122,24:gosub *messagefont
	br
	$415\


	mov $401,"ϒCsn]B"
	mov %120,401: mov %121,401:mov %122,24:gosub *messagefont
	$401@

	mov $402,"˖ܗCޑӊOB"
	mov $403,"vLmӁC"
	mov $404,"ޖs꘢vǋጔCIvB"
	mov %120,402: mov %121,404:mov %122,24:gosub *messagefont
	$402
	$403
	$404@

	mov $405,"ACޔЍ|៓l͓Il"
	mov $406,"pcҌޓI͓NhB"
	mov %120,405: mov %121,406:mov %122,24:gosub *messagefont
	$405
	$406@

	mov $407,"ވ_CA甉ጜݗB"
	mov %120,407: mov %121,407:mov %122,24:gosub *messagefont
	$407@

	mov $408,"@@"
	mov $409,"vLlj~NB"
	mov %120,408: mov %121,409:mov %122,24:gosub *messagefont
	br
	$409@

	mov $410,"vLlΉB"
	mov %120,410: mov %121,410:mov %122,24:gosub *messagefont
	$410@

	mov $411,"vLۓ{CvĹB"
	mov $412,"IڌC󓞗⍓IwӉyxӝB"
	mov $413,"@"
	mov $414,"@"
	mov $415,"@"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	mov %120,411: mov %121,420:mov %122,24:gosub *messagefont
	$411
	$412\


	mov $401,"sKIKC퐄CIu甉aV"
	mov $402,"fC꘢r槕sI餁B"
	mov %120,401: mov %121,402:mov %122,24:gosub *messagefont
	$401
	$402@

	mov $403,"cˑRkۓ{asxI\C"
	mov $404,"AvL\ovsϋߓIώqB"
	mov %120,403: mov %121,404:mov %122,24:gosub *messagefont
	$403
	$404@

	mov $405,"@@"
	mov $406,"śfCNՒI\C"
	mov $407,"OB"
	mov $408,"ߗ틅oǓIlInB"
	mov %120,405: mov %121,408:mov %122,24:gosub *messagefont
	br
	$406
	$407
	$408@

	mov $409,"@@"
	mov $410,"rȁCꎟāB"
	mov $411,"C刓̓IdtCޛEZ֋XIB"
	mov %120,409: mov %121,411:mov %122,24:gosub *messagefont
	br
	$410
	$411@

	mov $412,"ccNCZ֋XIB"
	mov $413,"@"
	mov $414,"@"
	mov $415,"@"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	mov %120,412: mov %121,420:mov %122,24:gosub *messagefont
	$412\

	textoff

	cl c,0
	bg "bg\gakkou_ground.jpg",12

	texton


	mov $401,"ԙnwNC"
	mov $402,"gFӍ@CdVCnpB"
	mov %120,401: mov %121,402:mov %122,24:gosub *messagefont
	$401
	$402@

	mov $403,"@iClC"
	mov $404,"IÓxꉺqƉB"
	mov %120,403: mov %121,404:mov %122,24:gosub *messagefont
	$403
	$404@

	mov $405,"svhݐʓIUC"
	mov $406,"ֈCoǓIwF݊OC"
	mov $407,"Klx鐗RUOxSʓIUB"
	mov %120,405: mov %121,407:mov %122,24:gosub *messagefont
	$405
	$406
	$407@

	mov $408,"ޘٕܖ琥ρCȑossŚB"
	mov %120,408: mov %121,408:mov %122,24:gosub *messagefont
	$408@

	mov $409,"@@"
	mov $410,"UdleqI៊CfssʗB"
	mov %120,409: mov %121,410:mov %122,24:gosub *messagefont
	br
	$410@

	mov $411,"CH͍XeՐC߁C"
	mov $412,"UCC甖ߕUI៊XLB"
	mov $413,"@"
	mov $414,"@"
	mov $415,"@"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	mov %120,411: mov %121,420:mov %122,24:gosub *messagefont
	$411
	$412\


	mov $401,"糒uɓIrC筎B"
	mov %120,401: mov %121,401:mov %122,24:gosub *messagefont
	$401@

	mov $402,"AڏZABޔЍUh]ĎqB"
	mov %120,402: mov %121,402:mov %122,24:gosub *messagefont
	$402@

	mov $403,"@ԙnwhOI㓯w"
	mov %120,403: mov %121,403:mov %122,24:gosub *messagefont
	$403@

	mov $404,"@@"
	mov $405,"cccB"
	mov %120,404: mov %121,405:mov %122,24:gosub *messagefont
	br
	$405@

	mov $406,"cccccB"
	mov %120,406: mov %121,406:mov %122,24:gosub *messagefont
	$406@

	mov $407,"@@"
	mov $408,"u㱁C䊮Svt^ېYrB"
	mov %120,407: mov %121,408:mov %122,24:gosub *messagefont
	br
	$408@

	mov $409,"ړICۏo^АMC"
	mov $410,"Rch{ғICB"
	mov $411,"@"
	mov $412,"@"
	mov $413,"@"
	mov $414,"@"
	mov $415,"@"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	mov %120,409: mov %121,420:mov %122,24:gosub *messagefont
	$409
	$410\


	mov $401,"s\JB"
	mov %120,401: mov %121,401:mov %122,24:gosub *messagefont
	$401@

	mov $402,"ݜޘِ荤IpC"
	mov $403,"RchٕCޖ瑾掗B"
	mov %120,402: mov %121,403:mov %122,24:gosub *messagefont
	$402
	$403@

	mov $404,"@@"
	mov $405,"C藢勅ICC"
	mov $406,"I^ӝB"
	mov %120,404: mov %121,406:mov %122,24:gosub *messagefont
	br
	$405
	$406@

	mov $407,"|s๘nŌCIo꘢ݓIΗeB"
	mov %120,407: mov %121,407:mov %122,24:gosub *messagefont
	$407@

	mov $408,"AVFICcB"
	mov $409,"ጲρCmIΗeB"
	mov %120,408: mov %121,409:mov %122,24:gosub *messagefont
	$408
	$409@

	mov $410,"c⁏oIŒΗNB"
	mov %120,410: mov %121,410:mov %122,24:gosub *messagefont
	$410@

	mov $411,"@@"
	mov $412,"cc"
	mov $423,"C䖾B"
	mov %120,411: mov %121,412:mov %122,24:gosub *messagefont
	mov %120,423: mov %121,423:mov %122,24:gosub *messagefont
	br
	$412@/
	$423/
	add $412,$423/
	@

	mov $413,"̈甉䐬CߓIcc"
	mov %120,413: mov %121,413:mov %122,24:gosub *messagefont
	$413@

	mov $414,"IڎC֖vLBB"
	mov $415,"@"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	mov %120,414: mov %121,420:mov %122,24:gosub *messagefont
	$414\

	textoff

;ʉF͂
	dwave 2,"wave\hit78.wav"
	QUAKE 20,200

	bg "bg\gakkou_ground_bure.jpg",1

	ld c,":a;tatie\yuuki\taisou_odoroki.bmp",12


	texton


	mov $401,"ˑRCw@SZB"
	mov %120,401: mov %121,401:mov %122,24:gosub *messagefont
	$401@

	mov $402,"gsp񔈖mccԙnwB"
	mov %120,402: mov %121,402:mov %122,24:gosub *messagefont
	$402@

	mov $403,"Ig̔ŒZCo픽w@B"
	mov %120,403: mov %121,403:mov %122,24:gosub *messagefont
	$403@

	mov $404,"݉ʑOC\ICC"
	mov $405,"ΓCSB"
	mov %120,404: mov %121,405:mov %122,24:gosub *messagefont
	$404
	$405@

	mov $406,"݁C@ʑ嗈Iԁcc"
	mov $407,"ٖ@Cٖ@hB"
	mov %120,406: mov %121,407:mov %122,24:gosub *messagefont
	$406
	$407@

	QUAKE 20,200

	mov $408,"@@"
	mov $409,"aÐǵB"
	mov $423,"agB"
	mov %120,408: mov %121,409:mov %122,24:gosub *messagefont
	mov %120,423: mov %121,423:mov %122,24:gosub *messagefont
	br
	$409@/
	QUAKE 20,200
	$423/
	add $409,$423/
	@/
	mov $423,"wvEޘB"
	mov %120,423: mov %121,423:mov %122,24:gosub *messagefont
	QUAKE 20,200
	$423/
	add $409,$423/
	@

	mov $410,"̊iA͗ʁA^Ð_EB"
	mov $411,"k^C@Iʓss@ԙnwB"
	mov %120,410: mov %121,411:mov %122,24:gosub *messagefont
	$410
	$411@

	mov $412,"AC@ݔ퓊Iԁcc"
	mov $423,"퓊Iԁcc"
	mov $413,"@"
	mov $414,"@"
	mov $415,"@"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	mov %120,412: mov %121,420:mov %122,24:gosub *messagefont
	mov %120,423: mov %121,423:mov %122,24:gosub *messagefont
	$412@/
	$423/
	add $412,$423/
	\


	mov $401,"A݉vHIڌC"
	mov $402,"fo竍@啝xڋN]ICB"
	mov %120,401: mov %121,402:mov %122,24:gosub *messagefont
	$401
	$402@

	mov $403,"ώqvLŎZ艺B"
	mov %120,403: mov %121,403:mov %122,24:gosub *messagefont
	$403@

	mov $404,"@@"
	mov $405,"uށC≺ccIv"
	mov $406,"@"
	mov $407,"@"
	mov $408,"@"
	mov $409,"@"
	mov $410,"@"
	mov $411,"@"
	mov $412,"@"
	mov $413,"@"
	mov $414,"@"
	mov $415,"@"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	mov %120,404: mov %121,420:mov %122,24:gosub *messagefont
	br
	$405\

	textoff

;ʉFYhIb
	dwave 2,"wave\hit_p03_a.wav"
	ld c,":a;tatie\yuuki\taisou_damage1.bmp",1
	QUAKE 50,500
	wait 3000

	texton

	mov $401,"tؐICbŋßBB"
	mov %120,401: mov %121,401:mov %122,24:gosub *messagefont
	$401@

	mov $402,"@@"
	mov $403,"uccccācccIv"
	mov %120,402: mov %121,403:mov %122,24:gosub *messagefont
	br
	$403@

	mov $404,"@@"
	mov $405,"͌ЗIccbs埃B"
	mov $406,"틅I⁗ГISB"
	mov %120,404: mov %121,406:mov %122,24:gosub *messagefont
	br
	$405
	$406@

	mov $407,"@@"
	mov $408,"ueccPPccccIv"
	mov %120,407: mov %121,408:mov %122,24:gosub *messagefont
	br
	$408@

	mov $409,"@@"
	mov $410,"݌ċz튯dV^ICuɊșɑSgB"
	mov %120,409: mov %121,410:mov %122,24:gosub *messagefont
	br
	$410@

	mov $411,"LICߔݏd}IuɊB"
	mov %120,411: mov %121,411:mov %122,24:gosub *messagefont
	$411@

	mov $412,"C]赓w@C"
	mov $413,"蕗p苎ZssB"
	mov $414,"@"
	mov $415,"@"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	mov %120,412: mov %121,420:mov %122,24:gosub *messagefont
	$412
	$413\


	mov $401,"Acc"
	mov %120,401: mov %121,401:mov %122,24:gosub *messagefont
	$401@

	mov $402,"CYr藁ccCYr֔\⋒B"
	mov %120,402: mov %121,402:mov %122,24:gosub *messagefont
	$402@

	mov $403,"|󓞚bs埃IdB"
	mov $404,"ʗ܁Cޔ莒ɉ甐l~sZ窍B"
	mov %120,403: mov %121,404:mov %122,24:gosub *messagefont
	$403
	$404@

	mov $405,"p⋒B"
	mov $423,"픗⋒B"
	mov %120,405: mov %121,405:mov %122,24:gosub *messagefont
	mov %120,423: mov %121,423:mov %122,24:gosub *messagefont
	$405@/
	$423/
	add $405,$423/
	@

	mov $406,"ԙnw}C֕|⋒B"
	mov %120,406: mov %121,406:mov %122,24:gosub *messagefont
	$406@

	mov $407,"CYrcc"
	mov %120,407: mov %121,407:mov %122,24:gosub *messagefont
	$407@

	mov $408,"@@"
	mov $409,"cccI"
	mov %120,408: mov %121,409:mov %122,24:gosub *messagefont
	br
	$409@

	mov $410,"@@"
	mov $411,"ccFB"
	mov %120,410: mov %121,411:mov %122,24:gosub *messagefont
	br
	$411@

	mov $412,"ߘ䕠@{ݒnÓIB"
	mov %120,412: mov %121,412:mov %122,24:gosub *messagefont
	$412@

	mov $413,"ߑNIB"
	mov %120,413: mov %121,413:mov %122,24:gosub *messagefont
	$413@

	mov $414,"NIl]IÍCcB"
	mov %120,414: mov %121,414:mov %122,24:gosub *messagefont
	$414@

	mov $415,"yN递ڌIoB"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	mov %120,415: mov %121,420:mov %122,24:gosub *messagefont
	$415\


	mov $401,"s\B"
	mov %120,401: mov %121,401:mov %122,24:gosub *messagefont
	$401@

	mov $402,"݊OINB"
	mov $403,"CҗFIcQCލ{s\B"
	mov %120,402: mov %121,403:mov %122,24:gosub *messagefont
	$402
	$403@

	mov $404,"ޛEsB"
	mov %120,404: mov %121,404:mov %122,24:gosub *messagefont
	$404@

	mov $405,"@@"
	mov $406,"ccC孍򑁏AE|cc"
	mov %120,405: mov %121,406:mov %122,24:gosub *messagefont
	br
	$406@

	mov $407,"NchCNC"
	mov $408,"ԙnwcZB"
	mov %120,407: mov %121,408:mov %122,24:gosub *messagefont
	$407
	$408@

	mov $409,"ډCvzQIlCcQAsB"
	mov %120,409: mov %121,409:mov %122,24:gosub *messagefont
	$409@

	mov $410,"vLl~B"
	mov $411,"ߍsQ^IlC⍓n]wӉyxB"
	mov %120,410: mov %121,411:mov %122,24:gosub *messagefont
	$410
	$411@

	mov $412,"@@"
	mov $413,"ޛEsB"
	mov %120,412: mov %121,413:mov %122,24:gosub *messagefont
	br
	$413@

	mov $414,"EsB"
	mov %120,414: mov %121,414:mov %122,24:gosub *messagefont
	$414@

	mov $415,"Escc"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	mov %120,415: mov %121,420:mov %122,24:gosub *messagefont
	$415/
	mov %191,1
	\
	mov %191,0

	textoff

;ʉFhKAAb
	dwave 2,"wave\hit_p03_a.wav"
	drawfill 255,255,255 : draw
	wait 200
	repaint

	ld c,":a;tatie\yuuki\taisou_damage2.bmp",1
	QUAKE 25,500
	wait 3000

;ʉFhTb
	dwave 2,"wave\ClothC.wav"
	cl c,1
	QUAKE 25,200
	wait 3000

	bgmfadeout 3000
	bgmstop
	bg "bg\gakkou_ground.jpg",16

	texton


	mov $401,"訏I˗瞏oΉԁB"
	mov %120,401: mov %121,401:mov %122,24:gosub *messagefont
	$401@

	mov $402,"NoICڈIcccEc礁B"
	mov %120,402: mov %121,402:mov %122,24:gosub *messagefont
	$402@

	mov $403,"Aϔ풼ȗoC"
	mov $404,"Ig̔ԙnw磗oB"
	mov %120,403: mov %121,404:mov %122,24:gosub *messagefont
	$403
	$404@

	mov $405,"@@"
	mov $406,"DɁcc"
	mov $423,"DɍDɍDɍDɍDɍDɍDɍDɍDɁB"
	mov %120,405: mov %121,406:mov %122,24:gosub *messagefont
	mov %120,423: mov %121,423:mov %122,24:gosub *messagefont
	br
	$406@/
	$423/
	add $406,$423/
	@

	mov $407,"AcAc礁ACI{C"
	mov $408,"׍ݒnInA݁C֗LSB"
	mov %120,407: mov %121,408:mov %122,24:gosub *messagefont
	$407
	$408@

	mov $409,"Й{甐lۋI莒睈B"
	mov %120,409: mov %121,409:mov %122,24:gosub *messagefont
	$409@

	mov $410,"uɘasÉ쟣CᒆOoB"
	mov $411,"ٜuɁCᚋJC\EρB"
	mov $412,"@"
	mov $413,"@"
	mov $414,"@"
	mov $415,"@"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	mov %120,410: mov %121,420:mov %122,24:gosub *messagefont
	$410
	$411\


	mov $401,"INCs吥䓳NB"
	mov $402,"Aώ߁B"
	mov %120,401: mov %121,402:mov %122,24:gosub *messagefont
	$401
	$402@

	mov $403,"CρCAA퐄|C"
	mov $404,"픽o]@pQIacC"
	mov $405,"ō@֔׍ݗnB"
	mov %120,403: mov %121,405:mov %122,24:gosub *messagefont
	$403
	$404
	$405@

	mov $406,"CވؓsېݏLjVcc"
	mov %120,406: mov %121,406:mov %122,24:gosub *messagefont
	$406@

	mov $407,"@@"
	mov $408,"ccsCsjB"
	mov %120,407: mov %121,408:mov %122,24:gosub *messagefont
	br
	$408@

	mov $409,"埣͌ГIC"
	mov $410,"œcrڍ݈NܒYrI"
	mov $411,"FIgeB"
	mov %120,409: mov %121,411:mov %122,24:gosub *messagefont
	$409
	$410
	$411@

	mov $412,"ݓNVOcc"
	mov $413,"ߍpFIFB"
	mov %120,412: mov %121,413:mov %122,24:gosub *messagefont
	$412
	$413@

	mov $414,"\F皒◹HыÁC"
	mov $415,"ݜyេB"
	mov %120,414: mov %121,415:mov %122,24:gosub *messagefont
	$414
	$415@

	mov $416,"@@"
	mov $417,"A܁C\Fœcc؁B"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	mov %120,416: mov %121,420:mov %122,24:gosub *messagefont
	br
	$417\


	mov $401,"ccCœB"
	mov %120,401: mov %121,401:mov %122,24:gosub *messagefont
	$401@

	mov $402,"|ً^C\FœB"
	mov %120,402: mov %121,402:mov %122,24:gosub *messagefont
	$402@

	mov $403,"CCߊŁCߍFcc"
	mov $423,"ݏΛB"
	mov %120,403: mov %121,403:mov %122,24:gosub *messagefont
	mov %120,423: mov %121,423:mov %122,24:gosub *messagefont
	$403@/
	$423/
	add $403,$423/
	@

	mov $404,"Œ㏬qIC"
	mov $405,"\FݏΛB"
	mov %120,404: mov %121,405:mov %122,24:gosub *messagefont
	$404
	$405@

	mov $406,"@@"
	mov $407,"Fߗ⍓IڌaΗeB"
	mov $408,"\FIg@C꘢̊isIjlcc"
	mov $409,"̈V嗈B"
	mov %120,406: mov %121,409:mov %122,24:gosub *messagefont
	br
	$407
	$408
	$409@

	mov $410,"ŗCfӓB"
	mov %120,410: mov %121,410:mov %122,24:gosub *messagefont
	$410@

	mov $411,"@@"
	mov $412,"u݁CrHvJHv"
	mov %120,411: mov %121,412:mov %122,24:gosub *messagefont
	br
	$412@

	mov $413,"@@"
	mov $414,"VCA嗈}ZB"
	mov %120,413: mov %121,414:mov %122,24:gosub *messagefont
	br
	$414@

	mov $415,"@@"
	mov $416,"ucEHœc㗹EHv"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	mov %120,415: mov %121,420:mov %122,24:gosub *messagefont
	br
	$416\


	mov $401,"usDӎv`sSœ`v"
	mov %120,401: mov %121,401:mov %122,24:gosub *messagefont
	$401@

	mov $402,"@@"
	mov $403,"CNoꕛ]I\CV]B"
	mov %120,402: mov %121,403:mov %122,24:gosub *messagefont
	br
	$403@

	mov $404,"R\@snTqC^ЊQB"
	mov %120,404: mov %121,404:mov %122,24:gosub *messagefont
	$404@

	mov $405,"RCIwYrsv܁BvLl珘I^B"
	mov %120,405: mov %121,405:mov %122,24:gosub *messagefont
	$405@

	mov $406,"ccܕsoB"
	mov %120,406: mov %121,406:mov %122,24:gosub *messagefont
	$406@

	mov $407,"ȁCVSMߘqB"
	mov %120,407: mov %121,407:mov %122,24:gosub *messagefont
	$407@

	mov $408,"@@"
	mov $409,"sccBVӛE@uCNݎTqB"
	mov %120,408: mov %121,409:mov %122,24:gosub *messagefont
	br
	$409@

	mov $410,"ACVF䐥孏͐xsB"
	mov %120,410: mov %121,410:mov %122,24:gosub *messagefont
	$410@

	mov $411,"A蕜ވʑ̈VccߊŁB"
	mov $412,"@"
	mov $413,"@"
	mov $414,"@"
	mov $415,"@"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	mov %120,411: mov %121,420:mov %122,24:gosub *messagefont
	$411\


	mov $401,"uӓ_CkaICsvycB"
	mov %120,401: mov %121,401:mov %122,24:gosub *messagefont
	$401@

	mov $402,"݉Iی玁Iv"
	mov %120,402: mov %121,402:mov %122,24:gosub *messagefont
	$402@

	mov $403,"@@"
	mov $404,"ICQIcB"
	mov $405,"ޔЎkFB"
	mov %120,403: mov %121,405:mov %122,24:gosub *messagefont
	br
	$404
	$405@

	mov $406,"rXlccىF܁C٘Vܓs@B"
	mov %120,406: mov %121,406:mov %122,24:gosub *messagefont
	$406@

	mov $407,"CrC㱗CƓsY㈁BؓsklB"
	mov %120,407: mov %121,407:mov %122,24:gosub *messagefont
	$407@

	mov $408,"@@"
	mov $409,"zIی玓Ie}CCB"
	mov %120,408: mov %121,409:mov %122,24:gosub *messagefont
	br
	$409@

	mov $410,"ډCّn]JB"
	mov %120,410: mov %121,410:mov %122,24:gosub *messagefont
	$410@

	mov $411,"@@"
	mov $412,"ccψ؏A\ÝٔgnKxBcc"
	mov $413,"@"
	mov $414,"@"
	mov $415,"@"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	mov %120,411: mov %121,420:mov %122,24:gosub *messagefont
	br
	$412\


	textoff

	cl c,0
	bg black,16

	texton


	mov $401,"LŕsFI孍򑶍݁B"
	mov %120,401: mov %121,401:mov %122,24:gosub *messagefont
	$401@

	mov $402,"݉FVi葭I孍B"
	mov %120,402: mov %121,402:mov %122,24:gosub *messagefont
	$402@

	mov $403,"@@"
	mov $404,"CQ^ٖ߉C~CB"
	mov %120,403: mov %121,404:mov %122,24:gosub *messagefont
	br
	$404@

	mov $405,"@pYr@Qg̓IIʓsȁC"
	mov $406,"BAjߎLIismB"
	mov %120,405: mov %121,406:mov %122,24:gosub *messagefont
	$405
	$406@

	mov $407,"߉\uޜkcC"
	mov $408,"ATCl甉FQ^I"
	mov $409,"ww៑xˍXcB"
	mov %120,407: mov %121,409:mov %122,24:gosub *messagefont
	$407
	$408
	$409@

	mov $410,"CF܉FCvdlIlC"
	mov $411,"C甎ওXcc"
	mov %120,410: mov %121,411:mov %122,24:gosub *messagefont
	$410
	$411@

	mov $412,"@@"
	mov $413,"ȁCFC៑IЕ"
	mov $414,"ڎ󗹛B"
	mov %120,412: mov %121,414:mov %122,24:gosub *messagefont
	br
	$413
	$414@

	mov $415,"ސ牁B"
	mov $416,"C^IϒABlsI爉B"
	mov %120,415: mov %121,416:mov %122,24:gosub *messagefont
	$415
	$416@

	mov $417,"mH@߁H@ccsvB"
	mov %120,417: mov %121,417:mov %122,24:gosub *messagefont
	$417@

	mov $418,"@ʗLߔЗ@CA៑wB"
	mov $419,"@"
	mov $420,"@"
	mov %120,418: mov %121,420:mov %122,24:gosub *messagefont
	$418\


	mov $401,"CsQ^Il\ӉyB"
	mov %120,401: mov %121,401:mov %122,24:gosub *messagefont
	$401@

	mov $402,"s\熎|HI@B"
	mov $403,"@SnCIow_xC"
	mov $404,"ȏAC߁C{B"
	mov %120,402: mov %121,404:mov %122,24:gosub *messagefont
	$402
	$403
	$404@

	mov $405,"A퍢ݒw㤏I嚒C"
	mov $406,"灈嚒pz~ρB"
	mov %120,405: mov %121,406:mov %122,24:gosub *messagefont
	$405
	$406@

	mov $407,"ߔЋ忓ICsB"
	mov $408,"ȁCvɎȓIA槗B"
	mov %120,407: mov %121,408:mov %122,24:gosub *messagefont
	$407
	$408@

	mov $409,"XvCLl{ғIԁC"
	mov $410,"َȗܐ瀓ȍKIC"
	mov $411,"悒nڎفB"
	mov %120,409: mov %121,411:mov %122,24:gosub *messagefont
	$409
	$410
	$411@

	mov $412,"ccޏA孍IB"
	mov $413,"@"
	mov $414,"@"
	mov $415,"@"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	mov %120,412: mov %121,420:mov %122,24:gosub *messagefont
	$412\


	mov $401,"OCls熉FIB"
	mov %120,401: mov %121,401:mov %122,24:gosub *messagefont
	$401@

	mov $402,"ClsB\͑݁B"
	mov %120,402: mov %121,402:mov %122,24:gosub *messagefont
	$402@

	mov $403,"܉Fw蚁AdlAݑϒC"
	mov $404,"psBڈQlB"
	mov %120,403: mov %121,404:mov %122,24:gosub *messagefont
	$403
	$404@

	mov $405,"CޔЖIwʎqx"
	mov $406,"@ʉFI爉jCFٖ@ڎIB"
	mov %120,405: mov %121,406:mov %122,24:gosub *messagefont
	$405
	$406@

	mov $407,"@@"
	mov $408,"ȁCF٘lF"
	mov $409,"lݒsIw牁xB"
	mov %120,407: mov %121,409:mov %122,24:gosub *messagefont
	br
	$408
	$409@

	mov $410,"ÍUICv\lFŕsInC"
	mov $411,"󊎗vSslF@uB"
	mov %120,410: mov %121,411:mov %122,24:gosub *messagefont
	$410
	$411@

	mov $412,"gȔ퓖ߎ󓞍UC"
	mov $413,"glFcޔ牏Cw\xȟጁC"
	mov $414,"Loܗvm~߁cc"
	mov %120,412: mov %121,414:mov %122,24:gosub *messagefont
	$412
	$413
	$414@

	mov $415,"Fsّl܏o^B"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	mov %120,415: mov %121,420:mov %122,24:gosub *messagefont
	$415\


	mov $401,"FmB"
	mov %120,401: mov %121,401:mov %122,24:gosub *messagefont
	$401@

	mov $402,"Cُw៑ޔЌݑϒڎ牓ImB"
	mov %120,402: mov %121,402:mov %122,24:gosub *messagefont
	$402@

	mov $403,"LlslC笕s\MCClB"
	mov %120,403: mov %121,403:mov %122,24:gosub *messagefont
	$403@

	mov $404,"@@"
	mov $405,"FmB"
	mov %120,404: mov %121,405:mov %122,24:gosub *messagefont
	br
	$405@

	mov $406,"틳ܒlA勎㝳oImB"
	mov %120,406: mov %121,406:mov %122,24:gosub *messagefont
	$406@

	mov $407,"@@"
	mov $408,"FmB"
	mov $423,"mB"
	mov %120,407: mov %121,408:mov %122,24:gosub *messagefont
	mov %120,423: mov %121,423:mov %122,24:gosub *messagefont
	br
	$408@/
	$423/
	add $408,$423/
	@/
	$423/
	add $408,$423/
	mov $409,"@"
	mov $410,"@"
	mov $411,"@"
	mov $412,"@"
	mov $413,"@"
	mov $414,"@"
	mov $415,"@"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	mov %120,409: mov %121,420:mov %122,24:gosub *messagefont
	\

	textoff


;

;ʁFSd}iʏj
	mov %42,2
	gosub *sindenzu

;

	wait 2000


	bg "bg\morioka_sity03.jpg",14

	bgm "bgm\free0518.mp3"
	wait 3000

	texton


	mov $401,"✺͊ݐB"
	mov %120,401: mov %121,401:mov %122,24:gosub *messagefont
	$401@

	mov $402,"@knI~VkB"
	mov $403,"{CsA~Iᕢ᳁B"
	mov %120,402: mov %121,403:mov %122,24:gosub *messagefont
	$402
	$403@

	mov $404,"@@"
	mov $405,"ŒFI[}ݓRC"
	mov $406,"zݕ֗XyI؎OC"
	mov $407,"p򐅔ctݗB"
	mov %120,404: mov %121,407:mov %122,24:gosub *messagefont
	br
	$405
	$406
	$407@

	mov $408,"ݜމh}lIu`CVIxB"
	mov %120,408: mov %121,408:mov %122,24:gosub *messagefont
	$408@

	mov $409,"{nihC"
	mov $410,"ACM{bC"
	mov $411,"{v@DDiB"
	mov %120,409: mov %121,411:mov %122,24:gosub *messagefont
	$409
	$410
	$411@

	mov $412,"@@"
	mov $413,"VIcc"
	mov $423,"zNAuScc"
	mov %120,412: mov %121,413:mov %122,24:gosub *messagefont
	mov %120,423: mov %121,423:mov %122,24:gosub *messagefont
	br
	$413@/
	$423/
	add $413,$423/
	@

	mov $414,"sccݐh㱁B"
	mov %120,414: mov %121,414:mov %122,24:gosub *messagefont
	$414@

	mov $415,"C\DDHCŒOIiCcߍY{JB"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	mov %120,415: mov %121,420:mov %122,24:gosub *messagefont
	$415\


	mov $401,"ZIqCAݓߍRr߁B"
	mov $402,"IɖqD擓IАÑB"
	mov %120,401: mov %121,402:mov %122,24:gosub *messagefont
	$401
	$402@

	mov $403,"pݐ{jHCpSlB"
	mov $404,"ݑqCFƐFIc玉ƒC"
	mov $405,"CƐqoݜޘƒB"
	mov %120,403: mov %121,405:mov %122,24:gosub *messagefont
	$403
	$404
	$405@

	mov $406,"ޓꐥK^֐sK藁cc"
	mov %120,406: mov %121,406:mov %122,24:gosub *messagefont
	$406@

	mov $407,"ґRswqρCKl福q눽`ޔ"
	mov $408,"wrDIxCs󑴑C"
	mov $409,"ApKlpSZȓIB"
	mov %120,407: mov %121,409:mov %122,24:gosub *messagefont
	$407
	$408
	$409@

	mov $410,"@@"
	mov $411,"Cpݐ{gSCIʁC"
	mov $412,"ى\kI]B"
	mov %120,410: mov %121,412:mov %122,24:gosub *messagefont
	br
	$411
	$412@

	mov $413,"wܔNtNCA푗J蚔ǁC"
	mov $414,"퐄IwB"
	mov $415,"@"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	mov %120,413: mov %121,420:mov %122,24:gosub *messagefont
	$413
	$414\

	textoff

	wait 2000

	bg "bg\jyuku.jpg",26

	wait 2000


	mov $401,"uccA܁Cޘuׂ͂vsipIccv"
	mov %120,401: mov %121,401:mov %122,24:gosub *messagefont
	$401@

	mov $402,"@@"
	mov $403,"J蚔ǓICߘZ_CnB"
	mov %120,402: mov %121,403:mov %122,24:gosub *messagefont
	br
	$403@

	mov $404,"䍿݋IpCCm㈖{C"
	mov $405,"\^יߘVIB"
	mov %120,404: mov %121,405:mov %122,24:gosub *messagefont
	$404
	$405@

	mov $406,"@@"
	mov $407,"vցCޏA䘸wNA꒼IJ蚔ǁB"
	mov $408,"ꓞ܁CVsޗCB"
	mov %120,406: mov %121,408:mov %122,24:gosub *messagefont
	br
	$407
	$408@

	mov $409,"wCIޘJ蚔ǁC"
	mov $410,"݉䏡sI@C"
	mov $411,"ACnCCB"
	mov %120,409: mov %121,411:mov %122,24:gosub *messagefont
	$409
	$410
	$411@

	mov $412,"RlꏊZwC"
	mov $413,"IꎗSMCޘJ蚔ǗB"
	mov %120,412: mov %121,413:mov %122,24:gosub *messagefont
	$412
	$413@

	mov $414,"@@"
	mov $415,"[ֈCwZa꘢ǓICNaNC"
	mov $416,"琥ޘJ蚔ǓIwB"
	mov %120,414: mov %121,416:mov %122,24:gosub *messagefont
	br
	$415
	$416@

	mov $417,"sݜޗFݕsItC"
	mov $418,"Ȋ{s刖ʁc"
	mov $419,"@"
	mov $420,"@"
	mov %120,417: mov %121,420:mov %122,24:gosub *messagefont
	$417
	$418\


	mov $401,"uwlI˔\Cȕ͏C"
	mov $402,"GlI_Cxv"
	mov %120,401: mov %121,402:mov %122,24:gosub *messagefont
	$401
	$402@

	mov $403,"^Л󗹉GlI_C"
	mov $404,"l˞BIvVBrcv"
	mov %120,403: mov %121,404:mov %122,24:gosub *messagefont
	$403
	$404@

	mov $405,"@@"
	mov $406,"J蚔ǓIV|يnWR]B"
	mov %120,405: mov %121,406:mov %122,24:gosub *messagefont
	br
	$406@

	mov $407,"@ʐwZIVC\[o͊wΈlC"
	mov $408,"cԎV\B"
	mov %120,407: mov %121,408:mov %122,24:gosub *messagefont
	$407
	$408@

	mov $409,"A˓ߒi͗IwGlI_xYrρC"
	mov $410,"F\osmIwIm"
	mov $411,"mmӒnasԁC"
	mov $412,"֗v|KޕÓTLrsNB"
	mov %120,409: mov %121,412:mov %122,24:gosub *messagefont
	$409
	$410
	$411
	$412@

	mov $413,"ވ_CJ蚔ǏAkځB"
	mov $414,"d_eClB"
	mov %120,413: mov %121,414:mov %122,24:gosub *messagefont
	$413
	$414@

	mov $415,"C։OC{eC"
	mov $416,"ύ݊wZICAȐ֙ߙߗB"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	mov %120,415: mov %121,420:mov %122,24:gosub *messagefont
	$415
	$416\


	mov $401,"VICgB"
	mov %120,401: mov %121,401:mov %122,24:gosub *messagefont
	$401@

	mov $402,"gaЉI|vB"
	mov $403,"ݑSNtaZs֓IB"
	mov %120,402: mov %121,403:mov %122,24:gosub *messagefont
	$402
	$403@

	mov $404,"ٗ܁CٗȘawܑsʁC"
	mov $405,"qȊ{݋yipjB"
	mov $406,"蕉䎩ȓsuޔАa[B"
	mov %120,404: mov %121,406:mov %122,24:gosub *messagefont
	$404
	$405
	$406@

	mov $407,"I䐬aŋN"
	mov $408,"AwcL_ƓIwxB"
	mov %120,407: mov %121,408:mov %122,24:gosub *messagefont
	$407
	$408@

	mov $409,"Ala䐥ᘰB"
	mov $410,"J蚔ǓIRaszB"
	mov $411,"@"
	mov $412,"@"
	mov $413,"@"
	mov $414,"@"
	mov $415,"@"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	mov %120,409: mov %121,420:mov %122,24:gosub *messagefont
	$409
	$410\


	mov $401,"މJ蚔ǕD{tC"
	mov $402,"wIasǁB"
	mov %120,401: mov %121,402:mov %122,24:gosub *messagefont
	$401
	$402@

	mov $403,"@@"
	mov $404,"rPǁCLaGIw˔\IpǁB"
	mov %120,403: mov %121,404:mov %122,24:gosub *messagefont
	br
	$404@

	mov $405,"rQǁCɏWaKIwC"
	mov $406,"s|񏡓ItB"
	mov %120,405: mov %121,406:mov %122,24:gosub *messagefont
	$405
	$406@

	mov $407,"R@rRǁB"
	mov $408,"aWIwWNCΏF_ItB"
	mov %120,407: mov %121,408:mov %122,24:gosub *messagefont
	$407
	$408@

	mov $409,"@@"
	mov $410,"ݏCInccrRǁB"
	mov %120,409: mov %121,410:mov %122,24:gosub *messagefont
	br
	$410@

	mov $411,"CFϓIrPrQǓIwC"
	mov $412,"䐥}ΉFލ{ғIlB"
	mov %120,411: mov %121,412:mov %122,24:gosub *messagefont
	$411
	$412@

	mov $413,"FwrRxC"
	mov $414,"ACޘB"
	mov $415,"@"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	mov %120,413: mov %121,420:mov %122,24:gosub *messagefont
	$413
	$414\


	mov $401,"݉zNC@̊i֐iss荤̓IC"
	mov $402,"ݐa\o_"
	mov $403,"ޝً^vIB"
	mov %120,401: mov %121,403:mov %122,24:gosub *messagefont
	$401
	$402
	$403@

	mov $404,"w˙{CAV㓖엹߁C"
	mov $405,"_Aݜޘώqcc"
	mov %120,404: mov %121,405:mov %122,24:gosub *messagefont
	$404
	$405@

	mov $406,"dꐬw\IxB"
	mov %120,406: mov %121,406:mov %122,24:gosub *messagefont
	$406@

	mov $407,"ҔQRIB"
	mov $408,"FgrIww៑xAϓIcB"
	mov %120,407: mov %121,408:mov %122,24:gosub *messagefont
	$407
	$408@

	mov $409,"@ʈCnAވ_C"
	mov $410,"\Q孔I@Jcc"
	mov $411,"@"
	mov $412,"@"
	mov $413,"@"
	mov $414,"@"
	mov $415,"@"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	mov %120,409: mov %121,420:mov %122,24:gosub *messagefont
	$409
	$410\


	mov $401,"ccsC֖vٖ@҉InsB"
	mov %120,401: mov %121,401:mov %122,24:gosub *messagefont
	$401@

	mov $402,"w甓ߍƌڑŕsAsEB"
	mov %120,402: mov %121,402:mov %122,24:gosub *messagefont
	$402@

	mov $403,"ݍˏB"
	mov $404,"vw͊w蚁C"
	mov $405,"ݐa㒴zF֐kL\IB"
	mov %120,403: mov %121,405:mov %122,24:gosub *messagefont
	$403
	$404
	$405@

	mov $406,"@@"
	mov $407,"ʓsrzJcc"
	mov $423,"CݓIsB"
	mov %120,406: mov %121,407:mov %122,24:gosub *messagefont
	mov %120,423: mov %121,423:mov %122,24:gosub *messagefont
	br
	$407@/
	$423/
	add $407,$423/
	@

	mov $408,"ܕsz\X_JB"
	mov %120,408: mov %121,408:mov %122,24:gosub *messagefont
	$408@

	mov $409,"@@"
	mov $410,"ccccB"
	mov %120,409: mov %121,410:mov %122,24:gosub *messagefont
	br
	$410@

	mov $411,"ccccccccB"
	mov $412,"@"
	mov $413,"@"
	mov $414,"@"
	mov $415,"@"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	mov %120,411: mov %121,420:mov %122,24:gosub *messagefont
	$411\


	mov $401,"䎩ȌuC䐥݋IlB"
	mov %120,401: mov %121,401:mov %122,24:gosub *messagefont
	$401@

	mov $402,"䐥B꘢\ZIlB"
	mov $403,"ٍ䊴kB"
	mov %120,402: mov %121,403:mov %122,24:gosub *messagefont
	$402
	$403@

	mov $404,"IlFsOCߕIƐlB"
	mov %120,404: mov %121,404:mov %122,24:gosub *messagefont
	$404@

	mov $405,"ݏsIVssցB"
	mov $406,"Ӊ{A蓌掓InB"
	mov %120,405: mov %121,406:mov %122,24:gosub *messagefont
	$405
	$406@

	mov $407,"S}A`XApGC"
	mov $408,"^Xa衉e@B"
	mov $409,"ލ@CvݑqِڐGsIB"
	mov %120,407: mov %121,409:mov %122,24:gosub *messagefont
	$407
	$408
	$409@

	mov $410,"ݜޘshIeАMaEC"
	mov $411,"原aIFF܋NCFsS_ؒn߁B"
	mov %120,410: mov %121,411:mov %122,24:gosub *messagefont
	$410
	$411@

	mov $412,"Fc㗬IoIߕC甉[xx^MB"
	mov %120,412: mov %121,412:mov %122,24:gosub *messagefont
	$412@

	mov $413,"@@"
	mov $414,"䐥꘢dI݁B"
	mov %120,413: mov %121,414:mov %122,24:gosub *messagefont
	br
	$414@

	mov $415,"ccґRs䍂ځC"
	mov $416,"A֐kȕs꘢ʖqI福lB"
	mov $417,"kȖvLoݓϓIFB"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	mov %120,415: mov %121,420:mov %122,24:gosub *messagefont
	$415
	$416
	$417\


	mov $401,"AC^CpccEsZzB"
	mov %120,401: mov %121,401:mov %122,24:gosub *messagefont
	$401@

	mov $402,"zߍ{szIB"
	mov %120,402: mov %121,402:mov %122,24:gosub *messagefont
	$402@

	mov $403,"@@"
	mov $404,"qN@C䏫}^IlេC"
	mov $405,"wَِCwঌȗzIwZB"
	mov %120,403: mov %121,405:mov %122,24:gosub *messagefont
	br
	$404
	$405@

	mov $406,"@@"
	mov $407,"ccrCV@藁H"
	mov %120,406: mov %121,407:mov %122,24:gosub *messagefont
	br
	$407@

	mov $408,"@@"
	mov $409,"ONCގwwlB"
	mov %120,408: mov %121,409:mov %122,24:gosub *messagefont
	br
	$409@

	mov $410,"zddlCVvꏊ΍瀜kIwB"
	mov %120,410: mov %121,410:mov %122,24:gosub *messagefont
	$410@

	mov $411,"zꉺC݌I@ƎB"
	mov %120,411: mov %121,411:mov %122,24:gosub *messagefont
	$411@

	mov $412,"@@"
	mov $413,"ccrCV@藁H"
	mov $414,"@"
	mov $415,"@"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	mov %120,412: mov %121,420:mov %122,24:gosub *messagefont
	br
	$413\


	mov $401,"CAlCACIwAxB"
	mov %120,401: mov %121,401:mov %122,24:gosub *messagefont
	$401@

	mov $402,"ܗȘawsDQHkÁC"
	mov $403,"A䐥ȐCŎZscB"
	mov %120,402: mov %121,403:mov %122,24:gosub *messagefont
	$402
	$403@

	mov $404,"@@"
	mov $405,"cccrCV@藁H"
	mov $406,"@"
	mov $407,"@"
	mov $408,"@"
	mov $409,"@"
	mov $410,"@"
	mov $411,"@"
	mov $412,"@"
	mov $413,"@"
	mov $414,"@"
	mov $415,"@"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	mov %120,404: mov %121,420:mov %122,24:gosub *messagefont
	br
	$405\

	textoff

	bg "bg\jyuku_bure.jpg",1

	ld l,":a;tatie\yuuki\tuujyou.bmp",12

	texton

	mov $401,"ccV@藁H"
	mov $402,"@"
	mov $403,"@"
	mov $404,"@"
	mov $405,"@"
	mov $406,"@"
	mov $407,"@"
	mov $408,"@"
	mov $409,"@"
	mov $410,"@"
	mov $411,"@"
	mov $412,"@"
	mov $413,"@"
	mov $414,"@"
	mov $415,"@"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	mov %120,401: mov %121,420:mov %122,24:gosub *messagefont
	$401\

	textoff

	ld r,":a;tatie\yuuki\toumei_tuujyou.bmp",12

	bgmfadeout 2000
	bgmstop

	texton


	mov $401,"CV@藁H"
	mov %120,401: mov %121,401:mov %122,24:gosub *messagefont
	$401@

	mov $402,"lDwZC@CAC"
	mov $403,"V@r藁H"
	mov %120,402: mov %121,403:mov %122,24:gosub *messagefont
	$402
	$403@

	mov $404,"@@"
	mov $405,"ߔЖIccsmB"
	mov %120,404: mov %121,405:mov %122,24:gosub *messagefont
	br
	$405@

	mov $406,"@@"
	mov $407,"smH"
	mov $408,"Yrssm֗v꒼៓lEH"
	mov %120,406: mov %121,408:mov %122,24:gosub *messagefont
	br
	$407
	$408@

	mov $409,"ډINCsv꒼៓lEH"
	mov $410,"vLߒnB"
	mov %120,409: mov %121,410:mov %122,24:gosub *messagefont
	$409
	$410@

	mov $411,"@@"
	mov $412,"ccLߓIB"
	mov $413,"䖔s`ƈqIwqB"
	mov %120,411: mov %121,413:mov %122,24:gosub *messagefont
	br
	$412
	$413@

	mov $414,"Klw蚁CR@QᚐEIHB"
	mov $415,"@"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	mov %120,414: mov %121,420:mov %122,24:gosub *messagefont
	$414\


	mov $401,"鴁ccrCߗLzEH"
	mov %120,401: mov %121,401:mov %122,24:gosub *messagefont
	$401@

	mov $402,"@@"
	mov $403,"zH"
	mov %120,402: mov %121,403:mov %122,24:gosub *messagefont
	br
	$403@

	mov $404,"@@"
	mov $405,"ٛC@ʑ@zIHVIB"
	mov %120,404: mov %121,405:mov %122,24:gosub *messagefont
	br
	$405@

	mov $406,"@@"
	mov $407,"ccccB"
	mov %120,406: mov %121,407:mov %122,24:gosub *messagefont
	br
	$407@

	mov $408,"@@"
	mov $409,"smJC֑wqvB"
	mov %120,408: mov %121,409:mov %122,24:gosub *messagefont
	br
	$409@

	mov $410,"ܓC䓞C~CvLșrCB"
	mov %120,410: mov %121,410:mov %122,24:gosub *messagefont
	$410@

	mov $411,"dl甉䋎J蚔ǁCAJ蚔ǁC"
	mov $412,"dl甉lZCAQZlB"
	mov %120,411: mov %121,412:mov %122,24:gosub *messagefont
	$411
	$412@

	mov $413,"@VNAA֐tC"
	mov $414,"GEAIԁAS֐񑫁C"
	mov $415,"L@svC\w蚁B"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	mov %120,413: mov %121,420:mov %122,24:gosub *messagefont
	$413
	$414
	$415\


	mov $401,"CCސ貟甉Icc"
	mov %120,401: mov %121,401:mov %122,24:gosub *messagefont
	$401@

	mov $402,"@@"
	mov $403,"vցCF甉ICAƒB"
	mov %120,402: mov %121,403:mov %122,24:gosub *messagefont
	br
	$403@

	mov $404,"@ߌuސٓICߍ@]ߘFDB"
	mov %120,404: mov %121,404:mov %122,24:gosub *messagefont
	$404@

	mov $405,"AwCA蕍HdlߙrJB"
	mov %120,405: mov %121,405:mov %122,24:gosub *messagefont
	$405@

	mov $406,"lϔlTC"
	mov $407,"dlCdDI劮ꐶAsB"
	mov %120,406: mov %121,407:mov %122,24:gosub *messagefont
	$406
	$407@

	mov $408,"CߘvN@˔\IwzxB"
	mov %120,408: mov %121,408:mov %122,24:gosub *messagefont
	$408@

	mov $409,"@@"
	mov $410,"ccccB"
	mov $411,"@"
	mov $412,"@"
	mov $413,"@"
	mov $414,"@"
	mov $415,"@"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	mov %120,409: mov %121,420:mov %122,24:gosub *messagefont
	br
	$410\

	textoff

	ld r,":a;tatie\yuuki\toumei_egao.bmp",12

	texton


	mov $401,"ƓsߕH"
	mov %120,401: mov %121,401:mov %122,24:gosub *messagefont
	$401@

	mov $402,"˕s藁Cߕ瑼FفB"
	mov %120,402: mov %121,402:mov %122,24:gosub *messagefont
	$402@

	mov $403,"nIwq{awgB"
	mov $404,"Cv福ADB"
	mov %120,403: mov %121,404:mov %122,24:gosub *messagefont
	$403
	$404@

	mov $405,"@CFݍ˔\ٞnxޒiB"
	mov %120,405: mov %121,405:mov %122,24:gosub *messagefont
	$405@

	mov $406,"VNAAAtAGEAIԁC"
	mov $407,"SЁA񑫁Aw@IVÁC֗LsߌwIB"
	mov %120,406: mov %121,407:mov %122,24:gosub *messagefont
	$406
	$407@

	mov $408,"ƓsLkvLIwDyxB"
	mov $409,"ڗLBϓIyB"
	mov %120,408: mov %121,409:mov %122,24:gosub *messagefont
	$408
	$409@

	mov $410,"@@"
	mov $411,"r藁cc"
	mov %120,410: mov %121,411:mov %122,24:gosub *messagefont
	br
	$411@

	mov $412,"LkFvLI@B"
	mov %120,412: mov %121,412:mov %122,24:gosub *messagefont
	$412@

	mov $413,"@@"
	mov $414,"CssӜkVCkLJB"
	mov %120,413: mov %121,414:mov %122,24:gosub *messagefont
	br
	$414@

	mov $415,"rccݍKEH"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	mov %120,415: mov %121,420:mov %122,24:gosub *messagefont
	$415\


	mov $401,"ccH"
	mov %120,401: mov %121,401:mov %122,24:gosub *messagefont
	$401@

	mov $402,"@@"
	mov $403,"wLӎvEH"
	mov %120,402: mov %121,403:mov %122,24:gosub *messagefont
	br
	$403@

	mov $404,"C_ssza\ߓIlҍ݈NC"
	mov $405,"Vs⋓Iʈ֏㱁CJH"
	mov $406,"ܓCߍƌ֋\CߏA_ssuEH"
	mov %120,404: mov %121,406:mov %122,24:gosub *messagefont
	$404
	$405
	$406@

	mov $407,"w蚐^ILrLEH"
	mov $408,"ߍ{CwDyxI@"
	mov $409,"SsꌏnBC"
	mov $410,"꘢l݉hu趁C"
	mov $411,"ߐ^IzޔВnsEH"
	mov %120,407: mov %121,411:mov %122,24:gosub *messagefont
	$407
	$408
	$409
	$410
	$411@

	mov $412,"蕂XN@ߘCIwzxYrssmB"
	mov $413,"@"
	mov $414,"@"
	mov $415,"@"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	mov %120,412: mov %121,420:mov %122,24:gosub *messagefont
	$412\

	textoff

	bg "bg\jyuku_yugami1_bure.jpg",0
	ld r,":a;tatie\yuuki\toumei_egao.bmp",0
	ld l,":a;tatie\yuuki\tuujyou.bmp",1

;ʉFGiiv[vj
	dwaveloop 1,"wave\machine_009.wav"
	texton

	mov $401,"ccec"
	mov %120,401: mov %121,401:mov %122,24:gosub *messagefont
	$401@

	mov $402,"@@"
	mov $403,"݁CܓCݐ݊EH"
	mov $404,"֐܁C픗H"
	mov %120,402: mov %121,404:mov %122,24:gosub *messagefont
	br
	$403
	$404@

	mov $405,"@@"
	mov $406,"csmccsmc"
	mov %120,405: mov %121,406:mov %122,24:gosub *messagefont
	br
	$406@

	mov $407,"@@"
	mov $408,"smssGB"
	mov %120,407: mov %121,408:mov %122,24:gosub *messagefont
	br
	$408@

	mov $409,"CKIԏAΈ꘢JBݓIρB"
	mov $410,"ŋߗLϏEH"
	mov %120,409: mov %121,410:mov %122,24:gosub *messagefont
	$409
	$410@

	mov $411,"CI"
	mov $412,"@"
	mov $413,"@"
	mov $414,"@"
	mov $415,"@"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	mov %120,411: mov %121,420:mov %122,24:gosub *messagefont
	$411\

	textoff

	bg "bg\jyuku_yugami2_bure.jpg",0
	ld r,":a;tatie\yuuki\toumei_egao.bmp",0
	ld l,":a;tatie\yuuki\tuujyou.bmp",1

;ʉFGiiv[vj@BGMƌʉ̏d˂łႮɂ
	dwaveloop 2,"wave\noise_016.wav"
;GύXFDP@@ʒuF
	ld l,":a;tatie\yuuki\keno.bmp",12

	texton

	mov $401,"csvc"
	mov %120,401: mov %121,401:mov %122,24:gosub *messagefont
	$401@

	mov $402,"@@"
	mov $403,"CݓI_ssKGB"
	mov $404,"C@sKB"
	mov $405,"Cv꒼^lI߁C"
	mov $406,"EmSaƓIUC"
	mov $407,"ώ]៓lN藁B"
	mov $408,"ߍĖٖ@Q񗈓IwDyxC"
	mov $409,"vpw蚔cؓsUxB"
	mov $410,"vցC䐥mBFmBB"
	mov %120,402: mov %121,410:mov %122,24:gosub *messagefont
	br
	$403
	$404
	$405
	$406
	$407
	$408
	$409
	$410@

	mov $411,"@@"
	mov $412,"Zcdρcc"
	mov $413,"@"
	mov $414,"@"
	mov $415,"@"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	mov %120,411: mov %121,420:mov %122,24:gosub *messagefont
	br
	$412\


	mov $401,"R@Cʑ听l@َȓIwq"
	mov $402,"ϓIADB"
	mov $403,"甐lwwwwCw蚁B"
	mov $404,"cwDyxdBJB"
	mov $405,"ƘwCnA甑FQl@H"
	mov $406,"蕏YrwZAIJ蚔ǓsRFrC"
	mov $407,"R@甑F݉hu趁B"
	mov $408,"vgnCwqCFߕIԁB"
	mov $409,"|ً^CFCGImB"
	mov $410,"FCnLȓIvl\"
	mov $411,"ӛΓIsƓICAEuB"
	mov $412,"摼FE[Cٖ@EB"
	mov %120,401: mov %121,412:mov %122,24:gosub *messagefont
	$401
	$402
	$403
	$404
	$405
	$406
	$407
	$408
	$409
	$410
	$411
	$412

	mov $413,"vցcc"
	mov $423,"AݓIρI"
	mov %120,413: mov %121,413:mov %122,24:gosub *messagefont
	mov %120,423: mov %121,423:mov %122,24:gosub *messagefont
	$413@/
	$423/
	add $413,$423/
	mov $414,"@"
	mov $415,"@"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	mov %120,414: mov %121,420:mov %122,24:gosub *messagefont
	\

	textoff

;GύXFDP@с@ʒuF@tF[hȂ
;ʍ@tF[hȂ
	bg black,0
	ld l,":a;tatie\yuuki\sakebi.bmp",1
	wait 200

;BGMEʉ@SĒ~
	bgmfadeout 1
	bgmstop
	dwavestop 1
	dwavestop 2

;wiF߂Ă悧II@tF[hȂ
	bg "cutin\cutin_05.jpg",1
	QUAKE 50,500

	wait 2000

;ʍ@tF[hȂ
	bg black,1

	wait 3000

;ʉFUb
;wiFmEmCY@u\
	dwave 10,"wave\noise01.wav"

	bg "bg\jyuku_bure.jpg",1

	wait 200

	bg black,1

	wait 2000

	bg "bg\jyuku.jpg",1

	wait 3000

	texton


	mov $401,"ˑR_C䐳J蚔ǓICB"
	mov %120,401: mov %121,401:mov %122,24:gosub *messagefont
	$401@

	mov $402,"VICxsB"
	mov %120,402: mov %121,402:mov %122,24:gosub *messagefont
	$402@

	mov $403,"ґRuȎvlkC"
	mov $404,"AT㱎vL勎vB"
	mov %120,403: mov %121,404:mov %122,24:gosub *messagefont
	$403
	$404@

	mov $405,"@@"
	mov $406,"ߍs\zIcc"
	mov %120,405: mov %121,406:mov %122,24:gosub *messagefont
	br
	$406@

	mov $407,"ߍgz㗘Icc"
	mov %120,407: mov %121,407:mov %122,24:gosub *messagefont
	$407@

	mov $408,"@ʖvL@uIԁC֔\]mCpᗹB"
	mov %120,408: mov %121,408:mov %122,24:gosub *messagefont
	$408@

	mov $409,"vADCsvWC"
	mov $410,"~vlCgAsB"
	mov %120,409: mov %121,410:mov %122,24:gosub *messagefont
	$409
	$410@

	mov $411,"smsu㱁CؓsWk[C"
	mov $412,"Eʑ听lB"
	mov %120,411: mov %121,412:mov %122,24:gosub *messagefont
	$411
	$412@

	mov $413,"@@"
	mov $414,"ޗLYrsxIEH"
	mov %120,413: mov %121,414:mov %122,24:gosub *messagefont
	br
	$414@

	mov $415,"@@"
	mov $416,"ccccccsxB"
	mov $423,"sxCvցCksxB"
	mov %120,415: mov %121,416:mov %122,24:gosub *messagefont
	mov %120,423: mov %121,423:mov %122,24:gosub *messagefont
	br
	$416@/
	$423/
	add $416,$423/
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	mov %120,417: mov %121,420:mov %122,24:gosub *messagefont
	\


	mov $401,"ݖvLߓIvC"
	mov $402,"CLl甉OCA꒼OB"
	mov %120,401: mov %121,402:mov %122,24:gosub *messagefont
	$401
	$402@

	mov $403,"R@ӛΓC"
	mov $404,"䓞ݒI藁H"
	mov $405,"CYrݜޔВnH"
	mov $406,"ݓI]O^IȘEcc"
	mov %120,403: mov %121,406:mov %122,24:gosub *messagefont
	$403
	$404
	$405
	$406@

	mov $407,"UCnvlޘVCAB"
	mov $423,"sەs×B"
	mov %120,407: mov %121,407:mov %122,24:gosub *messagefont
	mov %120,423: mov %121,423:mov %122,24:gosub *messagefont
	$407@/
	$423/
	add $407,$423/
	@

	mov $408,"A蜓ْوρCz蜉z[C"
	mov $409,"a[IwrRxwC\C~㱗B"
	mov %120,408: mov %121,409:mov %122,24:gosub *messagefont
	$408
	$409@

	mov $410,"@@"
	mov $411,"KlOCAszOB"
	mov %120,410: mov %121,411:mov %122,24:gosub *messagefont
	br
	$411@

	mov $412,"zvRCrRHRYrH"
	mov %120,412: mov %121,412:mov %122,24:gosub *messagefont
	$412@

	mov $413,"ccݓI䓞ZYrH"
	mov %120,413: mov %121,413:mov %122,24:gosub *messagefont
	$413@

	mov $414,"藁C֐픗藁C"
	mov $415,"蕜ޘssmB"
	mov %120,414: mov %121,415:mov %122,24:gosub *messagefont
	$414
	$415@

	mov $416,"ccLБzfIuO㗈B"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	mov %120,416: mov %121,420:mov %122,24:gosub *messagefont
	$416\


	mov $401,"^ȓIlB"
	mov $423,"ޖ琥I퐶B"
	mov %120,401: mov %121,401:mov %122,24:gosub *messagefont
	mov %120,423: mov %121,423:mov %122,24:gosub *messagefont
	$401@/
	$423/
	add $401,$423/
	@

	mov $402,"@@"
	mov $403,"uwdVىvVCs@sx"
	mov %120,402: mov %121,403:mov %122,24:gosub *messagefont
	br
	$403@

	mov $404,"CދԓIӎvccv"
	mov %120,404: mov %121,404:mov %122,24:gosub *messagefont
	$404@

	mov $405,"@@"
	mov $406,"bŏېٖ@≺I㱗C"
	mov $407,"J蚔ǓIVÒn]גCB"
	mov $408,"@"
	mov $409,"@"
	mov $410,"@"
	mov $411,"@"
	mov $412,"@"
	mov $413,"@"
	mov $414,"@"
	mov $415,"@"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	mov %120,405: mov %121,420:mov %122,24:gosub *messagefont
	br
	$406
	$407\

	textoff

	bg black,18

	wait 2000
;wiFuuԂ͎cBvv@tF[h
	bg "cutin\cutin_06.jpg",12

	wait 3000
;wiFuułlɐiނƂBvv@tF[h
	bg "cutin\cutin_07.jpg",12

	wait 5000

	bg black,18

	wait 3000

;ʉFw̎GEo[W@i[vȂj
	dwave 2,"wave\eki.wav"
;wiF̉w@tF[hC
	bg "bg\morioka_eki_yoru.jpg",18

	wait 3000

	texton


	mov $401,"uX_C⋁B"
	mov %120,401: mov %121,401:mov %122,24:gosub *messagefont
	$401@

	mov $402,"ʓIVfBCZ㗹ƓIHB"
	mov %120,402: mov %121,402:mov %122,24:gosub *messagefont
	$402@

	mov $403,"ޘ㱓_Cԉ[RmIlkB"
	mov $404,"⋑LIC"
	mov $405,"ȋyxg🃓IǑ{Nl߁B"
	mov %120,403: mov %121,405:mov %122,24:gosub *messagefont
	$403
	$404
	$405@

	mov $406,"ϓIw꘢sŕsB"
	mov %120,406: mov %121,406:mov %122,24:gosub *messagefont
	$406@

	mov $407,"@@"
	mov $408,"CnٜޔЏvfB"
	mov %120,407: mov %121,408:mov %122,24:gosub *messagefont
	br
	$408@

	mov $409,"wqv_ƁB"
	mov $410,"s\݊OʐruB"
	mov $411,"Aϋ璅B"
	mov %120,409: mov %121,411:mov %122,24:gosub *messagefont
	$409
	$410
	$411@

	mov $412,"wIC@ʊߌwVS"
	mov $413,"nDCwZIV܁F"
	mov $414,"uuojIԁCvLlBv"
	mov %120,412: mov %121,414:mov %122,24:gosub *messagefont
	$412
	$413
	$414@

	mov $415,"@@"
	mov $416,"ݓICpƎlҍ⋗B"
	mov %120,415: mov %121,416:mov %122,24:gosub *messagefont
	br
	$416@

	mov $417,"uX_C꘢PRӓIwqҍ⋗B"
	mov %120,417: mov %121,417:mov %122,24:gosub *messagefont
	$417@

	mov $418,"ccCpvLlB"
	mov $419,"@"
	mov $420,"@"
	mov %120,418: mov %121,420:mov %122,24:gosub *messagefont
	$418\


	mov $401,"ccsCӒwEZlEH"
	mov %120,401: mov %121,401:mov %122,24:gosub *messagefont
	$401@

	mov $402,"䎩֌uȐwqC"
	mov $403,"AݎЉ\E퓖lőҗJB"
	mov %120,402: mov %121,403:mov %122,24:gosub *messagefont
	$402
	$403@

	mov $404,"ȑO܁CޘNIlAEBqcc"
	mov %120,404: mov %121,404:mov %122,24:gosub *messagefont
	$404@

	mov $405,"֐܁CŋߐVY񓞓Iߔ"
	mov $406,"wsጜݛwqIlx藁cc"
	mov %120,405: mov %121,406:mov %122,24:gosub *messagefont
	$405
	$406@

	mov $407,"{v獐˓IC"
	mov $408,"p\sFcc"
	mov %120,407: mov %121,408:mov %122,24:gosub *messagefont
	$407
	$408@

	mov $409,"@@"
	mov $410,"ccCeЊeϓIz@oC"
	mov $411,"ATCYrlFYrsvى܁B"
	mov %120,409: mov %121,411:mov %122,24:gosub *messagefont
	br
	$410
	$411@

	mov $412,"lC䐥J蚔ǉC񗈓IB"
	mov $413,"@"
	mov $414,"@"
	mov $415,"@"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	mov %120,412: mov %121,420:mov %122,24:gosub *messagefont
	$412\

	mov $401,"wqu݊OʍWАsٓIB"
	mov %120,401: mov %121,401:mov %122,24:gosub *messagefont
	$401@

	mov $402,"A蕟pG孒uZ_ȍ@s\B"
	mov %120,402: mov %121,402:mov %122,24:gosub *messagefont
	$402@

	mov $403,"ACvJ蚔ǉ񗈁ccA\ڎB"
	mov %120,403: mov %121,403:mov %122,24:gosub *messagefont
	$403@

	mov $404,"u_DC\_nCsȍ݊OʐB"
	mov $405,"v܈䐥J蚔ǉ񗈓IClFAڎB"
	mov %120,404: mov %121,405:mov %122,24:gosub *messagefont
	$404
	$405@

	mov $406,"A茕֓IʍsoρC"
	mov $407,"ޔГ헝Rnڎ󗹁B"
	mov %120,406: mov %121,407:mov %122,24:gosub *messagefont
	$406
	$407@

	mov $408,"@@"
	mov $409,"ccukB"
	mov %120,408: mov %121,409:mov %122,24:gosub *messagefont
	br
	$409@

	mov $410,"ޘ㱒iCwq݊Oʗ竁CusB"
	mov %120,410: mov %121,410:mov %122,24:gosub *messagefont
	$410@

	mov $411,"CDvLluC"
	mov $412,"TIz@֗JB"
	mov %120,411: mov %121,412:mov %122,24:gosub *messagefont
	$411
	$412@

	mov $413,"\C䐥mʑICvzWVJB"
	mov %120,413: mov %121,413:mov %122,24:gosub *messagefont
	$413@

	mov $414,"@@"
	mov $415,"u⿁CrRIv"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	mov %120,414: mov %121,420:mov %122,24:gosub *messagefont
	br
	$415\

	bgm "bgm\free55.mp3"

	mov $401,"ˑRLl^ꐺB"
	mov %120,401: mov %121,401:mov %122,24:gosub *messagefont
	$401@

	mov $402,"spŖm鈁B"
	mov $403,"rRILcc"
	mov %120,402: mov %121,403:mov %122,24:gosub *messagefont
	$402
	$403@

	mov $404,"@@"
	mov $405,"񔈈ŁCfIqlIgeB"
	mov $406,"꘢ՒֈϓIΗeC꘢ՒyNB"
	mov %120,404: mov %121,406:mov %122,24:gosub *messagefont
	br
	$405
	$406@

	mov $407,"ccґRtsC"
	mov $408,"CNaN㓯꘢J蚔ǁC"
	mov $409,"NƓI㱏d琥RIB"
	mov %120,407: mov %121,409:mov %122,24:gosub *messagefont
	$407
	$408
	$409@

	mov $410,"@@"
	mov $411,"CccwVώqxcc"
	mov %120,410: mov %121,411:mov %122,24:gosub *messagefont
	br
	$411@

	mov $412,"@@"
	mov $413,"䐥scߔЕsuIuʍc㗹H"
	mov $414,"CND@uC"
	mov $415,"IoꖕߐlsIIΗeCϋ߁B"
	mov %120,412: mov %121,415:mov %122,24:gosub *messagefont
	br
	$413
	$414
	$415@

	mov $416,"ޗ⋓I⋑C٘HB"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	mov %120,416: mov %121,420:mov %122,24:gosub *messagefont
	$416\


	mov $401,"uüCICsDӎvB"
	mov $402,"{vzQcIBvv"
	mov %120,401: mov %121,402:mov %122,24:gosub *messagefont
	$401
	$402@

	mov $403,"@@"
	mov $404,"FbpnԁCc䓨NB"
	mov %120,403: mov %121,404:mov %122,24:gosub *messagefont
	br
	$404@

	mov $405,"A\ŐIqB"
	mov $406,"{vL^Sz]C~nB"
	mov %120,405: mov %121,406:mov %122,24:gosub *messagefont
	$405
	$406@

	mov $407,"@@"
	mov $408,"uuvCޗsցCvsցHvv"
	mov %120,407: mov %121,408:mov %122,24:gosub *messagefont
	br
	$408@

	mov $409,"@@"
	mov $410,"R@CAՑB"
	mov $411,"ρCՓ⋑IpB"
	mov %120,409: mov %121,411:mov %122,24:gosub *messagefont
	br
	$410
	$411@

	mov $412,"꘢ِlInB"
	mov $413,"@"
	mov $414,"@"
	mov $415,"@"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	mov %120,412: mov %121,420:mov %122,24:gosub *messagefont
	$412\


	textoff

	bg black,26

	bg "bg\morioka_eki_yoru.jpg",26

	texton

	mov $401,"CNaNcwxߗ@CCn֗NB"
	mov %120,401: mov %121,401:mov %122,24:gosub *messagefont
	$401@

	mov $402,"֍lA։SA֟pBSgxvIԎVB"
	mov %120,402: mov %121,402:mov %122,24:gosub *messagefont
	$402@

	mov $403,"푼FbSCvLQ^ْԁC"
	mov $404,"Òn⋍ݓߗB"
	mov %120,403: mov %121,404:mov %122,24:gosub *messagefont
	$403
	$404@

	mov $405,"@@"
	mov $406,"⋑IpCŋNJ蚔ǉ񗈓I֓VB"
	mov %120,405: mov %121,406:mov %122,24:gosub *messagefont
	br
	$406@

	mov $407,"rŁCTAϓIiJB"
	mov %120,407: mov %121,407:mov %122,24:gosub *messagefont
	$407@

	mov $408,"Cqlsa䓯HÍB"
	mov %120,408: mov %121,408:mov %122,24:gosub *messagefont
	$408@

	mov $409,"竓I⋑CCaܒԁC"
	mov $410,"SwB"
	mov %120,409: mov %121,410:mov %122,24:gosub *messagefont
	$409
	$410@

	mov $411,"@ʑFFIԁCk_IJB"
	mov %120,411: mov %121,411:mov %122,24:gosub *messagefont
	$411@

	mov $412,"@@"
	mov $413,"ACqƌIlB"
	mov %120,412: mov %121,413:mov %122,24:gosub *messagefont
	br
	$413@

	mov $414,"Fs\C竜ވˁB"
	mov %120,414: mov %121,414:mov %122,24:gosub *messagefont
	$414@

	mov $415,"qƌIړI퐥cc"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	mov %120,415: mov %121,420:mov %122,24:gosub *messagefont
	$415\

;ʉFs|p|[
	dwave 2,"wave\call_up.wav"

	mov $401,"u萂W⋑Isܕԗ́C"
	mov $402,"QP_PŚCCȓÍBv"
	mov $403,"u苑ޓȓv"
	mov %120,401: mov %121,403:mov %122,24:gosub *messagefont
	$401
	$402
	$403@

	mov $404,"@@"
	mov $405,"n\ǓIdB"
	mov $406,"ŗvI͉vB"
	mov %120,404: mov %121,406:mov %122,24:gosub *messagefont
	br
	$405
	$406@

	mov $407,"召LǓInHB"
	mov $408,"@嗹ވǁC֗v"
	mov $409,"ʓIi㱁B"
	mov %120,407: mov %121,409:mov %122,24:gosub *messagefont
	$407
	$408
	$409@

	mov $410,"@@"
	mov $411,"uu֗L։VJHvv"
	mov %120,410: mov %121,411:mov %122,24:gosub *messagefont
	br
	$411@

	mov $412,"@@"
	mov $413,"IqlΓdCSB"
	mov $414,"@"
	mov $415,"@"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	mov %120,412: mov %121,420:mov %122,24:gosub *messagefont
	br
	$413\


	mov $401,"vցCޏAFIړIB"
	mov %120,401: mov %121,401:mov %122,24:gosub *messagefont
	$401@

	mov $402,"Klz͉ƁB"
	mov $403,"ۍ򓞉ƓI㱉u꘢B"
	mov %120,402: mov %121,403:mov %122,24:gosub *messagefont
	$402
	$403@

	mov $404,"ȁCF˓ӗWVB"
	mov %120,404: mov %121,404:mov %122,24:gosub *messagefont
	$404@

	mov $405,"@@"
	mov $406,"smYrCnccF䐥͑Oō@ꍏc䝣ZC"
	mov $407,"FCn甉䒅}IpB"
	mov %120,405: mov %121,407:mov %122,24:gosub *messagefont
	br
	$406
	$407@

	mov $408,"ِCF܁C"
	mov $409,"ŒQQ茒n͓IώqCLB"
	mov %120,408: mov %121,409:mov %122,24:gosub *messagefont
	$408
	$409@

	mov $410,"sǜى䗈ܗLrWC"
	mov $411,"g⋛dݔdu苖ܖz竏́Cav"
	mov $412,"ލƌ{s݈ӁB"
	mov %120,410: mov %121,412:mov %122,24:gosub *messagefont
	$410
	$411
	$412@

	mov $413,"vȊߓCSA槗CޏAFIߓxB"
	mov $414,"@"
	mov $415,"@"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	mov %120,413: mov %121,420:mov %122,24:gosub *messagefont
	$413\

	textoff

;ʉFdԂĂ
	dwave 2,"wave\train.wav"
	bg white,16
	bg "bg\morioka_eki_yoru.jpg",16

	wait 5000

	texton

	mov $401,"|ƗÁC"
	mov $402,"I͛fB"
	mov %120,401: mov %121,402:mov %122,24:gosub *messagefont
	$401
	$402@

	dwavestop 2

	mov $403,"UULq́BjgB"
	mov $404,"Cޘ⋐f_⋁C"
	mov $405,"Șq͍@s͓a^B"
	mov %120,403: mov %121,405:mov %122,24:gosub *messagefont
	$403
	$404
	$405@

	mov $406,"@@"
	mov $407,"AˑRvCB"
	mov %120,406: mov %121,407:mov %122,24:gosub *messagefont
	br
	$407@

	mov $408,"@@"
	mov $409,"svC^BCjĎCB"
	mov $410,"⋑㓙ғIlF꘢ڈ꘢nBB"
	mov %120,408: mov %121,410:mov %122,24:gosub *messagefont
	br
	$409
	$410@

	mov $411,"@@"
	mov $412,"֐vCB"
	mov %120,411: mov %121,412:mov %122,24:gosub *messagefont
	br
	$412@

	mov $413,"IwSSSZB"
	mov %120,413: mov %121,413:mov %122,24:gosub *messagefont
	$413@

	mov $414,"@@"
	mov $415,"uCdr}vIv"
	mov %120,414: mov %121,415:mov %122,24:gosub *messagefont
	br
	$415@

	mov $416,"@@"
	mov $417,"ŒI\CNΓO@B"
	mov %120,416: mov %121,417:mov %122,24:gosub *messagefont
	br
	$417@

	mov $418,"LYrDΓIH"
	mov $419,"@"
	mov $420,"@"
	mov %120,418: mov %121,420:mov %122,24:gosub *messagefont
	$418\


	mov $401,"ޔН֓IpC䍪{sF߁B"
	mov %120,401: mov %121,401:mov %122,24:gosub *messagefont
	$401@

	mov $402,"CCzx͍ːB"
	mov %120,402: mov %121,402:mov %122,24:gosub *messagefont
	$402@

	mov $403,"ȑO琤ӜrzCr֕tsÁB"
	mov %120,403: mov %121,403:mov %122,24:gosub *messagefont
	$403@

	mov $404,"ᑼFsvEC"
	mov $405,"竓͗ʋB"
	mov %120,404: mov %121,405:mov %122,24:gosub *messagefont
	$404
	$405@

	mov $406,"@@@"
	mov $407,"RVCFIڎȍő[I~濗B"
	mov %120,406: mov %121,407:mov %122,24:gosub *messagefont
	br
	$407@

	mov $408,"AcAqAwAڏC팝ŋr瓾Ց潈B"
	mov %120,408: mov %121,408:mov %122,24:gosub *messagefont
	$408@

	mov $409,"CNANaԙnNOlNB"
	mov %120,409: mov %121,409:mov %122,24:gosub *messagefont
	$409@

	mov $410,"A݋CSǓwwӉyxIʑOB"
	mov %120,410: mov %121,410:mov %122,24:gosub *messagefont
	$410@

	mov $411,"䍡VI֗vɋC֗vmIڎB"
	mov %120,411: mov %121,411:mov %122,24:gosub *messagefont
	$411@

	mov $412,"@@"
	mov $413,"@ʘ✐ٓIRCA}ϓIڎB"
	mov %120,412: mov %121,413:mov %122,24:gosub *messagefont
	br
	$413@

	mov $414,"^RCs@zFߜޔВxIm莁C"
	mov $415,"vSB"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	mov %120,414: mov %121,420:mov %122,24:gosub *messagefont
	$414
	$415\


	mov $401,"u还{Iiqjs͉v"
	mov %120,401: mov %121,401:mov %122,24:gosub *messagefont
	$401@

	mov $402,"@@"
	mov $403,"dڒ⋓_I͓d⁗嗈B"
	mov %120,402: mov %121,403:mov %122,24:gosub *messagefont
	br
	$403@

	mov $404,"FSIwC"
	mov $405,"֝QԎV敏ΜB"
	mov %120,404: mov %121,405:mov %122,24:gosub *messagefont
	$404
	$405@

	mov $406,"@@"
	mov $407,"ˑRvLCB"
	mov %120,406: mov %121,407:mov %122,24:gosub *messagefont
	br
	$407@

	mov $408,"IVssρB"
	mov %120,408: mov %121,408:mov %122,24:gosub *messagefont
	$408@

	mov $409,"ޟpCnIC"
	mov $410,"TޘACC"
	mov $411,"Aŋߋp꒼S͞kNC~B"
	mov %120,409: mov %121,411:mov %122,24:gosub *messagefont
	$409
	$410
	$411@

	mov $412,"ސKRItB"
	mov %120,412: mov %121,412:mov %122,24:gosub *messagefont
	$412@

	mov $413,"@原sݓϓI㱓_CC"
	mov $414,"AsĊŋ}C㱈__B"
	mov $415,"@"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	mov %120,413: mov %121,420:mov %122,24:gosub *messagefont
	$413
	$414\

	textoff

	bgmfadeout 1
	bgmstop

;ʉFԂ̃x
	dwave 2,"wave\nori_ge_den_hassya01.wav"
;ʉI܂ŃEFCg
	wait 7000
	bgm "bgm\free0527.mp3"

	texton


	mov $401,"fCkB"
	mov %120,401: mov %121,401:mov %122,24:gosub *messagefont
	$401@

	mov $402,"֐vLCB"
	mov %120,402: mov %121,402:mov %122,24:gosub *messagefont
	$402@

	mov $403,"FqlΗNCkޘpB"
	mov %120,403: mov %121,403:mov %122,24:gosub *messagefont
	$403@

	mov $404,"@@"
	mov $405,"kNE嗹TbB"
	mov %120,404: mov %121,405:mov %122,24:gosub *messagefont
	br
	$405@

	mov $406,"֐vLCB"
	mov %120,406: mov %121,406:mov %122,24:gosub *messagefont
	$406@

	mov $407,"@@"
	mov $408,"kNE嗹WbB"
	mov %120,407: mov %121,408:mov %122,24:gosub *messagefont
	br
	$408@

	mov $409,"֐vLCB"
	mov %120,409: mov %121,409:mov %122,24:gosub *messagefont
	$409@

	mov $410,"@@"
	mov $411,"kNE嗹PObB"
	mov %120,410: mov %121,411:mov %122,24:gosub *messagefont
	br
	$411@

	mov $412,"ˑRvLCB"
	mov %120,412: mov %121,412:mov %122,24:gosub *messagefont
	$412@

	mov $413,"@@"
	mov $414,"◹B"
	mov $415,"cc"
	mov $423,"֐vLCB"
	mov %120,413: mov %121,415:mov %122,24:gosub *messagefont
	mov %120,423: mov %121,423:mov %122,24:gosub *messagefont
	br
	$414
	$415@/
	$423/
	add $415,$423/
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	mov %120,416: mov %121,420:mov %122,24:gosub *messagefont
	\


	mov $401,"syB"
	mov $402,"@֕sCIԁCA^Izs㗹B"
	mov %120,401: mov %121,402:mov %122,24:gosub *messagefont
	$401
	$402@

	mov $403,"ŌCNIcB"
	mov $423,"ݏ΁B"
	mov %120,403: mov %121,403:mov %122,24:gosub *messagefont
	mov %120,423: mov %121,423:mov %122,24:gosub *messagefont
	$403@/
	$423/
	add $403,$423/
	@

	mov $404,"ŌIcB"
	mov $423,"ݏ΁B"
	mov %120,404: mov %121,404:mov %122,24:gosub *messagefont
	mov %120,423: mov %121,423:mov %122,24:gosub *messagefont
	$404@/
	$423/
	add $404,$423/
	@

	mov $405,"@@"
	mov $406,"Ócc"
	mov $423,"Ócc"
	mov %120,405: mov %121,406:mov %122,24:gosub *messagefont
	mov %120,423: mov %121,423:mov %122,24:gosub *messagefont
	br
	$406@/
	$423/
	add $406,$423/
	@

	mov $407,"sCCs甉ޔ́C"
	mov $408,"甉䓙㐮꘢ÍB"
	mov %120,407: mov %121,408:mov %122,24:gosub *messagefont
	$407
	$408@

	mov $409,"VCnCFAŎZrJB"
	mov %120,409: mov %121,409:mov %122,24:gosub *messagefont
	$409@

	mov $410,"sCBݜޔАS˙rIC"
	mov $411,"AsǜρCΉƌoBF|糊nޔЎB"
	mov %120,410: mov %121,411:mov %122,24:gosub *messagefont
	$410
	$411@

	mov $412,"CFȈ_ssCÁB"
	mov %120,412: mov %121,412:mov %122,24:gosub *messagefont
	$412@

	mov $413,"@@"
	mov $414,"svcc"
	mov $423,"svCsvI"
	mov %120,413: mov %121,414:mov %122,24:gosub *messagefont
	mov %120,423: mov %121,423:mov %122,24:gosub *messagefont
	br
	$414@/
	$423/
	add $414,$423/
	mov $415,"@"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	mov %120,415: mov %121,420:mov %122,24:gosub *messagefont
	\

	QUAKE 25,200

	mov $401,"vHB"
	mov $423,"vHB"
	mov %120,401: mov %121,401:mov %122,24:gosub *messagefont
	mov %120,423: mov %121,423:mov %122,24:gosub *messagefont
	$401@/
	QUAKE 25,200
	$423/
	add $401,$423/
	@/
	QUAKE 25,200
	$423/
	add $401,$423/
	@

	mov $402,"ґRQV@IڎC"
	mov $403,"Aݔ@ʕs_YrRCAsCB"
	mov %120,402: mov %121,403:mov %122,24:gosub *messagefont
	$402
	$403@

	mov $404,"甉䓙꘢ÍC˕sÈӁB"
	mov %120,404: mov %121,404:mov %122,24:gosub *messagefont
	$404@

	mov $405,"@@"
	mov $406,"CSZg̓II]B"
	mov %120,405: mov %121,406:mov %122,24:gosub *messagefont
	br
	$406@

	mov $407,"ґR͟CAsS̏dCOۏosB"
	mov %120,407: mov %121,407:mov %122,24:gosub *messagefont
	$407@

	mov $408,"CxxSZIwCAsmB"
	mov $409,"ccŗC^IsŎZ甉͗B"
	mov %120,408: mov %121,409:mov %122,24:gosub *messagefont
	$408
	$409@

	mov $410,"@@"
	mov $411,"u㱉"
	mov %120,410: mov %121,411:mov %122,24:gosub *messagefont
	br
	$411

	QUAKE 50,200

	mov $412,"@@"
	mov $413,"㜁B"
	mov %120,412: mov %121,413:mov %122,30:gosub *messagefont
	br
	$413@

	mov $414,"݉IwaCV㱁C⁗^З@fIB"
	mov %120,414: mov %121,414:mov %122,24:gosub *messagefont
	$414@

	mov $415,"DwpwIՒfB"
	mov %120,415: mov %121,415:mov %122,24:gosub *messagefont
	$415@

	mov $416,"@@"
	mov $417,"ǒnꉺCCB"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	mov %120,416: mov %121,420:mov %122,24:gosub *messagefont
	br
	$417\

	QUAKE 75,200

	mov $401,"S͖z立NB"
	mov $402,"ґRk݈CAݕs糋yޘIB"
	mov %120,401: mov %121,402:mov %122,24:gosub *messagefont
	$401
	$402@

	mov $403,"EkB"
	mov $404,"\SI͏gjOIޒi㱁B"
	mov %120,403: mov %121,404:mov %122,24:gosub *messagefont
	$403
	$404@

	mov $405,"Sb藁C֐Tb藁H"
	mov %120,405: mov %121,405:mov %122,24:gosub *messagefont
	$405@

	mov $406,"@⁗CIBݚ^YrB"
	mov %120,406: mov %121,406:mov %122,24:gosub *messagefont
	$406@

	mov $407,"ߕs^C糕s㗹B"
	mov %120,407: mov %121,407:mov %122,24:gosub *messagefont
	$407@

	mov $408,"䘸⋑IstjC"
	mov $409,"㗹őOʓIBB"
	mov %120,408: mov %121,409:mov %122,24:gosub *messagefont
	$408
	$409@

	mov $410,"A݉䊊ICg@Ijg㗹B"
	mov $411,"qFIڌsޙZ㗈IB"
	mov %120,410: mov %121,411:mov %122,24:gosub *messagefont
	$410
	$411@

	bgmstop
;ʉFdԂ̎ԓi[vȂj
	bgmonce "bgm\se-044.mp3"
	bg black,14

	mov $412,"@@"
	mov $413,"@C衊kNCCnLÁB"
	mov %120,412: mov %121,413:mov %122,24:gosub *messagefont
	br
	$413@

	mov $414,"ccz㗹B"
	mov %120,414: mov %121,414:mov %122,24:gosub *messagefont
	$414@

	mov $415,"㉺}ISaċzC"
	mov $416,"pCxI荔B"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	mov %120,415: mov %121,420:mov %122,24:gosub *messagefont
	$415
	$416\


	mov $401,"xO]C"
	mov $402,"CwIC吺^YrB"
	mov %120,401: mov %121,402:mov %122,24:gosub *messagefont
	$401
	$402@

	mov $403,"͟q餁CIgea⋑NsFB"
	mov %120,403: mov %121,403:mov %122,24:gosub *messagefont
	$403@

	mov $404,"藁C֐ݏ藁H"
	mov $405,"\vŐ^Cscc"
	mov %120,404: mov %121,405:mov %122,24:gosub *messagefont
	$404
	$405@

	mov $406,"@@CVcc"
	mov $407,"KlF藢cB񗈁B"
	mov %120,406: mov %121,407:mov %122,24:gosub *messagefont
	$406
	$407@

	mov $408,"@@"
	mov $409,"^ВxIڎC֐DSyݛcc"
	mov %120,408: mov %121,409:mov %122,24:gosub *messagefont
	br
	$409@

	mov $410,"z@ʓICAuSݏdB"
	mov $411,"CImSX|C"
	mov $412,"r萏֝QʍB"
	mov %120,410: mov %121,412:mov %122,24:gosub *messagefont
	$410
	$411
	$412@

	mov $413,"C[RI㱖́C󒅓IʑB"
	mov %120,413: mov %121,413:mov %122,24:gosub *messagefont
	$413@

	mov $414,"@@"
	mov $415,"䐏֍݈꘢rIʏ㍿C"
	mov $416,"S͖z竍@}IċzCȑꓯfoB"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	mov %120,414: mov %121,420:mov %122,24:gosub *messagefont
	br
	$415
	$416\

	textoff

	bg black,14

	bgmfadeout 1000
	bgmstop

;

;ʁFSd}i⍂j
	mov %42,3
	gosub *sindenzu
	bg ":c;cutin\logo.jpg",16

	wait 3000

	bg black,15

;


;ʉFdԂ̎ԓi[vȂj
	bgmonce "bgm\se-044.mp3"

;wiFdԂ̎ԓ@tF[hC
	bg "bg\densya.jpg",18
	wait 4000

	texton

	mov $401,"X@CċzKC"
	mov $402,"LvleЎI]TB"
	mov %120,401: mov %121,402:mov %122,24:gosub *messagefont
	$401
	$402@

	mov $403,"磝{ǌՔbϚǉIC"
	mov $404,"TCNғN\JB"
	mov %120,403: mov %121,404:mov %122,24:gosub *messagefont
	$403
	$404@

	mov $405,"V@CL\Ǎݗ⋗C"
	mov $406,"VŎZ_⋓IHl玁B"
	mov %120,405: mov %121,406:mov %122,24:gosub *messagefont
	$405
	$406@

	mov $407,"C{am㈖{C"
	mov $408,"֗LJ蚔ǗpIށB"
	mov %120,407: mov %121,408:mov %122,24:gosub *messagefont
	$407
	$408@

	mov $409,"VOvYrdI@C"
	mov $410,"qlAZCCsuLYrӎvJB"
	mov %120,409: mov %121,410:mov %122,24:gosub *messagefont
	$409
	$410@

	mov $411,"Ɩu߁C"
	mov $412,"w蚍H{svcc"
	mov %120,411: mov %121,412:mov %122,24:gosub *messagefont
	$411
	$412@

	mov $413,"@@"
	mov $414,"ccsmYrCnC"
	mov $415,"EsĘCIw蚗B"
	mov %120,413: mov %121,415:mov %122,24:gosub *messagefont
	br
	$414
	$415@

	mov $416,"@J蚔ǁAwZ֐xCIsBIB"
	mov %120,416: mov %121,416:mov %122,24:gosub *messagefont
	$416@

	mov $417,"ډC^I]OEcc"
	mov $418,"vLߒnݜ萋NI៑vH"
	mov $419,"CϓIm^IDEcc"
	mov %120,417: mov %121,419:mov %122,24:gosub *messagefont
	$417
	$418
	$419@

	mov $420,"R֖vLQāCAszLRюsÁB"
	mov %120,420: mov %121,420:mov %122,24:gosub *messagefont
	$420\


	mov $401,"֔@ccam㈖{֐kdvI@B"
	mov %120,401: mov %121,401:mov %122,24:gosub *messagefont
	$401@

	mov $402,"ߐCwIoB"
	mov $403,"䎊ȒwgᚐId瑁B"
	mov %120,402: mov %121,403:mov %122,24:gosub *messagefont
	$402
	$403@

	mov $404,"琥@GIwIH߁B"
	mov %120,404: mov %121,404:mov %122,24:gosub *messagefont
	$404@

	mov $405,"L搥VCL搥lCL搥ៗFBޏAB"
	mov %120,405: mov %121,405:mov %122,24:gosub *messagefont
	$405@

	mov $406,"NtVC㏒ِVIxS蓊n嗹"
	mov $407,"UVIB"
	mov %120,406: mov %121,407:mov %122,24:gosub *messagefont
	$406
	$407@

	mov $408,"抮Ss៑IcC|HI孍B"
	mov $409,"ސߘؓs[xSI瑁B"
	mov %120,408: mov %121,409:mov %122,24:gosub *messagefont
	$408
	$409@

	mov $410,"@@"
	mov $411,"^C"
	mov $412,"@CCnvlgIB"
	mov %120,410: mov %121,412:mov %122,24:gosub *messagefont
	br
	$411
	$412@

	mov $413,"捪{szًLYrŖ@C"
	mov $414,"CC~sρB"
	mov $423,"Vccg҉IcIڎ"
	mov %120,413: mov %121,414:mov %122,24:gosub *messagefont
	mov %120,423: mov %121,423:mov %122,24:gosub *messagefont
	$413
	$414@/
	$423/
	add $414,$423/
	mov $415,"@"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	mov %120,415: mov %121,420:mov %122,24:gosub *messagefont
	\

	mov $401,"Vccg҉IcIڎC"
	mov $402,"vc\񗈁B"
	mov %120,401: mov %121,402:mov %122,24:gosub *messagefont
	$401
	$402@

	mov $403,"C֐wB"
	mov $423,"w餕sCIB"
	mov %120,403: mov %121,403:mov %122,24:gosub *messagefont
	mov %120,423: mov %121,423:mov %122,24:gosub *messagefont
	$403@/
	$423/
	add $403,$423/
	@

	mov $404,"@@"
	mov $405,"s܉񗈁cc"
	mov %120,404: mov %121,405:mov %122,24:gosub *messagefont
	br
	$405@

	mov $406,"@@"
	mov $407,"IccߔПpAs\za@≺EH"
	mov %120,406: mov %121,407:mov %122,24:gosub *messagefont
	br
	$407@

	mov $408,"ґRsVsLC"
	mov $409,"AꎟCߔПpېB"
	mov %120,408: mov %121,409:mov %122,24:gosub *messagefont
	$408
	$409@

	mov $410,"VىIߍU琥ρB"
	mov $411,"uޖ琥៑IꕔC"
	mov $412,"ܕȁccA֐cc"
	mov %120,410: mov %121,412:mov %122,24:gosub *messagefont
	$410
	$411
	$412@

	mov $413,"Ɛ^IYrsvuEH"
	mov %120,413: mov %121,413:mov %122,24:gosub *messagefont
	$413@

	mov $414,"@ʉ䐥CNIԁC"
	mov $415,"ޔЁccQdlIp"
	mov $416,"~B"
	mov %120,414: mov %121,416:mov %122,24:gosub *messagefont
	$414
	$415
	$416@

	mov $417,"ߐC䎩ȁC[mwɋxIB"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	mov %120,417: mov %121,420:mov %122,24:gosub *messagefont
	$417\

	mov $401,"ݓIlF䐥܁C"
	mov $402,"ݓIwqFs汓ɋB"
	mov %120,401: mov %121,402:mov %122,24:gosub *messagefont
	$401
	$402@

	mov $403,"Cs汓ɋC"
	mov $404,"ȕsӛΓȐ݈QdlB"
	mov $405,"CAې\aZЖ\͔VIB"
	mov %120,403: mov %121,405:mov %122,24:gosub *messagefont
	$403
	$404
	$405@

	mov $406,"@@"
	mov $407,"ACFIpx܁C"
	mov $408,"wqFs汒ɋICӍݘlB"
	mov %120,406: mov %121,408:mov %122,24:gosub *messagefont
	br
	$407
	$408@

	mov $409,"YrYŋS\kC"
	mov $410,"Yrʕlw欋ۖ琥\kC"
	mov $411,"lF䐥S~nܜލr檓IԁB"
	mov %120,409: mov %121,411:mov %122,24:gosub *messagefont
	$409
	$410
	$411@

	mov $412,"{s汏YrmڑPB"
	mov %120,412: mov %121,412:mov %122,24:gosub *messagefont
	$412@

	mov $413,"@@"
	mov $414,"FpcFcXCnAǒ៑I楗C"
	mov $415,"FvzdlAdl㉝ঁB"
	mov %120,413: mov %121,415:mov %122,24:gosub *messagefont
	br
	$414
	$415@

	mov $416,"drwɋxC"
	mov $417,"甐lFݐlݑ棁B"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	mov %120,416: mov %121,420:mov %122,24:gosub *messagefont
	$416
	$417\


	mov $401,"R@䐥܁usIցCspIցvB"
	mov %120,401: mov %121,401:mov %122,24:gosub *messagefont
	$401@

	mov $402,"ȑOCݓHIg"
	mov $403,"ې柒ΗГIcc"
	mov %120,402: mov %121,403:mov %122,24:gosub *messagefont
	$402
	$403@

	mov $404,"VYEڗoI^ʑwbЋC"
	mov $405,"܁uސ󖟉apekC"
	mov $406,"sPmIlIvB"
	mov %120,404: mov %121,406:mov %122,24:gosub *messagefont
	$404
	$405
	$406@

	mov $407,"@CMБӐD͐ڐGC"
	mov $408,"O֓IꕔS㋎IB"
	mov $409,"AEڊvLXCvL]B"
	mov %120,407: mov %121,409:mov %122,24:gosub *messagefont
	$407
	$408
	$409@

	mov $410,"@@"
	mov $411,"@ʔƉČIߔƐÖC"
	mov $412,"VYA|Kړވ_B"
	mov %120,410: mov %121,412:mov %122,24:gosub *messagefont
	br
	$411
	$412@

	mov $413,"X啪ICL㈎ҍݗ@waI^^Ï"
	mov $414,"RܜޗL\mlƁB"
	mov $415,"uޗL\mlƁBv"
	mov $416,"ܑNOϒfB"
	mov %120,413: mov %121,416:mov %122,24:gosub *messagefont
	$413
	$414
	$415
	$416@

	mov $417,"ޔВnsCuޛEڋߘݒ[r˗B"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	mov %120,417: mov %121,420:mov %122,24:gosub *messagefont
	$417\


	mov $401,"śfClFx߁B"
	mov %120,401: mov %121,401:mov %122,24:gosub *messagefont
	$401@

	mov $402,"Fp曑꘢C"
	mov $403,"cwqښǒϊaIЉcc"
	mov %120,402: mov %121,403:mov %122,24:gosub *messagefont
	$402
	$403@

	mov $404,"UoVC"
	mov $405,"ASsߓapC"
	mov $406,"R@ܕȖvցB"
	mov %120,404: mov %121,406:mov %122,24:gosub *messagefont
	$404
	$405
	$406@

	mov $407,"cc"
	mov %120,407: mov %121,407:mov %122,24:gosub *messagefont
	$407@

	mov $408,"@@"
	mov $409,"tB"
	mov %120,408: mov %121,409:mov %122,30:gosub *messagefont
	br
	$409/
	QUAKE 25,200
	mov $410,"@"
	mov $411,"@"
	mov $412,"@"
	mov $413,"@"
	mov $414,"@"
	mov $415,"@"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	mov %120,410: mov %121,420:mov %122,24:gosub *messagefont
	bgmonce "bgm\se-044.mp3"
	\


	mov $401,"cc⒅ICn×NB"
	mov %120,401: mov %121,401:mov %122,24:gosub *messagefont
	$401@

	mov $402,"sRŌxOB"
	mov %120,402: mov %121,402:mov %122,24:gosub *messagefont
	$402@

	mov $403,"ʒwj⋁xIF⋔vC@ȑB"
	mov %120,403: mov %121,403:mov %122,24:gosub *messagefont
	$403@

	mov $404,"@@"
	mov $405,"ucccIv"
	mov %120,404: mov %121,405:mov %122,24:gosub *messagefont
	br
	$405@

	mov $406,"@@"
	mov $407,"A݉ӛΓ[ICEsyB"
	mov %120,406: mov %121,407:mov %122,24:gosub *messagefont
	br
	$407@

	mov $408,"䐳召VOIx"
	mov $409,"暜餖{͓I⋁B"
	mov $410,"@"
	mov $411,"@"
	mov $412,"@"
	mov $413,"@"
	mov $414,"@"
	mov $415,"@"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	mov %120,408: mov %121,420:mov %122,24:gosub *messagefont
	$408
	$409\

	textoff
	bg black,17

	bgmfadeout 1000
	bgmstop

	wait 4000

;ʉF̐@iiv[vj
	bgm "bgm\SE_IN200.mp3"
	bg "bg\tonarieki.jpg",12

	wait 4000

	textoff


	mov $401,"uߘC⋗ccȍ݉⋉͗B"
	mov %120,401: mov %121,401:mov %122,24:gosub *messagefont
	$401@

	mov $402,"vCߐ搇JB"
	mov $423,"C߉Akccv"
	mov %120,402: mov %121,402:mov %122,24:gosub *messagefont
	mov %120,423: mov %121,423:mov %122,24:gosub *messagefont
	$402@/
	$423/
	add $402,$423/
	@

	mov $403,"@@"
	mov $404,"HItC^旓I衎q񎦉抍݈NB"
	mov %120,403: mov %121,404:mov %122,24:gosub *messagefont
	br
	$404@

	mov $405,"c斋N܁CȗB"
	mov %120,405: mov %121,405:mov %122,24:gosub *messagefont
	$405@

	mov $406,"揁Cސ݊vcc"
	mov %120,406: mov %121,406:mov %122,24:gosub *messagefont
	$406@

	mov $407,"ψꗈCAZD"
	mov $408,"z͖vӖJB"
	mov %120,407: mov %121,408:mov %122,24:gosub *messagefont
	$407
	$408@

	mov $409,"@@"
	mov $410,"VC拌nƗC"
	mov $411,"R@r蓙ǉÍB"
	mov %120,409: mov %121,411:mov %122,24:gosub *messagefont
	br
	$410
	$411@

	mov $412,"召LǓInHB"
	mov $413,"餉֗LʓIi㱁B"
	mov %120,412: mov %121,413:mov %122,24:gosub *messagefont
	$412
	$413@

	mov $414,"@@"
	mov $415,"ĉsmV{ȗC"
	mov $416,"ݗ⋑Iʈ֏B"
	mov %120,414: mov %121,416:mov %122,24:gosub *messagefont
	br
	$415
	$416@

	mov $417,"mIِl⋁CSŕsqIgeB"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	mov %120,417: mov %121,420:mov %122,24:gosub *messagefont
	$417\


	mov $401,"ŗ\Cݐu_O\ܕB"
	mov %120,401: mov %121,401:mov %122,24:gosub *messagefont
	$401@

	mov $402,"ޘCZs͉z藁B"
	mov %120,402: mov %121,402:mov %122,24:gosub *messagefont
	$402@

	mov $403,"ƍ@UCR@uB"
	mov %120,403: mov %121,403:mov %122,24:gosub *messagefont
	$403@

	mov $404,"CvAϙߒʈ֏C"
	mov $405,"ܕssS藁B"
	mov %120,404: mov %121,405:mov %122,24:gosub *messagefont
	$404
	$405@

	mov $406,"ݜޔВnƎlC"
	mov $407,"ҏ㏫߈꘢Ӎݐ֗B"
	mov %120,406: mov %121,407:mov %122,24:gosub *messagefont
	$406
	$407@

	mov $408,"@@"
	mov $409,"̗̌܁CŊŗLvLYr@B"
	mov %120,408: mov %121,409:mov %122,24:gosub *messagefont
	br
	$409@

	mov $410,"戕As`AwZW@I`AfB"
	mov $411,"{spIC⋑OGI惋Ёcc"
	mov %120,410: mov %121,411:mov %122,24:gosub *messagefont
	$410
	$411@

	mov $412,"֗L{pgl{B"
	mov %120,412: mov %121,412:mov %122,24:gosub *messagefont
	$412@

	mov $413,"IccYrsvL|JB"
	mov %120,413: mov %121,413:mov %122,24:gosub *messagefont
	$413@

	mov $414,"|Cl{C"
	mov $415,"|CҔOdaۉB"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	mov %120,414: mov %121,420:mov %122,24:gosub *messagefont
	$414
	$415\

	mov $401,"@w"
	mov %120,401: mov %121,401:mov %122,24:gosub *messagefont
	$401@

	mov $402,"@@"
	mov $403,"ґR꒼ݎvlCvH筎C"
	mov $404,"A{BC֐wB"
	mov %120,402: mov %121,404:mov %122,24:gosub *messagefont
	br
	$403
	$404@

	mov $405,"s܉Iw蚌EB"
	mov %120,405: mov %121,405:mov %122,24:gosub *messagefont
	$405@

	mov $406,"ݓI䗈܁Ca"
	mov $407,"Cߕs吥៑IHCȍ๘srB"
	mov $408,"ߘVCC"
	mov $409,"k蓘aВm΁B"
	mov %120,406: mov %121,409:mov %122,24:gosub *messagefont
	$406
	$407
	$408
	$409@

	mov $410,"@@"
	mov $411,""
	mov %120,410: mov %121,411:mov %122,24:gosub *messagefont
	br
	$411@

	mov $412,"@@"
	mov $413,"\ӛΓȐݐʓIu㱁C^IkCSB"
	mov %120,412: mov %121,413:mov %122,24:gosub *messagefont
	br
	$413@

	mov $414,"ܓCL鈉sCȓIʊ藁C"
	mov $415,"vLJB"
	mov $423,"ccdaIlB"
	mov %120,414: mov %121,415:mov %122,24:gosub *messagefont
	mov %120,423: mov %121,423:mov %122,24:gosub *messagefont
	$414
	$415@/
	$423/
	add $415,$423/
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	mov %120,416: mov %121,420:mov %122,24:gosub *messagefont
	\


	mov $401,""
	mov %120,401: mov %121,401:mov %122,24:gosub *messagefont
	$401@

	mov $402,"@@"
	mov $403,"䐥C֐픗H"
	mov %120,402: mov %121,403:mov %122,24:gosub *messagefont
	br
	$403@

	mov $404,"Cߍٖ@CȓIʊ悓IlC"
	mov $405,"uF{Zs݊B"
	mov %120,404: mov %121,405:mov %122,24:gosub *messagefont
	$404
	$405@

	mov $406,"@@"
	mov $407,""
	mov %120,406: mov %121,407:mov %122,24:gosub *messagefont
	br
	$407@

	mov $408,"@@"
	mov $409,"cccB"
	mov %120,408: mov %121,409:mov %122,24:gosub *messagefont
	br
	$409@

	mov $410,"ccccccB"
	mov %120,410: mov %121,410:mov %122,24:gosub *messagefont
	$410@

	mov $411,"@݉䎀ccLC䊴߈藁H"
	mov %120,411: mov %121,411:mov %122,24:gosub *messagefont
	$411@

	mov $412,"aꍱVFƊs@C"
	mov $413,"wZߍlr藁H"
	mov %120,412: mov %121,413:mov %122,24:gosub *messagefont
	$412
	$413@

	mov $414,"CNFsC\EU䎧@C"
	mov $415,"ǏIwsC꒼݁wӉyx@藁H"
	mov %120,414: mov %121,415:mov %122,24:gosub *messagefont
	$414
	$415@

	mov $416,"Xd܁C@ʉ֗Iԁcc"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	mov %120,416: mov %121,420:mov %122,24:gosub *messagefont
	$416\

;ʉ~
	bgmfadeout 1000
	bgmstop

	mov $401,"uߐݎvlgSIEHv"
	mov %120,401: mov %121,401:mov %122,24:gosub *messagefont
	$401@

	mov $402,"@@"
	mov $403,"@@"
	mov $404,"uIv"
	mov %120,402: mov %121,404:mov %122,33:gosub *messagefont
	br
	br
	$404/
	QUAKE 20,200
	@

	mov $405,"@@"
	mov $406,"rˑR⁗IB"
	mov %120,405: mov %121,406:mov %122,24:gosub *messagefont
	br
	$406@

	mov $407,"䌴CޗmvlC"
	mov $408,"SЖҒnꉺB"
	mov %120,407: mov %121,408:mov %122,24:gosub *messagefont
	$407
	$408@

	mov $409,"@@"
	mov $410,"uCٕsNCߗ藁Bv"
	mov $411,"@"
	mov $412,"@"
	mov $413,"@"
	mov $414,"@"
	mov $415,"@"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	mov %120,409: mov %121,420:mov %122,24:gosub *messagefont
	br
	$410\

	textoff


	bg "bg\tonarieki_bure.jpg",1
	wait 1000

	ld l,":a;tatie\yuuki\tuujyou.bmp",12
	wait 2000

;ʉFz[i[vȂj
	bgmonce "bgm\horror4.mp3"
	ld r,":a;tatie\sensei\tuujyou1.bmp",19
	wait 3000

	texton

	mov $401,"Ò⋒꘢jlB"
	mov %120,401: mov %121,401:mov %122,24:gosub *messagefont
	$401@

	mov $402,"CXq㓾kCŕsIcB"
	mov %120,402: mov %121,402:mov %122,24:gosub *messagefont
	$402@

	mov $403,"CGՓIC"
	mov $404,"o蝇aqܗB"
	mov %120,403: mov %121,404:mov %122,24:gosub *messagefont
	$403
	$404@

	mov $405,"hlАӎUIہC"
	mov $406,"AgUۓIߔЈ㊴pݏB"
	mov %120,405: mov %121,406:mov %122,24:gosub *messagefont
	$405
	$406@

	mov $407,"CNߔБֈϓI㊴֗v[℁C"
	mov $408,"ߐbŗvؓIÁB"
	mov %120,407: mov %121,408:mov %122,24:gosub *messagefont
	$407
	$408@

	mov $409,"@@"
	mov $410,"uŋN迈꒼\^w蚁C"
	mov $411,"{szoߓIccv"
	mov %120,409: mov %121,411:mov %122,24:gosub *messagefont
	br
	$410
	$411@

	mov $412,"\IwqC"
	mov $413,"ݐ[IِlVʒwxIρC"
	mov $414,"rœssJBv"
	mov %120,412: mov %121,414:mov %122,24:gosub *messagefont
	$412
	$413
	$414@

	mov $415,"@@"
	mov $416,"ucIv"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	mov %120,415: mov %121,420:mov %122,24:gosub *messagefont
	br
	$416\


	mov $401,"uAZ\C"
	mov $402,"笕s\zB"
	mov %120,401: mov %121,402:mov %122,24:gosub *messagefont
	$401
	$402@

	mov $403,"pkɁCݎkÎB"
	mov $404,"ΘaIԁC̉SB"
	mov %120,403: mov %121,404:mov %122,24:gosub *messagefont
	$403
	$404@

	mov $405,"CٗC疜dOB"
	mov %120,405: mov %121,405:mov %122,24:gosub *messagefont
	$405@

	mov $406,"דn㍜aዅsȏoC"
	mov $407,"^sDrs藁ClAρBv"
	mov %120,406: mov %121,407:mov %122,24:gosub *messagefont
	$406
	$407@

	mov $408,"@@"
	mov $409,"uccv"
	mov %120,408: mov %121,409:mov %122,24:gosub *messagefont
	br
	$409@

	mov $410,"@@"
	mov $411,"u֗LpۜވꏵC"
	mov $412,"ߜޘNCChލ@AkJB"
	mov %120,410: mov %121,412:mov %122,24:gosub *messagefont
	br
	$411
	$412@

	mov $413,"\ŋNsӁB"
	mov %120,413: mov %121,413:mov %122,24:gosub *messagefont
	$413@

	mov $414,"捕d\ŉlړI@B"
	mov $415,"sCމhklYWccv"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	mov %120,414: mov %121,420:mov %122,24:gosub *messagefont
	$414
	$415\

	textoff

	ld l,":a;tatie\yuuki\keno.bmp",12

	texton




	mov $401,"uߘCccvLzvBv"
	mov %120,401: mov %121,401:mov %122,24:gosub *messagefont
	$401@

	mov $402,"@@"
	mov $403,"uݐρBv"
	mov %120,402: mov %121,403:mov %122,24:gosub *messagefont
	br
	$403@

	mov $404,"@@"
	mov $405,"ucc"
	mov $423,"݁Hv"
	mov %120,404: mov %121,405:mov %122,24:gosub *messagefont
	mov %120,423: mov %121,423:mov %122,24:gosub *messagefont
	br
	$405@/
	$423/
	add $405,$423/
	@

	mov $406,"@@"
	mov $407,"uفC֗ĹC"
	mov $408,"\IxvYrsIB"
	mov %120,406: mov %121,408:mov %122,24:gosub *messagefont
	br
	$407
	$408@

	mov $409,"ACCn߉꒼ݓꏊwZwB"
	mov %120,409: mov %121,409:mov %122,24:gosub *messagefont
	$409@

	mov $410,"ݜފ㱁CߐgݑQcc"
	mov $411,"zۈꉺJBv"
	mov $412,"@"
	mov $413,"@"
	mov $414,"@"
	mov $415,"@"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	mov %120,410: mov %121,420:mov %122,24:gosub *messagefont
	$410
	$411\

	textoff

	ld l,":a;tatie\yuuki\tuujyou.bmp",12

	textoff


	mov $401,"ucccv"
	mov %120,401: mov %121,401:mov %122,24:gosub *messagefont
	$401@

	mov $402,"@@"
	mov $403,"^甐ls[IgB"
	mov %120,402: mov %121,403:mov %122,24:gosub *messagefont
	br
	$403@

	mov $404,"svzލB"
	mov $405,"ccACsʕszFB"
	mov %120,404: mov %121,405:mov %122,24:gosub *messagefont
	$404
	$405@

	mov $406,"@s꒼UBޏAӁB"
	mov %120,406: mov %121,406:mov %122,24:gosub *messagefont
	$406@

	mov $407,"@@"
	mov $408,"u槗B܌BzB"
	mov %120,407: mov %121,408:mov %122,24:gosub *messagefont
	br
	$408@

	mov $409,"EsZρC㱊VnB"
	mov %120,409: mov %121,409:mov %122,24:gosub *messagefont
	$409@

	mov $410,"ӏCݛEz厀SJH"
	mov $411,"gȓICIlrzcc"
	mov %120,410: mov %121,411:mov %122,24:gosub *messagefont
	$410
	$411@

	mov $412,"CԝQߘĘaiPIЁClFˉZ]SBv"
	mov %120,412: mov %121,412:mov %122,24:gosub *messagefont
	$412@

	mov $413,"@@"
	mov $414,"ucccv"
	mov $415,"@"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	mov %120,413: mov %121,420:mov %122,24:gosub *messagefont
	br
	$414\

;ʉF̐@iiv[vj
	bgm "bgm\SE_IN200.mp3"

	mov $401,"uvCdrx茚vB"
	mov $402,"vsvtYVHv"
	mov %120,401: mov %121,402:mov %122,24:gosub *messagefont
	$401
	$402@

	mov $403,"@@"
	mov $404,"ܒCߒjlÚS}B"
	mov %120,403: mov %121,404:mov %122,24:gosub *messagefont
	br
	$404@

	mov $405,"ݑLqlIِl⋗C܎qInВB"
	mov %120,405: mov %121,405:mov %122,24:gosub *messagefont
	$405@

	mov $406,"@@"
	mov $407,"uscAspBv"
	mov %120,406: mov %121,407:mov %122,24:gosub *messagefont
	br
	$407@

	mov $408,"@@"
	mov $409,"ussGB"
	mov $410,"ŋߙ{vDDhJHv"
	mov %120,408: mov %121,410:mov %122,24:gosub *messagefont
	br
	$409
	$410@

	mov $411,"@@"
	mov $412,"ucߊœoEHv"
	mov $413,"@"
	mov $414,"@"
	mov $415,"@"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	mov %120,411: mov %121,420:mov %122,24:gosub *messagefont
	br
	$412\


	mov $401,"uRœoB"
	mov $423,"a\qIB"
	mov %120,401: mov %121,401:mov %122,24:gosub *messagefont
	mov %120,423: mov %121,423:mov %122,24:gosub *messagefont
	$401@/
	$423/
	add $401,$423/
	@

	mov $402,"_ߛENTߓIICۗ[HǘasǁB"
	mov %120,402: mov %121,402:mov %122,24:gosub *messagefont
	$402@

	mov $403,"喔IːFCIǵB"
	mov $404,"ߓIǵCECnۏoGB"
	mov %120,403: mov %121,404:mov %122,24:gosub *messagefont
	$403
	$404@

	mov $405,"cIɐ琥VIB"
	mov $406,"ŋNŋߍ˗IBv"
	mov %120,405: mov %121,406:mov %122,24:gosub *messagefont
	$405
	$406@

	mov $407,"@@"
	mov $408,"ucv"
	mov %120,407: mov %121,408:mov %122,24:gosub *messagefont
	br
	$408@

	mov $409,"@@"
	mov $410,"䉺ӛΒn̗֍認ɓIEc礁B"
	mov $411,"ސcIc"
	mov %120,409: mov %121,411:mov %122,24:gosub *messagefont
	br
	$410
	$411@

;ʉF̔@
	dwave 2,"wave\jidou.wav"
	wait 1000
	mov $412,"zލICߒjlEÚS}dSC"
	mov $413,"oq㣌YVB"
	mov %120,412: mov %121,413:mov %122,24:gosub *messagefont
	$412
	$413@

	mov $414,"N嗈IC㣊։JYVB"
	mov $415,"dv笓IԁCuL_sDӎvCD|ڗ嗈B"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	mov %120,414: mov %121,420:mov %122,24:gosub *messagefont
	$414
	$415\


	mov $401,"udqC苗pJB"
	mov $402,"YVوIӊOn֒aIGBv"
	mov %120,401: mov %121,402:mov %122,24:gosub *messagefont
	$401
	$402@

	mov $403,"@@"
	mov $404,"܊@CCȓI㣑YVC"
	mov $405,"ÐÒnB"
	mov %120,403: mov %121,405:mov %122,24:gosub *messagefont
	br
	$404
	$405@

	mov $406,"ŁCܗ\oIC"
	mov $407,"qsՒF蓅B"
	mov %120,406: mov %121,407:mov %122,24:gosub *messagefont
	$406
	$407@

	mov $408,"HVՎ蓅CvYrHIJc"
	mov %120,408: mov %121,408:mov %122,24:gosub *messagefont
	$408@

	mov $409,"@@"
	mov $410,"u߉AcsqBv"
	mov %120,409: mov %121,410:mov %122,24:gosub *messagefont
	br
	$410@

	mov $411,"@@"
	mov $412,"CN嗈I㣎qCCʘB"
	mov %120,411: mov %121,412:mov %122,24:gosub *messagefont
	br
	$412@

	mov $413,"\Cu㱗LvC"
	mov $414,"ImSމXvr`B"
	mov %120,413: mov %121,414:mov %122,24:gosub *messagefont
	$413
	$414@

	mov $415,"gIYV[HÁC"
	mov $416,"dГIݗB"
	mov %120,415: mov %121,416:mov %122,24:gosub *messagefont
	$415
	$416@

	mov $417,"󒅑펡ʓIGC"
	mov $418,"䖔AOB"
	mov $419,"@"
	mov $420,"@"
	mov %120,417: mov %121,420:mov %122,24:gosub *messagefont
	$417
	$418\


	mov $401,"sC֐^IlB"
	mov %120,401: mov %121,401:mov %122,24:gosub *messagefont
	$401@

	mov $402,"FʁC"
	mov $403,"smCYrCusꎟFʁB"
	mov %120,402: mov %121,403:mov %122,24:gosub *messagefont
	$402
	$403@

	mov $404,"DىwmSxIkc"
	mov %120,404: mov %121,404:mov %122,24:gosub *messagefont
	$404@

	mov $405,"퐥Yrl藁HIgIlEH"
	mov %120,405: mov %121,405:mov %122,24:gosub *messagefont
	$405@

	mov $406,"@@"
	mov $407,"uuzmEHvv"
	mov %120,406: mov %121,407:mov %122,24:gosub *messagefont
	br
	$407@

	mov $408,"@@"
	mov $409,"uucHvv"
	mov %120,408: mov %121,409:mov %122,24:gosub *messagefont
	br
	$409@

	mov $410,"@@"
	mov $411,"ugߓIGB"
	mov %120,410: mov %121,411:mov %122,24:gosub *messagefont
	br
	$411@

	mov $412,"@ߎCV@rρB"
	mov $413,"@ߜÈә߉IRCȍG߁B"
	mov %120,412: mov %121,413:mov %122,24:gosub *messagefont
	$412
	$413@

	mov $414,"rρHv"
	mov %120,414: mov %121,414:mov %122,24:gosub *messagefont
	$414@

	mov $415,"@@"
	mov $416,"ucccv"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	mov %120,415: mov %121,420:mov %122,24:gosub *messagefont
	br
	$416\


	mov $401,"ޘlꐥr񎖁c"
	mov %120,401: mov %121,401:mov %122,24:gosub *messagefont
	$401@

	mov $402,"֑㐶gSIǵC"
	mov $403,"݋pCn@SB"
	mov %120,402: mov %121,403:mov %122,24:gosub *messagefont
	$402
	$403@

	mov $404,"uL_^B"
	mov %120,404: mov %121,404:mov %122,24:gosub *messagefont
	$404@

	mov $405,"@@"
	mov $406,"sc|ss[C悎IB"
	mov %120,405: mov %121,406:mov %122,24:gosub *messagefont
	br
	$406@

	mov $407,"˗艕\B"
	mov $408,"˘͏㉺C"
	mov $409,"D֕s\艁B"
	mov %120,407: mov %121,409:mov %122,24:gosub *messagefont
	$407
	$408
	$409@

	mov $410,"L槓I㱙ߜޘlIԁB"
	mov %120,410: mov %121,410:mov %122,24:gosub *messagefont
	$410@

	mov $411,"@@"
	mov $412,"@嗹CBĖߕsϓI敒ԗB"
	mov %120,411: mov %121,412:mov %122,24:gosub *messagefont
	br
	$412@

	mov $413,"cpgl{ܗC"
	mov $414,"o般ZꔼeI՝f㣉񓚓B"
	mov $415,"@"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	mov %120,413: mov %121,420:mov %122,24:gosub *messagefont
	$413
	$414\


	mov $401,"uccz߁Bv"
	mov %120,401: mov %121,401:mov %122,24:gosub *messagefont
	$401@

	mov $402,"@@"
	mov $403,"ukDCrFFꉺJB"
	mov %120,402: mov %121,403:mov %122,24:gosub *messagefont
	br
	$403@

	mov $404,"苒ډ񓚉IVCzYrA܏YrB"
	mov %120,404: mov %121,404:mov %122,24:gosub *messagefont
	$404@

	mov $405,"ȘEHv"
	mov %120,405: mov %121,405:mov %122,24:gosub *messagefont
	$405@

	mov $406,"@@"
	mov $407,"uCDIBv"
	mov %120,406: mov %121,407:mov %122,24:gosub *messagefont
	br
	$407@

	mov $408,"@@"
	mov $409,"ޒ񊖕L_B"
	mov %120,408: mov %121,409:mov %122,24:gosub *messagefont
	br
	$409@

	mov $410,"CYrsuȘEHvC"
	mov $411,"uvVEHv藁H"
	mov %120,410: mov %121,411:mov %122,24:gosub *messagefont
	$410
	$411@

	mov $412,"@@"
	mov $413,"uc苍G迓IJB"
	mov %120,412: mov %121,413:mov %122,24:gosub *messagefont
	br
	$413@

	mov $414,"@ʕsÈӓIԁCpȚGBv"
	mov %120,414: mov %121,414:mov %122,24:gosub *messagefont
	$414@

	mov $415,"@@"
	mov $416,"ucccB美_IuvCsIucvBv"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	mov %120,415: mov %121,420:mov %122,24:gosub *messagefont
	br
	$416\

	mov $401,"u^qB"
	mov %120,401: mov %121,401:mov %122,24:gosub *messagefont
	$401@

	mov $402,"C苏̌ĉCwVxJB"
	mov $403,"ґRICA݉DeߓIvBv"
	mov %120,402: mov %121,403:mov %122,24:gosub *messagefont
	$402
	$403@

	mov $404,"rCcNCFCߏݎJBv"
	mov %120,404: mov %121,404:mov %122,24:gosub *messagefont
	$404@

	mov $405,"@@"
	mov $406,"VHvFr^IVB"
	mov %120,405: mov %121,406:mov %122,24:gosub *messagefont
	br
	$406@

	mov $407,"s܉񗈁Cec㗈ASCnEc"
	mov %120,407: mov %121,407:mov %122,24:gosub *messagefont
	$407@

	mov $408,"@@"
	mov $409,"u\B"
	mov $410,"엢ʉ퓯wFYrC"
	mov $411,"ٖ@X㏓IsÐSC"
	mov $412,"lFWȓIsKB"
	mov %120,408: mov %121,412:mov %122,24:gosub *messagefont
	br
	$409
	$410
	$411
	$412@

	mov $413,"ޏACIw\xB"
	mov %120,413: mov %121,413:mov %122,24:gosub *messagefont
	$413@

	mov $414,"rC߉Iތ藁H"
	mov $415,"ƗCwZCґnCe돊sȁccv"
	mov %120,414: mov %121,415:mov %122,24:gosub *messagefont
	$414
	$415@

	mov $416,"@@"
	mov $417,"uCccwZJBv"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	mov %120,416: mov %121,420:mov %122,24:gosub *messagefont
	br
	$417\

	mov $401,"uCŗLIJB"
	mov $402,"݊wZC{gA\IӖB"
	mov %120,401: mov %121,402:mov %122,24:gosub *messagefont
	$401
	$402@

	mov $403,"엢vʍYr藁H"
	mov %120,403: mov %121,403:mov %122,24:gosub *messagefont
	$403@

	mov $404,"ٕI]ӁCً\IC"
	mov $405,"ٓ{IsxB"
	mov %120,404: mov %121,405:mov %122,24:gosub *messagefont
	$404
	$405@

	mov $406,"]ȓIsvEC]\甐lL@uC"
	mov $407,"]Љ\LIÖ]B"
	mov $423,"ccTAJHv"
	mov %120,406: mov %121,407:mov %122,24:gosub *messagefont
	mov %120,423: mov %121,423:mov %122,24:gosub *messagefont
	$406
	$407@/
	$423/
	add $407,$423/
	@

	mov $408,"@@"
	mov $409,"uAIccv"
	mov %120,408: mov %121,409:mov %122,24:gosub *messagefont
	br
	$409@

	mov $410,"@@"
	mov $411,"lȓI@ae"
	mov $412,"uTAJHv֐^ЊIuB"
	mov %120,410: mov %121,412:mov %122,24:gosub *messagefont
	br
	$411
	$412@

	mov $413,"ݘa_ْԈρB"
	mov $414,"@"
	mov $415,"@"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	mov %120,413: mov %121,420:mov %122,24:gosub *messagefont
	$413\


	mov $401,"uސpCIꎟl錾vB"
	mov $402,"@ʈ꘢lIAhC"
	mov $403,"m掓JB"
	mov %120,401: mov %121,403:mov %122,24:gosub *messagefont
	$401
	$402
	$403@

	mov $404,"ۓ{a߈㫁CǏIwF"
	mov $405,"@nzwFٖ@҉IxC"
	mov $406,"}̉\ߓIړCS{dB"
	mov %120,404: mov %121,406:mov %122,24:gosub *messagefont
	$404
	$405
	$406@

	mov $407,"@ʈ[IԁC"
	mov $408,"ܕs萭qF։BNތ藁B"
	mov %120,407: mov %121,408:mov %122,24:gosub *messagefont
	$407
	$408@

	mov $409,"ߎȁCSٔB"
	mov $410,"ĖsClwgCs󓞍UB"
	mov %120,409: mov %121,410:mov %122,24:gosub *messagefont
	$409
	$410@

	mov $411,"LIaɋsEB"
	mov %120,411: mov %121,411:mov %122,24:gosub *messagefont
	$411@

	mov $412,"ccޏAT^Iw\xIړIB"
	mov $413,"\IwCTAϓIÖ]JBv"
	mov $414,"cc"
	mov %120,412: mov %121,414:mov %122,24:gosub *messagefont
	$412
	$413
	$414@

	mov $415,"@@"
	mov $416,"uޘl䐥S`Wʒn܏oލIԎVBv"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	mov %120,415: mov %121,420:mov %122,24:gosub *messagefont
	br
	$416\


	mov $401,"sC\ܓIevLցB"
	mov %120,401: mov %121,401:mov %122,24:gosub *messagefont
	$401@

	mov $402,"sC\ܓIevLցB"
	mov %120,402: mov %121,402:mov %122,24:gosub *messagefont
	$402@

	mov $403,"甎Ilm^CȋyɋꒆEB"
	mov $404,"ƎCTsqÖ]Jcc䐥rzIB"
	mov %120,403: mov %121,404:mov %122,24:gosub *messagefont
	$403
	$404@

	mov $405,"@ʍĉ_YrIԁcc"
	mov %120,405: mov %121,405:mov %122,24:gosub *messagefont
	$405@

	mov $406,"@@"
	mov $407,"uٗCً\ғIwB"
	mov %120,406: mov %121,407:mov %122,24:gosub *messagefont
	br
	$407@

	mov $408,"@ʗv_YrIԁCAޘJBv"
	mov %120,408: mov %121,408:mov %122,24:gosub *messagefont
	$408@

	mov $409,"@@"
	mov $410,"V݉SzVOCڒܓB"
	mov $411,"@"
	mov $412,"@"
	mov $413,"@"
	mov $414,"@"
	mov $415,"@"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	mov %120,409: mov %121,420:mov %122,24:gosub *messagefont
	br
	$410\


	mov $401,"uAZwqC\dlNHIlC"
	mov $402,"笕s\SՒEgBv"
	mov %120,401: mov %121,402:mov %122,24:gosub *messagefont
	$401
	$402@

	mov $403,"ugY@IفC"
	mov $404,"eNlfޘӁC"
	mov $405,"qݏdnݓߘlgBv"
	mov %120,403: mov %121,405:mov %122,24:gosub *messagefont
	$403
	$404
	$405@

	mov $406,"urꗈCw\xCܐЎsCBv"
	mov $407,"u\җpȓISC\҈NfIō@iBv"
	mov %120,406: mov %121,407:mov %122,24:gosub *messagefont
	$406
	$407@

	mov $408,"uCeʐΚfCAޘӎvJBv"
	mov %120,408: mov %121,408:mov %122,24:gosub *messagefont
	$408@

	mov $409,"@@"
	mov $410,"{sccEB"
	mov %120,409: mov %121,410:mov %122,24:gosub *messagefont
	br
	$410@

	mov $411,"@ʁC݁cc䎀IԁC"
	mov $412,"\cCFNEH"
	mov %120,411: mov %121,412:mov %122,24:gosub *messagefont
	$411
	$412@

	mov $413,"ȓIꐶCv[{ߍƌIlB"
	mov $414,"ϓIcc\Ecc"
	mov $415,"@"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	mov %120,413: mov %121,420:mov %122,24:gosub *messagefont
	$413
	$414\


;ʉXgbv
	bgmfadeout 1000
	bgmstop

	mov $401,"uDcc"
	mov $423,"NޗAs槗JB"
	mov %120,401: mov %121,401:mov %122,24:gosub *messagefont
	mov %120,423: mov %121,423:mov %122,24:gosub *messagefont
	$401@/
	$423/
	add $401,$423/
	@

	mov $402,"ډwIRxGCcNBv"
	mov %120,402: mov %121,402:mov %122,24:gosub *messagefont
	$402@

	mov $403,"@@"
	mov $404,"uccH"
	mov %120,403: mov %121,404:mov %122,24:gosub *messagefont
	br
	$404@

	mov $405,"߁AܓIߍHv"
	mov %120,405: mov %121,405:mov %122,24:gosub *messagefont
	$405@

	mov $406,"@@"
	mov $407,"uC@ʍdvܓIԁcc"
	mov %120,406: mov %121,407:mov %122,24:gosub *messagefont
	br
	$407@

	mov $408,"Aߍ\IweՕLIC"
	mov $409,"{s\IϑzJBv"
	mov $410,"@"
	mov $411,"@"
	mov $412,"@"
	mov $413,"@"
	mov $414,"@"
	mov $415,"@"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	mov %120,408: mov %121,420:mov %122,24:gosub *messagefont
	$408
	$409\


	textoff

	ld l,":a;tatie\yuuki\keno.bmp",12

	texton


	mov $401,"uρAϑzHHv"
	mov %120,401: mov %121,401:mov %122,24:gosub *messagefont
	$401@

	mov $402,"@@"
	mov $403,"uICAϑzB"
	mov $404,"甕ꈻSވ_VOCISsccv"
	mov %120,402: mov %121,404:mov %122,24:gosub *messagefont
	br
	$403
	$404@

	mov $405,"@@"
	mov $406,"uYAYrccI"
	mov %120,405: mov %121,406:mov %122,24:gosub *messagefont
	br
	$406@

	mov $407,"CޔЎݛ惘aVYsEړEH"
	mov %120,407: mov %121,407:mov %122,24:gosub *messagefont
	$407@

	mov $408,"NOCZʑFfZ]ccv"
	mov %120,408: mov %121,408:mov %122,24:gosub *messagefont
	$408@

	mov $409,"@@"
	mov $410,"u^DIԁC\掓ޔВxJB"
	mov %120,409: mov %121,410:mov %122,24:gosub *messagefont
	br
	$410@

	mov $411,"A嗈܁CA\掓ޔВxBv"
	mov $412,"}̓IړvC"
	mov $413,"LEIொB"
	mov %120,411: mov %121,413:mov %122,24:gosub *messagefont
	$411
	$412
	$413@

	mov $414,"㱈ʏA浖YCśfdBv"
	mov %120,414: mov %121,414:mov %122,24:gosub *messagefont
	$414@

	mov $415,"@@"
	mov $416,"ucccv"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	mov %120,415: mov %121,420:mov %122,24:gosub *messagefont
	br
	$416\


	mov $401,"ӁCVYVssfXV"
	mov $402,"VIeB"
	mov %120,401: mov %121,402:mov %122,24:gosub *messagefont
	$401
	$402@

	mov $403,"gLl{IړCsgvB"
	mov %120,403: mov %121,403:mov %122,24:gosub *messagefont
	$403@

	mov $404,"AC֔@ccܓIߍr\ϑzcc"
	mov %120,404: mov %121,404:mov %122,24:gosub *messagefont
	$404@

	mov $405,"@@"
	mov $406,"uߘccVC@ʋ\lIwcc"
	mov $407,"푼F\IwqIԁccr藁H"
	mov %120,405: mov %121,407:mov %122,24:gosub *messagefont
	br
	$406
	$407@

	mov $408,"F󓞑ňCR@JHv"
	mov %120,408: mov %121,408:mov %122,24:gosub *messagefont
	$408@

	mov $409,"@@"
	mov $410,"ucc]JB"
	mov $411,"sCޘEEBv"
	mov %120,409: mov %121,411:mov %122,24:gosub *messagefont
	br
	$410
	$411@

	mov $412,"@@"
	mov $413,"VꕛٓޓIώq𔈁C"
	mov $414,"R@L̗̖XqB"
	mov %120,412: mov %121,414:mov %122,24:gosub *messagefont
	br
	$413
	$414@

	mov $415,"XCIcIo_B"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	mov %120,415: mov %121,420:mov %122,24:gosub *messagefont
	$415\

	textoff
	wait 1000
	bgm "bgm\free56.mp3"
	ld r,":a;tatie\sensei\tuujyou2.bmp",12

	wait 2000

	mov $401,"uȁHFr\藁B"
	mov %120,401: mov %121,401:mov %122,24:gosub *messagefont
	$401@

	mov $402,"C֐NlCȕs픻dߛB"
	mov $403,"F󓞓I膌C~AVI{hnB"
	mov %120,402: mov %121,403:mov %122,24:gosub *messagefont
	$402
	$403@

	mov $404,"@ߐCFIss󓞉ekCˑRÔ@B"
	mov $405,"ޘЉrBߍNwI\ҁC"
	mov $406,"֔\CVIl藁B"
	mov %120,404: mov %121,406:mov %122,24:gosub *messagefont
	$404
	$405
	$406@

	mov $407,"ߌuߍs膌IߐlCȎȘEHv"
	mov %120,407: mov %121,407:mov %122,24:gosub *messagefont
	$407@

	mov $408,"@@"
	mov $409,"ܒ㱁CpߑoΔʓI˘B"
	mov %120,408: mov %121,409:mov %122,24:gosub *messagefont
	br
	$409@

	mov $410,"ߐoÒ递䊁C@IˁB"
	mov %120,410: mov %121,410:mov %122,24:gosub *messagefont
	$410@

	mov $411,"ߐmTFICޘEVOIݔVB"
	mov %120,411: mov %121,411:mov %122,24:gosub *messagefont
	$411@

	mov $412,"vρC"
	mov $413,"lIˍˉϓIF藁c"
	mov %120,412: mov %121,413:mov %122,24:gosub *messagefont
	$412
	$413@

	mov $414,"SgZρC"
	mov $415,"ÈꉺssB"
	mov $416,"ċzDCDCSsY㈗CF[[zZB"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	mov %120,414: mov %121,420:mov %122,24:gosub *messagefont
	$414
	$415
	$416\


	mov $401,"uccccv"
	mov %120,401: mov %121,401:mov %122,24:gosub *messagefont
	$401@

	mov $402,"@@"
	mov $403,"{b艁C|C˕ogB"
	mov %120,402: mov %121,403:mov %122,24:gosub *messagefont
	br
	$403@

	mov $404,"ٛCݕsْԘEH"
	mov $405,"ى䗈ܔdvIc"
	mov %120,404: mov %121,405:mov %122,24:gosub *messagefont
	$404
	$405@

	mov $406,"@@"
	mov $407,"uAߘCAcĜr܁C"
	mov $408,"lCp|يuYrIcޖ瑾cv"
	mov %120,406: mov %121,408:mov %122,24:gosub *messagefont
	br
	$407
	$408@

	mov $409,"@@"
	mov $410,"uߔЍrICs\݁B"
	mov %120,409: mov %121,410:mov %122,24:gosub *messagefont
	br
	$410@

	mov $411,"笕s݁B"
	mov $423,"ߖ琥rzIJHv"
	mov %120,411: mov %121,411:mov %122,24:gosub *messagefont
	mov %120,423: mov %121,423:mov %122,24:gosub *messagefont
	$411@/
	$423/
	add $411,$423/
	@

	mov $412,"ACޔЎTېIB"
	mov %120,412: mov %121,412:mov %122,24:gosub *messagefont
	$412@

	mov $413,"rLCN꘢w@"
	mov $414,"wI掓xC"
	mov $415,"֍݋\wIvLB"
	mov %120,413: mov %121,415:mov %122,24:gosub *messagefont
	$413
	$414
	$415@

	mov $416,"ҁCCsx쒆ʏ㗹C"
	mov $417,"RW̋NGwIccv"
	mov %120,416: mov %121,417:mov %122,24:gosub *messagefont
	$416
	$417@

	mov $418,"@@"
	mov $419,"ucccv"
	mov $420,"@"
	mov %120,418: mov %121,420:mov %122,24:gosub *messagefont
	br
	$419\


	mov $401,"uŋߓIwqFCs汓ɋCsrܘEH"
	mov %120,401: mov %121,401:mov %122,24:gosub *messagefont
	$401@

	mov $402,"cVIڈČ֎~C"
	mov $403,"c܌xmӖI̎cȉׁC"
	mov $404,"lFwqgBwɋIЎqxB"
	mov %120,402: mov %121,404:mov %122,24:gosub *messagefont
	$402
	$403
	$404@

	mov $405,"ȁCs汒ɋIwqFˉ\dlB"
	mov $406,"rzIJHv"
	mov %120,405: mov %121,406:mov %122,24:gosub *messagefont
	$405
	$406@

	mov $407,"@@"
	mov $408,"ucIBv"
	mov %120,407: mov %121,408:mov %122,24:gosub *messagefont
	br
	$408@

	mov $409,"@@"
	mov $410,"􉺈EyIYVB"
	mov %120,409: mov %121,410:mov %122,24:gosub *messagefont
	br
	$410@

	mov $411,"VIԁCaˉSzI͈ρc"
	mov %120,411: mov %121,411:mov %122,24:gosub *messagefont
	$411@

	mov $412,"{悁CRLlazI"
	mov $413,"A݋puŐSvρCs݁B"
	mov $414,"uߛcSB"
	mov $415,"@"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	mov %120,412: mov %121,420:mov %122,24:gosub *messagefont
	$412
	$413
	$414\


	mov $401,"ܛwqsmɋCߐs\IB"
	mov $402,"@ד|G᳎CjIB"
	mov %120,401: mov %121,402:mov %122,24:gosub *messagefont
	$401
	$402@

	mov $403,"ғIB"
	mov %120,403: mov %121,403:mov %122,24:gosub *messagefont
	$403@

	mov $404,"ҒIߋ{IB"
	mov %120,404: mov %121,404:mov %122,24:gosub *messagefont
	$404@

	mov $405,"֗LapߓIldIB"
	mov %120,405: mov %121,405:mov %122,24:gosub *messagefont
	$405@

	mov $406,"lcsCL"
	mov %120,406: mov %121,406:mov %122,24:gosub *messagefont
	$406@

	mov $407,"{spdlC"
	mov $408,"s[̉YrɋIB"
	mov $409,"ALɌuC\󓞒ɐRIB"
	mov %120,407: mov %121,409:mov %122,24:gosub *messagefont
	$407
	$408
	$409@

	mov $410,"@ʕsρCߏAsIlBv"
	mov $411,"@ʕsρCߏAsIlBv"
	mov %120,410: mov %121,411:mov %122,24:gosub *messagefont
	$410
	$411@

	mov $412,"@@"
	mov $413,"ucccv"
	mov %120,412: mov %121,413:mov %122,24:gosub *messagefont
	br
	$413@

	mov $414,"@@"
	mov $415,"uA܁Cv܊SnC"
	mov $416,"lA汓YrɋB"
	mov %120,414: mov %121,416:mov %122,24:gosub *messagefont
	br
	$415
	$416@

	mov $417,"CYrܕsm藁H"
	mov %120,417: mov %121,417:mov %122,24:gosub *messagefont
	$417@

	mov $418,"EHv"
	mov $419,"@"
	mov $420,"@"
	mov %120,418: mov %121,420:mov %122,24:gosub *messagefont
	$418\

	textoff

	ld l,":a;tatie\yuuki\tuujyou.bmp",12


	texton

	mov $401,"uccscBv"
	mov %120,401: mov %121,401:mov %122,24:gosub *messagefont
	$401@

	mov $402,"@@"
	mov $403,"ӁcEvB"
	mov %120,402: mov %121,403:mov %122,24:gosub *messagefont
	br
	$403@

	mov $404,"ACcwߘx܏oIԁc"
	mov %120,404: mov %121,404:mov %122,24:gosub *messagefont
	$404@

	mov $405,"@@"
	mov $406,"uaݓI߈ρB"
	mov %120,405: mov %121,406:mov %122,24:gosub *messagefont
	br
	$406@

	mov $407,"smnB"
	mov %120,407: mov %121,407:mov %122,24:gosub *messagefont
	$407@

	mov $408,"CvC揁cޓӍݐCsEH"
	mov %120,408: mov %121,408:mov %122,24:gosub *messagefont
	$408@

	mov $409,"ݖmɋIvCl։QdlBv"
	mov %120,409: mov %121,409:mov %122,24:gosub *messagefont
	$409@

	mov $410,"@@"
	mov $411,"Cc^IB"
	mov $412,"@"
	mov $413,"@"
	mov $414,"@"
	mov $415,"@"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	mov %120,410: mov %121,420:mov %122,24:gosub *messagefont
	br
	$411\


	mov $401,"ul䑴ÕX\ɋB"
	mov %120,401: mov %121,401:mov %122,24:gosub *messagefont
	$401@

	mov $402,"@CQaSNˉ甐lٔxBv"
	mov $403,"s@QgnCCȓIsÁB"
	mov %120,402: mov %121,403:mov %122,24:gosub *messagefont
	$402
	$403@

	mov $404,"tΙVllȔIC"
	mov $405,"sukLH"
	mov %120,404: mov %121,405:mov %122,24:gosub *messagefont
	$404
	$405@

	mov $406,"r֗LIjWlFӊOSu㱓IEځC"
	mov $407,"ȝSCړIsdB"
	mov %120,406: mov %121,407:mov %122,24:gosub *messagefont
	$406
	$407@

	mov $408,"vցClœdlɋIώqC"
	mov $409,"\槊SIB"
	mov %120,408: mov %121,409:mov %122,24:gosub *messagefont
	$408
	$409@

	mov $410,"p搗a@ϓISgZޔЋ\I{\C"
	mov $411,"lލV㱍˔\oÓIB"
	mov $423,"ޏAЉB"
	mov %120,410: mov %121,411:mov %122,24:gosub *messagefont
	mov %120,423: mov %121,423:mov %122,24:gosub *messagefont
	$410
	$411@/
	$423/
	add $411,$423/
	@

	mov $412,"R@CݔiIlCmȍٙrB"
	mov $423,"ޏAB"
	mov %120,412: mov %121,412:mov %122,24:gosub *messagefont
	mov %120,423: mov %121,423:mov %122,24:gosub *messagefont
	$412@/
	$423/
	add $412,$423/
	@

	mov $413,"ޗ։ȗECcNHv"
	mov %120,413: mov %121,413:mov %122,24:gosub *messagefont
	$413@

	mov $414,"@@"
	mov $415,"uccCȁBv"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	mov %120,414: mov %121,420:mov %122,24:gosub *messagefont
	br
	$415\


	mov $401,"urCĊ߈ꎟB"
	mov %120,401: mov %121,401:mov %122,24:gosub *messagefont
	$401@

	mov $402,"vClAmɋB"
	mov $403,"RCpLl܁w@Iwqs汒ɋxB"
	mov %120,402: mov %121,403:mov %122,24:gosub *messagefont
	$402
	$403@

	mov $404,"ޓꐥr藁Hv"
	mov %120,404: mov %121,404:mov %122,24:gosub *messagefont
	$404@

	mov $405,"@@"
	mov $406,"񎟒񊖁B"
	mov %120,405: mov %121,406:mov %122,24:gosub *messagefont
	br
	$406@

	mov $407,"ψssN٘HށCEvL\I]nB"
	mov %120,407: mov %121,407:mov %122,24:gosub *messagefont
	$407@

	mov $408,"@@"
	mov $409,"uccc"
	mov $423,"CccQBv"
	mov %120,408: mov %121,409:mov %122,24:gosub *messagefont
	mov %120,423: mov %121,423:mov %122,24:gosub *messagefont
	br
	$409@/
	$423/
	add $408,$423/
	@

	mov $410,"@@"
	mov $411,"uQYr藁Hv"
	mov %120,410: mov %121,411:mov %122,24:gosub *messagefont
	br
	$411@

	mov $412,"@@"
	mov $413,"umɋI݁Cp֐Ll݈QlB"
	mov $414,"zCCƊQߘcIJB"
	mov %120,412: mov %121,414:mov %122,24:gosub *messagefont
	br
	$413
	$414@

	mov $415,"XvCߔ@ʐȓIwqccߏAX甐lQBv"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	mov %120,415: mov %121,420:mov %122,24:gosub *messagefont
	$415\


	mov $401,"uC䐥]ȓIwq"
	mov $402,"isߔЎBv"
	mov %120,401: mov %121,402:mov %122,24:gosub *messagefont
	$401
	$402@

	mov $403,"BCCҐCC"
	mov $404,"Nls]cwqmlBv"
	mov %120,403: mov %121,404:mov %122,24:gosub *messagefont
	$403
	$404@

	mov $405,"䤎qIm@CҊI߁B"
	mov $406,"@ʕsȖ^Ќ`seC"
	mov $407,"lAS~nB"
	mov %120,405: mov %121,407:mov %122,24:gosub *messagefont
	$405
	$406
	$407@

	mov $408,"ߒmFI៌ǙXC"
	mov $409,"ғIXX"
	mov $410,"咅ϓIEHv"
	mov $411,"@"
	mov $412,"@"
	mov $413,"@"
	mov $414,"@"
	mov $415,"@"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	mov %120,408: mov %121,420:mov %122,24:gosub *messagefont
	$408
	$409
	$410\


	mov $401,"ulA\́A|@ABAjB"
	mov %120,401: mov %121,401:mov %122,24:gosub *messagefont
	$401@

	mov $402,"FvLܗ\ݎFÐI\"
	mov $403,"Vs@៑ʁB"
	mov %120,402: mov %121,403:mov %122,24:gosub *messagefont
	$402
	$403@

	mov $404,"Nls]wqFϓIЉB"
	mov %120,404: mov %121,404:mov %122,24:gosub *messagefont
	$404@

	mov $405,"NldnٛwqswxB"
	mov %120,405: mov %121,405:mov %122,24:gosub *messagefont
	$405@

	mov $406,"ՖՒnבFs\C"
	mov $407,"@ܗs߁CAÐIڎqC"
	mov $408,"@֐s߁CACwsǏNxA"
	mov $409,"wiss[xCЉuCB"
	mov %120,406: mov %121,409:mov %122,24:gosub *messagefont
	$406
	$407
	$408
	$409@

	mov $410,"C꘢s\Il\槎桔ލÓIЉC"
	mov $411,"JHv"
	mov $412,"@"
	mov $413,"@"
	mov $414,"@"
	mov $415,"@"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	mov %120,410: mov %121,420:mov %122,24:gosub *messagefont
	$410
	$411\


	mov $401,"ܓޗC"
	mov $402,"V󉺗蒆IYVB"
	mov %120,401: mov %121,402:mov %122,24:gosub *messagefont
	$401
	$402@

	mov $403,"藢I㣎qߍuyB"
	mov %120,403: mov %121,403:mov %122,24:gosub *messagefont
	$403@

	mov $404,"@@"
	mov $405,"uCߔNccݜޘƁC"
	mov $406,"CnoᗹލwxIÌB"
	mov %120,404: mov %121,406:mov %122,24:gosub *messagefont
	br
	$405
	$406@

	mov $407,"ߍʔN݈풆INlC"
	mov $408,"E暝ٖ@ޔЎЉIdvB"
	mov $409,"wݛEsߘ㗹xA"
	mov %120,407: mov %121,409:mov %122,24:gosub *messagefont
	$407
	$408
	$409@

	mov $410,"wsŁCvDD܏A\xA"
	mov $411,"whwqRxAwhwqbxAwhwq含xB"
	mov $412,"daՓINl"
	mov %120,410: mov %121,412:mov %122,24:gosub *messagefont
	$410
	$411
	$412@

	mov $413,"C@a搗䗁C"
	mov $414,"C@a搗䗁C"
	mov $415,"CnǋN勎NSEӍsIC"
	mov $416,"XIzBv"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	mov %120,413: mov %121,420:mov %122,24:gosub *messagefont
	$413
	$414
	$415
	$416\


	mov $401,"uRCψꗈ{ٖ@e~]B"
	mov %120,401: mov %121,401:mov %122,24:gosub *messagefont
	$401@

	mov $402,"t|A\ATANƍ߁B"
	mov %120,402: mov %121,402:mov %122,24:gosub *messagefont
	$402@

	mov $403,"grÓIЉC"
	mov $404,"ߑFccsCܐߑFI"
	mov $405,"a៌ǙXXQX{vLdB"
	mov %120,403: mov %121,405:mov %122,24:gosub *messagefont
	$403
	$404
	$405@

	mov $406,"BsIC"
	mov $407,"ݑlʑOܗ͕wwqxވ_B"
	mov %120,406: mov %121,407:mov %122,24:gosub *messagefont
	$406
	$407@

	mov $408,"ލːő[IB"
	mov $409,"[MȓIwq݌NʁCs㏋^B"
	mov %120,408: mov %121,409:mov %122,24:gosub *messagefont
	$408
	$409@

	mov $410,"A݉FܒԓICЉp"
	mov $411,"ŕsFIn__nNTC"
	mov $412,"lpsÒʛwqCgߍʉIwẃxa"
	mov $413,"ݑnBv"
	mov $414,"@"
	mov $415,"@"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	mov %120,410: mov %121,420:mov %122,24:gosub *messagefont
	$410
	$411
	$412
	$413\


	mov $401,"ґRgÁCՓ_hC"
	mov $402,"AVIgp[x蕉s\󓞓IB"
	mov %120,401: mov %121,402:mov %122,24:gosub *messagefont
	$401
	$402@

	mov $403,"CYr藁Hnu悁B"
	mov %120,403: mov %121,403:mov %122,24:gosub *messagefont
	$403@

	mov $404,"ڑOC~CvLIʑl@wqB"
	mov $405,"CݗLψʑl݁B"
	mov %120,404: mov %121,405:mov %122,24:gosub *messagefont
	$404
	$405@

	mov $406,"ޘw݁xC甉ٔCSB"
	mov $407,"uR@CUoV"
	mov %120,406: mov %121,407:mov %122,24:gosub *messagefont
	$406
	$407@

	mov $408,"@@"
	mov $409,"AYrsߓ戽ҟpB"
	mov $410,"ܓԑcCACFB"
	mov %120,408: mov %121,410:mov %122,24:gosub *messagefont
	br
	$409
	$410@

	mov $411,"A٘Fȍ݊œIߍ[xOApA"
	mov %120,411: mov %121,411:mov %122,24:gosub *messagefont
	$411@

	mov $412,"r熋yٓI莓IДЊVC"
	mov $413,"p{s藁Bv"
	mov $414,"ccB"
	mov %120,412: mov %121,414:mov %122,24:gosub *messagefont
	$412
	$413
	$414@

	mov $415,"@@"
	mov $416,"cB"
	mov $417,"aˑzI͈ρc"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	mov %120,415: mov %121,420:mov %122,24:gosub *messagefont
	br
	$416
	$417\


	mov $401,"uޖmI藁B"
	mov $402,"CF[Ms^CuwߔЗ@AmxB"
	mov %120,401: mov %121,402:mov %122,24:gosub *messagefont
	$401
	$402@

	mov $403,"lFӐݓB"
	mov %120,403: mov %121,403:mov %122,24:gosub *messagefont
	$403@

	mov $404,"imȑϓIЉV"
	mov $405,"psÈӏ\ވ_B"
	mov %120,404: mov %121,405:mov %122,24:gosub *messagefont
	$404
	$405@

	mov $406,"A֝s꘢mIُہCR@ȓVB"
	mov %120,406: mov %121,406:mov %122,24:gosub *messagefont
	$406@

	mov $407,"\ݑœIApA|衉eC"
	mov $408,"ISC֗L@zB"
	mov %120,407: mov %121,408:mov %122,24:gosub *messagefont
	$407
	$408@

	mov $409,"Cލُۘ㗈܁CkeՔ푼FUC"
	mov $410,"֕sB"
	mov %120,409: mov %121,410:mov %122,24:gosub *messagefont
	$409
	$410@

	mov $411,"AhϔcFҒ{C"
	mov $412,"R@lFxn\C曑꘢~ГIЉB"
	mov %120,411: mov %121,412:mov %122,24:gosub *messagefont
	$411
	$412@

	mov $413,"RCsǝ[ϓI@CЉssB"
	mov $414,"ʏNMΔC"
	mov $415,"AnைρBv"
	mov %120,413: mov %121,415:mov %122,24:gosub *messagefont
	$413
	$414
	$415@

	mov $416,"@@"
	mov $417,"scґRz@ϓICAVI͔\͔䍂B"
	mov %120,416: mov %121,417:mov %122,24:gosub *messagefont
	br
	$417@

	mov $418,"\LЕswqtIAHӓIvzRB"
	mov $419,"@"
	mov $420,"@"
	mov %120,418: mov %121,420:mov %122,24:gosub *messagefont
	$418\

	bgmfadeout 2000
	bgmstop

	mov $401,"smsuC\mpߊB"
	mov %120,401: mov %121,401:mov %122,24:gosub *messagefont
	$401@

	mov $402,"^Cx鐐S疝B"
	mov %120,402: mov %121,402:mov %122,24:gosub *messagefont
	$402@

	mov $403,"@@"
	mov $404,"uVcȊ迈꘢VEHv"
	mov %120,403: mov %121,404:mov %122,24:gosub *messagefont
	br
	$404@

	mov $405,"@@"
	mov $406,"uțCLYrVsǊJBv"
	mov %120,405: mov %121,406:mov %122,24:gosub *messagefont
	br
	$406@

	mov $407,"@@"
	mov $408,"uߘcc迓ꐥcv"
	mov %120,407: mov %121,408:mov %122,24:gosub *messagefont
	br
	$408@

	mov $409,"@@"
	mov $410,"uYrl藁Hv"
	mov %120,409: mov %121,410:mov %122,24:gosub *messagefont
	br
	$410@

	mov $411,"@@"
	mov $412,"uCCICٕsNBv"
	mov $413,"@"
	mov $414,"@"
	mov $415,"@"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	mov %120,411: mov %121,420:mov %122,24:gosub *messagefont
	br
	$412\


	mov $401,"uCuk^JB"
	mov $402,"ٛwqܜޔВԓIlC"
	mov $403,"VJB"
	mov %120,401: mov %121,403:mov %122,24:gosub *messagefont
	$401
	$402
	$403@

	mov $404,"sCNޘCcNCsvÕsÏA]GB"
	mov %120,404: mov %121,404:mov %122,24:gosub *messagefont
	$404@

	mov $405,"\lIƌAVޔВnIB"
	mov $406,"@ʕszUCAX|_Bv"
	mov %120,405: mov %121,406:mov %122,24:gosub *messagefont
	$405
	$406@

	mov $407,"@@"
	mov $408,"ucv"
	mov %120,407: mov %121,408:mov %122,24:gosub *messagefont
	br
	$408@

	mov $409,"@@"
	mov $410,"䍷_܏oٕsNCQZcԈ񋎁B"
	mov %120,409: mov %121,410:mov %122,24:gosub *messagefont
	br
	$410@

	mov $411,"ފuSVawIْԛc"
	mov $412,"@"
	mov $413,"@"
	mov $414,"@"
	mov $415,"@"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	mov %120,411: mov %121,420:mov %122,24:gosub *messagefont
	$411\

	textoff

	ld r,":a;tatie\sensei\tuujyou1.bmp",12

	texton

	mov $401,"u䐥藁c꘢sҚGB"
	mov %120,401: mov %121,401:mov %122,24:gosub *messagefont
	$401@

	mov $402,"ċzV󟃓IlB"
	mov %120,402: mov %121,402:mov %122,24:gosub *messagefont
	$402@

	mov $403,"Փ{enC"
	mov $404,"ܐlFYrwmxBv"
	mov %120,403: mov %121,404:mov %122,24:gosub *messagefont
	$403
	$404@

	mov $405,"@@"
	mov $406,"u܁cmHv"
	mov %120,405: mov %121,406:mov %122,24:gosub *messagefont
	br
	$406@

	mov $407,"@@"
	mov $408,"uvցCmA^ٓI݁B"
	mov %120,407: mov %121,408:mov %122,24:gosub *messagefont
	br
	$408@

	mov $409,"䐥wIC"
	mov $410,"sfڗvȐIBv"
	mov $411,"@"
	mov $412,"@"
	mov $413,"@"
	mov $414,"@"
	mov $415,"@"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	mov %120,409: mov %121,420:mov %122,24:gosub *messagefont
	$409
	$410\


	mov $401,"uAC@ʓᚐI藁H"
	mov %120,401: mov %121,401:mov %122,24:gosub *messagefont
	$401@

	mov $402,"I՗aȁBv"
	mov $403,"R@C㱏A暕AȁB"
	mov %120,402: mov %121,403:mov %122,24:gosub *messagefont
	$402
	$403@

	mov $404,"Ch~ޔЏvېC"
	mov $405,"r苳ܛwqFYrwmxB"
	mov %120,404: mov %121,405:mov %122,24:gosub *messagefont
	$404
	$405@

	mov $406,"CImC笕scEsCIŃB"
	mov %120,406: mov %121,406:mov %122,24:gosub *messagefont
	$406@

	mov $407,"ًIAӖړIЉsRI_B"
	mov $408,"{ݘI݁B"
	mov $423,"ޏACImBv"
	mov %120,407: mov %121,408:mov %122,24:gosub *messagefont
	mov %120,423: mov %121,423:mov %122,24:gosub *messagefont
	$407
	$408@/
	$423/
	add $408,$423/
	@

	mov $409,"@@"
	mov $410,"uَЉcRI_cv\"
	mov $411,"@"
	mov $412,"@"
	mov $413,"@"
	mov $414,"@"
	mov $415,"@"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	mov %120,409: mov %121,420:mov %122,24:gosub *messagefont
	br
	$410\


	mov $401,"֐@nߐlN^SB"
	mov $402,"甐ls㏋^s^Љ^@I⁍B"
	mov %120,401: mov %121,402:mov %122,24:gosub *messagefont
	$401
	$402@

	mov $403,"ICӖړIЉB"
	mov $404,"ޕsAÉ戽衉eICEH"
	mov %120,403: mov %121,404:mov %122,24:gosub *messagefont
	$403
	$404@

	mov $405,"sc֐ՒҐڎ󗹘VIԁB"
	mov %120,405: mov %121,405:mov %122,24:gosub *messagefont
	$405@

	mov $406,"ޘEEC֓ICvCB"
	mov %120,406: mov %121,406:mov %122,24:gosub *messagefont
	$406@

	mov $407,"|s@܁C\ϔ甉䊴悁B"
	mov %120,407: mov %121,407:mov %122,24:gosub *messagefont
	$407@

	mov $408,"@@"
	mov $409,"Ec"
	mov $423,"vցB"
	mov %120,408: mov %121,409:mov %122,24:gosub *messagefont
	mov %120,423: mov %121,423:mov %122,24:gosub *messagefont
	br
	$409@/
	$423/
	add $409,$423/
	@

	mov $410,"݁C䐴^nӛΓB"
	mov %120,410: mov %121,410:mov %122,24:gosub *messagefont
	$410@

	mov $411,"@@"
	mov $412,"Ic"
	mov %120,411: mov %121,412:mov %122,24:gosub *messagefont
	br
	$412@

	mov $413,"Iccc^SB"
	mov $414,"@"
	mov $415,"@"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	mov %120,413: mov %121,420:mov %122,24:gosub *messagefont
	$413\

	windoweffect 1
	textoff
	dwave 10,"wave\noise01.wav"
	bg "cutin\cutin_08.jpg",1
	wait 3000
	windoweffect 10,500

	bg "bg\tonarieki_bure.jpg",0
	ld l,":a;tatie\yuuki\tuujyou.bmp",0
	ld r,":a;tatie\sensei\tuujyou1.bmp",1

	texton

	mov $401,"䒍ӓߚ]釚]釓IrsC"
	mov $402,"smCVEwْ䗹B"
	mov %120,401: mov %121,402:mov %122,24:gosub *messagefont
	$401
	$402@

	mov $403,"@@"
	mov $404,"uDCB"
	mov $405,"ґR˗L竎Vc"
	mov %120,403: mov %121,405:mov %122,24:gosub *messagefont
	br
	$404
	$405@

	mov $406,"gߎC"
	mov $407,"ߍ\ߓIlsLCuB"
	mov %120,406: mov %121,407:mov %122,24:gosub *messagefont
	$406
	$407@

	mov $408,"ވ_CߖEHv"
	mov %120,408: mov %121,408:mov %122,24:gosub *messagefont
	$408@

	mov $409,"@@"
	mov $410,"ucBv"
	mov %120,409: mov %121,410:mov %122,24:gosub *messagefont
	br
	$410@

	mov $411,"@@"
	mov $412,"ukDBCݎSޘ\vErBv"
	mov $413,"@"
	mov $414,"@"
	mov $415,"@"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	mov %120,411: mov %121,420:mov %122,24:gosub *messagefont
	br
	$412\

	textoff
	wait 1000
	cl r,12
	wait 2000
	texton

	mov $401,"܊ދԍ@C"
	mov $402,"V⋑IsO򑖋B"
	mov %120,401: mov %121,402:mov %122,24:gosub *messagefont
	$401
	$402@

	mov $403,"ŗ\CݐuPO_QOB"
	mov %120,403: mov %121,403:mov %122,24:gosub *messagefont
	$403@

	mov $404,"svC͏AvB"
	mov $405,"ݓߔVOCTŎZCޗJB"
	mov %120,404: mov %121,405:mov %122,24:gosub *messagefont
	$404
	$405@

	mov $406,"@@"
	mov $407,"䊴đCǏZIϓIOSB"
	mov %120,406: mov %121,407:mov %122,24:gosub *messagefont
	br
	$407@

	mov $408,"c֗LԖv槁B"
	mov %120,408: mov %121,408:mov %122,24:gosub *messagefont
	$408@

	mov $409,"GCޘEE߁B"
	mov $410,"ϓIԁC䍪{sm􍱏YrˍDB"
	mov %120,409: mov %121,410:mov %122,24:gosub *messagefont
	$409
	$410@

	mov $411,"CVIRB"
	mov $412,"ꎟCYr˔\F藁c"
	mov $413,"@"
	mov $414,"@"
	mov $415,"@"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	mov %120,411: mov %121,420:mov %122,24:gosub *messagefont
	$411
	$412\

	textoff

	ld l,":a;tatie\yuuki\keno.bmp",12

	texton


	mov $401,"uAߘIv"
	mov %120,401: mov %121,401:mov %122,24:gosub *messagefont
	$401@

	mov $402,"@@"
	mov $403,"u@迖zdVʜޘEIԁC"
	mov $404,"A苍ėꎟޗJIv"
	mov %120,402: mov %121,404:mov %122,24:gosub *messagefont
	br
	$403
	$404@

	mov $405,"@@"
	mov $406,"ucccv"
	mov %120,405: mov %121,406:mov %122,24:gosub *messagefont
	br
	$406@

	mov $407,"@@"
	mov $408,"餋CVދԁB"
	mov %120,407: mov %121,408:mov %122,24:gosub *messagefont
	br
	$408@

	mov $409,"@@"
	mov $410,"usCߓDSyݚGB"
	mov %120,409: mov %121,410:mov %122,24:gosub *messagefont
	br
	$410@

	mov $411,"ޘEAB"
	mov $412,"RIlCAKlmIHB"
	mov %120,411: mov %121,412:mov %122,24:gosub *messagefont
	$411
	$412@

	mov $413,"݉ڗLI؁ccsqPBv"
	mov %120,413: mov %121,413:mov %122,24:gosub *messagefont
	$413@

	mov $414,"@@"
	mov $415,"weaܐ暏݉sIO򒆁B"
	mov %120,414: mov %121,415:mov %122,24:gosub *messagefont
	br
	$415@

	mov $416,"@@"
	mov $417,"sv@CÍ~濁C"
	mov %120,416: mov %121,417:mov %122,24:gosub *messagefont
	br
	$417@

	mov $418,"I蒆㣊ꔼIYVB"
	mov $419,"@"
	mov $420,"@"
	mov %120,418: mov %121,420:mov %122,24:gosub *messagefont
	$418\

	textoff
	bg black,18
	wait 4000

;ʉF]ԁ@iv[v
	bgmonce "bgm\jitensya.mp3"
	wait 3000

;ʉF̐@iv[v
	bgm "bgm\SE_IN200.mp3"
;wiF̓cɓ@~`tF[hCij
;̓]Ԃœ˂Ă鉉o
	bg "bg\yoru.jpg",80
	wait 4000

	texton

	mov $401,"s͓IƗÁB"
	mov %120,401: mov %121,401:mov %122,24:gosub *messagefont
	$401@

	mov $402,"蕘Hs{vLIm㱖HB"
	mov %120,402: mov %121,402:mov %122,24:gosub *messagefont
	$402@

	mov $403,"ޘxCT݂PP_EJB"
	mov $404,"EJB"
	mov %120,403: mov %121,404:mov %122,24:gosub *messagefont
	$403
	$404@

	mov $405,"@@"
	mov $406,"掓ICriFIB"
	mov %120,405: mov %121,406:mov %122,24:gosub *messagefont
	br
	$406@

	mov $407,"VȒ]qΐIC"
	mov $408,"V}lIHB"
	mov %120,407: mov %121,408:mov %122,24:gosub *messagefont
	$407
	$408@

	mov $409,"AuCvLIԁCgssaB"
	mov %120,409: mov %121,409:mov %122,24:gosub *messagefont
	$409@

	mov $410,"݁C@ʎs͓I邗C"
	mov $411,"\ړIƗB"
	mov %120,410: mov %121,411:mov %122,24:gosub *messagefont
	$410
	$411@

	mov $412,"@@"
	mov $413,"ƓIu꘢CiavYrqρB"
	mov $414,"auIs͒ʊwB"
	mov %120,412: mov %121,414:mov %122,24:gosub *messagefont
	br
	$413
	$414@

	mov $415,"@@"
	mov $416,"ޏAI퐶B"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	mov %120,415: mov %121,420:mov %122,24:gosub *messagefont
	br
	$416\


	mov $401,"ACAݙ{艑OccpugVB"
	mov %120,401: mov %121,401:mov %122,24:gosub *messagefont
	$401@

	mov $402,"笕sIu⋁B"
	mov %120,402: mov %121,402:mov %122,24:gosub *messagefont
	$402@

	mov $403,"s\FIlB"
	mov %120,403: mov %121,403:mov %122,24:gosub *messagefont
	$403@

	mov $404,"sېIْԁB"
	mov %120,404: mov %121,404:mov %122,24:gosub *messagefont
	$404@

	mov $405,"aVV㱒sICB"
	mov %120,405: mov %121,405:mov %122,24:gosub *messagefont
	$405@

	mov $406,"ߓCVOICꓰsXߐlkC"
	mov $407,"[[nݗISB"
	mov %120,406: mov %121,407:mov %122,24:gosub *messagefont
	$406
	$407@

	mov $408,"@@"
	mov $409,"ߐccEH"
	mov %120,408: mov %121,409:mov %122,24:gosub *messagefont
	br
	$409@

	mov $410,"݉ƁCuC@AI닫B"
	mov %120,410: mov %121,410:mov %122,24:gosub *messagefont
	$410@

	mov $411,"@@"
	mov $412,"CYVI̘EH"
	mov $413,"uC䎗kÓB"
	mov $414,"@"
	mov $415,"@"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	mov %120,411: mov %121,420:mov %122,24:gosub *messagefont
	br
	$412
	$413\

	bgmfadeout 1000
	bgmstop

	textoff
	bg black,16

;

;ʁFSd}i⍂j
	mov %42,3
	gosub *sindenzu

	wait 2000

;

;ʉFw̎Gi[vȂj
	dwave 2,"wave\eki.wav"
;wiFw@NXtF[h
	bg "bg\morioka_eki.jpg",10

	wait 4000

	bgm "bgm\free55.mp3"

	texton

	mov $401,"zȓIC"
	mov $402,"nOC"
	mov $403,"y݋wZIB"
	mov %120,401: mov %121,403:mov %122,24:gosub *messagefont
	$401
	$402
	$403@

	mov $404,"RcؓsYꊱŁC"
	mov $405,"@UC֐Q㏰@C"
	mov $406,"|q꒼zߕs꘢IB"
	mov %120,404: mov %121,406:mov %122,24:gosub *messagefont
	$404
	$405
	$406@

	mov $407,"琥B"
	mov $408,"CLl܉䏊rIE֓IB"
	mov %120,407: mov %121,408:mov %122,24:gosub *messagefont
	$407
	$408@

	mov $409,"ޔЎC䘸vzB"
	mov %120,409: mov %121,409:mov %122,24:gosub *messagefont
	$409@

	mov $410,"ޘEAwρxICvݜޗ"
	mov $411,"AZsÖ瓾盀I孍B"
	mov %120,410: mov %121,411:mov %122,24:gosub *messagefont
	$410
	$411@

	mov $412,"ґRlsZʁC"
	mov $413,"A꒼ȗsr\CIB"
	mov %120,412: mov %121,413:mov %122,24:gosub *messagefont
	$412
	$413@

	mov $414,"@@"
	mov $415,"sCܓr\CnB"
	mov %120,414: mov %121,415:mov %122,24:gosub *messagefont
	br
	$415@

	mov $416,"vL^MB"
	mov %120,416: mov %121,416:mov %122,24:gosub *messagefont
	$416@

	mov $417,"@ʉȕsCszB"
	mov $418,"꒼r]IB"
	mov $419,"@"
	mov $420,"@"
	mov %120,417: mov %121,420:mov %122,24:gosub *messagefont
	$417
	$418\


	mov $401,"cc^IȓޘÖ]EH"
	mov %120,401: mov %121,401:mov %122,24:gosub *messagefont
	$401@

	mov $402,"VCȉڗLI؁B"
	mov %120,402: mov %121,402:mov %122,24:gosub *messagefont
	$402@

	mov $403,"C䓞ڗLYr藁H"
	mov %120,403: mov %121,403:mov %122,24:gosub *messagefont
	$403@

	mov $404,"VaFʓIƐlB"
	mov %120,404: mov %121,404:mov %122,24:gosub *messagefont
	$404@

	mov $405,"V݊wZsfUIqB"
	mov %120,405: mov %121,405:mov %122,24:gosub *messagefont
	$405@

	mov $406,"{v㱊ߓI߈衎qpB"
	mov %120,406: mov %121,406:mov %122,24:gosub *messagefont
	$406@

	mov $407,"֗LߍpFIΗeC"
	mov $408,"㗹ȍ@AĖvF嗹B"
	mov %120,407: mov %121,408:mov %122,24:gosub *messagefont
	$407
	$408@

	mov $409,"@@"
	mov $410,"ccCݓIYrsvLB"
	mov %120,409: mov %121,410:mov %122,24:gosub *messagefont
	br
	$410@

	mov $411,"V䩑Rn⋒Cy勎B"
	mov $412,"C萋NIc៑B"
	mov %120,411: mov %121,412:mov %122,24:gosub *messagefont
	$411
	$412@

	mov $413,"LvLzH"
	mov %120,413: mov %121,413:mov %122,24:gosub *messagefont
	$413@

	mov $414,"r\LB"
	mov %120,414: mov %121,414:mov %122,24:gosub *messagefont
	$414@

	mov $415,"Np|vlCrE×C"
	mov $416,"r\Ǔ藁B"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	mov %120,415: mov %121,416mov %122,24:gosub *messagefont
	$415
	$416\


	mov $401,"ccCVCݜr藁B"
	mov %120,401: mov %121,401:mov %122,24:gosub *messagefont
	$401@

	mov $402,"@@"
	mov $403,"uOBApvLӁB"
	mov %120,402: mov %121,403:mov %122,24:gosub *messagefont
	br
	$403@

	mov $404,"趖vhBApvLꘁB"
	mov %120,404: mov %121,404:mov %122,24:gosub *messagefont
	$404@

	mov $405,"r蕕ImSsىeHB"
	mov %120,405: mov %121,405:mov %122,24:gosub *messagefont
	$405@

	mov $406,"^Dvvώ]I^B"
	mov %120,406: mov %121,406:mov %122,24:gosub *messagefont
	$406@

	mov $407,"w^ÉIOCҐwwlIcc"
	mov %120,407: mov %121,407:mov %122,24:gosub *messagefont
	$407@

	mov $408,"|ܗxxsꌏC"
	mov $409,"Ivlasٖ@^CߔЊuB"
	mov %120,408: mov %121,409:mov %122,24:gosub *messagefont
	$408
	$409@

	mov $410,"@@"
	mov $411,"^IC^IDvv̉B"
	mov %120,410: mov %121,411:mov %122,24:gosub *messagefont
	br
	$411@

	mov $412,"ٜޘEs@Iߓxȍ@C"
	mov $413,"AĖvLIB"
	mov %120,412: mov %121,413:mov %122,24:gosub *messagefont
	$412
	$413@

	mov $414,"ݛrSxzB"
	mov $415,"@"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	mov %120,414: mov %121,420:mov %122,24:gosub *messagefont
	$414\

	textoff

	bg black,18
	wait 2000

	bg "cutin\cutin_09.jpg",13
	wait 3000

	bg "cutin\cutin_10.jpg",13
	wait 3000

	bg "cutin\cutin_11.jpg",13
	wait 3000

	bg "cutin\cutin_12.jpg",13
	wait 5000

	bg "bg\morioka_sity01.jpg",12

	wait 2000
	texton


	mov $401,"SꉺC"
	mov $402,"IvLǍ⋁B"
	mov %120,401: mov %121,402:mov %122,24:gosub *messagefont
	$401
	$402@

	mov $403,"k\CFՉ񋎗B"
	mov %120,403: mov %121,403:mov %122,24:gosub *messagefont
	$403@

	mov $404,"Fck݉ʑOC"
	mov $405,"R@܏Yrzv\񋎏AϘϘC"
	mov $406,"m|ꍱٗIvJC揁c"
	mov %120,404: mov %121,406:mov %122,24:gosub *messagefont
	$404
	$405
	$406@

	mov $407,"R@CVGܗuFsm։vC"
	mov $408,"BʓIp\͓IڎB"
	mov %120,407: mov %121,408:mov %122,24:gosub *messagefont
	$407
	$408@

	mov $409,"@BC@B"
	mov %120,409: mov %121,409:mov %122,24:gosub *messagefont
	$409@

	mov $410,"@@"
	mov $411,"揁cc"
	mov %120,410: mov %121,411:mov %122,24:gosub *messagefont
	br
	$411@

	mov $412,"^ICEvSvĔFߜޔДcpB"
	mov %120,412: mov %121,412:mov %122,24:gosub *messagefont
	$412@

	mov $413,"C֗Lޑ哾IWvrB"
	mov %120,413: mov %121,413:mov %122,24:gosub *messagefont
	$413@

	mov $414,"@@"
	mov $415,"ZC֕~FꉺCFSxӑJB"
	mov %120,414: mov %121,415:mov %122,24:gosub *messagefont
	br
	$415@

	mov $416,"ߔV@CčDDvlډIB"
	mov $417,"ݓICv㱗vlB"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	mov %120,416: mov %121,420:mov %122,24:gosub *messagefont
	$416
	$417\

	textoff

	bg "bg\gakkou_gaikan.jpg",12
	wait 4000

	bg "bg\gakkou_rouka.jpg",12

	wait 4000

	texton

	mov $401,"㈓C㎟܎qCFIv"
	mov $402,"HIŎm羚ƛB"
	mov %120,401: mov %121,402:mov %122,24:gosub *messagefont
	$401
	$402@

	mov $403,"CjCB@CaUNIC"
	mov $404,"NݎIja㒼ڐaqC"
	mov $405,"ҊƕsaړaqCqґ\\꘢B"
	mov %120,403: mov %121,405:mov %122,24:gosub *messagefont
	$403
	$404
	$405@

	mov $406,"ō@C\@ҁcc"
	mov $407,"BʁC֔푼FX}ΗB"
	mov %120,406: mov %121,407:mov %122,24:gosub *messagefont
	$406
	$407@

	mov $408,"ccAZ\OҁCBʖJB"
	mov %120,408: mov %121,408:mov %122,24:gosub *messagefont
	$408@

	mov $409,"@@"
	mov $410,"ގFYrv藁H"
	mov $411,"\CdkWIvJcc"
	mov %120,409: mov %121,411:mov %122,24:gosub *messagefont
	br
	$410
	$411@

	mov $412,"@@"
	mov $413,"zލCݑLB"
	mov %120,412: mov %121,413:mov %122,24:gosub *messagefont
	br
	$413@

	mov $414,"٘E퉨_I䗈܁CގZ䕽摁wZB"
	mov %120,414: mov %121,414:mov %122,24:gosub *messagefont
	$414@

	mov $415,"BCϒHC蕍ݑL֓IwFs≺"
	mov $416,"cڌB"
	mov %120,415: mov %121,416:mov %122,24:gosub *messagefont
	$415
	$416@

	mov $417,"Iwcc"
	mov $423,"Iwcc"
	mov %120,417: mov %121,417:mov %122,24:gosub *messagefont
	mov %120,423: mov %121,423:mov %122,24:gosub *messagefont
	$417@/
	$423/
	add $417,$423/
	@

	mov $418,"Llccc"
	mov $423,"֗LcccB"
	mov $419,"@"
	mov $420,"@"
	mov %120,418: mov %121,420:mov %122,24:gosub *messagefont
	mov %120,423: mov %121,423:mov %122,24:gosub *messagefont
	$418@/
	$423/
	add $418,$423/
	\

	bgmfadeout 2000
	bgmstop

	mov $401,"_CEِڌB"
	mov %120,401: mov %121,401:mov %122,24:gosub *messagefont
	$401@

	mov $402,"zڋߋC"
	mov $403,"wFIڌzzB"
	mov %120,402: mov %121,403:mov %122,24:gosub *messagefont
	$402
	$403@

	mov $404,"ߔЊsۓ{Cs߈IsIڌB"
	mov %120,404: mov %121,404:mov %122,24:gosub *messagefont
	$404@

	mov $405,"LIlҒnŒC"
	mov $406,"LIlݐސގgB"
	mov %120,405: mov %121,406:mov %122,24:gosub *messagefont
	$405
	$406@

	mov $407,"ꐥr񎖛c"
	mov $408,"svoߔЕ\CLYrAړܛB"
	mov %120,407: mov %121,408:mov %122,24:gosub *messagefont
	$407
	$408@

	mov $409,"䍡V䕽摁wZC"
	mov $410,"ArHEH"
	mov %120,409: mov %121,410:mov %122,24:gosub *messagefont
	$409
	$410@

	mov $411,"֐܁CCvLwwC"
	mov $412,"񗹘܁CȒᗹ_H"
	mov %120,411: mov %121,412:mov %122,24:gosub *messagefont
	$411
	$412@

	mov $413,"@@"
	mov $414,"VCݎlʔIC"
	mov $415,"bőݚF弚F萎RuʁC"
	mov $416,"䑖呖LCjOB"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	mov %120,413: mov %121,420:mov %122,24:gosub *messagefont
	br
	$414
	$415
	$416\

	textoff

	dwave 10,"wave\dooropen07.wav"
	bg "bg\gakkou_kyousitu.jpg",20

	wait 2000

	texton

	mov $401,"ccc"
	mov $423,"ƓsVŁCQֈCLYr庁c"
	mov %120,401: mov %121,401:mov %122,24:gosub *messagefont
	mov %120,423: mov %121,423:mov %122,24:gosub *messagefont
	$401@/
	$423
	add $401,$423

	mov $402,"BʍD䑽SB"
	mov %120,402: mov %121,402:mov %122,24:gosub *messagefont
	$402@

	mov $403,"ŗ䑽SB"
	mov $404,"ʑRC䍡VwZCWHJB"
	mov %120,403: mov %121,404:mov %122,24:gosub *messagefont
	$403
	$404@

	mov $405,"@@"
	mov $406,"cc݋IpCœCFIgeB"
	mov %120,405: mov %121,406:mov %122,24:gosub *messagefont
	br
	$406@

	mov $407,"FŒ΁B"
	mov %120,407: mov %121,407:mov %122,24:gosub *messagefont
	$407@

	mov $408,"DccݏCOC"
	mov $409,"cam㈗v񗈍ˍsB"
	mov %120,408: mov %121,409:mov %122,24:gosub *messagefont
	$408
	$409@

	mov $410,"@@"
	mov $411,"EDSyݗB"
	mov $412,"CޔЎsꎟB"
	mov %120,410: mov %121,412:mov %122,24:gosub *messagefont
	br
	$411
	$412@

	mov $413,"[zCܗuDvCR@sOB"
	mov %120,413: mov %121,413:mov %122,24:gosub *messagefont
	$413@

	mov $414,"@@"
	mov $415,"ccRCˑRrIn{Yr@B"
	mov %120,414: mov %121,415:mov %122,24:gosub *messagefont
	br
	$415@

	bgm "bgm\free0508.mp3"

	mov $416,"wNbǁ@^ccx"
	mov %120,416: mov %121,416:mov %122,24:gosub *messagefont
	$416@

	mov $417,"ߐIccpgB"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	mov %120,417: mov %121,420:mov %122,24:gosub *messagefont
	$417\

	textoff
	bg "bg\gakkou_kyousitu_bure.jpg",1

	ld c,":a;tatie\yuuki\keno.bmp",12


	texton


	mov $401,"uށccrρccIv"
	mov %120,401: mov %121,401:mov %122,24:gosub *messagefont
	$401@

	mov $402,"@@"
	mov $403,"幁AAqA✒`B"
	mov %120,402: mov %121,403:mov %122,24:gosub *messagefont
	br
	$403@

	mov $404,"ލsړIJgfB"
	mov %120,404: mov %121,404:mov %122,24:gosub *messagefont
	$404@

	mov $405,"ꍱ{ٖ@܏oI嶍gB"
	mov %120,405: mov %121,405:mov %122,24:gosub *messagefont
	$405@

	mov $406,"A嵏FIߍ寁C"
	mov $407,"pmxIʁB"
	mov %120,406: mov %121,407:mov %122,24:gosub *messagefont
	$406
	$407@

	mov $408,"@@"
	mov $409,"AݝCjB"
	mov $410,"ϔpm峗CMVB"
	mov %120,408: mov %121,410:mov %122,24:gosub *messagefont
	br
	$409
	$410@

	mov $411,"ĝЉȓIm㈖{B"
	mov $412,"spmC"
	mov $413,"֗{܎qI瑁B"
	mov $414,"@"
	mov $415,"@"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	mov %120,411: mov %121,420:mov %122,24:gosub *messagefont
	$411
	$412
	$413\



	mov $401,"uccccv"
	mov %120,401: mov %121,401:mov %122,24:gosub *messagefont
	$401@

	mov $402,"@@"
	mov $403,"J蚔ǓIޏCdnʒwrRxIρB"
	mov %120,402: mov %121,403:mov %122,24:gosub *messagefont
	br
	$403@

	mov $404,"g쎗C"
	mov $405,"{ϋInCrxmDB"
	mov %120,404: mov %121,405:mov %122,24:gosub *messagefont
	$404
	$405@

	mov $406,"paTD퓖읙衒ԕϊߘMC"
	mov $407,"i㱓IʒuE흙CB"
	mov %120,406: mov %121,407:mov %122,24:gosub *messagefont
	$406
	$407@

	mov $408,"S}pFiI@yI@"
	mov $409,"SI捐mᴁC"
	mov $410,"㱔Gaȍ`C"
	mov $411,"UʓIB"
	mov %120,408: mov %121,411:mov %122,24:gosub *messagefont
	$408
	$409
	$410
	$411@

	mov $412,"@@"
	mov $413,"rc"
	mov $414,"@"
	mov $415,"@"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	mov %120,412: mov %121,420:mov %122,24:gosub *messagefont
	br
	$413\

	textoff

	ld c,":a;tatie\yuuki\naki.bmp",12

	wait 2000

	texton


	mov $401,"r\oޔЎcI"
	mov %120,401: mov %121,401:mov %122,24:gosub *messagefont
	$401@

	mov $402,"@@"
	mov $403,"䊮SȑzۓoB"
	mov %120,402: mov %121,403:mov %122,24:gosub *messagefont
	br
	$403@

	mov $404,"CN\m݋㗐峗IώqB"
	mov %120,404: mov %121,404:mov %122,24:gosub *messagefont
	$404@

	mov $405,"җpCŁC"
	mov $406,"m营媉aINIB"
	mov %120,405: mov %121,406:mov %122,24:gosub *messagefont
	$405
	$406@

	mov $407,"jpaTAM捐mᴓIC"
	mov $408,"͟kIԙnwB"
	mov %120,407: mov %121,408:mov %122,24:gosub *messagefont
	$407
	$408@

	mov $409,"CJcݜގOl֍݊ŒI\藁B"
	mov $410,"@"
	mov $411,"@"
	mov $412,"@"
	mov $413,"@"
	mov $414,"@"
	mov $415,"@"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	mov %120,409: mov %121,420:mov %122,24:gosub *messagefont
	$409\


	mov $401,"J蚔ǋށAAm㈖{AB"
	mov %120,401: mov %121,401:mov %122,24:gosub *messagefont
	$401@

	mov $402,"݉꘢NFIC"
	mov $403,"៣sRnI壗OoB"
	mov %120,402: mov %121,403:mov %122,24:gosub *messagefont
	$402
	$403@

	mov $404,"Cw⋍ݐlVC"
	mov $405,"ٜވؕmC^ISqB"
	mov %120,404: mov %121,405:mov %122,24:gosub *messagefont
	$404
	$405@

	mov $406,"ݍiە\C㏒җ^s"
	mov $407,"ԝQȍl墍Iߘu㱁B"
	mov %120,406: mov %121,407:mov %122,24:gosub *messagefont
	$406
	$407@

	mov $408,"֗LߐVIُKB"
	mov %120,408: mov %121,408:mov %122,24:gosub *messagefont
	$408@

	mov $409,"ꎟICߌcL_IZB"
	mov $410,"IUVIB"
	mov %120,409: mov %121,410:mov %122,24:gosub *messagefont
	$409
	$410@

	mov $411,"w@ݚ㔫ICpȓIoy塓IC"
	mov $412,"{ܐVsݗpsXIxB"
	mov %120,411: mov %121,412:mov %122,24:gosub *messagefont
	$411
	$412@

	mov $413,"@@"
	mov $414,"ލSsMЁA[B"
	mov %120,413: mov %121,414:mov %122,24:gosub *messagefont
	br
	$414@

	mov $415,"B|۝ٙӓICL݉iI"
	mov $416,"ߘ@IwB"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	mov %120,415: mov %121,420:mov %122,24:gosub *messagefont
	$415
	$416\


	mov $401,"ϛc݉zNc"
	mov %120,401: mov %121,401:mov %122,24:gosub *messagefont
	$401@

	mov $402,"LIwFŌI_C"
	mov $403,"vLۓ{CvL߈B"
	mov %120,402: mov %121,403:mov %122,24:gosub *messagefont
	$402
	$403@

	mov $404,"̘acc"
	mov $423,"}΁B"
	mov %120,404: mov %121,404:mov %122,24:gosub *messagefont
	mov %120,423: mov %121,423:mov %122,24:gosub *messagefont
	$404@/
	$423/
	add $404,$423/
	@

	mov $405,"FmIρcc"
	mov $406,"p֐vL꘢lGB"
	mov %120,405: mov %121,406:mov %122,24:gosub *messagefont
	$405
	$406@

	mov $407,"LIQ蕓IlC"
	mov $408,"LIuDNIlB"
	mov %120,407: mov %121,408:mov %122,24:gosub *messagefont
	$407
	$408@

	mov $409,"sǐYrRC"
	mov $410,"ߍƌގ\wӉyxB"
	mov %120,409: mov %121,410:mov %122,24:gosub *messagefont
	$409
	$410@

	mov $411,"@@"
	mov $412,"LCcaNB"
	mov %120,411: mov %121,412:mov %122,24:gosub *messagefont
	br
	$412@

	mov $413,"܈ϓI圛́C"
	mov $414,"pܗI惋ЎC{C"
	mov $415,"ApmI寋pٔ\ĆB"
	mov %120,413: mov %121,415:mov %122,24:gosub *messagefont
	$413
	$414
	$415@

	mov $416,"aȓsώqImᴁCEv~B"
	mov %120,416: mov %121,416:mov %122,24:gosub *messagefont
	$416@

	mov $417,"ߍ\EVAlA琥ៗFIFC݁C"
	mov $418,"EʖڑSASsEϗB"
	mov $419,"@"
	mov $420,"@"
	mov %120,417: mov %121,420:mov %122,24:gosub *messagefont
	$417
	$418\

	textoff

	cl c,12
	bg "bg\gakkou_kyousitu.jpg",1

	bgmfadeout 1
	bgmstop

;ʉFwZ̃`CiZo[Wj@[vȂ
	dwave 2,"wave\chaim.wav"
	wait 6000

	texton


	mov $401,"svCkNCǉCnB"
	mov %120,401: mov %121,401:mov %122,24:gosub *messagefont
	$401@

	mov $402,"ƑYrsvېύ񗹍ʁB"
	mov %120,402: mov %121,402:mov %122,24:gosub *messagefont
	$402@

	mov $403,"ؔ@CwxCؔ@C_B"
	mov %120,403: mov %121,403:mov %122,24:gosub *messagefont
	$403@

	mov $404,"C៣C|闹_B"
	mov %120,404: mov %121,404:mov %122,24:gosub *messagefont
	$404@

	mov $405,"@@"
	mov $406,"CYrcc"
	mov %120,405: mov %121,406:mov %122,24:gosub *messagefont
	br
	$406@

	mov $407,"CYrcc"
	mov %120,407: mov %121,407:mov %122,24:gosub *messagefont
	$407@

	mov $408,"CwA㓯wAԙnwC֗LLlcc"
	mov %120,408: mov %121,408:mov %122,24:gosub *messagefont
	$408@

	mov $409,"CYrߑF\\ᓾYrsvېρcc"
	mov %120,409: mov %121,409:mov %122,24:gosub *messagefont
	$409@

	mov $410,"ߑF^I_usvLEH"
	mov %120,410: mov %121,410:mov %122,24:gosub *messagefont
	$410@

	mov $411,"l^I\cޔВnsEH"
	mov %120,411: mov %121,411:mov %122,24:gosub *messagefont
	$411@

	mov $412,"@@"
	mov $413,"A݉v閜IC"
	mov $414,"ܒuVv◹vVI֒"
	mov $415,"R@ACB"
	mov %120,412: mov %121,415:mov %122,24:gosub *messagefont
	br
	$413
	$414
	$415@

	mov $416,"٘tېIޔ媈ÓI\sCC"
	mov $417,"SvL@uJB"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	mov %120,416: mov %121,420:mov %122,24:gosub *messagefont
	$416
	$417\


	mov $401,"ڒCpgVPǒB"
	mov %120,401: mov %121,401:mov %122,24:gosub *messagefont
	$401@

	mov $402,"uuDCƁBvv"
	mov $403,"ϑŊč@CCnCB"
	mov %120,402: mov %121,403:mov %122,24:gosub *messagefont
	$402
	$403@

	mov $404,"@@"
	mov $405,"\opgC{B"
	mov %120,404: mov %121,405:mov %122,24:gosub *messagefont
	br
	$405@

	mov $406,"ʏxpm峎ʓI寁B"
	mov %120,406: mov %121,406:mov %122,24:gosub *messagefont
	$406@

	mov $407,"ގFnpoIUiB"
	mov $423,"Acc"
	mov $408,"@"
	mov $409,"@"
	mov $410,"@"
	mov $411,"@"
	mov $412,"@"
	mov $413,"@"
	mov $414,"@"
	mov $415,"@"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	mov %120,407: mov %121,420:mov %122,24:gosub *messagefont
	mov %120,423: mov %121,423:mov %122,24:gosub *messagefont
	$407@/
	$423/
	add $407,$423/
	\


	mov $401,"uu^cwCߓIC{r񎖁Hvv"
	mov %120,401: mov %121,401:mov %122,24:gosub *messagefont
	$401@

	mov $402,"@ʉ񓚐CFIC"
	mov $403,"ߍƌm͍ϒn勎B"
	mov %120,402: mov %121,403:mov %122,24:gosub *messagefont
	$402
	$403@

	mov $404,"uu^cwcY⋗Bvv"
	mov %120,404: mov %121,404:mov %122,24:gosub *messagefont
	$404@

	mov $405,"uuFcݗiqB"
	mov $406,"BʗLl|ʓI@Bvv"
	mov %120,405: mov %121,406:mov %122,24:gosub *messagefont
	$405
	$406@

	mov $407,"vٖ@oFIC"
	mov $408,"FAȐ֝Q،EB"
	mov %120,407: mov %121,408:mov %122,24:gosub *messagefont
	$407
	$408@

	mov $409,"琥ّB"
	mov $410,"FSՉwA\cܓI^qB"
	mov %120,409: mov %121,410:mov %122,24:gosub *messagefont
	$409
	$410@

	mov $411,"CVFٔ\ĆB"
	mov %120,411: mov %121,411:mov %122,24:gosub *messagefont
	$411@

	mov $412,"Tccg圓IC{ޔЕoC"
	mov $413,"ތsVJB"
	mov $414,"@"
	mov $415,"@"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	mov %120,412: mov %121,420:mov %122,24:gosub *messagefont
	$412
	$413\

	mov $401,"OғIodϕsZB"
	mov %120,401: mov %121,401:mov %122,24:gosub *messagefont
	$401@

	mov $402,"ߍω\IwC"
	mov $403,"s糎g⋏oΉIC"
	mov $404,"{s\IB"
	mov %120,402: mov %121,404:mov %122,24:gosub *messagefont
	$402
	$403
	$404@

	mov $405,"ݓߍwӉyxIlQC"
	mov $406,"r֗LlSݑB"
	mov %120,405: mov %121,406:mov %122,24:gosub *messagefont
	$405
	$406@

	mov $407,"vl܏o^CvlΉB"
	mov %120,407: mov %121,407:mov %122,24:gosub *messagefont
	$407@

	mov $408,"C~C原sρCsEH"
	mov %120,408: mov %121,408:mov %122,24:gosub *messagefont
	$408@

	mov $409,"@@"
	mov $410,"uuDC苑Ɩ|CC{XQ胁Bvv"
	mov %120,409: mov %121,410:mov %122,24:gosub *messagefont
	br
	$410@

	mov $411,"ߓVIC䉺ӛΑCC{B"
	mov %120,411: mov %121,411:mov %122,24:gosub *messagefont
	$411@

	mov $412,"@@"
	mov $413,"ccccB"
	mov $414,"@"
	mov $415,"@"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	mov %120,412: mov %121,420:mov %122,24:gosub *messagefont
	br
	$413\


	mov $401,"ccccB"
	mov %120,401: mov %121,401:mov %122,24:gosub *messagefont
	$401@

	mov $402,"cccc"
	mov $423,"XQ胜r|sCB"
	mov %120,402: mov %121,402:mov %122,24:gosub *messagefont
	mov %120,423: mov %121,423:mov %122,24:gosub *messagefont
	$402@/
	$423/
	add $402,$423/
	@

	mov $403,"XR胘aV㱍DYr@uZB"
	mov %120,403: mov %121,403:mov %122,24:gosub *messagefont
	$403@

	mov $404,"Ҏh@I傗󔖉ז~ʎB"
	mov $423,"ccB"
	mov %120,404: mov %121,404:mov %122,24:gosub *messagefont
	mov %120,423: mov %121,423:mov %122,24:gosub *messagefont
	$404@/
	$423/
	add $404,$423/
	@

	mov $405,"LlcI柍ݗC{B"
	mov %120,405: mov %121,405:mov %122,24:gosub *messagefont
	$405@

	mov $406,"__ncuZInCB"
	mov %120,406: mov %121,406:mov %122,24:gosub *messagefont
	$406@

	mov $407,"暘Io[yFÍB"
	mov $408,"ߎStMuЌГI瑁B"
	mov %120,407: mov %121,408:mov %122,24:gosub *messagefont
	$407
	$408@

	mov $409,"@@"
	mov $410,"uсcc]]ccv"
	mov $411,"⁗}IΐB"
	mov %120,409: mov %121,411:mov %122,24:gosub *messagefont
	br
	$410
	$411@

	mov $412,"ŁCCw"
	mov $413,"cIovΏoI\B"
	mov %120,412: mov %121,413:mov %122,24:gosub *messagefont
	$412
	$413@

	mov $414,"@ccCEpgCC"
	mov $415,"ȓӔc_ݍVvwI߈胏㗹B"
	mov %120,414: mov %121,415:mov %122,24:gosub *messagefont
	$414
	$415@

	mov $416,"@@"
	mov $417,"ccccc"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	mov %120,406: mov %121,420:mov %122,24:gosub *messagefont
	br
	$417\


	windoweffect 1
	textoff

	dwave 2,"wave\hibi.wav"
	wait 500
	drawfill 255,255,255 : draw : repaint
	wait 500
	drawfill 255,255,255 : draw : repaint

	wait 1000

;ʉFKX
	dwave 2,"wave\Glsmash.wav"
	bg white,1

	wait 4000

;wiF@tF[h
	bg "bg\gakkou_kyousitu.jpg",0
	print 99,3000,"cascade.dll/dx"

;ʉFMMMMM
	dwave 2,"wave\DoorClose.wav"

;wiFc񂾋@tF[h
	bg "bg\gakkou_kyousitu_yugami1.jpg",0
	print 99,3000,"cascade.dll/dx"

;wiFc񂾋@tF[h
	bg "bg\gakkou_kyousitu_yugami2.jpg",0
	print 99,3000,"cascade.dll/dx"

	wait 3000

	bgm "bgm\free41.mp3"

	windoweffect 10,500
	texton


	mov $401,"ccEB"
	mov %120,401: mov %121,401:mov %122,24:gosub *messagefont
	$401@

	mov $402,"kLJHߑFmudLJB"
	mov %120,402: mov %121,402:mov %122,24:gosub *messagefont
	$402@

	mov $403,"sC\s\cÓ_|qzz藁H"
	mov $404,"I\CIs\C"
	mov $405,"wIA嗹JB"
	mov %120,403: mov %121,405:mov %122,24:gosub *messagefont
	$403
	$404
	$405@

	mov $406,"@@"
	mov $407,"VFIߘ蕖ssmIVCܓv֛B"
	mov %120,406: mov %121,407:mov %122,24:gosub *messagefont
	br
	$407@

	mov $408,"ލƌC{s݌QrρB"
	mov %120,408: mov %121,408:mov %122,24:gosub *messagefont
	$408@

	mov $409,"jCIcIaUNߔЎC֎ZB"
	mov %120,409: mov %121,409:mov %122,24:gosub *messagefont
	$409@

	mov $410,"ACގƖ瑾啪JB"
	mov %120,410: mov %121,410:mov %122,24:gosub *messagefont
	$410@

	mov $411,"ޔЎsfn{ЉC"
	mov $412,"śf甉SN|JB"
	mov %120,411: mov %121,412:mov %122,24:gosub *messagefont
	$411
	$412@

	mov $413,"䎀Ll߈CLlkYrIC"
	mov $414,"^VIϑzB"
	mov $415,"@"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	mov %120,413: mov %121,420:mov %122,24:gosub *messagefont
	$413
	$414\


	mov $401,"ލƌ囒vYrqρCAQB"
	mov %120,401: mov %121,401:mov %122,24:gosub *messagefont
	$401@

	mov $402,"œIHCA糒nTՈB"
	mov %120,402: mov %121,402:mov %122,24:gosub *messagefont
	$402@

	mov $403,"EsIuɓ|C"
	mov $404,"FAԝQ꘢HCR@~㋎zHB"
	mov %120,403: mov %121,404:mov %122,24:gosub *messagefont
	$403
	$404@

	mov $405,"BC@ʜޗvLޘ݁C"
	mov $406,"rALl폛{JB"
	mov %120,405: mov %121,406:mov %122,24:gosub *messagefont
	$405
	$406@

	mov $407,"@@"
	mov $408,"ICޘEEB"
	mov %120,407: mov %121,408:mov %122,24:gosub *messagefont
	br
	$408@

	mov $409,"ޔЎr\B藁B"
	mov %120,409: mov %121,409:mov %122,24:gosub *messagefont
	$409@

	mov $410,"@@"
	mov $411,"@ݓIӖYrH"
	mov %120,410: mov %121,411:mov %122,24:gosub *messagefont
	br
	$411@

	mov $412,"x@A@@AwjCYr݁H"
	mov %120,412: mov %121,412:mov %122,24:gosub *messagefont
	$412@

	mov $413,"sACLlEH"
	mov %120,413: mov %121,413:mov %122,24:gosub *messagefont
	$413@

	mov $414,"@ޘErCmlss瑁B"
	mov %120,414: mov %121,414:mov %122,24:gosub *messagefont
	$414@

	mov $415,"C@Cgh˕Kl^NC"
	mov $416,"g桜ޘЉIa^B"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	mov %120,415: mov %121,420:mov %122,24:gosub *messagefont
	$415
	$416\


	mov $401,"Cލƌr藁H"
	mov %120,401: mov %121,401:mov %122,24:gosub *messagefont
	$401@

	mov $402,"FSs@Csx@B"
	mov $403,"r蕎ȘIӛΓsvLB"
	mov %120,402: mov %121,403:mov %122,24:gosub *messagefont
	$402
	$403@

	mov $404,"@@"
	mov $405,"VCޘEEB"
	mov %120,404: mov %121,405:mov %122,24:gosub *messagefont
	br
	$405@

	mov $406,"琥rzIB"
	mov $423,"琥r]IB"
	mov %120,406: mov %121,406:mov %122,24:gosub *messagefont
	mov %120,423: mov %121,423:mov %122,24:gosub *messagefont
	$406@/
	$423/
	add $406,$423/
	@

	mov $407,"KlϓIB"
	mov %120,407: mov %121,407:mov %122,24:gosub *messagefont
	$407@

	mov $408,"@ʕsϓIԁCmccAccsB"
	mov %120,408: mov %121,408:mov %122,24:gosub *messagefont
	$408@

	mov $409,"ޘECsm~ҁB"
	mov %120,409: mov %121,409:mov %122,24:gosub *messagefont
	$409@

	mov $410,"@@"
	mov $411,"œFB\œFB"
	mov %120,410: mov %121,411:mov %122,24:gosub *messagefont
	br
	$411@

	mov $412,"EIaȁC݁C䐴^^nFB"
	mov %120,412: mov %121,412:mov %122,24:gosub *messagefont
	$412@

	mov $413,"vցCC^B"
	mov %120,413: mov %121,413:mov %122,24:gosub *messagefont
	$413@

	mov $414,"@ʖvLl_YrIԁcc"
	mov $415,"@"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	mov %120,414: mov %121,420:mov %122,24:gosub *messagefont
	$414\

	textoff

	bg black,19
	wait 2000

;wiFuuNcHvv@tF[h
	bg "cutin\cutin_13.jpg",12
	wait 3000
;wiFuuAl͂ĂɂȂȂBvv@tF[h
	bg "cutin\cutin_14.jpg",12
	wait 3000
;wiFuuwTρxĂ悤ȃcȂǁAMpłȂBvv@tF[h
	bg "cutin\cutin_15.jpg",12
	wait 3000
;wiFuulgcvv@tF[h
	bg "cutin\cutin_16.jpg",12
	wait 3000
;wiFuulgAƂȂ΁cvv@tF[h
	bg "cutin\cutin_17.jpg",12
	wait 3000
	bg black,17

	bgmfadeout 2000
	bgmstop

	wait 3000

;wiFc񂾐sE[@ʏtF[h
	bg "bg\morioka_sity03_yugami.jpg",12
	wait 4000

	texton


	mov $401,"ρC݉][}B"
	mov %120,401: mov %121,401:mov %122,24:gosub *messagefont
	$401@

	mov $402,"sCVpvLhu趓ISB"
	mov %120,402: mov %121,402:mov %122,24:gosub *messagefont
	$402@

	mov $403,"zNCߋxەzC"
	mov $404,"Dvh@B"
	mov %120,403: mov %121,404:mov %122,24:gosub *messagefont
	$403
	$404@

	mov $405,"l@ʕsh@CAsB"
	mov %120,405: mov %121,405:mov %122,24:gosub *messagefont
	$405@

	mov $406,"ccґRr܁CALލXC"
	mov $407,"H~VIAىeHB"
	mov $408,"@"
	mov $409,"@"
	mov $410,"@"
	mov $411,"@"
	mov $412,"@"
	mov $413,"@"
	mov $414,"@"
	mov $415,"@"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	mov %120,406: mov %121,420:mov %122,24:gosub *messagefont
	$406
	$407\


	mov $401,"rIcc"
	mov %120,401: mov %121,401:mov %122,24:gosub *messagefont
	$401@

	mov $402,"CCVʊŁB"
	mov %120,402: mov %121,402:mov %122,24:gosub *messagefont
	$402@

	mov $403,"ʓI@aQSOޗ͈ρB"
	mov %120,403: mov %121,403:mov %122,24:gosub *messagefont
	$403@

	mov $404,"vܗLYrIԁC"
	mov $405,"Aam㈖{mx寁B"
	mov %120,404: mov %121,405:mov %122,24:gosub *messagefont
	$404
	$405@

	mov $406,"aȍ`I捐mᴛE݊wZr{B"
	mov $407,"ӒnǍeIܗB"
	mov %120,406: mov %121,407:mov %122,24:gosub *messagefont
	$406
	$407@

	mov $408,"@@"
	mov $409,"ccAݜޗdJB"
	mov %120,408: mov %121,409:mov %122,24:gosub *messagefont
	br
	$409@

	mov $410,"k]CӍݝٖ@EaMϓIߑF"
	mov $411,"]rD{B"
	mov %120,410: mov %121,411:mov %122,24:gosub *messagefont
	$410
	$411@

	mov $412,"ޔЋJӍݝٖ@EB"
	mov %120,412: mov %121,412:mov %122,24:gosub *messagefont
	$412@

	mov $413,"ȁCAݜޗdJB"
	mov $414,"@"
	mov $415,"@"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	mov %120,413: mov %121,420:mov %122,24:gosub *messagefont
	$413\

;ʉFoVoVoV
	dwave 2,"wave\mizu.wav"
;ʏh炷
	QUAKE 30,200


	mov $401,"|嗈I{oIFB"
	mov %120,401: mov %121,401:mov %122,24:gosub *messagefont
	$401@

	mov $402,"ǒCLI͗tC"
	mov $403,"LI嗹XݗB"
	mov %120,402: mov %121,403:mov %122,24:gosub *messagefont
	$402
	$403@

	mov $404,"͗b@sٓIC"
	mov $405,"AszcʒȖIC{"
	mov $406,"Ǎdl\œInB"
	mov %120,404: mov %121,406:mov %122,24:gosub *messagefont
	$404
	$405
	$406@

	mov $407,"ௐ惁CLVݐ{RJB"
	mov %120,407: mov %121,407:mov %122,24:gosub *messagefont
	$407@

	mov $408,"@@"
	mov $409,"\EcIBSw蚓IqB"
	mov %120,408: mov %121,409:mov %122,24:gosub *messagefont
	br
	$409@

	mov $410,"푩ݜޘEIB"
	mov %120,410: mov %121,410:mov %122,24:gosub *messagefont
	$410@

	mov $411,"֔\꘢ʏIB"
	mov %120,411: mov %121,411:mov %122,24:gosub *messagefont
	$411@

	mov $412,"FB"
	mov %120,412: mov %121,412:mov %122,24:gosub *messagefont
	$412@

	mov $413,"@@"
	mov $414,"AݜޗC^ߍdB"
	mov $415,"@"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	mov %120,413: mov %121,420:mov %122,24:gosub *messagefont
	br
	$414\

	textoff

	bg black,12

	wait 3000

	texton


	mov $401,"}SRCsҍ݉C"
	mov $402,"R@ГI⋑B"
	mov %120,401: mov %121,402:mov %122,24:gosub *messagefont
	$401
	$402@

	mov $403,"߂U_SOB"
	mov $404,"J蚔ǑACnccs卡VsB"
	mov %120,403: mov %121,404:mov %122,24:gosub *messagefont
	$403
	$404@

	mov $405,"s\w蚓B"
	mov %120,405: mov %121,405:mov %122,24:gosub *messagefont
	$405@

	mov $406,"CJ蚔ǗpIm㈖{Eݓ͒ꗹB"
	mov %120,406: mov %121,406:mov %122,24:gosub *messagefont
	$406@

	mov $407,"@@"
	mov $408,"w蚏YrIȉ@CIL㱋J蚔ǁB"
	mov %120,407: mov %121,408:mov %122,24:gosub *messagefont
	br
	$408@

	mov $409,"ccKlߗcc"
	mov %120,409: mov %121,409:mov %122,24:gosub *messagefont
	$409@

	mov $410,"ߘIٕsInB"
	mov %120,410: mov %121,410:mov %122,24:gosub *messagefont
	$410@

	mov $411,"ʉޘEoInB"
	mov $412,"@"
	mov $413,"@"
	mov $414,"@"
	mov $415,"@"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	mov %120,411: mov %121,420:mov %122,24:gosub *messagefont
	$411\

	textoff
	wait 3000

;ʉF̐@iiv[vj
	bgm "bgm\SE_IN200.mp3"
	wait 3000
;wiFc񂾗ׂ̉w@tF[hC
	bg "bg\tonarieki_yugami.jpg",19
	wait 4000

	texton


	mov $401,"ݝِl⋓Iʈ֏㍿꘢B"
	mov %120,401: mov %121,401:mov %122,24:gosub *messagefont
	$401@

	mov $402,"ފ㱁CLˉ͎뎧B"
	mov %120,402: mov %121,402:mov %122,24:gosub *messagefont
	$402@

	mov $403,"֗Lˈ_ʗ͒≺C{qB"
	mov %120,403: mov %121,403:mov %122,24:gosub *messagefont
	$403@

	mov $404,"餉͓C֗Lkʈi㱁B"
	mov %120,404: mov %121,404:mov %122,24:gosub *messagefont
	$404@

	mov $405,"⋑ˋوlCT^Im⋌iہB"
	mov %120,405: mov %121,405:mov %122,24:gosub *messagefont
	$405@

	mov $406,"@@"
	mov $407,"@ʘVIԁCޘ㱓_EH"
	mov %120,406: mov %121,407:mov %122,24:gosub *messagefont
	br
	$407@

	mov $408,"֐VρCݓϓI㱏oH"
	mov %120,408: mov %121,408:mov %122,24:gosub *messagefont
	$408@

	mov $409,"ҁCSvzݍVV@V֗"
	mov $410,"soH"
	mov %120,409: mov %121,410:mov %122,24:gosub *messagefont
	$409
	$410@

	mov $411,"@@CsM\FVC"
	mov $412,"\\]ҁB"
	mov $413,"@"
	mov $414,"@"
	mov $415,"@"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	mov %120,411: mov %121,420:mov %122,24:gosub *messagefont
	$411
	$412\


	mov $401,"䐥ߔЏYrs\zCIlB"
	mov %120,401: mov %121,401:mov %122,24:gosub *messagefont
	$401@

	mov $402,"vwCC"
	mov $403,"vL福IB"
	mov %120,402: mov %121,403:mov %122,24:gosub *messagefont
	$402
	$403@

	mov $404,"󓞍UCC"
	mov $405,"ސlIꕔCva@IB"
	mov %120,404: mov %121,405:mov %122,24:gosub *messagefont
	$404
	$405@

	mov $406,"꒼srzIB"
	mov %120,406: mov %121,406:mov %122,24:gosub *messagefont
	$406@

	mov $407,"ȁCގ\rSnzCJB"
	mov %120,407: mov %121,407:mov %122,24:gosub *messagefont
	$407@

	mov $408,"ޘEECvCB"
	mov %120,408: mov %121,408:mov %122,24:gosub *messagefont
	$408@

	mov $409,"Rs\dlCߏA\R䗈B"
	mov %120,409: mov %121,409:mov %122,24:gosub *messagefont
	$409@

	mov $410,"@@"
	mov $411,"^"
	mov %120,410: mov %121,411:mov %122,24:gosub *messagefont
	br
	$411@

	mov $412,"@@"
	mov $413,"ccߓB"
	mov %120,412: mov %121,413:mov %122,24:gosub *messagefont
	br
	textspeed 200
	$413@

	mov $414,"ܐccVߓIܐB"
	mov %120,414: mov %121,414:mov %122,24:gosub *messagefont
	$414@

	mov $415,"^^㜒nCϋ߁B"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	mov %120,415: mov %121,420:mov %122,24:gosub *messagefont
	$415\

	textoff
;wiFc񂾗ׂ̉wiuj@tF[hȂ
	bg "bg\tonarieki_yugami_bure.jpg",1

;G\FDP@@ʒuF
	ld l,":a;tatie\yuuki\odoroki.bmp",12

;G\F搶@ʏ@ʒuFE
	ld r,":a;tatie\sensei\tuujyou1.bmp",12

	texton

	mov $401,"u迗^B"
	mov %120,401: mov %121,401:mov %122,24:gosub *messagefont
	$401@

	mov $402,"ֈC迉Ďe欍lꉺ"
	mov $403,"ˉ嗈藁cc"
	mov %120,402: mov %121,403:mov %122,24:gosub *messagefont
	$402
	$403@

	mov $404,"@CvLߘ]TJBv"
	mov %120,404: mov %121,404:mov %122,24:gosub *messagefont
	$404@

	mov $405,"@@"
	mov $406,"uuVIvv"
	mov %120,405: mov %121,406:mov %122,24:gosub *messagefont
	br
	$406@

	QUAKE 20,200

	mov $407,"@@"
	mov $408,"䘸ʈ֏⋋NC}VB"
	mov %120,407: mov %121,408:mov %122,24:gosub *messagefont
	br
	$408@

	mov $409,"xaS݋CB"
	mov %120,409: mov %121,409:mov %122,24:gosub *messagefont
	$409@

	mov $410,"C迗I"
	mov %120,410: mov %121,410:mov %122,24:gosub *messagefont
	$410@

	mov $411,"ʑRvցC@䏊zIρB"
	mov %120,411: mov %121,411:mov %122,24:gosub *messagefont
	$411@

	mov $412,"ޘlccsePB"
	mov %120,412: mov %121,412:mov %122,24:gosub *messagefont
	$412@

	mov $413,"@@"
	mov $414,"uuDCJBv"
	mov $415,"uݓI߁CVŋN֗vܜBv"
	mov %120,413: mov %121,415:mov %122,24:gosub *messagefont
	br
	$414
	$415@

	mov $416,"uvYVEHvv"
	mov %120,416: mov %121,416:mov %122,24:gosub *messagefont
	$416@

	mov $417,"@@"
	mov $418,"uuspCVsvB^IBvv"
	mov $419,"@"
	mov $420,"@"
	mov %120,417: mov %121,420:mov %122,24:gosub *messagefont
	br
	$418\


	mov $401,"dVʈ֏Cƒn笗YVB"
	mov %120,401: mov %121,401:mov %122,24:gosub *messagefont
	$401@

	mov $402,"ݓI߁CAZ[㗈sJB"
	mov %120,402: mov %121,402:mov %122,24:gosub *messagefont
	$402@

	mov $403,"V疾ވ_C"
	mov $404,"ȕsVϕ|䗹B"
	mov %120,403: mov %121,404:mov %122,24:gosub *messagefont
	$403
	$404@

	mov $405,"@@"
	mov $406,"uuVCېYrJHvv"
	mov $407,"@"
	mov $408,"@"
	mov $409,"@"
	mov $410,"@"
	mov $411,"@"
	mov $412,"@"
	mov $413,"@"
	mov $414,"@"
	mov $415,"@"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	mov %120,405: mov %121,420:mov %122,24:gosub *messagefont
	br
	$406\

	textoff

;GύXFDP@ʏ@ʒuF

	ld l,":a;tatie\yuuki\tuujyou.bmp",12

	texton


	mov $401,"uuccBvv"
	mov %120,401: mov %121,401:mov %122,24:gosub *messagefont
	$401@

	mov $402,"@@"
	mov $403,"uIcc@ʐȑOI߁CB֔\E󓾏ZJB"
	mov %120,402: mov %121,403:mov %122,24:gosub *messagefont
	br
	$403@

	mov $404,"A݁CߛEmޘEI^B"
	mov %120,404: mov %121,404:mov %122,24:gosub *messagefont
	$404@

	mov $405,"٘mҗ܁CޔЎٖ@EICJHv"
	mov $406,"usC܁Cٖ@ZˍXyJBv"
	mov %120,405: mov %121,406:mov %122,24:gosub *messagefont
	$405
	$406@

	mov $407,"@@"
	mov $408,"VvLCYrB"
	mov %120,407: mov %121,408:mov %122,24:gosub *messagefont
	br
	$408@

	mov $409,"@@"
	mov $410,"Ccc{vKvB"
	mov %120,409: mov %121,410:mov %122,24:gosub *messagefont
	br
	$410@

	mov $411,"AZ܏oCsNۓ{B"
	mov $412,"sߔЉẢ̖䔈ԉIlB"
	mov %120,411: mov %121,412:mov %122,24:gosub *messagefont
	$411
	$412@

	mov $413,"CsvߔЗ@B"
	mov $414,"CߔЗ@C{rsCVvB"
	mov %120,413: mov %121,414:mov %122,24:gosub *messagefont
	$413
	$414@

	mov $415,"䐥Cԋw_x˗ޗIB"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	mov %120,415: mov %121,420:mov %122,24:gosub *messagefont
	$415\


	mov $401,"uAVܓIρc"
	mov $402,"Eϓ܌㱊VBv"
	mov %120,401: mov %121,402:mov %122,24:gosub *messagefont
	$401
	$402@

	mov $403,"ŗz㗹B"
	mov %120,403: mov %121,403:mov %122,24:gosub *messagefont
	$403@

	mov $404,"ݜρC"
	mov $405,"EEݟ|smɋn\䗹fI^"
	mov $406,"ȓEBv"
	mov %120,404: mov %121,406:mov %122,24:gosub *messagefont
	$404
	$405
	$406@

	mov $407,"@@"
	mov $408,"ucICFV迁Bv"
	mov %120,407: mov %121,408:mov %122,24:gosub *messagefont
	br
	$408@

	mov $409,"@@"
	mov $410,"urIߎȚGB"
	mov $411,"ߖ\IԚvB"
	mov %120,409: mov %121,411:mov %122,24:gosub *messagefont
	br
	$410
	$411@

	mov $412,"crC߉rSEHv"
	mov %120,412: mov %121,412:mov %122,24:gosub *messagefont
	$412@

	mov $413,"@@"
	mov $414,"rScc"
	mov %120,413: mov %121,414:mov %122,24:gosub *messagefont
	br
	$414@

	mov $415,"vցc֔CmCv^ޘaȓIErC"
	mov $416,"CC{LIρBᚐSӁB"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	mov %120,415: mov %121,420:mov %122,24:gosub *messagefont
	$415
	$416\

	textoff

;ʉtF[hAEg
	bgmfadeout 1000
	bgmstop

	ld l,":a;tatie\yuuki\majime.bmp",12

	texton

	mov $401,"uccc"
	mov $423,"ICEr藹Bv"
	mov %120,401: mov %121,401:mov %122,24:gosub *messagefont
	mov %120,423: mov %121,423:mov %122,24:gosub *messagefont
	$401@/
	$423/
	add $401,$423/
	@

	mov $402,"@@"
	mov $403,"uUۏoވsCAĖsB"
	mov %120,402: mov %121,403:mov %122,24:gosub *messagefont
	br
	$403@

	mov $404,"蓓Iꕔ衉eCLψ䍮B"
	mov %120,404: mov %121,404:mov %122,24:gosub *messagefont
	$404@

	mov $405,"wEDCDB"
	mov $406,"AC㱓IԏA͓ȁx"
	mov %120,405: mov %121,406:mov %122,24:gosub *messagefont
	$405
	$406@

	mov $407,"ߖދԓIӎvEHv"
	mov %120,407: mov %121,407:mov %122,24:gosub *messagefont
	$407@

	mov $408,"@@"
	mov $409,"ucC䖾B"
	mov %120,408: mov %121,409:mov %122,24:gosub *messagefont
	br
	$409@

	mov $410,"֔@C֐zwxB"
	mov %120,410: mov %121,410:mov %122,24:gosub *messagefont
	$410@

	mov $411,"sCܐKlBv"
	mov %120,411: mov %121,411:mov %122,24:gosub *messagefont
	$411@

	mov $412,"@@"
	mov $413,"TCVz܁eݎqIrS甎Ȏ󈻁f"
	mov $414,"ޘӎvJB"
	mov %120,412: mov %121,414:mov %122,24:gosub *messagefont
	br
	$413
	$414@

	mov $415,"sCޔВSS]IB"
	mov %120,415: mov %121,415:mov %122,24:gosub *messagefont
	$415@

	mov $416,"ݓICs\\㱗B"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	mov %120,416: mov %121,420:mov %122,24:gosub *messagefont
	$416\


	mov $401,"u@cŗߓIrSk筒vB"
	mov %120,401: mov %121,401:mov %122,24:gosub *messagefont
	$401@

	mov $402,"rCFs꘢RJB"
	mov $403,"^ccwC⋋NBv"
	mov %120,402: mov %121,403:mov %122,24:gosub *messagefont
	$402
	$403@

	mov $404,"@@"
	mov $405,"AيwܒԈρC"
	mov $406,"VIB"
	mov %120,404: mov %121,406:mov %122,24:gosub *messagefont
	br
	$405
	$406@

	mov $407,"VˑꎟFʁCpE㈏ZIB"
	mov $408,"甉䊴퍂悁C䗧⋗NB"
	mov %120,407: mov %121,408:mov %122,24:gosub *messagefont
	$407
	$408@

	mov $409,"@@"
	mov $410,"uuCnܕb@C܁wxBx"
	mov %120,409: mov %121,410:mov %122,24:gosub *messagefont
	br
	$410@

	mov $411,"苑j~Bvv"
	mov $412,"@"
	mov $413,"@"
	mov $414,"@"
	mov $415,"@"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	mov %120,411: mov %121,420:mov %122,24:gosub *messagefont
	$411\

	textoff
;GύXFDP@ʏ@ʒuF
	ld l,":a;tatie\yuuki\tuujyou.bmp",12
	texton

	mov $401,"uuccHvv"
	mov %120,401: mov %121,401:mov %122,24:gosub *messagefont
	$401@

	mov $402,"@@"
	mov $403,"YrHYrӎvH"
	mov %120,402: mov %121,403:mov %122,24:gosub *messagefont
	br
	$403@

	mov $404,"ޒԑ˙YCSts\IӝB"
	mov %120,404: mov %121,404:mov %122,24:gosub *messagefont
	$404@

	mov $405,"ޓꐥYrRH"
	mov %120,405: mov %121,405:mov %122,24:gosub *messagefont
	$405@

	mov $406,"܉񗈁CAZj~\Cr藁cc"
	mov %120,406: mov %121,406:mov %122,24:gosub *messagefont
	$406@

	mov $407,"@@"
	mov $408,"uDCwxBx"
	mov %120,407: mov %121,408:mov %122,24:gosub *messagefont
	br
	$408@

	mov $409,"ssccґRrSk筒CAsËpsB"
	mov %120,409: mov %121,409:mov %122,24:gosub *messagefont
	$409@

	mov $410,"ߍDClٖ@j~dl^IB"
	mov $411,"ސVgRB"
	mov $412,"Aߖv\j~ρB"
	mov %120,410: mov %121,412:mov %122,24:gosub *messagefont
	$410
	$411
	$412@

	mov $413,"śfCl\dlEI"
	mov $414,"@sh߁B"
	mov %120,413: mov %121,414:mov %122,24:gosub *messagefont
	$413
	$414@

	mov $415,"ޏAݓI߁B"
	mov %120,415: mov %121,415:mov %122,24:gosub *messagefont
	$415@

	mov $416,"sz@CꖡnŁB"
	mov $417,"s[Isܚs[CgB"
	mov $423,"ȍˉ懎Bv"
	mov %120,416: mov %121,417:mov %122,24:gosub *messagefont
	mov %120,423: mov %121,423:mov %122,24:gosub *messagefont
	$416
	$417@/
	$423/
	add $417,$423/
	@

	mov $418,"@@"
	mov $419,"ucccv"
	mov $420,"@"
	mov %120,418: mov %121,420:mov %122,24:gosub *messagefont
	br
	$419\


	mov $401,"u\槍юsÁC\槕\萈FB"
	mov $402,"vSZϓICٕs\B"
	mov %120,401: mov %121,402:mov %122,24:gosub *messagefont
	$401
	$402@

	mov $403,"ۍCAdlssÁB"
	mov %120,403: mov %121,403:mov %122,24:gosub *messagefont
	$403@

	mov $404,"Udls×CߏA\ÐڎB"
	mov %120,404: mov %121,404:mov %122,24:gosub *messagefont
	$404@

	mov $405,"@ʕszρCߏAېlBv"
	mov %120,405: mov %121,405:mov %122,24:gosub *messagefont
	$405@

	mov $406,"@@"
	mov $407,"lٖ@j~dlIsÓIB"
	mov $408,"Ӕ@B"
	mov %120,406: mov %121,408:mov %122,24:gosub *messagefont
	br
	$407
	$408@

	mov $409,"@ʕszÈŁCAvrza@C"
	mov $410,"\ٕXюsÁB"
	mov %120,409: mov %121,410:mov %122,24:gosub *messagefont
	$409
	$410@

	mov $411,"@@"
	mov $412,"urCėꎟccܕb@܁uxB"
	mov %120,411: mov %121,412:mov %122,24:gosub *messagefont
	br
	$412@

	mov $413,"苑j~JBv"
	mov $414,"@"
	mov $415,"@"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	mov %120,413: mov %121,420:mov %122,24:gosub *messagefont
	$413\

	textoff
;GύXFDP@^ʖځ@ʒuF
	ld l,":a;tatie\yuuki\majime.bmp",12
	texton


	mov $401,"DCza@Cza@BLܕb艓I㱁B"
	mov $402,"sفCґRܐܕbC"
	mov $403,"AL\OsÁC笕s\{SSB"
	mov %120,401: mov %121,403:mov %122,24:gosub *messagefont
	$401
	$402
	$403@

	mov $404,"raHvsv܁u苕svρvH"
	mov $405,"Cܗvۏᑼ≺B"
	mov %120,404: mov %121,405:mov %122,24:gosub *messagefont
	$404
	$405@

	mov $406,"vsv螏ZI{H"
	mov $407,"VŋNgTLĔEC"
	mov $408,"AL֐\槓{IB"
	mov %120,406: mov %121,408:mov %122,24:gosub *messagefont
	$406
	$407
	$408@

	mov $409,"sCϘsD藁ccH"
	mov %120,409: mov %121,409:mov %122,24:gosub *messagefont
	$409@

	mov $410,"ssCEv㱗B"
	mov $411,"R@C\|Ucc"
	mov %120,410: mov %121,411:mov %122,24:gosub *messagefont
	$410
	$411@

;ʉFUb
	dwave 2,"wave\step12.wav"
	QUAKE 25,200

	mov $412,"@@"
	mov $413,"LoCcZVI{B"
	mov %120,412: mov %121,413:mov %122,24:gosub *messagefont
	br
	$413@

	mov $414,"VvLÁC֖vCnsÁcc֗yI"
	mov %120,414: mov %121,414:mov %122,24:gosub *messagefont
	$414@

;ʉFtb
;GF搶@@tF[hȂ
	dwave 2,"wave\swing40_c.wav"
	cl r,1
	QUAKE 20,200

	mov $415,"@@"
	mov $416,"RCVu㱏Co݉䐳B"
	mov %120,415: mov %121,416:mov %122,24:gosub *messagefont
	br
	$416@

	mov $417,"ڒCՒ蓅IENߊOB"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	mov %120,417: mov %121,420:mov %122,24:gosub *messagefont
	$417\

	textoff
;G\F搶@ʏ@ʒuFE
	ld r,":a;tatie\sensei\tuujyou1.bmp",12

;ʉFp`
	dwave 2,"wave\hit49.wav"
	drawfill 255,255,255 : draw : repaint
	QUAKE 20,200

;GύXFDP@@ʒuF
	ld l,":a;tatie\yuuki\keno.bmp",1

	texton

	mov $401,"ueIv"
	mov %120,401: mov %121,401:mov %122,24:gosub *messagefont
	$401@

	mov $402,"@@"
	mov $403,"荔⁗SIɊB"
	mov $404,"DVpwߗꉺB"
	mov %120,402: mov %121,404:mov %122,24:gosub *messagefont
	br
	$403
	$404@

	mov $405,"@@"
	mov $406,"u@Cs֓IfB"
	mov $407,"ŗߕsLrSC֋ݗs×́B"
	mov %120,405: mov %121,407:mov %122,24:gosub *messagefont
	br
	$406
	$407@

	mov $408,"sCގu֕s槁Bv"
	mov $409,"u˗Lu๘B"
	mov $423,"ߏAvIBv"
	mov %120,408: mov %121,409:mov %122,24:gosub *messagefont
	mov %120,423: mov %121,423:mov %122,24:gosub *messagefont
	$408
	$409@/
	$423/
	add $409,$423/
	@

	mov $410,"@@"
	mov $411,"uAccv"
	mov $412,"@"
	mov $413,"@"
	mov $414,"@"
	mov $415,"@"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	mov %120,410: mov %121,420:mov %122,24:gosub *messagefont
	br
	$411\


	mov $401,"u˕sܗEH"
	mov $402,"ݒ㱉͓IB"
	mov %120,401: mov %121,402:mov %122,24:gosub *messagefont
	$401
	$402@

	mov $403,"@ʑgCpٖ@T^pCv"
	mov $404,"ߕsꍱmΎ߁B"
	mov %120,403: mov %121,404:mov %122,24:gosub *messagefont
	$403
	$404@

	mov $405,"ݍsÓICvSVTB"
	mov %120,405: mov %121,405:mov %122,24:gosub *messagefont
	$405@

	mov $406,"@ʉꎟ๘wC"
	mov $407,"\As߈ꉺ荔rlGB"
	mov %120,406: mov %121,407:mov %122,24:gosub *messagefont
	$406
	$407@

	mov $408,"@ߑzvCޘEC"
	mov $409,"LAv\o槗⍓IEBv"
	mov $410,"@"
	mov $411,"@"
	mov $412,"@"
	mov $413,"@"
	mov $414,"@"
	mov $415,"@"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	mov %120,408: mov %121,420:mov %122,24:gosub *messagefont
	$408
	$409\

	textoff

;GύXFDP@@ʒuF
	ld l,":a;tatie\yuuki\majime.bmp",12

	texton

	mov $401,"@ccfIӎvB"
	mov $402,"VݜT䐥۔\槏ȓIӎutsÁB"
	mov %120,401: mov %121,402:mov %122,24:gosub *messagefont
	$401
	$402@

	mov $403,"p|qC"
	mov $404,"pٖ@tӑHIԁCA|وӖB"
	mov %120,403: mov %121,404:mov %122,24:gosub *messagefont
	$403
	$404@

	mov $405,"vLވ_CA}ҁwxIEC"
	mov $406,"ȋyCEIgcc"
	mov %120,405: mov %121,406:mov %122,24:gosub *messagefont
	$405
	$406@

	mov $407,"^aCaB"
	mov $408,"T˓IߔƎJB"
	mov %120,407: mov %121,408:mov %122,24:gosub *messagefont
	$407
	$408@

	mov $409,"@@"
	mov $410,"uccAIC䖾C迁Iv"
	mov %120,409: mov %121,410:mov %122,24:gosub *messagefont
	br
	$410@

	mov $411,"@@"
	mov $412,"ukDB"
	mov $423,"ߓI\ŋNcDꍱ藁Bv"
	mov %120,411: mov %121,412:mov %122,24:gosub *messagefont
	mov %120,423: mov %121,423:mov %122,24:gosub *messagefont
	br
	$412@/
	$423/
	add $412,$423/
	@

	mov $413,"urCFVJcv"
	mov %120,413: mov %121,413:mov %122,24:gosub *messagefont
	$413@

	mov $414,"u䗈G߁Bv"
	mov $415,"uv@CޘEBv"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	mov %120,414: mov %121,420:mov %122,24:gosub *messagefont
	$414
	$415\

	textoff
	wait 1000

	bgm "bgm\free56.mp3"
;GύXF搶@ʏQ@ʒuFE
	ld r,":a;tatie\sensei\tuujyou2.bmp",12
	wait 2000
	texton


	mov $401,"uuyݍDEHvv"
	mov %120,401: mov %121,401:mov %122,24:gosub *messagefont
	textspeed 200
	$401@

	mov $402,"@@"
	mov $403,"󟃁cꉺqx茗c"
	mov %120,402: mov %121,403:mov %122,24:gosub *messagefont
	br
	$403@

	mov $404,"fvB"
	mov %120,404: mov %121,404:mov %122,24:gosub *messagefont
	$404@

	mov $405,"ډIވԁC甉䍫SsIȁB"
	mov $406,"IurGIB"
	mov %120,405: mov %121,406:mov %122,24:gosub *messagefont
	$405
	$406@

	mov $407,"@@"
	mov $408,"ucIBv"
	mov %120,407: mov %121,408:mov %122,24:gosub *messagefont
	br
	$408@

	mov $409,"@@"
	mov $410,"ꉺCҒډIgB"
	mov %120,409: mov %121,410:mov %122,24:gosub *messagefont
	br
	$410@

	mov $411,"CsR{C꘢CS_ؒn椙ߒB"
	mov %120,411: mov %121,411:mov %122,24:gosub *messagefont
	$411@

	mov $412,"RCV܏oIԁC"
	mov $413,"p퉦ZB"
	mov %120,412: mov %121,413:mov %122,24:gosub *messagefont
	$412
	$413@

	mov $414,"@@"
	mov $415,"uklIGBv"
	mov %120,414: mov %121,415:mov %122,24:gosub *messagefont
	br
	$415@

	mov $416,"Cߐ퉦lIBv"
	mov %120,416: mov %121,416:mov %122,24:gosub *messagefont
	$416@

	mov $417,"uߍ\ߓIwcv"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	mov %120,417: mov %121,420:mov %122,24:gosub *messagefont
	$417\

	windoweffect 1
	textoff

;ʉFMMMMMc
	dwave 2,"wave\DoorClose.wav"
;JbgCFuނEĂ܂Ȃv@Sb\Čɖ߂@tF[h
	bg "cutin\cutin_18.jpg",16
	wait 4000

	bg "bg\tonarieki_yugami_bure.jpg",0
	ld r,":a;tatie\sensei\tuujyou2.bmp",0
	ld l,":a;tatie\yuuki\tuujyou.bmp",12
	wait 2000

	windoweffect 10,500
	texton

	mov $401,"ucccv"
	mov %120,401: mov %121,401:mov %122,24:gosub *messagefont
	$401@

	mov $402,"@@"
	mov $403,"uFBv"
	mov %120,402: mov %121,403:mov %122,24:gosub *messagefont
	br
	$403@

	mov $404,"Nlٛwq܏oϓIԁC^IEH"
	mov %120,404: mov %121,404:mov %122,24:gosub *messagefont
	$404@

	mov $405,"ӁC٘Fߔ媉aIUC"
	mov $406,"\ӁB"
	mov %120,405: mov %121,406:mov %122,24:gosub *messagefont
	$405
	$406@

	mov $407,"CICEd\B"
	mov $408,"rrzIB"
	mov %120,407: mov %121,408:mov %122,24:gosub *messagefont
	$407
	$408@

	mov $409,"CٛBFߔАlCˍD藁B"
	mov %120,409: mov %121,409:mov %122,24:gosub *messagefont
	$409@

	mov $410,"vցC䐤ӐrzIB"
	mov %120,410: mov %121,410:mov %122,24:gosub *messagefont
	$410@

	mov $411,"@@"
	mov $412,"uuGށCߓ|vrz藁Bvv"
	mov %120,411: mov %121,412:mov %122,24:gosub *messagefont
	br
	$412@

	mov $413,"@@"
	mov $414,"uuucDLޔ爊JBv"
	mov %120,413: mov %121,414:mov %122,24:gosub *messagefont
	br
	$414@

	mov $415,"uACVcvv"
	mov %120,415: mov %121,415:mov %122,24:gosub *messagefont
	$415@

	mov $416,"@@"
	mov $417,"uu^LKvlEHvv"
	mov %120,416: mov %121,417:mov %122,24:gosub *messagefont
	br
	$417@

	mov $418,"@@"
	mov $419,"ucIBv"
	mov $420,"@"
	mov %120,418: mov %121,420:mov %122,24:gosub *messagefont
	br
	$419\


	mov $401,"uRLKvB"
	mov %120,401: mov %121,401:mov %122,24:gosub *messagefont
	$401@

	mov $402,"CȔcF{B"
	mov %120,402: mov %121,402:mov %122,24:gosub *messagefont
	$402@

	mov $403,"@ʏA甑FЉCߌuېYrH"
	mov %120,403: mov %121,403:mov %122,24:gosub *messagefont
	$403@

	mov $404,"CxFIC"
	mov $405,"LlCFIi藁H"
	mov %120,404: mov %121,405:mov %122,24:gosub *messagefont
	$404
	$405@

	mov $406,"ވ؁Cȍݜޗj~B"
	mov $407,"ݏABv"
	mov %120,406: mov %121,407:mov %122,24:gosub *messagefont
	$406
	$407@

	mov $408,"@@"
	mov $409,"ucccv"
	mov %120,408: mov %121,409:mov %122,24:gosub *messagefont
	br
	$409@

	mov $410,"@@"
	mov $411,"vցC@ʕszߓdl܁wxC"
	mov $412,"ŉlI@AgZFI{B"
	mov %120,410: mov %121,412:mov %122,24:gosub *messagefont
	br
	$411
	$412@

	mov $413,"ݓߍƌю扺ssÔVOCFÎAsB"
	mov $414,"@"
	mov $415,"@"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	mov %120,413: mov %121,420:mov %122,24:gosub *messagefont
	$413\


	mov $401,"uCٕ{ٖ@ْԗrVB"
	mov %120,401: mov %121,401:mov %122,24:gosub *messagefont
	$401@

	mov $402,"蕓{{ԗ\Nsv\rI"
	mov $403,"ZЋ\ܒvIVvBv"
	mov %120,402: mov %121,403:mov %122,24:gosub *messagefont
	$402
	$403@

	mov $404,"{甋\~ޔЕ規A֓IB"
	mov %120,404: mov %121,404:mov %122,24:gosub *messagefont
	$404@

	mov $405,"͗՗I㉺gnC"
	mov $406,"֐Pq瑶ݚGB"
	mov %120,405: mov %121,406:mov %122,24:gosub *messagefont
	$405
	$406@

	mov $407,"|ҐҁCސRI@B"
	mov $408,"xsCܒvٕSCsFBv"
	mov %120,407: mov %121,408:mov %122,24:gosub *messagefont
	$407
	$408@

	mov $409,"@@"
	mov $410,"ccw\ٖ@IxB"
	mov %120,409: mov %121,410:mov %122,24:gosub *messagefont
	br
	$410@

	mov $411,"ߐl^I@C"
	mov $412,"Нٖ@I{\B"
	mov %120,411: mov %121,412:mov %122,24:gosub *messagefont
	$411
	$412@

	mov $413,"@@"
	mov $414,"us藁CcNCMlLB"
	mov %120,413: mov %121,414:mov %122,24:gosub *messagefont
	br
	$414@

	mov $415,"ݓIwqFCAslIVlB"
	mov %120,415: mov %121,415:mov %122,24:gosub *messagefont
	$415@

	mov $416,"Z肖IGL֏oB"
	mov $417,"ՌDC߈I`B"
	mov %120,416: mov %121,417:mov %122,24:gosub *messagefont
	$416
	$417@

	mov $418,"cEHv"
	mov %120,418: mov %121,418:mov %122,24:gosub *messagefont
	$418@

	mov $419,"@@"
	mov $420,"ucBv"
	mov %120,419: mov %121,420:mov %122,24:gosub *messagefont
	br
	$420\


	mov $401,"uߐډvsIwCxC"
	mov $402,"LdvIӖB"
	mov %120,401: mov %121,402:mov %122,24:gosub *messagefont
	$401
	$402@

	mov $403,"wQǓwBމC嗑ČB"
	mov %120,403: mov %121,403:mov %122,24:gosub *messagefont
	$403@

	mov $404,"惘aVYEڑړC"
	mov $405,"]{VsCjԎVB"
	mov %120,404: mov %121,405:mov %122,24:gosub *messagefont
	$404
	$405@

	mov $406,"NߍVI\IC"
	mov $407,"ٔ}̗܁CޔЍXzዅIVYf藁B"
	mov %120,406: mov %121,407:mov %122,24:gosub *messagefont
	$406
	$407@

	mov $408,"ލړCISe⁕Ր{B"
	mov $409,"UCccߔV@CAĖٖ@j~B"
	mov %120,408: mov %121,409:mov %122,24:gosub *messagefont
	$408
	$409@

	mov $410,"\Ғ\ҁB"
	mov $411,"IېJB"
	mov %120,410: mov %121,411:mov %122,24:gosub *messagefont
	$410
	$411@

	mov $412,"sC@CˉVB"
	mov %120,412: mov %121,412:mov %122,24:gosub *messagefont
	$412@

	mov $413,"@ʔcٕNxCwInA嗈hȁB"
	mov %120,413: mov %121,413:mov %122,24:gosub *messagefont
	$413@

	mov $414,"ޔЋC}\sCBv"
	mov %120,414: mov %121,414:mov %122,24:gosub *messagefont
	$414@

	mov $415,"@@"
	mov $416,"u^Icc\r[EHv"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	mov %120,415: mov %121,420:mov %122,24:gosub *messagefont
	br
	$416\


	mov $401,"uӏCBxAIC"
	mov $402,"wZېIBBC"
	mov $403,"ސً\IwB"
	mov %120,401: mov %121,403:mov %122,24:gosub *messagefont
	$401
	$402
	$403@

	mov $404,"F汓@B"
	mov %120,404: mov %121,404:mov %122,24:gosub *messagefont
	$404@

	mov $405,"VC{IwqFϓI藁H"
	mov $406,"ϑzwVlL󓞈QxC"
	mov $407,"R@APB"
	mov %120,405: mov %121,407:mov %122,24:gosub *messagefont
	$405
	$406
	$407@

	mov $408,"ߍIwCvzQҎ󓞓I膌"
	mov $409,"RVI__hJB"
	mov %120,408: mov %121,409:mov %122,24:gosub *messagefont
	$408
	$409@

	mov $410,"ϓIԁCʉ엢IӖYr藁Hv"
	mov %120,410: mov %121,410:mov %122,24:gosub *messagefont
	$410@

	mov $411,"@@"
	mov $412,"ucccv"
	mov %120,411: mov %121,412:mov %122,24:gosub *messagefont
	br
	$412@

	mov $413,"@@"
	mov $414,"usŔ\s\[CvGCcNB"
	mov %120,413: mov %121,414:mov %122,24:gosub *messagefont
	br
	$414@

	mov $415,"꘢QҔ팴ZALQҎIЉC"
	mov $416,"F~JB"
	mov %120,415: mov %121,416:mov %122,24:gosub *messagefont
	$415
	$416@

	mov $417,"@ʑlٖ@nwqC"
	mov $418,"ߏA\RwqwqB"
	mov $423,"sEHv"
	mov $419,"@"
	mov $420,"@"
	mov %120,417: mov %121,420:mov %122,24:gosub *messagefont
	mov %120,423: mov %121,423:mov %122,24:gosub *messagefont
	$417
	$418@/
	$423/
	add $418,$423/
	\


	mov $401,"ucccv"
	mov $402,"@"
	mov $403,"@"
	mov $404,"@"
	mov $405,"@"
	mov $406,"@"
	mov $407,"@"
	mov $408,"@"
	mov $409,"@"
	mov $410,"@"
	mov $411,"@"
	mov $412,"@"
	mov $413,"@"
	mov $414,"@"
	mov $415,"@"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	mov %120,401: mov %121,420:mov %122,24:gosub *messagefont
	$401\

	textoff

;GύXFDP@^ʖځ@ʒuF
	ld l,":a;tatie\yuuki\majime.bmp",12


	texton

	mov $401,"xxnZIB"
	mov %120,401: mov %121,401:mov %122,24:gosub *messagefont
	$401@

	mov $402,"@ʔ\IԁC^IkzBzvwB"
	mov $403,"꒼ȗsrzIB"
	mov %120,402: mov %121,403:mov %122,24:gosub *messagefont
	$402
	$403@

	mov $404,"ߍƌ[MȐSICيnC~CB"
	mov %120,404: mov %121,404:mov %122,24:gosub *messagefont
	$404@

	mov $405,"ߍݏIʒuCFI\N"
	mov $406,"꒼A꒼sZ]cFfB"
	mov %120,405: mov %121,406:mov %122,24:gosub *messagefont
	$405
	$406@

	mov $407,"@@"
	mov $408,"uvցCAρccVB"
	mov %120,407: mov %121,408:mov %122,24:gosub *messagefont
	br
	$408@

	mov $409,"vߍƌ]팴ZC"
	mov $410,"ޔ啪I|UAs~B"
	mov %120,409: mov %121,410:mov %122,24:gosub *messagefont
	$409
	$410@

	mov $411,"wBL甑FN笋Ix"
	mov $412,"˔\甎LBv"
	mov $413,"@"
	mov $414,"@"
	mov $415,"@"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	mov %120,411: mov %121,420:mov %122,24:gosub *messagefont
	$411
	$412\


	mov $401,"vցBCYr񓾐FH"
	mov %120,401: mov %121,401:mov %122,24:gosub *messagefont
	$401@

	mov $402,"IߍƌفB"
	mov %120,402: mov %121,402:mov %122,24:gosub *messagefont
	$402@

	mov $403,"FFAŉFAJDFCBdvI@B"
	mov $404,"֔@CF֐sm~UB"
	mov %120,403: mov %121,404:mov %122,24:gosub *messagefont
	$403
	$404@

	mov $405,"ޔЊQA퐴{B"
	mov %120,405: mov %121,405:mov %122,24:gosub *messagefont
	$405@

	mov $406,"Ch~XIQB"
	mov $407,"֗LCCߍaώIVlFC"
	mov $408,"Fw@xB"
	mov $409,"@"
	mov $410,"@"
	mov $411,"@"
	mov $412,"@"
	mov $413,"@"
	mov $414,"@"
	mov $415,"@"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	mov %120,406: mov %121,420:mov %122,24:gosub *messagefont
	$406
	$407
	$408\


	mov $401,"uߍƌcc笕s\팴ZBv"
	mov %120,401: mov %121,401:mov %122,24:gosub *messagefont
	$401@

	mov $402,"@@"
	mov $403,"uvցCٕs\ZFB"
	mov %120,402: mov %121,403:mov %122,24:gosub *messagefont
	br
	$403@

	mov $404,"@ʜޘƁAlF\ZFIԁccv"
	mov %120,404: mov %121,404:mov %122,24:gosub *messagefont
	$404@

	mov $405,"@@"
	mov $406,"ucc߉F\Î藹ccv"
	mov %120,405: mov %121,406:mov %122,24:gosub *messagefont
	br
	$406@

	mov $407,"@@"
	mov $408,"uICLwqwqB"
	mov %120,407: mov %121,408:mov %122,24:gosub *messagefont
	br
	$408@

	mov $409,"@ʑF߁Cp|ٜkVSIԁccv"
	mov %120,409: mov %121,409:mov %122,24:gosub *messagefont
	$409@

	mov $410,"@@"
	mov $411,"urs́Bv"
	mov %120,410: mov %121,411:mov %122,24:gosub *messagefont
	br
	$411@

	mov $412,"@@"
	mov $413,"uޘЉw߁CDߐmlJBv"
	mov %120,412: mov %121,413:mov %122,24:gosub *messagefont
	br
	$413@

	mov $414,"@@"
	mov $415,"uCޏ𖽈Bu\B"
	mov $416,"@ʔ\ݜޘIE_I䊁cc"
	mov %120,414: mov %121,416:mov %122,24:gosub *messagefont
	br
	$415
	$416@

	mov $417,"AZCmlC|s݌Bv"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	mov %120,417: mov %121,420:mov %122,24:gosub *messagefont
	$417\


	mov $401,"ukDCiB"
	mov %120,401: mov %121,401:mov %122,24:gosub *messagefont
	$401@

	mov $402,"lIÊCAZwُCB"
	mov $403,"DDnhߍ\ߓIlJB"
	mov %120,402: mov %121,403:mov %122,24:gosub *messagefont
	$402
	$403@

	mov $404,"ȉ։CݔVO{ٕB"
	mov $405,"ޔЈӎu^^nWoJBv"
	mov %120,404: mov %121,405:mov %122,24:gosub *messagefont
	$404
	$405@

	mov $406,"@@"
	mov $407,"uuBvv"
	mov %120,406: mov %121,407:mov %122,24:gosub *messagefont
	br
	$407@

	mov $408,"@@"
	mov $409,"ISRNFF΁B"
	mov %120,408: mov %121,409:mov %122,24:gosub *messagefont
	br
	$409@

	mov $410,"v甑FŊŁC甑FB"
	mov %120,410: mov %121,410:mov %122,24:gosub *messagefont
	$410@

	mov $411,"ٓߍي\dlIQFC"
	mov $412,"v甑F󓞐㱓I|B"
	mov %120,411: mov %121,412:mov %122,24:gosub *messagefont
	$411
	$412@

	mov $413,"ȋyIrSB"
	mov %120,413: mov %121,413:mov %122,24:gosub *messagefont
	$413@

	mov $414,"dӖY`CYr盛\lIƌB"
	mov $415,"RߑFBIÁCߔBdI"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	mov %120,414: mov %121,420:mov %122,24:gosub *messagefont
	$414
	$415\

	textoff

;GύXF搶@ʏ@ʒuFE
	ld r,":a;tatie\sensei\tuujyou1.bmp",12
	texton


	mov $401,"urCCnECB"
	mov %120,401: mov %121,401:mov %122,24:gosub *messagefont
	$401@

	mov $402,"Cw@lxB"
	mov $403,"gߜϗ͗ʔIlC"
	mov $404,"vLm΁CA\SnslB"
	mov %120,402: mov %121,404:mov %122,24:gosub *messagefont
	$402
	$403
	$404@

	mov $405,"g攐Csv๘B"
	mov $406,"R@CÎyn꜍sB"
	mov %120,405: mov %121,406:mov %122,24:gosub *messagefont
	$405
	$406@

	mov $407,"ގFvz}̓Ig"
	mov $408,"ȐsʐtȜȗC"
	mov $409,"ōDՓ_FʁB"
	mov %120,407: mov %121,409:mov %122,24:gosub *messagefont
	$407
	$408
	$409@

	mov $410,"v甊œAߓIls[[㈏Zˍs藁B"
	mov %120,410: mov %121,410:mov %122,24:gosub *messagefont
	$410@

	mov $411,"C苍GߓIJB"
	mov %120,411: mov %121,411:mov %122,24:gosub *messagefont
	$411@

	mov $412,"FIgǍ^A݋Iʒu"
	mov $413,"@"
	mov $414,"@"
	mov $415,"@"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	mov %120,412: mov %121,420:mov %122,24:gosub *messagefont
	$412\

	textoff
	bg black,19
	bgmfadeout 3000
	bgmstop
	wait 4000

;ʉF̐@iv[v
	bgm "bgm\SE_IN200.mp3"
	wait 2000

	texton


	mov $401,"aVρCV͓VOACB"
	mov %120,401: mov %121,401:mov %122,24:gosub *messagefont
	$401@

	mov $402,"CB"
	mov $403,"@ʔlœaܒԏAWB"
	mov %120,402: mov %121,403:mov %122,24:gosub *messagefont
	$402
	$403@

	mov $404,"ґRVvLusvGClIvޔВ"
	mov $405,"A甉uXSB"
	mov $406,"营CMCJB"
	mov %120,404: mov %121,406:mov %122,24:gosub *messagefont
	$404
	$405
	$406@

	mov $407,"VICٕsGClB"
	mov $408,"gVICٕsGClB"
	mov %120,407: mov %121,408:mov %122,24:gosub *messagefont
	$407
	$408@

	mov $409,"@@"
	mov $410,"񓞉ƓI㱁C䕽c_B"
	mov %120,409: mov %121,410:mov %122,24:gosub *messagefont
	br
	$410@

	mov $411,"瓞ƁCA}ǊB"
	mov %120,411: mov %121,411:mov %122,24:gosub *messagefont
	$411@

	mov $412,"꒵CSzÓᗹH"
	mov $413,"Bʕs吥uCYrCvJ蚔ǁvVIB"
	mov %120,412: mov %121,413:mov %122,24:gosub *messagefont
	$412
	$413@

	mov $414,"@@"
	mov $415,"揁C^va@CYrss汁B"
	mov %120,414: mov %121,415:mov %122,24:gosub *messagefont
	br
	$415@

	mov $416,"AZquC"
	mov $417,"\sMC"
	mov $418,"֝Q`VI،勎B"
	mov %120,416: mov %121,418:mov %122,24:gosub *messagefont
	$416
	$417
	$418@

	mov $419,"sCAώ߁B"
	mov $420,"pqgnґC{gA֓IB"
	mov %120,419: mov %121,420:mov %122,24:gosub *messagefont
	$419
	$420\

	windoweffect 1
	textoff

	bg black,14

	wait 2000
	dwave 10,"wave\noise01.wav"
;JbgCFuA̐E͋Ă񂾁Bv@Sb\Čɖ߂@tF[hȂ
	bg "cutin\cutin_19.jpg",1
	wait 4000

	bg black,1

	windoweffect 10,500
	texton


	mov $401,"[CsnB"
	mov $402,"ɘ[㱗oCƗIB"
	mov %120,401: mov %121,402:mov %122,24:gosub *messagefont
	$401
	$402@

	mov $403,"貝UIHB"
	mov $404,"NvpI~[pB"
	mov %120,403: mov %121,404:mov %122,24:gosub *messagefont
	$403
	$404@

	mov $405,"؊I@ChI@CȈI@B"
	mov $406,"@ʎgpsCލaIH՗kIyB"
	mov %120,405: mov %121,406:mov %122,24:gosub *messagefont
	$405
	$406@

	mov $407,"@@"
	mov $408,"\NFC\dʁAΗxB"
	mov %120,407: mov %121,408:mov %122,24:gosub *messagefont
	br
	$408@

	mov $409,"蕀a}ґR͜k|C"
	mov $410,"A햔喔dCى䗈ܕsDpB"
	mov %120,409: mov %121,410:mov %122,24:gosub *messagefont
	$409
	$410@

	mov $411,"CF{swB"
	mov %120,411: mov %121,411:mov %122,24:gosub *messagefont
	$411@

	mov $412,"usʕێIŕB"
	mov $413,"ύ˔\甎Ilx鐁BvVrܓIB"
	mov %120,412: mov %121,413:mov %122,24:gosub *messagefont
	$412
	$413@

	mov $414,"З́C\a召ːXdvIfB"
	mov %120,414: mov %121,414:mov %122,24:gosub *messagefont
	$414@

	mov $415,"@@"
	mov $416,"C\術{\艁B"
	mov %120,415: mov %121,416:mov %122,24:gosub *messagefont
	br
	$416@

	mov $417,"ޘssCߘssn\C"
	mov $418,"ƔvyݍDCIwށxB"
	mov $419,"@"
	mov $420,"@"
	mov %120,417: mov %121,420:mov %122,24:gosub *messagefont
	$417
	$418\


	mov $401,"VCvy݈꘢L͓I@B"
	mov %120,401: mov %121,401:mov %122,24:gosub *messagefont
	$401@

	mov $402,"ďy݈꘢ȗpňI@B"
	mov %120,402: mov %121,402:mov %122,24:gosub *messagefont
	$402@

	mov $403,"ꌏInCꌏInB"
	mov %120,403: mov %121,403:mov %122,24:gosub *messagefont
	$403@

	mov $404,"{kqB茛惁B֗LI꘢ߋB"
	mov %120,404: mov %121,404:mov %122,24:gosub *messagefont
	$404@

	mov $405,"@@"
	mov $406,"ލs嘢ƒ\sLI@B"
	mov %120,405: mov %121,406:mov %122,24:gosub *messagefont
	br
	$406@

	mov $407,"pލ@C^I\{OlEH"
	mov $408,"s֊sB"
	mov %120,407: mov %121,408:mov %122,24:gosub *messagefont
	$407
	$408@

	mov $409,"sCސVIdC"
	mov $410,"mIJB"
	mov %120,409: mov %121,410:mov %122,24:gosub *messagefont
	$409
	$410@

	mov $411,"@@"
	mov $412,"uusCv甛GCcNBvv"
	mov %120,411: mov %121,412:mov %122,24:gosub *messagefont
	br
	$412@

	mov $413,"@@"
	mov $414,"{OߓIԁC|CkNB"
	mov %120,413: mov %121,414:mov %122,24:gosub *messagefont
	br
	$414@

	mov $415,"ccډAŉ䎩ȗB"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	mov %120,415: mov %121,420:mov %122,24:gosub *messagefont
	$415\


	mov $401,"񓞖[㱍@C"
	mov $402,"ꍱwyݍHxCR@QB"
	mov %120,401: mov %121,402:mov %122,24:gosub *messagefont
	$401
	$402@

	mov $403,"{s\IvB"
	mov $404,"CVccvlB"
	mov %120,403: mov %121,404:mov %122,24:gosub *messagefont
	$403
	$404@

	mov $405,"uk\ݜޘExIō@uB"
	mov %120,405: mov %121,405:mov %122,24:gosub *messagefont
	$405@

	mov $406,"BĖٖ@Qݜ茏nI㐇uB"
	mov %120,406: mov %121,406:mov %122,24:gosub *messagefont
	$406@

	mov $407,"@@"
	mov $408,"YrvC"
	mov $409,"ÐÒnVVԔCFdIsB"
	mov %120,407: mov %121,409:mov %122,24:gosub *messagefont
	br
	$408
	$409@

	mov $410,"vVC\DB"
	mov %120,410: mov %121,410:mov %122,24:gosub *messagefont
	$410@

	mov $411,"V߁C"
	mov $412,"ZЋ\Ij|CVI胁B"
	mov %120,411: mov %121,412:mov %122,24:gosub *messagefont
	$411
	$412@

	mov $413,"@@"
	mov $414,"ccvCޘEB"
	mov $415,"@"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	mov %120,413: mov %121,420:mov %122,24:gosub *messagefont
	br
	$414\

	textoff

	bgmfadeout 2000
	bgmstop

	wait 1000


;

;ʁFSd}ij
	mov %42,4
	gosub *sindenzu

	wait 3000


;

	bgm "bgm\free39.mp3"
;wiFc񂾐w@NXtF[h
	bg "bg\morioka_eki_yugami.jpg",10
	wait 3000

	texton


	mov $401,"ρC䍿⋑Iʈ֏B"
	mov %120,401: mov %121,401:mov %122,24:gosub *messagefont
	$401@

	mov $402,"SvLmSVIB"
	mov %120,402: mov %121,402:mov %122,24:gosub *messagefont
	$402@

	mov $403,"ADY㈗YruρC"
	mov $404,"|qSgdIB"
	mov %120,403: mov %121,404:mov %122,24:gosub *messagefont
	$403
	$404@

	mov $405,"@@"
	mov $406,"͏㉺IqCO򑖋B"
	mov %120,405: mov %121,406:mov %122,24:gosub *messagefont
	br
	$406@

	mov $407,"ρCvLlӓB"
	mov %120,407: mov %121,407:mov %122,24:gosub *messagefont
	$407@

	mov $408,"ޏAIBwρxIB"
	mov %120,408: mov %121,408:mov %122,24:gosub *messagefont
	$408@

	mov $409,"ϏADCϏADB"
	mov $410,"@"
	mov $411,"@"
	mov $412,"@"
	mov $413,"@"
	mov $414,"@"
	mov $415,"@"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	mov %120,409: mov %121,420:mov %122,24:gosub *messagefont
	$409\


	mov $401,"艎wW_STB"
	mov $402,"AECI㱗B"
	mov %120,401: mov %121,402:mov %122,24:gosub *messagefont
	$401
	$402@

	mov $403,"sccޖ琥dIꕔB"
	mov %120,403: mov %121,403:mov %122,24:gosub *messagefont
	$403@

	mov $404,"@@"
	mov $405,"v茊ےnlCC㱍CB"
	mov %120,404: mov %121,405:mov %122,24:gosub *messagefont
	#ff0000
	br
	$405@

	mov $406,"LlsŒݎȓIʏC"
	mov $407,"Ɖx鐁CuC㱕sېYrB"
	mov %120,406: mov %121,407:mov %122,24:gosub *messagefont
	$406
	$407@

	mov $408,"ŏdvICޔЏv}̉d悎B"
	mov $409,"ݏC揉ݑcCމA"
	mov %120,408: mov %121,409:mov %122,24:gosub *messagefont
	$408
	$409@
	#ffffff

	mov $410,"@@"
	mov $411,"VIg݉I|CkB"
	mov %120,410: mov %121,411:mov %122,24:gosub *messagefont
	br
	$411@

	mov $412,"ؓsdsB"
	mov $413,"ډCvDDAsB"
	mov %120,412: mov %121,413:mov %122,24:gosub *messagefont
	$412
	$413@

	mov $414,"@@"
	mov $415,"ccs㱗B"
	mov %120,414: mov %121,415:mov %122,24:gosub *messagefont
	br
	$415@

	mov $416,"\NpIwC⋗NB"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	mov %120,416: mov %121,420:mov %122,24:gosub *messagefont
	$416\

	textoff
;wiFc񂾐sQ@ʏtF[h
	bg "bg\morioka_sity02_yugami.jpg",17
	wait 3000
;wiFc񂾐sP@ʏtF[h
	bg "bg\morioka_sity01_yugami.jpg",17
	wait 3000
;wiFc񂾊wZOρ@ʏtF[h
	bg "bg\gakkou_gaikan_yugami.jpg",17
	wait 3000
;wi֑tF[h
	bg black,0
	print 99,3000,"cascade.dll/dx"
;wiFc񂾊wZ̘L@tF[hitF[htF[hɌqj
	bg "bg\gakkou_rouka_yugami.jpg",0
	print 99,3000,"cascade.dll/dx"
	wait 3000

	texton

	mov $401,"߂X_PSB䑖݊wZILB"
	mov %120,401: mov %121,401:mov %122,24:gosub *messagefont
	$401@

	mov $402,"݈ЎÓI㱗C"
	mov $403,"弔\ߓݎCIVFIB"
	mov %120,402: mov %121,403:mov %122,24:gosub *messagefont
	$402
	$403@

	mov $404,"@@"
	mov $405,"sDӎvCeʁB"
	mov %120,404: mov %121,405:mov %122,24:gosub *messagefont
	br
	$405@

	mov $406,"CnCwZvCGB"
	mov $407,"ϓIww蚁xCAuJB"
	mov %120,406: mov %121,407:mov %122,24:gosub *messagefont
	$406
	$407@

	mov $408,"CYroϓIsCcc"
	mov $409,"]ߑF\DDڎ\^vlB"
	mov %120,408: mov %121,409:mov %122,24:gosub *messagefont
	$408
	$409@

	mov $410,"@ʗLI꘢l\@uޘEIaȓI"
	mov $411,"cckCSIB"
	mov $412,"@"
	mov $413,"@"
	mov $414,"@"
	mov $415,"@"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	mov %120,410: mov %121,420:mov %122,24:gosub *messagefont
	$410
	$411\

	textoff

;ʉFKKK
;wiFc񂾋@E獶
	dwave 10,"wave\dooropen07.wav"
	bg "bg\gakkou_kyousitu_yugami2.jpg",20
	wait 2000

	texton

	mov $401,"\ߍi懎CAZېٖ@ٓIVICJB"
	mov $402,"CoIԉkW藁B"
	mov %120,401: mov %121,402:mov %122,24:gosub *messagefont
	#ff0000
	$401
	$402@

	mov $403,"Cv̈ӛˍsB"
	mov %120,403: mov %121,403:mov %122,24:gosub *messagefont
	$403@

	mov $404,"\@Cvs甐lu"
	mov $405,"݁C^cIH"
	mov %120,404: mov %121,405:mov %122,24:gosub *messagefont
	$404
	$405@
	#ffffff

	mov $406,"@@"
	mov $407,"uG^cCHv"
	mov %120,406: mov %121,407:mov %122,24:gosub *messagefont
	br
	$407@

	mov $408,"@@"
	mov $409,"]C唈B"
	mov %120,408: mov %121,409:mov %122,24:gosub *messagefont
	br
	$409@

	mov $410,"@@"
	mov $411,"usDӎvC唈Bv"
	mov %120,410: mov %121,411:mov %122,24:gosub *messagefont
	br
	$411@

	mov $412,"@@"
	mov $413,"u_ʁIv"
	mov %120,412: mov %121,413:mov %122,24:gosub *messagefont
	br
	$413@

	mov $414,"@@"
	mov $415,"梌V܊ދԁCAݏoΕŗC"
	mov $416,"R@Cnnʓ񎟕B"
	mov %120,414: mov %121,416:mov %122,24:gosub *messagefont
	br
	$415
	$416@

	mov $417,"wFscC{B"
	mov %120,417: mov %121,417:mov %122,24:gosub *messagefont
	$417@

	mov $418,"ICaICwُ㗹B"
	mov $419,"ρCՒꕛs悓I\B"
	mov $420,"@"
	mov %120,418: mov %121,420:mov %122,24:gosub *messagefont
	$418
	$419\


	mov $401,"꘢lCvŗnr{B"
	mov %120,401: mov %121,401:mov %122,24:gosub *messagefont
	#ff0000
	$401@

	mov $402,"p|IꈯKŗzIB"
	mov %120,402: mov %121,402:mov %122,24:gosub *messagefont
	$402@

	mov $403,"꘢vl\ېYrIǖʁC"
	mov $404,"甏Lls̕s|C"
	mov $405,"ߕKlێÁB"
	mov %120,403: mov %121,405:mov %122,24:gosub *messagefont
	$403
	$404
	$405@

	mov $406,"@ʔ\ވ_CAXeՒsss×GB"
	mov %120,406: mov %121,406:mov %122,24:gosub *messagefont
	$406@

	mov $407,"R@CÎVOCpۓ{aUxߓISJB"
	mov %120,407: mov %121,407:mov %122,24:gosub *messagefont
	$407@

	mov $408,"cFC~ߑILQC"
	mov $409,"ꈯZBArr藹"
	mov %120,408: mov %121,409:mov %122,24:gosub *messagefont
	$408
	$409@
	#ffffff

	mov $410,"@@"
	mov $411,"ꈯZB"
	mov %120,410: mov %121,411:mov %122,24:gosub *messagefont
	br
	$411@

	mov $412,"ZB"
	mov %120,412: mov %121,412:mov %122,24:gosub *messagefont
	$412@

	mov $413,"ZB"
	mov %120,413: mov %121,413:mov %122,24:gosub *messagefont
	$413@

	mov $414,"ZB"
	mov %120,414: mov %121,414:mov %122,24:gosub *messagefont
	$414@

	mov $415,"@@"
	mov $416,"\EI\́C֗LgIUC"
	mov $417,"\ClzALs~IB"
	mov %120,415: mov %121,417:mov %122,24:gosub *messagefont
	br
	$416
	$417@

	mov $418,"ɋaIyC|CsfcB"
	mov $419,"@"
	mov $420,"@"
	mov %120,418: mov %121,420:mov %122,24:gosub *messagefont
	$418\


	mov $401,"CvցCAJBJBđ_CSsJB"
	mov %120,401: mov %121,401:mov %122,24:gosub *messagefont
	$401@

	mov $402,"|s๘CÉCyoB"
	mov $403,"cC~I؁CSsꎟ։JB"
	mov %120,402: mov %121,403:mov %122,24:gosub *messagefont
	$402
	$403@

	mov $404,"\DC\rnCss槁B"
	mov %120,404: mov %121,404:mov %122,24:gosub *messagefont
	$404@

	mov $405,"SBs甑FtoCAٖ@t֐^B"
	mov %120,405: mov %121,405:mov %122,24:gosub *messagefont
	$405@

	bgmfadeout 2000
	bgmstop
;ʉFS̉iiv[vj
	bgm "bgm\heart.mp3"
	mov $406,"nccncc"
	mov $407,"S[rCߎI@ݛaB"
	mov %120,406: mov %121,407:mov %122,24:gosub *messagefont
	textspeed 200
	$406
	$407@

	mov $408,"@@"
	mov $409,"ߏA݈㱗L銚ȓI[㱗C"
	mov $410,"藢\IuB"
	mov %120,408: mov %121,410:mov %122,24:gosub *messagefont
	br
	$409
	$410@

	mov $411,"S藹C^{ُyIcc߈u㱁B"
	mov %120,411: mov %121,411:mov %122,24:gosub *messagefont
	$411@

	mov $412,"vL_́B"
	mov %120,412: mov %121,412:mov %122,24:gosub *messagefont
	$412@

	mov $413,"ޏAIٙrCIwB"
	mov %120,413: mov %121,413:mov %122,24:gosub *messagefont
	$413@

	mov $414,"DuJCLFccI"
	mov $415,"@"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	mov %120,414: mov %121,420:mov %122,24:gosub *messagefont
	$414\

	textoff

;wiFuEVev
	bg "cutin\cutin_20.jpg",1
	QUAKE 15,200
	wait 500
;wiFuEVeEVev
	bg "cutin\cutin_21.jpg",1
	QUAKE 15,200
	wait 500
;wiFuEVeEVeEVev
	bg "cutin\cutin_22.jpg",1
	QUAKE 15,200
	wait 500
;wiFuEVeEVeEVeEVev
	bg "cutin\cutin_23.jpg",1
	QUAKE 15,200
	wait 500

;ʉFYb
;wiFo[@Qb\Ĕwi@tF[hȂ
	dwave 10,"wave\ZipperD11.wav"
	bg "cutin\baal.jpg",1

	wait 2000
	bg black,1

;wiFc񂾋iuj@tF[h
	bg "bg\gakkou_kyousitu_yugami2_bure.jpg",0
	print 99,3000,"cascade.dll/di"
	wait 2000

;GFDP@CP@ʒuF@tF[h
	ld c,":a;tatie\yuuki\kyouki1.bmp",18

	texton


	mov $401,"dʁA召ÁB"
	mov $402,"ڍLC\ޔcB"
	mov %120,401: mov %121,402:mov %122,24:gosub *messagefont
	$401
	$402@

	mov $403,"pHpUkqIОB"
	mov %120,403: mov %121,403:mov %122,24:gosub *messagefont
	$403@

	mov $404,"œߙu⎧ΗI[CCNIozI\B"
	mov %120,404: mov %121,404:mov %122,24:gosub *messagefont
	$404@

	mov $405,"ccsCzCpvLr񎖁B"
	mov %120,405: mov %121,405:mov %122,24:gosub *messagefont
	$405@

	mov $406,"ݑzCCYr՜ޔЗ@wZH"
	mov $407,"cIoϑzvۊI\B"
	mov %120,406: mov %121,407:mov %122,24:gosub *messagefont
	$406
	$407@

	mov $408,"@@"
	mov $409,"CvCvBsvgnB"
	mov %120,408: mov %121,409:mov %122,24:gosub *messagefont
	br
	$409@

	mov $410,"CNC߁Bk߁B"
	mov %120,410: mov %121,410:mov %122,24:gosub *messagefont
	$410@

	mov $411,"ىSÁCÎŉC"
	mov $412,"甉󗹈CȉˊŐB"
	mov %120,411: mov %121,412:mov %122,24:gosub *messagefont
	$411
	$412@

	mov $413,"ޘEIaȔVrB"
	mov %120,413: mov %121,413:mov %122,24:gosub *messagefont
	$413@

	mov $414,"@ʖvLF߁C"
	mov $415,"mqss@uB"
	mov %120,414: mov %121,415:mov %122,24:gosub *messagefont
	$414
	$415@

	mov $416,"@@"
	mov $417,"߁CCNBR@cc"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	mov %120,416: mov %121,420:mov %122,24:gosub *messagefont
	br
	$417\

	textoff

;ʉ~
	bgmfadeout 1
	bgmstop
;ʉFtHb
	dwave 2,"wave\swing10r.wav"
	wait 300
;ʉFKXbI
	dwave 2,"wave\hit80.wav"
;	ʃtbV
	drawfill 255,0,0:draw:repaint
	QUAKE 30,500
	wait 3000

	texton

	mov $401,"idB"
	mov %120,401: mov %121,401:mov %122,24:gosub *messagefont
	$401@

	mov $402,"@@"
	mov $403,"uccccccv"
	mov %120,402: mov %121,403:mov %122,24:gosub *messagefont
	br
	$403@

	mov $404,"@@"
	mov $405,"uccccccv"
	mov %120,404: mov %121,405:mov %122,24:gosub *messagefont
	br
	$405@

	mov $406,"@@"
	mov $407,"aCNsҕsgB"
	mov %120,406: mov %121,407:mov %122,24:gosub *messagefont
	br
	$407@

	mov $408,"ӓވؓIwFC"
	mov $409,"꘢ڈ꘢ncڌ嗈B"
	mov %120,408: mov %121,409:mov %122,24:gosub *messagefont
	$408
	$409@

	mov $410,"@@"
	mov $411,"urCvoޘxI瀁ccv"
	mov %120,410: mov %121,411:mov %122,24:gosub *messagefont
	br
	$411@

	mov $412,"@@"
	mov $413,"wْFCʌI梌VC"
	mov $414,"|smn]CB"
	mov $415,"@"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	mov %120,412: mov %121,420:mov %122,24:gosub *messagefont
	br
	$413
	$414\


	mov $401,"uccv"
	mov %120,401: mov %121,401:mov %122,24:gosub *messagefont
	$401@

	mov $402,"@@"
	mov $403,"暒nCݔǏꔼwC"
	mov $404,"荔cϏIn"
	mov $405,"ꍪ捖_ICNCܒԗB"
	mov %120,402: mov %121,405:mov %122,24:gosub *messagefont
	br
	$403
	$404
	$405@

	mov $406,"\CpҒnQC"
	mov $407,"ОI[[[nhC"
	mov $408,"SŕsFB"
	mov %120,406: mov %121,408:mov %122,24:gosub *messagefont
	$406
	$407
	$408@

	mov $409,"ߗCFIt嗬oB"
	mov %120,409: mov %121,409:mov %122,24:gosub *messagefont
	$409@

	mov $410,"@@"
	mov $411,"u܁CޘccrRB"
	mov $423,"ccccv"
	mov %120,410: mov %121,411:mov %122,24:gosub *messagefont
	mov %120,423: mov %121,423:mov %122,24:gosub *messagefont
	br
	$411@/
	$423/
	add $411,$423/
	@

	mov $412,"@@"
	mov $413,"CNIS󟃁B"
	mov %120,412: mov %121,413:mov %122,24:gosub *messagefont
	br
	$413@

	mov $414,"ӑ{zSZОR@UoIJC"
	mov $415,"ALoIpSdICSZߗI󟃁B"
	mov %120,414: mov %121,415:mov %122,24:gosub *messagefont
	$414
	$415@

	mov $416,"{ۏoC|ICNB"
	mov %120,416: mov %121,416:mov %122,24:gosub *messagefont
	$416@

	mov $417,"ŗCI|󓞗QdIӈB"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	mov %120,417: mov %121,420:mov %122,24:gosub *messagefont
	$417\

;ʉFhTb
	dwave 2,"wave\ClothC.wav"
	QUAKE 20,300
	wait 2000
;ʉFqk̔ߖ
	dwave 2,"wave\himei.wav"
	wait 2000
;aflFfree0217.mp3@iv[v
	bgm "bgm\free0217.mp3"

	mov $401,"ߓIۏo닩B"
	mov %120,401: mov %121,401:mov %122,24:gosub *messagefont
	$401@

	mov $402,"CN᫝Tg̒C"
	mov $403,"茒ߕQI{bC暑SB"
	mov %120,402: mov %121,403:mov %122,24:gosub *messagefont
	$402
	$403@

	mov $404,"CґR䊱ICA^N蛓IB"
	mov %120,404: mov %121,404:mov %122,24:gosub *messagefont
	$404@

	mov $405,"ō@I浌urRvH"
	mov $406,"srى~ۛCߜމƌB"
	mov %120,405: mov %121,406:mov %122,24:gosub *messagefont
	$405
	$406@

	mov $407,"@@"
	mov $408,"ccGCssCs\ϊB"
	mov %120,407: mov %121,408:mov %122,24:gosub *messagefont
	br
	$408@

	mov $409,"@@"
	mov $410,"u㱍rRB"
	mov %120,409: mov %121,410:mov %122,24:gosub *messagefont
	br
	$410@

	mov $411,"ґR֎Zs卬C"
	mov $412,"AݐCNOrIjC"
	mov $413,"񔈁CAQn֎qחB"
	mov %120,411: mov %121,413:mov %122,24:gosub *messagefont
	$411
	$412
	$413@

	mov $414,"֊SsmݏCI梌VC"
	mov $415,"ݖ甫唈CcؒnŒB"
	mov %120,414: mov %121,415:mov %122,24:gosub *messagefont
	$414
	$415@

	mov $416,"ÓIL꘢lBސBIB"
	mov $417,"䘸\o꘢wށxB"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	mov %120,416: mov %121,420:mov %122,24:gosub *messagefont
	$416
	$417\

	windoweffect 1
	textoff

;ʉF`Lb
	dwave 2,"wave\kachi18.wav"
;wiFXpi@Qb\Ĕwi߂@tF[hȂ
	bg "cutin\supana.jpg",1
	wait 2000
	bg "bg\gakkou_kyousitu_yugami2_bure.jpg",0
	ld c,":a;tatie\yuuki\kyouki1.bmp",1

	texton
	windoweffect 10,500
	mov $401,"ЗpߗIH鋎B"
	mov $402,"ޖ琥貓IHɝ\IB"
	mov %120,401: mov %121,402:mov %122,24:gosub *messagefont
	$401
	$402@

	mov $403,"֗L꘢Cp惐ܐIʕ`B"
	mov $404,"ʑYrCᐥŕsoIB"
	mov %120,403: mov %121,404:mov %122,24:gosub *messagefont
	$403
	$404@

	mov $405,"@@"
	mov $406,"䐥EYqC\鋎C"
	mov $407,"ESZ惕B"
	mov %120,405: mov %121,407:mov %122,24:gosub *messagefont
	br
	$406
	$407@

	mov $408,"R@CIB"
	mov %120,408: mov %121,408:mov %122,24:gosub *messagefont
	$408@

	mov $409,"َ莝ICLlʍ@ށC"
	mov $410,"Ll֎q⋋NfC餁B"
	mov %120,409: mov %121,410:mov %122,24:gosub *messagefont
	$409
	$410@

	mov $411,"nCsۏoICAC"
	mov $412,"ߑFI@˕s݌B"
	mov %120,411: mov %121,412:mov %122,24:gosub *messagefont
	$411
	$412@

	mov $413,"vdVCߏAsB"
	mov %120,413: mov %121,413:mov %122,24:gosub *messagefont
	$413@

	mov $414,"YC梌Vs۝TCߕsB"
	mov $415,"KLρB"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	mov %120,414: mov %121,420:mov %122,24:gosub *messagefont
	$414
	$415\


	mov $401,"KLcc"
	mov $423,"܋NC"
	mov %120,401: mov %121,401:mov %122,24:gosub *messagefont
	mov %120,423: mov %121,423:mov %122,24:gosub *messagefont
	$401@/
	$423/
	add $401,$423/

	mov $402,"KKIcayNC֐^L_KLB"
	mov %120,402: mov %121,402:mov %122,24:gosub *messagefont
	$402@

	mov $403,"ݐCʑOʑOrIߑKLC"
	mov $404,"󓞉Iڋ՗IC⋋Nzv竁B"
	mov %120,403: mov %121,404:mov %122,24:gosub *messagefont
	$403
	$404@

;ʉFSb
	dwave 2,"wave\hit75_a.wav"
	QUAKE 50,200

	mov $405,"|snp鋎QIB"
	mov %120,405: mov %121,405:mov %122,24:gosub *messagefont
	$405@

	mov $406,"@@"
	mov $407,"uIv"
	mov %120,406: mov %121,407:mov %122,24:gosub *messagefont
	br
	$407@

	mov $408,"@@"
	mov $409,"ݏd筍dICۏoSB"
	mov %120,408: mov %121,409:mov %122,24:gosub *messagefont
	br
	$409@

	mov $410,"CėꎟB"
	mov %120,410: mov %121,410:mov %122,24:gosub *messagefont
	$410@

;ʉFSb
	dwave 2,"wave\hit75_a.wav"
	QUAKE 50,200

	mov $411,"ėꎟB"
	mov %120,411: mov %121,411:mov %122,24:gosub *messagefont
	$411@


;ʉFSb
	dwave 2,"wave\hit75_a.wav"
	QUAKE 50,200

	mov $412,"֖vI"
	mov %120,412: mov %121,412:mov %122,24:gosub *messagefont
	$412@


;ʉFSb
	dwave 2,"wave\hit75_a.wav"
	QUAKE 50,200
	wait 100
;ʉFKb
	dwave 2,"wave\hit57.wav"
	QUAKE 30,250
	wait 100
;ʉFoLb
	dwave 2,"wave\hit_p01_c.wav"
	QUAKE 60,210
	wait 100
;ʉFKXb
	dwave 2,"wave\hit61_a.wav"
	QUAKE 25,300


	mov $413,"@@"
	mov $414,"NAC]p鋎ÍUB"
	mov %120,413: mov %121,414:mov %122,24:gosub *messagefont
	br
	$414@

	mov $415,"ꈯCcߎuI"
	mov $416,"yNȗoB"
	mov %120,415: mov %121,416:mov %122,24:gosub *messagefont
	$415
	$416@

	mov $417,"CCsvCNvpJB"
	mov %120,417: mov %121,417:mov %122,24:gosub *messagefont
	$417@

	mov $418,"@@"
	mov $419,"vKvpňIlGB"
	mov $420,"@"
	mov %120,418: mov %121,420:mov %122,24:gosub *messagefont
	#FF0000
	br
	$419\


	mov $401,"ߓIܖ@C߈ʋIwgC"
	mov $402,"aߍds藁B"
	mov %120,401: mov %121,402:mov %122,24:gosub *messagefont
	$401
	$402@

	mov $403,"rCApފWUJB"
	mov %120,403: mov %121,403:mov %122,24:gosub *messagefont
	$403@

	mov $404,"^dЗ́Cs@dCꎟꎟnŁB"
	mov %120,404: mov %121,404:mov %122,24:gosub *messagefont
	$404@

	mov $405,"ϓIԁCߌuœIlYr藁H"
	mov %120,405: mov %121,405:mov %122,24:gosub *messagefont
	$405@

	mov $406,"ccvցCwNJMIB"
	mov $407,"C桎ȕsٔIꜝXU"
	mov %120,406: mov %121,407:mov %122,24:gosub *messagefont
	$406
	$407@
	#FFFFFF

	mov $408,"@@"
	mov $409,"@V܁C"
	mov $410,"㓯wwNJM桏ZB"
	mov %120,408: mov %121,410:mov %122,24:gosub *messagefont
	br
	$409
	$410@

	mov $411,"sޘB"
	mov %120,411: mov %121,411:mov %122,24:gosub *messagefont
	$411@

	mov $412,"C䑁AmρCr\藁B"
	mov $413,"@"
	mov $414,"@"
	mov $415,"@"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	mov %120,412: mov %121,420:mov %122,24:gosub *messagefont
	$412\

	textoff

;ʉFUVb
	dwave 2,"wave\hit_s07_c.wav"
	drawfill 255,0,0:draw:repaint
	wait 200
	drawfill 255,0,0:draw:repaint
	QUAKE 30,1000

;GFDP@CQ@ʒuF
	ld c,":a;tatie\yuuki\kyouki2.bmp",12

	texton

	mov $401,"ueIIv"
	mov %120,401: mov %121,401:mov %122,24:gosub *messagefont
	$401@

	mov $402,"@@"
	mov $403,"ꐺiOkISЍ݋B"
	mov %120,402: mov %121,403:mov %122,24:gosub *messagefont
	br
	$403@

	mov $404,"pESI惕啨C"
	mov $405,"h㓯wIB"
	mov %120,404: mov %121,405:mov %122,24:gosub *messagefont
	$404
	$405@

	mov $406,"TLlssmېYrJB"
	mov %120,406: mov %121,406:mov %122,24:gosub *messagefont
	$406@

	mov $407,"UcؓތCmILacc"
	mov $408,"LhI㓯wmB"
	mov %120,407: mov %121,408:mov %122,24:gosub *messagefont
	$407
	$408@

	mov $409,"@@"
	mov $410,"WUCNN]C"
	mov $411,"R@h|ٖhݓIB"
	mov %120,409: mov %121,411:mov %122,24:gosub *messagefont
	br
	$410
	$411@

	mov $412,"p惕DC"
	mov $413,"Cs甐l@uߐwxB"
	mov %120,412: mov %121,413:mov %122,24:gosub *messagefont
	$412
	$413@

	mov $414,"@@"
	mov $415,"kDccڑOC~CؓsdVB"
	mov %120,414: mov %121,415:mov %122,24:gosub *messagefont
	br
	$415@

	mov $416,"ډCAρcc"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	mov %120,416: mov %121,420:mov %122,24:gosub *messagefont
	$416\

	textoff

;ʉFYVYV
	dwave 2,"wave\hit_s07.wav"
	drawfill 255,0,0:draw:repaint
	wait 200
	drawfill 255,0,0:draw:repaint
	wait 200
	drawfill 255,0,0:draw:repaint
	QUAKE 35,1500

;GFDP@CR@ʒuF
	ld c,":a;tatie\yuuki\kyouki3.bmp",12

	texton

	mov $401,"uccIIv"
	mov %120,401: mov %121,401:mov %122,24:gosub *messagefont
	$401@

	mov $402,"@@"
	mov $403,"hV@C"
	mov $404,"p͐JB"
	mov %120,402: mov %121,404:mov %122,24:gosub *messagefont
	#FF0000
	br
	$403
	$404@

	mov $405,"܌ؕIlChI㐄C"
	mov $406,"hȍō@ꈯB"
	mov %120,405: mov %121,406:mov %122,24:gosub *messagefont
	$405
	$406@

	mov $407,"s莗ρChAݖB"
	mov $408,"lvrƎ藁B"
	mov %120,407: mov %121,408:mov %122,24:gosub *messagefont
	$407
	$408@

	mov $409,"ccH@ʐ藁H"
	mov %120,409: mov %121,409:mov %122,24:gosub *messagefont
	$409@

	mov $410,"ߐ^C莒ɒnjB"
	mov %120,410: mov %121,410:mov %122,24:gosub *messagefont
	$410@

	mov $411,"CvLh\ō@ꈯC"
	mov $412,"ЏAϔCꉔ"
	mov %120,411: mov %121,412:mov %122,24:gosub *messagefont
	$411
	$412@
	#FFFFFF

	mov $413,"@@"
	mov $414,"ccʑR֐kJB"
	mov %120,413: mov %121,414:mov %122,24:gosub *messagefont
	br
	$414@

	mov $415,"ґRݎhlICusIcc"
	mov %120,415: mov %121,415:mov %122,24:gosub *messagefont
	$415@

	mov $416,"sCܖlzے֗vLӎv藁B"
	mov %120,416: mov %121,416:mov %122,24:gosub *messagefont
	$416@

	mov $417,"ϗC^sB"
	mov $418,"CYrLߑFCmޔЉS藁H"
	mov $419,"@"
	mov $420,"@"
	mov %120,417: mov %121,420:mov %122,24:gosub *messagefont
	$417
	$418\


;ʉFhTb
	dwave 2,"wave\ClothC.wav"
	QUAKE 20,150


	mov $401,"䏫INCB"
	mov %120,401: mov %121,401:mov %122,24:gosub *messagefont
	$401@

	mov $402,"ґR㗹ꍱ{IC"
	mov $403,"ACn惕CȎ菶֐IB"
	mov $404,"ϓIԁCAZ\꘢Hs藹JB"
	mov %120,402: mov %121,404:mov %122,24:gosub *messagefont
	$402
	$403
	$404@

	mov $405,"ʑRCVId^ЊQB㞁B"
	mov %120,405: mov %121,405:mov %122,24:gosub *messagefont
	$405@

	mov $406,"@@"
	mov $407,"DCߐl֙꘢B"
	mov %120,406: mov %121,407:mov %122,24:gosub *messagefont
	br
	$407@

	mov $408,"O|ݒnINC"
	mov $409,"IooɋI\CᒅC"
	mov $410,"ssǓIԁCkAB"
	mov %120,408: mov %121,410:mov %122,24:gosub *messagefont
	$408
	$409
	$410@

	mov $411,"ޔЊ蓎ّŋ\㏬IlC"
	mov $412,"ϓI@BB"
	mov %120,411: mov %121,412:mov %122,24:gosub *messagefont
	$411
	$412@

	mov $413,"˕shJ꓁藁B"
	mov %120,413: mov %121,413:mov %122,24:gosub *messagefont
	$413@

	mov $414,"@@"
	mov $415,"ޘnsCsB"
	mov $416,"sCޑOlpÎVB"
	mov %120,414: mov %121,416:mov %122,24:gosub *messagefont
	#FF0000
	br
	$415
	$416@

	mov $417,"I餓WC"
	mov $418,"dsېYrJ"
	mov $419,"c\I鋎蒩xb勎B"
	mov $420,"@"
	mov %120,417: mov %121,420:mov %122,24:gosub *messagefont
	$417
	$418
	$419\
	#FFFFFF

;ʉFtH
	dwave 2,"wave\swing10r.wav"
	wait 1000
;ʉFKbVAA
	dwave 2,"wave\crash_glass.wav"
	QUAKE 40,1500

	mov $401,"RCސCؑB"
	mov %120,401: mov %121,401:mov %122,24:gosub *messagefont
	$401@

	mov $402,"ᏊLlӗ͓sWݑIޗ"
	mov %120,402: mov %121,402:mov %122,24:gosub *messagefont
	$402@

	mov $403,"CnyݐډIsÁB"
	mov $404,"a՗oVO柍ݏʓIB"
	mov %120,403: mov %121,404:mov %122,24:gosub *messagefont
	$403
	$404@



;ʉFJ`bi[hj
	dwave 2,"wave\kachi05.wav"
	mov $405,"@@"
	mov $406,"䘸a՗o柒IB"
	mov $407,"UDqߍ@CcLO܁B"
	mov %120,405: mov %121,407:mov %122,24:gosub *messagefont
	br
	$406
	$407@

	mov $408,"RCޔЍCߋoSIB"
	mov $409,"vL͓ICˏoIqߖ琥YIB"
	mov %120,408: mov %121,409:mov %122,24:gosub *messagefont
	$408
	$409@

	mov $410,"AC@ʍBޘIԁcc"
	mov $411,"@"
	mov $412,"@"
	mov $413,"@"
	mov $414,"@"
	mov $415,"@"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	mov %120,410: mov %121,420:mov %122,24:gosub *messagefont
	$410\

;ʉFoX
	dwave 2,"wave\gun14_b.wav"
	wait 500
;ʉFYVb
	dwave 2,"wave\gunhit.wav"


	mov $401,"uHIv"
	mov %120,401: mov %121,401:mov %122,24:gosub *messagefont
	$401@

	mov $402,"@@"
	mov $403,"䘸c_InC"
	mov $404,"yOߐԙnNs_B"
	mov %120,402: mov %121,404:mov %122,24:gosub *messagefont
	br
	$403
	$404@

	mov $405,"̊isIԙnNC"
	mov $406,"BIqّ{sQB"
	mov %120,405: mov %121,406:mov %122,24:gosub *messagefont
	$405
	$406@

	mov $407,"CalkÖC"
	mov $408,"ȉӖyI늱CBB"
	mov %120,407: mov %121,408:mov %122,24:gosub *messagefont
	$407
	$408@

	mov $409,"@@"
	mov $410,"ccACԙnNuɗB"
	mov %120,409: mov %121,410:mov %122,24:gosub *messagefont
	br
	$410@

	mov $411,"ퟃBŒRruC"
	mov $412,"蕑ȖvzJB"
	mov $413,"ۏoꐺCgaȒB"
	mov $414,"@"
	mov $415,"@"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	mov %120,411: mov %121,420:mov %122,24:gosub *messagefont
	$411
	$412\

;ʉFJ`bi[hj
	dwave 2,"wave\kachi05.wav"
	wait 700
;ʉFoX
	dwave 2,"wave\gun14_b.wav"
	wait 500
;ʉFYVb
	dwave 2,"wave\gunhit.wav"

	mov $401,"ueՁccIv"
	mov %120,401: mov %121,401:mov %122,24:gosub *messagefont
	$401@

	mov $402,"@@"
	mov $403,"UACuAyAˈB"
	mov %120,402: mov %121,403:mov %122,24:gosub *messagefont
	br
	$403@

	mov $404,"ꖕC^YqߖsC"
	mov $405,"FIhԙnNIeB"
	mov %120,404: mov %121,405:mov %122,24:gosub *messagefont
	$404
	$405@

	mov $406,"ጲuɔVTvfߋ餁C"
	mov $407,"摕Uێq߁B"
	mov %120,406: mov %121,407:mov %122,24:gosub *messagefont
	$406
	$407@



;ʉFJ`bi[hj
	dwave 2,"wave\kachi05.wav"
	wait 700
;ʉFoX
	dwave 2,"wave\gun14_b.wav"
	wait 500
;ʉFYVb
	dwave 2,"wave\gunhit.wav"

	mov $408,"@@"
	mov $409,"uԁIv"
	mov %120,408: mov %121,409:mov %122,24:gosub *messagefont
	br
	$409@

	mov $410,"@@"
	mov $411,"CxsցCOSB"
	mov %120,410: mov %121,411:mov %122,24:gosub *messagefont
	br
	$411@

	mov $412,"sCލmkuJB"
	mov $413,"pBˏokqޔЎC"
	mov $414,"ݐlِsIB"
	mov %120,412: mov %121,414:mov %122,24:gosub *messagefont
	$412
	$413
	$414@

	mov $415,"񐥍ݒٕICۍ笕srB"
	mov %120,415: mov %121,415:mov %122,24:gosub *messagefont
	$415@

	mov $416,"@@"
	mov $417,"FޔckqIBˈC"
	mov $418,"E\槔ڋߑB"
	mov $419,"餐ԙnN֗LOsEI餁B"
	mov %120,416: mov %121,419:mov %122,24:gosub *messagefont
	br
	$417
	$418
	$419@

	mov $420,"ޗIԁcc"
	mov %120,420: mov %121,420:mov %122,24:gosub *messagefont
	$420\

;ʉFJ`bi[hj
	dwave 2,"wave\kachi05.wav"
	wait 700
;ʉFoX
	dwave 2,"wave\gun14_b.wav"
	wait 500
;ʉFYVb
	dwave 2,"wave\gunhit.wav"


	mov $401,"uecc"
	mov $423,"ꉔIIv"
	mov %120,401: mov %121,401:mov %122,24:gosub *messagefont
	mov %120,423: mov %121,423:mov %122,24:gosub *messagefont
	$401/
	QUAKE 50,200
	$423/
	add $401,$423/
	@

	mov $402,"@@"
	mov $403,"UAy݁Aϋ߁CR@݋ߋ餎ˈB"
	mov %120,402: mov %121,403:mov %122,24:gosub *messagefont
	br
	$403@

	mov $404,"BˏoIkqԙnNIEB"
	mov %120,404: mov %121,404:mov %122,24:gosub *messagefont
	$404@

	mov $405,"CDkɁcc"
	mov %120,405: mov %121,405:mov %122,24:gosub *messagefont
	$405@

	mov $406,"@@"
	mov $407,"sC݉v㱓B"
	mov $408,"]Ucc"
	mov $409,"@"
	mov $410,"@"
	mov $411,"@"
	mov $412,"@"
	mov $413,"@"
	mov $414,"@"
	mov $415,"@"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	mov %120,406: mov %121,420:mov %122,24:gosub *messagefont
	br
	$407
	$408\

	textoff


;GFDP@CS@ʒuF
	ld c,":a;tatie\yuuki\kyouki4.bmp",12
	texton


	mov $401,"ccCkqpB"
	mov %120,401: mov %121,401:mov %122,24:gosub *messagefont
	$401@

	mov $402,"QZcBPC"
	mov $403,"ELaC"
	mov $404,"ԝQݗpIkqB"
	mov %120,402: mov %121,404:mov %122,24:gosub *messagefont
	$402
	$403
	$404@

	mov $405,"@@"
	mov $406,"Aݓ߈u㱁C꒼œIԙnN_"
	mov $407,"NB"
	mov %120,405: mov %121,407:mov %122,24:gosub *messagefont
	br
	$406
	$407@

	mov $408,"ݜޔЋߋ餉qߗpIC"
	mov $409,"rٖhݓI߁B"
	mov %120,408: mov %121,409:mov %122,24:gosub *messagefont
	$408
	$409@

	mov $410,"@@"
	mov $411,"uߜމƌCdӖY`ꉔIv"
	mov %120,410: mov %121,411:mov %122,24:gosub *messagefont
	br
	QUAKE 20,200
	$411@

	mov $412,"@@"
	mov $413,"{CԙnNґR~B"
	mov %120,412: mov %121,413:mov %122,24:gosub *messagefont
	br
	$413@

	mov $414,"䗧BُyIcB"
	mov $415,"@"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	mov %120,414: mov %121,420:mov %122,24:gosub *messagefont
	$414\

;ʉFKb
	dwave 2,"wave\hit78.wav"
	QUAKE 30,200

	mov $401,"ԙnNp֊ISZBC"
	mov $402,"cIyCB"
	mov %120,401: mov %121,402:mov %122,24:gosub *messagefont
	$401
	$402@

	mov $403,"BۏoffIC푼|s㐧ZB"
	mov $404,"ޔВnsCBE|ٍpB"
	mov %120,403: mov %121,404:mov %122,24:gosub *messagefont
	$403
	$404@

	mov $405,"ދ餁Cޑ̌^ar͍B"
	mov $406,"䊮SŕB"
	mov %120,405: mov %121,406:mov %122,24:gosub *messagefont
	$405
	$406@

	mov $407,"@@"
	mov $408,"ccAcc"
	mov %120,407: mov %121,408:mov %122,24:gosub *messagefont
	br
	$408@

	mov $409,"{ZB萘̓IԙnNC"
	mov $410,"pIokI\CcF卫B"
	mov %120,409: mov %121,410:mov %122,24:gosub *messagefont
	$409
	$410@

	mov $411,"EB"
	mov %120,411: mov %121,411:mov %122,24:gosub *messagefont
	$411@

	mov $412,"䘸azoc^I"
	mov $413,"nhI򕔁B"
	mov %120,412: mov %121,413:mov %122,24:gosub *messagefont
	$412
	$413@

	mov $414,"@@"
	mov $415,"ρccI"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	mov %120,414: mov %121,420:mov %122,24:gosub *messagefont
	br
	$415\

	textoff
	wait 1000
;GFDP@CT@ʒuF
	ld c,":a;tatie\yuuki\kyouki5.bmp",12
	wait 1000
	texton


;ʉFUNb
	dwave 2,"wave\hit70.wav"
	drawfill 255,0,0:draw:repaint
	QUAKE 80,400

	texton

	mov $401,"uccсcIv"
	mov %120,401: mov %121,401:mov %122,24:gosub *messagefont
	$401@

	mov $402,"@@"
	mov $403,"򕔓ICzzDB"
	mov %120,402: mov %121,403:mov %122,24:gosub *messagefont
	#FF0000
	br
	$403@

	mov $404,"@ʓC"
	mov $405,"甖y欟EXÁB"
	mov %120,404: mov %121,405:mov %122,24:gosub *messagefont
	$404
	$405@

	mov $406,"vؒf򕔓IC"
	mov $407,"gߜϗ͗ʎ㏬Il"
	mov $408,"\r{C"
	mov $409,"ȖvKvpؗ͐[[n؊B"
	mov %120,406: mov %121,409:mov %122,24:gosub *messagefont
	$406
	$407
	$408
	$409@

	mov $410,"g攍ݘyhCR@vUoB"
	mov %120,410: mov %121,410:mov %122,24:gosub *messagefont
	$410@

	mov $411,"ߕs򕔖{gCؒfǉ"
	mov $412,"@"
	mov $413,"@"
	mov $414,"@"
	mov $415,"@"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	mov %120,411: mov %121,420:mov %122,24:gosub *messagefont
	$411\
	#FFFFFF

	textoff


;ʉFYV
	dwave 2,"wave\hit_s10_a.wav"
	drawfill 255,0,0:draw:repaint
	QUAKE 50,300

;ʉFr`r`iNj

;GFDP@CU@ʒuF
	ld c,":a;tatie\yuuki\kyouki6.bmp",12
	wait 1000
	texton



	mov $401,"A݉UoIu㱁C"
	mov $402,"ԙnNIq^OoʒB"
	mov %120,401: mov %121,402:mov %122,24:gosub *messagefont
	$401
	$402@

	mov $403,"Ap͝sZxUIᴈρC"
	mov $404,"rkknOoB"
	mov %120,403: mov %121,404:mov %122,24:gosub *messagefont
	$403
	$404@

	mov $405,"ԙnNnpZ"
	mov $406,"zv~Zcc"
	mov %120,405: mov %121,406:mov %122,24:gosub *messagefont
	$405
	$406@

	mov $407,"ssCϑ^勩ÓI"
	mov $408,"甏oXQdJB"
	mov %120,407: mov %121,408:mov %122,24:gosub *messagefont
	$407
	$408@

	mov $409,"@@"
	mov $410,"I\cvqߓIBac^B"
	mov %120,409: mov %121,410:mov %122,24:gosub *messagefont
	br
	$410@

	mov $411,"u@ʍݐLyI餔BwC"
	mov $412,"l{\nSZҜCBv"
	mov %120,411: mov %121,412:mov %122,24:gosub *messagefont
	$411
	$412@

	mov $413,"ؓs@VܓIρB"
	mov %120,413: mov %121,413:mov %122,24:gosub *messagefont
	$413@

	mov $414,"qߑŌCٕϋ߁C"
	mov $415,"R@h|ٖhݓI򕔁B"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	mov %120,414: mov %121,420:mov %122,24:gosub *messagefont
	$414
	$415\

;ʉFhTb
	dwave 2,"wave\ClothC.wav"
	QUAKE 20,200

	mov $401,"\ٖ@ʎC"
	mov $402,"̊isIԙnN͟C|B"
	mov %120,401: mov %121,402:mov %122,24:gosub *messagefont
	$401
	$402@

	mov $403,"T@uțEv~JB"
	mov $404,"vLvHϓIÍB"
	mov %120,403: mov %121,404:mov %122,24:gosub *messagefont
	$403
	$404@

	mov $405,"@@"
	mov $406,"ACٕSsÔ\͔VOC笕s\{SSB"
	mov $407,"ސVGIB"
	mov %120,405: mov %121,407:mov %122,24:gosub *messagefont
	br
	$406
	$407@

	mov $408,"CٕĎ⋋N"
	mov $409,"\dV睈嗈B"
	mov %120,408: mov %121,409:mov %122,24:gosub *messagefont
	$408
	$409@

	mov $410,"@@"
	mov $411,"rcc"
	mov $423,"rCJꈯcc"
	mov %120,410: mov %121,411:mov %122,24:gosub *messagefont
	mov %120,423: mov %121,423:mov %122,24:gosub *messagefont
	br
	$411@/
	$423/
	add $411,$423/
	@

	mov $412,"ٕIq튄CC命C"
	mov $413,"|㞑ʓI߁ccސB"
	mov %120,412: mov %121,413:mov %122,24:gosub *messagefont
	$412
	$413@

	mov $414,"xCϋ߁B"
	mov %120,414: mov %121,414:mov %122,24:gosub *messagefont
	$414@

	mov $415,"@@"
	mov $416,"hI藁H"
	mov %120,415: mov %121,416:mov %122,24:gosub *messagefont
	br
	$416@

	mov $417,"AAˁC֐qcc"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	mov %120,417: mov %121,420:mov %122,24:gosub *messagefont
	$417\

	textoff
	wait 3000

	bgmfadeout 5000
	bgmstop

	wait 4000
;GFDP@CV@ʒuF
	ld c,":a;tatie\yuuki\kyouki7.bmp",12
	wait 3000
	texton

	mov $401,"uecceccՁccv"
	mov %120,401: mov %121,401:mov %122,24:gosub *messagefont
	$401@

	mov $402,"@@"
	mov $403,"cccLB"
	mov %120,402: mov %121,403:mov %122,24:gosub *messagefont
	br
	$403@

	mov $404,"ݎOl蒆MőA|IƌC݁C"
	mov $405,"{RoeCnLB"
	mov %120,404: mov %121,405:mov %122,24:gosub *messagefont
	$404
	$405@

	mov $406,"@@"
	mov $407,"YrB"
	mov $423,"YrCސB"
	mov %120,406: mov %121,407:mov %122,24:gosub *messagefont
	mov %120,423: mov %121,423:mov %122,24:gosub *messagefont
	br
	$407@/
	$423/
	add $407,$423/
	@

	mov $408,"CYrLH"
	mov $409,"CQ{EH"
	mov %120,408: mov %121,409:mov %122,24:gosub *messagefont
	$408
	$409@

	mov $410,"z厀SIB"
	mov $411,"LĜrЊQCߑF֐snUcc"
	mov %120,410: mov %121,411:mov %122,24:gosub *messagefont
	$410
	$411@

	mov $412,"@@"
	mov $413,"߁cc"
	mov $423,"ߑFcc"
	mov $414,"@"
	mov $415,"@"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	mov %120,412: mov %121,420:mov %122,24:gosub *messagefont
	mov %120,423: mov %121,423:mov %122,24:gosub *messagefont
	br
	$413@/
	$423/
	add $413,$423/
	\


	mov $401,"u啪Bv"
	mov %120,401: mov %121,401:mov %122,24:gosub *messagefont
	$401@

	mov $402,"@@"
	mov $403,"DvvCB"
	mov %120,402: mov %121,403:mov %122,24:gosub *messagefont
	br
	$403@

	mov $404,"zNCݒCICԓsv܁B"
	mov %120,404: mov %121,404:mov %122,24:gosub *messagefont
	$404@

	mov $405,"vL]͕hْԘEcc"
	mov $406,"֐܁C嘰I藁B"
	mov %120,405: mov %121,406:mov %122,24:gosub *messagefont
	$405
	$406@

	mov $407,"@@"
	mov $408,"uߑF啪CcNxB"
	mov $409,"܁CߑFAϔB"
	mov %120,407: mov %121,409:mov %122,24:gosub *messagefont
	br
	$408
	$409@

	mov $410,"꒼҈ŁC琥L܌IB"
	mov %120,410: mov %121,410:mov %122,24:gosub *messagefont
	$410@

	mov $411,"ߑFv@uEH"
	mov $412,"ߑFs팴ZB"
	mov %120,411: mov %121,412:mov %122,24:gosub *messagefont
	$411
	$412@

	mov $413,"C䌴ZߑFCEϗߑFC"
	mov $414,"ߑF˔\C~CB"
	mov %120,413: mov %121,414:mov %122,24:gosub *messagefont
	$413
	$414@

	mov $415,"vցCߑFIB"
	mov $416,"ߑFpvLӛΓވ_B"
	mov $423,"cc犈Bv"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	mov %120,415: mov %121,420:mov %122,24:gosub *messagefont
	mov %120,423: mov %121,423:mov %122,24:gosub *messagefont
	$415
	$416@/
	$423/
	add $416,$423/
	\


	mov $401,"֎IԙnNC"
	mov $402,"Ӓnfo|IB"
	mov %120,401: mov %121,402:mov %122,24:gosub *messagefont
	$401
	$402@

	mov $403,"ݐԙnN濎OI"
	mov $404,"s^B"
	mov %120,403: mov %121,404:mov %122,24:gosub *messagefont
	$403
	$404@

	mov $405,"A֐v܏oB"
	mov $406,"ρCSsߑFIցB"
	mov %120,405: mov %121,406:mov %122,24:gosub *messagefont
	$405
	$406@

	mov $407,"sߑFIցBsߑFIցB"
	mov %120,407: mov %121,407:mov %122,24:gosub *messagefont
	$407@

	mov $408,"mJCJCJB"
	mov $409,"@"
	mov $410,"@"
	mov $411,"@"
	mov $412,"@"
	mov $413,"@"
	mov $414,"@"
	mov $415,"@"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	mov %120,408: mov %121,420:mov %122,24:gosub *messagefont
	$408\

	textoff

;GFDP@CW@ʒuF
	ld c,":a;tatie\yuuki\kyouki8.bmp",12
	wait 1000
	bgm "bgm\free0518.mp3"

	texton


	mov $401,"@@"
	mov $402,"uSsߑFI֛IIv"
	mov %120,401: mov %121,402:mov %122,48:gosub *messagefont
	br
	$402/
	repaint
	@

	mov $403,"@@"
	mov $404,"݋ЁCpsS͑吺^B"
	mov %120,403: mov %121,404:mov %122,24:gosub *messagefont
	br
	$404@

	mov $405,"CN㝇Cҍݍiqs×B"
	mov %120,405: mov %121,405:mov %122,24:gosub *messagefont
	$405@

	mov $406,"N螒CIqvHāCݖs×B"
	mov %120,406: mov %121,406:mov %122,24:gosub *messagefont
	$406@

	mov $407,"rIԙnNsm×B"
	mov %120,407: mov %121,407:mov %122,24:gosub *messagefont
	$407@

	mov $408,"@@"
	mov $409,"B"
	mov $423,"IB"
	mov %120,408: mov %121,409:mov %122,24:gosub *messagefont
	mov %120,423: mov %121,423:mov %122,24:gosub *messagefont
	br
	$409@/
	$423/
	add $409,$423/
	@

	mov $410,"꘢\OӓIwqCOǓwB"
	mov %120,410: mov %121,410:mov %122,24:gosub *messagefont
	$410@

	mov $411,"@@"
	mov $412,"uߑFcc"
	mov %120,411: mov %121,412:mov %122,24:gosub *messagefont
	br
	$412@

	mov $413,"vߑFLl\j~CFCҁcc"
	mov $414,"~~ccLDIv"
	mov $415,"@"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	mov %120,413: mov %121,420:mov %122,24:gosub *messagefont
	$413
	$414\


	mov $401,"O\wŒB"
	mov %120,401: mov %121,401:mov %122,24:gosub *messagefont
	$401@

	mov $402,"gې댌HIl莁C"
	mov $403,"vL꘢l竏oB"
	mov %120,402: mov %121,403:mov %122,24:gosub *messagefont
	$402
	$403@

	mov $404,"梌Vn⋍ݓߗB"
	mov %120,404: mov %121,404:mov %122,24:gosub *messagefont
	$404@

	mov $405,"Lpo螒cCs~B"
	mov %120,405: mov %121,405:mov %122,24:gosub *messagefont
	$405@

	mov $406,"ߍʏ⋋NCv餉IwFC"
	mov $407,"cIny@IۓWB"
	mov %120,406: mov %121,407:mov %122,24:gosub *messagefont
	$406
	$407@

	mov $408,"@@"
	mov $409,"uߑFAϊŒcc原sIv"
	mov %120,408: mov %121,409:mov %122,24:gosub *messagefont
	br
	$409@

	mov $410,"@퉣œIC֐ԙnNhIC"
	mov $411,"uߑF鈓svL⋏oj~Iv"
	mov %120,410: mov %121,411:mov %122,24:gosub *messagefont
	$410
	$411@

	mov $412,"uӁClsv~lccv"
	mov %120,412: mov %121,412:mov %122,24:gosub *messagefont
	$412@

	mov $413,"uFIwCܓAݑBv"
	mov %120,413: mov %121,413:mov %122,24:gosub *messagefont
	$413@

	mov $414,"uA֔@Cs\CρCv"
	mov $415,"uAوؓssFIv"
	mov $416,"uߑFuϐ^IȘEHIv"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	mov %120,414: mov %121,420:mov %122,24:gosub *messagefont
	$414
	$415
	$416\


	mov $401,"uLl܈dlsDBv"
	mov %120,401: mov %121,401:mov %122,24:gosub *messagefont
	$401@

	mov $402,"uAޖ琥LxIJBv"
	mov %120,402: mov %121,402:mov %122,24:gosub *messagefont
	$402@

	mov $403,"@ʗLl|睈C߉rH"
	mov %120,403: mov %121,403:mov %122,24:gosub *messagefont
	$403@

	mov $404,"@ʗLwq݉͗MC߉rH"
	mov %120,404: mov %121,404:mov %122,24:gosub *messagefont
	$404@

	mov $405,"@ʗLlCaۍ|C߉rH"
	mov %120,405: mov %121,405:mov %122,24:gosub *messagefont
	$405@

	mov $406,"֔@C։vFEH"
	mov $407,"vaȖvgnC"
	mov $408,"IAُCEH"
	mov %120,406: mov %121,408:mov %122,24:gosub *messagefont
	$406
	$407
	$408@

	mov $409,"ߑF֔\ZlEIIv"
	mov %120,409: mov %121,409:mov %122,24:gosub *messagefont
	$409/
	QUAKE 20,200
	@

	mov $410,"@@"
	mov $411,"鴁C֐^smcc"
	mov %120,410: mov %121,411:mov %122,24:gosub *messagefont
	br
	$411@

	mov $412,"\r鉻nۉΛcc"
	mov %120,412: mov %121,412:mov %122,24:gosub *messagefont
	$412@

	mov $413,"sCޔВԔ@ʐ݁wlVOxܓIԁC"
	mov $414,"dEJB"
	mov %120,413: mov %121,414:mov %122,24:gosub *messagefont
	$413
	$414@

	mov $415,"CN\܁uߍ݌ܔYrvVI"
	mov $416,"R@퓖ΒԚ}ΈʁB"
	mov %120,415: mov %121,416:mov %122,24:gosub *messagefont
	$415
	$416@

	mov $417,"LlC˔\甑Fm䐥^SIC"
	mov $418,"Lύ˔\^cۓ{萏oB"
	mov %120,417: mov %121,418:mov %122,24:gosub *messagefont
	$417
	$418@

	mov $419,"@@"
	mov $420,"ccޘEʑRB"
	mov %120,419: mov %121,420:mov %122,24:gosub *messagefont
	br
	$420\

	mov $401,"u@ېYrCsSsB"
	mov $402,"v\oȓIaavC"
	mov $403,"dlrϓsُCB"
	mov %120,401: mov %121,403:mov %122,24:gosub *messagefont
	$401
	$402
	$403@

	mov $404,"@ߑF^rzIC߉AߑFB"
	mov %120,404: mov %121,404:mov %122,24:gosub *messagefont
	$404@

	mov $405,"ߑFޔБz@Il"
	mov $406,"@ʍݏwWoC"
	mov $407,"ޘEAVB"
	mov %120,405: mov %121,407:mov %122,24:gosub *messagefont
	$405
	$406
	$407@

	mov $408,"ϓICٕsBBv"
	mov %120,408: mov %121,408:mov %122,24:gosub *messagefont
	$408@

	mov $409,"@@"
	mov $410,"sccގlCwƔI@x"
	mov $411,"ȕs\֒]IlB"
	mov $412,"Acc֐܏oˍsB"
	mov %120,408: mov %121,412:mov %122,24:gosub *messagefont
	br
	$410
	$411
	$412@

	mov $413,"ccuccSisB"
	mov $414,"@"
	mov $415,"@"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	mov %120,413: mov %121,420:mov %122,24:gosub *messagefont
	$413\

	textoff

;ʉFTAAAA
	dwave 2,"wave\mahou_01.wav"
	ld c,":a;tatie\yuuki\kyouki8.bmp",0
	bg "bg\gakkou_kyousitu_bure.jpg",0
	ld c,":a;tatie\yuuki\kyouki8.bmp",0
	print 99,5000,"cascade.dll/dx"
	wait 3000


;GFDP@CX@ʒuF@tF[h
	ld c,":a;tatie\yuuki\kyouki9.bmp",17

	texton

	mov $401,"؁CsBB"
	mov %120,401: mov %121,401:mov %122,24:gosub *messagefont
	$401@

	mov $402,"ؓsBC^ICYrsBB"
	mov %120,402: mov %121,402:mov %122,24:gosub *messagefont
	$402@

	mov $403,"ψꗈCAspĊQCNFB"
	mov %120,403: mov %121,403:mov %122,24:gosub *messagefont
	$403@

	mov $404,"Zccw៑E餗JB"
	mov %120,404: mov %121,404:mov %122,24:gosub *messagefont
	$404@

	mov $405,"\߈cc"
	mov $406,"sAZ\CFIsLdJcc"
	mov %120,405: mov %121,406:mov %122,24:gosub *messagefont
	$405@

	mov $407,"揁Cډr藁cc"
	mov %120,407: mov %121,407:mov %122,24:gosub *messagefont
	$407@

	mov $408,"ݜϓIvC֔\􍱏YrEH"
	mov %120,408: mov %121,408:mov %122,24:gosub *messagefont
	$408@

	mov $409,"@@"
	mov $410,"VCEccs͘Ȕ\IőxB"
	mov %120,409: mov %121,410:mov %122,24:gosub *messagefont
	br
	$410@

	mov $411,"ډccccŋ߈꒼vrDDuC"
	mov $412,"zDDnuB"
	mov %120,411: mov %121,412:mov %122,24:gosub *messagefont
	$411
	$412@

	mov $413,"@x@ǁA_a@C֐nsȁB"
	mov $414,"v꘢ÓInADB"
	mov %120,413: mov %121,414:mov %122,24:gosub *messagefont
	$413
	$414@

	mov $415,"R@cc"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	mov %120,415: mov %121,420:mov %122,24:gosub *messagefont
	$415\

;ʉFOE`````
	dwave 2,"wave\nodo10.wav"
	mov $401,"ccccB"
	mov %120,401: mov %121,401:mov %122,24:gosub *messagefont
	$401@

	mov $402,"ccDvvߓޘC^IkvB"
	mov %120,402: mov %121,402:mov %122,24:gosub *messagefont
	$402@

	mov $403,"܋NCVhYVV@C"
	mov $404,"䐥s꒼vh@H"
	mov %120,403: mov %121,404:mov %122,24:gosub *messagefont
	$403
	$404@

	mov $405,"@@"
	mov $406,"s܉񗈁c"
	mov $407,"WCqACnc"
	mov %120,405: mov %121,407:mov %122,24:gosub *messagefont
	br
	$406
	$407@

	mov $408,"ŗIg̔zے֗vNB"
	mov %120,408: mov %121,408:mov %122,24:gosub *messagefont
	$408@

	mov $409,"AqOVOC֔wݏdI@C"
	mov $410,"VsRBWC^忓B"
	mov %120,409: mov %121,410:mov %122,24:gosub *messagefont
	$409
	$410@

	mov $411,"@@"
	mov $412,"ޏAwxIEc"
	mov %120,411: mov %121,412:mov %122,24:gosub *messagefont
	br
	$412@

	mov $413,"RccRric"
	mov $414,"@"
	mov $415,"@"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	mov %120,413: mov %121,420:mov %122,24:gosub *messagefont
	$413\

	textoff

;GFDP@CPO@ʒuF@tF[h
	ld c,":a;tatie\yuuki\kyouki10.bmp",17

	texton

	mov $401,"ucv"
	mov %120,401: mov %121,401:mov %122,24:gosub *messagefont
	$401@

	mov $402,"@@"
	mov $403,"ΗB"
	mov %120,402: mov %121,403:mov %122,24:gosub *messagefont
	br
	$403@

	mov $404,"sunΗoB"
	mov %120,404: mov %121,404:mov %122,24:gosub *messagefont
	$404@

	mov $405,"@@"
	mov $406,"uIv"
	mov %120,405: mov %121,406:mov %122,24:gosub *messagefont
	br
	$406@

	mov $407,"@@"
	mov $408,"ސvȑOI藁H"
	mov $409,"\rSΏoB"
	mov %120,407: mov %121,409:mov %122,24:gosub *messagefont
	br
	$408
	$409@

	mov $410,"˒OǓwcc"
	mov %120,410: mov %121,410:mov %122,24:gosub *messagefont
	$410@

	mov $411,"sCCJB"
	mov %120,411: mov %121,411:mov %122,24:gosub *messagefont
	$411@

	mov $412,"@@"
	mov $413,"EvLYr\䗹B"
	mov %120,412: mov %121,413:mov %122,24:gosub *messagefont
	br
	$413@

	mov $414,"EvLYr\Q䗹B"
	mov %120,414: mov %121,414:mov %122,24:gosub *messagefont
	$414@

	mov $415,"䐥RIB"
	mov %120,415: mov %121,415:mov %122,24:gosub *messagefont
	$415@

	mov $416,"@C"
	mov $417,"ƎȑzvIB"
	mov %120,416: mov %121,417:mov %122,24:gosub *messagefont
	$416
	$417@

	mov $418,"@@"
	mov $419,"vցccvB"
	mov $420,"@"
	mov %120,418: mov %121,420:mov %122,24:gosub *messagefont
	br
	$419\

	bgmfadeout 1000
	bgmstop

	mov $401,"@@"
	mov $402,"@@"
	mov $403,"@@"
	mov $404,"@@"
	mov $405,"@@"
	mov $406,"@@"
	mov $407,"@@"
	mov $408,"@@"
	mov $409,"@@"
	mov $410,"@@@@@@@@@uIIv"
	mov $411,"@"
	mov $412,"@"
	mov $413,"@"
	mov $414,"@"
	mov $415,"@"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	mov %120,401: mov %121,420:mov %122,24:gosub *messagefont
	br
	br
	br
	br
	br
	br
	br
	br
	br
	$410\

	textoff

	bg black,19
	wait 4000

;ʉFss̎Giiv[vj
	dwaveloop 1,"wave\machi.wav"
;wiF[̓ij@tF[h
	bg "bg\tokyod.jpg",19
	wait 3000

	texton

	mov $401,"wN\\E󓞔푼QIOǓwI\͓\"
	mov $402,"k\\E\͓\C"
	mov $403,"x݌wZʗvccx"
	mov %120,401: mov %121,403:mov %122,24:gosub *messagefont
	$401
	$402
	$403@

	mov $404,"@@"
	mov $405,"ݓXjIVB"
	mov %120,404: mov %121,405:mov %122,24:gosub *messagefont
	br
	$405@

	mov $406,"ʔdIVYEځC"
	mov $407,"ȁwwQOw"
	mov $408,"aۈ\WCwHxIߎVCœ_C"
	mov $409,"ݛړIeB"
	mov %120,406: mov %121,409:mov %122,24:gosub *messagefont
	$406
	$407
	$408
	$409@

	mov $410,"@@"
	mov $411,"\槔DDngC^DB"
	mov %120,410: mov %121,411:mov %122,24:gosub *messagefont
	br
	$411@

	mov $412,"CL\L^З͗ʉC"
	mov $413,"ٔ}̒sړC"
	mov $414,"ȓӘ@kz@B"
	mov %120,412: mov %121,414:mov %122,24:gosub *messagefont
	$412
	$413
	$414@

	mov $415,"ґRŋN竗ˁC"
	mov $416,"ݐڎ󐸐_ϒ@"
	mov $417,"푗勎B"
	mov %120,415: mov %121,417:mov %122,24:gosub *messagefont
	$415
	$416
	$417@

	mov $418,"ݎsĎqWڍ@C"
	mov $419,"Փ_ԊiŖ]JB"
	mov %120,418: mov %121,419:mov %122,24:gosub *messagefont
	$418
	$419@

	mov $420,"RCsŏēIߔЁBɒncc"
	mov %120,420: mov %121,420:mov %122,24:gosub *messagefont
	$420\


	mov $401,"yAטh耓IꏊwB"
	mov $402,"VsŁAC"
	mov $403,"甉ي[B"
	mov %120,401: mov %121,403:mov %122,24:gosub *messagefont
	$401
	$402
	$403@

	mov $404,"rl厩Bz"
	mov $405,"ACuߍQϓIlC"
	mov $406,"䉺rSlBvOlBz"
	mov %120,404: mov %121,406:mov %122,24:gosub *messagefont
	$404
	$405
	$406@

	mov $407,"@@"
	mov $408,"w̓@zC"
	mov $409,"Llەz^NʓIƍ爍C"
	mov $410,"u苋s\I⋔˜ޒiBv"
	mov $411,"C̏cx"
	mov %120,407: mov %121,411:mov %122,24:gosub *messagefont
	br
	$408
	$409
	$410
	$411@

	mov $412,"@@"
	mov $413,"I\ኬ̊C^IٜB"
	mov %120,412: mov %121,413:mov %122,24:gosub *messagefont
	br
	$413@

	mov $414,"ᚔƍ爍琥ƌBʓIB"
	mov %120,414: mov %121,414:mov %122,24:gosub *messagefont
	$414@

	mov $415,"gĊnlC"
	mov $416,"@ʔ}̕sNCߏA|وӖB"
	mov %120,415: mov %121,416:mov %122,24:gosub *messagefont
	$415
	$416@

	mov $417,"ޘpxŁC㤐^֓IHB"
	mov $418,"UM⁏oCvS{s\IB"
	mov $419,"sǔ@CCȖhC֐@B"
	mov $420,"@"
	mov %120,417: mov %121,420:mov %122,24:gosub *messagefont
	$417
	$418
	$419\


	mov $401,"E񒅈꘢B"
	mov %120,401: mov %121,401:mov %122,24:gosub *messagefont
	$401@

	mov $402,"E񒅈꘢B"
	mov %120,402: mov %121,402:mov %122,24:gosub *messagefont
	$402@

	mov $403,"ʑIC"
	mov $404,"\EۏwwWƉˎI"
	mov $405,"^NiSI玖lB"
	mov %120,403: mov %121,405:mov %122,24:gosub *messagefont
	$403
	$404
	$405@

	mov $406,"l񒅐Ea"
	mov $407,"}̑glmIB"
	mov $408,"UoCmۑ厖B"
	mov %120,406: mov %121,409:mov %122,24:gosub *messagefont
	$406
	$407
	$408@

	mov $409,"svccŗvp茒vC֎ZsցCsցB"
	mov %120,409: mov %121,409:mov %122,24:gosub *messagefont
	$409@

	mov $410,"@@"
	mov $411,"uߊ蓘EHv"
	mov %120,410: mov %121,411:mov %122,24:gosub *messagefont
	br
	$411@

	mov $412,"@@"
	mov $413,"ˑRCLlԗB"
	mov %120,412: mov %121,413:mov %122,24:gosub *messagefont
	br
	$413@

	mov $414,"ʔ䒆NlXNʁAxۓIjB"
	mov $415,"TމƓXIVJB"
	mov %120,414: mov %121,415:mov %122,24:gosub *messagefont
	$414
	$415@

	mov $416,"C꒼݊ݓߗIB"
	mov $417,"DLlܒԗB"
	mov %120,416: mov %121,417:mov %122,24:gosub *messagefont
	$416
	$417@

	mov $418,"@@"
	mov $419,"uCsCsDӎvB"
	mov %120,418: mov %121,419:mov %122,24:gosub *messagefont
	br
	$419@

	mov $420,"CٜޏVYk݈ӁBv"
	mov %120,420: mov %121,420:mov %122,24:gosub *messagefont
	$420\

	mov $401,"uCޘB"
	mov $402,"CnA꒼ݔdޏVY藁B"
	mov %120,401: mov %121,402:mov %122,24:gosub *messagefont
	$401
	$402@

	mov $403,"sC^CRlB"
	mov %120,403: mov %121,403:mov %122,24:gosub *messagefont
	$403@

	mov $404,"䏬\E\IwqC"
	mov $405,"Avzvc\Il{B"
	mov %120,404: mov %121,405:mov %122,24:gosub *messagefont
	$404
	$405@

	mov $406,"ňҔ}ΓIC"
	mov $407,"ґRuލ`C"
	mov $408,"AߓI֐aFNߛBv"
	mov %120,406: mov %121,408:mov %122,24:gosub *messagefont
	$406
	$407
	$408@

	mov $409,"@@"
	mov $410,"uݓIwqpsވ_c"
	mov $411,"UlCAilB"
	mov %120,409: mov %121,411:mov %122,24:gosub *messagefont
	br
	$410
	$411@

	mov $412,"vLFCsvC"
	mov $413,"vaDAsBޏAݓIЉBv"
	mov %120,412: mov %121,413:mov %122,24:gosub *messagefont
	$412
	$413@

	mov $414,"ݏd_wZCޔ椌ޑ|Bv"
	mov $415,"@"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	mov %120,414: mov %121,420:mov %122,24:gosub *messagefont
	$414\


	mov $401,"u֊w蚍čDCl֐snIB"
	mov $402,"tYrAݑcCމssB"
	mov %120,401: mov %121,402:mov %122,24:gosub *messagefont
	$401
	$402@

	mov $403,"CYrCFAs藁Bv"
	mov %120,403: mov %121,403:mov %122,24:gosub *messagefont
	$403@

	mov $404,"@@"
	mov $405,"wϓIwqC󖟉apIekC"
	mov $406,"sӘazBx"
	mov %120,404: mov %121,406:mov %122,24:gosub *messagefont
	br
	$405
	$406@

	mov $407,"@@"
	mov $408,"Ch@玈ꕛӓIώqܓB"
	mov %120,407: mov %121,408:mov %122,24:gosub *messagefont
	br
	$408@

	mov $409,"vw_ccJB"
	mov %120,409: mov %121,409:mov %122,24:gosub *messagefont
	$409@

	mov $410,"@@"
	mov $411,"ugށCSvtB^[~Bv"
	mov %120,410: mov %121,411:mov %122,24:gosub *messagefont
	br
	$411@

	mov $412,"@@"
	mov $413,"@@"
	mov $414,"揁ccŗOHˋ俛B"
	mov $415,"@"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	mov %120,412: mov %121,420:mov %122,24:gosub *messagefont
	br
	br
	$414\

	textoff

	wait 2000

;wiF[̓@㔼ֈړ
	lsp 1,"bg\tokyo.jpg",0,-600

	for %199=0 to 199
		gettimer %90
		msp 1,0,3,0
		print 1
		waittimer (%90+16)
	next

	csp 1
	bg white,19
;ʉtF[hAEg
	dwavestop 1
	wait 3000

	mov %2700,1


textclear
	saveoff
;	eLXgz̏
	for %199=201 to 420
		mov $%199,"@"
	next

	bgm "title\Main-Theme.mp3"

goto *sentaku

;\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\
;eLXgz߂
*textbackreturn

	setwindow3 8,56,40,40,24,24,0,2,0,1,1,#999999,0,0,800,600

	for %100=401 to 420
		if $%100 == "@" break
		mov %145,%100
		add %145,9
		rubyon %%100,%%100,"lr SVbN"
		if $%100 != "(@/@)" $%100
	next

*textbackreturnend

return
;\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\
;eLXgÕZbg
*textbackreset
	for %100=401 to 420
		mov %%100,24
		mov $%100,"@"
	next
return
;\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\
;eLXgȎ
*textinsart
	for %100=201 to 220
		mov %%100,24
		mov $%100,""
	next
	for %100=221 to 400
		mov %101,%100
		sub %101,20
		mov $%101,$%100
		mov %%101,%%100
	next

	for %100=401 to 420
		mov %101,%100
		sub %101,20
		mov $%101,$%100
		mov %%101,%%100
	next

	mov %106,1
return
;\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\
;eLXgz
*textback

	lsp 100,":a;system\recall\recall.bmp",0,0
	lsp 62,":a/2,0,3;system\recall\end1.bmp",600,540

	setwindow3 70,125,40,40,16,16,0,2,0,1,1,#999999,0,0,800,600

	mov %108,381
	gosub *textback1

*textbackbtnloop
	vsp 60,0
	vsp 61,0
	mov %110,%108-20
	btndef clear
	spbtn 62,3
	if $%110 != "" lsph 60,":a;system\recall\recall_up.bmp",670,100 : vsp 60,1 : spbtn 60,1
	lsph 61,":a;system\recall\recall_down.bmp",670,460 : vsp 61,1 : spbtn 61,2

	btnwait %109

	if %109 == 1 sub %108,20 : textclear : gosub *textback1
	if %109 == 2 if %108 <= 380 add %108,20 : textclear : gosub *textback1 : goto *textbackbtnloop
	if %109 == 2 if %108 >= 381 goto *textbackbtnloopend
	if %109 == 3 goto *textbackbtnloopend
	if %109 == -1 goto *textbackbtnloopend
	if %109 == -2 if $%110 != "" sub %108,20 : textclear : gosub *textback1
	if %109 == -3 if %108 <= 380 add %108,20 : textclear : gosub *textback1 : goto *textbackbtnloop
	if %109 == -3 if %108 >= 381 goto *textbackbtnloopend

goto *textbackbtnloop
*textbackbtnloopend

	csp 60
	csp 61
	csp 62

	csp 100
	csp 200

gosub *textbackreturn
goto *systemloop
;\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\
;eLXgz1
*textback1

;	ŏlݒ
	if %108 <= 201 mov %107,201
;	őlݒ
	if %108 >= 381 mov %107,381
;	$514
	for %107=%108 to (%108+19)
		rubyon (%%107/3)*2,(%%107/3)*2,"lr SVbN"
		$%107
	next

return

;\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\
;VXeENbN
*rclk
saveoff

	gosub *lainstop
	gosub *sakurastop
	vsp 50,0

	lsph 190,":s/30,30,0;#888888#FFFFFFۑEǂݍ",300,200 : vsp 190,1
	lsph 191,":s/30,30,0;#888888#FFFFFFǂ΂",300,230 : vsp 191,1
	lsph 192,":s/30,30,0;#888888#FFFFFFǂǂݕԂ",300,260 : vsp 192,1
	lsph 193,":s/30,30,0;#888888#FFFFFFݒύX",300,290 : vsp 193,1
	lsph 194,":s/30,30,0;#888888#FFFFFF^Cgʂ",300,320 : vsp 194,1
	lsph 195,":s/30,30,0;#888888#FFFFFFQ[I",300,350 : vsp 195,1

	print 1

*rclkbtnloop

	btndef clear
	spbtn 190,1
	spbtn 191,2
	spbtn 192,3
	spbtn 193,4
	spbtn 194,5
	spbtn 195,6
	btnwait %600


	if %600	== -1 goto *rclkend
	if %600	== 1 mov %718,1 : goto *saveload
	if %600	== 2 systemcall skip : goto *rclkend
	if %600	== 3 vsp 190,0 : vsp 191,0 : vsp 192,0 : vsp 193,0 : vsp 194,0 : vsp 195,0 : goto *textback
	if %600	== 4 gosub *system : goto *rclkend
	if %600	== 5 dwave 50,"system\saveload\push59_a.wav" : goto *rclktitleback
	if %600	== 6 dwave 50,"system\saveload\push59_a.wav" : mov %801,1 : goto *gameendcheck


goto *rclkbtnloop

*rclkend

	csp 190
	csp 191
	csp 192
	csp 193
	csp 194
	csp 195
	csp 200
	gosub *lainretry
	gosub *sakuraretry
	print 11

saveon
texton
goto *systemloop




;\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\
;^Cgʂɖ߂
*rclktitleback
;	ImF
	lsp 30,":a;chip\window\window_titleback.bmp",222,184
;	͂{^
	lsp 29,":a/2,0,3;chip\window\yes.bmp",271,282
;	{^
	lsp 28,":a/2,0,3;chip\window\no.bmp",405,282
	print 1

*rclktitlebackloop
	btndef clear
;	exbtn 29,1,"S50,(majo\system\wave\push28.wav)"
;	exbtn 28,2,"S50,(majo\system\wave\push28.wav)"
	exbtn 29,1,""
	exbtn 28,2,""

;	{^҂
	btnwait2 %800
	if %800 == -1
	if %800 == 1 goto *titleback
	if %800 == 2 csp 30:csp 29:csp 28:btndef "" : goto *rclkbtnloop
;	if %800 == 2 if %718 == 2 csp 30:csp 29:csp 28:btndef "" : goto *saveloadokloop

;	if %121 == 1 lsp 141,":a;majo\saveload\cancel1.bmp",583,545:lsp 143,":a;majo\saveload\savedel1.bmp",583,493:lsp 144,":a;majo\saveload\saveok1.bmp",356,493:lsp 145,":a/2,500,0;majo\saveload\select1.bmp",32,76 : goto *savebtnloop
;	if %121 == 2 lsp 141,":a;majo\saveload\cancel1.bmp",583,545:lsp 143,":a;majo\saveload\savedel1.bmp",583,493:lsp 142,":a;majo\saveload\loadok1.bmp",356,545:lsp 145,":a/2,500,0;majo\saveload\select1.bmp",32,76 : goto *loadbtnloop

goto *rclktitlebackloop

;\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\


;\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\
;Q[I
*gameendcheck
;	ImF
	lsp 30,":a;chip\window\window_exit.bmp",222,184
;	͂{^
	lsp 29,":a/2,0,3;chip\window\yes.bmp",271,282
;	{^
	lsp 28,":a/2,0,3;chip\window\no.bmp",405,282
	print 1

*gameendcheckloop
	btndef clear
;	exbtn 29,1,"S50,(majo\system\wave\push28.wav)"
;	exbtn 28,2,"S50,(majo\system\wave\push28.wav)"
	exbtn 29,1,""
	exbtn 28,2,""

;	{^҂
	btnwait2 %800
	if %800 == -1
	if %800 == 1 goto *gameend
	if %800 == 2 if %801 == 1 csp 30:csp 29:csp 28:btndef "" : goto *rclkbtnloop
	if %800 == 2 if %801 == 2 csp 30:csp 29:csp 28:btndef "" : goto *title
;	if %800 == 2 if %718 == 2 csp 30:csp 29:csp 28:btndef "" : goto *saveloadokloop

;	if %121 == 1 lsp 141,":a;majo\saveload\cancel1.bmp",583,545:lsp 143,":a;majo\saveload\savedel1.bmp",583,493:lsp 144,":a;majo\saveload\saveok1.bmp",356,493:lsp 145,":a/2,500,0;majo\saveload\select1.bmp",32,76 : goto *savebtnloop
;	if %121 == 2 lsp 141,":a;majo\saveload\cancel1.bmp",583,545:lsp 143,":a;majo\saveload\savedel1.bmp",583,493:lsp 142,":a;majo\saveload\loadok1.bmp",356,545:lsp 145,":a/2,500,0;majo\saveload\select1.bmp",32,76 : goto *loadbtnloop

goto *gameendcheckloop

;\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\

*sindenzu


	if %42 == 1 btndef "cutin\sindenzu_low.jpg"
	if %42 == 2 btndef "cutin\sindenzu_nomal.jpg"
	if %42 == 3 btndef "cutin\sindenzu_high.jpg"
	if %42 == 4 btndef "cutin\sindenzu_max.jpg"

	dwave 2,"wave\Beep005.wav"
	mov %40,-100
	for %199=0 to 90
		gettimer %41
		blt %40,0,100,600,%40,0,100,600
		blt %40-100,0,100,600,800,0,100,600
		add %40,10
		waittimer (%41+16)
	next

	dwave 2,"wave\Beep005.wav"
	mov %40,-100
	for %199=0 to 90
		gettimer %41
		blt %40,0,100,600,%40,0,100,600
		blt %40-100,0,100,600,800,0,100,600
		add %40,10
		waittimer (%41+16)
	next

	dwave 2,"wave\Beep005.wav"
	mov %40,-100
	for %199=0 to 90
		gettimer %41
		blt %40,0,100,600,%40,0,100,600
		blt %40-100,0,100,600,800,0,100,600
		add %40,10
		waittimer (%41+16)
	next


return
;\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\
;bZ[W̃tHgς
*messagefont
saveoff
	for %125=%120 to %121
		mov %%125,%122
		len %123,$%125
		mov $425,""
		for %126=0 to (%123/2)-1
			add $425,"(@/"
			mid $426,$%125,(%126*2),2
			add $425,$426
			add $425,")"
			mov $426,""
		next
		mov $%125,$425
	next
	rubyon %122,%122,"lr SVbN"
saveon
return
;\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\
*textget
	mov %131,%130

	*textgetloop
		if $%131 == "@" goto *textgetend
		if $%131 == "" goto *textgetend
		add %131,1
		if %131 == 421 goto *textgetend
	goto *textgetloop

	*textgetend
	sub %131,1
return



*textwright


	*textwrightloop

		$%130
		add %130,1
		if $%130 == "(@/@)" mov %130,401 : goto *textwrightloopend
		if %130 > %131 goto *textwrightloopend
		goto *textwrightloop


	*textwrightloopend

	if %130 >= 421 mov %130,401


return


;\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\
;J~炷
*lain
	mov %45,1
;GtFNgFJ
lsp 9,"*1"
; J摜XvCgƂēǂݍ
lsph 10,":a/8,0,3;cutin\rain1.bmp",0,0
lsph 11,":a/8,0,3;cutin\rain2.bmp",0,0
lsph 12,":a/8,0,3;cutin\rain3.bmp",0,0

layermessage 1,"i|cutin\rain1.bmp,cutin\rain2.bmp,cutin\rain3.bmp"	;摜o^
layermessage 1,"s|1,30,-9,0,0"
;layermessage 1,"i|10,11,12"	;XvCgo^
;layermessage 1,"s|1,30,-9,0,0"

return


*lainend
	if %45 == 1 vsp 9,0
	if %45 == 1 print 11
	if %45 == 1 csp 9
	if %45 == 1 mov %45,0
return

*lainstop

	if %45 == 1 vsp 9,0
;	if %45 == 1 print 11

return

*lainretry
if %45 == 0 goto *rainretryend
if %45 == 2 goto *rainretryend
;GtFNgFJ
lsp 9,"*1"
; J摜XvCgƂēǂݍ
lsph 10,":a;cutin\rain1.bmp",0,0
lsph 11,":a;cutin\rain2.bmp",0,0
lsph 12,":a;cutin\rain3.bmp",0,0

layermessage 1,"i|cutin\rain1.bmp,cutin\rain2.bmp,cutin\rain3.bmp"	;摜o^
layermessage 1,"s|1,30,-9,0,0"
;layermessage 1,"i|10,11,12"	;XvCgo^
;layermessage 1,"s|1,30,-9,0,0"
*rainretryend
return


;\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\
;gt~炷
*momizi
	mov %45,1
;GtFNgFJ
lsp 9,"*2"
; J摜XvCgƂēǂݍ
lsph 10,":a/8,0,3;cutin\kaede1.bmp",0,0
lsph 11,":a/8,0,3;cutin\kaede2.bmp",0,0
lsph 12,":a/8,0,3;cutin\kaede3.bmp",0,0

layermessage 2,"i|10,8,11,8,12,8"	;摜o^
layermessage 2,"s|6,15,-6,16,32"
;layermessage 1,"i|10,11,12"	;XvCgo^
;layermessage 1,"s|1,30,-9,0,0"

return


*momiziend
	if %45 == 1 vsp 9,0
	if %45 == 1 csp 9
	if %45 == 1 mov %45,0
return

*momizistop

	if %45 == 1 vsp 9,0
;	if %45 == 1 print 11

return

*momiziretry
if %45 == 0 goto *momiziretryend
;GtFNgFJ
lsp 9,"*1"
; J摜XvCgƂēǂݍ
lsph 10,":a;cutin\kaede1.bmp",0,0
lsph 11,":a;cutin\kaede2.bmp",0,0
lsph 12,":a;cutin\kaede3.bmp",0,0

layermessage 2,"i|10,8,11,8,12,8"	;摜o^
layermessage 2,"s|6,15,-6,16,32"
;layermessage 1,"i|10,11,12"	;XvCgo^
;layermessage 1,"s|1,30,-9,0,0"
*momiziretryend
return

;\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\
;~炷
*sakura
	mov %45,2
;GtFNgFJ
lsp 9,"*2"
; J摜XvCgƂēǂݍ
lsph 10,":l/8,0,3;cutin\sakura1.bmp",0,0
lsph 11,":l/8,0,3;cutin\sakura2.bmp",0,0
lsph 12,":l/8,0,3;cutin\sakura3.bmp",0,0

layermessage 2,"i|10,8,11,8,12,8"	;摜o^
layermessage 2,"s|72,15,-6,16,32"
;layermessage 1,"i|10,11,12"	;XvCgo^
;layermessage 1,"s|1,30,-9,0,0"

return


*sakuraend
	if %45 == 2 vsp 9,0
	if %45 == 2 print 11
	if %45 == 2 csp 9
	if %45 == 2 mov %45,0
return

*sakurastop

	if %45 == 2 vsp 9,0
;	if %45 == 2 print 11

return

*sakuraretry
if %45 == 0 goto *sakuraretryend
if %45 == 1 goto *sakuraretryend
;GtFNgFJ
lsp 9,"*2"
; J摜XvCgƂēǂݍ
lsph 10,":l/8,0,3;cutin\sakura1.bmp",0,0
lsph 11,":l/8,0,3;cutin\sakura2.bmp",0,0
lsph 12,":l/8,0,3;cutin\sakura3.bmp",0,0

layermessage 2,"i|10,8,11,8,12,8"	;摜o^
layermessage 2,"s|72,15,-6,16,32"
;layermessage 1,"i|10,11,"	;XvCgo^
;layermessage 1,"s|1,30,-9,0,0"
*sakuraretryend
return


;\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\
;Z[u
*saveload

	csp 10
	csp 11
	csp 12
	csp 13
	csp 14

	btndef clear


;	wi
	lsp 150,":c;system\saveload\back.jpg",0,0
;	Q[ɖ߂{^
	lsp 149,":a/2,0,3;system\saveload\honpen1.bmp",480,10
;	^Cgɖ߂{^
	lsp 148,":a/2,0,3;system\saveload\title1.bmp",614,10
;	O{^
	lsp 147,":a/2,0,3;system\saveload\mae1.bmp",10,10
;	{^
	lsp 146,":a/2,0,3;system\saveload\tugi1.bmp",170,10
;	ZNgf[^
;	lsp 145,":a/2,500,0;majo\saveload\select1.bmp",32,76
;	Z[u{^
	lsp 144,":a/2,0,3;system\saveload\hozon1.bmp",285,10
;	Z[u폜{^
;	lsp 143,":a;majo\saveload\savedel1.bmp",583,493
;	[h{^
	lsp 142,":a/2,0,3;system\saveload\yomikomi1.bmp",375,10
;	ĨLZ{^
;	lsp 141,":a;majo\saveload\cancel1.bmp",583,545
;	y[W̃XbV
	lsp 140,":a;system\saveload\saveload_slash.bmp",115,12

;	g̐ݒ
	lsph 98,":a/1,0,3;system\saveload\pointer.bmp",900,900


*saveloaddraw
;	y[W
	mov %700,(%2900*4)
	itoa2 $11,(%2900+1)
	mov $10,""

;	摜pX̑
	for %199=1 to 4
		mov %198,(%199+4)
		mov $%199,":c;savedate\savepix"
		mov $%198,"savedate\savepix"
		add %700,1 : itoa $9,%700
		len %705,$9 : if %705 == 1 mov $10,"O"
		add $10,$9 : add $%199,$10 : add $%199,".bmp" : add $%198,$10 : add $%198,".bmp"
	next

;	W
	mov %702,0
	mov %703,0

;	TlCԍ
	mov %704,120

;	~jTlC̕\
	mov %700,(%2900*4)
	for %199=1 to 4
		savefileexist %701,(%700+%199)
		if %701 == 0 lsp %704,"system\saveload\dammy.bmp",118+(%702*357),99+(%703*243)
		if %701 == 1 csp %704 : lsp %704,$%199,118+(%702*357),99+(%703*243)
		if %703 <= 1 inc %703
		if %703 == 2 inc %702 : mov %703,0
		dec %704
	next

;	̐ݒ
	gosub *dateinsart

;	Z[uf[^̎Ԃ̊i[
	gosub *timeinsart

;	y[W\
	csp 139 : lsp 139,":s/35,35,0;#FFFFFF$11",85,13
	lsp 138,":s/35,35,0;#FFFFFFT",140,13

	print 12

	goto *saveloadbtnloop

*saveloadokloop
;	y[W
	mov %700,(%2900*4)
	itoa2 $11,(%2900+1)
	mov $10,""

;	摜pX̑
	for %199=1 to 4
		mov %198,(%199+4)
		mov $%199,":c;savedate\savepix"
		mov $%198,"savedate\savepix"
		add %700,1 : itoa $9,%700
		len %705,$9 : if %705 == 1 mov $10,"O"
		add $10,$9 : add $%199,$10 : add $%199,".bmp" : add $%198,$10 : add $%198,".bmp"
	next

;	W
	mov %702,0
	mov %703,0

;	TlCԍ
	mov %704,120

;	~jTlC̕\
	mov %700,(%2900*4)
	for %199=1 to 4
		savefileexist %701,(%700+%199)
		if %701 == 0 lsp %704,"system\saveload\dammy.bmp",118+(%702*357),99+(%703*243)
		if %701 == 1 csp %704 : lsp %704,$%199,118+(%702*357),99+(%703*243)
		if %703 <= 1 inc %703
		if %703 == 2 inc %702 : mov %703,0
		dec %704
	next

;	̐ݒ
	gosub *dateinsart

;	Z[uf[^̎Ԃ̊i[
	gosub *timeinsart

;	y[W\
	csp 139 : lsp 139,":s/35,35,0;#FFFFFF$11",85,13
	lsp 138,":s/35,35,0;#FFFFFFT",140,13

	print 1



*saveloadbtnloop

;	{^̐ݒ
	btndef clear

	exbtn_d "C98"

	exbtn 120,1,"M98,112,93"
	exbtn 119,2,"M98,112,336"
	exbtn 118,3,"M98,469,93"
	exbtn 117,4,"M98,469,336"

	exbtn 149,100,""
	exbtn 148,101,""
	if %2900 >= 1 exbtn 147,102,""
	if %2900 <= 3 exbtn 146,103,""


;	{^҂
	btnwait2 %706

;	ǂłȂNbNꍇ
	if %706 == 0 goto *saveloadbtnloop
;	ENbN
	if %706 == -1 dwave 50,"system\saveload\kachi06.wav":goto *gameback
;	zC[
	if %706 == -2 goto *saveloadbtnloop
	if %706 == -3 goto *saveloadbtnloop

	mov %700,(%2900*4)

	if %706 == 1 mov %710,(%700+3101) : mov %711,(%700+3141) : mov %712,(%700+3171) : mov $12,$5
	if %706 == 2 mov %710,(%700+3102) : mov %711,(%700+3142) : mov %712,(%700+3172) : mov $12,$6
	if %706 == 3 mov %710,(%700+3103) : mov %711,(%700+3143) : mov %712,(%700+3173) : mov $12,$7
	if %706 == 4 mov %710,(%700+3104) : mov %711,(%700+3144) : mov %712,(%700+3174) : mov $12,$8

	if %706 >= 1 if %706 <= 4 dwave 50,"system\saveload\kachi06.wav"

;	Q[ɖ߂
	if %706 == 100 dwave 50,"system\saveload\kachi06.wav":goto *gameback
;	^Cgɖ߂
	if %706 == 101 dwave 50,"system\saveload\push59_a.wav":goto *datetitleback
;	Oy[W
	if %706 == 102 dwave 50,"system\saveload\kachi06.wav": sub %2900,1 : cell 147,0 : goto *saveloadokloop
;	y[W
	if %706 == 103 dwave 50,"system\saveload\kachi06.wav": add %2900,1 : cell 146,0 : goto *saveloadokloop


*saveloadbtnloop2


	btndef clear


;	Q[ɖ߂{^
	exbtn 149,100,""
;	^Cgɖ߂{^
	exbtn 148,101,""
;	Z[u{^
	if %718 != 2 exbtn 144,104,""
;	[h{^
	savefileexist %709,(%710-3100)
	if %709 == 1 exbtn 142,105,""


;	{^҂
	btnwait2 %706



;	ǂłȂNbNꍇ
	if %706 == 0 goto *saveloadbtnloop2
;	zC[
	if %706 == -2 goto *saveloadbtnloop2
	if %706 == -3 goto *saveloadbtnloop2


;	ĨLZEENbN
	if %706 == -1 goto *saveloadbtnloop


;	Z[u{^I
;	ŇvZE
	if %706 == 104 date %720,%721,%722
	if %706 == 104 itoa $192,%720
	if %706 == 104 len %725,$192
	if %706 == 104 if %725 == 1 mov $%711,"200" : add $%711,$192 : add $%711,"/"
	if %706 == 104 if %725 == 2 mov $%711,"20" : add $%711,$192 : add $%711,"/"
	if %706 == 104 itoa $192,%721
	if %706 == 104 len %725,$192
	if %706 == 104 if %725 == 1 add $%711,"0" : add $%711,$192 : add $%711,"/"
	if %706 == 104 if %725 == 2 add $%711,$192 : add $%711,"/"
	if %706 == 104 itoa $192,%722
	if %706 == 104 len %725,$192
	if %706 == 104 if %725 == 1 add $%711,"0" : add $%711,$192 : add $%711,"@"
	if %706 == 104 if %725 == 2 add $%711,$192 : add $%711,"@"


;	Ԃ̌vZE
	time %720,%721,%722
	if %706 == 104 itoa $192,%720
	if %706 == 104 len %725,$192
	if %706 == 104 if %725 == 1 add $%711,"0" : add $%711,$192 : add $%711,"F"
	if %706 == 104 if %725 == 2 add $%711,$192 : add $%711,"F"
	if %706 == 104 itoa $192,%721
	if %706 == 104 len %725,$192
	if %706 == 104 if %725 == 1 add $%711,"0" : add $%711,$192
	if %706 == 104 if %725 == 2 add $%711,$192

	if %706 == 104 savegame (%710-3100) : dwave 50,"system\saveload\se-033.wav" : savescreenshot2 $12 :mov $%712,$100: cell 144,0 : vsp 98,0 : goto *saveloadokloop

	if %706 == 105 loadgame (%710-3100)

;	Q[ɖ߂
	if %706 == 100 dwave 50,"system\saveload\kachi06.wav":goto *gameback
;	^Cgɖ߂
	if %706 == 101 dwave 50,"system\saveload\push59_a.wav":goto *datetitleback



goto *savebtnloop2

;\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\
;Z[ũ^Cg̑
*dateinsart
	mov %700,(%2900*4)
	savefileexist %709,(%700+1)

	mov %715,%700+3171
	mov $3162,$%715
	if %709 == 0 lsph 56,":s/45,45,0;#00FF00@",300,300
	if %709 == 1 csp 56 : lsph 56,":s/25,25,0;#FFFFFF$3162",184,305 : vsp 56,1


	savefileexist %709,(%700+2)
	mov %715,%700+3172
	mov $3163,$%715
	if %709 == 0 lsph 55,":s/45,45,0;#00FF00@",300,300
	if %709 == 1 csp 55 : lsph 55,":s/25,25,0;#FFFFFF$3163",184,547 : vsp 55,1


	savefileexist %709,(%700+3)
	mov %715,%700+3173
	mov $3164,$%715
	if %709 == 0 lsph 54,":s/45,45,0;#00FF00@",300,300
	if %709 == 1 csp 54 : lsph 54,":s/25,25,0;#FFFFFF$3164",541,305 : vsp 54,1


	savefileexist %709,(%700+4)
	mov %715,%700+3174
	mov $3165,$%715
	if %709 == 0 lsph 53,":s/45,45,0;#00FF00@",300,300
	if %709 == 1 csp 53 : lsph 53,":s/25,25,0;#FFFFFF$3165",541,547 : vsp 53,1

return
;\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\
;Z[u̎Ԃ̑
*timeinsart
	mov %700,(%2900*4)
	savefileexist %709,(%700+1)

	mov %716,%700+3141
	mov $3192,$%716
	if %709 == 0 lsph 77,":s/45,45,0;#00FF00@",330,330
	if %709 == 1 csp 77 : lsph 77,":s/25,25,0;#FFFFFF$3192",107,270 : vsp 77,1

	savefileexist %709,(%700+2)
	mov %716,%700+3142
	mov $3193,$%716
	if %709 == 0 lsph 76,":s/45,45,0;#00FF00@",330,330
	if %709 == 1 csp 76 : lsph 76,":s/25,25,0;#FFFFFF$3193",107,512 : vsp 76,1

	savefileexist %709,(%700+3)
	mov %716,%700+3143
	mov $3194,$%716
	if %709 == 0 lsph 75,":s/45,45,0;#00FF00@",330,330
	if %709 == 1 csp 75 : lsph 75,":s/25,25,0;#FFFFFF$3194",465,270 : vsp 75,1

	savefileexist %709,(%700+4)
	mov %716,%700+3144
	mov $3195,$%716
	if %709 == 0 lsph 74,":s/45,45,0;#00FF00@",330,330
	if %709 == 1 csp 74 : lsph 74,":s/25,25,0;#FFFFFF$3195",465,512 : vsp 74,1

return
;\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\
;^Cgʂɖ߂
*datetitleback
;	ImF
	lsp 30,":a;chip\window\window_titleback.bmp",222,184
;	͂{^
	lsp 29,":a/2,0,3;chip\window\yes.bmp",271,282
;	{^
	lsp 28,":a/2,0,3;chip\window\no.bmp",405,282
	print 1

*datetitlebackloop
	btndef clear
;	exbtn 29,1,"S50,(majo\system\wave\push28.wav)"
;	exbtn 28,2,"S50,(majo\system\wave\push28.wav)"
	exbtn 29,1,""
	exbtn 28,2,""

;	{^҂
	btnwait2 %800
	if %800 == -1
	if %800 == 1 goto *titleback
	if %800 == 2 csp 30:csp 29:csp 28:btndef "" : goto *saveloadokloop
;	if %800 == 2 if %718 == 2 csp 30:csp 29:csp 28:btndef "" : goto *saveloadokloop

;	if %121 == 1 lsp 141,":a;majo\saveload\cancel1.bmp",583,545:lsp 143,":a;majo\saveload\savedel1.bmp",583,493:lsp 144,":a;majo\saveload\saveok1.bmp",356,493:lsp 145,":a/2,500,0;majo\saveload\select1.bmp",32,76 : goto *savebtnloop
;	if %121 == 2 lsp 141,":a;majo\saveload\cancel1.bmp",583,545:lsp 143,":a;majo\saveload\savedel1.bmp",583,493:lsp 142,":a;majo\saveload\loadok1.bmp",356,545:lsp 145,":a/2,500,0;majo\saveload\select1.bmp",32,76 : goto *loadbtnloop

goto *datetitlebackloop

;\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\
;Q[ɖ߂
*gameback

	for %199=0 to 150
		csp %199
	next

	btndef clear

	if %718 == 1 goto *rclkend
	if %718 == 2 goto *title




;\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\
;Ahx`[p[g
;Qu
*scenario2

	mov $100,"Q"

	for %199=19 to 34
		csp %199
	next

	bg black,14

	bgmfadeout 2500

	bgmstop

	wait 4000

	dwave 10,"wave\KeyboardC1.wav"
	bg "cutin\dai2kou\00.jpg",1
	wait 200

	dwave 10,"wave\KeyboardD1.wav"
	bg "cutin\dai2kou\01.jpg",1
	wait 100

	dwave 10,"wave\KeyboardD1.wav"
	bg "cutin\dai2kou\02.jpg",1
	wait 150

	dwave 10,"wave\KeyboardC1.wav"
	bg "cutin\dai2kou\03.jpg",1
	wait 150

	dwave 10,"wave\KeyboardC1.wav"
	bg "cutin\dai2kou\04.jpg",1
	wait 125

	dwave 10,"wave\KeyboardC1.wav"
	bg "cutin\dai2kou\05.jpg",1
	wait 300

	dwave 10,"wave\KeyboardD1.wav"
	bg "cutin\dai2kou\06.jpg",1
	wait 350


	dwave 10,"wave\KeyboardD1.wav"
	wait 450

	dwave 10,"wave\KeyboardC1.wav"
	bg "cutin\dai2kou\07.jpg",1
	wait 200

	dwave 10,"wave\KeyboardC1.wav"
	bg "cutin\dai2kou\08.jpg",1
	wait 300

	dwave 10,"wave\KeyboardC1.wav"
	bg "cutin\dai2kou\09.jpg",1
	wait 325

	dwave 10,"wave\KeyboardC1.wav"
	bg "cutin\dai2kou\10.jpg",1

	wait 3000

	bg black,0
	print 99,4000,"cascade.dll/dx"

	wait 2000

	bg "cutin\dai2kou\cut01.jpg",12

	wait 3000

	bg black,12

	wait 2000

	bgm "bgm\d16.mp3"

	lsp 1,":c;bg\dai2kou\saidan.jpg",0,0
	print 12

	wait 3000

	for %199=0 to 199
		gettimer %90
		msp 1,0,-3,0
		print 1
		waittimer (%90+32)
	next

	wait 2000

	csp 1

	bg "cutin\dai2kou\cut02.jpg",16

	wait 3000

	bg "cutin\dai2kou\cut03.jpg",16

	wait 3000

	bg "cutin\dai2kou\cut04.jpg",16

	wait 3000

	bg "cutin\dai2kou\cut05.jpg",16

	wait 3000

;wiFՒdij

	lsp 1,":c;bg\dai2kou\saidan.jpg",0,-600
	print 16

;EFCgQb
	wait 2000

;wiFՒdi㔼ֈړj
	for %199=0 to 199
		gettimer %90
		msp 1,0,3,0
		print 1
		waittimer (%90+32)
	next

	wait 2000

	csp 1
;wiFuQu@v
	bg "cutin\dai2kou\cut06.jpg",16

	wait 4000

	bg black,16
	bgmfadeout 2000
	bgmstop

	wait 3000

;ʉF`
	dwaveloop 1,"wave\SeaC11.wav"
;wiF`@ʏtF[h
	bg "bg\dai2kou\nagasaki.jpg",17

	wait 3000

;wiF`̑D@ʏtF[h
	bg "bg\dai2kou\minato.jpg",12

	wait 3000

;ʉ@ʂTO
	mov %61,50
	chvol 1,(%3002*%61/100)



;wiF̊Oρ@ʏtF[h
	bg "bg\dai2kou\ryou_gaikan.jpg",12

	wait 3000

	bg black,12
;ʉtF[hAEg
	for %199=0 to 50
	sub %61,1
	if %61 <= 0 mov %61,0
	chvol 1,(%3002*%61/100)
	next

	dwavestop 1
	mov %61,100
	chvol 1,(%3002*%61/100)

	wait 3000

;wiF̎iR̂Pj@㉺ɃtF[h
	bg "cutin\dai2kou\cut07.jpg",81

	wait 2000

	bg black,82

	wait 1000

;wiF̎iuj@㉺ɃtF[h
	bg "bg\dai2kou\ryou_heya_bure.jpg",81

	wait 3000

	setwindow 8,56,40,40,24,24,0,2,0,1,1,#888888,0,0,800,650
	texton

	mov $401,"C[㱗Iݘa嗈B"
	mov %130,401
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"ݘacc"
	mov $423,"cccccvցCݘaB"
	mov %120,402: mov %121,402:mov %122,24:gosub *messagefont
	mov %120,423: mov %121,423:mov %122,24:gosub *messagefont
	$402@/
	$423/
	add $402,$423/
	@

	mov $403,"琴I|\nӛΓߐYrB"
	mov %130,403
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"@@"
	mov $405,"茋ГIB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"{ݓߗIߘlsݗB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $407,"@@"
	mov $408,"ccsCޛEVIߗB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"CIl񗈓IJB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $410,"ݓߔVOCrNgC"
	mov $411,"ꉺCcȝE塁B"
	mov $412,"@"
	mov $413,"@"
	mov $414,"@"
	mov $415,"@"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	textoff

;ʉFS\S\c
	dwave 2,"wave\gasagasa01.wav"
	bg black,11

	wait 2000

;wiF̎iuj
	bg "bg\dai2kou\ryou_heya_bure.jpg",11

	wait 2000

;wiF̎
	bg "bg\dai2kou\ryou_heya.jpg",11

	wait 2000

	texton

	mov $401,"wxIeB"
	mov %120,401: mov %121,401:mov %122,24:gosub *messagefont
	$401@

	mov $402,"c誌`NՓዅB"
	mov %120,402: mov %121,402:mov %122,24:gosub *messagefont
	$402@

	mov $403,"ȑOds[ތC"
	mov $404,"AC桊˕s󎇊OQC"
	mov $405,"ݛExڎ󗹁B"
	mov %120,403: mov %121,405:mov %122,24:gosub *messagefont
	$403
	$404
	$405@

	mov $406,"@@"
	mov $407,"sC誌`NޔЗ@"
	mov $408,"ٖ@cʍʁB"
	mov %120,406: mov %121,408:mov %122,24:gosub *messagefont
	br
	$407
	$408@

	mov $409,"ʏClI˗LFC"
	mov $410,"pj侒˓I]B"
	mov %120,409: mov %121,410:mov %122,24:gosub *messagefont
	$409
	$410@

	mov $411,"RCIዅvLFfC"
	mov $412,"ٖ@KE˓I|xC"
	mov $413,"[xhI䊁B"
	mov %120,411: mov %121,413:mov %122,24:gosub *messagefont
	$411
	$412
	$413@

	mov $414,"w̜ޔCw㵖xC"
	mov $415,"RO誌`N{ٖ@j侜ޔЏvB"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	mov %120,414: mov %121,420:mov %122,24:gosub *messagefont
	$414
	$415\


	mov $401,"OCዅݝوӛΒEÁC"
	mov $402,"ܒvL@ݐŋNsݍWÁB"
	mov %120,401: mov %121,402:mov %122,24:gosub *messagefont
	$401
	$402@

	mov $403,"ܜދwዅk᫁xB"
	mov %120,403: mov %121,403:mov %122,24:gosub *messagefont
	$403@

	mov $404,"@@"
	mov $405,"wxAw㵖xAwዅk᫁xB"
	mov %120,404: mov %121,405:mov %122,24:gosub *messagefont
	br
	$405@

	mov $406,"CގOЏvC"
	mov $407,"I͍[ccܐρB"
	mov %120,406: mov %121,407:mov %122,24:gosub *messagefont
	$406
	$407@

	mov $408,"@@"
	mov $409,"ލsdlߗߗICsk^B"
	mov %120,408: mov %121,409:mov %122,24:gosub *messagefont
	br
	$409@

	mov $410,"ӌhCŜrI@kEƁC"
	mov $411,"As㐶aIƏܓI"
	mov $412,"甉䊴dsցB"
	mov %120,410: mov %121,412:mov %122,24:gosub *messagefont
	$410
	$411
	$412@

	mov $413,"ى䗈܁CޘEoNAϓIB"
	mov %120,413: mov %121,413:mov %122,24:gosub *messagefont
	$413@

	mov $414,"g͗LVC@ʓߐIԁCsuɋB"
	mov %120,414: mov %121,414:mov %122,24:gosub *messagefont
	$414@

	mov $415,"Clْ[o̔VC"
	mov $416,"R@ђnܜܓߍ甐luB"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	mov %120,415: mov %121,420:mov %122,24:gosub *messagefont
	$415
	$416\

	textoff

;wiFuIȈ݂قǁÂ͂ȂBv@Rb\Čɖ߂
	bg "cutin\dai2kou\cut08.jpg",12

	wait 3000

	bg "bg\dai2kou\ryou_heya.jpg",12

;ʉFK`co^ihAj
	dwave 2,"wave\DoorCloseA11.wav"

;wiF̎iuj@tF[hȂ
	bg "bg\dai2kou\ryou_heya_bure.jpg",1

	wait 2000

;aflFfree0552.mp3@iv[v
	bgm "bgm\free0552.mp3"
	wait 1000

;G\F@Eʏ@ʒuF
	ld l,":a;tatie\risa\risa_sihuku_tuujyou.bmp",12

	wait 3000

	texton

	mov $401,"uDCǈɁBv"
	mov %120,401: mov %121,401:mov %122,24:gosub *messagefont
	$401@

	mov $402,"@@"
	mov $403,"꘢O\dI[㱁CŗāB"
	mov %120,402: mov %121,403:mov %122,24:gosub *messagefont
	br
	$403@

	mov $404,"mᗜi΂肳jB"
	mov %120,404: mov %121,404:mov %122,24:gosub *messagefont
	$404@

	mov $405,"灈꘢ʓIgpҁB"
	mov $406,"ݜޘw@hq^䋤IFB"
	mov %120,405: mov %121,406:mov %122,24:gosub *messagefont
	$405
	$406@

	mov $407,"p{lCpp\lB"
	mov $408,"o_CА{Cpݔ띷ʑB"
	mov %120,407: mov %121,408:mov %122,24:gosub *messagefont
	$407
	$408@

	mov $409,"R\IpZ݉FBCƒv乓IwB"
	mov %120,409: mov %121,409:mov %122,24:gosub *messagefont
	$409@

	mov $410,"cc[ֈC\ʑO񓞓ߘnC"
	mov $411,"ERۉCu@ND@vB"
	mov $412,"@"
	mov $413,"@"
	mov $414,"@"
	mov $415,"@"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	mov %120,410: mov %121,420:mov %122,24:gosub *messagefont
	$410
	$411\

	textoff

;G\F@Eʏ@ʒuFE
	ld r,":a;tatie\sei\sei_tuujyou.bmp",12
	wait 2000

	texton

	mov $401,"uDCBv"
	mov %120,401: mov %121,401:mov %122,24:gosub *messagefont
	$401@

	mov $402,"@@"
	mov $403,"丗eC"
	mov $404,"p^xxISI欎㐺񗹋劖B"
	mov %120,402: mov %121,404:mov %122,24:gosub *messagefont
	br
	$403
	$404@

	mov $405,"DAߍDAuDC"
	mov $406,"FAuB"
	mov %120,405: mov %121,406:mov %122,24:gosub *messagefont
	$405
	$406@

	mov $407,"ݜޘw@CIQiB"
	mov $408,"gnlV㱁CŏĖ琥ŒxI孍B"
	mov %120,407: mov %121,408:mov %122,24:gosub *messagefont
	$407
	$408@

	mov $409,"cc^WB"
	mov $423,"ґRLrzCAss[ρB"
	mov %120,409: mov %121,409:mov %122,24:gosub *messagefont
	mov %120,423: mov %121,423:mov %122,24:gosub *messagefont
	$409@/
	$423/
	add $409,$423/
	@

	mov $410,"Cݜޘw@vL蕏ēssœI"
	mov $411,"veIl݁B"
	mov %120,410: mov %121,411:mov %122,24:gosub *messagefont
	$410
	$411@

	mov $412,"@@"
	mov $413,"u^ICߍ{sp艚vCǈɁB"
	mov %120,412: mov %121,413:mov %122,24:gosub *messagefont
	br
	$413@

	mov $414,"߉񗈏A\p㱁Cޓ_֒֓I藁Bv"
	mov %120,414: mov %121,414:mov %122,24:gosub *messagefont
	$414@

	mov $415,"@@"
	mov $416,"pыЎCCΒܓB"
	mov %120,415: mov %121,416:mov %122,24:gosub *messagefont
	br
	$416@

	mov $417,"\T竊竉JB"
	mov $418,"gu牕\œoC"
	mov $419,"\Ig̔یB"
	mov $420,"@"
	mov %120,417: mov %121,420:mov %122,24:gosub *messagefont
	$417
	$418
	$419\

	textoff

;G\F@E΁@ʒuF
	ld l,":a;tatie\risa\risa_sihuku_kusyou.bmp",12

	texton

	mov $401,"usC֐^_藁B"
	mov $402,"ojIߊSvv"
	mov %120,401: mov %121,402:mov %122,24:gosub *messagefont
	$401
	$402@

	mov $403,"@@"
	mov $404,"u]䋩ߘEHv"
	mov %120,403: mov %121,404:mov %122,24:gosub *messagefont
	br
	$404@

	mov $405,"@@"
	mov $406,"uCsߘӎvkBv"
	mov %120,405: mov %121,406:mov %122,24:gosub *messagefont
	br
	$406@

	mov $407,"@@"
	mov $408,"uEcc"
	mov $423,"VIVrρHv"
	mov %120,407: mov %121,408:mov %122,24:gosub *messagefont
	mov %120,423: mov %121,423:mov %122,24:gosub *messagefont
	br
	$408@/
	$423/
	add $408,$423/
	@

	mov $409,"@@"
	mov $410,"vLfCxAoB"
	mov %120,409: mov %121,410:mov %122,24:gosub *messagefont
	br
	$410@

	mov $411,"pȓIː\hᗹCs蓁B"
	mov $412,"@"
	mov $413,"@"
	mov $414,"@"
	mov $415,"@"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	mov %120,411: mov %121,420:mov %122,24:gosub *messagefont
	$411\

	textoff

;G\F@E΂@ʒuF
	ld l,":a;tatie\risa\risa_sihuku_warai.bmp",12

	textoff

	mov $401,"uuʍ荡VJ`"
	mov %120,401: mov %121,401:mov %122,24:gosub *messagefont
	$401@

	mov $402,"vϏAD藁B"
	mov $403,"ɁCV󖜗Cő[IVBv"
	mov %120,402: mov %121,403:mov %122,24:gosub *messagefont
	$402
	$403@

	mov $404,"@@"
	mov $405,"وʐl܁CАuIVJB"
	mov %120,404: mov %121,405:mov %122,24:gosub *messagefont
	br
	$405@

	mov $406,"AC٘˖vLFfA"
	mov $407,"ٌqI䗈܁C"
	mov $408,"ĐV|I}甐lÈȔEB"
	mov %120,406: mov %121,408:mov %122,24:gosub *messagefont
	$406
	$407
	$408@

	mov $409,"@@"
	mov $410,"uwFIx֐^CB"
	mov $411,"ݔ~JGECcʗZꉺDvB"
	mov %120,409: mov %121,411:mov %122,24:gosub *messagefont
	br
	$410
	$411@

	mov $412,"CǈɁCvpIhNEHv"
	mov %120,412: mov %121,412:mov %122,24:gosub *messagefont
	$412@

	mov $413,"@@"
	mov $414,"福lIC"
	mov $415,"sىēI}C"
	mov $416,"\َOh桜kSB"
	mov %120,413: mov %121,416:mov %122,24:gosub *messagefont
	br
	$414
	$415
	$416@

	mov $417,"@@"
	mov $418,"uE峗ȓIB"
	mov $419,"NޘC_yJBv"
	mov $420,"@"
	mov %120,417: mov %121,420:mov %122,24:gosub *messagefont
	br
	$418
	$419\

	textoff

;G\F@E@ʒuF
	ld l,":a;tatie\risa\risa_sihuku_odoroki.bmp",12

	texton

	mov $401,"uꉔIEruI"
	mov %120,401: mov %121,401:mov %122,24:gosub *messagefont
	QUAKE 20,200
	$401@


	mov $402,"ꉺI肏PߕIv"
	mov %120,402: mov %121,402:mov %122,24:gosub *messagefont
	$402@

;GF@tF[hȂŏ
	cl l,1
	QUAKE 20,200
;ʉF^b^b^b
	dwave 2,"wave\StepC11.wav"

	mov $403,"@@"
	mov $404,"FQQ茒nCnՁB"
	mov %120,403: mov %121,404:mov %122,24:gosub *messagefont
	br
	$404@

	mov $405,"\弉cgapg܁Cސ\I_VB"
	mov %120,405: mov %121,405:mov %122,24:gosub *messagefont
	$405@

	mov $406,"@@"
	mov $407,"ˑRCҊ橒I@qB"
	mov %120,406: mov %121,407:mov %122,24:gosub *messagefont
	br
	$407@

	mov $408,"|vusB"
	mov $409,"|s@܁C^Í@g̎UۏoIߔАuB"
	mov %120,408: mov %121,409:mov %122,24:gosub *messagefont
	$408
	$409@

	mov $410,"sCډvsW̊×"
	mov $411,"CiI丁CމsB"
	mov $412,"@"
	mov $413,"@"
	mov $414,"@"
	mov $415,"@"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	mov %120,410: mov %121,420:mov %122,24:gosub *messagefont
	$410
	$411\


	mov $401,"uCL_GBv"
	mov %120,401: mov %121,401:mov %122,24:gosub *messagefont
	$401@

	mov $402,"๘vsvG\Cō@֐\ҁB"
	mov %120,402: mov %121,402:mov %122,24:gosub *messagefont
	$402@

	mov $403,"sv@C⁗L^䷓IB"
	mov $404,"Cn\ICTAޘӎvJB"
	mov %120,403: mov %121,404:mov %122,24:gosub *messagefont
	$403
	$404@

	mov $405,"@@"
	mov $406,"݉ݓIC{fCIxB"
	mov %120,405: mov %121,406:mov %122,24:gosub *messagefont
	br
	$406@

	mov $407,"㱔VOC"
	mov $408,"[㱗vLCNqϔIiB"
	mov %120,407: mov %121,408:mov %122,24:gosub *messagefont
	$407
	$408@

	mov $409,"s[I@Css[I@B"
	mov %120,409: mov %121,409:mov %122,24:gosub *messagefont
	$409@

	mov $410,"ʓICsʓIB"
	mov %120,410: mov %121,410:mov %122,24:gosub *messagefont
	$410@

	mov $411,"BCFENNJB"
	mov $412,"Fލ헹ٕB"
	mov $413,"@"
	mov $414,"@"
	mov $415,"@"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	mov %120,411: mov %121,420:mov %122,24:gosub *messagefont
	$411
	$412\

	textoff

	bg black,12

	wait 3000

;wiF̐H@Vb^[tF[h
	bg "bg\dai2kou\syokudou.jpg",26

	wait 2000

	texton

	mov $401,"w漎I_BjBx"
	mov %120,401: mov %121,401:mov %122,24:gosub *messagefont
	$401@

	mov $402,"@@"
	mov $403,"߂V_PTBhqHh`I㱁B"
	mov %120,402: mov %121,403:mov %122,24:gosub *messagefont
	br
	$403@

	mov $404,"ʕA`C֗LʞfB"
	mov $405,"\ʁCaUȍlD\B"
	mov %120,404: mov %121,405:mov %122,24:gosub *messagefont
	$404
	$405@

	mov $406,"[܈C䐥hB"
	mov $407,"I݊UB"
	mov %120,406: mov %121,407:mov %122,24:gosub *messagefont
	$406
	$407@

	mov $408,"DsCʖsB"
	mov $409,"hZʁCAACn^ÓIC"
	mov $410,"ʕafhꍱCUEtB"
	mov %120,408: mov %121,410:mov %122,24:gosub *messagefont
	$408
	$409
	$410@

	mov $411,"\܁C趑hC趐Cu趏h"
	mov $412,"ccލːzI\HzB"
	mov $423,"sHa灓d@B"
	mov $413,"@"
	mov $414,"@"
	mov $415,"@"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	mov %120,411: mov %121,420:mov %122,24:gosub *messagefont
	mov %120,423: mov %121,423:mov %122,24:gosub *messagefont
	$411
	$412@/
	$423/
	add $412,$423/
	\


	mov $401,"uuǈɁChNꉺ@flEHvv"
	mov %120,401: mov %121,401:mov %122,24:gosub *messagefont
	$401@

	mov $402,"@@"
	mov $403,"ߓI苋C__C"
	mov $404,"cflIrqNh\B"
	mov %120,402: mov %121,404:mov %122,24:gosub *messagefont
	br
	$403
	$404@

	mov $405,"^ZH蓉Iߎ`sC"
	mov $406,"ݏhqh`au`I孍򐥁wiψÁxB"
	mov %120,405: mov %121,406:mov %122,24:gosub *messagefont
	$405
	$406@

	mov $407,"ܒ֎ZȔBC"
	mov $408,"Avc񍂈_ʁC"
	mov $409,"AZݏhqIVwB"
	mov %120,407: mov %121,409:mov %122,24:gosub *messagefont
	$407
	$408
	$409@

	mov $410,"gvLClsIB"
	mov %120,410: mov %121,410:mov %122,24:gosub *messagefont
	$410@

	mov $411,"r蕑Ř^svSCFLQ䵁C"
	mov $412,"s|kRnZޔПB"
	mov %120,411: mov %121,412:mov %122,24:gosub *messagefont
	$411
	$412@

	mov $413,"@@"
	mov $414,"nAenA丒np`_B"
	mov $415,"ލ丛fCh䎩gIꕔB"
	mov %120,413: mov %121,415:mov %122,24:gosub *messagefont
	br
	$414
	$415@

	mov $416,"䘸w蚁CYoIȁB"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	mov %120,416: mov %121,420:mov %122,24:gosub *messagefont
	$416\

	textoff

	bg black,12
	bgmfadeout 2000
	bgmstop

	delay 2000

;wiFuA̖]ގpɂȂ邽߂ɁBv
	bg "cutin\dai2kou\cut09.jpg",14
	delay 3000

	bg white,14

	delay 2000

;wiFV΂̍
	bg "bg\dai2kou\namikimichi.jpg",12
;aflFfree0257.mp3@iv[v
	bgm "bgm\free0257.mp3"

	wait 2000

	texton

	mov $401,"uțC֐u}`ōDhIv"
	mov %120,401: mov %121,401:mov %122,24:gosub *messagefont
	$401@

	mov $402,"@@"
	mov $403,"hqʉZqIKԗѓCssB"
	mov %120,402: mov %121,403:mov %122,24:gosub *messagefont
	br
	$403@

	mov $404,"qO甉F䴓b䲉ԉJIߍ䱖؁C"
	mov $405,"ݛESVy᳗B"
	mov %120,404: mov %121,405:mov %122,24:gosub *messagefont
	$404
	$405@

	mov $406,"svSіђIGE藁B"
	mov %120,406: mov %121,406:mov %122,24:gosub *messagefont
	$406@

	mov $407,"{I@sK܁C"
	mov $408,"H֓ӋrC"
	mov $409,"ۍܒVB"
	mov %120,407: mov %121,409:mov %122,24:gosub *messagefont
	$407
	$408
	$409@

	mov $410,"甉[̉ވ_IC"
	mov $411,"Aݐ݉Iccs\ݐݐZݎȓIԎVB"
	mov %120,410: mov %121,411:mov %122,24:gosub *messagefont
	$410
	$411@

	mov $412,"\ψ֓VHC"
	mov $413,"ÓEYNēVwߊ߈әXxIEH"
	mov $414,"ߌC\TEs㈓JB"
	mov %120,412: mov %121,414:mov %122,24:gosub *messagefont
	$412
	$413
	$414@

	mov $415,"sCޖ𕄍CNIIicc"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	mov %120,415: mov %121,420:mov %122,24:gosub *messagefont
	$415\

	textoff

;wiFV΂̍؁iuj
	bg "bg\dai2kou\namikimichi_bure.jpg",1
	delay 500

;G\F@Es@ʒuF
;G\F@iXqjEʏ@ʒuFE
	ld l,":a;tatie\risa\risa_human.bmp",0
	ld r,":a;tatie\sei\sei_bousi_tuujyou.bmp",12

	texton


	mov $401,"uAߎܒ|C֐ٖ@X㏁B"
	mov $402,"݁CߗLݙߘECǈɁHv"
	mov %120,401: mov %121,402:mov %122,24:gosub *messagefont
	$401
	$402@

	mov $403,"@@"
	mov $404,"ucc"
	mov $423,"SdіђGBv"
	mov %120,403: mov %121,404:mov %122,24:gosub *messagefont
	mov %120,423: mov %121,423:mov %122,24:gosub *messagefont
	br
	$404@/
	$423/
	add $404,$423/
	@

	mov $405,"@@"
	mov $406,"uCDIB"
	mov $407,"R@藁C܉ߘ}`ccv"
	mov %120,405: mov %121,407:mov %122,24:gosub *messagefont
	br
	$406
	$407@

	mov $408,"@@"
	mov $409,"ccƜωC\mĉՁB"
	mov %120,408: mov %121,409:mov %122,24:gosub *messagefont
	br
	$409@

	mov $410,"ґR܏nIsp܁C"
	mov $411,"AቺICEv~B"
	mov %120,410: mov %121,411:mov %122,24:gosub *messagefont
	$410
	$411@

	mov $412,"\ٖ^HC"
	mov $413,"dB"
	mov %120,412: mov %121,413:mov %122,24:gosub *messagefont
	$412
	$413@

	mov $414,"}`lʐD֐qʐnC"
	mov $415,"ى䗈܍{ُCcc"
	mov $416,"va@C\\֜ޘԎV"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	mov %120,414: mov %121,420:mov %122,24:gosub *messagefont
	$414
	$415
	$416\


	mov $401,"֓\INAarB"
	mov $402,"ŗŗINAarB"
	mov %120,401: mov %121,402:mov %122,24:gosub *messagefont
	$401
	$402@

	mov $403,"֗Lߎx㤋B"
	mov %120,403: mov %121,403:mov %122,24:gosub *messagefont
	$403@

	mov $404,"\reSӓIl"
	mov %120,404: mov %121,404:mov %122,24:gosub *messagefont
	$404@

	mov $405,"^甐l㏋^\s\㤋C"
	mov $406,"s\R֒cc"
	mov $407,"ޘvcc"
	mov $423,"ܓӒԁC\GIVˁB"
	mov %120,405: mov %121,407:mov %122,24:gosub *messagefont
	mov %120,423: mov %121,423:mov %122,24:gosub *messagefont
	$405
	$406
	$407@/
	$423/
	add $407,$423/
	@

	mov $408,"\Iӗ́CN"
	mov $409,"qlőSŒOl|B"
	mov %120,408: mov %121,409:mov %122,24:gosub *messagefont
	$408
	$409@

	mov $410,"CܔV\֊`CߛsݍŉB"
	mov %120,410: mov %121,410:mov %122,24:gosub *messagefont
	$410@

	mov $411,"FwZ\]IvC㤋Cʌ\ll\B"
	mov %120,411: mov %121,411:mov %122,24:gosub *messagefont
	$411@

	mov $412,"\O\XlړI݁B"
	mov %120,412: mov %121,412:mov %122,24:gosub *messagefont
	$412@

	mov $413,"@@"
	mov $414,"sccC^sIlcc"
	mov $415,"ґRsϏAcc"
	mov %120,413: mov %121,415:mov %122,24:gosub *messagefont
	br
	$414
	$415@

	mov $416,"@@"
	mov $417,"uFwCmᓯwCDIv"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	mov %120,416: mov %121,420:mov %122,24:gosub *messagefont
	br
	$417\

	textoff


;G\F@Eʏ@ʒuF
	ld l,":a;tatie\risa\risa_tuujyou.bmp",12

	textoff

	mov $401,"uDIv"
	mov $402,"uDIv"
	mov %120,401: mov %121,402:mov %122,24:gosub *messagefont
	$401
	$402@

	mov $403,"@@"
	mov $404,"aύZIFC"
	mov $405,"qlNݑŗāB"
	mov %120,403: mov %121,405:mov %122,24:gosub *messagefont
	br
	$404
	$405@

	mov $406,"FwCmᓯwB"
	mov $407,"ݜޏw@Cp̌ĐkFIB"
	mov %120,406: mov %121,407:mov %122,24:gosub *messagefont
	$406
	$407@

	mov $408,"FόݑwǈɁxAwxIlC"
	mov $409,"{vLB"
	mov %120,408: mov %121,409:mov %122,24:gosub *messagefont
	$408
	$409@

	mov $410,"sCݐ띷ʑIC"
	mov $411,"pIlVpݑ̌āB"
	mov %120,410: mov %121,411:mov %122,24:gosub *messagefont
	$410
	$411@

	mov $412,"vLdٓIRCA[\IFB"
	mov $413,"@"
	mov $414,"@"
	mov $415,"@"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	mov %120,412: mov %121,420:mov %122,24:gosub *messagefont
	$412\


	mov $401,"uuDYIXqcc藁Bvv"
	mov %120,401: mov %121,401:mov %122,24:gosub *messagefont
	$401@

	mov $402,"@@"
	mov $403,"Ch~命IˁC"
	mov $404,"ȋy桔ƎNՓIXqB"
	mov %120,402: mov %121,404:mov %122,24:gosub *messagefont
	br
	$403
	$404@

	mov $405,"LwOB"
	mov %120,405: mov %121,405:mov %122,24:gosub *messagefont
	$405@

	mov $406,"虐IʍECTlwINtJB"
	mov %120,406: mov %121,406:mov %122,24:gosub *messagefont
	$406@

	mov $407,"@@"
	mov $408,"uu漁Bvv"
	mov %120,407: mov %121,408:mov %122,24:gosub *messagefont
	br
	$408@

	mov $409,"@@"
	mov $410,"ʝٕ\n闹ދWIgC"
	mov $411,"wpΒڎ󗹁B"
	mov $412,"@"
	mov $413,"@"
	mov $414,"@"
	mov $415,"@"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	mov %120,409: mov %121,420:mov %122,24:gosub *messagefont
	br
	$410
	$411\

	textoff


;wiFؓƋij@tF[hC
	lsp 1,":c;bg\dai2kou\namikimichi_sora.jpg",0,-600

	print 17

	delay 1000

;wiFؓƋi㔼ֈړj
	for %199=0 to 199
		gettimer %90
		msp 1,0,3,0
		print 1
		waittimer (%90+16)
	next

	csp 1
	bg "bg\dai2kou\namikimichi_sora_u.jpg",12

	texton


	mov $401,"gCFGi݂jC"
	mov $402,"ICn܋NˍD藁H"
	mov %120,401: mov %121,402:mov %122,24:gosub *messagefont
	$401
	$402@

	mov $403,"@ߏFC䊳LЖCaIFaB"
	mov %120,403: mov %121,403:mov %122,24:gosub *messagefont
	$403@

	mov $404,"sC㞖RFfVOC"
	mov $405,"aʐlvLYrsC"
	mov $406,"ȉ䎩țs\CސЕacc"
	mov %120,404: mov %121,406:mov %122,24:gosub *messagefont
	$404
	$405
	$406@

	mov $407,"A݈wEsrœIB"
	mov %120,407: mov %121,407:mov %122,24:gosub *messagefont
	$407@

	mov $408,"VFf㞖RǁCSg䯎_䭊媐^B"
	mov $409,"ސ䏊aÍB"
	mov %120,408: mov %121,409:mov %122,24:gosub *messagefont
	$408
	$409@

	mov $410,"܁CݔaҒCIvZQdIB"
	mov %120,410: mov %121,410:mov %122,24:gosub *messagefont
	$410@

	mov $411,"@@"
	mov $412,"~IۘaˁB"
	mov $413,"RItoCEFB"
	mov %120,411: mov %121,413:mov %122,24:gosub *messagefont
	br
	$412
	$413@

	mov $414,"㐶GCޔЕaVIC"
	mov $415,"ٖ@B"
	mov %120,414: mov %121,415:mov %122,24:gosub *messagefont
	$414
	$415@

	mov $416,"sCvӔَOIqC"
	mov $417,"ȋy͕sIVCASvLYrVB"
	mov %120,416: mov %121,417:mov %122,24:gosub *messagefont
	$416
	$417@

	mov $418,"a۔Cccc"
	mov $419,"@w֐ЉCޘEs͌ЁB"
	mov $420,"@"
	mov %120,418: mov %121,420:mov %122,24:gosub *messagefont
	$418
	$419\


	mov $401,"XQdIVC^g̑CXIVݘSB"
	mov %120,401: mov %121,401:mov %122,24:gosub *messagefont
	$401@

	mov $402,"IOecc^ʐlӍݐsB"
	mov %120,402: mov %121,402:mov %122,24:gosub *messagefont
	$402@

	mov $403,"@@"
	mov $404,"Ip٘ȜϓIg̏o"
	mov $405,"[[IጔCamB"
	mov %120,403: mov %121,405:mov %122,24:gosub *messagefont
	br
	$404
	$405@

	mov $406,"C\B䐢㕁ʓIpXC"
	mov $407,"桉sIDSa[QB"
	mov %120,406: mov %121,407:mov %122,24:gosub *messagefont
	$406
	$407@

	mov $408,"MA꜁AꐫAB"
	mov $409,"@`@Cp营sS͗B"
	mov %120,408: mov %121,409:mov %122,24:gosub *messagefont
	$408
	$409@

	mov $410,"@ApʁC"
	mov $411,"r蕕ps\^uCC"
	mov $412,"\l~nSӐB"
	mov %120,410: mov %121,412:mov %122,24:gosub *messagefont
	$410
	$411
	$412@

	mov $413,"@@"
	mov $414,"p\܁C䐥VgB"
	mov %120,413: mov %121,414:mov %122,24:gosub *messagefont
	br
	$414@

	mov $415,"_\IdIwB"
	mov %120,415: mov %121,415:mov %122,24:gosub *messagefont
	$415@

	mov $416,"ȍˎ於CwGxC󎻐S擈ʑB"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	mov %120,416: mov %121,420:mov %122,24:gosub *messagefont
	$416\

	textoff

	csp 1
	bg black,12
	wait 2000

	textoff

	mov $401,"uvICޏwZC_ߓIB"
	mov %120,401: mov %121,401:mov %122,24:gosub *messagefont
	$401@

	mov $402,"ޗIwFsǍD擓I召FB"
	mov %120,402: mov %121,402:mov %122,24:gosub *messagefont
	$402@

	mov $403,"ĖsEϓIBv"
	mov %120,403: mov %121,403:mov %122,24:gosub *messagefont
	$403@

	mov $404,"@@"
	mov $405,"ǒpIC"
	mov $406,"גޏw@IjCߛEܔNOIB"
	mov %120,404: mov %121,406:mov %122,24:gosub *messagefont
	br
	$405
	$406@

	mov $407,"{a衉eFIcc"
	mov $408,"œCI@ʘVC"
	mov $409,"䊴\zB"
	mov $410,"@"
	mov $411,"@"
	mov $412,"@"
	mov $413,"@"
	mov $414,"@"
	mov $415,"@"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	mov %120,407: mov %121,420:mov %122,24:gosub *messagefont
	$407
	$408
	$409\

	textoff

;wiF@Vb^[tF[h
	bg "bg\dai2kou\kyousitu.jpg",26
	wait 3000

	texton

	mov $401,"uDBv"
	mov %120,401: mov %121,401:mov %122,24:gosub *messagefont
	$401@

	mov $402,"@@"
	mov $403,"ܒC"
	mov $404,"wFen闹IB"
	mov %120,402: mov %121,404:mov %122,24:gosub *messagefont
	br
	$403
	$404@

	mov $405,"sǉaqO\IlEC"
	mov $406,"IˑRێÁB"
	mov %120,405: mov %121,406:mov %122,24:gosub *messagefont
	$405
	$406@

	mov $407,"ÜiIB"
	mov $408,"Aw~IFB"
	mov $409,"@"
	mov $410,"@"
	mov $411,"@"
	mov $412,"@"
	mov $413,"@"
	mov $414,"@"
	mov $415,"@"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	mov %120,407: mov %121,420:mov %122,24:gosub *messagefont
	$407
	$408\


	mov $401,"Gw@B"
	mov %120,401: mov %121,401:mov %122,24:gosub *messagefont
	$401@

	mov $402,"wwӍsؐC"
	mov $403,"{Ő[IV勳jwZB"
	mov %120,402: mov %121,403:mov %122,24:gosub *messagefont
	$402
	$403@

	mov $404,"ޏwZjIvC"
	mov $405,"݉wVOAE}ZSNB"
	mov %120,404: mov %121,405:mov %122,24:gosub *messagefont
	$404
	$405@

	mov $406,"命wsj]IB"
	mov %120,406: mov %121,406:mov %122,24:gosub *messagefont
	$406@

	mov $407,"VOCLC]ȓIwq\|擓[뎧wI"
	mov $408,"cxTʉƒIXB"
	mov %120,407: mov %121,408:mov %122,24:gosub *messagefont
	$407
	$408@

	mov $409,"ҁCLꍱCۜޏw@C"
	mov $410,"ܕ\ޗwIXB"
	mov $411,"eFeϓIwsݜޏwZAׁB"
	mov %120,409: mov %121,411:mov %122,24:gosub *messagefont
	$409
	$410
	$411@

	mov $412,"@@"
	mov $413,"[ֈCIvc"
	mov $414,"CIÖ]wI^B"
	mov $415,"@"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	mov %120,412: mov %121,420:mov %122,24:gosub *messagefont
	br
	$413
	$414\


	mov $401,"wFwIResB"
	mov %120,401: mov %121,401:mov %122,24:gosub *messagefont
	$401@

	mov $402,"RC@IЏvCƓsZޏwZIC"
	mov $403,"\C\Fs咅LӖIZАB"
	mov %120,402: mov %121,403:mov %122,24:gosub *messagefont
	$402
	$403@

	mov $404,"{vLoI󌄁C"
	mov $405,"wFSgSnVÁA玉ҊwB"
	mov $406,"sn\FzIB"
	mov %120,404: mov %121,406:mov %122,24:gosub *messagefont
	$404
	$405
	$406@

	mov $407,"@@"
	mov $408,"ݜޏwZC"
	mov $409,"uCȕKlvwvϓIோ^"
	mov $410,"{vLwCYrvwm^B"
	mov %120,407: mov %121,410:mov %122,24:gosub *messagefont
	br
	$408
	$409
	$410@

	mov $411,"sC\{AvLlLϓI^B"
	mov %120,411: mov %121,411:mov %122,24:gosub *messagefont
	$411@

	mov $412,"QiIZCC|擐iIwB"
	mov %120,412: mov %121,412:mov %122,24:gosub *messagefont
	$412@

	mov $413,"wΗ^C擁C񏡎I͗ʌB"
	mov %120,413: mov %121,413:mov %122,24:gosub *messagefont
	$413@

	mov $414,"w@⁎hFIؓsӖ}C"
	mov $415,"FSÏÒnڎލ܁B"
	mov %120,414: mov %121,415:mov %122,24:gosub *messagefont
	$414
	$415@

	mov $416,"@@"
	mov $417,"wCvȐCix"
	mov %120,416: mov %121,417:mov %122,24:gosub *messagefont
	br
	$417@

	mov $418,"Fg"
	mov $419,"ssnOsB"
	mov $420,"@"
	mov %120,418: mov %121,420:mov %122,24:gosub *messagefont
	$418
	$419\

	windoweffect 1
	textoff
	windoweffect 10,500

	bgmfadeout 2000
	bgmstop

;ʉFwZ̃`Ci[vȂj
	dwave 2,"wave\chaim.wav"
	wait 2000

	texton

	mov $401,"ݏCkVOCS̊wE[塁B"
	mov $402,"vLlցCsÐÓҘV㝝B"
	mov %120,401: mov %121,402:mov %122,24:gosub *messagefont
	$401
	$402@

	mov $403,"ޖ琥CiLI丏C擁B"
	mov $404,"gwIw\ϓIEB"
	mov %120,403: mov %121,404:mov %122,24:gosub *messagefont
	$403
	$404@

	mov $405,"@@"
	mov $406,"sv@CʒNB"
	mov %120,405: mov %121,406:mov %122,24:gosub *messagefont
	br
	$406@

	mov $407,"FIǎCtVC"
	mov $408,"FwZCsIjVB"
	mov %120,407: mov %121,408:mov %122,24:gosub *messagefont
	$407
	$408@

	mov $409,"ĖڟΓϓIӁC"
	mov $410,"ےKdIs呖C"
	mov $411,"Ix՗I䫎mB"
	mov %120,409: mov %121,411:mov %122,24:gosub *messagefont
	$409
	$410
	$411@

	mov $412,"甐ls֑zCЉI֗LϓIl藁H"
	mov $413,"@"
	mov $414,"@"
	mov $415,"@"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	mov %120,412: mov %121,420:mov %122,24:gosub *messagefont
	$412\


	mov $401,"uNv"
	mov %120,401: mov %121,401:mov %122,24:gosub *messagefont
	$401@

	mov $402,"@@"
	mov $403,"V⋍ݝOc}C"
	mov $404,"ʐƎ筒I݋ЁB"
	mov %120,402: mov %121,404:mov %122,24:gosub *messagefont
	br
	$403
	$404@

	mov $405,"@@"
	mov $406,"uhv"
	mov %120,405: mov %121,406:mov %122,24:gosub *messagefont
	br
	$406@

	mov $407,"wVDIx"
	mov %120,407: mov %121,407:mov %122,24:gosub *messagefont
	$407@

	mov $408,"@@"
	mov $409,"u苍v"
	mov %120,408: mov %121,409:mov %122,24:gosub *messagefont
	br
	$409@

	mov $410,"@@"
	mov $411,"nÍ썤뎧B"
	mov %120,410: mov %121,411:mov %122,24:gosub *messagefont
	br
	$411@

	mov $412,"@wmCsύݍiqB"
	mov %120,412: mov %121,412:mov %122,24:gosub *messagefont
	$412@

	mov $413,"Cً֎~𔈐ڎB"
	mov $414,"nfێw𒼓IṕB"
	mov %120,413: mov %121,414:mov %122,24:gosub *messagefont
	$413
	$414@

	mov $415,"晐VIsCCٕsBB"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	mov %120,415: mov %121,420:mov %122,24:gosub *messagefont
	$415\


	mov $401,"CZIC"
	mov $402,"Cnks[ލQiI孒CA@AxB"
	mov %120,401: mov %121,402:mov %122,24:gosub *messagefont
	$401
	$402@

	mov $403,"ݓIԁCE\RϏ痹B"
	mov %120,403: mov %121,403:mov %122,24:gosub *messagefont
	$403@

	mov $404,"@@"
	mov $405,"uCn\Lsm[C"
	mov $406,"A߉蓏IB"
	mov %120,404: mov %121,406:mov %122,24:gosub *messagefont
	br
	$405
	$406@

	mov $407,"wvCȑzCIώqCȍCߋBvv"
	mov %120,407: mov %121,407:mov %122,24:gosub *messagefont
	$407@

	mov $408,"@@"
	mov $409,"@ʐ搶IދԖ݉I|CB"
	mov %120,408: mov %121,409:mov %122,24:gosub *messagefont
	br
	$409@

	mov $410,"ܔNOߓދC"
	mov $411,"u汗CSvӎvB"
	mov $412,"AݑL_𗹁B"
	mov $413,"@"
	mov $414,"@"
	mov $415,"@"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	mov %120,410: mov %121,420:mov %122,24:gosub *messagefont
	$410
	$411
	$412\

	windoweffect 1
	textoff

	bg black,15
;

;ʁFSd}iʏj

;EFCgQb

	mov %42,2
	gosub *sindenzu

	wait 2000

;

;ʉF`C
;wiF@ʏtF[h
	dwave 2,"wave\chaim.wav"
	bg "bg\dai2kou\kyousitu.jpg",12

	wait 5000

	bgm "bgm\free45.mp3"

	texton


	mov $401,"EC@Ix㱁B"
	mov %120,401: mov %121,401:mov %122,24:gosub *messagefont
	$401@

	mov $402,"vLdvÈPߕIrC"
	mov $403,"CdInC"
	mov $404,"p{{㱁B"
	mov %120,402: mov %121,404:mov %122,24:gosub *messagefont
	$402
	$403
	$404@

	mov $405,"䐳דI{ȗ䧑jj䎊IVCVޓIB"
	mov $406,"ސꕔʕѐ܁B"
	mov %120,405: mov %121,406:mov %122,24:gosub *messagefont
	$405
	$406@

	mov $407,"ߔN֔墐衉eB"
	mov $408,"ޕie\󓞓V勳ێhIhCCjԎVB"
	mov %120,407: mov %121,408:mov %122,24:gosub *messagefont
	$407
	$408@

	mov $409,"@@"
	mov $410,"Rݜޏw@wC"
	mov $411,"Rٗ^gIЊ悎B"
	mov %120,409: mov %121,411:mov %122,24:gosub *messagefont
	br
	$410
	$411@

	mov $412,"ޔАӓISCnׁC"
	mov $413,"AvzR@ʁB"
	mov %120,412: mov %121,413:mov %122,24:gosub *messagefont
	$412
	$413@

	mov $414,"@gIja̎dn抍݈NC"
	mov $415,"x茎hI`ʓWᗹeVC"
	mov $416,"甉䊮SݐZB"
	mov %120,414: mov %121,416:mov %122,24:gosub *messagefont
	$414
	$415
	$416@

	mov $417,"ϏdׁC\ESJB"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	mov %120,417: mov %121,420:mov %122,24:gosub *messagefont
	$417\


	mov $401,"原לޕiCsdgʏCmpFB"
	mov $402,"cc"
	mov %120,401: mov %121,402:mov %122,24:gosub *messagefont
	$401
	$402@

	mov $403,"cc"
	mov $423,"a䊳LϓIaB"
	mov %120,403: mov %121,403:mov %122,24:gosub *messagefont
	mov %120,423: mov %121,423:mov %122,24:gosub *messagefont
	$403@/
	$423/
	add $403,$423/
	@

	mov $404,"COeЉQC"
	mov $405,"틳@C\ϐ_B"
	mov %120,404: mov %121,405:mov %122,24:gosub *messagefont
	$404
	$405@

	mov $406,"u䐥HNBv"
	mov $407,"ݟBIiCܒC]VB"
	mov %120,406: mov %121,407:mov %122,24:gosub *messagefont
	$406
	$407@

	mov $408,"@@"
	mov $409,"ccaρB"
	mov %120,408: mov %121,409:mov %122,24:gosub *messagefont
	br
	$409@

	mov $410,"@@"
	mov $411,"ٖ@}ƓIwЉxC"
	mov $412,"ޏw@ICa@o䛁B"
	mov $413,"@"
	mov $414,"@"
	mov $415,"@"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	mov %120,410: mov %121,420:mov %122,24:gosub *messagefont
	br
	$411
	$412\


	mov $401,"命vClQߍ^ȊOesIlC"
	mov $402,"vr笛󔗊QFCvrp͗甑FB"
	mov %120,401: mov %121,402:mov %122,24:gosub *messagefont
	$401
	$402@

	mov $403,"ޑaҁCF\圃ϓIQcc"
	mov $404,"^䞓ߒijC䊴ĎhɁCÈȔEB"
	mov %120,403: mov %121,404:mov %122,24:gosub *messagefont
	$403
	$404@

	mov $405,"@@"
	mov $406,"ґRCޔЏǏȒwXC"
	mov $407,"A勎CߍˑRoIIw݌`xC"
	mov $408,"퓖싰IُہB"
	mov %120,405: mov %121,408:mov %122,24:gosub *messagefont
	br
	$406
	$407
	$408@

	mov $409,"Bl֖vy}ۓIˊC"
	mov $410,"AEIlC"
	mov $411,"ҝٖ@E󔗊Q\sB"
	mov $412,"@"
	mov $413,"@"
	mov $414,"@"
	mov $415,"@"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	mov %120,409: mov %121,420:mov %122,24:gosub *messagefont
	$409
	$410
	$411\


	mov $401,"݈ȏaSCIܒC"
	mov $402,"`qܖAśf툯QIaIiC"
	mov $403,"ғI^EʐIB"
	mov %120,401: mov %121,403:mov %122,24:gosub *messagefont
	$401
	$402
	$403@

	mov $404,"דޖ{ICLˍX엹"
	mov $405,"xʁB"
	mov %120,404: mov %121,405:mov %122,24:gosub *messagefont
	$404
	$405@

	mov $406,"ґR䐶AϓIǵC"
	mov $407,"AuȐ݈waM萓IC"
	mov $408,"ЍK^B"
	mov %120,406: mov %121,408:mov %122,24:gosub *messagefont
	$406
	$407
	$408@

	mov $409,"@@"
	mov $410,"@֗LXK^IIԁccفCAC"
	mov $411,"lڗLMޔА_B"
	mov %120,409: mov %121,411:mov %122,24:gosub *messagefont
	br
	$410
	$411@

	mov $412,"LCCaғߔЋʓIOeC"
	mov $413,"LCMIُہB"
	mov %120,412: mov %121,413:mov %122,24:gosub *messagefont
	$412
	$413@

	mov $414,"݋A_ЁA^CaґFԋ~䕁C"
	mov $415,"cF򗘗pFߐ_IOeڐMB"
	mov %120,414: mov %121,415:mov %122,24:gosub *messagefont
	$414
	$415@

	mov $416,"BؑPCALB"
	mov $417,"ӈM~䕁B"
	mov %120,416: mov %121,417:mov %122,24:gosub *messagefont
	$416
	$417@

	mov $418,"g험pُCB"
	mov $419,"FTzv꘢\ÐInJB"
	mov %120,418: mov %121,419:mov %122,24:gosub *messagefont
	$418
	$419@

	mov $420,"ccAݓIρB"
	mov %120,420: mov %121,420:mov %122,24:gosub *messagefont
	$420\

	windoweffect 1
	textoff
	windoweffect 10,500
	bgmfadeout 1
	bgmstop
;ʉFUbimCYj
	dwave 10,"wave\noise01.wav"
;wiFuGet thee to a nunnery@sA򎛂ցBvRb\ɁAwi߂
	lsp 1,":c;cutin\dai2kou\cut10.jpg",0,0
	print 1
	wait 2000
	csp 1
	print 14

	texton


	mov $401,"uFCȒ^߈ꉺEHv"
	mov %120,401: mov %121,401:mov %122,24:gosub *messagefont
	$401@

;aflFfree0552.mp3@iv[v
	bgm "bgm\free0552.mp3"

	mov $402,"@@"
	mov $403,"ߓwIC䝫NB"
	mov %120,402: mov %121,403:mov %122,24:gosub *messagefont
	br
	$403@

	mov $404,"q⋍ݓߗB"
	mov %120,404: mov %121,404:mov %122,24:gosub *messagefont
	$404@

	mov $405,"꘢Lsl蓓IcCZۜk\IC"
	mov $406,"tʓ}B"
	mov $423,"cR@C"
	mov %120,405: mov %121,406:mov %122,24:gosub *messagefont
	mov %120,423: mov %121,423:mov %122,24:gosub *messagefont
	$405
	$406@/
	$423
	add $406,$423

	mov $407,"灈꘢p~F՝HNۓIwC"
	mov $408,"Ւn௓IC"
	mov $409,"C玐쓯wB"
	mov $410,"@"
	mov $411,"@"
	mov $412,"@"
	mov $413,"@"
	mov $414,"@"
	mov $415,"@"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	mov %120,407: mov %121,420:mov %122,24:gosub *messagefont
	$407
	$408
	$409\


	mov $401,"uccLYrEHv"
	mov %120,401: mov %121,401:mov %122,24:gosub *messagefont
	$401@

	mov $402,"@@"
	mov $403,"䍇㕶{Cْ\FB"
	mov %120,402: mov %121,403:mov %122,24:gosub *messagefont
	br
	$403@

	mov $404,"@ʐqlQܒԓIԁC"
	mov $405,"a玉gIJB"
	mov %120,404: mov %121,405:mov %122,24:gosub *messagefont
	$404
	$405@

	mov $406,"@@"
	mov $407,"uVw@LEHv"
	mov %120,406: mov %121,407:mov %122,24:gosub *messagefont
	br
	$407@

	mov $408,"@@"
	mov $409,"uBv"
	mov %120,408: mov %121,409:mov %122,24:gosub *messagefont
	br
	$409@

	mov $410,"@@"
	mov $411,"ىWI񓚁C\FI\pꉺqNB"
	mov %120,410: mov %121,411:mov %122,24:gosub *messagefont
	br
	$411@

	mov $412,"@@"
	mov $413,"u@ʉȓIԁCzΖZVIuw܁vBv"
	mov %120,412: mov %121,413:mov %122,24:gosub *messagefont
	br
	$413@

	mov $414,"@@"
	mov $415,"uގ䔓FǞ጗Cscc@"
	mov $416,"ʐwDLs\Bv"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	mov %120,414: mov %121,420:mov %122,24:gosub *messagefont
	br
	$415
	$416\


	mov $401,"}wa쓯w֒ܒB"
	mov %120,401: mov %121,401:mov %122,24:gosub *messagefont
	$401@

	mov $402,"CIww܁xCww@ݘGRNtNt"
	mov $403,"FAG̈ȋyTI专eB"
	mov %120,402: mov %121,403:mov %122,24:gosub *messagefont
	$402
	$403@

	mov $404,"ލeґRCC"
	mov $405,"ACXLIwCIjC荊OI㱁B"
	mov %120,404: mov %121,405:mov %122,24:gosub *messagefont
	$404
	$405@

	mov $406,"oȐRIB"
	mov $407,"݈NtIQ{C"
	mov $408,"uaCV_IܕsCLАVC"
	mov $409,"֒s֓IB"
	mov %120,406: mov %121,409:mov %122,24:gosub *messagefont
	$406
	$407
	$408
	$409@

	mov $410,"@@"
	mov $411,"SCwHIRNteǓIǈϑF"
	mov $412,"䔗ጓIB"
	mov %120,410: mov %121,412:mov %122,24:gosub *messagefont
	br
	$411
	$412@

	mov $413,"ގ䔓FǗC"
	mov $414,"ARVʐw㞐ȁC"
	mov $415,"ȎvQl֑ccTArJB"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	mov %120,413: mov %121,420:mov %122,24:gosub *messagefont
	$413
	$414
	$415\


	mov $401,"sCCYrvQ"
	mov $402,"WَIl藁H"
	mov %120,401: mov %121,402:mov %122,24:gosub *messagefont
	$401
	$402@

	mov $403,"XЌ_CXޔЎIwC"
	mov $404,"֗LkٛB"
	mov %120,403: mov %121,404:mov %122,24:gosub *messagefont
	$403
	$404@

	mov $405,"@@"
	mov $406,"u甗ssEHv"
	mov %120,405: mov %121,406:mov %122,24:gosub *messagefont
	br
	$406@

	mov $407,"@@"
	mov $408,"umDZ㤋Iccv"
	mov %120,407: mov %121,408:mov %122,24:gosub *messagefont
	br
	$408@

	mov $409,"@@"
	mov $410,"ul藁Hv"
	mov %120,409: mov %121,410:mov %122,24:gosub *messagefont
	br
	$410@

	mov $411,"@@"
	mov $412,"uґRL{Iwcc"
	mov %120,411: mov %121,412:mov %122,24:gosub *messagefont
	br
	$412@

	mov $413,"ACޔЎ֐z`w䇉ԓINx藁Bv"
	mov %120,413: mov %121,413:mov %122,24:gosub *messagefont
	$413@

	mov $414,"@@"
	mov $415,"@ccr񎖛B"
	mov %120,414: mov %121,415:mov %122,24:gosub *messagefont
	br
	$415@

	mov $416,"ґR܏oL_Q㵁C"
	mov $417,"A݊w@֎ZlB"
	mov %120,416: mov %121,417:mov %122,24:gosub *messagefont
	$416
	$417@

	mov $418,"\FTz؉ICzXlQwJB"
	mov $419,"@"
	mov $420,"@"
	mov %120,418: mov %121,420:mov %122,24:gosub *messagefont
	$418\

	textoff

	bg black,14

	texton


	mov $401,"ܔNOCC餕ʎЉC"
	mov $402,"䔫ޏw@B"
	mov %120,401: mov %121,402:mov %122,24:gosub *messagefont
	$401
	$402@

	mov $403,"}ډIs[mDcc"
	mov %120,403: mov %121,403:mov %122,24:gosub *messagefont
	$403@

	mov $404,"RB"
	mov %120,404: mov %121,404:mov %122,24:gosub *messagefont
	$404@

	mov $405,"\Elቐ_ϝCw@ސގgC"
	mov $406,"rL󒼐ڔ^mœIC"
	mov $407,"ݜޗCRwVgxρB"
	mov %120,405: mov %121,407:mov %122,24:gosub *messagefont
	$405
	$406
	$407@

	mov $408,"ދ\l܁umSvIǵC"
	mov $409,"ޑoݏ퓧IˁC̍u䲁vB"
	mov %120,408: mov %121,409:mov %122,24:gosub *messagefont
	$408
	$409@

	mov $410,"@@"
	mov $411,"ss[ϓIhB"
	mov $423,"s@܁C䊴悁B"
	mov %120,410: mov %121,411:mov %122,24:gosub *messagefont
	mov %120,423: mov %121,423:mov %122,24:gosub *messagefont
	br
	$411@/
	$423/
	add $411,$423/
	@

	mov $412,"rIC"
	mov $413,"ޏw@䧗B"
	mov %120,412: mov %121,413:mov %122,24:gosub *messagefont
	$412
	$413@

	mov $414,"CޛóC"
	mov $415,"Ɛ^Sn蓉B"
	mov %120,414: mov %121,415:mov %122,24:gosub *messagefont
	$414
	$415@

	mov $416,"EdّB"
	mov %120,416: mov %121,416:mov %122,24:gosub *messagefont
	$416@

	mov $417,"rsm֔\ĚYrB"
	mov %120,417: mov %121,417:mov %122,24:gosub *messagefont
	$417@

	mov $418,"ُ@I߁Cȋyޏw@ccێSnB"
	mov $419,"@"
	mov $420,"@"
	mov %120,418: mov %121,420:mov %122,24:gosub *messagefont
	$418\


	mov $401,"sCI֖vLݜroB"
	mov %120,401: mov %121,401:mov %122,24:gosub *messagefont
	$401@

	mov $402,"{iAICko݌덇C"
	mov $403,"ݜψÒnxB"
	mov %120,402: mov %121,403:mov %122,24:gosub *messagefont
	$402
	$403@

	mov $404,"w@C⁌܁uwLr꘢wv߁B"
	mov $405,"◯ݜޘxB"
	mov %120,404: mov %121,405:mov %122,24:gosub *messagefont
	$404
	$405@

	mov $406,"@@"
	mov $407,"vې݋NItVB"
	mov %120,406: mov %121,407:mov %122,24:gosub *messagefont
	br
	$407@

	mov $408,"wwZhq@C"
	mov $409,"ʘ띷ISFC"
	mov $410,"䐥ߒՒ䓞r竁B"
	mov %120,408: mov %121,410:mov %122,24:gosub *messagefont
	$408
	$409
	$410@

	mov $411,"CNPTI[Ɗ쐗C"
	mov $412,"ĉFbsʓkC"
	mov $413,"kAl㈏ZacB"
	mov %120,411: mov %121,413:mov %122,24:gosub *messagefont
	$411
	$412
	$413@

	mov $414,"FꉺqNC`FIlzzClvB"
	mov %120,414: mov %121,414:mov %122,24:gosub *messagefont
	$414@

	mov $415,"䋎㤋CysosB"
	mov %120,415: mov %121,415:mov %122,24:gosub *messagefont
	$415@

	mov $416,"r֗LlCǐFC"
	mov $417,"ӘאhqB"
	mov %120,416: mov %121,417:mov %122,24:gosub *messagefont
	$416
	$417@

	mov $418,"L䈽ƕГIZ惁C"
	mov $419,"܈Iʖ䕽摽sB"
	mov $420,"䐥kȈB"
	mov %120,418: mov %121,420:mov %122,24:gosub *messagefont
	$418
	$419
	$420\


	mov $401,"A݋IҋB"
	mov %120,401: mov %121,401:mov %122,24:gosub *messagefont
	$401@

	mov $402,"ccClތC|ss[B"
	mov %120,402: mov %121,402:mov %122,24:gosub *messagefont
	$402@

	mov $403,"ACݏlEߓV{ǓwII"
	mov $404,"֐^L_ٌٗB"
	mov %120,403: mov %121,404:mov %122,24:gosub *messagefont
	$403
	$404@

	mov $405,"@@"
	mov $406,"C琥B"
	mov %120,405: mov %121,406:mov %122,24:gosub *messagefont
	br
	$406@

	mov $407,"Cސ꘢{vLjIFC"
	mov $408,"zvcI͑h^lIޔЗ~]"
	mov $409,"gCޔАSss\B"
	mov %120,407: mov %121,409:mov %122,24:gosub *messagefont
	$407
	$408
	$409@

	mov $410,"ss\CAcc"
	mov $411,"IlCS֐펣乛B"
	mov %120,410: mov %121,411:mov %122,24:gosub *messagefont
	$410
	$411@

	mov $412,"Xv꘢@C"
	mov $413,"FlEIWÁB"
	mov $414,"@"
	mov $415,"@"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	mov %120,412: mov %121,420:mov %122,24:gosub *messagefont
	$412
	$413\

	textoff

;wiFAll@ʏtF[h
	bg "bg\dai2kou\anemone.jpg",12

	delay 2000

	texton


	mov $401,"uމs_SIi藁B"
	mov %120,401: mov %121,401:mov %122,24:gosub *messagefont
	$401@

	mov $402,"pԉsXD_H"
	mov $403,"܁CǈɓIԁC~I䇉ԍߗBv"
	mov %120,402: mov %121,403:mov %122,24:gosub *messagefont
	$402
	$403@

	mov $404,"ߗIԁCcI͑IwF"
	mov $405,"lxF䇉ԁB"
	mov %120,404: mov %121,405:mov %122,24:gosub *messagefont
	$404
	$405@

	mov $406,"Bʏoӗn蓌}B"
	mov %120,406: mov %121,406:mov %122,24:gosub *messagefont
	$406@

	mov $407,"@܁C"
	mov $408,"䇉ԓIge~НىɁfAeɋfAeҁfB"
	mov %120,407: mov %121,408:mov %122,24:gosub *messagefont
	$407
	$408@

	mov $409,"Caw܁C"
	mov $410,"wޏAL_䲗B"
	mov %120,409: mov %121,410:mov %122,24:gosub *messagefont
	$409
	$410@

	mov $411,"މVLI召wZB"
	mov $412,"@ʌuԐ֋XI@CߏA֓֗B"
	mov %120,411: mov %121,412:mov %122,24:gosub *messagefont
	$411
	$412@

	mov $413,"NʁC䆗LӖI֗v򓾑B"
	mov %120,413: mov %121,413:mov %122,24:gosub *messagefont
	$413@

	mov $414,"@@"
	mov $415,"{CI͓IFlEB"
	mov %120,414: mov %121,415:mov %122,24:gosub *messagefont
	br
	$415@

	mov $416,"RCCFICIlXΏ䄖C"
	mov $417,"r֔튥㗹Yr"
	mov $418,"䇉ԏύI̍B"
	mov %120,416: mov %121,418:mov %122,24:gosub *messagefont
	$416
	$417
	$418@

	mov $419,"@@"
	mov $420,"u݁CFC`k`v"
	mov %120,419: mov %121,420:mov %122,24:gosub *messagefont
	br
	$420\

	textoff

;wiF@Vb^[tF[h
	bg "bg\dai2kou\kyousitu.jpg",25

	texton


	mov $401,"ŁC}pωI"
	mov $402,"ىۋNҗÚB"
	mov %120,401: mov %121,402:mov %122,24:gosub *messagefont
	$401
	$402@

	mov $403,"ґR䎩\CiZs㑽raPC"
	mov $404,"Av⍓ߔВnsC"
	mov $405,"XvC䍪{AvzρB"
	mov %120,403: mov %121,405:mov %122,24:gosub *messagefont
	$403
	$404
	$405@

	mov $406,"ψc苋IԁC{v@笛B"
	mov %120,406: mov %121,406:mov %122,24:gosub *messagefont
	$406@

	mov $407,"@@"
	mov $408,"uDJcc䓚ߗBv"
	mov %120,407: mov %121,408:mov %122,24:gosub *messagefont
	br
	$408@

	mov $409,"@@"
	mov $410,"ssÒnCӗB"
	mov %120,409: mov %121,410:mov %122,24:gosub *messagefont
	br
	$410@

	mov $411,"@@"
	mov $412,"u`Iv"
	mov %120,411: mov %121,412:mov %122,24:gosub *messagefont
	br
	$412@

	mov $413,"@@"
	mov $414,"ukIv"
	mov %120,413: mov %121,414:mov %122,24:gosub *messagefont
	br
	$414@

	mov $415,"@@"
	mov $416,"}o݋OCFꉺB"
	mov $417,"Β__B"
	mov %120,415: mov %121,417:mov %122,24:gosub *messagefont
	br
	$416
	$417@

	mov $418,"×^ÁC^iIqlB"
	mov $419,"@"
	mov $420,"@"
	mov %120,418: mov %121,420:mov %122,24:gosub *messagefont
	$418\

	textoff

	bgmfadeout 2000
	bgmstop

;wiFiuj@tF[hȂ
	bg "bg\dai2kou\kyousitu_bure.jpg",1
	delay 1000

;G\Fb؁@ʏ@ʒuF
;G\FE@ʏ@ʒuFE
	ld r,":a;tatie\sei\sei_tuujyou.bmp",0
	ld l,":a;tatie\erika\erika_tuujyou.bmp",12

	delay 3000

	texton


	mov $401,"uuߑFCsvŞGCJBvv"
	mov %120,401: mov %121,401:mov %122,24:gosub *messagefont
	$401@

	mov $402,"@@"
	mov $403,"IkNB"
	mov %120,402: mov %121,403:mov %122,24:gosub *messagefont
	br
	$403@

	mov $404,"CʓIgpC[I܊B"
	mov $405,"IoƗ|̓IiB"
	mov %120,404: mov %121,405:mov %122,24:gosub *messagefont
	$404
	$405@

	mov $406,"BB"
	mov $407,"FǓIʁB"
	mov %120,406: mov %121,407:mov %122,24:gosub *messagefont
	$406
	$407@

	mov $408,"@Yrs\擾U됬aI\C"
	mov $409,"ǗߐlڑœI݁B"
	mov %120,408: mov %121,409:mov %122,24:gosub *messagefont
	$408
	$409@

	mov $410,"@@"
	mov $411,"uuCwB"
	mov %120,410: mov %121,411:mov %122,24:gosub *messagefont
	br
	$411@

	mov $412,"VIw܁C"
	mov $413,"ܐFw֏oBv"
	mov %120,412: mov %121,413:mov %122,24:gosub *messagefont
	$412
	$413@

	mov $414,"@@"
	mov $415,"uFwHv"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	mov %120,414: mov %121,420:mov %122,24:gosub *messagefont
	br
	$415\


	mov $401,"I˗B"
	mov %120,401: mov %121,401:mov %122,24:gosub *messagefont
	$401@

	mov $402,"SCJތC\ÓLYrsxEH"
	mov %120,402: mov %121,402:mov %122,24:gosub *messagefont
	$402@

	mov $403,"@@"
	mov $404,"u鴁c"
	mov %120,403: mov %121,404:mov %122,24:gosub *messagefont
	br
	$404@

	mov $405,"CIw䇉ԓINxC"
	mov $406,"^SZLIl藁B"
	mov %120,405: mov %121,406:mov %122,24:gosub *messagefont
	$405
	$406@

	mov $407,"ZCAJB"
	mov $408,"R։oC"
	mov $409,"cKvd݊wwʑOǗcGBv"
	mov $410,"@"
	mov $411,"@"
	mov $412,"@"
	mov $413,"@"
	mov $414,"@"
	mov $415,"@"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	mov %120,407: mov %121,420:mov %122,24:gosub *messagefont
	$407
	$408
	$409\

	textoff

	cl l,12
	delay 1000
	texton


	mov $401,"\磉ޔԒԍ@C"
	mov $402,"w։񓞗ȓIʁB"
	mov %120,401: mov %121,402:mov %122,24:gosub *messagefont
	$401
	$402@

	mov $403,"@@"
	mov $404,"ucccv"
	mov %120,403: mov %121,404:mov %122,24:gosub *messagefont
	br
	$404@

	mov $405,"@@"
	mov $406,"ޏA`dlLIߓxEH"
	mov %120,405: mov %121,406:mov %122,24:gosub *messagefont
	br
	$406@

	mov $407,"ܓC@ʒSSJ甐lcIԁC"
	mov $408,"ߏAd㞐ȕsADB"
	mov %120,407: mov %121,408:mov %122,24:gosub *messagefont
	$407
	$408@

	mov $409,"@@"
	mov $410,"nVIweB"
	mov %120,409: mov %121,410:mov %122,24:gosub *messagefont
	br
	$410@

	mov $411,"}a葫ّ[nsm@فC"
	mov $412,"rߓFْԓI{wC"
	mov $413,"ݏnސގgB"
	mov $414,"@"
	mov $415,"@"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	mov %120,411: mov %121,420:mov %122,24:gosub *messagefont
	$411
	$412
	$413\

	textoff


;G\FE@ʏ@ʒuF
	ld l,":a;tatie\risa\risa_tuujyou.bmp",12
	delay 1000

	texton

	mov $401,"uuVIvv"
	mov %120,401: mov %121,401:mov %122,24:gosub *messagefont
	$401@

	mov $402,"@@"
	mov $403,"꘢[x͓IŔj}IB"
	mov %120,402: mov %121,403:mov %122,24:gosub *messagefont
	br
	$403@

	mov $404,"QZtIC"
	mov $405,"⋒IwF蕖ZʁB"
	mov %120,404: mov %121,405:mov %122,24:gosub *messagefont
	$404
	$405@

	mov $406,"@@"
	mov $407,"uuāCZz㗹B"
	mov %120,406: mov %121,407:mov %122,24:gosub *messagefont
	br
	$407@

	mov $408,"ˍݎÚS}ߙXxC"
	mov $409,"BʊS^㱁Bvv"
	mov %120,408: mov %121,409:mov %122,24:gosub *messagefont
	$408
	$409@

	mov $410,"@@"
	mov $411,"ܒCv\oam㈖{C"
	mov $412,"[[n݉IB"
	mov %120,410: mov %121,412:mov %122,24:gosub *messagefont
	br
	$411
	$412@

	mov $413,"Ss{bO֙ZtIώqC"
	mov $414,"\nRꕛeIiρB"
	mov $415,"@"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	mov %120,413: mov %121,420:mov %122,24:gosub *messagefont
	$413
	$414\


	mov $401,"u^Dcc䐥rBv"
	mov %120,401: mov %121,401:mov %122,24:gosub *messagefont
	$401@

	mov $402,"@@"
	mov $403,"uޏAvB"
	mov $423,"܁CǈɁv"
	mov %120,402: mov %121,403:mov %122,24:gosub *messagefont
	mov %120,423: mov %121,423:mov %122,24:gosub *messagefont
	br
	$403@/
	$423/
	add $403,$423/
	@

	mov $404,"@@"
	mov $405,"uccYrHv"
	mov %120,404: mov %121,405:mov %122,24:gosub *messagefont
	br
	$405@

	mov $406,"@@"
	mov $407,"uېYrHv"
	mov %120,406: mov %121,407:mov %122,24:gosub *messagefont
	br
	$407@

	mov $408,"@@"
	mov $409,"uvYrBv"
	mov %120,408: mov %121,409:mov %122,24:gosub *messagefont
	br
	$409@

	mov $410,"@@"
	mov $411,"usʍc㗹Bv"
	mov %120,410: mov %121,411:mov %122,24:gosub *messagefont
	br
	$411@

	mov $412,"@@"
	mov $413,"ucccv"
	mov %120,412: mov %121,413:mov %122,24:gosub *messagefont
	br
	$413@

	mov $414,"@@"
	mov $415,"揁cc"
	mov %120,414: mov %121,415:mov %122,24:gosub *messagefont
	br
	$415@

	mov $416,"SIFCYrsœdccEH"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	mov %120,416: mov %121,420:mov %122,24:gosub *messagefont
	$416\

	textoff

;ʉFwZ̃`C@[vȂ
	dwave 2,"wave\chaim.wav"

	bg black,16

	delay 4000

	bgm "bgm\free45.mp3"

;wiFՒdi㔼j
;EFCgRb
;wiFՒdiֈړj
;EFCgRb
	lsp 1,":c;bg\dai2kou\saidan.jpg",0,0
	print 12

	wait 2000

	for %199=0 to 199
		gettimer %90
		msp 1,0,-3,0
		print 1
		waittimer (%90+32)
	next

	wait 2000

;wiF@ʏtF[h
	csp 1
	bg "bg\dai2kou\seidou.jpg",12

	delay 3000

	texton


	mov $401,"uDC֎qIv"
	mov %120,401: mov %121,401:mov %122,24:gosub *messagefont
	$401@

;ʉFJVbiJ̃Vb^[j
	dwave 10,"system\saveload\se-033.wav"
;ʔtbV
	drawfill 255,255,255 : draw
	wait 50 : repaint

	mov $402,"@@"
	mov $403,"uDC茕s֓IƕЗB"
	mov $404,"FCV^ߗBv"
	mov %120,402: mov %121,404:mov %122,24:gosub *messagefont
	br
	$403
	$404@

	mov $405,"@@"
	mov $406,"uvYrCs瀈ccv"
	mov %120,405: mov %121,406:mov %122,24:gosub *messagefont
	br
	$406@

	mov $407,"@@"
	mov $408,"u\ڏWrlCޛEkIBv"
	mov %120,407: mov %121,408:mov %122,24:gosub *messagefont
	br
	$408@

	mov $409,"@@"
	mov $410,"qʈ玊ŋNxӁB"
	mov %120,409: mov %121,410:mov %122,24:gosub *messagefont
	br
	$410@

	mov $411,"w@C㱗ߎl_l\B"
	mov $412,"`Iww܁xE[BB"
	mov %120,411: mov %121,412:mov %122,24:gosub *messagefont
	$411
	$412@

	mov $413,"smICIC"
	mov $414,"ڏW嗈IV嗹\lB"
	mov %120,413: mov %121,414:mov %122,24:gosub *messagefont
	$413
	$414@

	mov $415,"ܕL\{lC"
	mov $416,"ގlIܓZ{B"
	mov %120,415: mov %121,416:mov %122,24:gosub *messagefont
	$415
	$416@

	mov $417,"cccB"
	mov %120,417: mov %121,417:mov %122,24:gosub *messagefont
	$417@

	mov $418,"uQIlD֍NtC"
	mov $419,"s֐vFJB"
	mov $420,"@"
	mov %120,418: mov %121,420:mov %122,24:gosub *messagefont
	$418
	$419\


	mov $401,"uwܓIwRcGUxꔼȏC"
	mov $402,"wq@֔\FޔʁC^H㥛Bv"
	mov %120,401: mov %121,402:mov %122,24:gosub *messagefont
	$401
	$402@

	mov $403,"u蕐VYs䂗CԎVm营ޘkIv"
	mov %120,403: mov %121,403:mov %122,24:gosub *messagefont
	$403@

	mov $404,"u茏ƕЁCv\hFŁCsp藁Hvv"
	mov %120,404: mov %121,404:mov %122,24:gosub *messagefont
	$404@

	mov $405,"@@"
	mov $406,"}悍ÈȕÁCckxÓI\C"
	mov $407,"䐘ܐwwyI"
	mov $408,"II䁑B"
	mov %120,405: mov %121,408:mov %122,24:gosub *messagefont
	br
	$406
	$407
	$408@

	mov $409,"@@"
	mov $410,"uu\r\^oȓIԏADccvv"
	mov %120,409: mov %121,410:mov %122,24:gosub *messagefont
	br
	$410@

	mov $411,"@@"
	mov $412,"ґRݔ΁CAΗeՒBfB"
	mov %120,411: mov %121,412:mov %122,24:gosub *messagefont
	br
	$412@

	mov $413,"ܐV勳wZC"
	mov $414,"AsLlsiٓIkB"
	mov %120,413: mov %121,414:mov %122,24:gosub *messagefont
	$413
	$414@

	mov $415,"VN_ЁCO~E_C"
	mov $416,"GEȏjGC[ߏ艐B"
	mov %120,415: mov %121,416:mov %122,24:gosub *messagefont
	$415
	$416@

	mov $417,"܎O_ЁC݋Cݎ@B"
	mov %120,417: mov %121,417:mov %122,24:gosub *messagefont
	$417@

	mov $418,"٘ϓI{l܁CwFxIGC"
	mov $419,"s吥SV訓InB"
	mov $420,"@"
	mov %120,418: mov %121,420:mov %122,24:gosub *messagefont
	$418
	$419\


	mov $401,"u^ICӗJB"
	mov $402,"RρC֕s@蕎Ea蓟ENDD藁C"
	mov $403,"ޔВnAsʁBv"
	mov %120,401: mov %121,403:mov %122,24:gosub *messagefont
	$401
	$402
	$403@

	mov $404,"u^IƛCޗBv"
	mov %120,404: mov %121,404:mov %122,24:gosub *messagefont
	$404@

	mov $405,"ܜޒԓIC"
	mov $406,"{ZB\LI띷ʑIkB"
	mov %120,405: mov %121,406:mov %122,24:gosub *messagefont
	$405
	$406@

	mov $407,"䍐G\{LI蓟Ewanݐ󑐁C"
	mov $408,"֐ݐĉwsC"
	mov $409,"\zdڗ𗹁B"
	mov $410,"@"
	mov $411,"@"
	mov $412,"@"
	mov $413,"@"
	mov $414,"@"
	mov $415,"@"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	mov %120,407: mov %121,420:mov %122,24:gosub *messagefont
	$407
	$408
	$409\


	mov $401,"uŋߖޑCIl藁B"
	mov %120,401: mov %121,401:mov %122,24:gosub *messagefont
	$401@

	mov $402,"ccs^lBv"
	mov %120,402: mov %121,402:mov %122,24:gosub *messagefont
	$402@

	mov $403,"@@"
	mov $404,"u}CߜlsܜޔВԉsDGB"
	mov $405,"uv`ccvv"
	mov %120,403: mov %121,405:mov %122,24:gosub *messagefont
	br
	$404
	$405@

	mov $406,"@@"
	mov $407,"uv`cv"
	mov %120,406: mov %121,407:mov %122,24:gosub *messagefont
	br
	$407@

	mov $408,"@@"
	mov $409,"qlCn@NB"
	mov %120,408: mov %121,409:mov %122,24:gosub *messagefont
	br
	$409@

	mov $410,"FIԒRC@꘢sIlJB"
	mov %120,410: mov %121,410:mov %122,24:gosub *messagefont
	$410@

	mov $411,"Tc"
	mov %120,411: mov %121,411:mov %122,24:gosub *messagefont
	$411@

	mov $412,"@@"
	mov $413,"uEHv"
	mov %120,412: mov %121,413:mov %122,24:gosub *messagefont
	br
	$413@

	mov $414,"@@"
	mov $415,"ucccIv"
	mov %120,414: mov %121,415:mov %122,24:gosub *messagefont
	br
	$415@

	mov $416,"@@"
	mov $417,"ŗȒB"
	mov %120,416: mov %121,417:mov %122,24:gosub *messagefont
	br
	$417@

	mov $418,"ˑRԁC"
	mov $419,"qlsIozI\B"
	mov $420,"@"
	mov %120,418: mov %121,420:mov %122,24:gosub *messagefont
	$418
	$419\


	mov $401,"uߒmIHv"
	mov %120,401: mov %121,401:mov %122,24:gosub *messagefont
	$401@

	mov $402,"@@"
	mov $403,"uR߁B"
	mov %120,402: mov %121,403:mov %122,24:gosub *messagefont
	br
	$403@

	mov $404,"\ߔАiIԁcv"
	mov %120,404: mov %121,404:mov %122,24:gosub *messagefont
	$404@

	mov $405,"@@"
	mov $406,"ucAρB"
	mov $407,"w蚍DC^Ök_C"
	mov $408,"AL_JciW|́B"
	mov %120,405: mov %121,408:mov %122,24:gosub *messagefont
	br
	$406
	$407
	$408@

	mov $409,"TVI召BJB"
	mov %120,409: mov %121,409:mov %122,24:gosub *messagefont
	$409@

	mov $410,"wܔNtCnA꒼ǓIC"
	mov $411,"ݓs֌u\D݊ŕsNcv"
	mov %120,410: mov %121,411:mov %122,24:gosub *messagefont
	$410
	$411@

	mov $412,"@@"
	mov $413,"}I\媈NB"
	mov %120,412: mov %121,413:mov %122,24:gosub *messagefont
	br
	$413@

	mov $414,"җCvL܏oےIԁB"
	mov %120,414: mov %121,414:mov %122,24:gosub *messagefont
	$414@

	mov $415,"@cŗ玖LshInB"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	mov %120,415: mov %121,420:mov %122,24:gosub *messagefont
	$415\

	bgmfadeout 1
	bgmstop


	mov $401,"u"
	mov $402,"甉FʕsADvHv"
	mov %120,401: mov %121,402:mov %122,24:gosub *messagefont
	$401
	$402@

	mov $403,"@@"
	mov $404,"ucccEHv"
	mov %120,403: mov %121,404:mov %122,24:gosub *messagefont
	br
	$404@

	mov $405,"@@"
	mov $406,"EsZB"
	mov %120,405: mov %121,406:mov %122,24:gosub *messagefont
	br
	$406@

	mov $407,"ґRSuk悁CAޖƗL_dJB"
	mov %120,407: mov %121,407:mov %122,24:gosub *messagefont
	$407@

	mov $408,"䐥ϗcC"
	mov $409,"˕|⋓OIlB"
	mov %120,408: mov %121,409:mov %122,24:gosub *messagefont
	$408
	$409@

	mov $410,"B\ؒCߏ΁C"
	mov $411,"AޔЎ֐UCDc"
	mov %120,410: mov %121,411:mov %122,24:gosub *messagefont
	$410
	$411@

	mov $412,"@@"
	mov $413,"u}Iv"
	mov %120,412: mov %121,413:mov %122,24:gosub *messagefont
	br
	$413@

	mov $414,"@@"
	mov $415,"cA֖݉vCICECn獐˗B"
	mov %120,414: mov %121,415:mov %122,24:gosub *messagefont
	br
	$415@

	mov $416,"扷_ÓI\C"
	mov $417,"ŗӍݝٖ@eEޔیB"
	mov %120,416: mov %121,417:mov %122,24:gosub *messagefont
	$416
	$417@

	mov $418,"@@"
	mov $419,"uCٕsNI"
	mov %120,418: mov %121,419:mov %122,24:gosub *messagefont
	br
	$419@

	mov $420,"ARܗߔВԁcIv"
	mov %120,420: mov %121,420:mov %122,24:gosub *messagefont
	$420\


	mov $401,"ucAvFJB"
	mov %120,401: mov %121,401:mov %122,24:gosub *messagefont
	$401@

	mov $402,"ޔВ֐d܏oߍXDBv"
	mov %120,402: mov %121,402:mov %122,24:gosub *messagefont
	$402@

	mov $403,"@@"
	mov $404,"]wFC@IGC"
	mov $405,"CލD֐B"
	mov %120,403: mov %121,405:mov %122,24:gosub *messagefont
	br
	$404
	$405@

	mov $406,"@@"
	mov $407,"uCccӓIcv"
	mov %120,406: mov %121,407:mov %122,24:gosub *messagefont
	br
	$407@

	mov $408,"@@"
	mov $409,"ucccv"
	mov %120,408: mov %121,409:mov %122,24:gosub *messagefont
	br
	$409@

	mov $410,"@@"
	mov $411,"IgsL_QЗc"
	mov $412,"}ቺŒnCҗB"
	mov %120,410: mov %121,412:mov %122,24:gosub *messagefont
	br
	$411
	$412@

	mov $413,"smڏYrԁB"
	mov %120,413: mov %121,413:mov %122,24:gosub *messagefont
	$413@

	mov $414,"˓ߔБww܁xB@ISꎔC"
	mov $415,"󟃍ݏdNC鈖vLCB"
	mov %120,414: mov %121,415:mov %122,24:gosub *messagefont
	$414
	$415@

	mov $416,"VIҁB"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	mov %120,416: mov %121,420:mov %122,24:gosub *messagefont
	$416\


	mov $401,"uߘcc"
	mov $423,"NtIwDsE񋎗C"
	mov %120,401: mov %121,401:mov %122,24:gosub *messagefont
	mov %120,423: mov %121,423:mov %122,24:gosub *messagefont
	$401@/
	$423
	add $401,$423

	mov $402,"FUJHv"
	mov %120,402: mov %121,402:mov %122,24:gosub *messagefont
	$402@

	mov $403,"@@"
	mov $404,"ŐŔjғIB"
	mov %120,403: mov %121,404:mov %122,24:gosub *messagefont
	br
	$404@

	mov $405,"ŋNÓI\C"
	mov $406,"ݜޔ\kDnB"
	mov %120,405: mov %121,406:mov %122,24:gosub *messagefont
	$405
	$406@

	mov $407,"@@"
	mov $408,"uBv"
	mov %120,407: mov %121,408:mov %122,24:gosub *messagefont
	br
	$408@

	mov $409,"@@"
	mov $410,"}__B"
	mov $411,"\IC_CqʈCnEyCB"
	mov %120,409: mov %121,411:mov %122,24:gosub *messagefont
	br
	$410
	$411@

	mov $412,"藁ccra藁H"
	mov %120,412: mov %121,412:mov %122,24:gosub *messagefont
	$412@

	mov $413,"IVßBN񋎁C"
	mov $414,"|sցB"
	mov $415,"@"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	mov %120,413: mov %121,420:mov %122,24:gosub *messagefont
	$413
	$414\


	mov $401,"uÓꎟGC֐đ҈Xccv"
	mov %120,401: mov %121,401:mov %122,24:gosub *messagefont
	$401@

	mov $402,"@@"
	mov $403,"uEcc߉FA摖Bv"
	mov %120,402: mov %121,403:mov %122,24:gosub *messagefont
	br
	$403@

	mov $404,"@@"
	mov $405,"uFCV^IߗBv"
	mov %120,404: mov %121,405:mov %122,24:gosub *messagefont
	br
	$405@

	mov $406,"@@"
	mov $407,"u@ʔ\ΏZCߐIAKBv"
	mov %120,406: mov %121,407:mov %122,24:gosub *messagefont
	br
	$407@

	mov $408,"@@"
	mov $409,"d@CqljI灈B"
	mov %120,408: mov %121,409:mov %122,24:gosub *messagefont
	br
	$409@

	mov $410,"ڑ\FIweC"
	mov $411,"ƎÐÒn[zCR@zB"
	mov $412,"@"
	mov $413,"@"
	mov $414,"@"
	mov $415,"@"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	mov %120,410: mov %121,420:mov %122,24:gosub *messagefont
	$410
	$411\

	textoff

	bg black,12

	delay 4000

;wiFuЂ܂AFBv
	bg "cutin\dai2kou\cut01.jpg",12
	delay 3000

	bg black,12

;aflFfree0522.mp3@iv[v
	bgm "bgm\free0522.mp3"

;wiFՒdE[ij
	bg "bg\dai2kou\saidan_yuugata_d.jpg",12

	delay 2000

	texton

	mov $401,"般kqIOCҋFB"
	mov %120,401: mov %121,401:mov %122,24:gosub *messagefont
	$401@

	mov $402,"糎ȓIlCJB"
	mov %120,402: mov %121,402:mov %122,24:gosub *messagefont
	$402@

	mov $403,"ƋCFB"
	mov %120,403: mov %121,403:mov %122,24:gosub *messagefont
	$403@

	mov $404,"@@"
	mov $405,"u@ʔ\ΏZCߐIAKBv"
	mov %120,404: mov %121,405:mov %122,24:gosub *messagefont
	br
	$405@

	mov $406,"sE܏oIgB"
	mov %120,406: mov %121,406:mov %122,24:gosub *messagefont
	$406@

	mov $407,"ߐS[rI^SԁB"
	mov %120,407: mov %121,407:mov %122,24:gosub *messagefont
	$407@

	mov $408,"A蕜ϓIC\Cdl՗ΏB"
	mov $409,"NC甉䊴ٔ䍂悁B"
	mov %120,408: mov %121,409:mov %122,24:gosub *messagefont
	$408
	$409@

	mov $410,"@@"
	mov $411,"u@@LEsyB"
	mov %120,410: mov %121,411:mov %122,24:gosub *messagefont
	br
	$411@

	mov $412,"Cs甓ϓIېCߏMIHJB"
	mov %120,412: mov %121,412:mov %122,24:gosub *messagefont
	$412@

	mov $413,"lCzےvZ皓ccv"
	mov %120,413: mov %121,413:mov %122,24:gosub *messagefont
	$413@

	mov $414,"@@"
	mov $415,"nICpIc݉I|CB"
	mov %120,414: mov %121,415:mov %122,24:gosub *messagefont
	br
	$415@

	mov $416,"ߓދԓIccC\濛fIB"
	mov %120,416: mov %121,416:mov %122,24:gosub *messagefont
	$416@

	mov $417,"\woIC"
	mov $418,"z@B"
	mov %120,417: mov %121,418:mov %122,24:gosub *messagefont
	$417
	$418@

	mov $419,"䀖̒䔈~IC䱎}ϓIB"
	mov %120,419: mov %121,419:mov %122,24:gosub *messagefont
	$419@

	mov $420,"茑IcC|ˏoΗeB"
	mov %120,420: mov %121,420:mov %122,24:gosub *messagefont
	$420\


	mov $401,"ccaE㈕sB"
	mov %120,401: mov %121,401:mov %122,24:gosub *messagefont
	$401@

	mov $402,"vFIp܁C"
	mov $403,"p㗹_aB"
	mov %120,402: mov %121,403:mov %122,24:gosub *messagefont
	$402
	$403@

	mov $404,"LlᐺܓB"
	mov %120,404: mov %121,404:mov %122,24:gosub *messagefont
	$404@

	mov $405,"CȜϓIg̏oC"
	mov $406,"pˉB"
	mov %120,405: mov %121,406:mov %122,24:gosub *messagefont
	$405
	$406@

	mov $407,"CÍCƐlsKB"
	mov %120,407: mov %121,407:mov %122,24:gosub *messagefont
	$407@

	mov $408,"ppgBCBpIcc"
	mov %120,408: mov %121,408:mov %122,24:gosub *messagefont
	$408@

	mov $409,"cc䍙I݁B{AsoB"
	mov %120,409: mov %121,409:mov %122,24:gosub *messagefont
	$409@

	mov $410,"@@"
	mov $411,"LB"
	mov $423,"L竁C餗B"
	mov %120,410: mov %121,411:mov %122,24:gosub *messagefont
	mov %120,423: mov %121,423:mov %122,24:gosub *messagefont
	br
	$411@/
	$423/
	add $411,$423/
	@

	mov $412,"smȑCsmIB"
	mov $413,"_cc"
	mov $423,"E⋍ݗޏw@IjOB"
	mov %120,412: mov %121,413:mov %122,24:gosub *messagefont
	mov %120,423: mov %121,423:mov %122,24:gosub *messagefont
	$412
	$413@/
	$423/
	add $413,$423/
	@

	mov $414,"@@"
	mov $415,"śfC[nӛΓC"
	mov $416,"ޘnB\䧉InB"
	mov %120,414: mov %121,416:mov %122,24:gosub *messagefont
	br
	$415
	$416@

	mov $417,"ᐳݚLI󑖋ߓI@ʐ搶IcC"
	mov $418,"ݓccŋNiO_B"
	mov $419,"@"
	mov $420,"@"
	mov %120,417: mov %121,420:mov %122,24:gosub *messagefont
	$417
	$418\


	mov $401,"uuvQpEHvv"
	mov %120,401: mov %121,401:mov %122,24:gosub *messagefont
	$401@

	mov $402,"@@"
	mov $403,"ߊIq@C@ʐ搶抖ψԁB"
	mov %120,402: mov %121,403:mov %122,24:gosub *messagefont
	br
	$403@

	mov $404,"Ғn𔈁B"
	mov %120,404: mov %121,404:mov %122,24:gosub *messagefont
	$404@

	mov $405,"ލN꒼apql݈NB"
	mov $406,"甉Cn^pNCӍݖvLMSB"
	mov %120,405: mov %121,406:mov %122,24:gosub *messagefont
	$405
	$406@

	mov $407,"Cœ^LgnIlC"
	mov $408,"C䎧sKIώqccĖszœB"
	mov %120,407: mov %121,408:mov %122,24:gosub *messagefont
	$407
	$408@

	mov $409,"@@"
	mov $410,"uuccrCAZhqJBvv"
	mov %120,409: mov %121,410:mov %122,24:gosub *messagefont
	br
	$410@

	mov $411,"@@"
	mov $412,"o^psC[xI]ړ㏒B"
	mov $413,"@"
	mov $414,"@"
	mov $415,"@"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	mov %120,411: mov %121,420:mov %122,24:gosub *messagefont
	br
	$412\


	mov $401,"u䧈؁B"
	mov %120,401: mov %121,401:mov %122,24:gosub *messagefont
	$401@

	mov $402,"JCFGB"
	mov $403,"Ȝޔ䲓ICACCߏ]IȁB"
	mov %120,402: mov %121,403:mov %122,24:gosub *messagefont
	$402
	$403@

	mov $404,"ߕphߓIC"
	mov $405,"笕s\QE{Bv"
	mov %120,404: mov %121,405:mov %122,24:gosub *messagefont
	$404
	$405@

	mov $406,"@@"
	mov $407,"wxދ"
	mov %120,406: mov %121,407:mov %122,24:gosub *messagefont
	br
	$407@

	mov $408,"AnjIꍪ~jB"
	mov %120,408: mov %121,408:mov %122,24:gosub *messagefont
	$408@

	mov $409,"ݐCIK䱉C@ʐ搶㏗C"
	mov $410,"LsvB"
	mov %120,409: mov %121,410:mov %122,24:gosub *messagefont
	$409
	$410@

	mov $411,"@@"
	mov $412,"@ʐ搶ىܓIԁC"
	mov $413,"m~䑽B"
	mov $414,"@"
	mov $415,"@"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	mov %120,411: mov %121,420:mov %122,24:gosub *messagefont
	br
	$412
	$413\

	textoff

;wiFՒdE[ijiuj
	bg "bg\dai2kou\saidan_yuugata_bure.jpg",14
	delay 1000
;wiFՒdE[ij
	bg "bg\dai2kou\saidan_yuugata_d.jpg",12
;i܂ŎEމoj

	texton


	mov $401,"IccҌI@[c礊B"
	mov %120,401: mov %121,401:mov %122,24:gosub *messagefont
	$401@

	mov $402,"@uވ_CŒfȓIyB"
	mov %120,402: mov %121,402:mov %122,24:gosub *messagefont
	$402@

	mov $403,"݉z勎IC"
	mov $404,"smsu㱁CRLoB"
	mov %120,403: mov %121,404:mov %122,24:gosub *messagefont
	$403
	$404@

	mov $405,"EYrsvLB"
	mov %120,405: mov %121,405:mov %122,24:gosub *messagefont
	$405@

	mov $406,"V@Cݏhq꘢IFCqAr哞݁B"
	mov $407,"߁B"
	mov %120,406: mov %121,407:mov %122,24:gosub *messagefont
	$406
	$407@

	mov $408,"@@"
	mov $409,"@ʜϔ\甉䊈CϏ@vYrsDB"
	mov %120,408: mov %121,409:mov %122,24:gosub *messagefont
	br
	$409@

	mov $410,"I@pCُCB"
	mov %120,410: mov %121,410:mov %122,24:gosub *messagefont
	$410@

	mov $411,"݁Ccc"
	mov %120,411: mov %121,411:mov %122,24:gosub *messagefont
	$411@

	bgmfadeout 1
	bgmstop

	mov $412,"@@"
	mov $413,"\\^㜁B"
	mov %120,412: mov %121,413:mov %122,24:gosub *messagefont
	br
	$413@

	mov $414,"@@"
	mov $415,"ˑRCw@⁗ȈnʓIB"
	mov %120,414: mov %121,415:mov %122,24:gosub *messagefont
	br
	$415@

	mov $416,"LlGB"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	mov %120,416: mov %121,420:mov %122,24:gosub *messagefont
	$416\

	textoff

;wiF
	bg "bg\dai2kou\seidou_iriguchi.jpg",12

	texton

	mov $401,"䔫gCߘle䧓B"
	mov %120,401: mov %121,401:mov %122,24:gosub *messagefont
	$401@

	mov $402,"ݗsI}⋗C꘢XIjlfB"
	mov %120,402: mov %121,402:mov %122,24:gosub *messagefont
	$402@

	mov $403,"ccvFIlB"
	mov $404,"ŋNCDsw@IlB"
	mov %120,403: mov %121,404:mov %122,24:gosub *messagefont
	$403
	$404@

	mov $405,"}EH"
	mov %120,405: mov %121,405:mov %122,24:gosub *messagefont
	$405@

	mov $406,"@ʐIԁCs\B"
	mov %120,406: mov %121,406:mov %122,24:gosub *messagefont
	$406@

	mov $407,"Cw@IwCKlv\ᓾ́cc"
	mov $408,"@"
	mov $409,"@"
	mov $410,"@"
	mov $411,"@"
	mov $412,"@"
	mov $413,"@"
	mov $414,"@"
	mov $415,"@"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	mov %120,407: mov %121,420:mov %122,24:gosub *messagefont
	$407\

	textoff

;wiFiuj@tF[hȂ
	bg "bg\dai2kou\seidou_iriguchi_bure.jpg",1

	delay 1000

;G\FEVX^[@ʏ@ʒuFE
	ld r,":a;tatie\sei\sei_sister_tuujyou.bmp",12

	delay 1000

	texton


	mov $401,"u蓌}_IaBv"
	mov %120,401: mov %121,401:mov %122,24:gosub *messagefont
	$401@

	mov $402,"@@"
	mov $403,"ÐÒn訏ˁC_vӁB"
	mov $404,"@"
	mov $405,"@"
	mov $406,"@"
	mov $407,"@"
	mov $408,"@"
	mov $409,"@"
	mov $410,"@"
	mov $411,"@"
	mov $412,"@"
	mov $413,"@"
	mov $414,"@"
	mov $415,"@"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	mov %120,402: mov %121,420:mov %122,24:gosub *messagefont
	br
	$403\

	textoff

	delay 1000

;G\F搶@ʏ@ʒuF
	ld l,":a;tatie\sensei\tuujyou1.bmp",12
	delay 1000

	texton


	mov $401,"uuCސ^漗Bvv"
	mov %120,401: mov %121,401:mov %122,24:gosub *messagefont
	$401@

	mov $402,"@@"
	mov $403,"jl񗹈CR@lnْz旹\B"
	mov %120,402: mov %121,403:mov %122,24:gosub *messagefont
	br
	$403@

	mov $404,"@@"
	mov $405,"uu运Q_IEHvv"
	mov %120,404: mov %121,405:mov %122,24:gosub *messagefont
	br
	$405@

	mov $406,"@@"
	mov $407,"˗zӓIߐjB"
	mov %120,406: mov %121,407:mov %122,24:gosub *messagefont
	br
	$407@

	mov $408,"j@A_ғInB"
	mov %120,408: mov %121,408:mov %122,24:gosub *messagefont
	$408@

	mov $409,"@@"
	mov $410,"uusCspB"
	mov %120,409: mov %121,410:mov %122,24:gosub *messagefont
	br
	$410@

	mov $411,"LICݜޗA槗C"
	mov $412,"ϏAkDBvv"
	mov %120,411: mov %121,412:mov %122,24:gosub *messagefont
	$411
	$412@

	mov $413,"@@"
	mov $414,"ܒCʈ֏IjlB"
	mov %120,413: mov %121,414:mov %122,24:gosub *messagefont
	br
	$414@

	mov $415,"^甐luB"
	mov $416,"ڑҗ`ҁC{_IHcc"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	mov %120,415: mov %121,420:mov %122,24:gosub *messagefont
	$415
	$416\


	mov $401,"uvC֝QnJB"
	mov $402,"z֓V߁B"
	mov %120,401: mov %121,402:mov %122,24:gosub *messagefont
	$401
	$402@

	mov $403,"ߊŁccVŉuhJH"
	mov %120,403: mov %121,403:mov %122,24:gosub *messagefont
	$403@

	mov $404,"d|ȚGB"
	mov $405,"Cߝٖ@KEᒆI|xvBv"
	mov %120,404: mov %121,405:mov %122,24:gosub *messagefont
	$404
	$405@

	mov $406,"@@"
	mov $407,"ucccv"
	mov %120,406: mov %121,407:mov %122,24:gosub *messagefont
	br
	$407@

	mov $408,"@@"
	mov $409,"cc甉hꝚB"
	mov %120,408: mov %121,409:mov %122,24:gosub *messagefont
	br
	$409@

	mov $410,"ӁCgTu_aC"
	mov $411,"jƒIˑRkhB"
	mov %120,410: mov %121,411:mov %122,24:gosub *messagefont
	$410
	$411@

	mov $412,"maғIٌqIlC"
	mov $413,"䌴CvLrcc"
	mov $414,"@"
	mov $415,"@"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	mov %120,412: mov %121,420:mov %122,24:gosub *messagefont
	$412
	$413\

	textoff
	cl l,0
	cl r,12

;wiF@tF[hȂ
	bg "bg\dai2kou\seidou_iriguchi.jpg",1
	delay 1000
;wiF@ʏtF[h
	bg "bg\dai2kou\seidou.jpg",12
	delay 3000

	texton

	mov $401,"ϗenّҁCٖ@笁B"
	mov %120,401: mov %121,401:mov %122,24:gosub *messagefont
	$401@

	mov $402,"๘ꉺC֐ݕߓIʈ֏㍿B"
	mov %120,402: mov %121,402:mov %122,24:gosub *messagefont
	$402@

	mov $403,"䍿餒jlcInB"
	mov %120,403: mov %121,403:mov %122,24:gosub *messagefont
	$403@

	mov $404,"@@"
	mov $405,"C֖v虐jl"
	mov $406,"ݓʈ֏IxB"
	mov %120,404: mov %121,406:mov %122,24:gosub *messagefont
	br
	$405
	$406@

	mov $407,"ܓCޗqwZψ꘢訓I㱁C"
	mov $408,"ޑC{蕘appsvYrڐGB"
	mov %120,407: mov %121,408:mov %122,24:gosub *messagefont
	$407
	$408@

	mov $409,"s\SՒnϋߓݐB"
	mov $410,"ێ꘢sI餁CKlIB"
	mov $411,"@"
	mov $412,"@"
	mov $413,"@"
	mov $414,"@"
	mov $415,"@"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	mov %120,409: mov %121,420:mov %122,24:gosub *messagefont
	$409
	$410\

	textoff

;wiFiuj@tF[hȂ
	bg "bg\dai2kou\seidou_bure.jpg",1
	delay 1000
;G\F搶@ʏ@ʒuF
;G\FEVX^[@ʏ@ʒuFE
	ld r,":a;tatie\sei\sei_sister_tuujyou.bmp",0
	ld l,":a;tatie\sensei\tuujyou1.bmp",12
	delay 2000

	bgm "bgm\free55.mp3"

	texton

	mov $401,"uuȍĜ_GBvv"
	mov %120,401: mov %121,401:mov %122,24:gosub *messagefont
	$401@

	mov $402,"@@"
	mov $403,"jlIgCbŊŐISvB"
	mov %120,402: mov %121,403:mov %122,24:gosub *messagefont
	br
	$403@

	mov $404,"@@"
	mov $405,"uusCޗAȗBv"
	mov %120,404: mov %121,405:mov %122,24:gosub *messagefont
	br
	$405@

	mov $406,"ccCnߓIԎVJBv"
	mov %120,406: mov %121,406:mov %122,24:gosub *messagefont
	$406@

	mov $407,"@@"
	mov $408,"uGCNVOጓIwqC"
	mov $409,"ߓIӎu͎X|B"
	mov %120,407: mov %121,409:mov %122,24:gosub *messagefont
	br
	$408
	$409@

	mov $410,"CHIlGB"
	mov $411,"aޏw@cL_藁Bv"
	mov %120,410: mov %121,411:mov %122,24:gosub *messagefont
	$410
	$411@

	mov $412,"@@"
	mov $413,"ҁH@ޘlH"
	mov %120,412: mov %121,413:mov %122,24:gosub *messagefont
	br
	$413@

	mov $414,"ccrŁCssJcc"
	mov $415,"@"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	mov %120,414: mov %121,420:mov %122,24:gosub *messagefont
	$414\


	mov $401,"u@ʉȓIԁC]迏̌ĉCuVxB"
	mov %120,401: mov %121,401:mov %122,24:gosub *messagefont
	$401@

	mov $402,"痹C苊迓IH"
	mov %120,402: mov %121,402:mov %122,24:gosub *messagefont
	$402@

	mov $403,"@ʕsÈܓIԁCvgnccv"
	mov %120,403: mov %121,403:mov %122,24:gosub *messagefont
	$403@

	mov $404,"@@"
	mov $405,"ucc䐥N`ǁCFGBv"
	mov %120,404: mov %121,405:mov %122,24:gosub *messagefont
	br
	$405@

	mov $406,"@@"
	mov $407,"Ď訏ˁCfZB"
	mov %120,406: mov %121,407:mov %122,24:gosub *messagefont
	br
	$407@

	mov $408,"@@"
	mov $409,"ugޘgށC^LeB"
	mov %120,408: mov %121,409:mov %122,24:gosub *messagefont
	br
	$409@

	mov $410,"ss܁Cޏw@֐@n_B"
	mov $411,"QVI覘a欒vI獁B"
	mov %120,410: mov %121,411:mov %122,24:gosub *messagefont
	$410
	$411@

	mov $412,"vL꘢w虐lI萄lI楁C"
	mov $413,"蕎CYrvw蚓sts^IwC"
	mov $414,"꘢svLB"
	mov %120,412: mov %121,414:mov %122,24:gosub *messagefont
	$412
	$413
	$414@

	mov $415,"ސSzI͎Bv"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	mov %120,415: mov %121,420:mov %122,24:gosub *messagefont
	$415\


	mov $401,"C菶IgC"
	mov $402,"Rw@IwVxB"
	mov %120,401: mov %121,402:mov %122,24:gosub *messagefont
	$401
	$402@

	mov $403,"IoFI蓅B"
	mov %120,403: mov %121,403:mov %122,24:gosub *messagefont
	$403@

	mov $404,"㱐Z{B"
	mov $405,"ŋߐrLĈωIqcc"
	mov %120,404: mov %121,405:mov %122,24:gosub *messagefont
	$404
	$405@

	mov $406,"@@"
	mov $407,"sCŋNsC|ܒԓIl藁B"
	mov %120,406: mov %121,407:mov %122,24:gosub *messagefont
	br
	$407@

	mov $408,"s֑zNa䓯Z㱖[IwxB"
	mov %120,408: mov %121,408:mov %122,24:gosub *messagefont
	$408@

	mov $409,"@@"
	mov $410,"u\ݜψꏊGIw@AדIwC"
	mov $411,"kKJB"
	mov %120,409: mov %121,411:mov %122,24:gosub *messagefont
	br
	$410
	$411@

	mov $412,"ߌu藁CGHv"
	mov $413,"@"
	mov $414,"@"
	mov $415,"@"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	mov %120,412: mov %121,420:mov %122,24:gosub *messagefont
	$412\

	textoff

;G\FEVX^[@@ʒuFE
	ld r,":a;tatie\sei\sei_sister_odoroki.bmp",12

	texton

	mov $401,"uccHv"
	mov %120,401: mov %121,401:mov %122,24:gosub *messagefont
	$401@

	mov $402,"@@"
	mov $403,"uݍKEHv"
	mov %120,402: mov %121,403:mov %122,24:gosub *messagefont
	br
	$403@

	mov $404,"@@"
	mov $405,"ucccv"
	mov %120,404: mov %121,405:mov %122,24:gosub *messagefont
	br
	$405@

	mov $406,"@@"
	mov $407,"˔@IV甉[syB"
	mov %120,406: mov %121,407:mov %122,24:gosub *messagefont
	br
	$407@

	mov $408,"ޔr񓚍ˍD藁cc"
	mov $409,"Ck튖ޔЊVC㱗L䩁B"
	mov %120,408: mov %121,409:mov %122,24:gosub *messagefont
	$408
	$409@

	mov $410,"@@"
	mov $411,"ގZYr藁B"
	mov $412,"@ʊ䐥ۍKIԁcc"
	mov %120,410: mov %121,412:mov %122,24:gosub *messagefont
	br
	$411
	$412@

	mov $413,"ݓI\hoIĐcc"
	mov $414,"@"
	mov $415,"@"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	mov %120,413: mov %121,420:mov %122,24:gosub *messagefont
	$413\

	textoff

;G\FEVX^[@ʏ@ʒuFE
	ld r,":a;tatie\sei\sei_sister_tuujyou.bmp",12

	texton

	mov $401,"uCkKBv"
	mov %120,401: mov %121,401:mov %122,24:gosub *messagefont
	$401@

	mov $402,"@@"
	mov $403,"u^IEHv"
	mov %120,402: mov %121,403:mov %122,24:gosub *messagefont
	br
	$403@

	mov $404,"@@"
	mov $405,"uccېBv"
	mov %120,404: mov %121,405:mov %122,24:gosub *messagefont
	br
	$405@

	mov $406,"@@"
	mov $407,"ukDC苕svY㈜ޔАSB"
	mov %120,406: mov %121,407:mov %122,24:gosub *messagefont
	br
	$407@

	mov $408,"dvIsۍK"
	mov $409,"\󓞎ȜkKBv"
	mov %120,408: mov %121,409:mov %122,24:gosub *messagefont
	$408
	$409@

	mov $410,"u@ޘECKC"
	mov $411,"ȎklssmYrːKB"
	mov %120,410: mov %121,411:mov %122,24:gosub *messagefont
	$410
	$411@

	mov $412,"ݜϓIvC@ߔ\槈ӛΓ"
	mov $413,"CYrȉKIԁC"
	mov $414,"rݏA^SZKBv"
	mov %120,412: mov %121,414:mov %122,24:gosub *messagefont
	$412
	$413
	$414@

	mov $415,"@@"
	mov $416,"ucccv"
	mov %120,415: mov %121,416:mov %122,24:gosub *messagefont
	br
	$416@

	mov $417,"@@"
	mov $418,"ґRܖ@L_WCA䖾IӎvB"
	mov %120,417: mov %121,418:mov %122,24:gosub *messagefont
	br
	$418@

	mov $419,"NsKIӖC"
	mov $420,"KXsNCޘӎvEcc"
	mov %120,419: mov %121,420:mov %122,24:gosub *messagefont
	$419
	$420\


	mov $401,"uACvzmYrKC"
	mov $402,"AKlYrsKB"
	mov %120,401: mov %121,402:mov %122,24:gosub *messagefont
	$401
	$402@

	mov $403,"klsEsKB"
	mov $404,"C@C˔\ْnݓIKB"
	mov %120,403: mov %121,404:mov %122,24:gosub *messagefont
	$403
	$404@

	mov $405,"EIsKz[dC"
	mov $406,"lAz\|n󓞍KB"
	mov %120,405: mov %121,406:mov %122,24:gosub *messagefont
	$405
	$406@

	mov $407,"ߕsuϘEHv"
	mov %120,407: mov %121,407:mov %122,24:gosub *messagefont
	$407@

	mov $408,"@@"
	mov $409,"uccIBv"
	mov %120,408: mov %121,409:mov %122,24:gosub *messagefont
	br
	$409@

	mov $410,"@@"
	mov $411,"usCssB"
	mov $423,"s\񓚁uIvB"
	mov %120,410: mov %121,411:mov %122,24:gosub *messagefont
	mov %120,423: mov %121,423:mov %122,24:gosub *messagefont
	br
	$411@/
	$423/
	add $411,$423/
	@

	mov $412,"@ʐENAݗE|Il֍DC"
	mov $413,"A\{ӓIwqsލB"
	mov %120,412: mov %121,413:mov %122,24:gosub *messagefont
	$412
	$413@

	mov $414,"ۍCAݓIK勎IsKV"
	mov $415,"ϓIB@Bv"
	mov %120,414: mov %121,415:mov %122,24:gosub *messagefont
	$414
	$415@

	mov $416,"@@"
	mov $417,"uccϕsȘEHv"
	mov %120,416: mov %121,417:mov %122,24:gosub *messagefont
	br
	$417@

	mov $418,"@@"
	mov $419,"uߌuϜkDEHv"
	mov $420,"@"
	mov %120,418: mov %121,420:mov %122,24:gosub *messagefont
	br
	$419\


	mov $401,"aIwVxgQЋNB"
	mov %120,401: mov %121,401:mov %122,24:gosub *messagefont
	$401@

	mov $402,"gcc[xጁB"
	mov $403,"Al獐˛wqIߔЊuB"
	mov %120,402: mov %121,403:mov %122,24:gosub *messagefont
	$402
	$403@

	mov $404,"@@"
	mov $405,"ސlꐥr񎖁cc"
	mov %120,404: mov %121,405:mov %122,24:gosub *messagefont
	br
	$405@

	mov $406,"XݝK@CXˑRB"
	mov %120,406: mov %121,406:mov %122,24:gosub *messagefont
	$406@

	mov $407,"䊮Sts汁CCYr\DB"
	mov %120,407: mov %121,407:mov %122,24:gosub *messagefont
	$407@

	mov $408,"@@"
	mov $409,"uݓI߁C糒񔈊勎B"
	mov %120,408: mov %121,409:mov %122,24:gosub *messagefont
	br
	$409@

	mov $410,"\EEIɋC݈꘢SInC"
	mov $411,"R@ÎݜkKB"
	mov %120,410: mov %121,411:mov %122,24:gosub *messagefont
	$410
	$411@

	mov $412,"ϐssIBv"
	mov %120,412: mov %121,412:mov %122,24:gosub *messagefont
	$412@

	mov $413,"@@"
	mov $414,"ucccv"
	mov $415,"@"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	mov %120,413: mov %121,420:mov %122,24:gosub *messagefont
	br
	$414\


	mov $401,"uߑ\EEϓIɋC"
	mov $402,"`Cv\ȓB"
	mov %120,401: mov %121,402:mov %122,24:gosub *messagefont
	$401
	$402@

	mov $403,"ߓIg̏vCߋhsJBv"
	mov %120,403: mov %121,403:mov %122,24:gosub *messagefont
	$403@

	mov $404,"ǵA_A\́AtAA@AEA{xAvzB"
	mov %120,404: mov %121,404:mov %122,24:gosub *messagefont
	$404@

	mov $405,"LIؓs\C܉΍C"
	mov $406,"VCEenˑRݒ[B"
	mov %120,405: mov %121,406:mov %122,24:gosub *messagefont
	$405
	$406@

	mov $407,"ʔFZIِ笖]C"
	mov $408,"\݈I䱏nqC"
	mov $409,"|ȏݎsB"
	mov %120,407: mov %121,409:mov %122,24:gosub *messagefont
	$407
	$408
	$409@

	mov $410,"݁C݉IOC꘢aIwqcc"
	mov $411,"wGҁxIڎqCݍzOB"
	mov %120,410: mov %121,411:mov %122,24:gosub *messagefont
	$410
	$411@

	mov $412,"C䖾B"
	mov $423,"䖾ߓISCG搶B"
	mov %120,412: mov %121,412:mov %122,24:gosub *messagefont
	mov %120,423: mov %121,423:mov %122,24:gosub *messagefont
	$412@/
	$423/
	add $412,$423/
	@

	mov $413,"AC@ېYrcc"
	mov $414,"笕s\w勎Bv"
	mov $415,"@"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	mov %120,413: mov %121,420:mov %122,24:gosub *messagefont
	$413
	$414\

	textoff

	bgmfadeout 3000
	bgmstop

;G\FEVX^[@f@ʒuFE
	ld r,":a;tatie\sei\sei_sister_konwaku.bmp",12

	textoff


	mov $401,"uccccccv"
	mov %120,401: mov %121,401:mov %122,24:gosub *messagefont
	$401@

	mov $402,"@@"
	mov $403,"ސꎟߓLlى܁B"
	mov %120,402: mov %121,403:mov %122,24:gosub *messagefont
	br
	$403@

	mov $404,"@@ʐ搶C֐C"
	mov $405,"r蕕p瘸NލB"
	mov %120,404: mov %121,405:mov %122,24:gosub *messagefont
	$404
	$405@

	mov $406,"CYrޏw@C_F藁cc"
	mov %120,406: mov %121,406:mov %122,24:gosub *messagefont
	$406@

	mov $407,"IRCIӖCSŐB"
	mov %120,407: mov %121,407:mov %122,24:gosub *messagefont
	$407@

	mov $408,"@@"
	mov $409,"u痹C䐥s运SsDHv"
	mov %120,408: mov %121,409:mov %122,24:gosub *messagefont
	br
	$409@

	mov $410,"@@"
	mov $411,"usCޔВԎVkLlNccv"
	mov $412,"@"
	mov $413,"@"
	mov $414,"@"
	mov $415,"@"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	mov %120,410: mov %121,420:mov %122,24:gosub *messagefont
	br
	$411\


	mov $401,"uޖ{A֊B鈓ss܏oB"
	mov %120,401: mov %121,401:mov %122,24:gosub *messagefont
	$401@

	mov $402,"RCklpҒs[B"
	mov $403,"ݓlŕsInCɒnBv"
	mov %120,402: mov %121,403:mov %122,24:gosub *messagefont
	$402
	$403@

	mov $404,"@@"
	mov $405,"ucccv"
	mov %120,404: mov %121,405:mov %122,24:gosub *messagefont
	br
	$405@

	mov $406,"@@"
	mov $407,"uAܓICzaցB"
	mov $408,"߁Bv"
	mov %120,406: mov %121,408:mov %122,24:gosub *messagefont
	br
	$407
	$408@

	mov $409,"uAC@ʜ迗ܐɋIԁC"
	mov $410,"@ʉ迓ISQIԁC"
	mov $411,"]CR@CޗBv"
	mov %120,409: mov %121,411:mov %122,24:gosub *messagefont
	$409
	$410
	$411@

	mov $412,"@@"
	mov $413,"uscc"
	mov %120,412: mov %121,413:mov %122,24:gosub *messagefont
	br
	$413@

	mov $414,"苁cc]܉ccv"
	mov $415,"@"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	mov %120,414: mov %121,420:mov %122,24:gosub *messagefont
	$414\


	mov $401,"u远r܁CkBv"
	mov %120,401: mov %121,401:mov %122,24:gosub *messagefont
	$401@

	mov $402,"ގґRL_|sCԎVC"
	mov $403,"AϓIlC"
	mov $404,"]\^近F[ލIgnB"
	mov %120,402: mov %121,404:mov %122,24:gosub *messagefont
	$402
	$403
	$404@

	mov $405,"ccsC命vCLOC"
	mov $406,"WVFIْԁB"
	mov %120,405: mov %121,406:mov %122,24:gosub *messagefont
	$405
	$406@

	mov $407,"cܙ{ԁCA^[AQC"
	mov $408,"R@ؒf𗬁B"
	mov %120,407: mov %121,408:mov %122,24:gosub *messagefont
	$407
	$408@

	mov $409,"Bʑ甔ލV㱓Iuxzz[B"
	mov %120,409: mov %121,409:mov %122,24:gosub *messagefont
	$409@

	mov $410,"[ғ݊YrC]lrC"
	mov $411,"ލ@ʕs效敓I"
	mov $412,"Lv@ݑIBv"
	mov $413,"@"
	mov $414,"@"
	mov $415,"@"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	mov %120,410: mov %121,420:mov %122,24:gosub *messagefont
	$410
	$411
	$412\


	mov $401,"^IccސꎟLl敜ލB"
	mov %120,401: mov %121,401:mov %122,24:gosub *messagefont
	$401@

	mov $402,"sCӑvoss笁CvLloIԁC"
	mov $403,"ϓIْԖBkeՏA\B"
	mov $423,"AaρB"
	mov %120,402: mov %121,403:mov %122,24:gosub *messagefont
	mov %120,423: mov %121,423:mov %122,24:gosub *messagefont
	$402
	$403@/
	$423/
	add $403,$423/
	@

	mov $404,"@@"
	mov $405,"Acc"
	mov $423,"ACk^B"
	mov %120,404: mov %121,405:mov %122,24:gosub *messagefont
	mov %120,423: mov %121,423:mov %122,24:gosub *messagefont
	br
	$405@/
	$423/
	add $405,$423/
	@

	mov $406,"ߔْԉCٖ@B"
	mov $407,"@"
	mov $408,"@"
	mov $409,"@"
	mov $410,"@"
	mov $411,"@"
	mov $412,"@"
	mov $413,"@"
	mov $414,"@"
	mov $415,"@"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	mov %120,406: mov %121,420:mov %122,24:gosub *messagefont
	$406\

	textoff

;ʉFUbimCYj
;wiFuuC񂾂vv@Qb\Ĕwi߂@tF[hȂ
	dwave 10,"wave\noise01.wav"
	bg "cutin\dai2kou\cut11.jpg",1

	wait 2000

;wiFiuj@tF[hȂ
	bg "bg\dai2kou\seidou_bure.jpg",0

;G\F搶@ʏ@ʒuF
;G\FEVX^[@ʏ@ʒuFE
	ld r,":a;tatie\sei\sei_sister_konwaku.bmp",0
	ld l,":a;tatie\sensei\tuujyou1.bmp",1

	texton

	mov $401,"ucc]CAuޑzIܖ@Bv"
	mov %120,401: mov %121,401:mov %122,24:gosub *messagefont
	$401@

	mov $402,"@@"
	mov $403,"uCƓs\ϏADC"
	mov $404,"ސLlCgQdl|يuB"
	mov %120,402: mov %121,404:mov %122,24:gosub *messagefont
	br
	$403
	$404@

	mov $405,"pmœIgUdlC[FISC"
	mov $406,"LrܖٕIg̎SB"
	mov %120,405: mov %121,406:mov %122,24:gosub *messagefont
	$405
	$406@

	mov $407,"IlCpvFB"
	mov $408,"{Asza[җLC\B"
	mov %120,407: mov %121,408:mov %122,24:gosub *messagefont
	$407
	$408@

	mov $409,"ϓIЉӍݎ[B"
	mov %120,409: mov %121,409:mov %122,24:gosub *messagefont
	$409@

	mov $410,"sCߌu藁H"
	mov %120,410: mov %121,410:mov %122,24:gosub *messagefont
	$410@

	mov $411,"@ʈcgNs^lڐGC"
	mov $412,"X[IۓWGBv"
	mov %120,411: mov %121,412:mov %122,24:gosub *messagefont
	$411
	$412@

	mov $413,"@@"
	mov $414,"uX[IHv"
	mov %120,413: mov %121,414:mov %122,24:gosub *messagefont
	br
	$414@

	mov $415,"@@"
	mov $416,"uݔ[Ҙa[ғIC"
	mov $417,"OpԎVB"
	mov %120,415: mov %121,417:mov %122,24:gosub *messagefont
	br
	$416
	$417@

	mov $418,"GC迒mw[vޘEHv"
	mov %120,418: mov %121,418:mov %122,24:gosub *messagefont
	$418@

	mov $419,"@@"
	mov $420,"uCꍱccv"
	mov %120,419: mov %121,420:mov %122,24:gosub *messagefont
	br
	$420\


	mov $401,"ސЉCwIeB"
	mov $402,"\Eݓ{CL꘢wm`HxIgᚐxB"
	mov %120,401: mov %121,402:mov %122,24:gosub *messagefont
	$401
	$402@

	mov $403,"AVOC֗LwtxawlxϓIgᚑ݁C"
	mov $404,"F꒼󓞎ЉI[B"
	mov %120,403: mov %121,404:mov %122,24:gosub *messagefont
	$403
	$404@

	mov $405,"[ґFWϓInC"
	mov $406,"^ʎЉuCB"
	mov %120,405: mov %121,406:mov %122,24:gosub *messagefont
	$405
	$406@

	mov $407,"CV@CFܗ\IlbC"
	mov $408,"卑ƓI@xCȋyʉ^V̓IẃC"
	mov $409,"[V暓PB"
	mov %120,407: mov %121,409:mov %122,24:gosub *messagefont
	$407
	$408
	$409@

	mov $410,"RCUmٕogҁC"
	mov $411,"{ErDIpC"
	mov $412,"[Il"
	mov $413,"rshIljጐlC"
	mov $414,"ܑgߑC[dꍪB"
	mov $415,"@"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	mov %120,410: mov %121,420:mov %122,24:gosub *messagefont
	$410
	$411
	$412
	$413
	$414\


	mov $401,"uTccJB"
	mov %120,401: mov %121,401:mov %122,24:gosub *messagefont
	$401@

	mov $402,"C@Bv"
	mov %120,402: mov %121,402:mov %122,24:gosub *messagefont
	$402@

	mov $403,"u\ECޘƑݒ[tB"
	mov $404,"ߍlR󓞕sIQB"
	mov $405,"[ݔwlIsCCȕs\Bv"
	mov %120,403: mov %121,405:mov %122,24:gosub *messagefont
	$403
	$404
	$405@

	mov $406,"uߑFmICTALލJHv"
	mov %120,406: mov %121,406:mov %122,24:gosub *messagefont
	$406@

	mov $407,"@@"
	mov $408,"uccLލHv"
	mov %120,407: mov %121,408:mov %122,24:gosub *messagefont
	br
	$408@

	mov $409,"@@"
	mov $410,"uuސYrӎvHv"
	mov %120,409: mov %121,410:mov %122,24:gosub *messagefont
	br
	$410@

	mov $411,"us֗LYrFsmIccHvv"
	mov %120,411: mov %121,411:mov %122,24:gosub *messagefont
	$411@

	mov $412,"@@"
	mov $413,"uu^ܐsmccv"
	mov %120,412: mov %121,413:mov %122,24:gosub *messagefont
	br
	$413@

	mov $414,"u|s@܁C틳Bv"
	mov $423,"uLCVBvv"
	mov %120,414: mov %121,414:mov %122,24:gosub *messagefont
	mov %120,423: mov %121,423:mov %122,24:gosub *messagefont
	$414@/
	$423/
	add $414,$423/
	@

	mov $415,"@@"
	mov $416,"uLCVHv"
	mov %120,415: mov %121,416:mov %122,24:gosub *messagefont
	br
	$416@

	mov $417,"@@"
	mov $418,"ucv"
	mov $419,"@"
	mov $420,"@"
	mov %120,417: mov %121,420:mov %122,24:gosub *messagefont
	br
	$418\

	textoff

	delay 1000

	bgm "bgm\free56.mp3"

;GύXF搶@ʏQ@ʒuF
	ld l,":a;tatie\sensei\tuujyou2.bmp",12

	delay 2000

	texton


	mov $401,"uݜޘEc"
	mov $402,"LlCvL[oBv"
	mov %120,401: mov %121,402:mov %122,24:gosub *messagefont
	textspeed 200
	$401
	$402@

	mov $403,"@@"
	mov $404,"o^ISsIFˁCXB"
	mov %120,403: mov %121,404:mov %122,24:gosub *messagefont
	br
	$404@

	mov $405,"l햟bŗv峖wsI㔗B"
	mov %120,405: mov %121,405:mov %122,24:gosub *messagefont
	$405@

	mov $406,"ێI餍C"
	mov $407,"p\󓞓ߔГϓIߋ㔗B"
	mov %120,406: mov %121,407:mov %122,24:gosub *messagefont
	$406
	$407@

	mov $408,"@@"
	mov $409,"uCYrcvL[甐lo藁Hv"
	mov %120,408: mov %121,409:mov %122,24:gosub *messagefont
	br
	$409@

	mov $410,"@@"
	mov $411,"uPXUXNCd[{@IC"
	mov $412,"[I孒C{IጔCB"
	mov %120,410: mov %121,412:mov %122,24:gosub *messagefont
	br
	$411
	$412@

	mov $413,"V@CiRONI㱗CPSI爎ZB"
	mov %120,413: mov %121,413:mov %122,24:gosub *messagefont
	$413@

	mov $414,"C[hЉbB"
	mov %120,414: mov %121,414:mov %122,24:gosub *messagefont
	$414@

	mov $415,"ލ[{݉r[VNIpC"
	mov $416,"A^CÐBƍߍsCB"
	mov %120,415: mov %121,416:mov %122,24:gosub *messagefont
	$415
	$416@

	mov $417,"zzŁCO战abB"
	mov $418,"lr\sf藁Hv"
	mov %120,417: mov %121,418:mov %122,24:gosub *messagefont
	$417
	$418@

	mov $419,"@@"
	mov $420,"ucccv"
	mov %120,419: mov %121,420:mov %122,24:gosub *messagefont
	br
	$420\


	mov $401,"uߍl茚I^抁C"
	mov $402,"swCxIRC"
	mov $403,"Ɠߗz荌B"
	mov %120,401: mov %121,403:mov %122,24:gosub *messagefont
	$401
	$402
	$403@

	mov $404,"֗LIl竓C"
	mov $405,"܁e玍Hvڎ󔽉[fC"
	mov $406,"NFyИapoB"
	mov %120,404: mov %121,406:mov %122,24:gosub *messagefont
	$404
	$405
	$406@

	mov $407,"X啪ICLl曗ƌiC"
	mov $408,"s{耓ߗCh\`I@F"
	mov $409,"rLϓIYB"
	mov %120,407: mov %121,409:mov %122,24:gosub *messagefont
	$407
	$408
	$409@

	mov $410,"@sj֐㱊CvxtI{ٖ@笁B"
	mov %120,410: mov %121,410:mov %122,24:gosub *messagefont
	$410@

	mov $411,"U笁CAwCʉ[B"
	mov %120,411: mov %121,411:mov %122,24:gosub *messagefont
	$411@

	mov $412,"lFApޔЎ_iIBv"
	mov %120,412: mov %121,412:mov %122,24:gosub *messagefont
	$412@

	mov $413,"@@"
	mov $414,"cccccc"
	mov $423,"^ߐlfIB"
	mov %120,413: mov %121,414:mov %122,24:gosub *messagefont
	mov %120,423: mov %121,423:mov %122,24:gosub *messagefont
	br
	$414@/
	$423/
	add $414,$423/
	@

	mov $415,"@ʜސ^ICߏAӖC[XmIߍsC"
	mov $416,"ݎЉIrRsB"
	mov %120,415: mov %121,416:mov %122,24:gosub *messagefont
	$415
	$416@

	mov $417,"@@"
	mov $418,"uߘc@ʓߍldrIOC"
	mov $419,"ڒsǐsADcHv"
	mov $420,"@"
	mov %120,417: mov %121,420:mov %122,24:gosub *messagefont
	br
	$418
	$419\


	mov $401,"uACvrlB"
	mov $402,"ǐYrI{ssʁCClsO߁B"
	mov %120,401: mov %121,402:mov %122,24:gosub *messagefont
	$401
	$402@

	mov $403,"oٔQIwC"
	mov $404,"֐Ch战abPc"
	mov %120,403: mov %121,404:mov %122,24:gosub *messagefont
	$403
	$404@

	mov $405,"ݓߍIlCL[ғIgeBv"
	mov %120,405: mov %121,405:mov %122,24:gosub *messagefont
	$405@

	mov $406,"@@"
	mov $407,"rρBrꗈc"
	mov %120,406: mov %121,407:mov %122,24:gosub *messagefont
	br
	$407@

	mov $408,"oϓICAĖvL҉I]nB"
	mov %120,408: mov %121,408:mov %122,24:gosub *messagefont
	$408@

	mov $409,"ӁC[ꌏmIBClő[IsCB"
	mov %120,409: mov %121,409:mov %122,24:gosub *messagefont
	$409@

	mov $410,"䎩Ȗ[̉ߔ甐l[mܓIEB"
	mov %120,410: mov %121,410:mov %122,24:gosub *messagefont
	$410@

	mov $411,"AC֔@c"
	mov $412,"pȓI딽嗈ޔЎc"
	mov %120,411: mov %121,412:mov %122,24:gosub *messagefont
	$411
	$412@

	mov $413,"@@"
	mov $414,"uly󗘗p[ҁB"
	mov $415,"ҁCSgIl`[QҁB"
	mov %120,413: mov %121,415:mov %122,24:gosub *messagefont
	br
	$414
	$415@

	mov $416,"ϓIv琥LIBv"
	mov %120,416: mov %121,416:mov %122,24:gosub *messagefont
	$416@

	mov $417,"uVCRƛEۏᗹ~㗁C"
	mov $418,"rh战abIiAosMBv"
	mov %120,417: mov %121,418:mov %122,24:gosub *messagefont
	$417
	$418@

	mov $419,"@@"
	mov $420,"ucccv"
	mov %120,419: mov %121,420:mov %122,24:gosub *messagefont
	br
	$420\


	mov $401,"u@ٔ[IxC"
	mov $402,"݂QOOQNEBB"
	mov %120,401: mov %121,402:mov %122,24:gosub *messagefont
	$401
	$402@

	mov $403,"ݓߊ㱁C{InЉzvvs"
	mov $404,"`|Iḿ̗C@݈ÒԝQB"
	mov %120,403: mov %121,404:mov %122,24:gosub *messagefont
	$403
	$404@

	mov $405,"꘢\AsB"
	mov %120,405: mov %121,405:mov %122,24:gosub *messagefont
	$405@

	mov $406,"{{jɍHI"
	mov $407,"[IlFCC"
	mov $408,"暚͒f{IsB"
	mov %120,406: mov %121,408:mov %122,24:gosub *messagefont
	$406
	$407
	$408@

	mov $409,"ޔCwvxB"
	mov %120,409: mov %121,409:mov %122,24:gosub *messagefont
	$409@

	mov $410,"RCLꍱnEԓICv"
	mov $411,"ߍvAz[IlC"
	mov $412,"s\oYrEB"
	mov %120,410: mov %121,412:mov %122,24:gosub *messagefont
	$410
	$411
	$412@

	mov $413,"LIicmؑmoSC"
	mov $414,"LIiߏ̕SSIdbC"
	mov $415,"LIX[闢jXُ糋qӎ{\sB"
	mov %120,413: mov %121,415:mov %122,24:gosub *messagefont
	$413
	$414
	$415@

	mov $416,"RCFw@Im̗͋p۔sC"
	mov $417,"rdEAEax@nNB"
	mov %120,416: mov %121,417:mov %122,24:gosub *messagefont
	$416
	$417@

	mov $418,"}̋pǋsIC"
	mov $419,"٘dv{vLړBv"
	mov $420,"@"
	mov %120,418: mov %121,420:mov %122,24:gosub *messagefont
	$418
	$419\


	mov $401,"ӁCŋa惏㐥ړB"
	mov %120,401: mov %121,401:mov %122,24:gosub *messagefont
	$401@

	mov $402,"cA񓞁wxwvxލC"
	mov $403,"Dl~ொ\ʓIaVB"
	mov %120,402: mov %121,403:mov %122,24:gosub *messagefont
	$402
	$403@

	mov $404,"sc"
	mov %120,404: mov %121,404:mov %122,24:gosub *messagefont
	$404@

	mov $405,"@@"
	mov $406,"uϓICىޔАlܐ^IȘEHv"
	mov %120,405: mov %121,406:mov %122,24:gosub *messagefont
	br
	$406@

	mov $407,"@@"
	mov $408,"usC]ߜϓIw\槙߈߁Bv"
	mov %120,407: mov %121,408:mov %122,24:gosub *messagefont
	br
	$408@

	mov $409,"gޘVIC"
	mov $410,"Rߍz[IlʓIB"
	mov %120,409: mov %121,410:mov %122,24:gosub *messagefont
	$409
	$410@

	mov $411,"FS~nƎȓIv墎ʁB"
	mov $412,"@ʐOlʁC"
	mov $413,"AwጘcȎӁAʉ[CB"
	mov %120,411: mov %121,413:mov %122,24:gosub *messagefont
	$411
	$412
	$413@

	mov $414,"ݜϓIvC{ٖ@wqF萐^B"
	mov %120,414: mov %121,414:mov %122,24:gosub *messagefont
	$414@

	mov $415,"៍@lFoI浕mC"
	mov $416,"shIBv"
	mov %120,415: mov %121,416:mov %122,24:gosub *messagefont
	$415
	$416@

	mov $417,"@@"
	mov $418,"uߘcc迋퐥ccHv"
	mov $419,"@"
	mov $420,"@"
	mov %120,417: mov %121,420:mov %122,24:gosub *messagefont
	br
	$418\

	textoff

	bgmfadeout 2000
	bgmstop

;GύXF搶@ʏ@ʒuF
	ld l,":a;tatie\sensei\tuujyou1.bmp",12

	texton

	mov $401,"u䐥藁cc꘢sҁB"
	mov %120,401: mov %121,401:mov %122,24:gosub *messagefont
	$401@

	mov $402,"Ŋŗ^gnvIlB"
	mov %120,402: mov %121,402:mov %122,24:gosub *messagefont
	$402@

	mov $403,"AϑՑSCܐlF\wmxI݁B"
	mov %120,403: mov %121,403:mov %122,24:gosub *messagefont
	$403@

	mov $404,"ٕId[{EC"
	mov $405,"F\꘢[VB"
	mov %120,404: mov %121,405:mov %122,24:gosub *messagefont
	$404
	$405@

	mov $406,"AݓOlAg̎cҁCpIssB"
	mov %120,406: mov %121,406:mov %122,24:gosub *messagefont
	$406@

	mov $407,"FzC@p[ҁC"
	mov $408,"[拐荗vB"
	mov %120,407: mov %121,408:mov %122,24:gosub *messagefont
	$407
	$408@

	mov $409,"ډCߑFKl^ϓIllBv"
	mov %120,409: mov %121,409:mov %122,24:gosub *messagefont
	$409@

	mov $410,"@@"
	mov $411,"uccAZr܁cc"
	mov %120,410: mov %121,411:mov %122,24:gosub *messagefont
	br
	$411@

	mov $412,"\Icc{vLJccv"
	mov %120,412: mov %121,412:mov %122,24:gosub *messagefont
	$412@

	mov $413,"@@"
	mov $414,"uߐm[YrώqIB"
	mov $415,"ސc|IB"
	mov %120,413: mov %121,415:mov %122,24:gosub *messagefont
	br
	$414
	$415@

	mov $416,"@Cߍh[ҋ战abC"
	mov $417,"R@ÎޏA~䕓I忔VlB"
	mov %120,416: mov %121,417:mov %122,24:gosub *messagefont
	$416
	$417@

	mov $418,"ْޔАlCڍGFwސ֓Ix"
	mov $419,"v^^n܏oB"
	mov %120,418: mov %121,419:mov %122,24:gosub *messagefont
	$418
	$419@

	mov $420,"CғIیCC@sXLʁBv"
	mov %120,420: mov %121,420:mov %122,24:gosub *messagefont
	$420\

	textoff

;ʉF̏
	bgm "bgm\kane.mp3"

	delay 4000

	bgmstop

	texton

	mov $401,"I艐kNB"
	mov %120,401: mov %121,401:mov %122,24:gosub *messagefont
	$401@

	mov $402,"ߘZ_Bސw@Zqg訑OꏬIMB"
	mov %120,402: mov %121,402:mov %122,24:gosub *messagefont
	$402@

	mov $403,"@@"
	mov $404,"ugށCsmsu֓vB"
	mov %120,403: mov %121,404:mov %122,24:gosub *messagefont
	br
	$404@

	mov $405,"OlB"
	mov $406,"vҍݜޔВnAWBv"
	mov %120,405: mov %121,406:mov %122,24:gosub *messagefont
	$405
	$406@

	mov $407,"@@"
	mov $408,"VdVՍDXqC⋋NgB"
	mov %120,407: mov %121,408:mov %122,24:gosub *messagefont
	br
	$408@

	mov $409,"ߓrLIԎVC"
	mov $410,"rAC֐^L_ɁB"
	mov %120,409: mov %121,410:mov %122,24:gosub *messagefont
	$409
	$410@

	mov $411,"@@"
	mov $412,"u@进E擾BIԁC"
	mov $413,"|spr}ccv"
	mov %120,411: mov %121,413:mov %122,24:gosub *messagefont
	br
	$412
	$413@

	mov $414,"@@"
	mov $415,"usCvL擾BBv"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	mov %120,414: mov %121,420:mov %122,24:gosub *messagefont
	br
	$415\

	textoff

;G\FEVX^[@@ʒuFE
	ld r,":a;tatie\sei\sei_sister_odoroki.bmp",12

	texton

	mov $401,"uccHv"
	mov %120,401: mov %121,401:mov %122,24:gosub *messagefont
	$401@

	mov $402,"@@"
	mov $403,"uC䐥LC"
	mov $404,"Av܉䐥EB˒IGBv"
	mov %120,402: mov %121,404:mov %122,24:gosub *messagefont
	br
	$403
	$404@

	mov $405,"rCGB"
	mov $406,"ȍ@FJBv"
	mov %120,405: mov %121,406:mov %122,24:gosub *messagefont
	$405
	$406@

	cl l,12

	mov $407,"@@"
	mov $408,"VڗICoGB"
	mov %120,407: mov %121,408:mov %122,24:gosub *messagefont
	br
	$408@

	mov $409,"ߘlCꐥr񎖁cc"
	mov $410,"vzCREBAIcc"
	mov %120,409: mov %121,410:mov %122,24:gosub *messagefont
	$409
	$410@

	mov $411,"cccB"
	mov %120,411: mov %121,411:mov %122,24:gosub *messagefont
	$411@

	mov $412,"VccYrvېC"
	mov $413,"֔\ߓLIԎVCA˖vJB"
	mov %120,412: mov %121,413:mov %122,24:gosub *messagefont
	$412
	$413@

	mov $414,"ޘԎVGC{ٖ@dlqB"
	mov $415,"AӐl[vIԎVB"
	mov %120,414: mov %121,415:mov %122,24:gosub *messagefont
	$414
	$415@

	mov $416,"@@"
	mov $417,"@ʗLC֐^zFFߘlB"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	mov %120,416: mov %121,420:mov %122,24:gosub *messagefont
	br
	$417\

	textoff

	bg black,14

;

;ʁFSd}iʏj

	mov %42,2
	gosub *sindenzu

	wait 2000

;EFCgQb

;

;wiFejXR[gi[j@ʏtF[h
	bg "bg\dai2kou\tennis.jpg",12

	delay 3000

;aflFfree045.mp3@iv[v
	bgm "bgm\free45.mp3"

	texton


	mov $401,"㤋둖IC"
	mov $402,"[}L{wݝE@y݉񋎁B"
	mov %120,401: mov %121,402:mov %122,24:gosub *messagefont
	$401
	$402@

	mov $403,"ߗ܁CZh弉蚓u㎵_j֓Iō@捏B"
	mov $404,"ŋNF琥B牓IώqB"
	mov %120,403: mov %121,404:mov %122,24:gosub *messagefont
	$403
	$404@

	mov $405,"SaNZ|҉]WI蕕sfC"
	mov $406,"X\UҌޒIЎq\B"
	mov %120,405: mov %121,406:mov %122,24:gosub *messagefont
	$405
	$406@

	mov $407,"VCn牁C"
	mov $408,"CSgSVF߈Í˟BIVÒB"
	mov %120,407: mov %121,408:mov %122,24:gosub *messagefont
	$407
	$408@

	mov $409,"S_ؒ㤋IC"
	mov $410,"[xIcB"
	mov %120,409: mov %121,410:mov %122,24:gosub *messagefont
	$409
	$410@

	mov $411,"ccLCukߕ\B"
	mov %120,411: mov %121,411:mov %122,24:gosub *messagefont
	$411@

	mov $412,"VsLSgSIC֗L꘢XIzB"
	mov %120,412: mov %121,412:mov %122,24:gosub *messagefont
	$412@

	mov $413,"ACpcc"
	mov $423,"ccccB"
	mov %120,413: mov %121,413:mov %122,24:gosub *messagefont
	mov %120,423: mov %121,423:mov %122,24:gosub *messagefont
	$413@/
	$423/
	add $413,$423/
	@

	mov $414,"@@"
	mov $415,"umᏬC֍ݘEHv"
	mov %120,414: mov %121,415:mov %122,24:gosub *messagefont
	br
	$415@

	mov $416,"@@"
	mov $417,"bőzvҎUSI媉]C"
	mov $418,"ߐ􋅓INtԁB"
	mov $419,"@"
	mov $420,"@"
	mov %120,416: mov %121,420:mov %122,24:gosub *messagefont
	br
	$417
	$418\


	mov $401,"u㱁CߖNtŌC"
	mov $402,"IoꕛhNI\B"
	mov %120,401: mov %121,402:mov %122,24:gosub *messagefont
	$401
	$402@

	QUAKE 20,200

	mov $403,"@@"
	mov $404,"@@"
	mov $405,"uAAAcc"
	mov %120,403: mov %121,405:mov %122,36:gosub *messagefont
	br
	br
	$405@

	mov $406,"sAsفCAAFOHIv"
	mov %120,406: mov %121,406:mov %122,24:gosub *messagefont
	$406@

	mov $407,"@@"
	mov $408,"urHv"
	mov %120,407: mov %121,408:mov %122,24:gosub *messagefont
	br
	$408@

	mov $409,"@@"
	mov $410,"uvAvCvI^II"
	mov $423,"@ccIv"
	mov %120,409: mov %121,410:mov %122,24:gosub *messagefont
	mov %120,423: mov %121,423:mov %122,24:gosub *messagefont
	br
	$410@/
	$423/
	add $410,$423/
	@

	mov $411,"@@"
	mov $412,"QZqa]INt蒆IC"
	mov $413,"㤋ȗoB"
	mov %120,411: mov %121,413:mov %122,24:gosub *messagefont
	br
	$412
	$413@

	mov $414,"ݒnʏÁCݗIrB"
	mov $415,"@"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	mov %120,414: mov %121,420:mov %122,24:gosub *messagefont
	$414\


	mov $401,"uAAC\A\]Iv"
	mov %120,401: mov %121,401:mov %122,24:gosub *messagefont
	$401@

	mov $402,"@@"
	mov $403,"uccvgnCspӁBv"
	mov %120,402: mov %121,403:mov %122,24:gosub *messagefont
	br
	$403@

	mov $404,"@@"
	mov $405,"ܒCNNhNtB"
	mov %120,404: mov %121,405:mov %122,24:gosub *messagefont
	br
	$405@

	mov $406,"\ґRx茓ssCA֐嗹C"
	mov $407,"cbILqB"
	mov %120,406: mov %121,407:mov %122,24:gosub *messagefont
	$406
	$407@

	mov $408,"@@"
	mov $409,"uC튴漁Iv"
	mov %120,408: mov %121,409:mov %122,24:gosub *messagefont
	br
	$409@

	mov $410,"@@"
	mov $411,"uߘCmᏬ藁ccHv"
	mov %120,410: mov %121,411:mov %122,24:gosub *messagefont
	br
	$411@

	mov $412,"@@"
	mov $413,"u݁AݓICݓII"
	mov $414,"mOccCImOIv"
	mov %120,412: mov %121,414:mov %122,24:gosub *messagefont
	br
	$413
	$414@

	mov $415,"@@"
	mov $416,"ŁC꘢gݕF璳iOIC"
	mov $417,"嗈B"
	mov %120,415: mov %121,417:mov %122,24:gosub *messagefont
	br
	$416
	$417@

	mov $418,"^Õ㤋BVIŕ͈ρB"
	mov $419,"@"
	mov $420,"@"
	mov %120,418: mov %121,420:mov %122,24:gosub *messagefont
	$418\

	textoff

;wiFejXR[giuj@tF[hȂ
	bg "bg\dai2kou\tennis_bure.jpg",1
	delay 1000
;G\F@EΊ@ʒuF
;G\F@iXqjEʏ@ʒuFE
	ld r,":a;tatie\sei\sei_bousi_tuujyou.bmp",0
	ld l,":a;tatie\risa\risa_warai.bmp",12

	delay 2000

	texton

	mov $401,"ugށCǈɁCߍݓEHv"
	mov %120,401: mov %121,401:mov %122,24:gosub *messagefont
	$401@

	mov $402,"@@"
	mov $403,"uzN藁Bv"
	mov %120,402: mov %121,403:mov %122,24:gosub *messagefont
	br
	$403@

	mov $404,"@@"
	mov $405,"usDWI"
	mov $423,"߉FJB"
	mov %120,404: mov %121,405:mov %122,24:gosub *messagefont
	mov %120,423: mov %121,423:mov %122,24:gosub *messagefont
	br
	$405@/
	$423
	add $405,$423

	mov $406,"fwC摖k`v"
	mov %120,406: mov %121,406:mov %122,24:gosub *messagefont
	$406@

	mov $407,"@@"
	mov $408,"uCDIFCwIv"
	mov %120,407: mov %121,408:mov %122,24:gosub *messagefont
	br
	$408@

	mov $409,"@@"
	mov $410,"˔틩fINtC"
	mov $411,"헜ŗč@ChhnfZB"
	mov %120,409: mov %121,411:mov %122,24:gosub *messagefont
	br
	$410
	$411@

	mov $412,"c_CR@CߗB"
	mov %120,412: mov %121,412:mov %122,24:gosub *messagefont
	$412@

	mov $413,"揁C㤋֐^L͏\IƖB"
	mov $414,"@"
	mov $415,"@"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	mov %120,413: mov %121,420:mov %122,24:gosub *messagefont
	$413\


	mov $401,"u^CǈɁB"
	mov $402,"֗{CAcwISh藁B"
	mov %120,401: mov %121,402:mov %122,24:gosub *messagefont
	$401
	$402@

	mov $403,"ψꗈCNII͖\MBv"
	mov %120,403: mov %121,403:mov %122,24:gosub *messagefont
	$403@

	mov $404,"@@"
	mov $405,"X@CˑRܗIԁB"
	mov %120,404: mov %121,405:mov %122,24:gosub *messagefont
	br
	$405@

	mov $406,"@@"
	mov $407,"uccEHv"
	mov %120,406: mov %121,407:mov %122,24:gosub *messagefont
	br
	$407@

	mov $408,"@@"
	mov $409,"u^ޛB"
	mov $410,"F߁CVIVB"
	mov %120,408: mov %121,410:mov %122,24:gosub *messagefont
	br
	$409
	$410@

	mov $411,"NtI{Sscc"
	mov %120,411: mov %121,411:mov %122,24:gosub *messagefont
	$411@

	mov $412,"A\FvQߓIw܁C"
	mov $413,"F\ӁCsEHv"
	mov %120,412: mov %121,413:mov %122,24:gosub *messagefont
	$412
	$413@

	mov $414,"@@"
	mov $415,"uuCBvv"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	mov %120,414: mov %121,420:mov %122,24:gosub *messagefont
	br
	$415\

	textoff

;G\F@Es@ʒuF
	ld l,":a;tatie\risa\risa_human.bmp",12

	texton

	mov $401,"uuYrefCˉJHI"
	mov %120,401: mov %121,401:mov %122,24:gosub *messagefont
	$401@

	mov $402,"dF玛Ivv"
	mov %120,402: mov %121,402:mov %122,24:gosub *messagefont
	$402@

	mov $403,"@@"
	mov $404,"uuYrsvB"
	mov %120,403: mov %121,404:mov %122,24:gosub *messagefont
	br
	$404@

	mov $405,"c䘸[㱗foC"
	mov $406,"MϓIߚGBvv"
	mov %120,405: mov %121,406:mov %122,24:gosub *messagefont
	$405
	$406@

	mov $407,"@@"
	mov $408,"uu`ޘvCL_ȁcc"
	mov %120,407: mov %121,408:mov %122,24:gosub *messagefont
	br
	$408@

	mov $409,"^ICR{@osIl˛Bvv"
	mov %120,409: mov %121,409:mov %122,24:gosub *messagefont
	$409@

	mov $410,"@@"
	mov $411,"ĉȗIlB"
	mov %120,410: mov %121,411:mov %122,24:gosub *messagefont
	br
	$411@

	mov $412,"\ꕛsgȓIώq~C"
	mov $413,"A\L\ȓIB"
	mov %120,412: mov %121,413:mov %122,24:gosub *messagefont
	$412
	$413@

	mov $414,"|s@܁CgoꕛUUsSI\C"
	mov $415,"\݋ޘvB"
	mov %120,414: mov %121,415:mov %122,24:gosub *messagefont
	$414
	$415@

	mov $416,"mᗜAψ꘢lC"
	mov $417,"Css[ϓICȍˉa\FB"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	mov %120,416: mov %121,420:mov %122,24:gosub *messagefont
	$416
	$417\

	textoff

;wiF[Ăij@ʏtF[h
	bg "bg\dai2kou\yuuyake_d.jpg",12
	delay 2000

	texton

	mov $401,"uB"
	mov $423,"ccݍKEHv"
	mov %120,401: mov %121,401:mov %122,24:gosub *messagefont
	mov %120,423: mov %121,423:mov %122,24:gosub *messagefont
	$401@/
	$423/
	add $401,$423/
	@

	mov $402,"@@"
	mov $403,"uccˑRޘB"
	mov %120,402: mov %121,403:mov %122,24:gosub *messagefont
	br
	$403@

	mov $404,"vCȍmsusKBv"
	mov %120,404: mov %121,404:mov %122,24:gosub *messagefont
	$404@

	mov $405,"@@"
	mov $406,"u@ʕssKCAKJBv"
	mov %120,405: mov %121,406:mov %122,24:gosub *messagefont
	br
	$406@

	mov $407,"@@"
	mov $408,"uӐϖvցCscc"
	mov %120,407: mov %121,408:mov %122,24:gosub *messagefont
	br
	$408@

	mov $409,"sz\ޔБz@藁Bv"
	mov %120,409: mov %121,409:mov %122,24:gosub *messagefont
	$409@

	mov $410,"@@"
	mov $411,"uCYrHv"
	mov %120,410: mov %121,411:mov %122,24:gosub *messagefont
	br
	$411@

	mov $412,"@@"
	mov $413,"uCCޙߋNk߈B"
	mov %120,412: mov %121,413:mov %122,24:gosub *messagefont
	br
	$413@

	mov $414,"_sKIKCӍݐܗB"
	mov %120,414: mov %121,414:mov %122,24:gosub *messagefont
	$414@

	mov $415,"ߔЗ@C{s^IKBv"
	mov %120,415: mov %121,415:mov %122,24:gosub *messagefont
	$415@

	mov $416,"@@"
	mov $417,"uccEB"
	mov %120,416: mov %121,417:mov %122,24:gosub *messagefont
	br
	$417@

	mov $418,"ȁCߘlˉccv"
	mov $419,"@"
	mov $420,"@"
	mov %120,418: mov %121,420:mov %122,24:gosub *messagefont
	$418\


	mov $401,"uߘlHv"
	mov %120,401: mov %121,401:mov %122,24:gosub *messagefont
	$401@

	mov $402,"@@"
	mov $403,"uLIlGBv"
	mov %120,402: mov %121,403:mov %122,24:gosub *messagefont
	br
	$403@

	mov $404,"@@"
	mov $405,"uIlHYrϓIHv"
	mov %120,404: mov %121,405:mov %122,24:gosub *messagefont
	br
	$405@

	mov $406,"@@"
	mov $407,"u꘢NjBs@ҁBv"
	mov %120,406: mov %121,407:mov %122,24:gosub *messagefont
	br
	$407@

	mov $408,"@@"
	mov $409,"uVIǈɁCvߘYrJHIv"
	mov %120,408: mov %121,409:mov %122,24:gosub *messagefont
	br
	$409@

	mov $410,"@@"
	mov $411,"uvLBk䫎mcc֗LIԎVBv"
	mov %120,410: mov %121,411:mov %122,24:gosub *messagefont
	br
	$411@

	mov $412,"@@"
	mov $413,"ucv"
	mov %120,412: mov %121,413:mov %122,24:gosub *messagefont
	br
	$413@

	mov $414,"@@"
	mov $415,"uÓ\aw@OIl֓VC"
	mov $416,"uCSIccv"
	mov %120,414: mov %121,416:mov %122,24:gosub *messagefont
	br
	$415
	$416@

	mov $417,"@@"
	mov $418,"uB"
	mov $419,"@Cǈɖ琥wqBv"
	mov $420,"@"
	mov %120,417: mov %121,420:mov %122,24:gosub *messagefont
	br
	$418
	$419\


	mov $401,"usNYrIOB"
	mov %120,401: mov %121,401:mov %122,24:gosub *messagefont
	$401@

	mov $402,"CccapCcc"
	mov %120,402: mov %121,402:mov %122,24:gosub *messagefont
	$402@

	mov $403,"ȁCuL_㏔Occv"
	mov %120,403: mov %121,403:mov %122,24:gosub *messagefont
	$403@

	QUAKE 20,200

	mov $404,"@@"
	mov $405,"uCفAٕsNIv"
	mov %120,404: mov %121,405:mov %122,24:gosub *messagefont
	br
	$405@

	mov $406,"@@"
	mov $407,"uvICsp݈ӁB"
	mov %120,406: mov %121,407:mov %122,24:gosub *messagefont
	br
	$407@

	mov $408,"s藁cc䓾Oܐ^Cs蓒jlBv"
	mov %120,408: mov %121,408:mov %122,24:gosub *messagefont
	$408@

	mov $409,"@@"
	mov $410,"uVCÁAÓ܁CǈɁccs\Jccv"
	mov %120,409: mov %121,410:mov %122,24:gosub *messagefont
	br
	$410@

	mov $411,"ߘCC֐ꉺJcc"
	mov %120,411: mov %121,411:mov %122,24:gosub *messagefont
	$411@

	mov $412,"ߊ蓓I^H"
	mov $413,"@@"
	mov $414,"u@ʘVBv"
	mov $415,"@"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	mov %120,412: mov %121,420:mov %122,24:gosub *messagefont
	$412
	br
	$414\

	QUAKE 20,200

	mov $401,"ugށCߐ^֓IlIv"
	mov %120,401: mov %121,401:mov %122,24:gosub *messagefont
	$401@

	mov $402,"@@"
	mov $403,"uϗLIlC䐥sIBv"
	mov %120,402: mov %121,403:mov %122,24:gosub *messagefont
	br
	$403@

	mov $404,"@@"
	mov $405,"u鴁C֐^`v"
	mov %120,404: mov %121,405:mov %122,24:gosub *messagefont
	br
	$405@

	mov $406,"@@"
	mov $407,"qlCߏΒnݑKB"
	mov %120,406: mov %121,407:mov %122,24:gosub *messagefont
	br
	$407@

	mov $408,"I\sfB"
	mov %120,408: mov %121,408:mov %122,24:gosub *messagefont
	$408@

	mov $409,"䊴uȎ䕽XCNꍱB"
	mov %120,409: mov %121,409:mov %122,24:gosub *messagefont
	$409@

	mov $410,"ݞFI[}CF󌨑C֒VB"
	mov $411,"@"
	mov $412,"@"
	mov $413,"@"
	mov $414,"@"
	mov $415,"@"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	mov %120,410: mov %121,420:mov %122,24:gosub *messagefont
	$410\


	mov $401,"ꎟFChqI߈VB"
	mov %120,401: mov %121,401:mov %122,24:gosub *messagefont
	$401@

	mov $402,"pCePpC𗹎ЉC"
	mov $403,"߈VCCn݊w@IhqB"
	mov %120,402: mov %121,403:mov %122,24:gosub *messagefont
	$402
	$403@

	mov $404,"ޝ{apNZIC"
	mov $405,"cIsǒ꘢COhqB"
	mov %120,404: mov %121,405:mov %122,24:gosub *messagefont
	$404
	$405@

	mov $406,"@@"
	mov $407,"uuFEZGB"
	mov %120,406: mov %121,407:mov %122,24:gosub *messagefont
	br
	$407@

	mov $408,"ґRL_dIƖCAa\IԁC"
	mov $409,"ߑF\CkDIFBvv"
	mov %120,408: mov %121,409:mov %122,24:gosub *messagefont
	$408
	$409@

	mov $410,"߉@ʘVr܁CcL_ҁC"
	mov $411,"AISp[xݏdIsB"
	mov %120,410: mov %121,411:mov %122,24:gosub *messagefont
	$410
	$411@

	mov $412,"يw@LMCB"
	mov $413,"wF䧗B"
	mov %120,412: mov %121,413:mov %122,24:gosub *messagefont
	$412
	$413@

	mov $414,"RCzva虐lݏhqCߖ灈񎖗B"
	mov %120,414: mov %121,414:mov %122,24:gosub *messagefont
	$414@

	mov $415,"䑖ݑLCS[xB"
	mov %120,415: mov %121,415:mov %122,24:gosub *messagefont
	$415@

	mov $416,"SSȍݜޘhqٖ@[IsB"
	mov %120,416: mov %121,416:mov %122,24:gosub *messagefont
	$416@

	mov $417,"p㗯I[[認ɁC"
	mov $418,"甉ݗjOB"
	mov $419,"@"
	mov $420,"@"
	mov %120,417: mov %121,420:mov %122,24:gosub *messagefont
	$417
	$418\


	mov $401,"⋍ݎʒwmᗜ@FGxIjOC"
	mov $402,"䓞๘v藁H"
	mov %120,401: mov %121,402:mov %122,24:gosub *messagefont
	$401
	$402@

	mov $403,"uĜωsa@CۋNEC"
	mov $404,"yݒ[㱓Icc"
	mov $423,"jʔCB"
	mov %120,403: mov %121,404:mov %122,24:gosub *messagefont
	mov %120,423: mov %121,423:mov %122,24:gosub *messagefont
	$403
	$404@/
	$423/
	add $403,$423/
	@

	mov $405,"@@"
	mov $406,"[㱗oI꘢ەɊIwB"
	mov %120,405: mov %121,406:mov %122,24:gosub *messagefont
	br
	$406@

	mov $407,"ߌaϔ᪓IˁCmʐvIcB"
	mov %120,407: mov %121,407:mov %122,24:gosub *messagefont
	$407@

	mov $408,"{AE\IOeC"
	mov $409,"֏ʓIۙɐ@FIɁC"
	mov $410,"r֌n㗹꘢I嚒BB"
	mov %120,408: mov %121,410:mov %122,24:gosub *messagefont
	$408
	$409
	$410@

	mov $411,"jvߎʓs䑓I美ŁC"
	mov $412,"SoӗIρB"
	mov %120,411: mov %121,412:mov %122,24:gosub *messagefont
	$411
	$412@

	mov $413,"@@"
	mov $414,"\ى䊴\zB"
	mov %120,413: mov %121,414:mov %122,24:gosub *messagefont
	$413
	$414@

	mov $415,"A@ʐ搶YrsvLG䗜I"
	mov $416,"d瓯ىIvُmJB"
	mov $417,"T犮SvLIJB"
	mov %120,415: mov %121,417:mov %122,24:gosub *messagefont
	$415
	$416
	$417@

	mov $418,"ō@œ蒆IC˛fCܒԁB"
	mov $419,"\œ蒆I@CˑꎟCܒԁB"
	mov $420,"@"
	mov %120,418: mov %121,420:mov %122,24:gosub *messagefont
	$418
	$419\


	mov $401,"uuߐFǈɏHvv"
	mov %120,401: mov %121,401:mov %122,24:gosub *messagefont
	$401@

	mov $402,"@@"
	mov $403,"uuccvv"
	mov %120,402: mov %121,403:mov %122,24:gosub *messagefont
	br
	$403@

	mov $404,"@@"
	mov $405,"uccccc"
	mov $423,"Ivv"
	mov %120,404: mov %121,405:mov %122,24:gosub *messagefont
	mov %120,423: mov %121,423:mov %122,24:gosub *messagefont
	br
	$405@/
	$423/
	add $405,$423/
	@

	mov $406,"@@"
	mov $407,"uuccHvv"
	mov %120,406: mov %121,407:mov %122,24:gosub *messagefont
	br
	$407@

	mov $408,"@@"
	mov $409,"u_IߏAIFJI"
	mov %120,408: mov %121,409:mov %122,24:gosub *messagefont
	br
	$409@

	mov $410,"z{@aYrϓIlNC"
	mov $411,"꒼dscc"
	mov %120,410: mov %121,411:mov %122,24:gosub *messagefont
	$410
	$411@

	mov $412,"A@ʐrYIwCߏADI"
	mov %120,412: mov %121,412:mov %122,24:gosub *messagefont
	$412@

	mov $413,"CIv"
	mov %120,413: mov %121,413:mov %122,24:gosub *messagefont
	$413@

	mov $414,"@@"
	mov $415,"IF悍їn}ڒB"
	mov %120,414: mov %121,415:mov %122,24:gosub *messagefont
	br
	$415@

	mov $416,"ґRLfCA֐CIjB"
	mov %120,416: mov %121,416:mov %122,24:gosub *messagefont
	$416@

	mov $417,"C݉zNCCnAϗB"
	mov $418,"FqlV㱓IgnB"
	mov $419,"@"
	mov $420,"@"
	mov %120,417: mov %121,420:mov %122,24:gosub *messagefont
	$417
	$418\


	mov $401,"}[㱁Cs֖vyDD"
	mov $402,"eeЊeϓIVB"
	mov %120,401: mov %121,402:mov %122,24:gosub *messagefont
	$401
	$402@

	mov $403,"AwqzYrYrρC"
	mov $404,"쓚B"
	mov %120,403: mov %121,404:mov %122,24:gosub *messagefont
	$403
	$404@

	mov $405,"smCYrρB"
	mov $406,"ꎟFʁC"
	mov $407,"pnzcؓsG\B"
	mov %120,405: mov %121,407:mov %122,24:gosub *messagefont
	$405
	$406
	$407@

	mov $408,"܋NȔaIC\^n椙ߒC"
	mov $409,"䝝ȓIsKCݙߎȓI̎"
	mov $410,"៣B"
	mov %120,408: mov %121,410:mov %122,24:gosub *messagefont
	$408
	$409
	$410@

	mov $411,"@@"
	mov $412,"\ߊI̎@C"
	mov $413,"ގ䔓\CnqȓIB"
	mov %120,411: mov %121,413:mov %122,24:gosub *messagefont
	br
	$412
	$413@

	mov $414,"乓IƑwiAFB䲓ICA"
	mov $415,"ݐ띷IA{@IA"
	mov $416,"ȋy꘢zz弓oIzB"
	mov %120,414: mov %121,416:mov %122,24:gosub *messagefont
	$414
	$415
	$416@

	mov $417,"A֓[CgV]敁B"
	mov $418,"FEvDB"
	mov $419,"@"
	mov $420,"@"
	mov %120,417: mov %121,420:mov %122,24:gosub *messagefont
	$417
	$418\


	mov $401,"uuߗvҍݖ[㱗IԁC"
	mov $402,"AVkGBvv"
	mov %120,401: mov %121,402:mov %122,24:gosub *messagefont
	$401
	$402@

	mov $403,"c䘸[㱗foC"
	mov $404,"ݏCwTBsvIB"
	mov %120,403: mov %121,404:mov %122,24:gosub *messagefont
	$403
	$404@

	mov $405,"hqAwOAʓCa󌨑B"
	mov %120,405: mov %121,405:mov %122,24:gosub *messagefont
	$405@

	mov $406,"aIaەɊI\"
	mov %120,406: mov %121,406:mov %122,24:gosub *messagefont
	$406@

	mov $407,"ݜޏw@|vLlJFC"
	mov $408,"A֐s[dlVŁB"
	mov %120,407: mov %121,408:mov %122,24:gosub *messagefont
	$407
	$408@

	mov $409,"@@"
	mov $410,"ccsCsρB"
	mov %120,409: mov %121,410:mov %122,24:gosub *messagefont
	br
	$410@

	mov $411,"\lIڌX㽐cB"
	mov %120,411: mov %121,411:mov %122,24:gosub *messagefont
	$411@

	mov $412,"AݓWȓIOeρC"
	mov $413,"\snC鈓sΕΗeB"
	mov %120,412: mov %121,413:mov %122,24:gosub *messagefont
	$412
	$413@

	mov $414,"U㤋㈬NC"
	mov $415,"~\ߊiOlړIOeC\zLlIڌC"
	mov $416,"\\甓ߘn\IƏGB"
	mov %120,414: mov %121,416:mov %122,24:gosub *messagefont
	$414
	$415
	$416@

	mov $417,"@rÓIǖʁC䐥ՒIΗe㤋B"
	mov %120,417: mov %121,417:mov %122,24:gosub *messagefont
	$417@

	mov $418,"yX\[[zB"
	mov $419,"@"
	mov $420,"@"
	mov %120,418: mov %121,420:mov %122,24:gosub *messagefont
	$418\


	mov $401,"s\IOe^IlSsC"
	mov $402,"pnf[xM^PB"
	mov %120,401: mov %121,402:mov %122,24:gosub *messagefont
	$401
	$402@

	mov $403,"uDЊQBvRnϑzB"
	mov %120,403: mov %121,403:mov %122,24:gosub *messagefont
	$403@

	mov $404,"CYrC\\ȓϓI藁cc"
	mov $405,"aV㱁CLYrs藁H"
	mov %120,404: mov %121,405:mov %122,24:gosub *messagefont
	$404
	$405@

	mov $406,"󓞓ItC"
	mov $407,"暔ہCrZ]B"
	mov %120,406: mov %121,407:mov %122,24:gosub *messagefont
	$406
	$407@

	mov $408,"zmYr甗ρB"
	mov $409,"zρBzϔ΁B"
	mov %120,408: mov %121,409:mov %122,24:gosub *messagefont
	$408
	$409@

	mov $410,"ρcc󐶊cc"
	mov %120,410: mov %121,410:mov %122,24:gosub *messagefont
	$410@

	mov $411,"@@"
	mov $412,"\zC\gwkCtӑHB"
	mov %120,411: mov %121,412:mov %122,24:gosub *messagefont
	br
	$412@

	mov $413,"CCnҍݖ[㱗I㱁C"
	mov $414,"ÒnaNlrÁB"
	mov %120,413: mov %121,414:mov %122,24:gosub *messagefont
	$413
	$414@

	mov $415,"R@Cs\n^wF𗬁C"
	mov $416,"__nCȑ\E}NISNSρB"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	mov %120,415: mov %121,420:mov %122,24:gosub *messagefont
	$415
	$416\


	mov $401,"kAœʁC"
	mov $402,"Esٗ^󌨎sRB"
	mov %120,401: mov %121,402:mov %122,24:gosub *messagefont
	$401
	$402@

	mov $403,"\sfCVIjC苉B"
	mov %120,403: mov %121,403:mov %122,24:gosub *messagefont
	$403@

	mov $404,"٘aI˗chC"
	mov $405,"AޘEp@A䲁B"
	mov %120,404: mov %121,405:mov %122,24:gosub *messagefont
	$404
	$405@

	mov $406,"@@"
	mov $407,"\E꘢wegVrxIw@C"
	mov $408,"smE꘢DISЁB"
	mov %120,406: mov %121,408:mov %122,24:gosub *messagefont
	br
	$407
	$408@

	mov $409,"ߘڌC"
	mov $410,"gݖ[㱗IccEsݗB"
	mov %120,409: mov %121,410:mov %122,24:gosub *messagefont
	$409
	$410@

	mov $411,"FGBސw@PΕI䇉ԓINB"
	mov %120,411: mov %121,411:mov %122,24:gosub *messagefont
	$411@

	mov $412,"ޏAݓIIB"
	mov %120,412: mov %121,412:mov %122,24:gosub *messagefont
	$412@

	mov $413,"@@"
	mov $414,"lEِߐl[mIB"
	mov %120,413: mov %121,414:mov %122,24:gosub *messagefont
	br
	$414@

	mov $415,"AC@ݔ\ϊ󓞍KIԁC"
	mov $416,"S㏊JB"
	mov %120,415: mov %121,416:mov %122,24:gosub *messagefont
	$415
	$416@

	mov $417,"漐IpC漎wIw@ʁC"
	mov $418,"֗L"
	mov $419,"@"
	mov $420,"@"
	mov %120,417: mov %121,420:mov %122,24:gosub *messagefont
	$417
	$418\


	mov $401,"urCǈɁH"
	mov %120,401: mov %121,401:mov %122,24:gosub *messagefont
	$401@

	mov $402,"cLYrI@EHv"
	mov %120,402: mov %121,402:mov %122,24:gosub *messagefont
	$402@

	mov $403,"@@"
	mov $404,"ҕs쐺n𔈁B"
	mov %120,403: mov %121,404:mov %122,24:gosub *messagefont
	br
	$404@

	mov $405,"@@"
	mov $406,"ucHґRsmCYrCAߍD悓I藁Bv"
	mov %120,405: mov %121,406:mov %122,24:gosub *messagefont
	br
	$406@

	mov $407,"@@"
	mov $408,"uEHv"
	mov %120,407: mov %121,408:mov %122,24:gosub *messagefont
	br
	$408@

	mov $409,"@@"
	mov $410,"usʍc㗹GBv"
	mov %120,409: mov %121,410:mov %122,24:gosub *messagefont
	br
	$410@

	mov $411,"@@"
	mov $412,"\rܒCϘIo΁B"
	mov $413,"@"
	mov $414,"@"
	mov $415,"@"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	mov %120,411: mov %121,420:mov %122,24:gosub *messagefont
	br
	$412\

	textoff

	lsp 1,":c;bg\dai2kou\yuuyake.jpg",0,-600

	print 1

;wiF[Ăi㔼փXN[j
	for %199=0 to 199
		gettimer %90
		msp 1,0,3,0
		print 1
		waittimer (%90+16)
	next

	delay 2000

	csp 1

;wiFuu肪Ƃvv@tF[h
	bg "cutin\dai2kou\cut12.jpg",12

	delay 2000

;wiFuȂz`悤Bv@tF[h
	bg "cutin\dai2kou\cut13.jpg",12

	delay 2000

;wiFusK̏ɐ藧Ă̂ł͂ȂAv@tF[h
	bg "cutin\dai2kou\cut14.jpg",12

	delay 2000

;wiFu{̍KɓꂽƂɁBv@tF[h
	bg "cutin\dai2kou\cut15.jpg",12

	delay 2000

	bg black,12

	bgmfadeout 2000
	bgmstop

	delay 3000

;ʉF̐iiv[vj
	bgm "bgm\se-015.mp3"

;wiF̊OρE@ʏtF[h
	bg "bg\dai2kou\ryou_yoru.jpg",12

	delay 2000

;ʉ@ʂTO_E
	mov %60,50
	bgmvol (%3001*%60/100)

;wiFLb`
	bg "bg\dai2kou\ryou_kitchin.jpg",12
	delay 3000

;wiFLb`iuj@tF[hȂ
	bg "bg\dai2kou\ryou_kitchin_bure.jpg",12

;G\F@iyjEΊ@ʒuF
;G\F@Eʏ@ʒuFE
	ld r,":a;tatie\sei\sei_sihuku_tuujyou.bmp",0
	ld l,":a;tatie\risa\risa_keisou_tuujyou.bmp",12
	delay 2000

	texton

	mov $401,"usDӎvCߔh鏪Bv"
	mov %120,401: mov %121,401:mov %122,24:gosub *messagefont
	$401@

	mov $402,"@@"
	mov $403,"ucvgnBv"
	mov %120,402: mov %121,403:mov %122,24:gosub *messagefont
	br
	$403@

	mov $404,"@@"
	mov $405,"uCkB"
	mov $406,"adlNh趍XCS藁Bv"
	mov %120,404: mov %121,406:mov %122,24:gosub *messagefont
	br
	$405
	$406@

	mov $407,"@@"
	mov $408,"hqI{~[C"
	mov $409,"ZݜވꙪIlgpInB"
	mov %120,407: mov %121,409:mov %122,24:gosub *messagefont
	br
	$408
	$409@

	mov $410,"{ޗplϒVIC"
	mov $411,"ARޗzݗ塑SIBTC"
	mov $412,"c_犮SvVB"
	mov %120,410: mov %121,412:mov %122,24:gosub *messagefont
	$410
	$411
	$412@

	mov $413,"@_SA鏪AҎ֓B"
	mov %120,413: mov %121,413:mov %122,24:gosub *messagefont
	$413@

	mov $414,"LCzshqIp`㱁C"
	mov $415,"LlݜޗÎrB"
	mov %120,414: mov %121,415:mov %122,24:gosub *messagefont
	$414
	$415@

	mov $416,"@@"
	mov $417,"uukA\DCǈɁCߊŉXJBvv"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	mov %120,416: mov %121,420:mov %122,24:gosub *messagefont
	br
	$417\


	textoff

	cl l,12

	texton


	mov $401,"rܒCՓIu\o"
	mov $402,"ΑژaP`B"
	mov %120,401: mov %121,402:mov %122,24:gosub *messagefont
	$401
	$402@

	mov $403,"㕪dp㈍mʒwkx"
	mov $404,"iIʎ̏\B"
	mov %120,403: mov %121,404:mov %122,24:gosub *messagefont
	$403
	$404@

	mov $405,"gpuCCߖH{"
	mov $406,"ݏʎʏe孒B"
	mov $407,"@ʕsSczGVI@Y㈝\oC"
	mov $408,"EᛀFsȁB"
	mov %120,405: mov %121,408:mov %122,24:gosub *messagefont
	$405
	$406
	$407
	$408@

	mov $409,"ܐQiI召w@CAswqB"
	mov $410,"cL`AoVB"
	mov %120,409: mov %121,410:mov %122,24:gosub *messagefont
	$409
	$410@

	mov $411,"@@"
	mov $412,"ꔫCEyݍDqᚗpgFIH趁B"
	mov $413,"q趓sDB"
	mov %120,411: mov %121,413:mov %122,24:gosub *messagefont
	br
	$412
	$413@

	mov $414,"ΑځAP`A"
	mov $423,"֗LuKB"
	mov %120,414: mov %121,414:mov %122,24:gosub *messagefont
	mov %120,423: mov %121,423:mov %122,24:gosub *messagefont
	$414@/
	$423/
	add $414,$423/
	@

	mov $415,"RۙۓI띷ƖIu"
	mov %120,415: mov %121,415:mov %122,24:gosub *messagefont
	$415@

	mov $416,"\鴒SVC"
	mov $417,"SaqjzߓIw弓́xB"
	mov %120,416: mov %121,417:mov %122,24:gosub *messagefont
	$416
	$417@

	mov $418,"\鴓֓dD߁B"
	mov $419,"\cÓTSIa|s@ʁB"
	mov $420,"@"
	mov %120,418: mov %121,420:mov %122,24:gosub *messagefont
	$418
	$419\


	mov $401,"ŒZIweCAus֗B"
	mov %120,401: mov %121,401:mov %122,24:gosub *messagefont
	$401@

	mov $402,"csC@ʑҒnŒC"
	mov $403,"ρC\\urHvC"
	mov $404,"r莊ώqCcCB"
	mov %120,402: mov %121,404:mov %122,24:gosub *messagefont
	$402
	$403
	$404@

	mov $405,"u_CuIC"
	mov $406,"dO衉eLloI莁B"
	mov %120,405: mov %121,406:mov %122,24:gosub *messagefont
	$405
	$406@

	mov $407,"\NyTPpC"
	mov $408,"\ԛdIVYEځB"
	mov %120,407: mov %121,408:mov %122,24:gosub *messagefont
	$407
	$408@

	mov $409,"@@"
	mov $410,"wVS䗓}JV"
	mov $411,"CnvRx"
	mov %120,409: mov %121,411:mov %122,24:gosub *messagefont
	br
	$410
	$411@

	mov $412,"@@"
	mov $413,"ޘ~[㱁CB݊e[㱗"
	mov $414,"AyB"
	mov %120,412: mov %121,414:mov %122,24:gosub *messagefont
	br
	$413
	$414@

	mov $415,"衉eAÉ戽莓IwC悎՗I"
	mov $416,"{ܐvLIB"
	mov %120,415: mov %121,416:mov %122,24:gosub *messagefont
	$415
	$416@

	mov $417,"ޗ^u笓InC"
	mov $418,"򐥉fːI@B"
	mov %120,417: mov %121,418:mov %122,24:gosub *messagefont
	$417
	$418@

	mov $419,"Rw@LBw\^u笓IC"
	mov $420,"CŔjޔПIfCss蓌}B"
	mov %120,419: mov %121,420:mov %122,24:gosub *messagefont
	$419
	$420\

;ʉFW`W`itCpj@iv[v
	mov %61,100
	chvol 1,(%3002*%61/100)
	dwaveloop 1,"wave\niku3.wav" : mov $30,"wave\niku3.wav"

	mov $401,"䘸ANX蓕B"
	mov %120,401: mov %121,401:mov %122,24:gosub *messagefont
	$401@

	mov $402,"{As蓓ߍۏo|䊓I"
	mov $403,"衉e@IB"
	mov %120,402: mov %121,403:mov %122,24:gosub *messagefont
	$402
	$403@

	mov $404,"pC甉\ލC"
	mov $405,"nyݗjNϓIhNC"
	mov $406,"AśfC֐v\ݖeiB"
	mov %120,404: mov %121,406:mov %122,24:gosub *messagefont
	$404
	$405
	$406@

	mov $407,"@@"
	mov $408,"弉ݜޘny㤋B"
	mov $409,"sCVOC\{sݖZVØa"
	mov %120,407: mov %121,409:mov %122,24:gosub *messagefont
	br
	$408
	$409@

	mov $410,"w蚓gA^ƐlMC"
	mov $411,"VZwgAaƐlʐMC"
	mov $412,"ݔZvCds[㗹B"
	mov %120,410: mov %121,412:mov %122,24:gosub *messagefont
	$410
	$411
	$412@

	mov $413,"uސ\IԁBv"
	mov $414,"ƗIʐr嗹ƐlIl"
	mov %120,413: mov %121,414:mov %122,24:gosub *messagefont
	$413
	$414@

	mov $415,"ƗIʐr嗹ƐlIlC"
	mov $416,"wqFI㱁C"
	mov $417,"r䋎wZIʁCޏAߘƁB"
	mov %120,415: mov %121,417:mov %122,24:gosub *messagefont
	$415
	$416
	$417@

	mov $418,"ݓϔIFC"
	mov $419,"s[ISȗB"
	mov $420,"@"
	mov %120,418: mov %121,420:mov %122,24:gosub *messagefont
	$418
	$419\


	mov $401,"uC{ߍEځC"
	mov $402,"NB"
	mov %120,401: mov %121,402:mov %122,24:gosub *messagefont
	$401
	$402@

	mov $403,"Ƙa}̑TMYrIC"
	mov $404,"ݓiFxIB"
	mov %120,403: mov %121,404:mov %122,24:gosub *messagefont
	$403
	$404@

	mov $405,"ܓCdIA^H"
	mov $406,"}̉sGlCCvYrsB"
	mov %120,405: mov %121,406:mov %122,24:gosub *messagefont
	$405
	$406@

	mov $407,"ŒߍlefoI@Cǒ@qIl"
	mov %120,407: mov %121,407:mov %122,24:gosub *messagefont
	$407@

	mov $408,"˕sv藁B~퐥QE㱁Bx"
	mov $409,"c[WnܓB"
	mov %120,408: mov %121,409:mov %122,24:gosub *messagefont
	$408
	$409@

	mov $410,"ܒCIoꕛ[WI\B"
	mov %120,410: mov %121,410:mov %122,24:gosub *messagefont
	$410@

	mov $411,"@@"
	mov $412,"zNCVFI߈ʁwVx"
	mov $413,"DIԁB"
	mov %120,411: mov %121,413:mov %122,24:gosub *messagefont
	br
	$412
	$413@

	mov $414,"M^lƎȓIvapI@B"
	mov %120,414: mov %121,414:mov %122,24:gosub *messagefont
	$414@

	mov $415,"g|C[rވ_C"
	mov $416,"l֐\SIHCśfQB"
	mov %120,415: mov %121,416:mov %122,24:gosub *messagefont
	$415
	$416@

	mov $417,"uC惏A㐥rܓIvCA~vlC"
	mov $418,"ᎩȔK@ۓ{nېCVOpێҁB"
	mov %120,417: mov %121,418:mov %122,24:gosub *messagefont
	$417
	$418@

	mov $419,"lSCpCYr\ϓIH"
	mov %120,419: mov %121,419:mov %122,24:gosub *messagefont
	$419@

	mov $420,"sccC@CˉǋCIwxJB"
	mov %120,420: mov %121,420:mov %122,24:gosub *messagefont
	$420\


	textoff

;ʉFW`W`itCpj@~
	dwavestop 1 : mov $30,""

	delay 1000

;G\F@iyjEΊ@ʒuF
	ld l,":a;tatie\risa\risa_keisou_tuujyou.bmp",12

	texton

	mov $401,"uvk`v"
	mov %120,401: mov %121,401:mov %122,24:gosub *messagefont
	$401@

	mov $402,"@@"
	mov $403,"uؓIˑR◹C"
	mov $404,"qu趓I愎qiB"
	mov %120,402: mov %121,404:mov %122,24:gosub *messagefont
	br
	$403
	$404@

	mov $405,"@@"
	mov $406,"uC苋pJBv"
	mov %120,405: mov %121,406:mov %122,24:gosub *messagefont
	br
	$406@

	mov $407,"@@"
	mov $408,"uccccccv"
	mov %120,407: mov %121,408:mov %122,24:gosub *messagefont
	br
	$408@

	mov $409,"@@"
	mov $410,"urH"
	mov %120,409: mov %121,410:mov %122,24:gosub *messagefont
	br
	$410@

	mov $411,"CNَqCpIqXDEHv"
	mov %120,411: mov %121,411:mov %122,24:gosub *messagefont
	$411@

	mov $412,"@@"
	mov $413,"usρc"
	mov %120,412: mov %121,413:mov %122,24:gosub *messagefont
	br
	$413@

	mov $414,"CCYrc"
	mov $423,"u趐FIHv"
	mov %120,414: mov %121,414:mov %122,24:gosub *messagefont
	mov %120,423: mov %121,423:mov %122,24:gosub *messagefont
	$414@/
	$423/
	add $414,$423/
	@

	mov $415,"@@"
	mov $416,"uCԉ֛lBv"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	mov %120,415: mov %121,420:mov %122,24:gosub *messagefont
	br
	$416\


	mov $401,"\Ւ΁CS`Wʒn񓚁Cވʍݐ띷ʑIwB"
	mov %120,401: mov %121,401:mov %122,24:gosub *messagefont
	$401@

	mov $402,"u趉ԉ֛lC^nIB"
	mov %120,402: mov %121,402:mov %122,24:gosub *messagefont
	$402@

	mov $403,"܋NCD֗Lhi`lIxc"
	mov %120,403: mov %121,403:mov %122,24:gosub *messagefont
	$403@

	mov $404,"@@"
	mov $405,"ucjBv"
	mov %120,404: mov %121,405:mov %122,24:gosub *messagefont
	br
	$405@

	mov $406,"@@"
	mov $407,"CٕgsLCIlB"
	mov %120,406: mov %121,407:mov %122,24:gosub *messagefont
	br
	$407@

	mov $408,"^ܐ`OFCXЋߓIFßB@C"
	mov $409,"䏫ߜIu趑B"
	mov %120,408: mov %121,409:mov %122,24:gosub *messagefont
	$408
	$409@

	mov $410,"@@"
	mov $411,"ucccv"
	mov %120,410: mov %121,411:mov %122,24:gosub *messagefont
	br
	$411@

	mov $412,"@@"
	mov $413,"u֕sJHv"
	mov %120,412: mov %121,413:mov %122,24:gosub *messagefont
	br
	$413@

	mov $414,"@@"
	mov $415,"zےIK֗vDrC"
	mov $416,"ӊOn曑oSVIB"
	mov %120,414: mov %121,416:mov %122,24:gosub *messagefont
	br
	$415
	$416@

	mov $417,"sCޛsu趓IB"
	mov %120,417: mov %121,417:mov %122,24:gosub *messagefont
	$417@

	mov $418,"Ac`趓IeCuKρc"
	mov $419,"@"
	mov $420,"@"
	mov %120,418: mov %121,420:mov %122,24:gosub *messagefont
	$418\


	mov $401,"uc|ss[Bv"
	mov %120,401: mov %121,401:mov %122,24:gosub *messagefont
	$401@

	mov $402,"@@"
	mov $403,"u^daCǈɁB"
	mov %120,402: mov %121,403:mov %122,24:gosub *messagefont
	br
	$403@

	mov $404,"ߗ܁CޘEALus[vauss[vq\EH"
	mov $405,"Ó񓾜ϓ\sEHv"
	mov %120,404: mov %121,405:mov %122,24:gosub *messagefont
	$404
	$405@

	mov $406,"@@"
	mov $407,"ucraˍDcv"
	mov %120,406: mov %121,407:mov %122,24:gosub *messagefont
	br
	$407@

	mov $408,"@@"
	mov $409,"uARn܊JBv"
	mov %120,408: mov %121,409:mov %122,24:gosub *messagefont
	br
	$409@

	mov $410,"@@"
	mov $411,"ӁCVCܗu⋍ݕsKIٗʏAKvDB"
	mov $412,"@܈C⋍ݚs[IٗʏȊ蓁c"
	mov %120,410: mov %121,412:mov %122,24:gosub *messagefont
	br
	$411
	$412@

	mov $413,"䐥sD藁B"
	mov $414,"ssKaKCss[a蓁B"
	mov %120,413: mov %121,414:mov %122,24:gosub *messagefont
	$413
	$414@

	mov $415,"ŎCpnsB"
	mov $416,"cc^汛B"
	mov %120,415: mov %121,416:mov %122,24:gosub *messagefont
	$415
	$416@

	mov $417,"ccDÛB"
	mov %120,417: mov %121,417:mov %122,24:gosub *messagefont
	$417@

	mov $418,"@@"
	mov $419,"w\ډŐVVY\x"
	mov $420,"@"
	mov %120,418: mov %121,420:mov %122,24:gosub *messagefont
	br
	$419\

	bgmfadeout 1000
	bgmstop

	mov $401,"wV߂Q_QOECg耗VwېC"
	mov $402,"ꖼwphqǓwI\x"
	mov %120,401: mov %121,402:mov %122,24:gosub *messagefont
	$401
	$402@

	mov $403,"@@"
	mov $404,"^甐lsIVYB"
	mov $405,"sR拑ztC"
	mov $406,"蒆IFu}◹B"
	mov %120,403: mov %121,406:mov %122,24:gosub *messagefont
	br
	$404
	$405
	$406@

	mov $407,"@@"
	mov $408,"ŋߐېIwqV㱓IQvB"
	mov %120,407: mov %121,408:mov %122,24:gosub *messagefont
	br
	$408@

	mov $409,"ވؓIC[CNIHVB"
	mov $410,"h耈ꖼjwCCڎZЋ\C"
	mov $411,"CSOǓwIB"
	mov %120,409: mov %121,411:mov %122,24:gosub *messagefont
	$409
	$410
	$411@

	mov $412,"ݓߌړoܓV@C"
	mov $413,"r耓IꏊېIlB"
	mov %120,412: mov %121,413:mov %122,24:gosub *messagefont
	$412
	$413@

	mov $414,"N笋I\ґFIB"
	mov $415,"ܒ[IhCۓ{ҎgIڎsÁB"
	mov %120,414: mov %121,415:mov %122,24:gosub *messagefont
	$414
	$415@

	mov $416,"IgAuU{C"
	mov $417,"ensېwqV㱓IݑcB"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	mov %120,416: mov %121,420:mov %122,24:gosub *messagefont
	$416
	$417\


	textoff

;G\F@iyjEs@ʒuF
	ld l,":a;tatie\risa\risa_keisou_human.bmp",12

	texton

	mov $401,"ugށCޘH{^@Bv"
	mov %120,401: mov %121,401:mov %122,24:gosub *messagefont
	$401@

	mov $402,"@@"
	mov $403,"u@Hv"
	mov %120,402: mov %121,403:mov %122,24:gosub *messagefont
	br
	$403@

	mov $404,"@@"
	mov $405,"uٛC@B"
	mov $406,"ݔCޔЎACnюٍB"
	mov %120,404: mov %121,406:mov %122,24:gosub *messagefont
	br
	$405
	$406@

	mov $407,"ܓCCZЋ\ܒvIsǓIԁC"
	mov $408,"ϐRIJBv"
	mov %120,407: mov %121,408:mov %122,24:gosub *messagefont
	$407
	$408@

	mov $409,"@@"
	mov $410,"uccLϓIݑcEHv"
	mov %120,409: mov %121,410:mov %122,24:gosub *messagefont
	br
	$410@

	mov $411,"@@"
	mov $412,"uu߉\S՘MBIƚGH"
	mov $413,"N{CF\X얾nrVBvv"
	mov %120,411: mov %121,413:mov %122,24:gosub *messagefont
	br
	$412
	$413@

	mov $414,"@@"
	mov $415,"ܒCpocBC"
	mov $416,"uIvnCBB"
	mov %120,414: mov %121,416:mov %122,24:gosub *messagefont
	br
	$415
	$416@

	mov $417,"ݍOCLlI@݁B"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	mov %120,417: mov %121,420:mov %122,24:gosub *messagefont
	$417\


	mov $401,"u@cc"
	mov %120,401: mov %121,401:mov %122,24:gosub *messagefont
	$401@

	mov $402,"ٗC˒񓞓IߘatkkxbhcdvwYrHv"
	mov %120,402: mov %121,402:mov %122,24:gosub *messagefont
	$402@

	mov $403,"@@"
	mov $404,"uatkkxi\jarthbhcdij݈NC"
	mov $405,"Aatkkxbhcdi\jB"
	mov %120,403: mov %121,405:mov %122,24:gosub *messagefont
	br
	$404
	$405@

	mov $406,"sCVO{IُہB"
	mov $407,"CIe{sfJBv"
	mov %120,406: mov %121,407:mov %122,24:gosub *messagefont
	$406
	$407@

	mov $408,"@@"
	mov $409,"ucccv"
	mov %120,408: mov %121,409:mov %122,24:gosub *messagefont
	br
	$409@

	mov $410,"@@"
	mov $411,"܍ݔېIC"
	mov $412,"ݓ{㉉B"
	mov %120,410: mov %121,412:mov %122,24:gosub *messagefont
	br
	$411
	$412@

	mov $413,"\ҋlʎSIEBC"
	mov $414,"蕎{\Җό}SB"
	mov %120,413: mov %121,414:mov %122,24:gosub *messagefont
	$413
	$414@

	mov $415,"όHwIC"
	mov $416,"s~濓{藁H"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	mov %120,415: mov %121,420:mov %122,24:gosub *messagefont
	$415
	$416\


	mov $401,"uC@CIlFnza@rVC"
	mov $402,"ƍŚIBǁB"
	mov %120,401: mov %121,402:mov %122,24:gosub *messagefont
	$401
	$402@

	mov $403,"ݓߗCl桛wqRIB"
	mov %120,403: mov %121,403:mov %122,24:gosub *messagefont
	$403@

	mov $404,"wZ֗LIIS玁C"
	mov $405,"vꈽVGC鈓s\^椙ߓIԁBv"
	mov %120,404: mov %121,405:mov %122,24:gosub *messagefont
	$404
	$405@

	mov $406,"@@"
	mov $407,"cc^hB"
	mov %120,406: mov %121,407:mov %122,24:gosub *messagefont
	br
	$407@

	mov $408,"sCFӍ݉rV㉺vCޓ_瀓mB"
	mov %120,408: mov %121,408:mov %122,24:gosub *messagefont
	$408@

	mov $409,"uFwZٕsBې\vIwZC"
	mov $410,"au@ʍ݉FwZې\C"
	mov $411,"Fo\^rvIwZ"
	mov %120,409: mov %121,411:mov %122,24:gosub *messagefont
	$409
	$410
	$411@

	mov $412,"wqFXSIwZ藁H"
	mov %120,412: mov %121,412:mov %122,24:gosub *messagefont
	$412@

	mov $413,"@@"
	mov $414,"wghCZ\C"
	mov $415,"sٍswI\sCC"
	mov $416,"IwܓeϑB"
	mov %120,413: mov %121,416:mov %122,24:gosub *messagefont
	br
	$414
	$415
	$416@

	mov $417,"RCwIƒC"
	mov $418,"pᗹꕕGܑǓwoIM"
	mov $419,"@"
	mov $420,"@"
	mov %120,417: mov %121,420:mov %122,24:gosub *messagefont
	$417
	$418\

	textoff

;G\F@iyjE΁@ʒuF
	ld l,":a;tatie\risa\risa_keisou_kusyou.bmp",12

	texton

	mov $401,"u{֐scv"
	mov %120,401: mov %121,401:mov %122,24:gosub *messagefont
	$401@

	mov $402,"@@"
	mov $403,"uccBv"
	mov %120,402: mov %121,403:mov %122,24:gosub *messagefont
	br
	$403@

	mov $404,"@@"
	mov $405,"Ih䗑[{C"
	mov $406,"ېIClp\B"
	mov %120,404: mov %121,406:mov %122,24:gosub *messagefont
	br
	$405
	$406@

	mov $407,"Cl𗹁CwqArˁB"
	mov %120,407: mov %121,407:mov %122,24:gosub *messagefont
	$407@

	mov $408,"gzLoCٖ@B"
	mov %120,408: mov %121,408:mov %122,24:gosub *messagefont
	$408@

	mov $409,"śfC\\ȋҒlccLq\B"
	mov %120,409: mov %121,409:mov %122,24:gosub *messagefont
	$409@

	mov $410,"@@"
	mov $411,"wqFݑcCl˛fӛΓ"
	mov $412,"Cn\^rVB"
	mov %120,410: mov %121,412:mov %122,24:gosub *messagefont
	br
	$411
	$412@

	mov $413,"ݜޘM萓VOC"
	mov $414,"։Ll▽藁H"
	mov $415,"@"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	mov %120,413: mov %121,420:mov %122,24:gosub *messagefont
	$413
	$414\

	textoff

	bg black,16

	delay 4000

;;wiFucv
	bg "cutin\dai2kou\cut17.jpg",12
	delay 3000

;;wiFuv΁ABv
	bg "cutin\dai2kou\cut18.jpg",12
	delay 3000

	bg black,12

	delay 2000

;wiFwZ̋imNj@tF[h
	bg "bg\dai2kou\syougakkou_sirokuro.jpg",0
	print 99,4000,"cascade.dll/dx"

;wiFwZ̋@ʏtF[h
	bg "bg\dai2kou\syougakkou.jpg",12

	delay 3000

	texton

	mov $401,"uˁcc܏YrHv"
	mov %120,401: mov %121,401:mov %122,24:gosub *messagefont
	$401@

	mov $402,"@@"
	mov $403,"ÓICnߘNB"
	mov %120,402: mov %121,403:mov %122,24:gosub *messagefont
	br
	$403@

	mov $404,"LISScIہB"
	mov %120,404: mov %121,404:mov %122,24:gosub *messagefont
	$404@

	mov $405,"CIۛEʓ㱕߁B"
	mov %120,405: mov %121,405:mov %122,24:gosub *messagefont
	$405@

	mov $406,"@@"
	mov $407,"umSCdϋ߉Iv"
	mov %120,406: mov %121,407:mov %122,24:gosub *messagefont
	br
	$407@

	mov $408,"@@"
	mov $409,"N|s๘nܓB"
	mov %120,408: mov %121,409:mov %122,24:gosub *messagefont
	br
	$409@

	mov $410,"Ȉ꘢wq܁CI\iO┙B"
	mov %120,410: mov %121,410:mov %122,24:gosub *messagefont
	$410@

	mov $411,"zCޔЉN蛓IƌCܒvډI"
	mov $412,"ېIC"
	mov $413,"݉suٔB"
	mov %120,411: mov %121,413:mov %122,24:gosub *messagefont
	$411
	$412
	$413@

	mov $414,"@@"
	mov $415,"umSIHv"
	mov %120,414: mov %121,415:mov %122,24:gosub *messagefont
	br
	$415@

	mov $416,"@@"
	mov $417,"uIXsmSIFI˘aVkIہCSsmSIv"
	mov %120,416: mov %121,417:mov %122,24:gosub *messagefont
	br
	$417@

	mov $418,"@@"
	mov $419,"uccIv"
	mov $420,"@"
	mov %120,418: mov %121,420:mov %122,24:gosub *messagefont
	br
	$419\


	mov $401,"wqIg䐥cB"
	mov $402,"As汓@gpInρB"
	mov %120,401: mov %121,402:mov %122,24:gosub *messagefont
	$401
	$402@

	mov $403,"@@"
	mov $404,"uB"
	mov $405,"wsvaߍۓIlFBx"
	mov %120,403: mov %121,405:mov %122,24:gosub *messagefont
	br
	$404
	$405@

	mov $406,"CۓIloۓIwC"
	mov $407,"F݈N|Bv"
	mov %120,406: mov %121,407:mov %122,24:gosub *messagefont
	$406
	$407@

	mov $408,"@@"
	mov $409,"u݁CJNIv"
	mov %120,408: mov %121,409:mov %122,24:gosub *messagefont
	br
	$409@

	mov $410,"@@"
	mov $411,"ǏIo~B"
	mov %120,410: mov %121,411:mov %122,24:gosub *messagefont
	br
	$411@

	mov $412,"AZCߏ΁CޔُܓIԖٕs\팴ZB"
	mov %120,412: mov %121,412:mov %122,24:gosub *messagefont
	$412@

	mov $413,"@@"
	mov $414,"uߑFsumSEHv"
	mov %120,413: mov %121,414:mov %122,24:gosub *messagefont
	br
	$414@

	mov $415,"@@"
	mov $416,"u˖vL藁Iv"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	mov %120,415: mov %121,420:mov %122,24:gosub *messagefont
	br
	$416\


	mov $401,"g폗~C"
	mov $402,"jwˑRꕛ|s݈ӓIώqCzۓځB"
	mov %120,401: mov %121,402:mov %122,24:gosub *messagefont
	$401
	$402@

	mov $403,"݉zNC"
	mov $404,"ޑTޘNijwqLIߓxB"
	mov %120,403: mov %121,404:mov %122,24:gosub *messagefont
	$403
	$404@

	mov $405,"@@"
	mov $406,"ccBC䓖LoB"
	mov %120,405: mov %121,406:mov %122,24:gosub *messagefont
	br
	$406@

	mov $407,"ϓIԁC~A꘢jw"
	mov $408,"cwMLI߁B"
	mov %120,407: mov %121,408:mov %122,24:gosub *messagefont
	$407
	$408@

	mov $409,"cc"
	mov $423,"C䓖kCSٖ@ZB"
	mov $410,"@"
	mov $411,"@"
	mov $412,"@"
	mov $413,"@"
	mov $414,"@"
	mov $415,"@"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	mov %120,409: mov %121,420:mov %122,24:gosub *messagefont
	mov %120,423: mov %121,423:mov %122,24:gosub *messagefont
	$409@/
	$423/
	add $409,$423/
	\


	mov $401,"ucc]JBv"
	mov %120,401: mov %121,401:mov %122,24:gosub *messagefont
	$401@

	mov $402,"@@"
	mov $403,"uHv"
	mov %120,402: mov %121,403:mov %122,24:gosub *messagefont
	br
	$403@

	mov $404,"@@"
	mov $405,"u]Iv"
	mov %120,404: mov %121,405:mov %122,24:gosub *messagefont
	br
	$405@

	mov $406,"@@"
	mov $407,"C䘸vLۓ{C"
	mov $408,"ꐶVALwI{B"
	mov %120,406: mov %121,408:mov %122,24:gosub *messagefont
	br
	$407
	$408@

	mov $409,"@@"
	mov $410,"cc꒼}ȏIlB"
	mov $411,"@"
	mov $412,"@"
	mov $413,"@"
	mov $414,"@"
	mov $415,"@"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	mov %120,409: mov %121,420:mov %122,24:gosub *messagefont
	br
	$410\

	textoff

;ʉFSIIiS@j
	dwave 2,"wave\MetalC11.wav"
;wiFS̕ǁ@tF[hȂ
	bg "cutin\dai2kou\kabe.jpg",1
	delay 3000

	texton

	mov $401,"ܐ}C"
	mov $402,"AߛsӖAB"
	mov %130,401
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@


	mov $403,"gZIHC"
	mov $404,"FNޓSNI[nB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@


	mov $405,"[~捔ʓISS訁C"
	mov $406,"LCIB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@



;ʉFSIIiS@j
	dwave 2,"wave\MetalC11.wav"
	QUAKE 30,200

	mov $407,"@@"
	mov $408,"RCݓIeL܌B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@


	mov $409,"pI┙ڌC^pIdB"
	mov $410,"pߔ߈I_B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@


	mov $411,"꒼ȗ}IIC"
	mov $412,"Eۓ{{vtjߓgǗB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@


	mov $413,"@@"
	mov $414,"uݓ]IԁCAZ߁Bv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@


	mov $415,"@@"
	mov $416,"u低I"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@


	mov $417,"mSIlmSC"
	mov $418,"LYr֘EHv"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\

;ʉFSIIiS@j
	dwave 2,"wave\MetalC11.wav"
	QUAKE 30,200


	mov $401,"u]ccv"
	mov %120,401: mov %121,401:mov %122,24:gosub *messagefont
	$401@

	mov $402,"@@"
	mov $403,"u˕s藁Bv"
	mov %120,402: mov %121,403:mov %122,24:gosub *messagefont
	br
	$403@

;ʉFSIIiS@j
	dwave 2,"wave\MetalC11.wav"
	QUAKE 30,300

	mov $404,"@@"
	mov $405,"u䋩ߓ]ccv"
	mov %120,404: mov %121,405:mov %122,24:gosub *messagefont
	br
	$405@



	mov $406,"@@"
	mov $407,"u低ImSSdċz󟃗Iv"
	mov %120,406: mov %121,407:mov %122,24:gosub *messagefont
	br
	$407@

;ʉFSIIiS@j
	dwave 2,"wave\MetalC11.wav"
	QUAKE 40,400

	mov $408,"@@"
	mov $409,"u]Iv"
	mov %120,408: mov %121,409:mov %122,24:gosub *messagefont
	br
	$409@

	mov $410,"@@"
	mov $411,"u^WlC߁I稜_I"
	mov %120,410: mov %121,411:mov %122,24:gosub *messagefont
	br
	$411@

	mov $412,"@@"
	mov $413,"ߜޘlIIv"
	mov $414,"@"
	mov $415,"@"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	mov %120,412: mov %121,420:mov %122,36:gosub *messagefont
	br
	$413\

	windoweffect 1
	textoff

;ʉFhSIIIIIIIIiS@j
	dwave 2,"wave\MetalC11_2.wav"
	QUAKE 50,500
	bg black,12
;ʉFb̚X萺
	dwave 3,"wave\kemono_hoeru.wav"
	wait 3000

;wiFwZ̋@ʏtF[h
	bg "bg\dai2kou\syougakkou.jpg",12

	windoweffect 10,500
	texton

	mov $401,"uCEcc"
	mov $423,"ZB"
	mov %120,401: mov %121,401:mov %122,24:gosub *messagefont
	mov %120,423: mov %121,423:mov %122,24:gosub *messagefont
	$401@/
	$423/
	add $401,$423/
	@

	mov $402,"ݏAZߓ]CsZߗBv"
	mov %120,402: mov %121,402:mov %122,24:gosub *messagefont
	textspeed 200
	$402@

	mov $403,"@@"
	mov $404,"ŔjB"
	mov %120,403: mov %121,404:mov %122,24:gosub *messagefont
	br
	$404@

	mov $405,"喝nC喝ncc"
	mov %120,405: mov %121,405:mov %122,24:gosub *messagefont
	$405@

	mov $406,"@ݐaCCԝQএoIʁC"
	mov $407,"Iʏ钀暎xzB"
	mov %120,406: mov %121,407:mov %122,24:gosub *messagefont
	$406
	$407@

	mov $408,"s[B"
	mov $423,"s[As[As[As[As[B"
	mov %120,408: mov %121,408:mov %122,24:gosub *messagefont
	mov %120,423: mov %121,423:mov %122,24:gosub *messagefont
	$408@/
	$423
	add $408,$423

	mov $409,"CAs[߁I"
	mov %120,409: mov %121,409:mov %122,24:gosub *messagefont
	$409@

	mov $410,"@@"
	mov $411,"A݊OB"
	mov %120,410: mov %121,411:mov %122,24:gosub *messagefont
	br
	$411@

	mov $412,"IGnCsߏIlB"
	mov %120,412: mov %121,412:mov %122,24:gosub *messagefont
	$412@

	mov $413,"pGƋ֊CޕГynI忔VlB"
	mov %120,413: mov %121,413:mov %122,24:gosub *messagefont
	$413@

	mov $414,"{Cٕs\竁B"
	mov %120,414: mov %121,414:mov %122,24:gosub *messagefont
	$414@

	mov $415,"|CLYr݉萖߁B"
	mov %120,415: mov %121,415:mov %122,24:gosub *messagefont
	$415@

	mov $416,"@@"
	mov $417,"cc߁H"
	mov %120,416: mov %121,417:mov %122,24:gosub *messagefont
	br
	$417@

	mov $418,"sCsفBޕs߁B"
	mov $423,"ސccIÖ]B"
	mov $419,"@"
	mov $420,"@"
	mov %120,418: mov %121,420:mov %122,24:gosub *messagefont
	mov %120,423: mov %121,423:mov %122,24:gosub *messagefont
	$418@/
	$423/
	add $418,$423/
	\

	textoff

;BGMFfree41.mp3@iv[v
	bgm "bgm\free41.mp3"

;wiFuuȂĂAoPmɁvv@Rb\Ĕwi߂@tF[hȂ
	lsp 1,":c;cutin\dai2kou\cut19.jpg",0,0
	print 1

	wait 3000

	csp 1

	print 1

	texton

	mov $401,"ߐ⓾ߐl᫁B"
	mov %130,401
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@


	mov $402,"@uI{wCg̖ҒnKZB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $403,"EsĐߘÓIB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"@@"
	mov $405,"OIˑRݚ{܏΁B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"ܗzܓIԁCSTkDJB"
	mov $407,"psm肏Af[C"
	mov $408,"֋濉nB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"@@"
	mov $410,"و㱈ˁCAݕsr"
	mov $411,"N_ғIw՗I"
	mov $412,"ꍪ_ÐÒnݓߗB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $413,"ґRcL_CAЗ槁B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $414,"\NCssB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $415,"R@_ŋω勎B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $416,"ߐ}BtB"
	mov $423,"|s๘B"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	mov %120,416: mov %121,420:mov %122,24:gosub *messagefont
	mov %120,423: mov %121,423:mov %122,24:gosub *messagefont
	$416@/
	$423/
	add $416,$423/
	\

	textoff

;ʉFtHb
	dwave 2,"wave\swing10r.wav"
	wait 500
;ʉFSIbIiɂԂ鉹j
	dwave 2,"wave\hit80.wav"

	QUAKE 30,300

	texton

	mov $401,"u^ccIv"
	mov %130,401
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"@@"
	mov $403,"IB"
	mov $404,"_ICȗoB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"ACwqI͗"
	mov $406,"sȈꈯA甑|B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $407,"Np螏ZŒI}C"
	mov $408,"ۓ{nB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"@@"
	mov $410,"ccRCu㱁CI˖ҒnB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $411,"@@"
	mov $412,"uuAccIIvv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $413,"@@"
	mov $414,"I~Eٖ@h䗹B"
	mov $415,"wNI_CnB"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\

	textoff

;ʉFtHb
	dwave 2,"wave\swing10r.wav"
	wait 500
;ʉFSLBbI
	dwave 2,"wave\bosu22.wav"
	drawfill 255,0,0 : draw
	wait 300
	repaint
	QUAKE 30,500

	wait 1000
;ʉFhTb
	dwave 2,"wave\ClothC.wav"
	QUAKE 20,200

	textoff

	mov $401,"_I~C"
	mov $402,"GCn懊{{n|B"
	mov %130,401
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $403,"CCIoB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"qB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"qCގ䔓䋏濉nB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@


;ʉFtHb
	dwave 2,"wave\swing10r.wav"
	wait 500
;ʉFKXb
	dwave 2,"wave\hit80.wav"
	QUAKE 30,300

	mov $406,"@@"
	mov $407,"w莓ICB"
	mov $408,"|snp_]ǈB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@



;ʉFtHb
	dwave 2,"wave\swing10r.wav"
	wait 500
;ʉFSb
	dwave 2,"wave\hit75_a.wav"
	QUAKE 30,300
	delay 200
;ʉFtHb
	dwave 2,"wave\swing10r.wav"
	wait 500
;ʉFSLb
	dwave 2,"wave\hit61_a.wav"
	QUAKE 30,300
	delay 200
;ʉFtHb
	dwave 2,"wave\swing10r.wav"
	wait 500
;ʉFYKb
	dwave 2,"wave\bosu13.wav"
	QUAKE 30,300
	delay 200
;ʉFtHb
	dwave 2,"wave\swing10r.wav"
	wait 500
;ʉFOVb
	dwave 2,"wave\hit57.wav"
	QUAKE 30,300
	delay 200

	mov $409,"A]ANAwAځB"
	mov $410,"藐ŁCdjB"
	mov $423,"jCjCdꝔ[B"
	mov $411,"@"
	mov $412,"@"
	mov $413,"@"
	mov $414,"@"
	mov $415,"@"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	mov %120,409: mov %121,420:mov %122,24:gosub *messagefont
	mov %120,423: mov %121,423:mov %122,24:gosub *messagefont
	$409
	$410@/
	$423/
	add $410,$423/
	\


	mov $401,"uFCZIJNIIv"
	mov %130,401
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"@@"
	mov $403,"uccޔАlCˍDccv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"@@"
	mov $405,"@鈓I^C֐LCs|وӖB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"CA蕉䎩Ȗٖ@~B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@


;ʉFtHb
	dwave 2,"wave\swing10r.wav"
	wait 500
;ʉFKXb
	dwave 2,"wave\bosu12.wav"
	QUAKE 30,300

	mov $407,"sߓIցB"
	mov $423,"@ߖvL܏oߔВԁC"
	mov %120,407: mov %121,407:mov %122,24:gosub *messagefont
	mov %120,423: mov %121,423:mov %122,24:gosub *messagefont
	$407@/
;ʉFtHb
	dwave 2,"wave\swing10r.wav"
	wait 500
;ʉFKXb
	dwave 2,"wave\bosu12.wav"
	QUAKE 30,300
	$423/
	add $407,$423/
	@

;ʉFtHb
	dwave 2,"wave\swing10r.wav"
	wait 500
;ʉFKXb
	dwave 2,"wave\bosu12.wav"
	QUAKE 30,300

	mov $408,"@ߖvLQC"
	mov $423,"ra߁C"
	mov %120,408: mov %121,408:mov %122,24:gosub *messagefont
	mov %120,423: mov %121,423:mov %122,24:gosub *messagefont
	$408@/
;ʉFtHb
	dwave 2,"wave\swing10r.wav"
	wait 500
;ʉFKXb
	dwave 2,"wave\bosu12.wav"
	QUAKE 30,300
	$423/
	add $408,$423/
	@

;ʉFtHb
	dwave 2,"wave\swing10r.wav"
	wait 500
;ʉFKXb
	dwave 2,"wave\bosu12.wav"
	QUAKE 30,300


	mov $409,"AsۗޔВnsI"
	mov $410,"@"
	mov $411,"@"
	mov $412,"@"
	mov $413,"@"
	mov $414,"@"
	mov $415,"@"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	mov %120,409: mov %121,420:mov %122,24:gosub *messagefont
	$409\

	textoff

;ʉFtHb
	dwave 2,"wave\swing10r.wav"
	wait 500
;ʉFYKAAbI
	dwave 2,"wave\don15d.wav"
	drawfill 255,0,0 : draw
	wait 300
	repaint

	QUAKE 50,500

;ʉFKKiobgj
	dwave 2,"wave\gara06.wav"
	delay 3000

	texton

	mov $401,"uccccv"
	mov %130,401
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"@@"
	mov $403,"]I杭萓܌Cc_E{ݒnB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"_I^Eaȍ`C"
	mov $405,"㱓O[sFB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"@@"
	mov $407,"Es߁B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"|֗LċzC"
	mov $409,"oa҈IvŁC弒R󗹜kdIB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $410,"k\CEfJB"
	mov $411,"I]ȊIaȒB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $412,"@@"
	mov $413,"uCYrccCYrccvܓߔВԁccIv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $414,"@@"
	mov $415,"@ߖvLrJcc"
	mov $416,"ISÖs\IoB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $417,"CCYrv܁H"
	mov $423,"CYrs]H"
	mov %120,417: mov %121,417:mov %122,24:gosub *messagefont
	mov %120,423: mov %121,423:mov %122,24:gosub *messagefont
	$417@/
	$423/
	add $417,$423/
	@

	mov $418,"ÓsmEcc"
	mov %130,418
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $419,"ߍԕs\܁Cܗ甉󈻁B"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\

	textoff

;ʉFK`binT~oj
	dwave 2,"wave\chari00.wav"
	bg "cutin\dai2kou\hasami.jpg",1
	QUAKE 10,250

	delay 1000

	texton

	mov $401,"wFAݘρCn⋍ݓߗB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"䔫gwْFC"
	mov $403,"䘸ȓIiq\oHpIB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"@@"
	mov $405,"uuމIvuZCFIvudϗIvv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"@@"
	mov $407,"wF닩NB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"ߓߍC唈C៣ϑnB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"@@"
	mov $410,"uvGߑFIv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $411,"@@"
	mov $412,"ՒL^oIō@ꐺۓ{I[^B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $413,"@@"
	mov $414,"u㈏Z^I"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@


	mov $415,"Qdlތcc"
	mov $423,"AϓIIv"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	mov %120,415: mov %121,420:mov %122,24:gosub *messagefont
	mov %120,423: mov %121,423:mov %122,24:gosub *messagefont
	$415@/
	$423/
	add $415,$423/
	\

	textoff

;ʉFUVb
	dwave 2,"wave\hit_s01_c.wav"
	drawfill 255,255,255 : draw
	wait 300
	repaint
	QUAKE 20,200

	delay 2000

	bgmfadeout 2000
	bgmstop

	texton

	mov $401,"uuFwccvv"
	mov %130,401
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"@@"
	mov $403,"AݓCpȓIǵB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"p\OCܜkYC䀖IgqB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"蕉䎩ȓsk蓓I~FہB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"䓖SǓwIʁCc{B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $407,"@@"
	mov $408,"QdlB"
	mov $409,"@ʗpgCiCAsڑQB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $410,"CvLl@uB"
	mov $411,"ߘl툻L[B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $412,"@@"
	mov $413,"ȁCWoB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $414,"SNIB"
	mov $415,"ߔВɋCȉFI`\oB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $416,"ٖ\IoIɋꈻC"
	mov $417,"FLNCjFҕsgB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $418,"ݓߔVCŒp虒{IgqC"
	mov $419,"sfn៣B"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\

	textoff

	bg black,13

	wait 3000

;wiFuuZCIvv@tF[hȂ
	bg "cutin\dai2kou\cut20.jpg",1
	QUAKE 20,200
	wait 1000
	bg black,1

;wiFuuZCIvv@tF[hȂ
	bg "cutin\dai2kou\cut20.jpg",1
	QUAKE 20,200
	wait 1000
	bg black,1

	wait 3000

;aflFfree0522.mp3@iv[v
	bgm "bgm\free0522.mp3"
;@@zu@wiF̎iuj
	bg "bg\dai2kou\ryou_heya_bure.jpg",0
	ld c,":a;tatie\risa\risa_keisou_konwaku.bmp",0
;@@zu@GF@Ef@ʒuF
	print 16

	wait 3000

	texton

	mov $401,"uǈɁIv"
	mov %130,401
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"@@"
	mov $403,"uccccv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"@@"
	mov $405,"CCᎩȐQݏB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"ߍݚ@ړISnIcB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $407,"@@"
	mov $408,"uvJHˈ꒼ݘʚ藁Bv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"@@"
	mov $410,"ccʚ뗹cc"
	mov $423,"Cːcc"
	mov %120,409: mov %121,410:mov %122,24:gosub *messagefont
	mov %120,423: mov %121,423:mov %122,24:gosub *messagefont
	br
	$410@/
	$423/
	add $410,$423/
	@

	mov $411,"ccsفCߐ݉zTېIC"
	mov $412,"ܐy\XyJB"
	mov %130,411
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $413,"@勎CLDB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $414,"@@"
	mov $415,"uvYrCsDIccv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $416,"@@"
	mov $417,"ܒCp̍ȓIqB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $418,"IuݔˏC芴nB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $419,"ρCے݌NIʓxB"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"u^Icc"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"ߚLʚCcs꒵藁Bv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $403,"@@"
	mov $404,"_C灈ߔ헜xxZB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"TʚCnC\A꒼IJB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"\ߑ_ISӁC甐lٔ䉷gB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $407,"@@"
	mov $408,"u߁CEvBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"@@"
	mov $410,"ucccv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $411,"@@"
	mov $412,"NgCC\ґRʘIs"
	mov $413,"ICB"
	mov $414,"@"
	mov $415,"@"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"\EmI؁B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"\E꘢ǒjN֎IӁC"
	mov $403,"\rEmp虒{ȔۓIB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"܋NތIccp_IgԗB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@


	mov $405,"@@"
	mov $406,"w߈QߘwqCBʋp甎ȍX󈻗JB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $407,"ߍDCǈɁB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"@ߊ]ÒnC"
	mov $409,"CvolIÁB"
	mov $410,"ސݔ筗⁓I⼌B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $411,"sQ߁B"
	mov $412,"@CsM߁Ax߁B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $413,"ȁCFvލ@x"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $414,"@@"
	mov $415,"@\܁CF꒼qlN嗈IB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $416,"ґRFIOa瀉yŎpsC"
	mov $417,"LrCꍱ㿎꜕sxB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $418,"ACݓS[rFnfx蕁C"
	mov $419,"ݑMCٕB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $420,"F꒼sqlClICލIFB"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"u^IvgnC"
	mov $402,"CߋJBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $403,"@@"
	mov $404,"uccCsCVAZJBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"@@"
	mov $406,"usprES糉kBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $407,"@@"
	mov $408,"ucccv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"@@"
	mov $410,"uݓIԁC֗ycc"
	mov $411,"@"
	mov $412,"@"
	mov $413,"@"
	mov $414,"@"
	mov $415,"@"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\

	textoff

;G\F@Eʏ@ʒuF
	ld c,":a;tatie\risa\risa_keisou_tuujyou.bmp",12

	texton

	mov $401,"uǈɁcc"
	mov $423,"VC甉ҍݜޗJB"
	mov %120,401: mov %121,401:mov %122,24:gosub *messagefont
	mov %120,423: mov %121,423:mov %122,24:gosub *messagefont
	$401@/
	$423/
	add $401,$423/
	@/

	mov $423,"DsDHv"
	mov %120,423: mov %121,423:mov %122,24:gosub *messagefont
	$423/
	add $401,$423/
	@

	mov $402,"@@"
	mov $403,"rܒCݗȓIB"
	mov %130,402
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"cccB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"ߓIgS甉kCSC"
	mov $406,"ACߓI牒^CӕsIB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $407,"@@"
	mov $408,"uccccv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"@@"
	mov $410,"udIoϓI\vB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $411,"wFIxEZށBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $412,"@@"
	mov $413,"ucccHv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $414,"@@"
	mov $415,"sߋԐYrӎvB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $416,"ccsCĜk⁓IB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $417,"@cc_ߍIcp藁B"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\

	textoff

	bg black,12
	bgmfadeout 2000
	bgmstop
	delay 3000

;ʉFJ@iv[v
	dwaveloop 1,"wave\se-007.wav"
	mov $30,"wave\se-007.wav"
;J~炷
	gosub *lain


	delay 2000
;wiFOρE܂@tF[hC
	bg "bg\dai2kou\ryou_gaikan_kumori.jpg",16
	delay 3000
;wiFV΂ؓ̕E܂@ʏtF[h
	bg "bg\dai2kou\namikimichi_kumori.jpg",12
	delay 3000

	texton

	mov $401,"V~IJB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"Cݔ~qnIGE~Cȋw~JxC"
	mov $403,"ސݍgCwIyB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"ґRޔВIJV甐luUCAss[B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"٘s}Il܁CސЗߐlIVB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"@@"
	mov $407,"~c㼋ԈϐFIRC"
	mov $408,"ݒʉw@IʓB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"ӊOn\c[FKIRcc"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $410,"Ae欈ŁCRepB䲓I󝷈āB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $411,"\ꐥYryψcR藁H"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $412,"@@"
	mov $413,"uuVR^YBvv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $414,"@@"
	mov $415,"uu漁Bvv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $416,"@@"
	mov $417,"RRn]CkCSB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $418,"s֒SS\sΔד|B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $419,"揁ccψꗈCaˊS嗈B"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"uu܉񗈁CǈɁCߕsuEHvv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"@@"
	mov $403,"uuccIHvv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"@@"
	mov $405,"uіђBVI{C"
	mov $406,"JVps{B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $407,"Ε΍݉F~R桔~IC"
	mov $408,"p_ÐÓsvLBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"@@"
	mov $410,"_ÐÓsvLccH"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $411,"Ó܁Cꎟіђ@C"
	mov $412,"A\@uqIEH"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $413,"ґR\ȐCE~t㤋\C߁C"
	mov $414,"Aޖ瑾rJB"
	mov $415,"@"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"uuCߐzsEHvv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"@@"
	mov $403,"usHv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"@@"
	mov $405,"usmAZB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"TccіђJVsJB"
	mov $407,"C퐅{Bv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"@@"
	mov $409,"uߗvVsJIԁC"
	mov $410,"іђ꒼sØEHv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $411,"@@"
	mov $412,"uuߕs\B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $413,"LVCF`aCnËNBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $414,"@@"
	mov $415,"uߔ@ʐ꒼```J藁Hv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $416,"@@"
	mov $417,"uCіђ\Fcc"
	mov $418,"݉JÏAIJBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $419,"@@"
	mov $420,"uCϏADBv"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"uccCߕsߍ܏YrB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"cߓIC_C甉Jhߍ~~JBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $403,"@@"
	mov $404,"usJȁtH"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"sC֐ZJBߘ玛EBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"@@"
	mov $407,"uCJCsCJҗBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"@@"
	mov $409,"uVCǈɁCޘw@IwC"
	mov $410,"{AsJғIBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $411,"@@"
	mov $412,"uCYrHv"
	mov $413,"@"
	mov $414,"@"
	mov $415,"@"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"uCƓsuʑIvvBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"@@"
	mov $403,"uccNsCߍXg藁Bv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"@@"
	mov $405,"݉JsTIցB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"݌pw@CݑTUI^ӁB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $407,"E@uB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"ޔПpC琥IБ_cc"
	mov $409,"@"
	mov $410,"@"
	mov $411,"@"
	mov $412,"@"
	mov $413,"@"
	mov $414,"@"
	mov $415,"@"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\

	textoff

	bg black,12

;GtFNg~
	gosub *lainend
	dwavestop 1 : mov $30,""

	delay 4000

;aflFfree0257.mp3@iv[v
	bgm "bgm\free0257.mp3"
;wiFE܂@Vb^[tF[h
	bg "bg\dai2kou\kyousitu_kumori.jpg",26
	delay 2000

;wiFE܂iuj@tF[hȂ
	bg "bg\dai2kou\kyousitu_kumori_bure.jpg",1
;G\FE@Ί@ʒuF
;G\FE@ʏ@ʒuFE
	ld r,":a;tatie\sei\sei_tuujyou.bmp",0
	ld l,":a;tatie\risa\risa_warai.bmp",12

	delay 2000

	texton

	mov $401,"uDBv"
	mov $402,"uDBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $403,"@@"
	mov $404,"CݑŗāB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"uƊŋNsL_IώqB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"݉g㲟I{C"
	mov $407,"kLl蓜ޔ~JGEJB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"sCډA}㰗IēVB"
	mov $409,"݁C֔\ꉺޑ٘IB"
	mov $410,"@"
	mov $411,"@"
	mov $412,"@"
	mov $413,"@"
	mov $414,"@"
	mov $415,"@"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"uDCFwCmᓯwBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"@@"
	mov $403,"uV^ߑFBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"@@"
	mov $405,"Nsww܁xI}wa쓯wC"
	mov $406,"NŏāB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $407,"@@"
	mov $408,"uvYrkCsp݈ӁB"
	mov $409,"䎩Ȗu哾LӖIBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $410,"@@"
	mov $411,"u֔\ƉꍱI͓Id藁Bv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $412,"@@"
	mov $413,"uccccv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $414,"@@"
	mov $415,"uIv"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\

	textoff

;GF@
	cl l,12
;GF@Ɉړ
	cl r,0
	ld c,":a;tatie\sei\sei_tuujyou.bmp",12

	textoff

	mov $401,"ΒC竎ICB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"T嵏JH"
	mov $403,"瓞ޗCAErZcc"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"@@"
	mov $405,"uccv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"@@"
	mov $407,"ŒFϓIÁC"
	mov $408,"ʑOIqlIoΗeB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"^ܐ΁Cs@ܐuLΓI\B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $410,"@@"
	mov $411,"uߑFqgn^IkD藁Bv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $412,"@@"
	mov $413,"uccCFBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $414,"@@"
	mov $415,"uFIgnC"
	mov $416,"va@FamρC"
	mov $417,"S~n܏oȑzܓIԓIBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $418,"@@"
	mov $419,"ucccv"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"sCu}ߖE"
	mov $402,"cȑzܓIԓs܏oJC"
	mov $403,"ޑTA\igRJB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"ccsCވ_琥ϓIB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"@@"
	mov $406,"}aB"
	mov $423,"N㮓IqlB"
	mov %120,405: mov %121,406:mov %122,24:gosub *messagefont
	mov %120,423: mov %121,423:mov %122,24:gosub *messagefont
	br
	$406@/
	$423/
	add $406,$423/
	@

	mov $407,"smCccى䗈܁CqlsB"
	mov %130,407
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"}iCDwCAC"
	mov $409,"@ʔ튖鈍XdvIԁC"
	mov $410,"|s๘n\B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $411,"@@"
	mov $412,"}aB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $413,"퐥Yr甜qlV㱗Ld藁cc"
	mov $414,"@"
	mov $415,"@"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"uCٕsNI"
	mov $402,"䖔ܗ]IԁBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $403,"@@"
	mov $404,"C䐥肏㓹]EH"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"sC@ʌuȗL֖]B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"@@"
	mov $407,"uvgnccُCIBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"@@"
	mov $409,"OeI݁H"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $410,"AC~ވ_ᕪlTgnC"
	mov $411,"䎩ȍŚs[IB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $412,"@@"
	mov $413,"usCV\cֈꉺC^IkCSB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $414,"ߊŁccFVO{vrJHv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $415,"@@"
	mov $416,"쏬ΒܓB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $417,"vԁcc"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $418,"ccCcc"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"cc餕sϛB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"\CZ݈NCaV㱓I餔߁B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $403,"AC@ʐϓI"
	mov $404,"VsFʓI}ϓI藁H"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"EFʁC"
	mov $406,"CYrpu\ry藁H"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $407,"cc"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"@@"
	mov $409,"䎩ȁB"
	mov $423,"䎩Șa}A쏬cc"
	mov %120,408: mov %121,409:mov %122,24:gosub *messagefont
	mov %120,423: mov %121,423:mov %122,24:gosub *messagefont
	br
	$409@/
	$423
	add $409,$423

	mov $410,"ȋyȊOILlV㱁CfC餁B"
	mov %120,410: mov %121,410:mov %122,24:gosub *messagefont
	$410@

	mov $411,"ȍˉuryB"
	mov %130,411
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $412,"@@"
	mov $413,"rCCYrmϓI藁H"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $414,"ߐC"
	mov $415,"@"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\

	textoff

;wiFuuC񂾂vv@Qb\ĉʖ߂@ʏtF[h
;i̃mCY܂ɕ\^CvȂA
;S̐[炶ƕオ悤ȊŁj
	bg "cutin\dai2kou\cut11.jpg",83

	delay 2000

	bg "bg\dai2kou\kyousitu_kumori_bure.jpg",0
	ld c,":a;tatie\sei\sei_tuujyou.bmp",12
	texton

	mov $401,"ccccccB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"ÓIٔ\K^H"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $403,"p_sSnŗC"
	mov $404,"p܏㭗{覘aܓI瑔VOC"
	mov $405,"vLCꐶIB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"ߛEܔNOIB"
	mov $407,"hߘjwIQCASxJB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"@@"
	mov $409,"pcc"
	mov $423,"䏊󓞓IQpcc"
	mov %120,408: mov %121,409:mov %122,24:gosub *messagefont
	mov %120,423: mov %121,423:mov %122,24:gosub *messagefont
	br
	$409@/
	$423/
	add $409,$423/
	@

	mov $410,"@@"
	mov $411,"CCYrccޖ瑾scc"
	mov %130,410
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $412,"ߑۓ{IwxIC"
	mov $413,"ݕsfNTIǵB"
	mov $414,"@"
	mov $415,"@"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"uR@藁cc"
	mov $423,"ccFHv"
	mov %120,401: mov %121,401:mov %122,24:gosub *messagefont
	mov %120,423: mov %121,423:mov %122,24:gosub *messagefont
	$401@/
	$423/
	add $401,$423/
	@

	mov $402,"@@"
	mov $403,"uccB"
	mov $423,"sDӎvC]JBv"
	mov %120,402: mov %121,403:mov %122,24:gosub *messagefont
	mov %120,423: mov %121,423:mov %122,24:gosub *messagefont
	br
	$403@/
	$423/
	add $403,$423/
	@

	mov $404,"@@"
	mov $405,"u藁CFzꉺcc"
	mov $406,"FC"
	mov $407,"ߕsvQCV玉EHv"
	mov %130,404
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"@@"
	mov $409,"uccccv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $410,"@@"
	mov $411,"urρCL悎C玘EH"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $412,"։ȉGBv"
	mov $413,"@"
	mov $414,"@"
	mov $415,"@"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\

	textoff

;afl~
	bgmfadeout 1
	bgmstop
;G\FE@@ʒuF
	ld c,":a;tatie\sei\sei_odoroki.bmp",12

	texton

	mov $401,"uccEHv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"@@"
	mov $403,"}ˑRI甉ڗB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"ʑOIqlˋՒΗeC"
	mov $405,"A\ux茁B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"ŋNsCߏ΁B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $407,"@@"
	mov $408,"uCYr藁ccHv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"@@"
	mov $410,"uCCϑɗJBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $411,"@@"
	mov $412,"쏬Q㵒nܓB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $413,"@@"
	mov $414,"uVρC\zrlIӁC"
	mov $415,"߉FI˞BB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $416,"ArQE{CӍݐɗBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $417,"@@"
	mov $418,"Ւ~^IΗeC}ڒ܁B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $419,"@@"
	mov $420,"uIcc˔\ccv"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"Ó܁cc֖vSEH"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"헜@Cߒp"
	mov $403,"`J嗈Iވ؁CӓsEH"
	mov $404,"B^ICQݏ㐇藁B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"@ʐϓIԁC]_嗈ˍDB"
	mov $423,"ƓV@]B"
	mov %120,405: mov %121,405:mov %122,24:gosub *messagefont
	mov %120,423: mov %121,423:mov %122,24:gosub *messagefont
	$405@/
	$423/
	add $405,$423/
	@

	mov $406,"@@"
	mov $407,"uCuLЉQ䵖訓IuC"
	mov $408,"甐lsϋ߁CJH"
	mov %130,406
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"ww܁x␴Icc"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $410,"AC@ʉF\CC玓IԁC"
	mov $411,"`ۉDkGB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $412,"ٓV勳悎IwC"
	mov $413,"ݑ藁Bv"
	mov $414,"@@@"
	mov $415,"@"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"uC玁HvusJIvuFEHv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,18:gosub *messagefont
	gosub *textwright
	@

	mov $402,"@@"
	mov $403,"ґRqICA}IpkkB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"ŗIwߓޔԒԁC"
	mov $405,"smsuCBڌaӗ͓sWFgB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"@@"
	mov $407,"uRCޑFI꘢苋C"
	mov $408,"s|ߓB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"FߍmLȓIvlccv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $410,"@@"
	mov $411,"ӓlICanJ[B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $412,"@@"
	mov $413,"uccccv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $414,"@@"
	mov $415,"笓IԖvgnB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $416,"ܓC꒼GݎȖ[㱗IlB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $417,"٘ߍwF悎暗WIG悁C"
	mov $418,"ى䗈ܓӍݐݏdISB"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"RCߍLoC"
	mov $402,"ܗ\䐶VnIw@awFIxC"
	mov $403,"S[xB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"CݓIcc^lvB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"ϓICBĖs~濗B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"꒼ݝfC餓IlC䎩ȁB"
	mov $407,"rCvۋNEOۏosADB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"@@"
	mov $409,"wVx\E"
	mov $410,"si勎ZB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $411,"ΒfNIB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $412,"zCߘȏ]IFGB"
	mov $413,"sē勎CsĈ؜ߍʚC"
	mov $414,"vSZ^IKB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $415,"cc@ʑzvޘÖ]CL꘢B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $416,"@@"
	mov $417,"vցCSIcc"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $418,"Klω䎩ȓIӎuB"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\

	textoff

;G\FE@ʏ@ʒuF
	ld c,":a;tatie\sei\sei_tuujyou.bmp",12

	texton


	mov $401,"uAVܓIρcc"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"@ʔ\ΏZCߐIAKBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $403,"@@"
	mov $404,"urccv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"@@"
	mov $406,"uccc"
	mov $423,"IBv"
	mov $407,"@"
	mov $408,"@"
	mov $409,"@"
	mov $410,"@"
	mov $411,"@"
	mov $412,"@"
	mov $413,"@"
	mov $414,"@"
	mov $415,"@"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	mov %120,405: mov %121,420:mov %122,24:gosub *messagefont
	mov %120,423: mov %121,423:mov %122,24:gosub *messagefont
	br
	$406@/
	$423/
	add $406,$423/
	\

;ʉF`iFj
	dwave 2,"wave\hakusyu2.wav"

	mov $401,"ԉ痎CqlIc㗧mNxC"
	mov $402,"⁗IҙށIϓI蓌ĐB"
	mov %130,401
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $403,"\甐lCS"
	mov $404,"ޏAccI˔\EH"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"@@"
	mov $406,"u迁Iv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $407,"@@"
	mov $408,"u苑gƚGCFIv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"@@"
	mov $410,"赒IǓwFBLoIqʈ玁B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $411,"c"
	mov $423,"CB@ߖݜޗIԁc"
	mov %120,401: mov %121,411:mov %122,24:gosub *messagefont
	mov %120,423: mov %121,423:mov %122,24:gosub *messagefont
	$411@/
	$423/
	add $411,$423/
	@

	dwavestop 2

	mov $412,"@@"
	mov $413,"uꉺIv"
	mov $414,"@"
	mov $415,"@"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	mov %130,412
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	QUAKE 20,300
	\


	textoff

;GF@EɈړ
;G\Fb؁@ʏ@ʒuF
	cl c,0
	ld r,":a;tatie\sei\sei_tuujyou.bmp",12
	ld l,":a;tatie\erika\erika_tuujyou.bmp",12

	texton

	mov $401,"ꓹ@C󟃔ʓIC݋kB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"C݉IlQC"
	mov $403,"꘢w嗈B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"@@"
	mov $405,"uwcv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"@@"
	mov $407,"}SOo\IB"
	mov $408,"xxIcC暔sB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"@@"
	mov $410,"uސr񎖁H"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $411,"SsagCʓI䏤ʁCAӜƉ玘EHv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $412,"@@"
	mov $413,"uߘcߘczܔV@ĉXcv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $414,"@@"
	mov $415,"uV@HVƈ玓I\苐IጁB"
	mov $416,"saܐ^EHv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $417,"@@"
	mov $418,"uفAٕsNcv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $419,"@@"
	mov $420,"\IZC}ᔈVnCҕsgB"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"uoIB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"{awʓIC"
	mov $403,"Azߙ߉FwIz@vgncv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"@@"
	mov $405,"uc@ʐYrӎvHv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"@@"
	mov $407,"ucߘc"
	mov $423,"ccccccv"
	mov %120,406: mov %121,407:mov %122,24:gosub *messagefont
	mov %120,423: mov %121,423:mov %122,24:gosub *messagefont
	br
	$407@/
	$423/
	add $407,$423/
	@

	mov $408,"@@"
	mov $409,"֓}𓨓ICቺҗB"
	mov %130,408
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $410,"@@"
	mov $411,"ugށCܕsoEH"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $412,"CSmꖾJC䐥sӓIBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $413,"@@"
	mov $414,"uccIv"
	mov $415,"@"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\

;aflFfree55.mp3@iv[v
	bgm "bgm\free55.mp3"

	mov $401,"uIC䔽فB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"pw䇉ԔVNxIzMSޔЕC"
	mov $403,"ٖ@\B"
	mov $423,"ߔЗ@Cs吥ؑPnBv"
	mov %120,402: mov %121,403:mov %122,24:gosub *messagefont
	mov %120,423: mov %121,423:mov %122,24:gosub *messagefont
	$402
	$403@/
	$423/
	add $403,$423/
	@

	mov $404,"@@"
	mov $405,"pЍ݋IܓB"
	mov %130,404
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"\I܎ߋNkLB"
	mov $407,"@ʗplasfwC"
	mov $408,"\ӊQGIЉQJB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"Ac"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $410,"@@"
	mov $411,"uߐc"
	mov $423,"uߖrρHvv"
	mov %120,410: mov %121,411:mov %122,24:gosub *messagefont
	mov %120,423: mov %121,423:mov %122,24:gosub *messagefont
	br
	$411@/
	$423/
	add $411,$423/
	@

	mov $412,"@@"
	mov $413,"A݉CIC灈꘢B"
	mov %130,412
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $414,"Il⋍݋jC"
	mov $415,"p[xluIڌ{B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $416,"@@"
	mov $417,"uccv"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\

	textoff

;GFE@{
	ld r,":a;tatie\risa\risa_ikari.bmp",12

	texton

	mov $401,"u\营ؑPICs߈꘢lJHv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"@@"
	mov $403,"s嗈C"
	mov $404,"⋍݉aV㱁CsjnՓB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"@@"
	mov $406,"u\EH"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $407,"ސCYrӎvHv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"@@"
	mov $409,"uӁC甊wCǈɎ立GC"
	mov $410,"uFs\LI@MB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $411,"sCؑPC_"
	mov $412,"\GۏoPӁCsEH"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $413,"CntǈɋICA@ʍśfݜލl"
	mov $414,"\ox~GIlCߕsADIEB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $415,"ߑ糒OIayC"
	mov $416,"pvœI\B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $417,"cnʖ`oIؓs乑C"
	mov $418,"蕔䲓IԉshE{Bv"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\

	textoff

;G\Fb؁@{@ʒuF
	ld l,":a;tatie\erika\erika_ikari.bmp",12

	texton

	mov $401,"uYAYrccIv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"@@"
	mov $403,"܊CǏIwFÁB"
	mov $404,"IoɋI\Cڎ󗹜ލԁB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"MxxI\CϓI\FIB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"ێICIg܁B"
	mov $407,"C\IU\җB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"@@"
	mov $409,"uArc"
	mov $423,"pޔЕ㬘fwFC"
	mov %120,408: mov %121,409:mov %122,24:gosub *messagefont
	mov %120,423: mov %121,423:mov %122,24:gosub *messagefont
	br
	$409@/
	$423
	add $409,$423/

	mov $410,"wxMSCޔЎٕs\BIIv"
	mov $411,"@"
	mov $412,"@"
	mov $413,"@"
	mov $414,"@"
	mov $415,"@"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	mov %130,410
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\

	textoff

;G\F@Es@ʒuFE
	ld r,":a;tatie\risa\risa_human.bmp",12

	texton

	mov $401,"uߘGVlAdߔƗGB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"Ll푼㬘f藁Hv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $403,"@@"
	mov $404,"uGVlaFcv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"@@"
	mov $406,"uLYrsEHv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $407,"@@"
	mov $408,"uccBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"@@"
	mov $410,"uvLCsB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $411,"GÝfz|㠗SC"
	mov $412,"sCxȓI\~GB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $413,"ǈɖ琥ρB\z@ʔ\ّƗLΏADC"
	mov $414,"ˉ闹玉I苁Bv"
	mov $415,"@"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"uܓCސ^ILsERlV莧mIMEH"
	mov $402,"ޘEݓϓI@EHv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $403,"lVAiفB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"_IRNl⁎hwqC"
	mov $405,"R@ݑFSGIJB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"LwqEI蓉SC҉SMVHIB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $407,"g攍ݘ_B"
	mov $408,"ǈɐCߘ_vYrsDBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"@@"
	mov $410,"ucccv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $411,"@@"
	mov $412,"uvsRCߌuǈɒSCC玉"
	mov $413,"LYrsȓIREHv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $414,"@@"
	mov $415,"u߁Aߘcv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $416,"@@"
	mov $417,"ul~nŕs[JH"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $418,"ߎHǈɓIlcv"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\

	textoff

;GF@
	cl r,0
;GFb؁E@{
	ld l,":a;tatie\risa\risa_ikari.bmp",12
;G\FE@ʏ@ʒuFE
	delay 500
	ld r,":a;tatie\sei\sei_tuujyou.bmp",12

	texton

	mov $401,"uuC槗Bvv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"@@"
	mov $403,"uuǈɁcvv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"@@"
	mov $405,"u@ʗLlٓIԁC߉AށBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"@@"
	mov $407,"ucccv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"@@"
	mov $409,"IԁC甑S蜓ҁB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $410,"ґRٗa}\F]C"
	mov $411,"AݜޔЏv|sySCC玉玁CsB"
	mov $412,"@"
	mov $413,"@"
	mov $414,"@"
	mov $415,"@"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\

	textoff

	bgmfadeout 2000
	bgmstop
;ʉFwZ̃`Ci[vȂj
	dwave 2,"wave\chaim.wav"
	wait 2000

	texton

	mov $401,"ݔ@㩟BʓICCIkNB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"ȔʐCC"
	mov $403,"SǓwˑRێҁCe񓞗ȓIʁC"
	mov $404,"}}ZZnCnyݏCB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"ar񗹊eIʏB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"@@"
	mov $407,"uccv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"@@"
	mov $409,"urHv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $410,"@@"
	mov $411,"u߁B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $412,"sccsʕsvpgcdlN笋GBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $413,"@@"
	mov $414,"ucccv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $415,"@@"
	mov $416,"ҒC[[nȗB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $417,"ґR\csxCASIJB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $418,"˗ϓI\C"
	mov $419,"L̗̙NʓxIہB"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\

	textoff

	bg black,16

	delay 2000

;wiFulԂŁAtقǊ댯Ȃ̂͂ȂBv@ʏtF[h
	bg "cutin\dai2kou\cut21.jpg",12

	delay 3000

	bg black,12


;

;ʁFSd}i⍂j

	mov %42,3
	gosub *sindenzu
	bg ":c;cutin\logo.jpg",16
	wait 2000

;EFCgQb

;

;ʉFJ
	dwaveloop 1,"wave\se-007.wav"
	delay 2000

;wiFĤt@tF[hC
	bg "bg\dai2kou\rainy.jpg",14
	delay 3000
;ʉtF[hAEg
	dwavestop 1
;wiFwZ̊Ki@Vb^[tF[h
	bg "bg\dai2kou\kaidan.jpg",26

	delay 3000

	texton

	mov $401,"uuFIvv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"@@"
	mov $403,"ݕw@틩ZIB"
	mov $404,"䐳wOIOCoB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"񔈈ŁCᓡ}}n"
	mov $406,"竗嗈B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $407,"vVᗹmDJcc"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"@@"
	mov $409,"uuFCٕsNI"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $410,"sCFccIvv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $411,"@@"
	mov $412,"\ꓞʑOCAᔈ]B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $413,"ECIC㱋xCnC"
	mov $414,"Au\sɊŉB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $415,"}R\^IlB"
	mov $416,"\TNA꒼z䓹]JB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $417,"@@"
	mov $418,"uAߘCv\cc"
	mov $419,"\\uٕsNccȁccv"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"Œ\nܒC"
	mov $402,"|甉u\X嗹B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $403,"}a쐥oDӍ苉Icc"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"@@"
	mov $405,"uvIBߑFvLցB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"vݐSccߊŁBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $407,"@@"
	mov $408,"rܒCNofB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"\C嗈Sŋ}C"
	mov $410,"ѓIۓI}"
	mov $411,"}I荔㗬IB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $412,"C\hlۜk|IwCțsÊŁC"
	mov $413,"AޗLݏiI丁B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $414,"\Ȗ璍ӓC"
	mov $415,"漁CCnC@荔IB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $416,"@@"
	mov $417,"uÉEHv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $418,"@@"
	mov $419,"uCcc"
	mov $423,"Iv"
	mov $420,"@"
	mov %120,418: mov %121,420:mov %122,24:gosub *messagefont
	mov %120,423: mov %121,423:mov %122,24:gosub *messagefont
	br
	$419@/

	QUAKE 10,150

	$423/
	add $419,$423/
	\

	mov $401,"ݎCIC"
	mov $402,"䘸}藢\񗹎fB"
	mov %130,401
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $403,"\营ŎZ܋uōh߁v"
	mov $404,"VIJB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"@@"
	mov $406,"uޔЋqCAƗJBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $407,"@@"
	mov $408,"ucccv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"@@"
	mov $410,"uvICvLBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $411,"@@"
	mov $412,"uAAAcc\sZF\FIccv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $413,"@@"
	mov $414,"uُCkB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $415,"{As"
	mov $423,"cccalŌ𓹁Bv"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	mov %120,415: mov %121,420:mov %122,24:gosub *messagefont
	mov %120,423: mov %121,423:mov %122,24:gosub *messagefont
	$415@/
	$423/
	add$415,$423/
	\


	mov $401,"usCsϓIcIv"
	mov %130,401
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"AߘcC꒼s݈꘢ǁC߉\smC"
	mov $403,"kIlB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"ٓߍs\ԓIl|sC"
	mov $405,"\ߔД@ʕs⋍~_AsI^c"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"ĉC\꘢^WVIC"
	mov $407,"蕎ONtIwʊwsswtB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"\勎Es\ŕs[Ilc"
	mov $409,"Fam琥C"
	mov $410,"msArZBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $411,"@@"
	mov $412,"މ|smB"
	mov $413,"^EEIjB"
	mov $423,"sc"
	mov %120,411: mov %121,413:mov %122,24:gosub *messagefont
	mov %120,423: mov %121,423:mov %122,24:gosub *messagefont
	br
	$412
	$413@/
	$423/
	add $413,$423/
	@


	mov $414,"@@"
	mov $415,"uœ|Hߐs\IB"
	mov %130,414
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $416,"ߔЊ佉˓IlC䐥ٕsٓIB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $417,"C桍D䎩ȁBv"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"uϓIԁccADJc"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"sC֐vSBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $403,"@@"
	mov $404,"u漒B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"csCڎwܗJBvv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"@@"
	mov $407,"uAccv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"@@"
	mov $409,"urCFBvv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $410,"@@"
	mov $411,"ucccv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $412,"@@"
	mov $413,"ŒcsI}C䔫gZjB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $414,"ZqO⁗ICՒIU󟃁B"
	mov $415,"ndB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $416,"ccs[IB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $417,"٘䗈܁C媓VŘIqcc"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\

	textoff

	bg black,12

	delay 3000

;ʉFJ@iv[v
	dwaveloop 1,"wave\se-007.wav" : mov $30,"wave\se-007.wav"
;wiFnL@Vb^[tF[h
	bg "bg\dai2kou\watarirouka.jpg",26
	delay 3000

	texton

	mov $401,"uǈɁIv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"@@"
	mov $403,"ϋZC蕘LB"
	mov $404,"Œ椖~JICˑRF\B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"ZC֗L^ÕB"
	mov $406,"藢֝\VpI[FRB"
	mov $407,"@"
	mov $408,"@"
	mov $409,"@"
	mov $410,"@"
	mov $411,"@"
	mov $412,"@"
	mov $413,"@"
	mov $414,"@"
	mov $415,"@"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\

	textoff

;wiFnLiuj
	bg "bg\dai2kou\watarirouka_bure.jpg",1

;G\F@Es@ʒuF
;G\F@Eʏ@ʒuFE
	ld l,":a;tatie\risa\risa_human.bmp",0
	ld r,":a;tatie\sei\sei_tuujyou.bmp",12

	texton

	mov $401,"uV藁Hv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"@@"
	mov $403,"uVJVn黗CÎB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"|ǈɁCߍݜޔВnYrHv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"@@"
	mov $406,"uJBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $407,"@@"
	mov $408,"uCR藁Hv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"@@"
	mov $410,"ucccv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $411,"@@"
	mov $412,"uǗEHv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $413,"@@"
	mov $414,"uV㗈IC֕jGIR˗IBv"
	mov $415,"@"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\

	textoff

;G\F@EΊ@ʒuF
	ld l,":a;tatie\risa\risa_warai.bmp",12

	texton

	mov $401,"u^|B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"sDECsJȁt"
	mov $403,"ސӑHIDGBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"@@"
	mov $405,"uvsvNHv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"@@"
	mov $407,"u˕sv藁Bv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"@@"
	mov $409,"ucc^Bv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $410,"@@"
	mov $411,"ugޘgށCܜޔВԐ^IDEH"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $412,"ޗLcRGBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $413,"@@"
	mov $414,"uccʑR֐SBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $415,"@@"
	mov $416,"uߖ^|BDCJBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $417,"@@"
	mov $418,"SSINCR@CsqB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $419,"u@|֐s߁Bv"
	mov $420,"ݐS㚌DC㗹\IweB"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\

	textoff

	bg black,12
	delay 2000
;GtFNgFJ
	gosub *lain
;wiFV΂̍؁E܂
	bg "bg\dai2kou\namikimichi_kumori.jpg",12
	delay 2000

	texton

	mov $401,"u˓}cc"
	mov $402,"\ّIk]Bv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $403,"@@"
	mov $404,"݉J]WCI󒆁C"
	mov $405,"VC֋N˓IB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"@@"
	mov $407,"ugށC쏬QGB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"L_甐lu藁B"
	mov $409,"u퐴Iǒ@qBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $410,"@@"
	mov $411,"]IV噍C񓚓B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $412,"@Cu쏬v\vccJB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $413,"ӁC@ʗvʓ]IԁC"
	mov $414,"ݎQww܁xVOC"
	mov $415,"ōDIB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $416,"\F`\wܓIa"
	mov $417,"֐嗈]B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $418,"C֓竓aގْgnIޗB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $419,"ݓ꘢w@ڎϓI܁C"
	mov $420,"CYra\FLrIs藁cc"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"uRǈɐCC玓IG`"
	mov $402,"^Ix`v"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $403,"@@"
	mov $404,"uCukLӎvJHv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"@@"
	mov $406,"uLޘkv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $407,"@@"
	mov $408,"uccs\ccv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"@@"
	mov $410,"usC@ʔ\Cޘw@㙌IԁC"
	mov $411,"ߗܖ琥瀓PICJHv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $412,"uv\GL拌nC"
	mov $413,"A\XڋߓۓIwߘlxJBv"
	mov $423,"uȍ˖vLJHvv"
	mov %120,412: mov %121,413:mov %122,24:gosub *messagefont
	mov %120,423: mov %121,423:mov %122,24:gosub *messagefont
	$412
	$413@/
	$423/
	add $413,$423/
	@

	mov $414,"@@"
	mov $415,"ucccv"
	mov %130,414
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $416,"@@"
	mov $417,"^cc"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $418,"ޘIFCYrsœIB"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"uscc䑁嗹C"
	mov $402,"v֗Lَґ݁C䐥sIBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $403,"@@"
	mov $404,"uCmB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"CǈɁCߗL吴IEHv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"@@"
	mov $407,"um_Bv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"@@"
	mov $409,"uܐNlIl藁B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $410,"^ICWISBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $411,"@@"
	mov $412,"SH"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $413,"|z既ߔЁC"
	mov $414,"I结IjB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $415,"֗LޘVxIRYrIC"
	mov $416,"L^\owqIʁB"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"uvCD㘔RB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"@ٕzECߏA\}ៗB"
	mov $403,"FbNr{\FJB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"vaǈoŁC"
	mov $405,"߉VIGIv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"@@"
	mov $407,"u߉vgnJBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"@@"
	mov $409,"udܒԗB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $410,"ǈɁCsB竚GBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $411,"@@"
	mov $412,"؁C"
	mov $423,"p菶IwB"
	mov %120,411: mov %121,412:mov %122,24:gosub *messagefont
	mov %120,423: mov %121,423:mov %122,24:gosub *messagefont
	br
	$412/
	QUAKE 10,250
	$423/
	add $412,$423/
	@

	mov $413,"ߖsIΗeCAݜrߓIncc"
	mov $414,"㫓VI媉]Cp|vLvUI瑏ہB"
	mov %130,413
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $415,"cc^甐ls[IB"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\

	textoff

	bg black,14
;GtFNg~
	gosub *lainend
	delay 2000

;wiFu\\v@ʏtF[h
	bg "cutin\dai2kou\cut22.jpg",12

	delay 3000

;wiFu̎ṔASɒ@܂ꂽԂŁA
;J̒Ɏ̂ĂĂBv@ʏtF[h
	bg "cutin\dai2kou\cut23.jpg",12

	delay 3000
;ʉtF[hAEg
	dwavestop 1 : mov $30,""
	bg black,12
	delay 3000

	texton

	mov $401,"w\}េxCC"
	mov $402,"َ㖓kC笕sʗUB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $403,"soCsIogeC"
	mov $404,"ApȈЏR珓I"
	mov $405,"sߐl[mIoB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"@@"
	mov $407,"ccFݓ藁Cۓ{B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"tC"
	mov $409,"s꘢{sݓI،ÁB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $410,"@ʐ^ρCٕA萘LnʁB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $411,"\mވ_CݎfÁB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $412,"@@"
	mov $413,"@܁CAρB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $414,"\ELrVB"
	mov $415,"@"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\

	textoff

	delay 2000
;ʉFJ̉iʂTOj@iv[v
	dwaveloop 1,"wave\se-007.wav" : mov $30,"wave\se-007.wav"
	mov %61,50
	chvol 1,(%3002*%61/100)
;wiFE܂@Vb^[tF[h
	bg "bg\dai2kou\kyousitu_kumori.jpg",26
	delay 2000

;ʉFob
	dwave 2,"wave\bosu32.wav"
	QUAKE 20,300

	delay 1000

;wiFE܂iuj@tF[hȂ
	bg "bg\dai2kou\kyousitu_kumori_bure.jpg",1
	delay 1000
;G\FE@{@ʒuF
	ld c,":a;tatie\risa\risa_ikari.bmp",12
	delay 2000

	texton

	mov $401,"uސYrIv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"@@"
	mov $403,"wC䐶nܓB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"ߐ꘢J蕊{IB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"bŐIj䓖瀓IqC"
	mov $406,"xIB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $407,"@@"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright

	mov $408,"@@"
	mov $409,"ch݉ΌYˏ"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,48:gosub *messagefont
	gosub *textwright
	@

	mov $410,"@@"
	mov $411,"鈎ʓICT\ȓB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $412,"琳C\ȓCލ甐lXہB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $413,"@@"
	mov $414,"uIv"
	mov $415,"@"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\

	textoff

;GF@Eֈړ
;G\Fb؁@΂݁@ʒuF
	cl c,0
	ld r,":a;tatie\risa\risa_ikari.bmp",12

	ld l,":a;tatie\erika\erika_emi.bmp",12

	texton

	mov $401,"u߁cc"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"߉ʛI"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $403,"œޔЎCߑFA_usvLEHv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"@@"
	mov $405,"uAZߜr܁cc琥B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"s吥֓InC"
	mov $407,"ٛLYrdIEHv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"@@"
	mov $409,"pVVIcCoꖕΗeB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $410,"ߐ┙mIΗeB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $411,"ݓߌҗӖʑOCSǓwcc"
	mov $412,"r蕓}ass߁B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $413,"L꘢lEn⋏oٍR\B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $414,"@@"
	mov $415,"uAZvYruCcC{JIv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $416,"@@"
	mov $417,"uC瀓IHJB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $418,"YCFB"
	mov $419,"ĕs_C{CCAvCnGBv"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\

	textoff

;GύXF@Eʏ@ʒuFE

	ld r,":a;tatie\sei\sei_tuujyou.bmp",12

	texton

	mov $401,"uccc"
	mov $423,"ݎC{VOCzVB"
	mov %120,401: mov %121,401:mov %122,24:gosub *messagefont
	mov %120,423: mov %121,423:mov %122,24:gosub *messagefont
	$401@/
	$423/
	add $401,$423/
	@

	mov $402,"㱋CILށHv"
	mov %130,402
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $403,"@@"
	mov $404,"urC\IX藁H"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"sC|LRGB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"@܁CFwB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $407,"ߍݗޗVOIwC"
	mov $408,"D\͎JB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"ܓߏAߔwIBv"
	mov $410,"@"
	mov $411,"@"
	mov $412,"@"
	mov $413,"@"
	mov $414,"@"
	mov $415,"@"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\

	mov $401,"u\͎IHvuFwcvur\Iv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"ē˜bŝc吅ʁC"
	mov $403,"ۗÁB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"œޔДCwWCǈB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"@@"
	mov $406,"uٕߘjwqp_ŗD{C"
	mov $407,"sꗹCd藁B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"Ӎݕs꘢]CC玓Il\oI"
	mov $409,"\sBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $410,"@@"
	mov $411,"uccccccv"
	mov $412,"@"
	mov $413,"@"
	mov $414,"@"
	mov $415,"@"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\

	textoff

;GύXFb؁E@{@ʒuF
	ld l,":a;tatie\risa\risa_ikari.bmp",12

	texton

	mov $401,"uǈɁCCYrsIv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"@@"
	mov $403,"ucCߐӛBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"@@"
	mov $405,"{sz甜ޘw@IlmcVOC"
	mov $406,"A@ʔ\IԁCߏAqB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $407,"@ʗpq᳓IԁC"
	mov $408,"ߍˉCōDIUJB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"ݝٖ@㕐kIwFC"
	mov $410,"\ێҁB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $411,"@@"
	mov $412,"RC^oB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $413,"@@"
	mov $414,"u营ߘjwqsJH"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $415,"mŒn}ΗǈɓIOec"
	mov $416,"֎UzܔaoFIwq"
	mov $417,"rlsvϋ\CJH"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $418,"ޔАlCŖ琥Iv"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\

	textoff

;G\F@Ef@ʒuF
	ld l,":a;tatie\risa\risa_konwaku.bmp",12

	texton

	mov $401,"uCCŗSN󓞗[[QIC"
	mov $402,"ǈɁcߛB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $403,"ɋꓞ蕘s흚cVsݐc"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"ϓI߁C꒼sō݊ᗢBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"@@"
	mov $406,"ucccv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $407,"@@"
	mov $408,"ccccccB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"i㱓Iҍ~濗B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $410,"ߗIԁC"
	mov $411,"wFIc畂ofI\B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $412,"@@"
	mov $413,"usccCJBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $414,"@@"
	mov $415,"vC{IC"
	mov $416,"َ֑z܍YrIgFCR@B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $417,"w槗CߛEkDBx"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $418,"BI_C"
	mov $419,"ÒnCB"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\

	textoff

	bg black,12

	texton

	mov $401,"v命vCCCnB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"߈VAϕCRC"
	mov $403,"IUˑRꜝXn]B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"LUzꍱ{sݓIRC"
	mov $405,"Lc{RwICchB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"r֏o݉IܗkIB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $407,"ލm莓IeC璀暍cc"
	mov $408,"RCӍݒstB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"@@"
	mov $410,"sccُCB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $411,"{AޔЁwExI玁B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $412,"s吥񓞗O߁B"
	mov $413,"ψzCSASBB"
	mov $414,"@"
	mov $415,"@"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"sCIB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"\䐥։oC侍ݐʑOB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $403,"ccRCp{sc݊ᗢC"
	mov $404,"命Ig桓sَfB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"C\C桉䏊󓞓IڎCs㱐ړIsC"
	mov $406,"__nܖB"
	mov $407,"@"
	mov $408,"@"
	mov $409,"@"
	mov $410,"@"
	mov $411,"@"
	mov $412,"@"
	mov $413,"@"
	mov $414,"@"
	mov $415,"@"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\

	textoff

;ʉFJiʂPOOɕύXj@iv[v
	mov %61,100
	chvol 1,(%3002*%61/100)
;wiFnL@Vb^[tF[h
	bg "bg\dai2kou\watarirouka.jpg",26

	texton

	mov $401,"uCFwC迍DIv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"@@"
	mov $403,"uߍDCߐccHv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"@@"
	mov $405,"w@㼒woqhdrsdrr@iDgDrxIρC"
	mov $406,"aI͈ϓI牕B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $407,"VO㤋FINtB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"@@"
	mov $409,"u䐥fC㤋Iccv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $410,"@@"
	mov $411,"uccVv񋎗EHv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $412,"@@"
	mov $413,"uIIv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $414,"@@"
	mov $415,"uߓmJBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $416,"@@"
	mov $417,"uccߘccӁccv"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"fLsDӎvnNǵCቺB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"{[x́Acm쒅NΗeI\C݋pcc"
	mov $403,"Ꙫ߈㫁B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"@@"
	mov $405,"uccoYrEHv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"@@"
	mov $407,"ucccv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"@@"
	mov $409,"uGJBߜޗߓIC笕sGdlBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $410,"@@"
	mov $411,"uccߘcc"
	mov $423,"mw݁cc"
	mov %120,410: mov %121,411:mov %122,24:gosub *messagefont
	mov %120,423: mov %121,423:mov %122,24:gosub *messagefont
	br
	$411@/
	$423
	add $411,$423/

	mov $412,"a^Õ敎ccv"
	mov %130,412
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@



	mov $413,"@@"
	mov $414,"u^ÕHv"
	mov $415,"@"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"ucʗ܁CVωJIC"
	mov $402,"̈xIRe^Õ䔗gpC"
	mov $403,"ҍ㔓a|INs͗牁c"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"ϓIݑΏC"
	mov $405,"gJV\CWB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"ACŋ㤋pc"
	mov $407,"L_ǗC܁c"
	mov $408,"ESr݊Ocv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"@@"
	mov $410,"ucccv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $411,"@@"
	mov $412,"CYrρcSL꘢\IB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $413,"@@"
	mov $414,"umw܁C"
	mov $415,"\ݘa꘢I掖C"
	mov $416,"\󓞗ِIÁc"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $417,"\ܜk]h㤋YWc"
	mov $418,"ȁcv"
	mov $423,"ccccccv"
	mov $419,"@"
	mov $420,"@"
	mov %120,417: mov %121,420:mov %122,24:gosub *messagefont
	mov %120,423: mov %121,423:mov %122,24:gosub *messagefont
	$417
	$418@/
	$423/
	add $418,$423/
	\


	mov $401,"fx{OCҕsgB"
	mov %130,401
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"\IᒆoWWIB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $403,"㤋IvC琥꘢GIOB"
	mov $404,"LB玓sۛ璅ϓIB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"OIޘNtCT琥VJB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"ٖ@CȋIlSC"
	mov $407,"\SLrc"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"@@"
	mov $409,"ucٕsNcv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $410,"@@"
	mov $411,"uFwcvgnICwsp]Bv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $412,"@@"
	mov $413,"usCޓsIցB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $414,"ؓsCBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $415,"@@"
	mov $416,"ucccv"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"uߍGލB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"ډccza@IBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $403,"@@"
	mov $404,"ucv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"@@"
	mov $406,"ܗuFvC"
	mov $407,"䔫gwَfCsOB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"擾QccR@\]c"
	mov $409,"@"
	mov $410,"@"
	mov $411,"@"
	mov $412,"@"
	mov $413,"@"
	mov $414,"@"
	mov $415,"@"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\

	textoff

	bg black,12

	texton

	mov $401,"̈xa뗢CڏWBwB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"L㑋ҁAcaҁAȞғC"
	mov $403,"CVekC"
	mov $404,"ލvIVÓIVwsPsJғInsl蚁B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"@@"
	mov $406,"ߍwřߗIB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $407,"ґRӗVIC"
	mov $408,"AÈӐʉgVIlC"
	mov $409,"{vLB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $410,"ى琥ϓIߓxB"
	mov $411,"vr֕~Cvr꘢ƒn]B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $412,"@@"
	mov $413,"a㤋ݎC"
	mov $414,"ߑFp糒ȓIV\s\ÏAsEH"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $415,"c䍷_zc{۟oC"
	mov $416,"AܜލvLӖB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $417,"UQ^CAa㤋ϓIB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $418,"@ʐl֍D܁CAvVx"
	mov $419,"vLCnÈ⋍݉FB"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"A蕉䎩Ȗ琥cc"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"꘢笖][ޏw@񗈓IlB"
	mov $403,"@ʑ꘢lC@ېYrsُCB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"ACA㤋A}C֗L쏬cc"
	mov $405,"ቺp蕗rlC"
	mov $406,"甉䊴ٔB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $407,"@@"
	mov $408,"pCC㍒nB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"ގ䔓Ecc"
	mov $410,"ҁClcc"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $411,"ىIoΗeIlssKC"
	mov $412,"ߍ}ΉA^gIlp\RٜB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $413,"@@"
	mov $414,"Cސ㍪{vLYrGirjB"
	mov $415,"Ó^IsݘEH"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $416,"֑Mޏw@cc"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\

	textoff

;GtFNgFJ
	gosub *lain
;wiFejXR[gi܂j@ʏtF[h
	bg "bg\dai2kou\tennis_kumori.jpg",14
	delay 2000

;ʉFpRiejX̉j
	dwave 2,"wave\tenisu.wav"
	delay 2000

	texton

	mov $401,"赒̈xlrԝQCpvLᗜIgeB"
	mov $402,"zBݓߗC䗈㤋B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $403,"R@ccQ\B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

;ʉFpRiejX̉j
	dwave 2,"wave\tenisu.wav"

	mov $404,"@@"
	mov $405,"uIڒIv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"@@"
	mov $407,"C꘢lB"
	mov $408,"椖~JCْǕsf㤋B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"Sg|s݈ӁC"
	mov $410,"꘢lCS_ؒnd񋅁B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $411,"᪓IˁCFIہCSs\I݉Jcc"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

;ʉFpRiejX̉j
	dwave 2,"wave\tenisu.wav"

	mov $412,"@@"
	mov $413,"uccޔЉJI"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@


;ʉFpRiejX̉j
	dwave 2,"wave\tenisu.wav"

	mov $414,"ޔЉJccv≺CAYrs\rJIv"
	mov $415,"@"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\



	mov $401,"ِlÓI㤋CIВB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"bŐݗ^^Нٖ@TI៓lCsfvHʁC"
	mov $403,"II֍]B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"@@"
	mov $405,"cczso܏YrB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"rsmpYr\ڋ\ˍDB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $407,"szB"
	mov $423,"szCszœϓIB"
	mov %120,407: mov %121,407:mov %122,24:gosub *messagefont
	mov %120,423: mov %121,423:mov %122,24:gosub *messagefont
	$407@/
	$423/
	add $407,$423/
	@

	mov $408,"߈xx㔗CÈȏC"
	mov $409,"䑜竈C㤋B"
	mov $410,"@"
	mov $411,"@"
	mov $412,"@"
	mov $413,"@"
	mov $414,"@"
	mov $415,"@"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	mov %130,408
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\

	textoff

	bg black,12

;GtFNg~
	gosub *lainend
;ʉtF[hAEg
	dwavestop 1 : mov $30,""
	delay 4000

;wiFuЂ܂AFBv
	bg "cutin\dai2kou\cut01.jpg",12
	delay 3000

	bg black,12

	delay 2000

;aflFfree0508.mp3@iv[v
	bgm "bgm\free0508.mp3"


;wiFՒdE܂i㔼j@ʏtF[h

	lsp 1,":c;bg\dai2kou\saidan.jpg",0,0
	print 12

;EFCgQb
	wait 2000

;wiFՒdE܂iֈړj
	for %199=0 to 199
		gettimer %90
		msp 1,0,-3,0
		print 1
		waittimer (%90+32)
	next

	csp 1

	wait 2000

	bg "bg\dai2kou\saidan_kumori_d.jpg",12

	texton

	mov $401,"wܟB@CوlIGB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"_CݍzOC"
	mov $403,"ҒnFB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"@@"
	mov $405,"uccv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"@@"
	mov $407,"\lNC꒼݉y^ߕVB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"^M_I݁B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"Rcc݁cc"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $410,"ݔ@ʕsϓ_YrCSNAv|B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $411,"@@"
	mov $412,"vFϓIB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $413,"\䐥ΒB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $414,"|C\ΓzÐlC"
	mov $415,"|و؜CEn}ÎI៎ҁB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $416,"ccߘpcc"
	mov $417,"ȓϓIpvHcc"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $418,"@@"
	mov $419,"uccccv"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"J◹ABCr܁B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"RC^IABEH"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $403,"ٕ\ݔw@TBwILbVlB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"zvܖCrܖIiB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"֔~JVCs@nB"
	mov $406,"TPЎi]JB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $407,"@@"
	mov $408,"@ʉᔈ\黁CS~IԁCۏA\rH"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"甑FlsٗoC"
	mov $410,"@ʌIԁcc"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $411,"ccsCaB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $412,"ŎVrCAߑ\ہB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $413,"UIo_CAًx~n"
	mov $414,"CӗpJB"
	mov $415,"@"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"敔aCޖssʁB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"AI寈ρC"
	mov $403,"\܁CwYrsvxB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"g苋\C"
	mov $405,"푕܉eYrHfJCސFIB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"@@"
	mov $407,"֌wZԋΏC"
	mov $408,"osIvCvrVkÁB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"C@ِIrSIxC"
	mov $410,"\։{IڎB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $411,"ܓCٕIB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $412,"֐ėLǒmI@ʁC"
	mov $413,"s`ekw@^ԓIaJB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $414,"TC^ÕIߍlEePB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $415,"@@"
	mov $416,"ccccccB"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"SzsoCjVB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"㱉zC"
	mov $403,"aANX笋B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"LzSZāCpSGS󋕗^笖]㫁B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"@DݏdISCaedoB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"@@"
	mov $407,"uccHNccEcc"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"֊EccEccscc"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"Rρcc"
	mov $423,"RYrssccv"
	mov %120,409: mov %121,409:mov %122,24:gosub *messagefont
	mov %120,423: mov %121,423:mov %122,24:gosub *messagefont
	$409@/
	$423/
	add $409,$423/
	@

	bgmfadeout 3000
	bgmstop

	mov $410,"@@"
	mov $411,"^"
	mov %130,410
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $412,"@@"
	mov $413,"ˑRCw@⁗rsB܉ݒnIB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $414,"ޘccÓ܁cc"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $415,"pwCC㲓IpCŌߘlB"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\

	textoff

;ʉFJ̉iʂUOjiv[v
	dwaveloop 1,"wave\se-007.wav" : mov $30,"wave\se-007.wav"
	mov %61,60
	chvol 1,(%3002*%61/100)
;wiFE܂
	bg "bg\dai2kou\seidou_iriguchi_kumori.jpg",12

	delay 2000
;wiFE܂iuj@tF[hȂ
	bg "bg\dai2kou\seidou_iriguchi_kumori_bure.jpg",1
	delay 1000
;G\FEVX^[@f@ʒuFE
	ld r,":a;tatie\sei\sei_sister_konwaku.bmp",12
	delay 1000
;G\F搶@ʏ@ʒuF
	ld l,":a;tatie\sensei\tuujyou1.bmp",12
	delay 2000

	texton

	mov $401,"uccVBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"@@"
	mov $403,"uuށCDvsFBvv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"@@"
	mov $405,"CGՓICXq㓾kB"
	mov $406,"aVOF{vYrIB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $407,"vܗLYrsIԁC"
	mov $408,"TA藢᚛Jcc"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"@@"
	mov $410,"uuCޘEH"
	mov $411,"EsZyᚁB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $412,"݉J׋NsցCAc؜ޗpkBvv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $413,"@@"
	mov $414,"V糎nXCgvLB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $415,"R@CsEBAߓIʏCWC惁B"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\

	textoff

	cl l,0
	cl r,12

;wiFE܂@tF[hȂ
	bg "bg\dai2kou\seidou_iriguchi_kumori.jpg",1
	delay 1000
;wiFE܂@ʏtF[h
	bg "bg\dai2kou\seidou_kumori.jpg",12
	delay 1000

;wiFE܂iuj@tF[hȂ
	bg "bg\dai2kou\seidou_kumori_bure.jpg",1
	delay 1000

;G\F搶@ʏ@ʒuF
;G\FEVX^[@ʏ@ʒuFE
	ld r,":a;tatie\sei\sei_sister_tuujyou.bmp",0
	ld l,":a;tatie\sensei\tuujyou1.bmp",12

	delay 2000

	texton

	mov $401,"dގEBAIJB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"ґRrzCApvLs[B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $403,"DCzaϓIlցB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"ێaVOI餁C"
	mov $405,"ݘGIʈ֏㍿B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"@@"
	mov $407,"uusp݈ӉCӏADBvv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"@@"
	mov $409,"uusccϓIԖ瑾痹ccvv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $410,"@@"
	mov $411,"uCB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $412,"rCvsvNŊś惁H"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $413,"ґRʖvLʐ^C"
	mov $414,"AʗېYrBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $415,"@@"
	mov $416,"uuccωȘEHvv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $417,"@@"
	mov $418,"uusōDJBvv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $419,"@@"
	mov $420,"ucccv"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"uvCLL㌓IړkB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"@܁CߊŁccޘx耓IqQāB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $403,"ꖼla\PPI㋙X퓖֐NIjqQC"
	mov $404,"r@֑圓ISāB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"KIꉺq퐄njIvxۓ{C"
	mov $406,"C։ƐlڋwC@@苋rYB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $407,"RCrيkYB֐يkYB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"ō@@ۉdCČdVcc"
	mov $409,"Bʐcc"
	mov $423,"@ߏFCˋيkYBv"
	mov %120,408: mov %121,409:mov %122,24:gosub *messagefont
	mov %120,423: mov %121,423:mov %122,24:gosub *messagefont
	$408
	$409@/
	$423/
	add $409,$423/
	@

	mov $410,"@@"
	mov $411,"ܒCVcNhŁB"
	mov %130,410
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $412,"惏ʒwON픻يkYxC"
	mov $413,"ߎVChB"
	mov $414,"@"
	mov $415,"@"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\

	mov $401,"uېEL\NB"
	mov $423,"\NB"
	mov %120,401: mov %121,401:mov %122,24:gosub *messagefont
	mov %120,423: mov %121,423:mov %122,24:gosub *messagefont
	$401@/
	$423/
	add $401,$423/
	@

	mov $402,"Ccٙrhi@C"
	mov $403,"ˈܒv\Nsٖ@BCQ҉ƑISsB"
	mov %130,402
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"@ʑmρC"
	mov $405,"p։ƐlڋwJBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"@@"
	mov $407,"uccCYrCvL픻Y藁Hv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"@@"
	mov $409,"ugޘgށCvzC"
	mov $410,"ߓϓI藁Bv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $411,"@@"
	mov $412,"ucccv"
	mov $413,"@"
	mov $414,"@"
	mov $415,"@"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"uCsDӎvBӁCCGҁCޔIB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"@aYV㱗LؓI拌nB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $403,"_Il笕s\IBفCAύفB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"ܓCCYrLYޔЗ@݁C"
	mov $405,"ߎe欑zzJB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"@ʔƉIߍsIlvLDDIEC"
	mov $407,"ߏAƍߎғIVC|CIEB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"r蕁evݖ@󗹏AsfIEC琥ϓIB"
	mov $409,"vLQГIYCAٖ@gB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $410,"@VjCƗߓIlsKlmnڎ膌B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $411,"ސÈȗݐlЉ艺Iw孍xB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $412,"@ʔj孍pvLC膌C"
	mov $413,"ߜϓI孍򖔗LYrӖ藁Hv"
	mov $414,"@"
	mov $415,"@"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"uŋߓIlC䐥tsލB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"ߍLgbIlC䐥~tÓÏwyOSጁC"
	mov $403,"ޔМ㉍DrB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"CYrs픻Y藁H"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"ߐCCލNlCǋsxaC"
	mov $406,"꘢sIڎCB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $407,"{r܌YIČCيkYC"
	mov $408,"CYޔЖ،YIQҁB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"ϓIwm~xC"
	mov $410,"ّF܁CAFI^w݁B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $411,"ȁC֑\EINQlaPPI㋙XC"
	mov $412,"헹́C\팴ZB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $413,"浑Iۓ{AЉِIĐC"
	mov $414,"ȋy\㱐ڈܒvImC"
	mov $415,"ّFܓsgxvB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $416,"v\󓾍ٔAȗB"
	mov $417,"ޏACޘƕܓIwi@xB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $418,"@EsĐIΗBv"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"ܓޗCV[[nȗB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"IgVOX×B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $403,"@@"
	mov $404,"ӁC@孍I膌嘰IC"
	mov $405,"ٖ@gޘEIIJB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"slٙrlC@ٙrlB"
	mov $407,"ٙrKlQiˍsB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"ۍCmӗmmnnB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"@@"
	mov $410,"urρC返\𗹘EHv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $411,"@@"
	mov $412,"uccBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $413,"@@"
	mov $414,"urCGB"
	mov $415,"svДClGB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $416,"@ʗLvٙrIlCApߓI苎JBv"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\

	textoff

;ʉXgbv
	dwavestop 1 : mov $30,""
	mov %61,100
	chvol 1,(%3002*%61/100)
;G\FEVX^[@@ʒuFE
	ld r,":a;tatie\sei\sei_sister_odoroki.bmp",12

	texton

	mov $401,"ucccv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"@@"
	mov $403,"SЖҒn꒵B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"ٙrIlcc䐤ӗLB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"@@"
	mov $406,"uߘC݂h耒OǓwIjC"
	mov $407,"IwGBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"ݑgݍƓIC{C"
	mov $409,"哾֒s֓IGBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $410,"原䋎T]Cs悍їn"
	mov $411,"VIaVÁBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $412,"R@C|s๘n܁B"
	mov $423,"ur^DBvv"
	mov %120,412: mov %121,412:mov %122,24:gosub *messagefont
	mov %120,423: mov %121,423:mov %122,24:gosub *messagefont
	$412@/
	$423/
	add $412,$423/
	@


	mov $413,"@ʉvߎOlCv"
	mov $414,"FmQdlBvv"
	mov $415,"lFsٙrFBvv"
	mov %130,413
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $416,"ȁCKlpٙrFcc܁Bvv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $417,"^甐lI̎Bvv"
	mov $418,"甈꘢xgԌINtwC"
	mov $419,"܏oϓIԁccv"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"ccÓ܁ccEB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"@CSwZsݖIwZЋ\wlxB"
	mov $403,"vzR\Α꘢lcc"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"s܉񗈁ccR։T]H"
	mov $405,"ވʁwVxCÓSSVIEB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"@@"
	mov $407,"us藁C^ЈӖ㗈܁CZٓIB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"@CQlIl"
	mov $409,"EsėL鈉ّFsQГIٙrB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $410,"Yܐ؁ČC\́B"
	mov $411,"QГIٙrmsB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $412,"ߍM\Cvpgㆈ܁CٕAȁAIlC"
	mov $413,"֗LIlC"
	mov $414,"ݎnT@aЉBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $415,"rCAJB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $416,"@ʕIi@nNClsǁCߎAlB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $417,"٘ߔЗ@CsAsB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $418,"p萧ّIُہCR@fㄗ⋍ݎȜC"
	mov $419,"pi@I桐gB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $420,"ϘːŉLI@Bv"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"VIԁCېݓ{enېI"
	mov $402,"wZЋ\wlxČIB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $403,"꘢NCOlC"
	mov $404,"pvLCCrs吥C{߁B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"Cܑݓߗ哾kCSB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"cci@s\ٙrB"
	mov $423,"sCӐٖ@ٙrB"
	mov %120,406: mov %121,406:mov %122,24:gosub *messagefont
	mov %120,423: mov %121,423:mov %122,24:gosub *messagefont
	$406@/
	$423/
	add $406,$423/
	@

	mov $407,"CsNC"
	mov $408,"ݛڎ\Ivӎ{QsCB"
	mov %130,407
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"{AE゗emߔƓIi@C"
	mov $410,"r\ٛwqsIٙr藁H"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $411,"@@"
	mov $412,"Cϛcc"
	mov $413,"@"
	mov $414,"@"
	mov $415,"@"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"@ʛwqFݑcCLVlFm"
	mov $402,"Cnw͉rVB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $403,"OĎqaNC\EϑzC"
	mov $404,"AŗLz֗B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"ߍ\ҎwIwqFC"
	mov $406,"s݌FNu~~JvI鿑B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $407,"Fzp[{ޘEB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"֓ߍٖ@dIЉalC"
	mov $409,"Bcc"
	mov $423,"C焑ȓIVB"
	mov %120,408: mov %121,409:mov %122,24:gosub *messagefont
	mov %120,423: mov %121,423:mov %122,24:gosub *messagefont
	$408
	$409@/
	$423/
	add $409,$423/
	@

	mov $410,"@@"
	mov $411,"Vؒnꐺ܋N惁CˑRCܓB"
	mov $412,"@"
	mov $413,"@"
	mov $414,"@"
	mov $415,"@"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	mov %130,410
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"uPXWXNCƉ˗ꖼC萂SOVӐܖ\Cv"
	mov $402,"{lNَQҌŋrC֗ph{Ȗ\sCśfQB"
	mov $403,"R@̗pÓyZC"
	mov $404,"ǜPݓUIېB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"ÍCʕE蜁C"
	mov $406,"R擕sǎݏB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $407,"@IK^CݐOE"
	mov $408,"ŉΊhCCnفC"
	mov $409,"UۏoQdImLcc"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $410,"VINFC@I"
	mov $411,"󖢔CB"
	mov $412,"RCLꕔ乎up\"
	mov $413,"|sCFI^ӐB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $414,"٘Ɖ@ぐlYߍsIlC"
	mov $415,"ې^IpN@藁H"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $416,"CNlCAُLls\IC"
	mov $417,"Ós֗EH"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $418,"ϓI@BeЉB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $419,"ދNېCݛEQONcc"
	mov $420,"N@Yr藁Hv"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\

	textoff

;G\FEVX^[@f@ʒuFE
	ld r,":a;tatie\sei\sei_sister_konwaku.bmp",12

	texton

	mov $401,"ccYrsvLB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"N@pLlC"
	mov $403,"C᳁w笕sېINƍ߁xI㵕zC"
	mov $404,"꒼ȈЕ֗I`ݒB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"@@"
	mov $406,"uICSvLCB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $407,"@CwqFˍsËNB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"@CZЋ\EvrlvrIVB"
	mov $409,"ߍ\E\\AśfSIwqFC"
	mov $410,"@瓞RIB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $411,"܉񗈁CGCwqV㱓I\k媉aGB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $412,"cЗ@dlg㐄C։Ud{sݓIRB"
	mov $413,"viA戁CrۓW|ɐވTB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $414,"ݏ\{ӓINClAȓIvsFB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $415,"@ʐߎȁccߓIFC"
	mov $416,"ϓIC߉raHv"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"cccB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"ӁCw֖vLߔВnsC"
	mov $403,"Acc"
	mov $423,"ߏtC㱊VB"
	mov %120,402: mov %121,403:mov %122,24:gosub *messagefont
	mov %120,423: mov %121,423:mov %122,24:gosub *messagefont
	$402
	$403@/
	$423/
	add $403,$423/
	@

	mov $404,"CsC蕗ɒB"
	mov %130,404
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"IN}wa쓯wC"
	mov $406,"\F蕓I\kB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $407,"sCӛEœ\FIώqB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"r蕘aތ|gnI㤋ߘwqcc"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"@@"
	mov $410,"ucra藁c^Iccv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $411,"@@"
	mov $412,"uߐKlIB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $413,"ϕÒn敒ԁC"
	mov $414,"mCLss\SrB"
	mov $415,"߈薾ވ_B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $416,"@ʗLzv桓I@Cҝٖ@ZIlC"
	mov $417,"A|s๘nߓI͗JBv"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\

	textoff

	delay 1000
;BGMFfree56.mp3iiv[vj
	bgm "bgm\free56.mp3"

;GύXF搶@ʏQ@ʒuF
	ld l,":a;tatie\sensei\tuujyou2.bmp",12
	delay 2000

	texton

	mov $401,"uߛE@gpޔЗ͗ʗJBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"@@"
	mov $403,"w@Ċ睗B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"\mccH"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"CYrCޘlcc"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"sCBCޘlcc"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $407,"{SUNIB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"ߗCȍCHʓIB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"ʏIgBߐlэRI\́B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $410,"Ӂcc@ʎgpތҁw͗ʁxC"
	mov $411,"ߘBd邛ÎB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $412,"@@"
	mov $413,"ACޑaB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $414,"՗IS孖ٖ͝@ėʁC"
	mov $415,"cc@ʘߔЎCގ^Icc"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $416,"@@"
	mov $417,"uQEHQȓIegVHv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $418,"@@"
	mov $419,"ucccv"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"uAC@ʏAϕCu\xI\ssǁC"
	mov $402,"ߓIegVdꝔ[Bv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $403,"@@"
	mov $404,"ccʑRCVmB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"I勎B"
	mov $406,"֗LݏrInB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $407,"@@"
	mov $408,"uߛEȐs×B"
	mov $409,"KvIfE塜ݗBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $410,"uspQBސhB"
	mov $411,"C桎ȘaFnBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $412,"@@"
	mov $413,"ucc桁ccv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $414,"@@"
	mov $415,"RccH"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $416,"꒼ȗC䐥dl桒IC"
	mov $417,"^I\CdlI߈EH"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"ACDQcc"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"szݓIȁB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $403,"sz܉I@ʐ搶C֗L꒼ݐgIC"
	mov $404,"sz烞}aIDӁB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"䐥w䇉ԔVNxB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"VIʓCݑIʍEB"
	mov $407,"ߍ^SIwFB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"ޗvLCOe[IlB"
	mov $409,"ޗI{hB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $410,"@@"
	mov $411,"vccPވ؁cc"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $412,"䜃r\cc"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $413,"@@"
	mov $414,"uߖIJH"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $415,"ߕPݐC㱊V߁Bv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $416,"u֔@C֗vҘEHv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $417,"ߘaߏdvIl툻QX[C~Bv"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\

	textoff

;BGMXgbv
	bgmfadeout 1
	bgmstop

;G\FEVX^[@@ʒuFE
	ld r,":a;tatie\sei\sei_sister_odoroki.bmp",12

	texton

	mov $401,"uccIv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"@@"
	mov $403,"uŏێIߘNcc"
	mov $404,"ꎟFIC֖vLCnl藁B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"^SsEϛB"
	mov $406,"C͈ܒvЎӁCB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $407,"_E{|Crxu@ʎȎS"
	mov $408,"NޔВnsB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"cc֗vECGH"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $410,"ϓInj~C~B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $411,"݋vHCݒɋꒆEρCpˑRsf픍BC"
	mov $412,"يݜޘEdꊴ笖]C~B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $413,"㈓k^JH"
	mov $414,"ߍݜފw@OEIɋaܖB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $415,"߈؁Cݐ݌ޗN߁Bv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $416,"ߔCIAs߈꘢lB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $417,"ߏIlsُnHAyB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $418,"zۈꉺJCߔЈꐶsٖ@ISN曈C"
	mov $419,"ߊOC[[ݏdvVlgI߈ꍏB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $420,"ߘccؓsى҉Bv"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	textspeed 200
	gosub *textwright
	\

	textoff

	delay 2000

;ʉFmCY
	dwave 10,"wave\noise01.wav"
;wi@u^ÂɂȂĂɖ߂
	bg black,1

	bg "bg\dai2kou\seidou_kumori_bure.jpg",0
	ld r,":a;tatie\sei\sei_sister_odoroki.bmp",0
	ld l,":a;tatie\sensei\tuujyou2.bmp",1

	delay 3000
;ʉFrLrLrLiЂт͂j
	dwave 2,"wave\hibi.wav"
	drawfill 255,255,255 : draw
	wait 200 : repaint
	delay 2000
	drawfill 255,255,255 : draw
	wait 100 : repaint
	delay 200
	drawfill 255,255,255 : draw
	wait 100 : repaint
	delay 2000

;ʉFKVAAAiKXj
	dwave 2,"wave\Glsmash.wav"
	bg black,1

	delay 3000
;ʉFSSSSSSSSSSSinj
	dwave 2,"wave\exp.wav"
;wiFS̕ǁ@tF[h
	bg "cutin\dai2kou\kabe.jpg",18

	delay 2000
;ʉFŠۓ@iv[v
	dwavestop 2
	bgm "bgm\heart.mp3"
	texton

	mov $401,"ߔЏC喝RnGۗB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"@@"
	mov $403,"Bv\I៌IB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"~I䇉ԔVC"
	mov $405,"ݐI^З@CCˁB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"߉ƌcc"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $407,"꒼QCI݁B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"ߑnIwxCÒÒB"
	mov $409,"@"
	mov $410,"@"
	mov $411,"@"
	mov $412,"@"
	mov $413,"@"
	mov $414,"@"
	mov $415,"@"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\

	textoff

;ʉFSIIiS@j
	dwave 2,"wave\MetalC11.wav"
;wiFuołB
;ɂkׂ̂łA
;ɉF̋C𕷂ĂłǂƁcv@ʏtF[h
	bg "cutin\dai2kou\cut25.jpg",12

	delay 4000
;wiFS̕ǁ@ʏtF[h
	bg "cutin\dai2kou\kabe.jpg",12

	delay 1000
;ʉFSIIiS@j
	dwave 2,"wave\MetalC11.wav"
;wiFuFA߂ȂI
;]vȂƂĂ܂cv@ʏtF[h
	bg "cutin\dai2kou\cut26.jpg",12

	delay 3000
;wiFS̕ǁ@ʏtF[h
	bg "cutin\dai2kou\kabe.jpg",12

	delay 2000
;ʉFSIIiS@j
	dwave 2,"wave\MetalC11.wav"
;wiFuFycǂłAy͎ӂȂāv@ʏtF[h
	bg "cutin\dai2kou\cut27.jpg",12

	delay 2000
;wiFS̕ǁ@ʏtF[h
	bg "cutin\dai2kou\kabe.jpg",12
	delay 2000

;ʉFSIIiS@j
	dwave 2,"wave\MetalC11.wav"
;wiFu͂c͂cȉJI
;ȉJcł܂΁AǂɂĂȂ̂Iv@ʏtF[h
	bg "cutin\dai2kou\cut28.jpg",12

	delay 3000
;wiFS̕ǁ@ʏtF[h
	bg "cutin\dai2kou\kabe.jpg",12
	delay 2000

	texton

	mov $401,"ccuB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"AݜޓgI灈eC莗Iۓ{^ݖ|OB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $403,"ICNwxIB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"oCoIݙKCÑB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"@@"
	mov $406,"vݗCޔЊB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $407,"foF߈IcaɋI\B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"@@"
	mov $409,"dρCsv甉ŗB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $410,"szŁB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $411,"szŁB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $412,"szŁB"
	mov $413,"szŁB"
	mov $414,"szŁB"
	mov $415,"@"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"CݓIԁcc"
	mov $423,"ݓIԁCȟ|s๘n܏oB"
	mov %120,401: mov %121,401:mov %122,24:gosub *messagefont
	mov %120,423: mov %121,423:mov %122,24:gosub *messagefont
	$401@/
	$423/
	add $401,$423/
	@

	mov $402,"蓜ޘw@B"
	mov %130,402
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $403,"VIxB"
	mov $404,"ƁccFCsFB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"ޗSЁB䊈CF݁CVs[xӖB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"ρCAEKB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $407,"@@"
	mov $408,"Ės\cc"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"Ės\甐IlF󓞈QB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $410,"Ės\甉SД圁AHB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $411,"@@"
	mov $412,"\EEI莁B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $413,"ÙuI笖][C"
	mov $414,"r\\F흣cc"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $415,"r\\FϓIɋcc"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $416,"ϓIcccccc"
	mov $423,"sÈӁB"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	mov %120,416: mov %121,420:mov %122,24:gosub *messagefont
	mov %120,423: mov %121,423:mov %122,24:gosub *messagefont
	$416@/
	$423/
	add $426,$423/
	\


	mov $401,"sÈӓIԁCraH"
	mov %130,401
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"@@"
	mov $403,"{svvlB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"\aޘǓI͗ʁC"
	mov $405,"A݊OB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"@@"
	mov $407,"vցccޕsklIEB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"@@"
	mov $409,"͗ʏAݜޗB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $410,"ȏ邎mA桉SГI͗ʁCAݜޗB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $411,"@@"
	mov $412,"vցCpޘADB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $413,"@@"
	mov $414,"pޘIԁccAcc"
	mov $423,"v꘢lA槗B"
	mov %120,413: mov %121,414:mov %122,24:gosub *messagefont
	mov %120,423: mov %121,423:mov %122,24:gosub *messagefont
	br
	$414@/
	$423/
	add $414,$423/
	@

	mov $415,"m笖]LuICv꘢lADB"
	mov %130,415
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $416,"v桁BC桎៓lB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $417,"@@"
	mov $418,"Cv͗ʁcc"
	mov $423,"\ގmIC|I͗ʁI"
	mov $419,"@"
	mov $420,"@"
	mov %120,417: mov %121,420:mov %122,24:gosub *messagefont
	mov %120,423: mov %121,423:mov %122,24:gosub *messagefont
	br
	$418@/
	$423/
	add $418,$423/
	\

	textoff

;ʉ~
	bgmfadeout 1
	bgmstop

;ʉFSIIIII
	dwave 2,"wave\MetalC11.wav"
	QUAKE 30,300

	delay 1000

;ʉFSIIIII
	dwave 2,"wave\MetalC11.wav"
	QUAKE 50,500

	delay 1000

;ʉFhSIIIIIIIIiS@j
	dwave 2,"wave\MetalC11_2.wav"
	QUAKE 80,1500
	bg black,12

;ʉFb̚X萺
	dwave 3,"wave\kemono_hoeru.wav"
;wiF_E@Ȃ񂩓ȃtF[h
	bg "cutin\dai2kou\seisin.jpg",84
	delay 3000
;aflFfree41.mp3iiv[vj
	bgm "bgm\free41.mp3"

	texton

	mov $401,"tjHC߉ƌ[গoB"
	mov %130,401
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"IʏzxC"
	mov $403,"ۏoKIB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"ߌҎmIۓ{@jUCB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"@@"
	mov $406,"ݏ㛀IFB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $407,"@@"
	mov $408,"ݏ㛀IFB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"@@"
	mov $410,"ݏ㛀IFB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $411,"@@"
	mov $412,"ݏ㛀IFB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $413,"@@"
	mov $414,"ݏ㛀IFB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $415,"@@"
	mov $416,"ݏ㛀IFB"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"cc蓜ޘnCޔАB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"R݁CLl圛B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $403,"CaL蕁CF󓞗QB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"@ʏA㱗C"
	mov $405,"ߑzz[JB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"@@"
	mov $407,"u@ߊ]\槕ÒnC"
	mov $408,"ColIJBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"@ߋԏ܁C꒼CQClIÁB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $410,"ޏA孍B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $411,"cc"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $412,"֔@CIËpC꘢lICjcc"
	mov $413,"__nNTB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $414,"@@"
	mov $415,"@ʏAϊŉCLV[{B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $416,"ccsC꘢l֍DB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $417,"ߘlCrىIF牺藹B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $418,"@@"
	mov $419,"ccsߏB"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"笕sߏB"
	mov $402,"ߍj䏊I䲓IlB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $403,"ߍQ䒿VlIlB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"ĖszœLlC䎧󈻓I\B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"@@"
	mov $406,"笕s甎ٖ@҉B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $407,"笕s甎ٖ@҉I"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"@@"
	mov $409,"Bcc"
	mov $410,"@ܗv[{IEIԁcc"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $411,"}ÎB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $412,"v甑FB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $413,"C桗A}a\FC"
	mov $414,"AZޕǵcc"
	mov $423,"파HIُCB"
	mov $415,"@"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	mov %120,413: mov %121,420:mov %122,24:gosub *messagefont
	mov %120,423: mov %121,423:mov %122,24:gosub *messagefont
	$413
	$414@/
	$423/
	add $414,$413/
	\

	textoff

	delay 2000
	bgmfadeout 2000
	bgmstop

;wiFE܂@ʏtF[h
	bg "bg\dai2kou\seidou_kumori.jpg",14
	delay 3000

;ʉFJ̉iʂUOjiv[v
	dwaveloop 1,"wave\se-007.wav" : mov $30,"wave\se-007.wav"
	mov %61,60
	chvol 1,(%3002*%61/100) 
;wiFĤt@Pb\ĉʂɖ߂
	bg "bg\dai2kou\rainy.jpg",1
	wait 1000
	bg "bg\dai2kou\seidou_kumori.jpg",1
	delay 2000
;wiFE܂iuj@tF[hȂ
	bg "bg\dai2kou\seidou_kumori_bure.jpg",1
	delay 1000
;G\FEVX^[@f@ʒuF
	ld r,":a;tatie\sei\sei_sister_konwaku.bmp",12
	delay 2000

	texton

	mov $401,"ucccc"
	mov $423,"ccVHv"
	mov %120,401: mov %121,401:mov %122,24:gosub *messagefont
	mov %120,423: mov %121,423:mov %122,24:gosub *messagefont
	$401@/
	$423/
	add $401,$423/
	@

	mov $402,"@@"
	mov $403,"_CᎩȈ꘢lʈ֏B"
	mov %130,402
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"֍crIߘjlC"
	mov $405,"smYrEB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"ݎÒC椖~IJB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $407,"@@"
	mov $408,"ccEH"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"䘸㤋竏oC"
	mov $410,"ݘGWsmsuJB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $411,"A݈C㤋IጔCdV@C"
	mov $412,"œϓIρCI_EksB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $413,"营CݗC甉rʚ뉔"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $414,"@@"
	mov $415,"ucIv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $416,"@@"
	mov $417,"Ďh睗CCxIB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $418,"䓞ꈬLxB"
	mov $419,"菶Rl^^I`wbB"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"AݜccsE㱎浜PI惁B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"ߐV˛CדI᚛惁B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $403,"ccޕsB"
	mov $404,"ӁC\Eݜޗcc"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"@@"
	mov $406,"uccccv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $407,"@@"
	mov $408,"⋋NgCN᚛惁B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"@@"
	mov $410,"uccv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $411,"@@"
	mov $412,"䏫惕݋OCzᗹ\B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $413,"O⁗IJC"
	mov $414,"꒼rݘGC艐kNB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $415,"@@"
	mov $416,"䊴LꔈIݚbB"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\

	textoff

	bg black,14
	dwavestop 1 : mov $30,""
	mov %61,100
	chvol 1,(%3002*%61/100) 
	bgmfadeout 2000
	bgmstop

	delay 3000

;wiFu\\v
	bg "cutin\dai2kou\cut30.jpg",12
	delay 2000
;ʉFJ
	dwaveloop 1,"wave\se-007.wav"
	mov %61,100
	chvol 1,(%3002*%61/100) 
;GtFNgFJ
	gosub *lain
;wiFOρE܂@tF[hC
	bg "bg\dai2kou\ryou_gaikan_kumori.jpg",18
	delay 4000

;GtFNg~
;ʉ~
	gosub *lainend
	dwavestop 1 : mov $30,""

;wiF̎@ʏtF[h
	bg "bg\dai2kou\ryou_heya_kumori.jpg",12

	delay 2000

;wiF̎iuj
	bg "bg\dai2kou\ryou_heya_kumori_bure.jpg",1
	delay 1000

;G\F@iyjE΁@ʒuF
;G\F@Eʏ@ʒuFE
	ld l,":a;tatie\risa\risa_keisou_kusyou.bmp",0
	ld r,":a;tatie\sei\sei_tuujyou.bmp",12
	delay 2000

	texton

	mov $401,"u߉䑖GB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"V苘Bv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $403,"@@"
	mov $404,"ucc^sDӎvCǈɁBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"@@"
	mov $406,"cqmmn񓚓B"
	mov $407,"̉L_B"
	mov $423,"ŗ`B"
	mov %120,405: mov %121,407:mov %122,24:gosub *messagefont
	mov %120,423: mov %121,423:mov %122,24:gosub *messagefont
	br
	$406
	$407@/
	$423/
	add $407,$423/
	@

	mov $408,"@@"
	mov $409,"u^IC՗RC"
	mov $410,"pғSgˉ񗈁ccv"
	mov %130,408
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $411,"@@"
	mov $412,"u߁ccߐCAߘSvIv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $413,"@@"
	mov $414,"u`CzzߓIFJCsz⁐`Iv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $415,"@@"
	mov $416,"uCٕsNkB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $417,"^IC䓞݊Yr藁ccv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $418,"@@"
	mov $419,"ucccv"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"˗㱓IB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"ߗV񗈓I꓅ߕ"
	mov $403,"I牕퓖ЈߕݓߗB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"@@"
	mov $405,"mB"
	mov $406,"\CYrҎˉ񗈓IB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $407,"@@"
	mov $408,"ccsCvLcތ܏oB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"ވؓsIցB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $410,"甗IB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $411,"@@"
	mov $412,"ȍVCvprތB"
	mov $413,"@"
	mov $414,"@"
	mov $415,"@"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\

	textoff

;G\F@iyjEf@ʒuF
	ld l,":a;tatie\risa\risa_keisou_konwaku.bmp",12

	texton

	mov $401,"uccǈɁHv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"@@"
	mov $403,"uga_JB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"h_@CR@cۋhB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"@ʏߍIԁCA@ŊŚGBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"@@"
	mov $407,"uccBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"@@"
	mov $409,"u߉ojBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $410,"@@"
	mov $411,"ucccv"
	mov $412,"@"
	mov $413,"@"
	mov $414,"@"
	mov $415,"@"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\

	textoff
;GF@
	cl r,12
;GF@
	cl l,12
	delay 1000
	bg black,12

	delay 2000

;ʉFJ̉@iv[v
	dwaveloop 1,"wave\se-007.wav" : mov $30,"wave\se-007.wav"
	mov %61,100
	chvol 1,(%3002*%61/100) 
;GtFNgFJ
	gosub *lain
;wiFV΂̍؁E܂
	bg "bg\dai2kou\namikimichi_kumori.jpg",12
	delay 2000

	texton

	mov $401,"xcsIC䑖o[㱁B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"@@"
	mov $403,"vgnICߓI`DNVOC"
	mov $404,"ؓsρB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"\EߓIʑO"
	mov $406,"Jcc"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $407,"@@"
	mov $408,"cc"
	mov $423,"ŏdvIpFcc"
	mov %120,407: mov %121,408:mov %122,24:gosub *messagefont
	mov %120,423: mov %121,423:mov %122,24:gosub *messagefont
	br
	$408@/
	$423/
	add $408,$423/
	@

	mov $409,"ގ䔓䗈CߐjB"
	mov %130,409
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $410,"Cߐr|C]ߔ\筒nOB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $411,"@@"
	mov $412,"ccȁCcc`cc"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $413,"@@"
	mov $414,"vDDIcc"
	mov $415,"@"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\

	textoff

	bg black,16
;GtFNg~
	gosub *lainend
;ʉtF[hAEg
	dwavestop 1 : mov $30,""

;

;ʁFSd}ij

	mov %42,4
	gosub *sindenzu

	wait 2000

;EFCgQb

;

;ʉFS̉@iv[v
	bgm "bgm\heart.mp3"
;wiFwZ̊Ki@ʏtF[h
	bg "bg\dai2kou\kaidan.jpg",14
	delay 3000
;wiFE܂@Vb^[tF[h
	bg "bg\dai2kou\kyousitu_kumori.jpg",26
	delay 3000

	texton

	mov $401,"ꑖCݏdI֜R햟CB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"蕍Ŋ{IesvLB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $403,"IpC⋍ݓߗCck}MIΗeB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"ccƓsQ\B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"@@"
	mov $406,"CŔjޔ}ICaB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $407,"R@\NmCCnnʎB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@


;ʉ~
	bgmfadeout 1
	bgmstop

	mov $408,"@@"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright


	mov $409,"@@"
	mov $410,"chJ"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,48:gosub *messagefont
	gosub *textwright
	@

	mov $411,"@@"
	mov $412,"CލʉIrRB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $413,"䘸ޕÁCkdB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $414,"@@"
	mov $415,"uډCFvCnBv"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\

	textoff

;wiFE܂iuj@tF[hȂ
	bg "bg\dai2kou\kyousitu_kumori_bure.jpg",1
	delay 1000

;G\Fb؁@΂݁@ʒuF
;G\F@Eʏ@ʒuFE
	ld r,":a;tatie\sei\sei_tuujyou.bmp",0
	ld l,":a;tatie\erika\erika_emi.bmp",12

	delay 2000

	texton

	mov $401,"ugޘgށCސr藁CFwHv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"@@"
	mov $403,"soCwfB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"@nCꕛeI\B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"^甐lgB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"\SsmډېYrB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $407,"@@"
	mov $408,"uAܓIρCvݜޗIBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"@@"
	mov $410,"uޘǗLHv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $411,"@@"
	mov $412,"uICfC鈐ccv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $413,"@@"
	mov $414,"u鴁ccꐥ藁Hv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $415,"@@"
	mov $416,"uߏAccv"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\

	textoff

;G\FE@{@ʒuFE
	ld r,":a;tatie\sei\sei_ikari.bmp",12

	texton

	mov $401,"uߏACACC"
	mov $402,"p翓IiNs蓓I@I媉alB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $403,"sn៓lC˕dlC"
	mov $404,"pCߐȗ͗ʓI受lB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"mxzIl"
	mov $406,"甑FIe\lB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $407,"sClCsClhIǓƏlB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"֔@C֎HdlIF"
	mov $409,"omӒޔЍŒsCIlBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $410,"@@"
	mov $411,"XoV͔ʁCލgQoB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $412,"ԜkIC"
	mov $413,"EsĐwxB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $414,"@ۓIgC"
	mov $415,"ILwsZB"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\

	textoff

;G\Fb؁@{@ʒuF
	ld l,":a;tatie\erika\erika_ikari.bmp",12

	texton

	mov $401,"uccIv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@


;BGMFfree41.mp3@iv[v
	bgm "bgm\free41.mp3"

	mov $402,"@@"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright

	mov $403,"@@"
	mov $404,"uܓIA߁CBI"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,39:gosub *messagefont
	gosub *textwright
	@

	mov $405,"@@"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright

	mov $406,"ߍːށcc"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,39:gosub *messagefont
	gosub *textwright

	mov $407,"@@"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright

	mov $408,"⒅lIށIv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,39:gosub *messagefont
	gosub *textwright
	@

	mov $409,"@@"
	mov $410,"ݎÒCLIВB"
	mov $411,"@"
	mov $412,"@"
	mov $413,"@"
	mov $414,"@"
	mov $415,"@"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"u~Yrcc~Yr܏oߔmœIԁIv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"@@"
	mov $403,"ݓwFʑO퓖㵐JIC"
	mov $404,"ۓ{naȒcRBB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"@@"
	mov $406,"u@ߗvoCLBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $407,"@@"
	mov $408,"uYAYrHv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"@@"
	mov $410,"u܉LoccnBv"
	mov $411,"@"
	mov $412,"@"
	mov $413,"@"
	mov $414,"@"
	mov $415,"@"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\

	textoff

;G\Fb؁@@ʒuF
	ld l,":a;tatie\erika\erika_odoroki.bmp",12

	texton

	mov $401,"uYccIHv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"@@"
	mov $403,"䘸ܗzo斏ƕЁC"
	mov $404,"WhOIwށxŁB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"ƕЏLܒfIߔcFIRC"
	mov $406,"ǍݘHIC"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $407,"֗L݋C㗐峗IB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"^ÕIʑFڐGC"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"֗LeЍ݈ÒnىFsoI"
	mov $410,"Iges^^n픏B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $411,"@@"
	mov $412,"uAr\ccI"
	mov $413,"ލƕАIIcc"
	mov $423,"ccIv"
	mov %120,411: mov %121,413:mov %122,24:gosub *messagefont
	mov %120,423: mov %121,423:mov %122,24:gosub *messagefont
	br
	$412
	$413@/
	$423/
	add $413,$423/
	@

	mov $414,"@@"
	mov $415,"CL嗈IC"
	mov $416,"R@cƕЎTB"
	mov %130,414
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $417,"o茒n橎UCB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $418,"NƕЊŗIwFC"
	mov $419,"c꘢ڈ꘢nIokI\B"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"uuwVxhIGBx"
	mov $423,"VauڈNIBvv"
	mov %120,401: mov %121,401:mov %122,24:gosub *messagefont
	mov %120,423: mov %121,423:mov %122,24:gosub *messagefont
	$401@/
	$423/
	add $401,$423/
	@

	mov $402,"@@"
	mov $403,"uYAYrӌgI"
	mov %130,402
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"IccލƕЈ营II"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"FCCJ˘oޔЎcc"
	mov $406,"@"
	mov $407,"@"
	mov $408,"@"
	mov $409,"@"
	mov $410,"@"
	mov $411,"@"
	mov $412,"@"
	mov $413,"@"
	mov $414,"@"
	mov $415,"@"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\

	windoweffect 1

	textoff

;ʉFvr^
	dwave 2,"wave\binta.wav"
	drawfill 255,255,255 : draw
	wait 200 : repaint

;G\Fb؁@_[W@ʒuF@tF[hȂ
	ld l,":a;tatie\erika\erika_damage.bmp",1
	QUAKE 20,300
	delay 2000

;G\Fb؁@{@ʒuF
	ld l,":a;tatie\erika\erika_ikari.bmp",12

	windoweffect 10,500

	texton

	mov $401,"uYAYrccIv"
	mov $402,"@"
	mov $403,"@"
	mov $404,"@"
	mov $405,"@"
	mov $406,"@"
	mov $407,"@"
	mov $408,"@"
	mov $409,"@"
	mov $410,"@"
	mov $411,"@"
	mov $412,"@"
	mov $413,"@"
	mov $414,"@"
	mov $415,"@"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\

	windoweffect 1
	textoff
	windoweffect 10,500

;ʉFvr^
	dwave 2,"wave\binta.wav"
	drawfill 255,255,255 : draw
	wait 300 : repaint
;G\Fb؁@_[W@ʒuF@tF[hȂ
	ld l,":a;tatie\erika\erika_damage.bmp",1
	QUAKE 40,400
;GFb؁@tF[hȂŏ
	cl l,1
	QUAKE 20,200

	delay 2000

	texton

	mov $401,"psS͓I㈎ڑōݗIcC"
	mov $402,"\Ig̔ד|݋InB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $403,"@@"
	mov $404,"ucc~JCIlccv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"@@"
	mov $406,"ueAeeccv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $407,"@@"
	mov $408,"ubC֗œIB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"@ߑى꘢lUC֍D܁ccv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $410,"@@"
	mov $411,"uDADɁccDɛccv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $412,"@@"
	mov $413,"uɘEHmuIud^JHv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $414,"@@"
	mov $415,"ܒCOۗsB"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\

	textoff
	QUAKE 20,200
;G\Fb؁@@ʒuF
	ld l,":a;tatie\erika\erika_naki.bmp",12

	texton

	mov $401,"usvCsvĜϗccIv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"@@"
	mov $403,"u^IlB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"ߜϓIlC{vLC瀁B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"AZ]CٕsC꘢ϓIlBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	QUAKE 20,200

	mov $406,"@@"
	mov $407,"uecIv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"@@"
	mov $409,"螒œIc礁C蕍@ށB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $410,"p┙I_\C"
	mov $411,"ssnN߁B"
	mov $412,"@"
	mov $413,"@"
	mov $414,"@"
	mov $415,"@"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"ǓwFnŒB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"و꘢s蓌}IlLoޔЎCsݓIB"
	mov $403,"ޔЋǖʓIC琥\쎩nB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"@@"
	mov $405,"uٕsNC䓹]I"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"VOICSs]I"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $407,"s߁CsٓmCC"
	mov $408,"MIRyVIdtccȁC苌ZcIv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"@@"
	mov $410,"uccECucv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $411,"@@"
	mov $412,"蝇qI܁C]N߁B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $413,"{pCIwxʁB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $414,"@@"
	mov $415,"u{ccߓIցccv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	QUAKE 20,200

	mov $416,"@@"
	mov $417,"usvcIv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $418,"@@"
	mov $419,"IwBE٘HB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $420,"SZ߈u㱓Ij΁CsON߁B"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\

	textoff

	bgmfadeout 1
	bgmstop

;ʉFKb
	dwave 2,"wave\ClothC.wav"
	QUAKE 40,600

	delay 3000
;GFb؁@
	cl l,12
	delay 2000
;G\F@E^ʖځ@ʒuF@tF[h
	ld l,":a;tatie\risa\risa_majime.bmp",16
	delay 3000

;G\FE@@ʒuFE
	ld r,":a;tatie\sei\sei_odoroki.bmp",12
	delay 2000

	texton

	mov $401,"ucccv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"@@"
	mov $403,"u槗CǈɁB"
	mov $423,"E槗cv"
	mov %120,402: mov %121,403:mov %122,24:gosub *messagefont
	mov %120,423: mov %121,423:mov %122,24:gosub *messagefont
	br
	$403@/
	$423/
	add $403,$423/
	@

	mov $404,"@@"
	mov $405,"ߗsIہCs\\֓IC֗L߉pNlIʗeB"
	mov %130,404
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"A݉䓥sNߓIu㱁C"
	mov $407,"Iǵcc헜ZB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"@@"
	mov $409,"uCYrcH"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $410,"ٗcc㤋ccv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $411,"@@"
	mov $412,"u\E]BȁC槗Bv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $413,"@@"
	mov $414,"us槁I"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $415,"g\sĈQFCLlCiI"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $416,"ls\팴ZIc"
	mov $417,"u䓾LlDDٙr\Iv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $418,"@@"
	mov $419,"uurCޏAI጗Bvv"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"IjC⁗꘢nIB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"@CߘlnC"
	mov $403,"aݓCLws𗹁B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"@@"
	mov $405,"uu@A@ʘVccIvv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"@@"
	mov $407,"gCINB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"wwC"
	mov $409,"Ǌw@؎cIōጐlB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $410,"@@"
	mov $411,"uuVIvv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $412,"@@"
	mov $413,"œ\IgeCȉn竗勎B"
	mov $414,"@"
	mov $415,"@"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\

	textoff

;G\Fb؁@@ʒuF
	ld l,":a;tatie\erika\erika_naki.bmp",0
	ld r,":a;tatie\sei\sei_tuujyou.bmp",12

	texton

	mov $401,"uu@ʘVCFccF\vQccIvv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"@@"
	mov $403,"҈ϐxx˕\B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"RC@ʘVppQГI_\IcB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"ޘlRIoϓI\cc"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"@@"
	mov $407,"ucߘwqN笋ICJH"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"ގICSsߓIጔCBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"@@"
	mov $410,"uACYrsvccv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $411,"@@"
	mov $412,"uYrsvH"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $413,"rCޗUIލƕЖYrHv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $414,"@@"
	mov $415,"u߁AߘccIccv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $416,"@@"
	mov $417,"udĘޔАٗI剉𗹁I"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	QUAKE 20,200
	@

	mov $418,"LICsEqlߗܗBv"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"bœߋԐMʁC"
	mov $402,"qwB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $403,"꘢LʗeIqwB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"灈꘢ʒꔈFہCŋNÓIwB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"cc}a쏬cc"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"@@"
	mov $407,"u֔@C֑z܎ȐIEH"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"@ʕsIԁCA甜ޘtI꘢woJC"
	mov $409,"vsv苑Ɨo藁Hv"
	mov $410,"@"
	mov $411,"@"
	mov $412,"@"
	mov $413,"@"
	mov $414,"@"
	mov $415,"@"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\

	textoff

;G\Fb؁@f@ʒuF
	ld l,":a;tatie\erika\erika_konwaku.bmp",12

	texton

	mov $401,"uccccccv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"@@"
	mov $403,"vLlÈΏ\CޛE捈ʓIӗB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"甐ssC"
	mov $405,"CnҗB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"@@"
	mov $407,"uFGC֗LBB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"vߑFIXC@ʎBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"@@"
	mov $410,"@ʉQГIgCC뜺g㗹卆B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $411,"ccډC󓞁wxJB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $412,"ϓIuC"
	mov $413,"CICߘ߁B"
	mov $414,"@"
	mov $415,"@"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\

	textoff

	bg black,12

	delay 4000
;ʉFJ̉iSOj@iv[v
	dwaveloop 1,"wave\se-007.wav" : mov $30,"wave\se-007.wav"
	mov %61,40
	chvol 1,(%3002*%61/100)  
;wiF@@Vb^[tF[h
	bg "bg\dai2kou\incyousitu.jpg",26
	delay 3000

	texton

	mov $401,"يw܁C㱉@ʎsnB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"FIƋCԑoKIB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $403,"@@"
	mov $404,"ݓ㱖[㱓IaiOIC@ʐ搶B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"a⋍ݍiqIٖʁC󌨎B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"ґR@ʐ搶vL˓ϒI{C"
	mov $407,"ˑRꕛQ䵓I\B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"@@"
	mov $409,"urcc搥BBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $410,"@@"
	mov $411,"Î⒆CLO⁗IJZFB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $412,"ݜޘJOЎÓI㱗C"
	mov $413,"@ʐ搶CܓB"
	mov $414,"@"
	mov $415,"@"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\

	textoff
;wiF@iuj@tF[hȂ
	bg "bg\dai2kou\incyousitu_bure.jpg",1
	delay 1000
;G\Fb؁@f@ʒuF
	ld l,":a;tatie\erika\erika_konwaku.bmp",12
	delay 2000

	texton

	mov $401,"uccIBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"@@"
	mov $403,"uߐWVIB"
	mov $404,"C@CKl߉QivB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"{Cn^pߓI͗ʁC"
	mov $406,"CܑƓIߘlB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $407,"RCߋppȓInʁC"
	mov $408,"xȔCI~]B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"ґRޓݍmFwIԁC"
	mov $410,"A@ʑߜϗLޔБz@IlC"
	mov $411,"ݎЉ㙪C~CIԁC"
	mov $412,"ЉYrώq藁Hv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $413,"@@"
	mov $414,"ucccv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $415,"@@"
	mov $416,"vLho񓚁B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $417,"݋獐˔V@C\lsِō"
	mov $418,"ᒅꕛIρB"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"uߕKlӛΓȌIwጔCxC"
	mov $402,"C꘢G܎ҁCCЉśBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $403,"u@ʘsCʓIlAsKBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"uccCCጁC֎TqBv"
	mov $405,"uޓϐsߏIBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"uߜޔАgᚓIlܓIqC"
	mov $407,"^ߍIq"
	mov $408,"ڗLٖ@FIeḱBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"@@"
	mov $410,"ucccv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $411,"@@"
	mov $412,"ى@ʐ搶蕕sfI獐ˁC"
	mov $413,"Ғn椙ߒB"
	mov $414,"@"
	mov $415,"@"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"uˁC݋N笋I߁Cv"
	mov $402,"鈖s~ߓIJB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $403,"ߐIߓIώqB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"CCnb́C"
	mov $405,"UǋጔCCATqB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"ϓIlC鈓ssIB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $407,"LVC߉ρC폊LlePC"
	mov $408,"Ǔƈl}ڍō@I捏B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"ߓINٖ@OIgC"
	mov $410,"iݒnjB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $411,"ߑzvϓIꐶCCϟГIlEcc藁H"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $412,"@@"
	mov $413,"usccszIv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $414,"@@"
	mov $415,"urCߊ]CYrϓIl藁Hv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $416,"@@"
	mov $417,"ucc"
	mov $423,"zCꖼiccs甎ȊՁccv"
	mov %120,416: mov %121,417:mov %122,24:gosub *messagefont
	mov %120,423: mov %121,423:mov %122,24:gosub *messagefont
	br
	$417@/
	$423/
	add $417,$423/
	@

	mov $418,"ccccccB"
	mov $419,"@"
	mov $420,"@"
	mov %130,418
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"ܒCKZB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"zCꖼiCs甎ȊՁB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $403,"AEs\܏oϒԓIvB"
	mov $404,"EϓIoiB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"@@"
	mov $406,"urCډFGBv"
	mov $407,"@"
	mov $408,"@"
	mov $409,"@"
	mov $410,"@"
	mov $411,"@"
	mov $412,"@"
	mov $413,"@"
	mov $414,"@"
	mov $415,"@"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\

	textoff

;G\FE@ʏ@ʒuFE
	ld r,":a;tatie\sei\sei_tuujyou.bmp",12

	texton

	mov $401,"uccBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"@@"
	mov $403,"䔓䗹ccEB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"@@"
	mov $405,"ucL啪B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"ӈۓ{ّlÎC"
	mov $407,"ݜޕА_GI@笕s\BIBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"@@"
	mov $409,"ucc䖾Bv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $410,"@@"
	mov $411,"um@C֘oϓIHv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $412,"@@"
	mov $413,"uIBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $414,"@@"
	mov $415,"uߐCYr藁Hv"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"uccC桁B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"œFFݎC"
	mov $403,"ٖ@}Iۓ{O㗈ccv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"@@"
	mov $405,"uC߉rSIovCJHv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"u@ccv"
	mov $423,"urC䊖Bv"
	mov %120,406: mov %121,406:mov %122,24:gosub *messagefont
	mov %120,423: mov %121,423:mov %122,24:gosub *messagefont
	$406@/
	$423
	add $406,$423/

	mov $407,"uߐۈӛΓCȏFNޔВnsHv"
	mov $408,"uߗLϓIuEHv"
	mov %130,407
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"@@"
	mov $410,"uusAsmccvv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $411,"@@"
	mov $412,"urCߏADDJB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $413,"I忐lCmݕpʑO\\IcՉLYr@ʁBv"
	mov $414,"uސĉlsIBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $415,"uC桏dvIlC"
	mov $416,"lȍSCȉmBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $417,"u甉FCꔈhlIBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $418,"@@"
	mov $419,"ucccv"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"uuACFBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"uݎۓWވsVOCv"
	mov $403,"CYrߖvLQFV藁Hv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"@@"
	mov $405,"uߐCccv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"@@"
	mov $407,"uߐsMClEHv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"@@"
	mov $409,"ucccv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $410,"@@"
	mov $411,"sCva@܁B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $412,"ى@ʐ搶S㏊CkMCB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $413,"Acc"
	mov $414,"@"
	mov $415,"@"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"uӁCޘC"
	mov $402,"LVCePwBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $403,"uLꍱwZsEԘaIdBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"uRC@ٜϓIhCF笕s؜Bv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"uC桉FwZINa_C@ʊwYrVCv"
	mov $406,"uFS͈ȕnفCv"
	mov $407,"uޏAFIrSBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"uݜޘw@CLBVȐgCCABv"
	mov $409,"w@LBVsȍCAB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $410,"gٕIC"
	mov $411,"Fsh\ҋB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $412,"ȁC苍XnωFJB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $413,"@hFYWsvgnGB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $414,"C桊wVRIጁBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $415,"@@"
	mov $416,"uccB"
	mov $423,"cٕsNBv"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	mov %120,415: mov %121,420:mov %122,24:gosub *messagefont
	mov %120,423: mov %121,423:mov %122,24:gosub *messagefont
	br
	$416@/
	$423/
	add $416,$423/
	\


	mov $401,"[[nቺB"
	mov %130,401
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"ccs\CB"
	mov $403,"@ʐ搶\kiIlB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"ޏA˝ٖ@܏ousvIRB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"RC@ʐ搶ʋB"
	mov $406,"꘢LǒmIlC󊎍ŏdvIC[wFB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $407,"ٜᚐ[ݓIC䊴Ď_FB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"@@"
	mov $409,"urCFwB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $410,"ґRC桏dvIlC"
	mov $411,"AߍeeVŗwC"
	mov $412,"hI@՗B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $413,"ސٕs\팴ZIBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $414,"@@"
	mov $415,"uccIBv"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"uwB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"CȓICpȓInʁC"
	mov $403,"hFwݓIBw՗oB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"CCޘ"
	mov $405,"rِgCw@ʓITqB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"ޘߍsQdBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $407,"@@"
	mov $408,"uccIBv"
	mov $409,"@"
	mov $410,"@"
	mov $411,"@"
	mov $412,"@"
	mov $413,"@"
	mov $414,"@"
	mov $415,"@"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"urCFwB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"@@ېYr"
	mov $403,"ېsĈCۓ{ŐlJCwB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"wCߗv厩VCCXIwśC"
	mov $405,"FwېCĖspqጔCB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"ߑFqlvޘC"
	mov $407,"CȔƉIߍs䕍߁B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"@ߑF\ވ_CގIÏAZr"
	mov $409,"FȜޔЕrBv"
	mov $410,"@"
	mov $411,"@"
	mov $412,"@"
	mov $413,"@"
	mov $414,"@"
	mov $415,"@"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\

	textoff

;G\Fb؁@@ʒuF
;G\FE@@ʒuFE
	ld l,":a;tatie\erika\erika_odoroki.bmp",0
	ld r,":a;tatie\sei\sei_odoroki.bmp",12

	texton

	mov $401,"u@ʘVccIv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"@@"
	mov $403,"uȜϘEHv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"@@"
	mov $405,"uICȓIB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"ߑF֐wCCi֜ktcB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $407,"LpȓI͗ʁCޖ琥ÖƓIB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"ޏw@CACRލݓIBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"@@"
	mov $410,"ܒC@ʘVᗹ꘢\B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $411,"\I\EsĉQ䵁C"
	mov $412,"\cՒ@GʉgI΁B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $413,"ccޗwZB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $414,"wZC꘢Cw蚎ݓInB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $415,"@@"
	mov $416,"ccFCޗIwB"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\

	textoff

;G\Fb؁@f@ʒuF
;G\FE@ʏ@ʒuFE
	ld l,":a;tatie\erika\erika_konwaku.bmp",0
	ld r,":a;tatie\sei\sei_tuujyou.bmp",12

	texton

	mov $401,"sm鈐CnIC"
	mov $402,"awٖ⋒B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $403,"@@"
	mov $404,"uٕsNCFwB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"vzcߕNߘnscc"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"ٓmᓯwC֗L㤋IƁC"
	mov $407,"^Ik啪IB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"ؓsIցB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"䎹HƓs`"
	mov $410,"CϓIz@ccv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $411,"@@"
	mov $412,"uuːccŗߐ^Ik]Bvv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $413,"@@"
	mov $414,"LoIB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $415,"poSSZߑB"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"uӁcc䎩ȁCs[ϓIȁcc"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"szݔls[B"
	mov $403,"HlC"
	mov $404,"pq᳈ؓIccE槗B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"꒼ȗCsݜϋFB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"@ʁcc\槔팴ZIԁC甉ݜޗېB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $407,"䕐勎ƉIcC厩VnBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"@@"
	mov $409,"uccېB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $410,"ґRs[œdl󈻁C"
	mov $411,"AXs[IR䎩ȋQdlB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $412,"ȁccs鈁CssĘoe\IBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $413,"@@"
	mov $414,"ŒFݑIρC"
	mov $415,"@ʐ搶Β__B"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"uޗ^u笓I㱁C"
	mov $402,"{vL^lIB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $403,"@ʐCݑIԁC"
	mov $404,"Fٍ\ۗB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"ACގILsÁB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"ߔБHٕA[ؓI"
	mov $407,"r\̓藁H"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"ߑFA䚑ҕI䆁B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"FAFAFAFAVFAFAKԐFB"
	mov $410,"feΕo䲓I䆁B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $411,"svHlIԐFCsvے蛀FB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $412,"ލ\CݗCCꑩJB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $413,"C呩䲓Iԁccv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $414,"@@"
	mov $415,"܊ލC@ʐ搶ÐÒn訏㗹ˁCCnFB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $416,"ߘaۓ{VSIwxC"
	mov $417,"ݝ䇉ԓILĎ訏㗹ˁB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $418,"@@"
	mov $419,"݁ccؓsBB"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\

	textoff
	bg black,14

	delay 4000
;ʉFJ̉@iv[v
	dwaveloop 1,"wave\se-007.wav" : mov $30,"wave\se-007.wav"
	mov %61,100
	chvol 1,(%3002*%61/100) 
;wiFnL@Vb^[tF[h
	bg "bg\dai2kou\watarirouka.jpg",26
	delay 3000

;wiFnLiuj@tF[hȂ
	bg "bg\dai2kou\watarirouka_bure.jpg",1
	delay 1000
;G\F@E^ʖځ@ʒuF
	ld l,":a;tatie\risa\risa_majime.bmp",12
	delay 1000
;G\F@Ef@ʒuFE
	ld r,":a;tatie\sei\sei_konwaku.bmp",12
	delay 3000

	texton

	mov $401,"ucccv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"@@"
	mov $403,"@ʎԉ񋳎IrCE蕘LB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"ݓߗB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"@@"
	mov $406,"urϗHv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $407,"@@"
	mov $408,"ucHv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"@@"
	mov $410,"uHsJB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $411,"gߑFIrBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $412,"@@"
	mov $413,"uƌݑiCĖsϓIB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $414,"ȖvL膌Bv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $415,"@@"
	mov $416,"uϛccDcc"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $417,"^IC掖|V藁Bv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $418,"@@"
	mov $419,"[[nȗCB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $420,"ŗC\k݈ӉIrBʁB"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"uccߜr݊wZH"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"ߕs`CݏxEccv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $403,"@@"
	mov $404,"uݖ琥CݕیBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"uACLЕs˓I爊Bv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"uVېYrCs\ArBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $407,"uǈɁcc䊖߈ꌏBRDFCߓVӉ񓚉Bv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"@@"
	mov $409,"uuYrccHvv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $410,"@@"
	mov $411,"uǈɏoj@C헹䙉ʏy݋hccv"
	mov $412,"uBʝQsBv"
	mov $423,"uʓsFBv"
	mov %120,410: mov %121,412:mov %122,24:gosub *messagefont
	mov %120,423: mov %121,423:mov %122,24:gosub *messagefont
	br
	$411
	$412@/
	textspeed 200
	$423/
	add $412,$423/
	@

	mov $413,"uߒmIEHv"
	mov %130,413
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $414,"@@"
	mov $415,"ucccv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $416,"@@"
	mov $417,"uuǈɁC񓚉Bvv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $418,"@@"
	mov $419,"uucc݉IccqܗBvv"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\

	textoff

;ʉtF[hAEg
	dwavestop 1 : mov $30,""

;G\F@E{@ʒuF
	ld l,":a;tatie\risa\risa_ikari.bmp",12

	texton

	mov $401,"uuˁCߕNߐIC"
	mov $402,"LqJBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $403,"uCߑŎZYrHvv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"@@"
	mov $405,"uccVL꘢JBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"@@"
	mov $407,"udI"
	mov $423,"܁CǈɁI"
	mov %120,406: mov %121,407:mov %122,24:gosub *messagefont
	mov %120,423: mov %121,423:mov %122,24:gosub *messagefont
	br
	$407@/
	$423/
	add $407,$423/
	@

	mov $408,"ߑŎZpߔcYrccv"
	mov %130,408
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"@@"
	mov $410,"̟mmnN߉B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $411,"\I|C๘C{B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $412,"@@"
	mov $413,"uccccczccv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $414,"@@"
	mov $415,"uߕs^Bv"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\

	textoff

;G\F@E{@ʒuFE
	ld r,":a;tatie\sei\sei_ikari.bmp",12

	texton

	mov $401,"u䐥z[{Cp䎩ȓIc[{I"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"݉IdvVjVOIv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $403,"@@"
	mov $404,"uCccC}acc"
	mov $405,"ߐzrEHv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"@@"
	mov $407,"uccccIBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"@@"
	mov $409,"uŎZph\EHv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $410,"@@"
	mov $411,"uccccJccv"
	mov $412,"@"
	mov $413,"@"
	mov $414,"@"
	mov $415,"@"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"CYrcʓ藁B"
	mov $402,"蕉䎩ȖsmB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $403,"smsu㱁CAݓߗB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"TccwxCꌲcc"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"@@"
	mov $406,"uǈɁcc"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $407,"CvLNېw笕sĘޔЎxc"
	mov $408,"ȁcc"
	mov $423,"ވꎟCAZJBv"
	mov %120,407: mov %121,408:mov %122,24:gosub *messagefont
	mov %120,423: mov %121,423:mov %122,24:gosub *messagefont
	$407
	$408@/
	$423/
	add $408,$423/
	@

	mov $409,"@@"
	mov $410,"uucZYrHvv"
	mov $411,"@"
	mov $412,"@"
	mov $413,"@"
	mov $414,"@"
	mov $415,"@"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	mov %130,409
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\

	windoweffect 1

	textoff

	windoweffect 10,500

;ʉFvr^
	dwave 2,"wave\binta.wav"
	drawfill 255,255,255 : draw
	wait 300 : repaint
;G\F@_[W@ʒuFE@tF[hȂ
	ld r,":a;tatie\sei\sei_damage.bmp",1
	QUAKE 30,300
	delay 3000

;G\F@f@ʒuFE
	ld r,":a;tatie\sei\sei_konwaku.bmp",12

	texton

	mov $401,"uu仁A仁cc䳁ccHvv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"@@"
	mov $403,"uuÓsmpߔЗ@ېYrEH"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"ƉVI߈C甑ƍXɋꎧ߁Ivv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"@@"
	mov $406,"ucccv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $407,"@@"
	mov $408,"uvLlߘޔЎI"
	mov $409,"ǈɁcc✒`I"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $410,"Ss糉IAƓICA꘢lcc"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $411,"@߈s\ėݜޘw@C"
	mov $412,"ߑŎZraHv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $413,"@@"
	mov $414,"ucccv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $415,"@@"
	mov $416,"u`ccsvzȈ꘢lrϓsُCcc"
	mov $417,"dĐXIʚ뗹cc"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $418,"sv꘢lcؓsKCR@ˑRsFcc"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $419,"ߗvccٕsÈӐڎI"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $420,"ߗvccٕsÈӐڎI"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\

	textoff

;G\F@E@ʒuFE
	ld r,":a;tatie\sei\sei_naki.bmp",16

	texton

	mov $401,"uفccٕsNcc"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"ٕsNcccc"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $403,"v꘢lC"
	mov $404,"ƏA\~C꒼rzIcc"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"@@CszrB"
	mov $406,"Ccc蓜ޘw@cc"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $407,"CޗBI{hIv"
	mov $408,"@"
	mov $409,"@"
	mov $410,"@"
	mov $411,"@"
	mov $412,"@"
	mov $413,"@"
	mov $414,"@"
	mov $415,"@"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\

	textoff

;aflFfree0232.mp3@iv[v
	bgm "bgm\free0232.mp3"
;G\F@E@ʒuF
	ld l,":a;tatie\risa\risa_naki.bmp",16

	texton

	mov $401,"uCǈɁccIv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"@@"
	mov $403,"I]xxnZB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"椖~IJCFލx_ٕIxB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"@@"
	mov $406,"ucc䐥Cszœcc"
	mov $407,"֗L}\FɋIώqcc"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"ٖ@ZYrssIȁcc"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"ȍˉccȍˉcv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $410,"@@"
	mov $411,"uYrssICӐcc"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $412,"꒼ݓrߓInŒ߁C"
	mov $413,"pv\Γ߁ccv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $414,"@@"
	mov $415,"JHݒILnC"
	mov $416,"aINB"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"usϓICsϓII"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"ߔcՓޗB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $403,"hk@B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"V琥cczޗB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"vLVCs߁C"
	mov $406,"ccv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $407,"@@"
	mov $408,"ucccv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"@@"
	mov $410,"ugvLSxCcckKB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $411,"RCݖ琥ρccv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $412,"@@"
	mov $413,"uǈɁccv"
	mov $414,"@"
	mov $415,"@"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"uccB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"CLߍ݁C"
	mov $403,"˔\C䎩Ȋ݁B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"꒼ȗxcc"
	mov $423,"߁B"
	mov %120,404: mov %121,404:mov %122,24:gosub *messagefont
	mov %120,423: mov %121,423:mov %122,24:gosub *messagefont
	$404@/
	$423/
	add $404,$423/
	@

	mov $405,"߁CccߐŖ_IFGv"
	mov %130,405
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"@@"
	mov $407,"ccfC܏oB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"꒼zܓIԁB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"ێSIu漁vB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $410,"@@"
	mov $411,"uːcc߁CǈɁB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $412,"ݜޘ虐I@ynC"
	mov $413,"\Fߐ^IDB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $414,"꒼cc꒼C甉ߓIFJB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $415,"cc@sM߁ccv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $416,"@@"
	mov $417,"uccccv"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\

	textoff

	delay 3000

;wiFԂ̌܂@ʏtF[h

	bg "bg\dai2kou\kumorizora.jpg",14
	delay 3000

;wiFu̊ԂɂJ͎~݁A_͓r؂䂭Bv@ʏtF[h
	bg "cutin\dai2kou\cut31.jpg",14
	delay 3000
;wiFủŁA͗܂܂ŕĂBv@ʏtF[h
	bg "cutin\dai2kou\cut32.jpg",14
	delay 4000

	bg white,16
	bgmfadeout 2000
	bgmstop

	delay 4000
;wiF̊Oρ@ʏtF[h
	bg "bg\dai2kou\ryou_gaikan.jpg",12
	delay 2000
;wiFV΂̍
	bg "bg\dai2kou\namikimichi.jpg",12
;aflFfree0257.mp3@iv[v
	bgm "bgm\free0257.mp3"
;wiFV΂̍؁iuj
	bg "bg\dai2kou\namikimichi_bure.jpg",1

;G\F@EΊ@ʒuF
;G\F@iXqjEʏ@ʒuFE
	ld l,":a;tatie\risa\risa_warai.bmp",0
	ld r,":a;tatie\sei\sei_bousi_tuujyou.bmp",12
	delay 2000

	texton

	mov $401,"uV藉Iv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"@@"
	mov $403,"䉈hqʉZqIKԑ哹B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"ݐB"
	mov $405,"吉yICsIB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"@@"
	mov $407,"ى䗈܁CޘE嘰hB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"sccss[B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"vLA@ʐ搶C֗LߍdvIlF݁cc"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $410,"\ݜތ䊒]OsJB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $411,"@@"
	mov $412,"uurCߙrvC玗EHvv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $413,"@@"
	mov $414,"uurډB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $415,"}a֐@n䦉䋎cc"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $416,"vLٓIӎvBvv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $417,"@@"
	mov $418,"uuECߑDI"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $419,"GC򔜓ޔVNBvv"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"uuߜrCuL_sBvv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"@@"
	mov $403,"uuVCYrށHvv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"@@"
	mov $405,"uccvL_uGB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"rCߓr藁ccH"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $407,"㤋֍ݐ튈JHv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"@@"
	mov $409,"uspSSB"
	mov $410,"JޔЗ@Cv◹AvYrsIB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $411,"DCډkZGB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $412,"cIOtʒʝ\C"
	mov $413,"zz弓oIv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $414,"@@"
	mov $415,"uuNd`ˍDccv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $416,"@@"
	mov $417,"uOĎqx藁B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $418,"ݐ៙WaI欖E"
	mov $419,"dRhIkIvv"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"_TbnN]CCȑşB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"z^ٓށC"
	mov $403,"ϛ󌨑\B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"@@"
	mov $405,"񗈗cc䏊I퐶cc"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"ޛsݕsKw@C"
	mov $407,"~IKCAݜޗB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"ґRېϓICA\IlˑRsB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"C桏Vl"
	mov $410,"EٍR|IlIp߁C"
	mov $411,"hIwFDہB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $412,"@~䆔ʐƎIaB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $413,"ACg捏EេB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $414,"ޏAݓIw䇉ԔVNxB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $415,"@@"
	mov $416,"䖔ꌏv漗IB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $417,"@ʓc\vLoʑj~Iԁc"
	mov $418,"ϓIAٖ@񗈗B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $419,"Xsp܁C\։甉l@ʘV"
	mov $420,"wNጔCVB"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"ucccv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"@@"
	mov $403,"urCǈɁHv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"@@"
	mov $405,"ucvYrBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"@@"
	mov $407,"u^sR藁Bv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"@@"
	mov $409,"umBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $410,"@@"
	mov $411,"uc"
	mov $423,"c`Hv"
	mov %120,410: mov %121,411:mov %122,24:gosub *messagefont
	mov %120,423: mov %121,423:mov %122,24:gosub *messagefont
	br
	$411@/
	$423/
	add $411,$423/
	@

	mov $412,"@@"
	mov $413,"ˑRCݑOᗹYrB"
	mov %130,412
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $414,"g͕sDIIˁCˋHߑ꘢䔊fB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $415,"@@"
	mov $416,"u݁CBIߘccv"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\

	textoff

;G\F@Es@ʒuF
	ld l,":a;tatie\risa\risa_human.bmp",12

	texton

	mov $401,"uꉔuSvBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"@@"
	mov $403,"œ꘢nIweC"
	mov $404,"IosxI\B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"@@"
	mov $406,"uߔV@Ccc꒼s꘢l藁Bv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $407,"@@"
	mov $408,"u{CߘlAvLYrFB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"\\甐l͗ʁC"
	mov $410,"˔\^l拌nIlBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $411,"@@"
	mov $412,"ݓ뜺gV@CaIn"
	mov $413,"S_|嗈B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $414,"L\WIw]C"
	mov $415,"AVOIE啪B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $416,"\IeZ\Il{vLB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $417,"@@"
	mov $418,"݁C\ESIlr˗C"
	mov $419,"ǗI꘢lB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $420,"V琥ᒅCǗnwB"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"uccϐ^IDEcv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"@@"
	mov $403,"usDIEH"
	mov $404,"ch_獖琥IJBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"@@"
	mov $406,"ވ_疾B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $407,"Acc"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"֐\EIlCsÈӌdlsKVIKB"
	mov $409,"s]ρc"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $410,"@@"
	mov $411,"ccccccB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $412,"@@"
	mov $413,"uccٕsNCB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $414,"ssBva@uVsB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $415,"ĖszdlwaρxIlBv"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\

	windoweffect 1

	textoff

;ʉF
	dwave 2,"wave\RunC11.wav"
;GF@tF[hAEg
	cl r,11

	delay 1000
;G\F@E@ʒuF
	ld l,":a;tatie\risa\risa_odoroki.bmp",12

	windoweffect 10,500
	texton

	mov $401,"ugCǈɁCcI"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"CYrvٓߔЉƌc"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $403,"ccccccv"
	mov $404,"@"
	mov $405,"@"
	mov $406,"@"
	mov $407,"@"
	mov $408,"@"
	mov $409,"@"
	mov $410,"@"
	mov $411,"@"
	mov $412,"@"
	mov $413,"@"
	mov $414,"@"
	mov $415,"@"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\

	textoff

;G\F@Eʏ@ʒuF
	ld l,":a;tatie\risa\risa_tuujyou.bmp",12

	texton

	mov $401,"u^IcAZߔЉƌC"
	mov $402,"sz\IGffcEBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $403,"CEBɋCȍ˔\ZJccǈɁB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"ccߛwq獫|藁B"
	mov $405,"aFʓI󊮑SsϗB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"sccCB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $407,"ݓI\CŋNXl藁B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"RρCߏAdIBJB"
	mov $409,"ϖs藁cc"
	mov $423,"DJC䔆ߓI"
	mov %120,408: mov %121,409:mov %122,24:gosub *messagefont
	mov %120,423: mov %121,423:mov %122,24:gosub *messagefont
	$408
	$409@/
	$423/
	add $409,$423/
	@

;ʉF
	dwave 2,"wave\RunC11.wav"
;GF@tF[hAEg
	cl l,11

	mov $410,"ǉɁCꉺI"
	mov %130,410
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $411,"꘢l竓rC啪kIv"
	mov $412,"@"
	mov $413,"@"
	mov $414,"@"
	mov $415,"@"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\

	textoff

	bg white,12

	delay 3000
;wiF@ʏtF[h
	bg "bg\dai2kou\okujyou.jpg",12

	delay 3000

	texton

	mov $401,"ugIHsJIH"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"ߎOlRNwcc"
	mov $403,"CYrHޕs\I"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"C^ICޗ{sDʉIv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"@@"
	mov $406,"uV@\FhJDBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $407,"@@"
	mov $408,"uفAٛI"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"ݍĖsp쒅ɔƗ藁Bv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $410,"@@"
	mov $411,"݉~ՉʁC悍їIqB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $412,"}wN\I䁑C"
	mov $413,"aN蓏ΒB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $414,"@@"
	mov $415,"u^JVCnX筓藁B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $416,"ʑRCޏw@^_Bv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $417,"@@"
	mov $418,"㏒xxI[ӊCRnRȓB"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"BMGIRIƕЁB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"ޘ}IwC"
	mov $403,"SӊOB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"V@C\]HC"
	mov $405,"蕔PIoB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"ccRCƕАʓIƉC"
	mov $407,"ލƕВ暍ÈȏTI݁C"
	mov $408,"\SsmraˍDB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"֌gӖIwCQsāB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $410,"ڋߗ߈ʓ}wCSIEC"
	mov $411,"ۊǗߍƕЁB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $412,"琥ݓߘC䓾mgGw勎IꍱB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $413,"@@"
	mov $414,"uߘccuVvCȊ迈꘢VEccv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $415,"@@"
	mov $416,"򒼓IC쓯w䓋ԁB"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"uDICYrV藁Hv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"@@"
	mov $403,"uCYrvcƕЌhFw藁H"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"o@CFwYrcc"
	mov $405,"ވ_C\爑zIJH"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"@还a@ʐ搶\ΓIԁC"
	mov $407,"ڔcƕЌhʁCs琥Е@Eccv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"@@"
	mov $409,"uߐCcc"
	mov $423,"zpŊśB"
	mov %120,408: mov %121,409:mov %122,24:gosub *messagefont
	mov %120,423: mov %121,423:mov %122,24:gosub *messagefont
	br
	$409@/
	$423/
	add $409,$423/
	@

	mov $410,"ݜޏw@ʑIߑFC"
	mov $411,"@藁Hv"
	mov $412,"@"
	mov $413,"@"
	mov $414,"@"
	mov $415,"@"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	mov %130,410
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"݁wٙrx꜍sIߓVC"
	mov $402,"qlƉIwCQ@ʐ搶"
	mov $403,"cؓsRB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"dC@ʐ搶Fr뜺gB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"RC䑼FsÍXICmᗜB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"mᓯwqn@upFIݏC"
	mov $407,"IekTݗWI䗓B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"@@"
	mov $409,"٘\IsÁC䊮SvL爗B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $410,"֗LCGwԋ^waI"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $411,"ޖ琥nyIۓWB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $412,"@@"
	mov $413,"cwtsÁCGw򖢐fB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $414,"퐥Yrr藹qlI^cc"
	mov $415,"@"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"őIfʑR֐wFxJB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"ϐ\C"
	mov $403,"caGwIvpL{௓IsB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"@ʍcIwۓWlInsC"
	mov $405,"aߍ\ґFaEH"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"sccޙ{s\IB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $407,"ʊȗ[[ݍcSI\[dC"
	mov $408,"ߍ\Җscc"
	mov $409,"ߕnB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $410,"@@"
	mov $411,"灈ʁCGwI\C"
	mov $412,"vLtCRr꘢WSI߁B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $413,"w݉@ʐ搶I܉C"
	mov $414,"ڗLvڎaI"
	mov $415,"liB"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"ccliCވ_dvB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"@@"
	mov $403,"ᓡ}wA쓯wmᓯwvLliIԁC"
	mov $404,"𘰋\CsFC"
	mov $405,"GwǗNJB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"@ʐwvLliIԁC"
	mov $407,"sߘ@ʐ搶IԓIB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"@ʘGwvLliIԁC"
	mov $409,"śfٖ@Z؁B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $410,"@@"
	mov $411,"C\F`SIliC"
	mov $412,"˓Ȍ}ȏ̓ōDIBʁB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $413,"ވ؁CsCi|擓I琬ʁB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $414,"Nw͍Xd_擓Iޏw@C"
	mov $415,"ȋyN筎ވ覓I@ʐ搶IẃC"
	mov $416,"@fBoʓӁB"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"u苕svG@ʐ搶GB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"@甑m䝡ߑF`aIԁC"
	mov $403,"s獐˓rl藁Bv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"@@"
	mov $405,"܊ދԁC䔫gCsCB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"@@"
	mov $407,"uߘC迗vIccHv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"@@"
	mov $409,"uŒߑFIF莁Cs甉zN勎藁B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $410,"LBvInCzŊŁB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $411,"rCFBÎۗCߑFBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $412,"@@"
	mov $413,"_ӁCql򋱋hhn񗹈B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $414,"gޙށC^Iccޘw@Ӎݐ_B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $415,"ψꗈCȍ@َĒSSYrJB"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"ݐډISqC"
	mov $402,"I݉暘ލIyB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $403,"ccϏAkDB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"@@"
	mov $405,"C^IB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"ُwqC䐥EsZS藁B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $407,"@@"
	mov $408,"FCGwB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"ߜύKIlCFĖsFʗJB"
	mov $410,"@"
	mov $411,"@"
	mov $412,"@"
	mov $413,"@"
	mov $414,"@"
	mov $415,"@"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\

	textoff

	bg white,12
	bgmfadeout 2000
	bgmstop
	mov $30,""
	wait 3000

	mov %2701,1

textclear
	saveoff
;	eLXgz̏
	for %199=201 to 420
		mov $%199,"@"
	next

	bgm "title\Main-Theme.mp3"

goto *sentaku



;\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\
;Ahx`[p[g
;Ru
*scenario3

	mov $100,"R"

	for %199=19 to 34
		csp %199
	next

	bg black,14

	bgmfadeout 2500

	bgmstop

	wait 4000

;wiFuĖڂ炷ȁv@tF[hȂ
	bg "cutin\dai3kou\cutin_01.jpg",1

	delay 2000
	bg black,1
;ʉFPx
	dwave 2,"wave\keihou.wav"
	delay 4000

	dwave 10,"wave\KeyboardC1.wav"
	bg "cutin\dai3kou\cutin_02.jpg",1
	wait 200

	dwave 10,"wave\KeyboardD1.wav"
	bg "cutin\dai3kou\cutin_03.jpg",1
	wait 100

	dwave 10,"wave\KeyboardD1.wav"
	bg "cutin\dai3kou\cutin_04.jpg",1
	wait 150

	dwave 10,"wave\KeyboardC1.wav"
	bg "cutin\dai3kou\cutin_05.jpg",1
	wait 150

	dwave 10,"wave\KeyboardC1.wav"
	bg "cutin\dai3kou\cutin_06.jpg",1
	wait 125

	dwave 10,"wave\KeyboardC1.wav"
	bg "cutin\dai3kou\cutin_07.jpg",1
	wait 300

	dwave 10,"wave\KeyboardD1.wav"
	bg "cutin\dai3kou\cutin_08.jpg",1
	wait 350


	dwave 10,"wave\KeyboardD1.wav"
	wait 450

	dwave 10,"wave\KeyboardC1.wav"
	bg "cutin\dai3kou\cutin_09.jpg",1
	wait 200

	dwave 10,"wave\KeyboardC1.wav"
	bg "cutin\dai3kou\cutin_10.jpg",1
	wait 300

	dwave 10,"wave\KeyboardC1.wav"
	bg "cutin\dai3kou\cutin_11.jpg",1
	wait 325

	dwave 10,"wave\KeyboardC1.wav"
	bg "cutin\dai3kou\cutin_12.jpg",1

	wait 3000
	bg black,0
	drawfill 255,255,255 : draw
	wait 100 : repaint

	wait 400

	bg white,1
;ʉF唚
	dwave 2,"wave\ExplosionA11St.wav"
	QUAKE 50,1000
;wiF̂_@ʏtF[h
	bg "cutin\dai3kou\genbaku.jpg",12
	delay 5000
	bg black,12

;aflFfree61.mp3
	bgm "bgm\free61.mp3"
;wiF󂵂LiEj@ʏtF[h
	lsp 1,":c;cutin\dai3kou\hiroshima.jpg",0,0
	print 16
	delay 1000
;wiF󂵂LiEֈړj
	for %199=0 to 199
		gettimer %90
		msp 1,-4,0,0
		print 1
		waittimer (%90+24)
	next

	csp 1

	delay 2000

;wiFQʐ^P@ʏtF[h
	bg "cutin\dai3kou\higai1.jpg",12
	delay 1000
;wiFQʐ^Q@ʏtF[h
	bg "cutin\dai3kou\higai2.jpg",12
	delay 1000
;wiFQʐ^R@ʏtF[h
	bg "cutin\dai3kou\higai3.jpg",12
	delay 1000
;wiFQʐ^S@ʏtF[h
	bg "cutin\dai3kou\higai4.jpg",12
	delay 1000
;wiFQʐ^T@ʏtF[h
	bg "cutin\dai3kou\higai5.jpg",12
	delay 4000

;wiFh[ij@tF[h
;wiFh[i㔼ֈړj
	lsp 1,":c;cutin\dai3kou\doom.jpg",0,-600
	print 16
	delay 1000

	for %199=0 to 199
		gettimer %90
		msp 1,0,3,0
		print 1
		waittimer (%90+36)
	next

	csp 1

	delay 3000

;wiFh[iJ[j@ʏtF[h
	bg "cutin\dai3kou\doom_color.jpg",16
	bgmfadeout 2000
	bgmstop
	delay 3000

;wiFuSSNv@ʏtF[h
	bg "cutin\dai3kou\cutin_13.jpg",12
	delay 3000
	bg black,1
	delay 2000
;wiFE@ʏtF[h
	bg "bg\dai3kou\homare_syokuin.jpg",12
	delay 3000
;aflFfree0539.mp3@iv[v
	bgm "bgm\free0539.mp3"

	setwindow 8,56,40,40,24,24,0,2,0,1,1,#888888,0,0,800,650

	texton

	mov $401,"uڎ󗹉\C"
	mov $402,"䐥ґَiYB"
	mov %130,401
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $403,"ጒnaCB"
	mov $404,"ґRm֗LksVrC"
	mov $405,"AsS͓w͓IB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"苑ƑgƁBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@


;ʉF
	dwave 2,"wave\hakusyu2.wav"
	mov $407,"@@"
	mov $408,"玎kNďB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"ސg耗_wB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $410,"VNCޗACHIwZB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $411,"@@"
	mov $412,"uȏCqʐVVFB"
	mov $413,"]eʘV\槐sh\ΏBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $414,"@@"
	mov $415,"IZʐ搶ΗexʒnܓB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $416,"I⋒ʞግgIVVB"
	mov $417,"ՒNCŋN\QV\^INSlB"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\

	dwavestop 2
	mov $401,"uqʘVCVIA与aCwT"
	mov $402,"vߑFwFŘĚGBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $403,"urCݓߔVOcc"
	mov $404,"hߑFꍱJBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"u苓Bv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"@@"
	mov $407,"Zʐ搶ܒC"
	mov $408,"܉F玎I[rB"
	mov $409,"@"
	mov $410,"@"
	mov $411,"@"
	mov $412,"@"
	mov $413,"@"
	mov $414,"@"
	mov $415,"@"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\

	textoff

;wiFẺ@ʏtF[h
	bg "bg\dai3kou\homare_syokuin_oku.jpg",12

	texton

	mov $401,"ߗpuCC꘢lIڑҎB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"{茍iqCʐ塒nꍱoB"
	mov $403,"Zʐ搶ꐤ\@C"
	mov $404,"FNhFB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"@@"
	mov $406,"uccDCސ茍ZqIʝB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $407,"֗LSNÈr\C"
	mov $408,"ȋyeNtǎCAV糊aጐllB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"x}̕\CȋygSjahXIӎvBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $410,"ډccv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $411,"@@"
	mov $412,"ᚖNIClWꉺB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $413,"CwTAA񑫁A^ÉB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $414,"쎺Aȓ|AAjrÄxC"
	mov $415,"ލnIfB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $416,"蓊wZޔЊw蚓I㱁B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $417,"ȍ\CꖼB"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"@IwZCZsϓIJC"
	mov $402,"AܒwޑhB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $403,"tBwqFՒnIg̘a󔖓IlE|C"
	mov $404,"_p݉ʁB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"蕎ȓISsÈȕÁC"
	mov $406,"psfÑuȍ@v\YrvuzYrvB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $407,"wZI㉺gnˑRQiNC"
	mov $408,"ʜKlgphgB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"Cʔ{ƁB嘢lIw͔퐴n݊OB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $410,"lAlAwNlIBʁC"
	mov $411,"ȁwrxI`W㈜qB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $412,"w蚓e獫XÁC"
	mov $413,"BwsCxB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $414,"Cٖ@wZaw蚎[rC"
	mov $415,"wCnALwsǓHB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $416,"戁AA|AŕiA\́AÁAށB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $417,"ܘfrFB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $418,"wLA\Gyލ@B"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"cI[B"
	mov $402,"˓IӖӍݑdB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $403,"܁CݜގONClaliIΏ"
	mov $404,"Cވ_s茁B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"命l@C"
	mov $406,"Cn㑮ȓIHB"
	mov $423,"қECuB"
	mov %120,405: mov %121,406:mov %122,24:gosub *messagefont
	mov %120,423: mov %121,423:mov %122,24:gosub *messagefont
	$405
	$406@/
	$423/
	add $406,$423/
	@

	mov $407,"wqFߘlgIC"
	mov $408,"BAC~JB"
	mov %130,407
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"@@"
	mov $410,"C@C˙r萬CꖼwB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $411,"IHAYlB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $412,"ލx~{IwqFC"
	mov $413,"zp|擑FʋNB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $414,"甑FC\筒n㎩ȓHIlB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $415,"Cϑz"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"uґVv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"@@"
	mov $403,"ucCIBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"@@"
	mov $405,"uސHI⁙ea\苕\B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"苍ݖ{Bv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $407,"@@"
	mov $408,"Zʐ搶hFlۗ{eqB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"ʏʒw{HxC"
	mov $410,"|C胖ʍ@Cʉ\HI@|ajC"
	mov $411,"֗LNxÁABeB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $412,"@@"
	mov $413,"uHKlIEHv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $414,"@@"
	mov $415,"uICޏwZIVSsBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $416,"@@"
	mov $417,"Zʐ搶ՒΗe񓚗IVB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $418,"@ccޔЍHTIsLJB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $419,"@@"
	mov $420,"ugޙށCމL_Hv"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont

	bgmfadeout 1
	bgmstop

	gosub *textwright
	\

	textoff

;wiFẺiuj@tF[hȂ
	bg "bg\dai3kou\homare_syokuin_oku_bure.jpg",1
	delay 1000
;G\Fd@΁@ʒuF@tF[h
	ld c,":a;tatie\yaezono\bisyou.bmp",15
	delay 2000

	textoff

	mov $401,"smCj⋒꘢jlB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"ߔՓ_ɋȓIہCDՏZ䆁C"
	mov $403,"poݏIVŁB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"܊[BgލpSŔB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"A蕐gCjlIsuk"
	mov $406,"[x쐫͓IjqC"
	mov $407,"AgpUے^ПݓIB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"@@"
	mov $409,"udИVcv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $410,"@@"
	mov $411,"uS玓sHvBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $412,"@@"
	mov $413,"̍씪dГI߈ʘV܊ދԁC"
	mov $414,"꒼ΗexʓIZʐ搶cIΗe}KZB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $415,"@@"
	mov $416,"uHÓIJB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $417,"u񓚁eKlIfޔЊVCsATqEHv"
	mov $418,"ޕsKlEHv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $419,"@@"
	mov $420,"ucccv"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"uZʐ搶vTqC߉ssBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"@@"
	mov $403,"dИVp|dIgwጒB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"Zʐ搶꒎ICҕsgB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"c^IiB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"BCHFnCA֔@C"
	mov $407,"ٖNanʓsoȓIlC"
	mov $408,"֔\o@|dIߓxC^svBB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"@@"
	mov $410,"u܉񗈁CZʐ搶B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $411,"uIV玍H蓌}CFЉȘVzlƉwsB"
	mov $412,"]返\yB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $413,"呁AܜޔЎsDӎvC"
	mov $414,"As\u˒JCJH"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $415,"@@"
	mov $416,"ucc"
	mov $423,"CvVIBv"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	mov %120,416: mov %121,420:mov %122,24:gosub *messagefont
	mov %120,423: mov %121,423:mov %122,24:gosub *messagefont
	br
	$416@/
	$423/
	add $416,$423/
	\


	mov $401,"Zʐ搶c~~I\CA֐闹B"
	mov %130,401
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"ґRsmYrC"
	mov $403,"AZʐ搶ّQCB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"IoxӓIΗe@CdИV䑖嗈B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"@@"
	mov $406,"uDMCZʔyCuߓFB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $407,"䐥dЗEB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"ߘ玗E쓯Cs厚sρBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"@@"
	mov $410,"SSINC\B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $411,"ґRŋNٗ疔|̓IlCAp甐ls[sNB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $412,"|s@܁Cu𐏘aDrIB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $413,"@@"
	mov $414,"uISjB"
	mov $415,"䐥ЉȓIOC苑gƁB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $416,"蓌}CґVBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $417,"@@"
	mov $418,"ޏAaIB"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\

	textoff

;GtF[hAEg
	cl c,12
;wiFẺ@tF[hȂ
	bg "bg\dai3kou\homare_syokuin_oku.jpg",1
	delay 2000
;wiFuRu@v@ʏtF[h
	bg "cutin\dai3kou\cutin_14.jpg",16
	delay 3000
	bg black,12
	delay 2000

;ʉFKKiɉ؊Xj
	dwave 2,"wave\izakayas.wav"
;wiF݉EԂ傤ij@ʏtF[h
;wiF݉EԂ傤i㔼ֈړj


	lsp 1,":c;bg\dai3kou\izakaya_soto.jpg",0,-600
	print 14

	delay 1500

	for %199=0 to 199
		gettimer %90
		msp 1,0,3,0
		print 1
		waittimer (%90+24)
	next

	csp 1

	delay 2000

;wiF̘݉a@NXtF[h
	bg "bg\dai3kou\izakaya.jpg",12
	delay 2000
	bgmfadeout 2000
	bgmstop
;BGMFfree0210.mp3@iv[v
	bgm "bgm\free0210.mp3"

	texton

	mov $401,"uCFIFCtIv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"@@"
	mov $403,"wN͓ItC"
	mov $404,"dИV糎nՔ^NtB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"V\΁CIIFcc"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"@@"
	mov $407,"I蓌}ݗƉ蛓IxwsB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"꘢IaCoȎґLqlB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"LadИVٖʊB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $410,"@@"
	mov $411,"uߘccV藁Hv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $412,"@@"
	mov $413,"uAލlB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $414,"sܗECЉȘVQBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $415,"@@"
	mov $416,"ucv"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"_w嘢ǗLSOwC嘢NtLSǁB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"䋤PQǓIЉCCARFqlጁB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $403,"ґRŋNlL_C"
	mov $404,"AސꏊYrZI^wB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"Fm营\u{AsʍJB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"@@"
	mov $407,"uqjlNCߐssSӛH"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"ߗvZʓCsLYrYqݓIGB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"߈NIߘՊNIqC"
	mov $410,"ݘdQVC"
	mov $411,"˔@D藁B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $412,"R@ᑼӛΖ͌ГI"
	mov $413,"甑UHI\CϏAtk`v"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $414,"@@"
	mov $415,"utYrIc"
	mov $416,"HLYrsDInEH"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $417,"ٗCdИVDvLHJHv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $418,"@@"
	mov $419,"uGC䍐G߁B"
	mov $420,"CޘC\ޗBv"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"dИV՚ItC"
	mov $402,"R@Ӊc~IjgB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $403,"ŗCސszdlߓIԎVB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"gq@COʏAŕsFB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"\RoꍱC"
	mov $406,"A틏I掐᳏ZJB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $407,"@C@ʗv敏YrdvIC"
	mov $408,"ޔВnXeՎRnUNB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"@@"
	mov $410,"uߍDCe欙ߐ^B"
	mov $423,"CHC"
	mov %120,409: mov %121,410:mov %122,24:gosub *messagefont
	mov %120,423: mov %121,423:mov %122,24:gosub *messagefont
	br
	$410@/
	$423
	add $410,$423/

	mov $411,"ʐCh~ÎҎ󓞕sҋC"
	mov $412,"g桐lbA񏡒nʔVːI@B"
	mov %130,411
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@


	mov $413,"VCޔЎJH"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $414,"sCwZIvL_sρB"
	mov $415,"HIړIs桝ÎҁB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $416,"IߐNSIvzӛ΁Bv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $417,"@@"
	mov $418,"uNvzӛ΁CLYrVEH"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $419,"uCCސKvIccv"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"us\sIB"
	mov $402,"vƜϓϓIwB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $403,"@ʐϓINC鈖sLFB"
	mov $404,"AC@ʁcc"
	mov $423,"v嗈C߉raHv"
	mov %120,403: mov %121,404:mov %122,24:gosub *messagefont
	mov %120,423: mov %121,423:mov %122,24:gosub *messagefont
	$403
	$404@/
	$423/
	add $404,$423/
	@

	mov $405,"@@"
	mov $406,"ucc嗈HYrӎvHv"
	mov %130,405
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $407,"@@"
	mov $408,"uAݟ黗^ӕsI@B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"݋엢ʉIMC"
	mov $410,"cFIӛ΁B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $411,"@ʊwZV֗CwqF⁐B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $412,"ψss|{C"
	mov $413,"AHIړIBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $414,"@@"
	mov $415,"ccޑTACIڗJB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $416,"AݕsvOCaBC"
	mov $417,"}ޘVB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $418,"ݐllsMaIC"
	mov $419,"RLlܐ{sݔ|B"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"uˑRr܁CߍmsJ`B"
	mov $402,"sCVB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $403,"Lls\C勎្{C"
	mov $404,"ڎ󗹉wXxIavzC"
	mov $405,"ֈa_ChF戁B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"R@CDݍmL喷IρC"
	mov $407,"EV̏A݊XL̟sC"
	mov $408,"AqϚ^VcÉӁB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"ߕsuEHؓsVߝ㭗B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $410,"@ʕsLlCdC"
	mov $411,"s\rnۓWJHv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $412,"@@"
	mov $413,"u៍@Iៈӛ΁cc"
	mov $423,"퐧oIHv"
	mov %120,413: mov %121,413:mov %122,24:gosub *messagefont
	mov %120,423: mov %121,423:mov %122,24:gosub *messagefont
	br
	$413@/
	$423/
	add $413,$423/
	@

	mov $414,"@@"
	mov $415,"uvցB៑ӕsفCrlC"
	mov $416,"ލs֔퓊q߁Cl㱒njB"
	mov %130,414
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $417,"CLlpplFIߒɁC"
	mov $418,"QBҒnz[CA񐶒ρB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $419,"GCsDӎvCΉē_tEHv"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"dИVNotqB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"fCjX玁C"
	mov $403,"_t՚aꍱ֓IؕiB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"ݜލ@㗈VOCҒnvlB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"@@"
	mov $406,"I{RmICB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $407,"dŔj󌚗N@ϓI喷"
	mov $408,"F漉B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"\EGIfa]C"
	mov $410,"xtdtRIB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $411,"@@"
	mov $412,"ޏA{IvՏ΁B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $413,"RCޔБz@cc^IEcc"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $414,"F៑B@oIB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $415,"zvېYrC"
	mov $416,"\숽ҙdlqcc"
	mov $417,"V\ROhFB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $418,"@ʜޔ萐I藁cc"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $419,"@ʔ^lmI藁cc"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"a؛f[㗈B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"gjCgٔdИVB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $403,"@@"
	mov $404,"uvChJB"
	mov $405,"މƓIhDhG`Bv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"cc``CFF``JB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $407,"usDӎvCޘ蔈L_xBv"
	mov $408,"ut㱖vLwZ񋟌ߎ`vBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"@@"
	mov $410,"uvgnIC``ȁB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $411,"u܉񗈁C˓IԎVccvv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $412,"@@"
	mov $413,"uG`C^悎xxBsŒIjlBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $414,"uCnߓI_ABv"
	mov $415,"u߉sߘՊNIqρCv"
	mov $416,"uH峏AVIlBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $417,"uߐ㏒筒ӎuCːCVIjl`Iv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $418,"uȁCcؓsh߁Ivv"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"dИVCIڌˋsB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"ߖڌCAVDIˈρCsC꘢B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $403,"原ُCuȓIS튮Sœcc"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"ޔЊuC\ϕsxI𐸍dn􉺋B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"@@"
	mov $406,"uDCډːVGBߍDC@Bv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $407,"u{៑Bv"
	mov $408,"uvQIO]CsB_ЁBv"
	mov $409,"uٕs\ڗLҁBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $410,"uޔЎvzAw喷xBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $411,"u៍@CޘƊS퍶xzBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $412,"uŐ[dICAwZBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $413,"uwZ{s{CYrQេCv"
	mov $414,"usmFCƕtoIẃBv"
	mov $415,"uލSsBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $416,"uꖡn黓{Cl~Cv"
	mov $417,"uޔЎsIeBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $418,"uNGޔЈӛΌ`ߓICACIHBvv"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"勎I៑퐳C茓VcIAE喷B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"ے៑Cv͘喷ag桘aIA喷B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $403,"ccޑTlI\mJB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"ψٔ䗈ŁC"
	mov $405,"ӁCݓI{퍶xzB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"@@"
	mov $407,"ACǋaLYr藁H"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"ڎ󗹎sI{lB"
	mov $409,"ޓӖYrcc"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $410,"@@"
	mov $411,"ccˑRC꘢sDIO|CB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $412,"Ó܁cc"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $413,"@@"
	mov $414,"uBcc"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $415,"ޔЎsӛΐA{wqFSIC"
	mov $416,"Ŕ\hIccv"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"uvցCAߍOlB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"CFcI{hR嗈C"
	mov $403,"vߔIԁB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"Cr啪ICȗvhfa戁B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"v{luȐߐlC"
	mov $406,"UߍwIxOܗYrC"
	mov $407,"ߓRAv@՗JB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"ݓI{SQC"
	mov $409,"ClzISЁBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $410,"@@"
	mov $411,"sDI爊^B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $412,"{lv勎៑IS߁B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $413,"@ʗLlpވ_CYrώq藁cc"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $414,"zށC䊴SIɁB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $415,"@@"
	mov $416,"uccA܁CCI喷cc"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $417,"OCQ{C"
	mov $418,"paa៎喷ЉI|vzEccHv"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"uCґVCnvBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"RCsLIsȈT@B"
	mov $403,"CvzI{aISBޓ_kdvB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"sCݓIA_TI͈ρB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"OlA΁AqC֗LEB"
	mov $406,"ލs㏍DӓIƌCʈӖw㉍DrxC"
	mov $407,"ۉsB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"vLljVFCAIꐺ勎C`B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"ܓC_͐RvzhIC"
	mov $410,"ȗp{I@{v@甛≺Bv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $411,"@@"
	mov $412,"ucccv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $413,"@@"
	mov $414,"urρCsklH"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $415,"ډCߊŊōXlI@JBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $416,"@@"
	mov $417,"dИVrܒCIo꘢Ӗ[ʓIΗeC"
	mov $418,"\o茈󒅏YreI惁B"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\

	textoff

;ʉFyb
	dwave 2,"wave\PageA22.wav"
;wiF`FbNV[g@E獶
	bg "bg\dai3kou\checkseat.jpg",20
	wait 1000

	texton

	mov $401,"uސccHv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"@@"
	mov $403,"u^\B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"HIlpޘr苳I\pB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"ߊŊJC꒵I`v"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"@@"
	mov $407,"NR{ƏoŎАC"
	mov $408,"\pI{CRwZrIB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"NhIň惏C"
	mov $410,"LߎVʒwwh\@jxC"
	mov $411,"eƏoŎГIrB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $412,"れrI`I^vځB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $413,"ݕލvړIoŎgŌC"
	mov $414,"śf\zIoŎЁCїpITAzB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $415,"@@"
	mov $416,"Œߍ^vځcc"
	mov $423,"ckB"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	mov %120,415: mov %121,420:mov %122,24:gosub *messagefont
	mov %120,423: mov %121,423:mov %122,24:gosub *messagefont
	br
	$416@/
	$423/
	add $416,$423/
	\


	mov $401,"@Ñ㕶"
	mov $402,"ے񓞗z讎ЉI݁H"
	mov %130,401
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $403,"@@"
	mov $404,"@{_"
	mov $405,"ێʖސCVcIN|s墑IH"
	mov $406,"ێʖސCVcIN|s墑IH"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $407,"@@"
	mov $408,"@Gaq"
	mov $409,"ۑݔxhIvH"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $410,"@@"
	mov $411,"@"
	mov $412,"ے񓞌ٓ{NwIwiC"
	mov $413,"LAAzlIR^ÁH"
	mov $414,"ے񓞌ٓ{NwIwiCLAAzlIR^ÁH"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $415,"@@"
	mov $416,"@MʁAGgNV"
	mov $417,"ے񓞗F|snC"
	mov $418,"NЉIRH"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"@S"
	mov $402,"g^AIgnʐH"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $403,"@@"
	mov $404,"@gV^gᚐx"
	mov $405,"ے񓞜ސݓVcNsIH"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"ے񓞗ݕCߔV@C"
	mov $407,"񓞗[ڌœI[ˑR݁B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"@@"
	mov $409,"@@"
	mov $410,"ە`qC|IH"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $411,"@@"
	mov $412,"@b៑"
	mov $413,"ے񓞜ސ{ÓIN៑C"
	mov $414,"󊎐ْA[IC[H"
	mov $415,"ے񓞜ސ{ÓIN៑C󊎐ْA[IC[H"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $416,"@@"
	mov $417,"@៑"
	mov $418,"|K^ÁH"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"@񍑍"
	mov $402,"ے|sBynA|w蚓gC"
	mov $403,"sIBNH"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"@@"
	mov $405,"@ꎟE"
	mov $406,"ے񓞓{Q៓IړINH"
	mov $407,"ے񓞗H"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"@@"
	mov $409,"@񎟐E"
	mov $410,"ێʓ{FeQҁH"
	mov $411,"ے񓞗H"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $412,"ے|plalH"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $413,"@@"
	mov $414,"@z៑"
	mov $415,"ێʓ{H"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\

	textoff

;ʉFyb
	dwave 2,"wave\PageA22.wav"
;wiF̘݉a@E
	bg "bg\dai3kou\izakaya.jpg",20

	texton

	mov $401,"uccށAސYrcv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"@@"
	mov $403,"u݁Cޖ瑾ʗJHv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"@@"
	mov $405,"uޔЁcc"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"^Iݗpޔh\EIHv"
	mov $407,"@@"
	mov $408,"uRC嗹B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"މ}^ӓI^iB"
	mov $410,"䘸HɘMIB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $411,"NCsƜޔߏy\oIBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $412,"@@"
	mov $413,"ucccv"
	mov $414,"@"
	mov $415,"@"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"uoŎГߍƌCAQB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"OSpIB"
	mov $403,"ߒmޔ\o战EH"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"Ɠszv戁B"
	mov $405,"jӏYrICAُCB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"vʏowїpIxC"
	mov $407,"A\稟sCArHB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"Hw߁CoŎН\戁B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"C熓wZC"
	mov $410,"䕁ʓIN֗vmC^IBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $411,"@@"
	mov $412,"CꖼЉȘVC"
	mov $413,"ً슖VُmB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $414,"ccA֐甉䊴kB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $415,"{ICX{Iʏ"
	mov $416,"AE^lTB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $417,"OpI喷B"
	mov $418,"틳HQIoŎЁB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $419,"śfC{laȗB"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"uAލڐsdH"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"ޘƍ៑hIC"
	mov $403,"ߍƌASZFIB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"\ʏܐIFDgnC"
	mov $405,"A{{ٖ@RAfaB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"t֗LnC"
	mov $407,"gkƉ˓{lI^]掓ځC"
	mov $408,"upwvLߔЎӁxh㉺B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"{{L懎C"
	mov $410,"IlS^kccvv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@


	bgmfadeout 2000
	bgmstop


	mov $411,"@@"
	mov $412,"^CޗtIuMkꐺB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $413,"͐Bސ^ߐl߈IB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $414,"糓{IߑjB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $415,"DqݛE勎꘢c"
	mov $416,"{lېϓIH"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"uccdИVB"
	mov $423,"PWWUNIcߒmEHv"
	mov %120,401: mov %121,401:mov %122,24:gosub *messagefont
	mov %120,423: mov %121,423:mov %122,24:gosub *messagefont
	$401@/
	$423/
	add $401,$423/
	@

	mov $402,"@@"
	mov $403,"udŋjVGCl弙}JHv"
	mov %130,402
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"uz˗Lpla{lIDݖvC"
	mov $405,"pDʑ~ȍƓIqB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"BʁC{lSsMcArJBv"
	mov $407,"@"
	mov $408,"@"
	mov $409,"@"
	mov $410,"@"
	mov $411,"@"
	mov $412,"@"
	mov $413,"@"
	mov $414,"@"
	mov $415,"@"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"uفB"
	mov $423,"V@IDʔ픻ٍ߁B"
	mov %120,401: mov %121,401:mov %122,24:gosub *messagefont
	mov %120,423: mov %121,423:mov %122,24:gosub *messagefont
	$401@/
	$423
	add $401,$423/

	mov $402,"ސRsCDʏitۓIC"
	mov $403,"si՗I莁B"
	mov %130,402
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"C{lInʔቺc"
	mov $405,"ᓞr蕐ePs\ڎIxBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"sCCېϓIc"
	mov $407,"CLl弙}ϓI莁C"
	mov $408,"{˓w͒z㉢|B"
	mov $423,"䐥rzIB"
	mov %120,406: mov %121,408:mov %122,24:gosub *messagefont
	mov %120,423: mov %121,423:mov %122,24:gosub *messagefont
	$406
	$407
	$408@/
	$423/
	add $408,$423/
	@

	mov $409,"C^pLViCsI敔C"
	mov $410,"󓾗៑C󓾗៑C"
	mov $411,"󓾗ꎟEេB"
	mov $423,"g|ƓIsB"
	mov %120,409: mov %121,411:mov %122,24:gosub *messagefont
	mov %120,423: mov %121,423:mov %122,24:gosub *messagefont
	$409
	$410
	$411@/
	$423/
	add $411,$423/
	@

	mov $412,"RCCꎟ៑Iwccމ񌴓_B"
	mov %130,412
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $413,"g\ʏvLxzC"
	mov $414,"C͎㏬CيOYrsܕsoB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $415,"ߘC񓞗㏬ƓI߁B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $416,"Bʁcc{l꓾Yr藁Hv"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"up៑I曈PICL௓IxB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"szr\CBޑ甐l嗹cc"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $403,"swZCޘ{YrsB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"ccvlӛΓnB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"CvӛΓCȍː[M{xTaIƁB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"ޔЏCIxTCݖ\Ncc"
	mov $407,"sC蕌ܔN\s\gssmBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"@@"
	mov $409,"dИVܒCtIB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $410,"Xd́C⁗IX玐C֗LqlI敐B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $411,"݋I排CBƜޘ[㱗^OEuCB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $412,"vۏosCOʕ֐BړI"
	mov $413,"ϓIiJB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $414,"ِޟ|ّzہAa՗I{B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $415,"@@"
	mov $416,"us܉񗈁ccv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $417,"@@"
	mov $418,"ˑRߓٖ⁗IC䝫勎C"
	mov $419,"tݍiC"
	mov $420,"ŒΗNB"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"uֈCߑ֕aIԁC"
	mov $402,"vz֒\萎ȓIvCJH"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $403,"ʑRLIjlB"
	mov $404,"꒼ݓߜϓIVoB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"ZʖDCHnCsމsBv"
	mov $406,"CmIӍݐB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $407,"A꘢sIyߛB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"ccω꘢l{va@B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"SslB"
	mov $410,"Fs|dIqB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $411,"ݜϓIvCmǕs"
	mov $412,"֜È筎IVcc"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $413,"@ʏVOCI\ėL꘢l"
	mov $414,"a⋍݈NADcc꒼rzIBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $415,"@@"
	mov $416,"\z\萓IӎvB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $417,"CYrFqlϋlƊC"
	mov $418,"䑁A@uB"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"u݁CґVB"
	mov $423,"\s\aN󌨍េH"
	mov %120,401: mov %121,401:mov %122,24:gosub *messagefont
	mov %120,423: mov %121,423:mov %122,24:gosub *messagefont
	$401@/
	$423/
	add $401,$423/
	@

	mov $402,"@ʕsÈӓIԁCvgnBv"
	mov $403,"VCcHI\hZʏAsBv"
	mov %130,402
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"@@"
	mov $405,"smsuCdИVIc"
	mov $406,"EvLᚘeIΗeB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $407,"RhI_CnB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"@@"
	mov $409,"u៓lccYrӎvHv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $410,"@@"
	mov $411,"u{CnفB"
	mov $412,"UفClawqSsB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $413,"ޘƁccKlvB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $414,"嘢ls\Coݓ{KC"
	mov $415,"塐ŚC㕄{lgᚓIB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $416,"@A֐f܏YrC"
	mov $417,"vsCFAsBϓI|{B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $418,"LVCv|擏o\CύƓIwqFB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $419,"ޏA䏊MICI៓lBv"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"{I|C{IPB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"s퍑̘a~]ECCwqF񋟓IB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $403,"ݜޘܓxsIvC"
	mov $404,"L꘢jl筎ȓIMOB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"푼IrS[[ÁC壕s֎㲗B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"@@"
	mov $407,"udИVB䐥ϑzIB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"c\hZʁC"
	mov $409,"ӍsߍAO̗͏TIaȋC"
	mov $410,"oᖔ懎I{lB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $411,"@ʐ^ϓIԁc"
	mov $412,"CIAEBB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $413,"违m~IUB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $414,"ȁC\M进󏫈ؑth迁B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $415,"甉䗈JBޓICIv"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"ucߐۛEDqPޘEIuHv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"@@"
	mov $403,"uvLCB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"CeޘEC\ޏHBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"@@"
	mov $406,"uܓDccܓDI"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $407,"甉܈ꎟB"
	mov $408,"蓌}CґVBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"@@"
	mov $410,"gCLoEB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $411,"@@"
	mov $412,"uލލC苑gƁCdИVBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $413,"@@"
	mov $414,"qlxxZٕIECPB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont

	QUAKE 10,200

	gosub *textwright
	@

	mov $415,"ccޏwZ^DB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $416,"@ʖv\FC"
	mov $417,"ُ݈mIv[rJB"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"uėꎟtJCdV䔁I"
	mov $402,"DCtI"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $403,"ccVCޔtqs󗹘EH"
	mov $404,"sDӎvCΖZē_tEH"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"nCґVCߖ犅CNI"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"HsEH"
	mov $407,"gށCssCCЉl蕎ssssGI"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"@@"
	mov $409,"TCLޘCdJB"
	mov $410,"dИV悒vuun㆒B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $411,"ʕsDC"
	mov $412,"A֐r蔆_B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $413,"CS[rӖzrB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $414,"@@"
	mov $415,"AœρC"
	mov $416,"䘸ꎟFIALޔЊuB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $417,"@@"
	mov $418,"ޘjlCI^cc"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\

	textoff

	bg black,14
;

;ʁFSd}iʏj
	mov %42,2
	gosub *sindenzu

;

	wait 2000

;wiFuQN\\v@ʏtF[h
	bg "cutin\dai3kou\cutin_15.jpg",12
	delay 3000
	bg black,12
	delay 2000

;BGMFfree0539.mp3@iv[v
	bgm "bgm\free0539.mp3"

;wiF@ʏtF[h
	bg "bg\dai3kou\homare_kokuban.jpg",12
	delay 3000

	texton

	mov $401,"uA܁CCCp៑ېI"
	mov $402,"ޒiwxICxIeCӐ"
	mov $403,"拍LsoIBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"SEœCeIlFCsݑzC"
	mov $405,"eɝf^IƁBɝfAmBf"
	mov $406,"ccۓ{Cg᫝TB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $407,"RCߑSsMTmIB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"AρCݔNꖇ߁C"
	mov $409,"E嗹ꖇ߁B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $410,"៑HHiIߎC"
	mov $411,"IMЉC"
	mov $412,"ݒBlCI庁B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $413,"C孔ލ庁C嘢lsv"
	mov $414,"筒莩ȓIӎuC"
	mov $415,"@AܗYrCsvÒnŐ^B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $416,"ϓI唻f\͐KsIBv"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"⋍ݝOCwqFGܒ㱓I^B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"ݜϓIlqC"
	mov $403,"smsuE勎qNB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"@@"
	mov $405,"adИV@ߊSB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"\ʏŋNCaʘVsrkZ"
	mov $407,"aaICkpߓIώqB"
	mov $408,"Aݔw@CpCs抓IaEq"
	mov $409,"eДQB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $410,"wZUېYrVC命sFB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $411,"r֗LpC㱁Cيw܉FԓIVB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $412,"@@"
	mov $413,"sCF|vLىFÎB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $414,"ƓsQdИVB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $415,"lw㞎HIÔC"
	mov $416,"IMCAwy߁xB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $417,"@ʜލ픘C"
	mov $418,"掓耋玉sssB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $419,"ZݛESwNC"
	mov $420,"VsݝdИVIcFsB"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\

	textoff

;ʉFwZ̃`C
	dwave 2,"wave\chaim.wav"
	bg black,12
	wait 3000

;wiFЉȏ@Vb^[tF[h
	bg "bg\dai3kou\homare_syakaika.jpg",26
	delay 2000

	texton

	mov $401,"ޗЉȏyݎB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"qЉȘVȊOC{vLloޗB"
	mov $403,"܁CޗFƐI㱁B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"dИV̜ޗCuTcvB"
	mov $405,"@"
	mov $406,"@"
	mov $407,"@"
	mov $408,"@"
	mov $409,"@"
	mov $410,"@"
	mov $411,"@"
	mov $412,"@"
	mov $413,"@"
	mov $414,"@"
	mov $415,"@"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\

	textoff

;wiFЉȏiuj@tF[hȂ
	bg "bg\dai3kou\homare_syakaika_bure.jpg",1
;G\Fd@΁@ʒuF
	ld c,":a;tatie\yaezono\bisyou.bmp",12
	delay 2000

	texton

	mov $401,"uu⿁CґVB^hkBvv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"@@"
	mov $403,"dИV݊œI惒NCIo΁B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"p܁C"
	mov $405,"IސgŕCT莗I玁C"
	mov $406,"bߘlI^CdoIB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $407,"LC֎́uTvVIB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"cޘ[㱏CcCT琥JB"
	mov $409,"CTZVIpFJB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $410,"Ȝޘ[COn]ៗqN"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $411,"@@"
	mov $412,"^IEeЊeϓIB"
	mov $413,"֐Vsz竓I"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $414,"֐Vs\IC"
	mov $415,"F}ÎCʖفB"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"sǎCCp֐笏wIwƗC"
	mov $402,"raې꜁B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $403,"\݊wɐޔS@C"
	mov $404,"ݔ푗ܑOڗ񗈁B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"RCލwq甉XǝkC"
	mov $406,"œFC"
	mov $407,"甉[[󓞍CIxB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"ґRݑVaʒIhsC"
	mov $409,"A꜒nAS͈ȕn"
	mov $410,"筎ȐSڒI`ہB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $411,"@@"
	mov $412,"lGXցCNtVB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $413,"VwCꎟCꖼǎCVB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $414,"ډIONC䏫ገǓIwHB"
	mov $415,"@"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\

	textoff

;G\Fd@ʏ@ʒuF
	ld c,":a;tatie\yaezono\tuujyou.bmp",12
	texton

	mov $401,"urρCǎC@CsuwXH"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"LvLߔЊŋNߑSIKSHv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $403,"@@"
	mov $404,"dИVՒCߏΓIgB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"@@"
	mov $406,"uvLCڑOC~֖vLc"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $407,"sCL꘢wTCnA㞐ȁC꒼vIʁBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"@@"
	mov $409,"uw@EܓVvCJcYrHv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $410,"@@"
	mov $411,"ەi䱁B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $412,"wTœIۗ܁c"
	mov $413,"CCʒꔈہccŋNk|̓IwqB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $414,"wFs\C"
	mov $415,"ݓwIVC"
	mov $416,"ȋ̐YrϓIwC֕s^B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $417,"@@"
	mov $418,"u@cCK^ꉺBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $419,"@@"
	mov $420,"u`迗Bv"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"sTCʑRs⁁B"
	mov $402,"ݐMWʔ흡ʁB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $403,"I^IځCsmC"
	mov $404,"A@x֐yCsIlmB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"sɓYrC"
	mov $406,"ҘasVLYrgnC"
	mov $407,"ƒgnϓIB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"RܗvuK^vC"
	mov $409,"AcC欔IMsd^Չ񗈁B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $410,"ᐥClkCA@ʐFCߐ^瀓ϓIlB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $411,"@@"
	mov $412,"u]saʗLgB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $413,"ʜޗ@琥Qs塁C"
	mov $414,"Llrs甛wq㏬wCȋp݊OЍB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $415,"SscLdvA"
	mov $416,"lwsϛB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $417,"^IC{哾xTBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $418,"@@"
	mov $419,"ucccv"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\

	textoff

	bgmfadeout 1
	bgmstop

;ʉFUbimCYj
	dwave 10,"wave\noise01.wav"

;wiFuO͉Szȁv@Qb\Ĕwiɖ߂@tF[hȂ
	bg "cutin\dai3kou\cutin_16.jpg",1
	delay 2000

	bg "bg\dai3kou\homare_syakaika_bure.jpg",1
	ld c,":a;tatie\yaezono\tuujyou.bmp",12

	texton

	mov $401,"urHv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"@@"
	mov $403,"uvYrccKԁccv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"@@"
	mov $405,"sE㱘xŁCœZ뗢IgKB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"@@"
	mov $407,"uCNIKԖkYBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"@@"
	mov $409,"uœKԁccAzNꍱB"
	mov $423,"gIccpIccv"
	mov $410,"@"
	mov $411,"@"
	mov $412,"@"
	mov $413,"@"
	mov $414,"@"
	mov $415,"@"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	mov %120,408: mov %121,420:mov %122,24:gosub *messagefont
	mov %120,423: mov %121,423:mov %122,24:gosub *messagefont
	br
	$409@/
	$423/
	add $409,$423/
	\


	mov $401,"u⿁CߋR񓞉ƐlIC^FB"
	mov %130,401
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"L_ӎvCChOߙ߁Bv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $403,"@@"
	mov $404,"uccc"
	mov $423,"cccv"
	mov %120,403: mov %121,404:mov %122,24:gosub *messagefont
	mov %120,423: mov %121,423:mov %122,24:gosub *messagefont
	br
	$404@/
	$423/
	add $404,$423/
	@

	mov $405,"@@"
	mov $406,"uߕsz甐l߁CȍˎÒNIEHv"
	mov %130,405
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $407,"@@"
	mov $408,"cc^ICމƌI@֐^qB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"ݐSΗꉺCR@ÐÒnCnqB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $410,"INB"
	mov $411,"ߍĖٖ@񋎓Iycc"
	mov $412,"@"
	mov $413,"@"
	mov $414,"@"
	mov $415,"@"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\

	textoff

	bg black,12
	delay 2000
;aflFfree0518.mp3@iv[v
	bgm "bgm\free0518.mp3"
;wiFAp[g̗imNj@tF[h
	bg "bg\dai3kou\kaisou_apart.jpg",0
	print 99,3000,"cascade.dll/dx"

	delay 3000

	texton

	mov $401,"ߘjlC^IsIlB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"@ّҋ戁C֐ّҍHcc"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $403,"Cݗ^ݐʁC琥S~B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"@@"
	mov $405,"LVccLlʑOC"
	mov $406,"c꘢㋙XB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $407,"ߘ㋙XACَiYB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"߈ȍ@CĖvLFIpC\Iώqs㈕sZB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"Csm䐥s^IIwqB"
	mov $410,"dǗ꘢㋙XCCÁB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $411,"As\Aϒ{C"
	mov $412,"A݁w擊xIxʑ嗹B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $413,"@@"
	mov $414,"vLl^B"
	mov $415,"ݜޘE㎧߁B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $416,"CIpC꘢ڈ꘢nsXPB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $417,"LꍱlՒBꐫC"
	mov $418,"AUsÝCSC"
	mov $419,"\FAPCc䓖ݟőҁB"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"䐥ݕߓIЗߌwB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"VS򗹍ˉƁB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $403,"aߘjlqlZ݈㱔jIB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"LwpxݓICAOlNB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"ґRLZ皓Ii㱁C֑\EL꘢B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"ccVsݖaᔎC"
	mov $407,"AsmCCs戉ԁB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"@@"
	mov $409,"䍫ЕȖ嘰\^C"
	mov $410,"BCcϓIlʋސʋNIJB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $411,"笕s\ϓINlB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $412,"󗧉CȍYȓIiB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $413,"@@"
	mov $414,"C"
	mov $415,"ݓ~VI暏ށCg}蕓ƓIV"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\

	textoff

;ʉFhJihA@j
	dwave 2,"wave\bosu12.wav"
	QUAKE 20,200
	delay 1000
;ʉFhJ
	QUAKE 20,200
	dwave 2,"wave\bosu12.wav"
	delay 1000
;ʉFK`[iKXj
	dwave 2,"wave\crash_glass.wav"
	QUAKE 30,1000
	delay 2000

	texton

	mov $401,"q虐jljjB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"ْQ[IC"
	mov $403,"jlFዩu藁vul藁vB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"䊮SsېYrC"
	mov $405,"A݉zNCv\ȓr񎖗B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"CYr꘢sHINlps戉ԁH"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $407,"TCcc"
	mov $408,"awߔАEIlxLJB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"CG列ߍs\刓I战alB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

;ʉFYKb
	dwave 2,"wave\hit80.wav"
;ʗh炷
	QUAKE 20,200
	delay 200
;ʉFKXb
	dwave 2,"wave\hit75_a.wav"
;ʗh炷
	QUAKE 20,200
	delay 200
;ʉFoLb
	dwave 2,"wave\bosu12.wav"
;ʗh炷
	QUAKE 20,200
	delay 200
;ʉFhJb
	dwave 2,"wave\bosu22.wav"
;ʗh炷
	QUAKE 20,200
	delay 200

	mov $410,"@@"
	mov $411,"jlFqlNّŖB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $412,"߈ꖋB"
	mov $413,"C{B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $414,"scBC"
	mov $415,"ߍjl^IŎZcŎܕsB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@


	bg black,1
	QUAKE 20,200

	mov $416,"@@"
	mov $417,"tojOCn竗NB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $418,"s[IlB꒼uő[IjlB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $419,"cc֐va@Fs~B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $420,"ٓI䗈܁CAI؁C琥BIplB"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"qH竓hoC"
	mov $402,"ݓߗLxxZx@B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $403,"uuIjlCLl{Ivv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"CQ茗CܗYrE㈕sC"
	mov $405,"TܖꉺvJB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"@@"
	mov $407,"œQ茒ntC"
	mov $408,"x@FӛΓߕsƁC"
	mov $409,"L{x@zB"
	mov $410,"@"
	mov $411,"@"
	mov $412,"@"
	mov $413,"@"
	mov $414,"@"
	mov $415,"@"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\

	textoff

;wiFAp[g̗@ʏtF[h
	bg "bg\dai3kou\kaisou_apart.jpg",12
	texton

	mov $401,"ߍ퐧ApegѓIjlFfC"
	mov $402,"ȖzIgB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $403,"ccnŁCSgn|ݒnB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"៣~sZnB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"ډrޔВSC"
	mov $406,"NcI䍪{zsB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $407,"CƐl󈻓|ݒnB"
	mov $408,"ߘiC甐lٌ߈B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"@@"
	mov $410,"uccَiYccv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $411,"@@"
	mov $412,"|@I⁓B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $413,"ŁCcB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $414,"œIE_F"
	mov $415,"ՏZˁCAcpSSB"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"u߁ccڌxEccHv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"@@"
	mov $403,"ّISCғ__B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"@@"
	mov $405,"uϛccٕsNcc"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"Yrsv\Cߘcc"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $407,"ߋpcc~ccc"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"@@"
	mov $409,"ډIgx@IaϋߓIxJ᳏ZB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $410,"sv@CzI}~l玝SˁC"
	mov $411,"R@푗B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $412,"@CoOB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $413,"@@"
	mov $414,"߈ȍ@ccĖvLߘ[㱁B"
	mov $415,"@"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\

	textoff

	bg black,12
	delay 2000
;wiFrO[imNj@ʏtF[h
	bg "bg\dai3kou\kaisou_living.jpg",12
	delay 3000

	texton

	mov $401,"K^ICISIܘaꍱɐB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"o@@CbōݓICލC"
	mov $403,"yIVnC"
	mov $404,"d꓅ŋN̖ʓIB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"^VOߔjIؑ"
	mov $406,"VƉVߔVdCBÈȑzہC"
	mov $407,"甉䊴\hB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"@@"
	mov $409,"꘢lI\^NC"
	mov $410,"AalCusݓw͍HB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $411,"R@CpoIhyVߕaV܎qB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $412,"֗LAmA惘aߋB"
	mov $413,"ލs䘸h\I󕨁B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $414,"Չ䋎hDhI@C"
	mov $415,"xՉ䋎SЁB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $416,"ccIKB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $417,"smsuCCn㏬wC"
	mov $418,"ٜޘEm悎B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $419,"vLzvCЉȘVC"
	mov $420,"ِEIƘa[xzہB"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"[xKIC䐥uB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"IgS暐ʁC"
	mov $403,"CnvlgȓIB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"ˋuLvLzvI@CґzhI@vC"
	mov $405,"椒xxIhB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"ґR|ٕۗnڎ󗹑IC"
	mov $407,"ApT܈B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"@@"
	mov $409,"SNIʁCCnL@uB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $410,"AIEρcc"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $411,"L䗹B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $412,"或DClDCLI؁C"
	mov $413,"@䗯ݑgB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $414,"@CˉcSI椒݉gB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $415,"ґR䊴CSCAcc"
	mov $416,"uȑBIlC"
	mov $417,"ٖ@l~n悁B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $418,"@@"
	mov $419,"FCwxI֕sZʁB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $420,"vSUJ勎I󔒁C֎vXI㱁B"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"A݉ϑzI"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"ݎЉCwgwKǁxIm΁B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $403,"ސЍۚSsFI@sC"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"O\哯sIlۚS玁C"
	mov $405,"㙪Ilzڋ"
	mov $406,"sfQ̓IٌcB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $407,"䗹𗹜ޔЌ`IC"
	mov $408,"ˑRzNȑO񓞓IHeB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"uVsokNށBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $410,"u꘢l݉艺ΖZs@Bv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $411,"u@ʓߘlď{ۚS玁CA\oX戁Bv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $412,"@@"
	mov $413,"Ó܁cc"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $414,"sݘݖ@sCH"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $415,"ߓVuCCsC"
	mov $416,"TnwZwIeB"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"uCIHvVkB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"ސ蕟SۚSI͎C"
	mov $403,"@BIEԕB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"kw͍݊藁CߏYrsspSSBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"@@"
	mov $406,"ܒCIo_IΗeB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $407,"CnH쒅B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"ޔЈӛ甉~ssyB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"@@"
	mov $410,"{@CCoFIۚS\́C"
	mov $411,"퓯䦗꘢VIHB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $412,"ęيCOsoC"
	mov $413,"WIo|{@"
	mov $414,"ĕhoolIVvځB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $415,"z@ʔ\cƉꍱDC"
	mov $416,"QޘB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $417,"@@"
	mov $418,"ON@CCK^I퍐lC"
	mov $419,"ssoGCpٍ|smB"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\

	textoff

	bg black,12

	texton

	mov $401,"퓯wIňCȋyC~I坭B"
	mov $402,"֗LʓICdꝔ[I_B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $403,"R@CLVccݕߌГIK䱏C"
	mov $404,"śfqݗȓIqB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"CnΕIgK䱉ccYrsvLGcc"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"@@"
	mov $407,"V@CpIꍱ"
	mov $408,"xtwEC㗹wC󗧎uCꖼB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"ٖ@ZBߍBƐlIlFB"
	mov $410,"IsKBޗ┙^IEB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $411,"vRޘЉCAKllFB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $412,"ClFcc"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $413,"vցCvClIwqFADB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $414,"甛wqF㐳IHC"
	mov $415,"h꘢seEs^mI~ЎЉB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $416,"@@"
	mov $417,"ޏAcc\IC琥IwB"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\

	textoff

	bgmfadeout 2000
	bgmstop
	delay 2000

;ʉF݉̓X
	dwave 2,"wave\izakayas.wav"
;wiF̘݉a@ʏtF[h
	bg "bg\dai3kou\izakaya.jpg",12
	texton

	mov $401,"ug݁CzB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"@ʓ\XRndlcc"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $403,"u戏YrICv__A槗B"
	mov $404,"EkKCȊ]ߕsv`aIBvv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"@ʔ\܏oIԁccv"
	mov $406,"sA\sp藁Hv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $407,"@@"
	mov $408,"u@vpCJB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"ߛE\ȓIHB"
	mov $410,"ډv꒼OAsBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $411,"@@"
	mov $412,"ItqCf{vr"
	mov $413,"p|xB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $414,"@@"
	mov $415,"ucc@ʗLlCߒzC"
	mov $416,"ߘlk悓IB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $417,"Cޑ[`v"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $418,"@@"
	mov $419,"dИVܒ"
	mov $420,"[NȓItqC\Q䵋NB"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"uϑC"
	mov $402,"V貘aVNsFHeB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $403,"蕎svCA|ϏB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"@˒mV貓IHʓ|託Bv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"ql蕖铦竁Cc꘢lǉB"
	mov $406,"^IkňC揁ccv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $407,"@@"
	mov $408,"乍ݒgIꐺʚȁCȊŏo\EshB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"@ccŗF"
	mov $410,"idaIlCNsEYrJB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $411,"ꎟFAuލkC"
	mov $412,"ŗC勎IL^拌nJB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $413,"@@"
	mov $414,"uV@藁CېYrHv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $415,"@@"
	mov $416,"u擉IǙX@VldDB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $417,"꒼糉䓞w\oioC~B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $418,"CړᚉC"
	mov $419,"嘢scꕔHooh߉ƌǙX@B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $420,"܁CV֐``GC`kIv"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"܁ccAZߜr甉kCÛB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"ٛEqrfIdИVC"
	mov $403,"֖vt藁B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"v\לmCƖ瑾sJcc"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"@@"
	mov $406,"usDӎvCc玉ȍē_lEHv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $407,"@@"
	mov $408,"uIߐŎZIlJIv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"@@"
	mov $410,"usRIԁCsFB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $411,"ߘcch䗈t`Bv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@


;ʉFK^b
	dwave 2,"wave\close08.wav"
	QUAKE 10,200

	mov $412,"@@"
	mov $413,"uBʓ_IRʏ`I"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $414,"ߜސlcc֐@ns\Bv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $415,"@@"
	mov $416,"dИVfCΒB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $417,"ޔlCAL꘢\NIlB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $418,"R@CvKv|w\IxJB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $419,"BqNCC\ݑZIFC"
	mov $420,"Fߔލ\ٕIݗB"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\

	textoff

	bg black,14
	delay 2000
;wiFu\\v@ʏtF[h
	bg "cutin\dai3kou\cutin_17.jpg",12
	delay 3000

;wiFwZ̘L@fVb^[tF[h
	bg "bg\dai3kou\homare_rouka.jpg",25

	texton

	mov $401,"uVIv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,30:gosub *messagefont
	gosub *textwright
	QUAKE 20,200
	@

	mov $402,"@@"
	mov $403,"ݑLCRl@ʋZB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"QQ嗈IC"
	mov $405,"SCǎCItI꘢wB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"CVC܈usvݑL竁vC"
	mov $407,"\Ӎفcc"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"A\I\px茓甉uC"
	mov $409,"ݕsdWލIB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $410,"@@"
	mov $411,"urHv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $412,"@@"
	mov $413,"uŁAŋNIv"
	mov $414,"@"
	mov $415,"@"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"ߓޒԁC䗧zB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"ݒwCŉːLIB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $403,"SECnGCA֖vB"
	mov $404,"ϓIwqCC_AŏoB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"\싷ÍCLwqruŉ˓I|AȓI瀏"
	mov $406,"ٍ[Ms^B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $407,"CF\s汓CQdQٕB"
	mov $408,"ޏAwInB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"@@"
	mov $410,"u鈘a鈍ݑŉˁHv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $411,"@@"
	mov $412,"zHCݍ@ʓIwB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $413,"@@"
	mov $414,"uەiwaccv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $415,"@@"
	mov $416,"\܏oIC"
	mov $417,"wȗCE]ܓVٌ㞐ȓI߈ʊwB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $418,"@@"
	mov $419,"uەiwRwZHv"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"uIIߘەiwacc"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"NANA֗LlNccv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $403,"@@"
	mov $404,"u꘢َOjIHv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"@@"
	mov $406,"ޛEsʓIŉ˗CvݏQdB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $407,"񓞖IOjCwIǓwC"
	mov $408,"wA萬꘢V́B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"ޔЏV̗LmC"
	mov $410,"Aݍ˓wCvfC揮B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $411,"sDCەiwLaB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $412,"SS\ICrsB"
	mov $413,"@"
	mov $414,"@"
	mov $415,"@"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\

	textoff

;ʉFKKK
	dwave 10,"wave\dooropen07.wav"

;wiF@E獶֑ftF[h
	bg "bg\dai3kou\homare_kyousitu.jpg",86
	delay 2000

	texton

	mov $401,"Cj@C掓IœlEC"
	mov $402,"ЎB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $403,"֐vzEcc"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"wF_[xB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"FIscc|ݒnICcc"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"@@"
	mov $407,"꘢lIjB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"@@"
	mov $409,"C쓯w螒qB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $410,"ŗʁCwQݒnC"
	mov $411,"Iw㉨꘢B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $412,"@@"
	mov $413,"uccەiccwHv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $414,"@@"
	mov $415,"ٜޕՖIiCґRkُZC"
	mov $416,"A֐\CB"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\

	textoff

;wiFiuj@tF[hȂ
	bg "bg\dai3kou\homare_kyousitu_bure.jpg",1
	delay 1000
;aflFfree39.mp3@iv[v
	bgm "bgm\free39.mp3"
;G\F@E΂݁@ʒuF@tF[h
	ld c,":a;tatie\miki\ayasii.bmp",15
	delay 2000

	texton

	mov $401,"u⿁CVBBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"@@"
	mov $403,"gIwccەi䱁C"
	mov $404,"p@nʓIoC"
	mov $405,"SSn񗹈劖B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"\Ǐ^IwXCUےI㔗C"
	mov $407,"AcpˑRՒ{tB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"ʓIے乒FB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"OC\I֖vLFcc"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $410,"@@"
	mov $411,"AccNޘCiꐥr񎖁H"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $412,"ܐ꘢aOjݑŉˁCz嗈"
	mov $413,"Bʏ|۝وC"
	mov $414,"|OjSsQݗnB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $415,"Óލj㗹cc֐܁cc"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $416,"@@"
	mov $417,"uDCەiwB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $418,"\s\crwgC藁Hv"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"ucc鴁Bv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"@@"
	mov $403,"ݚ}΁ARIC"
	mov $404,"ەip͉ݍIwB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"⁗ɋIᐺB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"@@"
	mov $407,"uZIv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"@@"
	mov $409,"usZIԁCߔ\rρH"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $410,"ߐvcfECHv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $411,"@@"
	mov $412,"uccBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $413,"@@"
	mov $414,"uYrssC֊ݜޙXóB"
	mov $415,"s吥QIVnB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $416,"vszލƌψדIԁC"
	mov $417,"Ad߉Bv"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"ґRsC"
	mov $402,"ەiIgїĹCݐCB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $403,"Z皓I@C䉺rSsËNB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"sC풧̎B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"@ʕsϘC\sC"
	mov $406,"SZەiI]Cc\fB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $407,"@@"
	mov $408,"ccCIp~󉔉"
	mov $409,"@"
	mov $410,"@"
	mov $411,"@"
	mov $412,"@"
	mov $413,"@"
	mov $414,"@"
	mov $415,"@"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\

	ld c,":a;tatie\miki\human.bmp",1

;ʉFhXb
	dwave 2,"wave\hit76_d.wav"
	drawfill 255,255,255 : draw
	wait 300 : repaint
	QUAKE 20,300

	wait 2000

	texton

	mov $401,"uecIv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"@@"
	mov $403,"|IꌝIݕB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"ߔ睈LI莒甉bs埃C獫͌ЗB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"@@"
	mov $406,"uލƌԖs܁CVŁC"
	mov $407,"֗Lw{qIVcc"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"ʑRCAZwZC_ӎvsvLBv"
	mov $409,"@"
	mov $410,"@"
	mov $411,"@"
	mov $412,"@"
	mov $413,"@"
	mov $414,"@"
	mov $415,"@"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\

	textoff

;GF@
	cl c,12
	bgmfadeout 2000
	bgmstop

	texton

	mov $401,"ەifCoB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"zǏ㋎CACIuߕsB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $403,"ō@CYrssC"
	mov $404,"\ڑ\IweCB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"@@"
	mov $406,"暒nCЏOSB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $407,"r۟Iۓ{B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"SON@ϕʓIۓ{B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"sCŗB"
	mov $410,"sٕەi{lB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $411,"و꘢NtIC"
	mov $412,"NߕϓIw^З@xٖ@eEB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $413,"@@"
	mov $414,"xgCxB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $415,"wxCI߈VIyB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $416,"vցC琥cc"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\

	textoff

	bg black,12
	delay 2000

;wiFu͉łȂBv@ʏtF[h
	bg "cutin\dai3kou\cutin_18.jpg",12
	delay 2000

	bg black,12
	delay 2000
;wiFЉȏ@Vb^[tF[h
	bg "bg\dai3kou\homare_syakaika.jpg",26
	delay 2000

	texton

	mov $401,"wFߗߎ旹v@C"
	mov $402,"ەiÓIB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $403,"IەiC"
	mov $404,"ْߓIF̓uŏYr藁vC"
	mov $405,"R@ˑRŗ勎B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"@@"
	mov $407,"K^ICFI̜kSB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"RCދNݓw@ˑRېI\͎"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"tI_曈C"
	mov $410,"攼XÈȎB"
	mov $411,"@"
	mov $412,"@"
	mov $413,"@"
	mov $414,"@"
	mov $415,"@"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\

	textoff

;wiFЉȏiuj@tF[hȂ
	bg "bg\dai3kou\homare_syakaika_bure.jpg",1
	delay 1000
;G\Fd@ʏ@ʒuF
	ld c,":a;tatie\yaezono\tuujyou.bmp",12
	delay 2000

	texton

	mov $401,"urρCwœIz@Hv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"@@"
	mov $403,"uޓ_XccsZYrkBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"@@"
	mov $405,"uGCluxxIώqvBsЁCsЁB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"֍Dōq㗹B"
	mov $407,"㈓L㆑ވ꘢z\IwC"
	mov $408,"ڔnחꌝcB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"߉^u`cv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $410,"@@"
	mov $411,"uߘw@rϗHv"
	mov $412,"@"
	mov $413,"@"
	mov $414,"@"
	mov $415,"@"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\

	textoff

;G\Fd@΁@ʒuF
	ld c,":a;tatie\yaezono\bisyou.bmp",12

	texton

	mov $401,"ubqЗB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"ApŉIߑCnꌿ\Rœ_Iv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $403,"@@"
	mov $404,"dИVݚ{΁C䗹dwB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"ވʉϓIOCE׉zِÉajC"
	mov $406,"wqFIlf񐳕dB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $407,"ى䗈܁CސꎟIVB"
	mov $408,"s\ݜޔВnAœ|B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"@@"
	mov $410,"ugەiCLYrEHv"
	mov $411,"@"
	mov $412,"@"
	mov $413,"@"
	mov $414,"@"
	mov $415,"@"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\

	textoff

;G\Fd@ʏ@ʒuF
	ld c,":a;tatie\yaezono\tuujyou.bmp",12
	texton

	mov $401,"uCޛwq^Ðt`B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"pHCpClgwjB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $403,"D操pʉƁCAߑ`߁B"
	mov $404,"ܔ䱛lZݕΖ[I乕㱗B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"S퓖Wlّҗ藁B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"\ݏwܔNtI勎IC"
	mov $407,"߈ȍ@ACnٌ㞐ȁC掏o\͎Cdꑖ㗹sǓIHB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"CQaޔSCsqIB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"R@CDseϒ|槓IwwC"
	mov $410,"CvLnCAǒޏwB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $411,"ZʒmߛwqkaB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $412,"ȍߗ\IǎCB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $413,"CcVwhґVBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $414,"@@"
	mov $415,"csTVB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $416,"u֘aNC"
	mov $417,"嗹QSCAEcMr塑SB"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"uLvLzדߘǔV}Hv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"@@"
	mov $403,"uvLcXz漑藁B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"@\v푗ޗC"
	mov $405,"BAĖvLl\m~ޘwqJBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"@@"
	mov $407,"uDMCALޔЊƁIv"
	mov $408,"FFAkꉺZʑFJB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"甑FŊŉFICL^sBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $410,"@@"
	mov $411,"uuDIvv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $412,"@@"
	mov $413,"szďYrssIuB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $414,"I~CICَЉwCُCB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $415,"gŁADC"
	mov $416,"vsCIጁB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $417,"䗧InwqFB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $418,"@C\ޏHB"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\

	textoff

;G\Fd@΁@ʒuF
	ld c,":a;tatie\yaezono\bisyou.bmp",12
	texton

	mov $401,"urCґVB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"ґRL_ˑRCAh迏oJBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $403,"@@"
	mov $404,"uuoIHv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"uVwCnAvoEHvv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"@@"
	mov $407,"uCsӒnrVBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"uVԁCsCwZvIBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"ZʓCBIB"
	mov $410,"ߔǏIhJBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $411,"@@"
	mov $412,"uccߗvIHv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $413,"@@"
	mov $414,"uSЛBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $415,"@@"
	mov $416,"ucccHHHv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $417,"@@"
	mov $418,"StsvIō݈C"
	mov $419,"T򑜉ϘIoMxxIΗeB"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\

	textoff

	bg white,14
	delay 3000

;ʉF`
	dwaveloop 1,"wave\SeaC11.wav"
;wiF`@ʏtF[h
	bg "bg\dai2kou\nagasaki.jpg",17
	delay 3000

;ʉtF[hAEg
	dwavestop 1
;wiFvGXeXw@Eڎ@ʏtF[h
	bg "bg\dai3kou\prestes_ousetu.jpg",12
	delay 3000

	texton

	mov $401,"{V@C䓋VIsB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"IICޗa䋏ZIρC"
	mov $403,"ߘ្팴qVΕ[InB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"dИV܁C"
	mov $405,"ޗIꏊV勳qw@ACIwSЁxcc"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"@@"
	mov $407,"SЁBވBٜޘn_ؓI`eJB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"tFwI돊C"
	mov $409,"Ә^ЈӖ㗈܁CBZ㐥jᒆISЁB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $410,"RccAp꘢ڈ꘢nXP"
	mov $411,"\CݓߔFʑCُ䐥LށB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $412,"|敕ss[CAvLdzvpߓIӎvB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $413,"ɓICޏw@"
	mov $414,"ٖ@CSڒISЁB"
	mov $415,"@"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"uvC蓌}{w@Bv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"@@"
	mov $403,"ݔܓIqC"
	mov $404,"ʐCIw@ʑB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"TO\ӓl\oIJB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"CǗrꏊ^w@IlcNSC"
	mov $407,"ApʉڗLKd௘aЉQIB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"@@"
	mov $409,"uFʁC䐥_wIґB"
	mov $410,"V\hyQyCӍݐ튴漁Bv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $411,"@@"
	mov $412,"ugޘgށC运^qB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $413,"dИVg֍DEHv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $414,"@@"
	mov $415,"uC\甉ՋԊwx藁Bv"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"܁Cވʉ@ʐdИVIHB"
	mov $402,"dИVNS݌ǙX@H"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $403,"ݔdИV֐VIC"
	mov $404,"\Iek͐[Cݍ@甑h\ẃB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"C̜ވCCh\B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"@@"
	mov $407,"ug迁C䘸dИVߗ嗹B"
	mov $408,"@]x\CC\IρBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"urCFݏACnQyIZqJB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $410,"^ݜޗܖCs@pŊ"
	mov $411,"ω\XyBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $412,"@@"
	mov $413,"uuDICߏA`迗Bvv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $414,"@@"
	mov $415,"⋋NgC@ʑoڑҎB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $416,"ccAAݜCˑRuݘaB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $417,"@@"
	mov $418,"uuߘcc@p՘HEHvv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $419,"@@"
	mov $420,"uuCLYrVEHvv"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"uussCI\藁Bv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"uC\Rጘww@Ip՘H"
	mov $403,"ӍݐLӊOccvv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"@@"
	mov $405,"ucccv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"@@"
	mov $407,"ߓIԁC@ʘIo΁B"
	mov $408,"\c䩑RnŒB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"C䐥sܓB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $410,"zdVg㕁C"
	mov $411,"@ʋpCB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $412,"@@"
	mov $413,"uccw@OʊŁC"
	mov $414,"\ugJB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $415,"sC䑴Ӝk蓓rŊŁB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $416,"EawFҍ݈NC"
	mov $417,"LrY㈎Ȑ@藁Bv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $418,"@@"
	mov $419,"\rܒCR@wqϚ]]nΗNB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $420,"ߐێSIΗeCވ_A\ŏoB"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"^B"
	mov $423,"ϓI\cc"
	mov %120,401: mov %121,401:mov %122,24:gosub *messagefont
	mov %120,423: mov %121,423:mov %122,24:gosub *messagefont
	$401@/
	$423/
	add $401,$423/
	@

	mov $402,"꘢⋍~[IlC^I\IoϓI\EH"
	mov %130,402
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $403,"lFݖُFʓIlC"
	mov $404,"䐥zvDێڈȋqIΗeB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"@ʐgrǗCލXRIB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"RCOI\pcc"
	mov $407,"@"
	mov $408,"@"
	mov $409,"@"
	mov $410,"@"
	mov $411,"@"
	mov $412,"@"
	mov $413,"@"
	mov $414,"@"
	mov $415,"@"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"uӉ甗LIVFߎQyC"
	mov $402,"scc"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $403,"]VFs\n݊wgB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"CwS͈ȕCސVIጏ݁B"
	mov $405,"rCC@􍱏Yr藁H"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"CVwgChFcC"
	mov $407,"ȋpҍݖasIʓI@ʁC"
	mov $408,"ϓI@ʁCFw@ٕsvIB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"݉FwZCǗIBhRꖼ@ʔV"
	mov $410,"֗LwywlwhIB"
	mov $411,"@@֐wʁCsϐʁwxB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $412,"Lߍ\槖A\槗ވ_IlC"
	mov $413,"˗LoiǗI֎qBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $414,"@@"
	mov $415,"Ǘ֎qIoiB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $416,"vzCޔВRōጐl{܏occ"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"kÎҁCUওInʍ@"
	mov $402,"AY㈎Ȗ琥ÎҁB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $403,"R@ZȓIʕsC"
	mov $404,"F\ދxB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"]Iw笕sC\[IvA[B"
	mov $406,"UoYrCA᳁B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $407,"^IÈȝEC"
	mov $408,"AیۓI戕CC"
	mov $409,"֐UULn܎ȁwSጔCxB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $410,"@@"
	mov $411,"RCވʉ@ʋp܎ȐꖼB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $412,"ǗʓIC"
	mov $413,"g⋍ݜޏw@I~_C"
	mov $414,"vLY㈎ȐꖼB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $415,"ȁC֐ߍȌh王IC"
	mov $416,"pB"
	mov $423,"sBwFIVB"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	mov %120,415: mov %121,420:mov %122,24:gosub *messagefont
	mov %120,423: mov %121,423:mov %122,24:gosub *messagefont
	$415
	$416@/
	$423/
	add $416,$423/
	\


	mov $401,"ґRuCōጐlLNSC"
	mov $402,"ACNSC˕s꜒ۑSJB"
	mov %130,401
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $403,"@ccޏAdИVIwxB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"ǜޏw@ؓIlB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"@@"
	mov $406,"uӍݐ편痹B"
	mov $407,"ŗ֐s槓w͛ccv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"@@"
	mov $409,"[hΓIC[[ቺB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $410,"@@"
	mov $411,"u@返\CߏADBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $412,"urCFJBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $413,"uÓ还񓹎Cv"
	mov $414,"苖JB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $415,"ޏAFCI䈎zqw@IeBv"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\

	textoff

	bg black,12
	delay 3000

;aflFfree0552.mp3@iv[v
	bgm "bgm\free0552.mp3"
;wiFvGXeXw@EL@ʏtF[h
	bg "bg\dai3kou\prestes_rouka.jpg",12
	delay 3000

	texton

	mov $401,"Dz㗹C㱋x㱁B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"LxwC"
	mov $403,"[xqwZLIB䲟B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"\FIs厧sCppdunmOB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"⁗I敐\C"
	mov $406,"vLpsIg됺rB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $407,"^FCIwFSsC"
	mov $408,"enFDu迍DvB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"֗Lwp[x͓IܓFu@ʐ搶C迍DIvC"
	mov $410,"󋱋hhnfZC"
	mov $411,"Aᚘ玩RZFVB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $412,"@@"
	mov $413,"cSvLCdsRVrB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $414,"bŘCnAݘޗIFB"
	mov $415,"s|ICۓIapB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $416,"b\F嘢ls]ȐϓIC"
	mov $417,"rCcc"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $418,"ϓIECAݘޗB"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"uܐJB"
	mov $402,"ݜޏw@CFdꋳCiIsCa丁B"
	mov $403,"v"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"uCnLwqRC"
	mov $405,"A㱐ځC\F暊݁B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"ݜޘBNSl暎ii^qdIB"
	mov $407,"B\FEݐӛΒ@uJB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"݁CYrː^wL瀓I@x藁Hv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"@@"
	mov $410,"uL瀓I@ccEHv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $411,"@@"
	mov $412,"ulӐkeՖI藁B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $413,"@ʖvLSSSZ߁C"
	mov $414,"l䐥IOsB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $415,"ρAKlρAvϘB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $416,"s|s\FޏHCwwxB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $417,"C\F@\筒nȓIHC"
	mov $418,"FvΏ\FSŒn䱗ClIjSB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $419,"ޏAFI要Bv"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"YlB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"CCސߐlIgB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $403,"甐IwqF曑꘢IЉB"
	mov $404,"ޏAadИVI要C"
	mov $405,"琥FRhIVB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"@@"
	mov $407,"u^sNI藁B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"R\ޔЊIxccv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"@@"
	mov $410,"u֎Zs㊮GB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $411,"ccCߊŁC񔈊ŊJBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $412,"@@"
	mov $413,"\r܁C唈C"
	mov $414,"FEIxaLIprC"
	mov $415,"L{wToB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $416,"\Fœ񔈁CzssC"
	mov $417,"QQ茒nc񋎁B"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"uޘw@COʗINSj"
	mov $402,"{kFIB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $403,"ȑ迓s[xD藁Bv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"@@"
	mov $405,"ucc揁Bv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"@@"
	mov $407,"usDCґVB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"IԁCʓINIBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"hꎟAꎟV@C"
	mov $410,"ĚOqAh\IeCލːōDIB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $411,"AZsCoԁCv\CoԏADB"
	mov $412,"gsCoԁCv\CoԖDvBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $413,"@C甏LlsCoԁC"
	mov $414,"sBFݓIԁC"
	mov $415,"ߏAccISnBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $416,"@@"
	mov $417,"ucccv"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"w蚁A孍AЉB"
	mov $402,"㱓IؓsݑwqB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $403,"@@"
	mov $404,"wCoJCCoJB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"CoԍːIB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"IlsCԁB"
	mov $407,"悁C߉C꘢GIЉlB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"CoJx"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"@@"
	mov $410,"ޏAݓIwZB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $411,"CޏvRB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $412,"ݓI͈ۗ\a\́C"
	mov $413,"glFpϓIӐEC"
	mov $414,"r甐l󓞔ƍ՗IB"
	mov $415,"@"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\

	textoff

;wiFuϊwZȂ񂩗ĂAʔ˂ȁv@Qb\Ĕwiɖ߂@tF[hȂ
	bg "cutin\dai3kou\cutin_19.jpg",1

	delay 2000

	bg "bg\dai3kou\prestes_rouka.jpg",1

	texton

	mov $401,"TC\琥ϓIJB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"vLCA[mޘЉB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $403,"c\ݓB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"CszޘЉB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"Cٖ@ZޘЉB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"@@"
	mov $407,"ucŋNkCS藁cv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"@@"
	mov $409,"uHv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $410,"@@"
	mov $411,"uvŊŊwFIcAB"
	mov $412,"FIc[xʁC󒅑ҍ݊wZIBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $413,"@@"
	mov $414,"ucccv"
	mov $415,"@"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"u@ʐ搶C䐥ϑzIB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"@௘aE㗍rxC"
	mov $403,"sӖLwqs\KB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"\ߍwqLoIC"
	mov $405,"sFލVEc꒼ruBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"wZLFCLVC"
	mov $407,"L@RIC֗LSB"
	mov $408,"wZsCw蚁B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"ܓC@ʊwZs\|擐lC"
	mov $410,"ߋI|藁H"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $411,"ƒAPIC"
	mov $412,"VAcc"
	mov $423,"ccccv"
	mov %120,411: mov %121,412:mov %122,24:gosub *messagefont
	mov %120,423: mov %121,423:mov %122,24:gosub *messagefont
	$411
	$412@/
	$423/
	add $412,$423/
	@

	mov $413,"@@"
	mov $414,"v\cܓō@B"
	mov %130,413
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $415,"đ܉ccs藁H"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $416,"wqFCsVILB"
	mov $417,"ґR䖾ވ_cc"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"u\迓ISB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"QBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $403,"@@"
	mov $404,"u@ʐ搶cc迖EHv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"@@"
	mov $406,"uccICϐ^IDEH"
	mov $407,"^IݘIEHv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"gwFIΗeC"
	mov $409,"sE㱑zB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $410,"KlϓIC"
	mov $411,"gLIÌiC\CϘC"
	mov $412,"AȐې^wρxpsmB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $413,"C琥lC餐_֍kB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $414,"fBClswَ䑶ݕI"
	mov $415,"ِsWވāBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $416,"@@"
	mov $417,"ucccv"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"usCLꌏIB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"@ʁcc^IwCAMᚊC"
	mov $403,"S͈ȕጁB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"s\wB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"sǐ嘰桖DCCnC"
	mov $406,"sKlCwtoB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $407,"gVsCȓIsCC"
	mov $408,"甊wFOsC掩Ȗv筒nsOB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"ލːLIp߁C[Ms^Bv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	bgmfadeout 1
	bgmstop
;ʉFwZ̃`Ci[vȂj
	dwave 2,"wave\chaim.wav"
	wait 3000

	mov $410,"@@"
	mov $411,"A݉@ʐ搶ԉ痎IC"
	mov $412,"CIkNB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $413,"L߈ÉCӕ˗ዳC"
	mov $414,"wFEDCҒCICnB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $415,"丒[I他zqw@B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $416,"ґRuRpCAލߐlȓIwSЁxIiہC"
	mov $417,"p[[n󓞗B"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"J蚔拳CeC"
	mov $402,"ܒvꍱsm@DIvC"
	mov $403,"@ʐ搶p筒Iӎug玖Cވ_ߐlP΁B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"琥lB"
	mov $423,"Ȑې{ٖ@mB"
	mov %120,404: mov %121,404:mov %122,24:gosub *messagefont
	mov %120,423: mov %121,423:mov %122,24:gosub *messagefont
	$404@/
	$423/
	add $404,$423/
	\

	mov $405,"RCHlB"
	mov %130,405
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"Fs\CQֈጔCُCB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $407,"@@"
	mov $408,"{BccwqInLƒawZB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"@ʉƒsCߏA\RFSB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $410,"wZDCDCm营CޘړIݓIB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $411,"CޘCFˍݜޗB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $412,"ghCُCB"
	mov $413,"F笕s\CwYrssIlxB"
	mov $414,"@"
	mov $415,"@"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"urCŋNCvCncc"
	mov $402,"迗v勎ŊŘEHv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $403,"@@"
	mov $404,"uDICÈӁIv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"@@"
	mov $406,"Fnp[x͗ʓIg񓚗B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $407,"zXnޏw@IʖʁC"
	mov $408,"R@Չ񋎗ZȓI璆B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"ϓICIS[rOoB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $410,"@@"
	mov $411,"uґV^꘢ٓӖ퍤GIV藁B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $412,"^]ߔ\FwZH藁Bv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $413,"@@"
	mov $414,"ucc漁ccv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $415,"@@"
	mov $416,"٘ދ^^I{p苁C֏ΗΕ~勎B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $417,"֓ߐ^IC笓IB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $418,"ݓIC֗Lߍv񋎋ܓIwFB"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\

	textoff

	bg black,12
	delay 2000
;wiFǔAwIĎ͋AHɂBv@ʏtF[h
	bg "cutin\dai3kou\cutin_20.jpg",12
	delay 2000
;wiFuw@ɑ؍݂Ԃ́AA
;ł̌óA̋tlɑ傫e邱ƂɂȂBv@ʏtF[h
	bg "cutin\dai3kou\cutin_21.jpg",12
	delay 4000
	bg black,12

;

;ʁFSd}iʏj
	mov %42,2
	gosub *sindenzu

;

	wait 2000

;BGMFfree0539.mp3@iv[v
	bgm "bgm\free0539.mp3"
;wiFE@Vb^[tF[h
	bg "bg\dai3kou\homare_syokuin.jpg",26
	delay 2000

	texton

	mov $401,"uYre@ʕszwZIԁC"
	mov $402,"s|ȁfC✒`I"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $403,"ߓRSB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"ٓߍCs[wZcgݖ[㱗Iw܁C"
	mov $405,"\rYrV藁H"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"U𗹈ꎟCFAwB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $407,"FЉ@Cs蓓IAɋIC"
	mov $408,"A\竁B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"NƐlbH܋JI"
	mov $410,"VAጓޔВxˍsB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $411,"s܍FB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $412,"N@CߘlrB"
	mov $413,"甑FolIsCӒnB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $414,"蕜ޔЎssC"
	mov $415,"ߋR֔\VC`Iv"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"玎CAߓnIgoB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"鈑吺{cc"
	mov $403,"ߓe@Cs֋hꝚB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"ޕs{O@ʐ搶ߓIԘEC"
	mov $405,"{vLYrsIJH"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"@ccwxޘ̌Đ^_؛B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $407,"@@"
	mov $408,"uߘ䐥ґB"
	mov $409,"o񗈁Bv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $410,"@@"
	mov $411,"uhꗹBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $412,"@@"
	mov $413,"ZʓIWkB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $414,"ܓCގodv旈IBB"
	mov $415,"dܕ\ڐhꗹCZs悍فB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $416,"D݁Cy_ymCJtC"
	mov $417,"ᔈ]N勎B"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\

	textoff

;wiFEiuj@tF[hȂ
	bg "bg\dai3kou\homare_syokuin_bure.jpg",1
;G\Fd@΁@ʒuF
	ld c,":a;tatie\yaezono\bisyou.bmp",12
	delay 1000

	texton

	mov $401,"uuGC񗈗CґVBvv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"@@"
	mov $403,"dИVŗāB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"[ՈC{WݑgI玎IڌC"
	mov $405,"ꉺqB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"@@"
	mov $407,"uu⿁Cymʍ`[C֒IvB藁Hvv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"@@"
	mov $409,"SߍڌB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $410,"@@"
	mov $411,"uuccRLhyBvv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $412,"@@"
	mov $413,"uusI͖ҙZIJHv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $414,"u򓜖I֕|\ڎBvv"
	mov $415,"@"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"uuʓIʍ`[Bv"
	mov $402,"uVICՍ󗱓IߔЁBvv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $403,"@@"
	mov $404,"uDMIލˑI@vB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"FFzxChJIv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"@@"
	mov $407,"uCAIv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont

	QUAKE 20,200

	gosub *textwright
	@

	mov $408,"@@"
	mov $409,"푼|sf勎B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $410,"ʐS~n^勩V@C"
	mov $411,"\Mʍ`[AIdИVC"
	mov $412,"玎IlڗnڑB"
	mov $413,"@"
	mov $414,"@"
	mov $415,"@"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\

	textoff

	bg black,12
	delay 3000

;wiFЉȏ@Vb^[tF[h
	bg "bg\dai3kou\homare_syakaika.jpg",26
	delay 1000
;wiFЉȏiuj@tF[hȂ
	bg "bg\dai3kou\homare_syakaika_bure.jpg",1
	delay 1000
;G\Fd@ʏ@ʒuF
	ld c,":a;tatie\yaezono\tuujyou.bmp",12
	delay 2000

	texton

	mov $401,"uccrρCu@Hv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"@@"
	mov $403,"dИVTOO|IYrC"
	mov $404,"t|u쒃CWoЊI꜒"
	mov $405,"ՒЊI꜒CdИVB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"@@"
	mov $407,"uAVB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"迁C^LӖIV藁Bv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"@@"
	mov $410,"uGCώqߐ㋡JHv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $411,"@@"
	mov $412,"uC푼ًߓxI[[ܕB"
	mov $413,"S푼ZB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $414,"sC܁ccL_Nʗccv"
	mov $415,"@"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\

	textoff

;G\Fd@΁@ʒuF
	ld c,":a;tatie\yaezono\bisyou.bmp",12
	texton

	mov $401,"uCh\Bv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"@@"
	mov $403,"udϛIv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"@@"
	mov $405,"uʍ`[֐ՍIōDhꉔv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"@@"
	mov $407,"pMdlh`[C"
	mov $408,"zKdDJB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"ccsCޏAؓIώqC"
	mov $410,"ASSSȗCt勎B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $411,"@@"
	mov $412,"uvCŋNZw_@CޏADB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $413,"H拍Iw蚉CAdI|CV@֐tYrC"
	mov $414,"ֈNXȏj藁B^rBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $415,"@@"
	mov $416,"uw蚉B@RXIHv"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"zgCAޔЊuB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"ޔВnC֐꘢lɋADvB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $403,"CwqFIϓIVC"
	mov $404,"މsw蚉[֔\InJB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"@@"
	mov $406,"uFoޔЎC"
	mov $407,"ى䗈ܓ|LIBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"@@"
	mov $409,"CTVm莔ʒnΗNB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $410,"ÒI啔wy߁xC"
	mov $411,"swZAHA玉gIs˔VB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $412,"@ʕszSZcIԁC"
	mov $413,"CnAsIoj΍ːcc"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $414,"sǔ@CCލy߁C"
	mov $415,"F˔\ۗLIBӍ甐lG΁B"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\

	textoff

;G\Fd@{@ʒuF
	ld c,":a;tatie\yaezono\keno.bmp",12

	texton

	mov $401,"usCV䐥^IۗB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"ߍ}ߕsݓIC"
	mov $403,"\䱛lCB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"FxpIlC៊C玎CA꘢lǗB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"R@CAܗCuߛwqґVza@IB"
	mov $406,"V䐥IjQ_BBv"
	mov $407,"BʑFR܁CuvNƐlbraHv"
	mov $408,"^ܗ딼IԁB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"wˈClvDEHv"
	mov $410,"@"
	mov $411,"@"
	mov $412,"@"
	mov $413,"@"
	mov $414,"@"
	mov $415,"@"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"ґRvC"
	mov $402,"AdИV笕s\CsǓIB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $403,"^ݏA゗e\\IHC"
	mov $404,"ghC甑F|擏oْ៓I|B"
	mov $405,"ލːٛwq^LvI@B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"٘ޓ_C[\\B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $407,"{@C}lbV̘a@IcF"
	mov $408,"aȎȓIMOC߉sRHB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"@@"
	mov $410,"uVvېYrJHەi\ccv"
	mov $411,"@"
	mov $412,"@"
	mov $413,"@"
	mov $414,"@"
	mov $415,"@"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\

	textoff

;G\Fd@ʏ@ʒuF
	ld c,":a;tatie\yaezono\tuujyou.bmp",12

	texton

	mov $401,"uvB"
	mov $402,"ψꗈCECߎÝٌ㞐ȗܓVBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $403,"@@"
	mov $404,"ucccv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"@@"
	mov $406,"udDSB"
	mov $407,"CrތC"
	mov $408,"ߕsQEHv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"@@"
	mov $410,"uccv"
	mov $411,"@"
	mov $412,"@"
	mov $413,"@"
	mov $414,"@"
	mov $415,"@"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"CYrݜޔД֔ho藁B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"ox|qIC"
	mov $403,"񗈓IpIāB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"@ʉՒَЉICҐ"
	mov $405,"uKl_YrvIŞC"
	mov $406,"ڙtەiIԁcc"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $407,"߉\X[JB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"rzC@ʐ搶ߗwIB@C"
	mov $409,"ݓI䏊vIwS߁xB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $410,"@@"
	mov $411,"uJIVCnCេIv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $412,"@@"
	mov $413,"vL䩁B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $414,"YrCzvYrC"
	mov $415,"OIHEFB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $416,"ډCvCwFwc"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@
	mov $417,"@@"
	mov $418,"R@^FꓯOsAȗB"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\

	textoff

	bg black,12
	bgmfadeout 2000
	bgmstop
	delay 3000
	bg white,12
	delay 2000
;ʉFXY̖@[vȂ
	dwave 2,"wave\suzume.wav"
;wiFu@ʏtF[h
	bg "bg\dai3kou\monooki.jpg",12
	delay 2000

	texton

	mov $401,"ґR\ZݕΕƓInC"
	mov $402,"Aߗ^IA㱔jIWB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $403,"ϓInC꘢wqRƎc"
	mov $404,"zޗCAٔÎB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"|CoȍݖௌxIcNB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"aIρcsC\ݍX[IFC"
	mov $407,"\픗JB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"@@"
	mov $409,"uDIv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $410,"@@"
	mov $411,"c吺_CO^ꐺB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $412,"cvLB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $413,"@@"
	mov $414,"uDI䐥ߑFIǎCґB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $415,"ەiIەi䱉Iv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $416,"@@"
	mov $417,"ʑR֐vLB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $418,"rI㱏AojI\sC"
	mov $419,"\֍ݐuC҈Cx鐎smocc"
	mov $420,"@@CŋN\vLŎZIʁB"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\

;aflFfree0522.mp3@iv[v
	bgm "bgm\free0522.mp3"

	mov $401,"䘸\oꕕMB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"ʑŋhǏIoC"
	mov $403,"֗LꕕhەiwIMB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"@@"
	mov $405,"@vەi䱓w@"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"@@"
	mov $407,"ƓwEqB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"ŋNklECnVIFC𓞗XFB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"琥VCNꎟSCǎCC"
	mov $410,"s暒nCnꍱuB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $411,"ݔǗ݌s@I"
	mov $412,"\藁B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $413,"ŋN^Ük\IەiwC"
	mov $414,"^Ik]返\QC迌u@藁H"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $415,"原Iǉst迓IC"
	mov $416,"CŒГI֎qaCiC"
	mov $417,"zەiwݍݘ􍱏YrB"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"gICvLB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"wF܁CCʊ㞐ȓI迓ˑRwC"
	mov $403,"ȍˊ흚zB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"苑MCFsՒmӍ݊迁B"
	mov $405,"]返\ވ_B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"ǓIwFCVsʓIq"
	mov $407,"犴⛋B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"@@"
	mov $409,"s܊wZ_ssD߁C"
	mov $410,"ӛ@B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $411,"swZsD߁C֖vLB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $412,"ەiwCvsvaFN甊wZLN藁H"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $413,"@ʗLYrs[ICҊ]dlrIC"
	mov $414,"苐捐GB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $415,"@@"
	mov $416,"Vs߁B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $417,"FNwZJB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $418,"R@NcwZLInJB"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"kAv}}|IGEB"
	mov $402,"苒Ӑgd`B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $403,"@@"
	mov $404,"@@@@@@@@@@@@@@@NǔǎC@ґَiY"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"@@"
	mov $406,"׊M@dVMC"
	mov $407,"cݕiIʒuB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"BsFCr흙{b{C"
	mov $409,"Av\CsǑICszB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $410,"v__n݁C"
	mov $411,"LV՗BʓIB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $412,"Mވ_C䏫ȓISӑthMB"
	mov $413,"@"
	mov $414,"@"
	mov $415,"@"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\

	textoff

	bg black,12
	delay 2000

	texton

	mov $401,"ߓVCnCVqC"
	mov $402,"aTusەiZIiB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $403,"㋎\C⋍݊Oʜ^\B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"u򏫓VۓIޗA"
	mov $405,"vICem㈁A"
	mov $406,"֗LꕕhەiIMMB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $407,"MVAsFCȁC"
	mov $408,"vL튮SIő[vB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"@@"
	mov $410,"AρCauB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $411,"@JVAVAg֐"
	mov $412,"꒼ԘەiߗB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $413,"\`ەiVƓI剮Cߐ皏ZIn"
	mov $414,"R\Ip糒\B"
	mov $415,"\ᔈ܁uh迓YWvC"
	mov $416,"pٖ@ʓIB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $417,"WOCLœhI֗X֓"
	mov $418,"x꘢幑ܕݓߗB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $419,"ŗCsuC蕋h趓sCB"
	mov $420,"咅Su餓IB"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"IvccC֏C֍DB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"AC汎@CnIǓƁC"
	mov $403,"l^I\󓾏ZEH"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"꘢PQӓIwcc\󓾏ZEH"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"@@"
	mov $406,"@ʕszwZCAȕsEH"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $407,"CYrߏ΁B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"@ʊwZs\m~rޔFIwqC"
	mov $409,"ߓ鈔\Lo藁H"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $410,"\oIB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $411,"R@Cv甓ߘwqIoCFρC[xKIΗeB"
	mov $412,"\\ڗLߔЏΗeB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $413,"@@"
	mov $414,"فw^xIۓ{CȋyCI筎B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $415,"֗LC@ʐ搶ߗIwSxC"
	mov $416,"ÒOB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $417,"IcIcSZIc"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $418,"@@"
	mov $419,"㏒ϓIÖ]C筎qC}B"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\

	textoff

	bgmfadeout 1
	bgmstop

;ʉFKKK
	dwave 2,"wave\dooropen07s.wav"
;wiFu@E獶֑ftF[h
	bg "bg\dai3kou\monooki.jpg",86
;ʉFoA[
	dwave 2,"wave\don14.wav"
	QUAKE 20,500

;wiFuiuj@tF[hȂ
	bg "bg\dai3kou\monooki_bure.jpg",0
;G\F@{E@ʒuF@tF[hȂ
	ld c,":a;tatie\miki\sihuku_ikari.bmp",1
	delay 2000

	texton

	mov $401,"@@"
	mov $402,"u低IIv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,48:gosub *messagefont
	gosub *textwright
	@

	mov $403,"@@"
	mov $404,"@ϑ吺^\IC"
	mov $405,"ˑRCjCCەitoB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"\o般Ccxۓ{B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $407,"@@"
	mov $408,"ucccv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"@@"
	mov $410,"ucccv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $411,"@@"
	mov $412,"uccc"
	mov $423,"rCsŎZÎEHv"
	mov %120,411: mov %121,412:mov %122,24:gosub *messagefont
	mov %120,423: mov %121,423:mov %122,24:gosub *messagefont
	br
	$412@/
	$423/
	add $412,$423/
	@

	mov $413,"@@"
	mov $414,"uߜމƌccݏΏYrccv"
	mov %130,413
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $415,"@@"
	mov $416,"uDvvFߗCk悛B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $417,"DCەiBv"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"u訚{I呁ICVVccI"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"甕s甐lDDuIv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $403,"@@"
	mov $404,"uruˋNIԁCzswZIB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"DCJBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"@@"
	mov $407,"usIMʓIߍDߒԁC"
	mov $408,"zKHvjXIv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"@@"
	mov $410,"ەifCzv񓞏B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $411,"ْ\IweCpÒAIܓB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $412,"@@"
	mov $413,"u@CŎZ竘EHv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $414,"@@"
	mov $415,"uccYrHv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $416,"@@"
	mov $417,"u䖾BߜϓIwCsǗB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $418,"ߏAqݓ㱏C"
	mov $419,"h֗XI֓qJBv"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\

	mov $401,"uYccߜމƌIIv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"@@"
	mov $403,"ەi嗹ˁCg۝TB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"|sC]puIgh\B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"@@"
	mov $406,"u⻟AdaAAЁcc"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $407,"֔@C֎CȖvցC"
	mov $408,"YrssCꖡnޘEB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"@ߑzډIZ\NsϊIԁC"
	mov $410,"sj~߁C苐JBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $411,"@@"
	mov $412,"ucccv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $413,"@@"
	mov $414,"uFCەiB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $415,"@ʗLYrzܓICAwZJBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $416,"@@"
	mov $417,"䔫gCOCB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $418,"\Lԗv܁C"
	mov $419,"ASCvL񔈁B"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\

	textoff

	bg black,12
	delay 2000

;wiFЉȏ@ʏtF[h
	bg "bg\dai3kou\homare_syakaika.jpg",12
	delay 2000

	texton

	mov $401,"u^IccϘADEHv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"@@"
	mov $403,"ꓞwTcxCAҍݗiqB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"獐˛wqC^ꌏߐls[IB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"獐˗wqCFA󈻁B"
	mov $406,"Cވ_Cl󈻁B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $407,"ŋߏܑls獐˛wqCAߑTCC"
	mov $408,"F{\nQȉJB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"QBszρB"
	mov $410,"@"
	mov $411,"@"
	mov $412,"@"
	mov $413,"@"
	mov $414,"@"
	mov $415,"@"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\

	textoff

;wiFЉȏiuj@tF[hȂ
	bg "bg\dai3kou\homare_syakaika_bure.jpg",1
	delay 1000
;G\Fd@ʏ@ʒuF
	ld c,":a;tatie\yaezono\tuujyou.bmp",12
	delay 1000

	texton

	mov $401,"uvIkCߛEkDB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"ډA䱗wZAsBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $403,"@@"
	mov $404,"u揁cc\^IEHv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"@@"
	mov $406,"uwqsÏwޔЎC"
	mov $407,"ϏƖ{ȐىrsIB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"M^ߘwYrϓIwq"
	mov $409,"CYr˕sÈӗwZB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $410,"Őލːg攁Bv"
	mov $411,"@"
	mov $412,"@"
	mov $413,"@"
	mov $414,"@"
	mov $415,"@"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"ەiC@@sZ]lIB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"C@C˗pCwⷁxz庁B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $403,"Mh\DIہC"
	mov $404,"ULI__ْԓIC"
	mov $405,"Av̈ӉQВnC\B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"AChQ玝]ݐH@C"
	mov $407,"̈甛ꘁC甛Аlρcc"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"^cc翓IiB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"@@"
	mov $410,"uuCL_甐l藁cc"
	mov $411,"TwqISNCpޔЕC^ccv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $412,"@@"
	mov $413,"usCߖsvLuAVJH"
	mov $414,"FIHCA甛wqCGIlB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $415,"C萓ޘ߁Cs\Oln\iB"
	mov $416,"ܗCvō@wF\K"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $417,"gށCvō@wF\KC"
	mov $418,"ⵖlZIJB"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"dИVIgCOLI_B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"TCȖ犴BmJB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $403,"ꖼ^×B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"C⁎^Css^ٍRC"
	mov $405,"CwCLrssGƖ@B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"@@"
	mov $407,"uvCډA\MBʗCJB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"V䋎tJBR@CV䗈߁B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"@ʁC䱔\ȑwZIԁcc"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $410,"NCAwCnxBv"
	mov $411,"@"
	mov $412,"@"
	mov $413,"@"
	mov $414,"@"
	mov $415,"@"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\

	textoff

	bg black,12
	delay 2000
;wiFu\\v@ʏtF[h
	bg "cutin\dai3kou\cutin_17.jpg",12
	delay 2000

;ʉFwZ̃`C
	dwave 2,"wave\chaim.wav"
;wiFwZ̘L@fVb^[tF[h
	bg "bg\dai3kou\homare_rouka.jpg",25
	delay 2000

	texton

	mov $401,"ZÓISCB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"ꎟޏwZIC"
	mov $403,"i֕smސZʑFIⴁjCǎCIC"
	mov $404,"ґRs甉x茁CAVIˑRÉ悍VB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"@IρCVߘaVC"
	mov $406,"vLەiƁB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $407,"ߛwqsȑ嗈藁H"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"ґRdИVC"
	mov $409,"p\n񗹈usmvB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $410,"T甉p\JB"
	mov $411,"@"
	mov $412,"@"
	mov $413,"@"
	mov $414,"@"
	mov $415,"@"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"ʒPNPǓIjOB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"cckÁB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $403,"zNC߈Vcc佉˓I߈VC"
	mov $404,"琥ЎB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"@@"
	mov $406,"uvIC䱕sŉ˓IB"
	mov $407,"C\LXdvI߁Bv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"ґRىܓIcc"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"AC@ʜސj@"
	mov $410,"aϖXÓIԁC"
	mov $411,"raˍD藁H"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $412,"藁C֐cc"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $413,"@@"
	mov $414,"ccccccB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $415,"@@"
	mov $416,"揁CsǗCݜޗRBvpB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $417,"rSJCґVI"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\

	textoff

;ʉFKKK
	dwave 2,"wave\dooropen07.wav"
;wiF@E獶փtF[h
	bg "bg\dai3kou\homare_kyousitu.jpg",87
	delay 2000

	texton

	mov $401,"ccccccc"
	mov $423,"vLœەi䱓IgeB"
	mov %120,401: mov %121,401:mov %122,24:gosub *messagefont
	mov %120,423: mov %121,423:mov %122,24:gosub *messagefont
	$401@/
	$423/
	add $401,$423/
	@

	mov $402,"ʏC灈ʋpLB"
	mov %130,402
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $403,"\VEcc֐@V藁C"
	mov $404,"Ecc"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"ܓC\\sߔЉ풧̌{IwqB"
	mov $406,"B{sϓIiB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $407,"@@"
	mov $408,"@@CݕKlcSv񓞖ʑOIwgB"
	mov $409,"zxKSߍˍsB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $410,"َȜr܁C㝝CfZB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $411,"@@"
	mov $412,"uuDBvv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $413,"@@"
	mov $414,"wwDIxx"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $415,"@@"
	mov $416,"wqFp[x͓I闹B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $417,"ލ[xIwFC\甉䊴󓞊]B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $418,"@@"
	mov $419,"uurCCn_Bvv"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\

	windoweffect 1
	textoff
	windoweffect 10,500
	bg black,1

;ʉFKKK
	dwave 2,"wave\dooropen07s.wav"
;wiF@E獶֑ftF[h
	bg "bg\dai3kou\homare_kyousitu.jpg",86
;ʉFoA[
	dwave 2,"wave\don14.wav"
	QUAKE 20,500
	delay 1000
;wiFiuj@tF[hȂ
	bg "bg\dai3kou\homare_kyousitu_bure.jpg",1
	delay 1000
;G\F@E^ʖځ@ʒuF@tF[h
	ld c,":a;tatie\miki\majime.bmp",15
	delay 1000

	texton

	mov $401,"Iu㱋ÌŗB"
	mov $423,"cc琥ىIB"
	mov %120,401: mov %121,401:mov %122,24:gosub *messagefont
	mov %120,423: mov %121,423:mov %122,24:gosub *messagefont
	$401@/
	$423/
	add $401,$423/
	@

	mov $402,"\͎@C꒼\IʓIw"
	mov $403,"ˑRbܙܒnB"
	mov %130,402
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"@@"
	mov $405,"uⲁccEv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"@@"
	mov $407,"uvLGCDzBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"@@"
	mov $409,"٘㗈A⯐IەiCՒΗe񓚓B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $410,"\@C"
	mov $411,"FCԝQYrB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $412,"R@C\ȓIʑB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $413,"@@"
	mov $414,"bŘTrQʓIQCB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $415,"\cIwkݍiqC"
	mov $416,"ffnӝfC֎q"
	mov $417,"kInÍCLlsnVŁC"
	mov $418,"LlzNœIE厧CB"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"ݐx茘asIC"
	mov $402,"dVÒnܓFuCn_Bv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $403,"@@"
	mov $404,"uؓwBv"
	mov $405,"uccIv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"@@"
	mov $407,"uΐ쓯wBv"
	mov $408,"uccBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"@@"
	mov $410,"uC쓯wBv"
	mov $411,"uBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $412,"@@"
	mov $413,"w݁CD꘢B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $414,"wFƌ܏\[rIʁC꘢ڈ꘢n񓚓_B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $415,"@@"
	mov $416,"uuwBv"
	mov $417,"uBv"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"uەiwBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"uccc"
	mov $423,"Bv"
	mov %120,402: mov %121,402:mov %122,24:gosub *messagefont
	mov %120,423: mov %121,423:mov %122,24:gosub *messagefont
	$402@/
	$423/
	add $402,$423/
	@

	mov $403,"@@"
	mov $404,"\Ig[xsxCfoρC"
	mov $405,"A\֐񓚗_B"
	mov %130,403
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"݈NǓIoȕC"
	mov $407,"wȗꎟʉu㞐ȁvB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"@@"
	mov $409,"ItwCS玓塗B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $410,"@@"
	mov $411,"fccS玓塗B"
	mov $412,"@"
	mov $413,"@"
	mov $414,"@"
	mov $415,"@"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\

	textoff

;ʉFwZ̃`C@[vȂ
	dwave 2,"wave\chaim.wav"
	bg black,12
	delay 3000

;ʉFwZ̃KK@[vȂ
	dwave 3,"wave\ambient.wav"

;wiFwZ̘L@fVb^[tF[h
	bg "bg\dai3kou\homare_rouka.jpg",25
	delay 2000

;wiFwZ̘Liuj@tF[hȂ
	bg "bg\dai3kou\homare_rouka_bure.jpg",1
	delay 1000
;G\F@Es@ʒuF@ʏtF[h
	ld c,":a;tatie\miki\human.bmp",12
	delay 1000
	texton

	mov $401,"u݁CLVIv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"@@"
	mov $403,"ꓞߋxCA\ZB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"\e\hIC"
	mov $405,"甑LIwFZċzCzŊœېYrB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"@@"
	mov $407,"uƓIʁC܏YruLVv瑾啪Jccv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"@@"
	mov $409,"udԁC嗈Bv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $410,"@@"
	mov $411,"u揁ccv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $412,"@@"
	mov $413,"uLԗvܓIԁCAwZJBv"
	mov $414,"ދԁCܓIB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $415,"VCWOCn܏oދԁC"
	mov $416,"m[[Q\B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $417,"BDꍱ䕍ߓISy݁C"
	mov $418,"Aى䗈܁Cޖ琥ꎟÓIْԊB"
	mov $419,"s\an效敍ːōDI\B"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\

	textoff

	bg white,12
	delay 2000

;ʉF̖iBirdA@11.wavj@[vȂ
	dwave 2,"wave\BirdA11.wav"
;wiF؁i㔼j@tF[h
;wiF؁i艺ֈړj

	lsp 1,"bg\dai3kou\homare_tachiki.jpg",0,0
	print 16
	delay 1000
	for %199=0 to 199
		gettimer %90
		msp 1,0,-3,0
		print 1
		waittimer (%90+24)
	next

	csp 1

	delay 2000

;wiF؁iuj@tF[hȂ
	bg "bg\dai3kou\homare_tachiki_bure.jpg",1
	delay 1000
;G\F@Es@ʒuF@ʏtF[h
	ld c,":a;tatie\miki\human.bmp",12
	delay 1000
	texton

	mov $401,"FZq@В䱓InB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"܌I}gXlCiՒēVIB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $403,"@@"
	mov $404,"u悘EHv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"@@"
	mov $406,"≺rsCەiAˑR`orԁB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $407,"@@"
	mov $408,"uߜkJCC䗈wZBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"@@"
	mov $410,"uccC悓IBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $411,"@@"
	mov $412,"ґRL_smr񓚁CA֐Β__B"
	mov $413,"@"
	mov $414,"@"
	mov $415,"@"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\

	windoweffect 1
	textoff
	windoweffect 10,500

;G\F@E{@ʒuF@tF[hȂ
	ld c,":a;tatie\miki\ikari.bmp",1
;ʉFKbi͂ށj
	dwave 2,"wave\bosu32s.wav"
	QUAKE 20,200

	texton

	mov $401,"udӖY`Iv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"@@"
	mov $403,"zva敒ԓIÖ]u㱔j邗B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"IGՔ\ȝlIxSZC"
	mov $405,"gq椁CqlV㱓\ЕēIgu㱔햕B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"@@"
	mov $407,"uCnCޏAߓIdJB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"cKwZC甉䎊\ʏ㗈ꎟC"
	mov $409,"ߜޘǎCIʎqA\ۏZCJHv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $410,"@@"
	mov $411,"ߓ\󓞌ċzI餁CI⁗B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $412,"ۑRIoC"
	mov $413,"U@ΔʓIB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $414,"DB"
	mov $423,"ClsrzJB"
	mov %120,414: mov %121,414:mov %122,24:gosub *messagefont
	mov %120,423: mov %121,423:mov %122,24:gosub *messagefont
	$414@/
	$423/
	add $414,$423/
	@

	mov $415,"@I{NIԁcc"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	mov %130,415
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"Ap|sB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"y[roBwxIۓ{B"
	mov $403,"ޑoˁCޔЏC^\Eٖ^l"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"َЉLIϓIB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"@@"
	mov $406,"uvցCAρCەiwB"
	mov $407,"@@CszߗwZBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"@@"
	mov $409,"|s؜nC䒼ەiIo勎B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $410,"@@"
	mov $411,"u䐥VCߐwB"
	mov $412,"Vz甊wwZC"
	mov $413,"ޗLYr藁Hv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $414,"@@"
	mov $415,"uCJHv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $416,"@@"
	mov $417,"usC@ʉCCC"
	mov $418,"˕sǑߜϓIVw藁Bv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $419,"uAC䞾ጓINǗLl\lB"
	mov $420,"LccߑF꘢ls|操DBv"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"ucccv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"@@"
	mov $403,"ug嗈IC䏳\B"
	mov $404,"rDݏAݜޗߑň}IuBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"uAccډCߑŎZra藁H"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"Óv񓞓ߘC]ϓxVEHvv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $407,"@@"
	mov $408,"u訚{Iv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	QUAKE 10,100
	@

	mov $409,"@@"
	mov $410,"ەiSZIGՁCpӐxB"
	mov $411,"ug̓IGCǘaǓs㔗bs埃B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $412,"ccACvL≺ܒԁB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $413,"@@"
	mov $414,"um嗈IC"
	mov $415,"֐wZBސCYrHvv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $416,"@ߑz׉CAÎR@lsADB"
	mov $417,"ߋpVVӓӒnݍʏCCސCYrH"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $418,"IC֍݈ӎȐsC"
	mov $419,"ꐥCYr藁Hv"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"uܗ訚{IIv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"@@"
	mov $403,"uߑӐzwZIJH"
	mov $404,"ґR꒼cgWx媁C"
	mov $405,"AS^ppzuωssvB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"wqs݋wZB"
	mov $407,"ߒil܏IwwxC"
	mov $408,"Fs݊esnxB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"ߓIpNii󔒓I㱁B"
	mov $410,"ޒiĖٖ@҉IwC"
	mov $411,"ߋpp菫PB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $412,"ӁCswZߓIRB"
	mov $413,"FwZCٖ@|vߜrB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $414,"AC@ʁccCPCwIbC"
	mov $415,"ܒvߘlqsݍ@cc"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $416,"CꖼCC꘢|擐lIlC"
	mov $417,"zS͔ƜϓIېIv"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\

	textoff

;G\F@E@ʒuF
	ld c,":a;tatie\miki\odoroki.bmp",12
	delay 2000
;G\F@Es@ʒuF
	ld c,":a;tatie\miki\human.bmp",12
	texton

	mov $401,"ucccccc"
	mov $423,"ޘVB"
	mov %120,401: mov %121,401:mov %122,24:gosub *messagefont
	mov %120,423: mov %121,423:mov %122,24:gosub *messagefont
	$401@/
	$423/
	add $401,$423/
	@

	mov $402,"܍DߓIԁBv"
	mov %130,402
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $403,"@@"
	mov $404,"GՏI菼CB"
	mov $405,"䏼ӏZqIGCgٕەiB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"\Icˋx{C"
	mov $407,"A݋pCIڌB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"@@"
	mov $409,"ucccv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $410,"@@"
	mov $411,"ucccv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $412,"@@"
	mov $413,"ەiҕsgBҒC\CB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $414,"wOa⁗IC"
	mov $415,"wFߋxI蓐gB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $416,"\ߍIC˗B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $417,"ZwCȈꖼwIgᚐC"
	mov $418,"֐W㱗CǓƒnꐶC"
	mov $419,"\\CHB"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"u݁ccv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"@@"
	mov $403,"uBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"@@"
	mov $405,"ەipWIgCC򋱌hn񓚁B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"dDCDCFbSB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $407,"@@"
	mov $408,"uccߐ^IHv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"@@"
	mov $410,"u迎wII藁H"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $411,"[܈ꉺC迎TqGB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $412,"@܁ccVC迉ƓIBv"
	mov $413,"@"
	mov $414,"@"
	mov $415,"@"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\

	textoff

;wiFuM̂悤ȐḱAm܂v@tF[hȂ
	bg "cutin\dai3kou\cutin_22.jpg",1
	delay 2000

;ʖ߂
	bg "bg\dai3kou\homare_tachiki_bure.jpg",0
	ld c,":a;tatie\miki\human.bmp",1
	texton

	mov $401,"ucc߉AܗB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"FN甊wZLIߌC^IEHv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $403,"CMʓIߍ甉u瀓MC"
	mov $404,"ȉccr藈wZŊŁBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"@@"
	mov $406,"uRCސ^IBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $407,"@@"
	mov $408,"usKlIJHv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"@@"
	mov $410,"ucczwZB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $411,"ݓIwZ琥IB"
	mov $412,"wIӖCw蚓ISB"
	mov $413,"ߍ{ݓIdv@C浖YB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $414,"zvǋލ@B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $415,"aߑFލwNBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $416,"@@"
	mov $417,"ucccv"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"u甉FNőꏊLIwZJB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"@ʗLYrsxC苐sǒoB"
	mov $403,"苌ovB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"ܓC@ʊwيwZ"
	mov $405,"YrssėLғIԁcc"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"߉FIݏA|وӖBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $407,"@@"
	mov $408,"\⫘kB捒nܓB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"{Cޛs܏oIԁB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $410,"{BCs吥wZIHlnB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $411,"RC@ʝٖ@甊wL"
	mov $412,"ϓIlCÓsZsiIEH"
	mov $413,"@ʐcCߏAX@B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $414,"َȓIԟ|s๘B"
	mov $415,"ޏAIC[Ms^B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $416,"auIA\cc㏒ϓIMOB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $417,"CC营ϓIB"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"uVawZĆC"
	mov $402,"ClNw蚁Cލʁcc"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $403,"zv曑ϓID㱁Bv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"@@"
	mov $405,"udܓrS橓IDߒԗB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"ޔЎCr\[Hv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $407,"@@"
	mov $408,"usv[Cvw͘CەiB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"ӁCIlkCV牡jݖʑOB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $410,"AccszPBzIOsDBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $411,"@@"
	mov $412,"ucccv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $413,"@@"
	mov $414,"ەiĎҗBގ\nŒIˁB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $415,"핃AЉwI\C"
	mov $416,"su\rSՒnMB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $417,"RCC@C٘ЉIޘԎV"
	mov $418,"\营LGÓIB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $419,"gS㏋^Cpٖٝ@SB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $420,"AٔdИVρB"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\

	textoff

;G\F@E΁@ʒuF
	ld c,":a;tatie\miki\bisyou.bmp",12
	texton

	mov $401,"u揁C^va@cc"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"DJBVCnCDDCIBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $403,"@@"
	mov $404,"uccەiccv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"@@"
	mov $406,"uC^IkցC"
	mov $407,"sC|zŊőߜϓIl\􍱏YrBv"
	mov $408,"uC݉ƊvLBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"uwZIz`CDvvhC֕s֚vBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $410,"@@"
	mov $411,"܊ދԁC\嗹gB"
	mov $412,"\ʓIېSSÁB"
	mov $413,"@"
	mov $414,"@"
	mov $415,"@"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\

	textoff

;GF@tF[hAEg
	cl c,12
	bgmfadeout 2000
	bgmstop
;wiF؁ij@tF[hȂ
	bg "bg\dai3kou\homare_tachiki_d.jpg",1

	texton

	mov $401,"uuەiIvv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"@@"
	mov $403,"uuߋxBGBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"uLԑzܓIԁCA⋓JBvv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"@@"
	mov $406,"ucccv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $407,"@@"
	mov $408,"Ғnڑ\ZqIweB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"\z߉⋍ݝܓIԁCA܁cc"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $410,"@@"
	mov $411,"uuccvցBvv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $412,"@@"
	mov $413,"G\ԒIӎvCCsB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $414,"@dИV܁cc"
	mov $415,"wZLVCLwB"
	mov $416,"ލːCnI_B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $417,"@@"
	mov $418,"FI^៓lccAWCB"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\

	textoff

	bg black,12
	delay 2000
;wiFuqAt̐킢͏IȂBv@ʏtF[h
	bg "cutin\dai3kou\cutin_23.jpg",12
	delay 2000
;wiFúci̐ꂾBv@ʏtF[h
	bg "cutin\dai3kou\cutin_24.jpg",12
	delay 2000

	bg black,15
	bgmfadeout 2000
	bgmstop

;

;ʁFSd}iʏj
	mov %42,2
	gosub *sindenzu

;

	wait 2000

;ʉFwZ̃`C
	dwave 2,"wave\chaim.wav"
;wiF@ʏtF[h
	bg "bg\dai3kou\homare_kokuban.jpg",12
	delay 2000

;aflFfree0539.mp3@iv[v
	bgm "bgm\free0539.mp3"

	texton

	mov $401,"Cەi䱓IC\ECN㮓IwqB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"@ʖvLIwalI`C"
	mov $403,"\{퐳IlB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"ґR\{bŁCCߎ\͎C"
	mov $405,"ȜÈӐڋ\Iwscc"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"A݌܌IV@CވؓsB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $407,"@@"
	mov $408,"CqL\QIەiC"
	mov $409,"݋らԁC"
	mov $410,"蕓D{B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $411,"\IE\ቺC[nHWtC"
	mov $412,"暒nCΗea蓌ĐCn\B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $413,"ߍ\EQەiIwFC"
	mov $414,"r蕍FsC\ۏB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $415,"󓾊LI߈ꍏC蓌ĐC"
	mov $416,"\IoxAIΗeB"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"V@CȓғIFCSC"
	mov $402,"aەiwŐГIwFzzB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $403,"{勎C~JGEIC"
	mov $404,"Ǘ{Lls䧗ەiwB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"@ʋs[SIAsIC"
	mov $406,"dܒjCA蕍NtaV\s~B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $407,"C\ޔ|dizIlsݏC"
	mov $408,"暒nC\CnSCǏIGpF"
	mov $409,"Cƌ\IՔlB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $410,"@@"
	mov $411,"^ÁCppduC䐥ϓIllB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $412,"ߘ\E\NǕƓIەi䱁C"
	mov $413,"ݛEБRّB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $414,"e欑zC\݁ccΗeXB"
	mov $415,"@"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"uDCVpʊǉI㱁C"
	mov $402,"ŎZEICBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $403,"uFsǁCvr蚁CvrŔrBv"
	mov $404,"sߑF|ICȘDSyJIv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"@@"
	mov $406,"wVIHx"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont

	QUAKE 20,200

	gosub *textwright
	@

	mov $407,"@@"
	mov $408,"wF塐RBB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"@@"
	mov $410,"uVߑFꐥCYrwIC"
	mov $411,"eʓwHv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $412,"@@"
	mov $413,"uChߎ`˗IIv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $414,"uu琥C琥vu琥Ivv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $415,"@@"
	mov $416,"uߎ`ޟECB@AȋhC"
	mov $417,"ȍ筎SOJIv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $418,"@@"
	mov $419,"䀍Dw@C⋍ݝ㐴⧎qB"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"uDCCnEH"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"VޟECCFvp⦖{swBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $403,"@@"
	mov $404,"uYrC⦖{ꉔFswqIv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"@@"
	mov $406,"us\śGCەiwB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $407,"⦖{AԌ̎֗LØV܁C"
	mov $408,"ލslCwq⁎獎曍IB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"@CݔwiIYfYVlB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $410,"lSIVk\ߘ唠qC"
	mov $411,"BʗʑdB"
	mov $412,"CCsCIuC"
	mov $413,"ȑB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $414,"AC߈ʐSnPǓIsRVaaC"
	mov $415,"pnU⡓ߗxxI󕨁B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $416,"@ʐٓӐlTIDC"
	mov $417,"r\甌CԁB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $418,"ρC{SNOAlF쐗I̎C"
	mov $419,"⮊ܒdvI獘a㱓IBv"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"ܓޗC}ꉺCFꉺwFC"
	mov $402,"ᏊLls訒{Ccӗ͏W݉gB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $403,"@@"
	mov $404,"u܁CsvC⦖{Ԍ̎C"
	mov $405,"svŜލ̎B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"@ߑFuލ̎s甛wqFCSC"
	mov $407,"rA̎ғIpxoہCvlFz萏YrC"
	mov $408,"pCwX[ꙪI͈ꉺJB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"DCrō@rIccR蓯wB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $410,"@@"
	mov $411,"u݁Iv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $412,"@@"
	mov $413,"u׈ꉺޖ{⦖{IߎVBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $414,"@@"
	mov $415,"uww⟎qIہxBxv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $416,"@@"
	mov $417,"DIB@ʊŕs^IԁCȓOʗGB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $418,"דx@CFrs@㱁C"
	mov $419,"Lz@Ilȍݓە\FB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $420,"rCCnJB"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\

	textoff

;wiFToi@EփtF[h
	bg "bg\dai3kou\savannah.jpg",91
	delay 2000

	texton

	mov $401,"@@"
	mov $402,"s⟎qIہtB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,36:gosub *messagefont
	gosub *textwright
	@

	mov $403,"@@"
	mov $404,"ݔFICL꘢ÕI隔B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"ݓߗCeЊeϓIÕFC"
	mov $406,"anB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $407,"@@"
	mov $408,"RCޗL꘢kIVB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"㏬IÕF|IÕ"
	mov $410,"옻lgtB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $411,"hIÕCAZahIÕŉ"
	mov $412,"sB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $413,"C⟎qC"
	mov $414,"㷔픗h^Ŏ[qB"
	mov $415,"@"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"u揁Cv❛Cv❛ccv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"@@"
	mov $403,"|IÕF甘lC"
	mov $404,"ȋpVV糊ߌwB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"ޘC{SNOCnC"
	mov $406,"AØVI孋鑩B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $407,"@@"
	mov $408,"uωssCKlz_a@ˍsBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"@@"
	mov $410,"ێsʑzC\s\Ύ㏬IÕFB"
	mov $411,"꒼CWB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $412,"C࿔m嗈CܓF"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $413,"@@"
	mov $414,"usʐ搶CۖАVہB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $415,"vޘہCsǑ㏬IÕC"
	mov $416,"s\a⟎q|sB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $417,"ŁCA蕏Vl\Bv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $418,"@@"
	mov $419,"m՗VlC"
	mov $420,"SnwNSғIYCƓWB"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"u_I"
	mov $402,"cޔЛەhL㏬IÕJIv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $403,"@@"
	mov $404,"sʍܗC엹C"
	mov $405,"ݑS䗓ہB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"@@"
	mov $407,"w⟎qIہCEhƁB"
	mov $408,"甉FNᕽJIx"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"@@"
	mov $410,"œIFCszs߁B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $411,"ߓVNCBÕsmInB"
	mov $412,"ccrCFݜޗvlꉺJB"
	mov $413,"@"
	mov $414,"@"
	mov $415,"@"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\

	textoff

;wiF@E獶փtF[h
	bg "bg\dai3kou\homare_kokuban.jpg",87
	delay 2000

	texton

	mov $401,"uޖ{⦖{ȏYrCVޓI藁H"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"DBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $403,"@@"
	mov $404,"u꘢ŋNk\^IjwwNBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"@@"
	mov $406,"GCrB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $407,"@@"
	mov $408,"urCJ쓯wC܏oߓIŖ@JB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"uޖ{쐥ggᚉ[IBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $410,"@@"
	mov $411,"b͘azNÕI|"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $412,"b͘azxzÕI|C"
	mov $413,"_C񓚐I@"
	mov $414,"GIvϓICkNB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $415,"@@"
	mov $416,"ujwQ㵒nIoΗeBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@


;ʉF
	dwave 2,"wave\hakusyu2.wav"
	mov $417,"@@"
	mov $418,"uGIvϓICkNB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $419,"jwQ㵒nIoꖕΗeB"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"uAJ쓯wܓICw⟎qIہxӐ{lbIB"
	mov $402,"{lbޘTOCƍݎЉCswJB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $403,"ݜޖ{⦖{Cܗ\Ґlb"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"ŔjItxB"
	mov $405,"ێs\CC甎㏬IÕ"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"甑Ɠs|CA\ᕽB"
	mov $407,"\C甑ƓsڗLϓI|A\ᕽB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"F]׉JB"
	mov $409,"LVC͔mߗ"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $410,"㷗rB"
	mov $411,"@"
	mov $412,"@"
	mov $413,"@"
	mov $414,"@"
	mov $415,"@"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\

	textoff
	dwavestop 2
;wiFToi@EփtF[h
	bg "bg\dai3kou\savannah.jpg",91
	delay 2000

	texton

	mov $401,"ܜޗ\\甎ȍ|IہH"
	mov $402,"㷗rޗB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $403,"@@"
	mov $404,"uuܜޗ\\甎ȍ|IہHvv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"@@"
	mov $406,"uuICޘ۔V@CAspęߑÕIԗB"
	mov $407,"JC\JB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"迁Ivv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"@@"
	mov $410,"u㷗r悒nՒCBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $411,"@@"
	mov $412,"RCݛg@L꘢^IgeB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $413,"CۖݘHB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $414,"蟓ˑR睈㷗r"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $415,"ߕr甎ȍ|IہB"
	mov $416,"CމX|I"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $417,"@@"
	mov $418,"uC{bCuԙvn΋NBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $419,"@@"
	mov $420,"VC͔mߗ"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"☒I饋B"
	mov $402,"☒I饋瑖嗈B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $403,"@@"
	mov $404,"uuh痈_\|IJIvv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"@@"
	mov $406,"uuߛE|CsEHvv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $407,"@@"
	mov $408,"uuGGGB"
	mov $409,"C󗹏dB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $410,"ߊŁCޏړss\竗Bvv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $411,"@@"
	mov $412,"rܒC饋L"
	mov $413,"Wpՙ׏ZIځB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $414,"@@"
	mov $415,"uugށC߉^B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $416,"DJCch߁Bvv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $417,"@@"
	mov $418,"uu迁CmI"
	mov $419,"迓I剶aCqssY㈁Ivv"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"\ۓI饋C"
	mov $402,"܎C񓞗ȓIƁB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $403,"R@Cg㌺gIjCIo꘢{IΗeB"
	mov $404,"e\ncbC]{ՁB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"ڏ㍪{蕈꒚_svLB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"@@"
	mov $407,"uC^KYI"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"މȍX|Iv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"@@"
	mov $410,"饋TqCKmC"
	mov $411,"[\ەB"
	mov $412,"@"
	mov $413,"@"
	mov $414,"@"
	mov $415,"@"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"VC݈꘢ِlEIXpC"
	mov $402,"ϓIْԐݒsB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $403,"@@"
	mov $404,"u݁C^VZB"
	mov $405,"ߕszvޛۘEHv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"@@"
	mov $407,"u݁CϒKCߛې^IEHv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"@@"
	mov $409,"uR^IkB"
	mov $410,"ŋNCZ㏬IÕVꗹ藁B"
	mov $411,"Dr񎖛Bv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $412,"@@"
	mov $413,"uCYrvch藁Hv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $414,"@@"
	mov $415,"usza⟎q|"
	mov $416,"R@ʍd刍dnˁC߉WBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $417,"uțC]^VZ\|C"
	mov $418,"R@v__DrA槗Bv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $419,"u迍|CA\So戁Bv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $420,"urρCsJHv"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"uC֐@n얾B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"DJCߏAJBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $403,"@@"
	mov $404,"AρCۜnϒK蒆h^B"
	mov $405,"ɒnN勎B"
	mov $406,"@"
	mov $407,"@"
	mov $408,"@"
	mov $409,"@"
	mov $410,"@"
	mov $411,"@"
	mov $412,"@"
	mov $413,"@"
	mov $414,"@"
	mov $415,"@"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\

	textoff

;wiF@E獶փtF[h
	bg "bg\dai3kou\homare_kokuban.jpg",87
	delay 2000

	texton

	mov $401,"uDC߉FėzzJB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"דޗCߗLYrzHv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $403,"@@"
	mov $404,"uu啪vuIvusZIvv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"@@"
	mov $406,"wFrspwCA]]\萗ۓ{IB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $407,"@@"
	mov $408,"ucc@ʖvLlbC"
	mov $409,"ޘEARlxzlIЉB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $410,"ޘELPOӏA푗IwqC"
	mov $411,"L|ÎIVlB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $412,"Cm~ލlC"
	mov $413,"˗LlbϓI@݁B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $414,"ACޖ琥con㔁B"
	mov $415,"@嘢ls嘰|n茎ȓIbC"
	mov $416,"ψꗈCЉIaA|B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $417,"uusߒԓIԁCACBŎ߁Iv"
	mov $418,"\BψyٕC"
	mov $419,"lb\IBv"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"uA܁CA|IlbC"
	mov $402,"AAێBϊaB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $403,"@ʜϘCAޖ{⦖{ρCLlBdlI͗ʁC"
	mov $404,"Llҗh͗ʁC"
	mov $405,"֗Llp͗ʗsՁCϓIloB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"RClb֐KlݓIB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $407,"AC@ʛ嘰|CA횭lpB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"ސ^I꘢kÉrIVB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"ccrCޔ蕘Vls\ڗLl͗ʓI"
	mov $410,"w⟎qIہxB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $411,"蟁AyTAF^VIÕC"
	mov $412,"{Ak|IޔЛہCލ隔Yr藁C"
	mov $413,"ېYr藁H"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $414,"ڒדō@JBv"
	mov $415,"@"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\

	textoff

;wiFToi@EփtF[h
	bg "bg\dai3kou\savannah.jpg",91
	delay 2000

	texton

	mov $401,"umI࿔mIv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"@@"
	mov $403,"uސsʛCrrQ茁C"
	mov $404,"ېYrHv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"@@"
	mov $406,"usCsCEssʗB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $407,"s{푴ÕF"
	mov $408,"GB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"mCߔЛ۔@ʔ|IÕpC"
	mov $410,"ېYr藁Hv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $411,"@@"
	mov $412,"u|IÕpޔЛہI"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $413,"vϓIԁC"
	mov $414,"Ao鈖ٖ@j~IBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $415,"@@"
	mov $416,"uICމraIv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $417,"@@"
	mov $418,"ێsʓIFg̍ЎSC"
	mov $419,"gCn۝TB"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\

	bgmfadeout 1
	bgmstop
;ʉFhJ[[[ij
	dwave 2,"wave\expsmall.wav"
	QUAKE 20,200

	mov $401,"svCr⁗ȓIꐺkC"
	mov $402,"nʖCnk×NB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $403,"@@"
	mov $404,"uuYAYrIHvv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"@@"
	mov $406,"uu៑Iv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $407,"uߍFݑB鈔\Cޘ隔INҁBv"
	mov $408,"uF៓lrWIvv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"@@"
	mov $410,"uuÓ܁CߔЛ۔|IÕv"
	mov $411,"uEIHvv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $412,"@@"
	mov $413,"uuzΏ㏬IÕ߁Cv"
	mov $414,"uCYrCCYrρIv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $415,"uCYrېϓIIvv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@


;ʉFYKK[[[[[
	dwave 2,"wave\ExplosionE11.wav"
	QUAKE 30,1500
;wiFToi@]@ʏtF[h
	bg "bg\dai3kou\savannah_sirokuro.jpg",12

	mov $416,"@@"
	mov $417,"AݕېyC"
	mov $418,"⁗|IKB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $419,"ێsʘa࿔m݈NC"
	mov $420,"\sn᫝TB"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\

	textoff

;ʉE獶֍tF[h
	bg black,87
	bgmfadeout 2000
	bgmstop
	delay 2000

;wiFuāÂЂ̂ɁA
;܂͂炻̂ق̂ɂ܂c
;ȂɂAĂ܂łBv@ʏtF[h
	bg "cutin\dai3kou\cutin_25.jpg",12

	delay 5000
;ʉFwZ̃`C
	dwave 2,"wave\chaim.wav"
	bg black,12

	delay 3000
;wiF؁ij@Vb^[tF[h
	bg "bg\dai3kou\homare_tachiki_d.jpg",26
	delay 2000

;wiF؁iuj@tF[hȂ
	bg "bg\dai3kou\homare_tachiki_bure.jpg",1
	delay 1000

;aflFfree0522.mp3@iv[v
	bgm "bgm\free0522.mp3"

;G\F@E΁@ʒuF@ʏtF[h
	ld c,":a;tatie\miki\bisyou.bmp",12
	delay 2000

	texton

	mov $401,"u݁CَiYBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"@@"
	mov $403,"\蓜ޘnIB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"gvLiDC"
	mov $405,"vޗC命s\刓\B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"@@"
	mov $407,"uߘccpCssDH"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"sǜr܁C䐥VCߐwHv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"@@"
	mov $410,"uChIusVvB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $411,"CߓIӎvGB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $412,"r藁CXFIuJB"
	mov $413,"p߁CuX[kBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $414,"@@"
	mov $415,"ucc"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $416,"ߎݑVIC"
	mov $417,"苍DD\ᓾwwxJBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $418,"@@"
	mov $419,"ugmkCґVBv"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"ەi䱐kdIwqB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"@l֐VC"
	mov $403,"v\蓓IlCA׉zECFB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"C٘s蓓IlC\SsB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"\vLC؁C蓓I@A蓁C"
	mov $406,"s[I@As[C䐥sjB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $407,"@@"
	mov $408,"u܉񗈁CVIaCccߌurρHv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"@@"
	mov $410,"C\ρC˔\Snchh\B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $411,"@@"
	mov $412,"uZ\Bv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $413,"@@"
	mov $414,"ucch֐^QiIBv"
	mov $415,"@"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"uVޕsցC̎LIB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"sCN꘢ls笒nC"
	mov $403,"܊wC\萎ȓIz@"
	mov $404,"\XDꍱBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"ߛCꌃÏALs笓IѕaB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"@@"
	mov $407,"uccw͓IBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"@@"
	mov $409,"䱉CnsȉB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $410,"N甊wZXLB"
	mov $411,"ƓߘiCaەiw"
	mov $412,"ܒnPFB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $413,"\Cꖼw"
	mov $414,"n\萎ȓIz@B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $415,"䧜ލFCw͐CXDIVB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $416,"w@IFbC늮S_|嗈B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $417,"ccsCϒDB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $418,"@ʕsρCLŕsIB"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\

	textoff

;G\F@E^ʖځ@ʒuF
	ld c,":a;tatie\miki\majime.bmp",12
	texton

	mov $401,"u݁CَiYBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"@@"
	mov $403,"uYrHrˑRrQ䵁ccv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"@@"
	mov $405,"u䐥scF񗈁Hv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"@@"
	mov $407,"ەiMIہCB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"@@"
	mov $409,"uVCL܏YrEHv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $410,"@@"
	mov $411,"ur\BFC"
	mov $412,"꘢s蕒ԓss܁Bv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $413,"@@"
	mov $414,"uccCYrrzHv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $415,"@@"
	mov $416,"uޕs֗LCIvB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $417,"AZFs܁C"
	mov $418,"AUٜIwܔ\͏YrIC"
	mov $419,"shߓYWEHv"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"ŗC\C䒅zB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"ӁCېZ孏֎~IB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $403,"scc"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"@@"
	mov $405,"uߎ藁CߑzrρH"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"ߊݜޘی^EHv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $407,"@@"
	mov $408,"ucc֍sJccv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"@@"
	mov $410,"uϓIԁCAsK|񋎗B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $411,"ґRސݔZ孁CAސߎșrIB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $412,"@ʜސߎȈӎuIC"
	mov $413,"AvKvațB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $414,"scc"
	mov $423,"u@ʈCeەiwہfޘR"
	mov %120,414: mov %121,414:mov %122,24:gosub *messagefont
	mov %120,423: mov %121,423:mov %122,24:gosub *messagefont
	$414@/
	$423
	add $414,$423/

	mov $415,"ܒvۓIwCߏA^IkWGBv\"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	mov %130,415
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\

	textoff

;G\F@EΊ@ʒuF
	ld c,":a;tatie\miki\egao.bmp",12
	texton

	mov $401,"uuvLߔЖvFIlCߕsFIvv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"@@"
	mov $403,"uߍː甐luI藁Bv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"@@"
	mov $405,"ӟےnܒ\͌@IB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"\^I\ÎCΒB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $407,"@@"
	mov $408,"uccَiYBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"@@"
	mov $410,"uBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $411,"@@"
	mov $412,"u߁BێݓIώqGBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $413,"@@"
	mov $414,"ەiCSnΒܓB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $415,"}fgC\Ige[xKc"
	mov $416,"甉S[xgIxB"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\

	textoff

	bg black,15
	bgmfadeout 2000
	bgmstop
	delay 3000

;wiFuĎ͗ĂBv@ʏtF[h
	bg "cutin\dai3kou\cutin_26.jpg",12

	delay 3000
;aflFfree0257.mp3@iv[v
	bgm "bgm\free0257.mp3"
	bg white,14

;wiFā@ʏtF[h
	bg "bg\dai3kou\kisetu_natu.jpg",12
	delay 2000

	texton

	mov $401,"}ZIēVB"
	mov $423,"ꎟI㱊wZÁB"
	mov %120,401: mov %121,401:mov %122,24:gosub *messagefont
	mov %120,423: mov %121,423:mov %122,24:gosub *messagefont
	$401@/
	$423/
	add $401,$423/
	@

	mov $402,"yMRI厩RoIY⏁C"
	mov $403,"\CSsB"
	mov %130,402
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"⾉Ώ́C"
	mov $405,"ֈӊOWᗹ|Ԗ_IʁB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"@@"
	mov $407,"Cn@CLl`ΖZ܌CB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"\CʊvLڎ󐳏틳C"
	mov $409,"\Iwx@QdB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $410,"苗dИVaLIwFΖZC"
	mov $411,"ᗹ孖͓Iw蚉B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $412,"Տ㏋IC"
	mov $413,"֘wI쒆\ꍱeC"
	mov $414,"RCnϐSndVەiB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $415,"B꘢w͓IJC"
	mov $416,"ґR|萓ŒߏyC"
	mov $417,"A\fCLIRẃB"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\

	textoff

;wiFH@ʏtF[h
	bg "bg\dai3kou\kisetu_aki.jpg",12
	delay 2000

	texton

	mov $401,"IHVB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"wőIÉ^ÉC"
	mov $403,"\sWg̔\͓IB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"立NClsCNClsC"
	mov $405,"NClsyB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"SCtٍRڗIō@_I\C"
	mov $407,"z㗹QOēIC꘢tf_C"
	mov $408,"KŗCϔtInʁB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"@@"
	mov $410,"sv@C]ȓIGEB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $411,"ߐl悓ICݏHGS⦉C"
	mov $412,"FǗLʊwhOB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $413,"߈ʊwI꘢CՒBn]xOB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $414,"uލ{sIv͓ۓ{nܓC"
	mov $415,"A\cpՒQ㵓I\B"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\

	textoff

;wiF~@ʏtF[h
	bg "bg\dai3kou\kisetu_huyu.jpg",12
	delay 2000

	texton

	mov $401,"ÓI~VB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"NsƎlWǋlxI\C"
	mov $403,"NfuN}GȏjB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"C鐳D\IC"
	mov $405,"ChَpIەi蒆C"
	mov $406,"B畨B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $407,"䑗I畨ꌏIpJ߁B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"\k蓁C~VC"
	mov $409,"\꒼ߌ߁B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $410,"@@"
	mov $411,"CwaIwVC"
	mov $412,"FǕ\IEڐstB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $413,"\ٔrIpFsxC"
	mov $414,"hpݓ䙉ʓIޔkC"
	mov $415,"pLk͓I\_RS럃B"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\

	textoff

;wiFt@ʏtF[h
	bg "bg\dai3kou\kisetu_haru.jpg",12
	delay 2000

	texton

	mov $401,"tVCPǓIB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"C\sV\SՊǓZIwC"
	mov $403,"\ݗItNǁB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"@@"
	mov $405,"RAەiwCȋyVVw萬I"
	mov $406,"NǁCwLIwZxۏoVIN_B"
	mov $407,"ۏoVIN_B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"灈ʁCtIwF"
	mov $409,"󓞗FI݁C竗SB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $410,"heЌBV@C"
	mov $411,"FCnȎȓI㗹PIHB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $412,"݉Ǐw蚓INCwSxE[hFB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $413,"@@"
	mov $414,"甕ەi䱜ϓIVw݉ǏC"
	mov $415,"QIߍVF܁C"
	mov $416,"ޛsFzvIBʁB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $417,"CF֝وӒh꘢ӎ{vIB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $418,"RCLꍱVpڗIiWVC"
	mov $419,"AzϓIlzeՈۊwIC"
	mov $420,"|vIB"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\

	textoff

	bg black,12
	delay 2000

	texton

	mov $401,"wZIpwCV򐥈܎ҁB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"蕜ޔЎsٖ@CpNlIgˎq"
	mov $403,"㐧wqIlC^B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"@@"
	mov $405,"݋玎C濒|ItC"
	mov $406,"Anf筎ȏMI要B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $407,"ܑP^mC甊wEC"
	mov $408,"qYrϓIsCِlܐDIC"
	mov $409,"󊎎Ȗw͐CϓIlB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $410,"AZw͍čC"
	mov $411,"@ʖvLC꘢l^ʋNC"
	mov $412,"ߑFr\pȓIo苎h藁H"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $413,"svݖ戁Csvb́CsvqĘaSVB"
	mov $414,"svЉQCsvIMfB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $415,"gLlsw^܁uߏAvC"
	mov $416,"vpIˋŁCMȓIfB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $417,"@@"
	mov $418,"ݝϕsfnqC"
	mov $419,"㱔@ȑB"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\

	textoff

;ʉFKKK
	dwave 2,"wave\dooropen07s.wav"
;wiFЉȏ@E獶֑ftF[h
	bg "bg\dai3kou\homare_syakaika.jpg",86
	delay 200
;ʉFoA[
	dwave 2,"wave\don14.wav"
	QUAKE 10,300

;G\F@EΊ@ʒuF@ʏtF[h
	ld c,":a;tatie\miki\egao.bmp",12
	texton

	mov $401,"uCَiYݘEHv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"@@"
	mov $403,"u݁C藁C"
	mov $404,"`ߒÓ_JIv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"@@"
	mov $406,"uC]]Bv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $407,"@@"
	mov $408,"ґRvLd⎒\C"
	mov $409,"A\ߐS~Iip_svB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $410,"sS헝Cie⍁Cs󑩈C"
	mov $411,"V͎l˓I\ʎRݒnIB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $412,"ccsCސ\I͏݁C琥\ƓVrB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $413,"ґR^iFI둊rC"
	mov $414,"Aەi\ȓΕoI䆓IFB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $415,"R@CϏAkDBޏAەi䱁B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $416,"ccAϑMCϊ]B"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"uVBTCC惔t`[GB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"hَiY꘢C߉nh{Iv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $403,"@@"
	mov $404,"u揁cc֐^kv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"@@"
	mov $406,"{ґRsߐlCAΗepkuB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $407,"N嗈I`[CguےŁC\ŏo⌓DrB"
	mov $408,"ҒWWI[~@B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"\IΗeȐRC\ٖkLMJB"
	mov $410,"gށCDhIώqv"
	mov $411,"@"
	mov $412,"@"
	mov $413,"@"
	mov $414,"@"
	mov $415,"@"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\

	textoff

;GF@Eֈړ
	cl c,0
	ld r,":a;tatie\miki\egao.bmp",12
;G\Fd@ʏ@ʒuF
	ld l,":a;tatie\yaezono\tuujyou.bmp",12

	texton

	mov $401,"uGCŋNDhIvv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"@@"
	mov $403,"u֗LpFVIᚚGBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"@@"
	mov $405,"upApFccv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"skC䱛lB"
	mov $407,"ޘC莗TIߓߕ"
	mov $408,"SAd͈ϓIB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"aߍ֘MŋNsI}"
	mov $410,"s\C敛v"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $411,"@@"
	mov $412,"u܁CޕsACIpFEHv"
	mov $413,"@"
	mov $414,"@"
	mov $415,"@"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\

	textoff

;G\Fd@{@ʒuF
	ld l,":a;tatie\yaezono\keno.bmp",12

	texton

	mov $401,"u˕sCލ˕spFI"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"@@"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright


	mov $403,"ސvhIv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,48:gosub *messagefont
	gosub *textwright
	@

	mov $404,"@@"
	mov $405,"uCDkDkCmB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"ґRsCAsJBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $407,"@@"
	mov $408,"ٟs笓IdИVCەitB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"\CqliskaCqlgn֒s֓IB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $410,"s܉񗈁c"
	mov $411,"pFavhV㱓LYrd藁H"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $412,"ʌuLCAQf߈뒴ʓI܋B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $413,"IVdИVSÓIC"
	mov $414,"Qsh\IĊJB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $415,"@@"
	mov $416,"uߏAV@G`[IzJIv"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\

	textoff

;GF@
	cl r,12
	texton

	mov $401,"u݁IC֖v܊藉Iv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"@@"
	mov $403,"dИVcnzv⊏ZٕC"
	mov $404,"ەiΒCܗu``v"
	mov $405,"ەio[㱁B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"ŒވꖋCEsZΗNB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $407,"@@"
	mov $408,"u^ICRʐLiIƌB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"^zŊ\ǎCI\ꉔv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $410,"@@"
	mov $411,"uCSӁBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $412,"@@"
	mov $413,"uA߁CA߁Iv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $414,"@@"
	mov $415,"ʋvIrC"
	mov $416,"FwϊߕpB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $417,"AەiCNρC"
	mov $418,"䎩Ȗ疾uȍCNB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $419,"Fql㗹𓹘HcR@sېB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $420,"َЉIwSC^SӈӒnlB"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\

	textoff

;G\Fd@ʏ@ʒuF
	cl l,0
	ld c,":a;tatie\yaezono\tuujyou.bmp",12
	texton

	mov $401,"u܉񗈁C֐^B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"ŋ߁CE허ޘ[藁B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $403,"\CCL_qsJc"
	mov $404,"ߗLvL\ٖIuLYrz@Hv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"@@"
	mov $406,"ˑRoꕛ\^I\COV䊖B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $407,"䏊ጓItCݛEONtIwB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"BwErDȓIC"
	mov $409,"LsÉIwrEC䦓wlō@thB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $410,"@@"
	mov $411,"uvLC֖vLc"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $412,"sC֐NlvB"
	mov $413,"\Ipʉ\C\㍂C~Bv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $414,"@@"
	mov $415,"uw桐l皊s܁CߏƖډraːVB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $416,"vdN\]wCAFsIԁC"
	mov $417,"\\swIJBv"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"uϖvցcA䑊M\B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"ߛwqEvVB"
	mov $403,"@C\Li㱌uǋlC"
	mov $404,"A\DDnIB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"CގON꒼r|\IBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"@@"
	mov $407,"uC꘢l܁CϓIB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"ߏI؛vLցB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"ߘ\ErtC鈓sPIVwC"
	mov $410,"ߝf񓞗dB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $411,"AZQSʘVC疢K\ވ_C"
	mov $412,"\bߓIlCds嗈JB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $413,"sc"
	mov $423,"ߖYŏdvIBv"
	mov %120,413: mov %121,413:mov %122,24:gosub *messagefont
	mov %120,423: mov %121,423:mov %122,24:gosub *messagefont
	$413@/
	$423/
	add $413,$423/
	@

	mov $414,"@@"
	mov $415,"rܒCdИVpw"
	mov $416,"FFȓI}B"
	mov %130,414
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $417,"ސݎӉvvlB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $418,"@@"
	mov $419,"uŏdvIcHv"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"CdИVz\萏YrC"
	mov $402,"䊮Sv\B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $403,"ґRaNsC"
	mov $404,"AEI֐sρB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"sCAdИVpB"
	mov $406,"sLYrϓIw@x藁C"
	mov $407,"䔽vC攽ȎȓIsB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"@@"
	mov $409,"RCA蕜ϋ{g琥őIB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $410,"@˒mC"
	mov $411,"I^忎܁B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $412,"@@"
	mov $413,"uwqICs\oցB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $414,"Fʑ听lC"
	mov $415,"u܁esDӎvCt֗fC߉AuB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $416,"s藁CߓI։ȖJB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $417,"țCȓIٛ׎qAȝEBvv"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\

	textoff

	bg black,12

	texton

	mov $401,"ٛ׎qBދӖYrH"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"ȜϓIr藁H"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $403,"@@"
	mov $404,"māCݓߓVw@B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"ݕ刖ʓIߎ䱉FەiC"
	mov $406,"\SLgŎZIVB"
	mov $407,"@"
	mov $408,"@"
	mov $409,"@"
	mov $410,"@"
	mov $411,"@"
	mov $412,"@"
	mov $413,"@"
	mov $414,"@"
	mov $415,"@"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\

	textoff

	bgmfadeout 1
	bgmstop

;wiF؁ij@Vb^[tF[h
	bg "bg\dai3kou\homare_tachiki_d.jpg",26

	delay 500
;wiF؁iuj@tF[hȂ
	bg "bg\dai3kou\homare_tachiki_bure.jpg",1
	delay 1000
;G\F@E^ʖځ@ʒuF
	ld c,":a;tatie\miki\majime.bmp",12
	delay 2000

	texton

	mov $401,"uuccHvv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"@@"
	mov $403,"ߓ\IԁC䝚𗹁Csm[B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"s㍂HvցC\ӜrܗB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"䊖\CYrs]wCI񓚐cc"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"@@"
	mov $407,"uu߁CszdlB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"\IǎCCLґَiYBvv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"@@"
	mov $410,"ccސi@up꒼QٓIB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $411,"꒼]w\槍KCCs浗]͒nw͒B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $412,"RC琳@cc"
	mov $413,"ԑ꘢嘰ЉI`ۓI㱁B"
	mov $414,"@"
	mov $415,"@"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"ґRϐu餋㱁CA^ՎisC"
	mov $402,"ޘ㱓Ig䗓틷B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $403,"CUPǈnC"
	mov $404,"FAdB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"g՗NIwCݏNtP"
	mov $406,"CFIfB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $407,"Xva䑊rONIەiC"
	mov $408,"\r\|ىek藁H"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"@@"
	mov $410,"RC䑊M\\槍ވ؁B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $411,"\k|CvVIB"
	mov $412,"\|s๘nWȁB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $413,"꒼ϑMB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $414,"@@"
	mov $415,"u߁ccs◯ݜޔВnB"
	mov $416,"ߕsݜޗOsOBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $417,"uߓI֜k"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $418,"筒nDޏHBv"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\

	textoff

;G\F@E{@ʒuF
	ld c,":a;tatie\miki\ikari.bmp",12
	texton

	mov $401,"ucc˕sv藁Iv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"@@"
	mov $403,"uەiCsvCBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"@@"
	mov $405,"u˕sv藁I˕svI"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"VYrIC䜃r\MIv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $407,"@@"
	mov $408,"urCډߑŎZraH"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"pʖs꒼JC"
	mov $410,"FLVٔ\ĆBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $411,"@ʕs]wCAKlH었gdB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $412,"ACݜޘC"
	mov $413,"ÈӌuwIwqIn{vLBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $414,"@@"
	mov $415,"ucccv"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"uszwZCuszw蚁C"
	mov $402,"sKvCQsȓI{C"
	mov $403,"g\rފwB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"NsLCލR]AIwB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"ݎЉŗCFwҁB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"vrCpIHo픍C"
	mov $407,"vrܒꍱsEIscc"
	mov $408,"LrC픽ٓIRB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"@@"
	mov $410,"\ECw@ڍHIvsFB"
	mov $411,"RCݙ{Lls\C"
	mov $412,"ڗLyȏwRIEB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $413,"٘ߍvLޔЁwRxwIlCЉIڌC"
	mov $414,"┙B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $415,"@ʐȎÕPIԁCߏAX@B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $416,"@@"
	mov $417,"uYrcc꘢ICSsAII"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $418,"@Cs\CAHEI"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $419,"lIH孒DCޕskEIv"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"uccܓvցB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"lڗLvlI\́B"
	mov $403,"C@C˔\Rn\ȑzIHB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"A^Cl猚ЉB"
	mov $405,"s\[ЉIlᑊҁC"
	mov $406,"\ݒꙪ|xB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $407,"s]ߍϓIlBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"@@"
	mov $409,"uCIsYrusv[ЉvޔЕYԘE"
	mov $410,"ꓞAϗI"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $411,"ߑFLzczoIv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $412,"@@"
	mov $413,"usϓIIv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $414,"@@"
	mov $415,"uCYrccv"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\

	textoff

;aflFfree0512.mp3@iv[v
	bgm "bgm\free0512.mp3"
;G\F@Ef@ʒuF
	ld c,":a;tatie\miki\konwaku.bmp",12
	delay 1000

	texton

	mov $401,"uCYrccvrWnى藁Hv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"@@"
	mov $403,"\IώqsƁBސꎟœ\IoϓI\B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"\꒼|IwB"
	mov $405,"ґRiRzCApՒnC"
	mov $406,"vLwqώT܁B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $407,"݁cc"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"@@"
	mov $409,"uەiCߐccv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $410,"@@"
	mov $411,"uCYrߏAs藁cc"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $412,"ssCَiYB@ʖvLߍ݁C^I~sB"
	mov $413,"_ssCSC@YrssNƁccv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $414,"@@"
	mov $415,"u䖾ߊ⛋B"
	mov $416,"A蕉uaƕdkÎB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $417,"AC։ݜޏwZB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $418,"sȗ߁B"
	mov $419,"@@"
	mov $420,"usϓIIv"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\

	textoff

;G\F@E@ʒuF
	ld c,":a;tatie\miki\naki.bmp",12
	texton

	mov $401,"uL߁ccLىr_cc"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"꒼CC꘢lB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $403,"CYr䓾ϓI^C"
	mov $404,"وؓs[xcc"
	mov $405,"ߍّAŋNKIlC"
	mov $406,"甉䍦ؓB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $407,"ACߋpϓILoB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"V㗈ډCÈFC~C"
	mov $409,"u֐n܁ud݉ƗvBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $410,"@@"
	mov $411,"u߁AߐccCVIጁccv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $412,"@@"
	mov $413,"uߗ܁CBJcc"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $414,"Aى䗈܁CߏAI؛Bv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $415,"@@"
	mov $416,"ucccv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $417,"@@"
	mov $418,"ەiIᒆOoIB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $419,"ꎟœ\Bꎟœ\WoƎIʁB"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"uَiYccc"
	mov $423,"߁B"
	mov %120,401: mov %121,401:mov %122,24:gosub *messagefont
	mov %120,423: mov %121,423:mov %122,24:gosub *messagefont
	textspeed 200
	$401@/
	textspeed %3000
	$423/
	add $401,$423/
	@

	mov $402,"ȁCszCCB"
	mov %130,402
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $403,"꒼cc꒼CIVJBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"@@"
	mov $405,"ucccv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"@@"
	mov $407,"udlsssB"
	mov $408,"LَiYccˉȁBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"@@"
	mov $410,"ccccYrsB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $411,"ϛccȍ˕sz㍂c"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $412,"szCc"
	mov $413,"@"
	mov $414,"@"
	mov $415,"@"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\

	textoff

	bg black,12
	delay 2000

;ʉFKKK
	dwave 2,"wave\dooropen07.wav"
;wiFЉȏ@E獶փtF[h
	bg "bg\dai3kou\homare_syakaika.jpg",87

	delay 2000

	texton

	mov $401,"aەid@C񓞗ЉȏyݎC"
	mov $402,"œdИVIweB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $403,"vL񔈊ŉCwْ]xOB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"@@"
	mov $405,"uc近AmEHv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"@@"
	mov $407,"ucv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"@@"
	mov $409,"gs܁CEYrsB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $410,"C@CىoB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $411,"uߖYŏdvIBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $412,"@@"
	mov $413,"ccC|擐lCVIB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $414,"ݔdИVaC@@ʓIxC"
	mov $415,"筒nHsȐMI要C"
	mov $416,"SӒn筎B"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"RCpccvL^Ő^B"
	mov $423,"vLȈ꘢lIpxőҊwB"
	mov %120,401: mov %121,401:mov %122,24:gosub *messagefont
	mov %120,423: mov %121,423:mov %122,24:gosub *messagefont
	$401@/
	$423/
	add $401,$423/
	@

	mov $402,"gەi䱜ޘlC\rő҉IC"
	mov $403,"\㏕ϓIcc"
	mov %130,402
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"rvLC"
	mov $405,"A|szv\OB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"@@"
	mov $407,"ݐCwVOccەiӐ꘢ƗIB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"@@"
	mov $409,"퍢fam㓾bs埃CҍݗiqB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $410,"c\WfoC\_ȑҁB"
	mov $411,"a\Nw͉wZIρB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $412,"O\Cጜ\C_\Ca\NB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $413,"ވ؁C\܈sddvB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $414,"\CґَiYޘݓӍݑ勐嗹B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $415,"甜ޘݍ@B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $416,"ϓIccpYrt֍ˍD藁H"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $417,"@@"
	mov $418,"uccraˍDccv"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\

	textoff

;wiFЉȏiuj@tF[hȂ
	bg "bg\dai3kou\homare_syakaika_bure.jpg",1
	delay 1000
;G\Fd@ʏ@ʒuF
	ld c,":a;tatie\yaezono\tuujyou.bmp",12
	delay 1000
	texton

	mov $401,"uӛC{Aaٕێ_餁C"
	mov $402,"d甐lƕmߔАSvٛBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $403,"u֐瀐tNBIwC"
	mov $404,"ߖ{DDlވ_IBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"@@"
	mov $406,"NCdИVo]ύC"
	mov $407,"ڌB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"@@"
	mov $409,"uudИVC运Yr@uIHv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $410,"ەi\cc"
	mov $423,"ߘccىLϓIccv"
	mov %120,410: mov %121,410:mov %122,24:gosub *messagefont
	mov %120,423: mov %121,423:mov %122,24:gosub *messagefont
	$410@/
	$423/
	add $410,$423/
	@

	mov $411,"@@"
	mov $412,"uߛwqNtIAmB"
	mov $413,"C\kߚvBv"
	mov %130,411
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $414,"@@"
	mov $415,"uCYr迖vLG藁H"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $416,"AmC濋Jccv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $417,"@@"
	mov $418,"ucccv"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"ىI񊖁CdИVCC"
	mov $402,"ĉnȗB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $403,"@@"
	mov $404,"uRBB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"IV\糊wI㱁C"
	mov $406,"AONtIOwC~B"
	mov $407,"V@CA甑FیilB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"@rsCrqsC"
	mov $409,"dٖٝ@ƓIB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $410,"CFʎ藢ލIwq"
	mov $411,"FCƊŜލwqIB"
	mov $412,"@ېYrCss\cFȓIB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $413,"ވ_CߖJHv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $414,"@@"
	mov $415,"uAccBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $416,"@@"
	mov $417,"uACґVB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $418,"ّҔ䱐^IDEHv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $419,"@@"
	mov $420,"ucccv"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"uvLICu餍乕C"
	mov $402,"֔pʓݟB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $403,"ގONCDseՍCn̉ISB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"@ʍݜޘCcϓIwqǒЉC"
	mov $405,"\\Ď񓞌_GBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"@@"
	mov $407,"uccIv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"@@"
	mov $409,"C֔@CV֐KlawdB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $410,"Mw\筒nC"
	mov $411,"R@ڑFLB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $412,"ٕs\֕ەiB"
	mov $413,"ސٕsBIB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $414,"ґRLZZONCA\ݛESUNB"
	mov $415,"@C\\DDnB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $416,"KlccKlMw󑗑FVIlcc"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $417,"ۍCAے藹ȍCI݈ӖB"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"ccAC^C䖔_B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"wMxޘrƎsB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $403,"MxzIlC"
	mov $404,"reՍٕIB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"AˁCpg̉ވ_B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"@@"
	mov $407,"s\嘰Mەi䱁B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"RCKlwVIlHB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"@@"
	mov $410,"s\嘰MB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $411,"RCKldFB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $412,"@@"
	mov $413,"s\嘰MccACKldcc"
	mov $414,"@"
	mov $415,"@"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"uߊ\Iz@EHv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"@@"
	mov $403,"uccHv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"@@"
	mov $405,"u䱓Iz@B"
	mov $406,"ߛwqܗYrHv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $407,"@@"
	mov $408,"uccccccv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"@@"
	mov $410,"uvC@ʕszܓIԁC"
	mov $411,"A誎DB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $412,"sCވ_䓾G߁B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $413,"ґَiYCݐVOC搥lB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $414,"svyˑZB"
	mov $415,"zzC꘢l\􍱏YrJBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $416,"@@"
	mov $417,"uccIv"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"ەilB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"琥cclB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $403,"@@"
	mov $404,"uډCAߓISӗB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"筎IC\O藁C֐ccH"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"֐ccv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

;ʉFK^b
	dwave 2,"wave\close08.wav"
	QUAKE 10,200

	mov $407,"@@"
	mov $408,"⋗NB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"CICLaEB"
	mov $410,"ACC꘢l܁cc"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $411,"֔\hەiI@C֗LkB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $412,"@@"
	mov $413,"usDӎvCVA񋎗Bv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $414,"@@"
	mov $415,"uGCVIڍkҚGBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $416,"@@"
	mov $417,"AZsYrڍC"
	mov $418,"gCTIYrsœJB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $419,"ϑzCّOޓ_Im莋ΗꉺB"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\

	textoff

	bg black,12
	bgmfadeout 2000
	bgmstop
	delay 1000

;ʉF̐@iv[v
	bgm "bgm\SE_IN200.mp3"
;wiF[̍xOij@ʏtF[h
	bg "bg\dai3kou\kougai_d.jpg",12
	delay 2000

	texton

	mov $401,"[}΁C㗹^FB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"xOCʉەiZrI󏬘HB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $403,"@@"
	mov $404,"IEēIB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"[x͓IGEߑR勎C"
	mov $406,"АÓI~VJB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $407,"ߍELW܌CvBIԁB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"Cɟ@CsɖՐsō@͟IFB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"bŔލPIGEÈʁC"
	mov $410,"ēVI]}nRhB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $411,"@@"
	mov $412,"ŞݕsmsuIrsB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $413,"vLzCgB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $414,"CzF\Cza\ܒԁB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $415,"R@Cc\SӓIh\B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $416,"AݍCcc"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\

	textoff

;wiF[̍xOiuj@tF[hȂ
	bg "bg\dai3kou\kougai_bure.jpg",1
;G\F@E݁@ʒuF@tF[h
	ld c,":a;tatie\miki\ochikomi.bmp",16
	delay 2000
	texton

	mov $401,"ccA槗B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"zȁwxIgᚁCsIgᚗ^\敁B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $403,"@@"
	mov $404,"uەiBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"@@"
	mov $406,"\䩑Rn[}C"
	mov $407,"ߓI@gB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"cՒ߈I_B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"ߑo˗ccIoЕPISB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $410,"@@"
	mov $411,"uccَiYB"
	mov $423,"ː^ٕsNB"
	mov %120,410: mov %121,411:mov %122,24:gosub *messagefont
	mov %120,423: mov %121,423:mov %122,24:gosub *messagefont
	br
	$411@/
	$423/
	add $411,$423/
	@

	mov $412,"wqϔCBv"
	mov %130,412
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $413,"@@"
	mov $414,"Ғn𔈁B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $415,"@@"
	mov $416,"uvgnICspsAB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $417,"䎩ȖuC˓IԗL_啪B"
	mov $418,"^IC䐥rzIBv"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"ەirܒCŌ[}B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"@@"
	mov $403,"u}AϗIB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"~VCޗI͈ޏC"
	mov $405,"蕒暏sFB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"鈓sٖ@j~cc鈓scc"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $407,"A@ssaَiYCρC"
	mov $408,"ސٖٝ@ƓIB"
	mov $409,"ӁC䑁Ai@uB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $410,"AccAva@SB"
	mov $411,"ȁCˉ܏oߔВԁB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $412,"CE槗\Kȗccv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $413,"@@"
	mov $414,"gB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $415,"ݎЉȏyݎvIC"
	mov $416,"ەiݗp\ȓIvlB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $417,"\IāCsKI[oʁC܌cc"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $418,"|IuB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $419,"@@"
	mov $420,"Rcc"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"uuϐ^IDEHvv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"@@"
	mov $403,"uuva@Bvv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"@@"
	mov $405,"uurCډŎZraHvv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"@@"
	mov $407,"uuccsmBvv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"@@"
	mov $409,"uvz叡wCvŎZHB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $410,"ACs\sJC"
	mov $411,"\ssÒngB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $412,"ޏAߓIĘEH"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $413,"ArݙXYnЉC"
	mov $414,"Yrss[IGBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $415,"@@"
	mov $416,"uYrC竗CAChߓ߈꓅܋EH"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $417,"V@rρC"
	mov $418,"߈_gnsvLJB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $419,"sܓrjcC"
	mov $420,"ߑFލlśf֕s퍢݊wZosBv"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"uuCܓvցB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"sCߍVI@"
	mov $403,"vcF{ADBvv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"@@"
	mov $405,"uuccߜޒԐYrӎvHvv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"@@"
	mov $407,"uCV\ILC"
	mov $408,"uv\IvLB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"@ʐClIC"
	mov $410,"ȐӊߓI؁Bv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $411,"@@"
	mov $412,"uccc"
	mov $423,"rH"
	mov %120,411: mov %121,420:mov %122,24:gosub *messagefont
	mov %120,423: mov %121,423:mov %122,24:gosub *messagefont
	br
	$412@/
	$423/
	add $412,$423/
	@

	mov $413,"u߁vŎZى􍱏YrHv"
	mov $414,"@"
	mov $415,"@"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	mov %130,413
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\

	textoff

;ʉ~
	bgmfadeout 1
	bgmstop
	bg black,12
	delay 2000
;wiFuƈꏏɕ炵܂傤v@ʏtF[h
	bg "cutin\dai3kou\cutin_27.jpg",12
	delay 2000
	bg black,12
	delay 2000
;G\F@E@ʒuF
;wiF[̍xOiuj@ʏtF[h
	bg "bg\dai3kou\kougai_bure.jpg",0
	ld c,":a;tatie\miki\odoroki.bmp",12
	delay 3000
;G\F@E΁@ʒuF
	ld c,":a;tatie\miki\bisyou.bmp",12

	texton

	mov $401,"ߗIԁC\搥⇏ZXC"
	mov $402,"R@Io┙I\B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $403,"@@"
	mov $404,"u݁ccˑR܏Yr藁Hv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"@@"
	mov $406,"uQ\qlNZInCR@FZ݈NJB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $407,"ϓIԁCA\攆ߐgBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"@@"
	mov $409,"uݏ݁CߐŎZc䓖⎕擘EHv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $410,"@@"
	mov $411,"ucccv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $412,"@@"
	mov $413,"uƗJBҗ́CsvB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $414,"ُې߁Cv笁Bv"
	mov $415,"@"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"܊ދԁC\gwْB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"gݜޔЏvC\ˑRێȓISB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $403,"֍ݘWa󈻒C\ˑR筎Cەi䱓IgᚁB"
	mov $404,"\nfݎ茎ȓI݁B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"cc^꘢S|IlB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"TCvLCl\槑\C"
	mov $407,"\笕sBޔЎېB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"@@"
	mov $409,"RCv\ωCЉAs\B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $410,"\瓯ϋ笗ЉI݁B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $411,"LݑzzaItϓIu餋㱗C"
	mov $412,"\˔\ȕەi䱓IgᚐB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $413,"@@"
	mov $414,"cc"
	mov $423,"@Cˌ\LoB"
	mov %120,413: mov %121,414:mov %122,24:gosub *messagefont
	mov %120,423: mov %121,423:mov %122,24:gosub *messagefont
	br
	$414@/
	$423/
	add $414,$423/
	@

	mov $415,"C\}ϔsncc"
	mov $423,"˔[[zB"
	mov %120,415: mov %121,415:mov %122,24:gosub *messagefont
	mov %120,423: mov %121,423:mov %122,24:gosub *messagefont
	$415@/
	$423/
	add $415,$423/
	@

	mov $416,"@@"
	mov $417,"uەiIv"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	mov %130,416
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\

	textoff

;G\F@Es@ʒuF
	ld c,":a;tatie\miki\human.bmp",12
	texton

	mov $401,"uccYrH֖v様EHv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"@@"
	mov $403,"u䐤ӑ\EߕLa̓IC"
	mov $404,"I@B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"핃ePCЉQC"
	mov $406,"ՒawS݁B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $407,"ߐgCœȓI勎B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"zsa@~߁CzߘIoΗeB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"䏳\CޔМÖ]lʓIBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $410,"@@"
	mov $411,"ucccv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $412,"@@"
	mov $413,"uACލsEsdvB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $414,"vc"
	mov $423,"ґَiYv甕ەi䱍KC"
	mov %120,414: mov %121,414:mov %122,24:gosub *messagefont
	mov %120,423: mov %121,423:mov %122,24:gosub *messagefont
	$414@/
	$423/
	add $414,$423/
	@

	mov $415,"svCRB"
	mov %130,415
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $416,"CcaߗLϓIc"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $417,"Cz꒼aߍ݈NIv"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\

	textoff

;aflFfree0232.mp3@iv[v
	bgm "bgm\free0232.mp3"
;G\F@Ef@ʒuF
	ld c,":a;tatie\miki\konwaku.bmp",12
	texton

	mov $401,"u݁A݁CߖvJH"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"Rٔ䎩ȏ\ӓIwCÓ܁cv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $403,"@@"
	mov $404,"usȘEHv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"u꘢FpʗeC꘢ُgnܑ֓Ijl擑I"
	mov $406,"B\槝CSIl"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $407,"ߘlCA߁Bv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"@@"
	mov $409,"\|IρC\IΗeB"
	mov $410,"ەiIKChKB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $411,"AVIەi"
	mov $412,"Klڑ\餋B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $413,"RCCȊOIwxp笗ވ؁B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $414,"A\ИρC"
	mov $415,"瓯ψВ\B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $416,"@@"
	mov $417,"@ʊސsjV㱓ICsm@񓚁B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $418,"INEaȗٗI\mC"
	mov $419,"AُIsMCB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $420,"AccAC֔@Cᚐ^ӓIӑݘISB"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"u@Cz꒼a߈NBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"@@"
	mov $403,"u✒`cc߉lC"
	mov $404,"sUNssBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"uϓIlccv"
	mov $406,"@@"
	mov $407,"uuߕsBvv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"@@"
	mov $409,"uccc"
	mov $423,"u^IccȘEHvv"
	mov %120,408: mov %121,409:mov %122,24:gosub *messagefont
	mov %120,423: mov %121,423:mov %122,24:gosub *messagefont
	br
	$409@/
	$423/
	add $409,$423/
	@

	mov $410,"@@"
	mov $411,"uL߁ccv"
	mov $412,"u\甉LϓIuBv"
	mov %130,410
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $413,"u܈ꎟBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $414,"uەi䱏ccza߈NBv"
	mov $415,"@"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\

	textoff

;G\F@Eꂵ@ʒuF@tF[h
	ld c,":a;tatie\miki\uresinaki.bmp",15
	texton

	mov $401,"uuߜމƌcc^Iccv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"uD甐lى~ۓI_ccvv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $403,"@@"
	mov $404,"\IᒆB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"sCۓ{߈CRg՗IB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"\Iϐ[[nhɗIC"
	mov $407,"ޔВɋꐥ䘸|IB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"Co]}\B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"smCYrrB"
	mov $410,"uC@\\~I㏗C"
	mov $411,"ᚒɋꈽBB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $412,"@@"
	mov $413,"uߜÈӘa݈NEHv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $414,"@@"
	mov $415,"uߜϓIƌC䜃r\sǁB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $416,"꒼ߓIIv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

;ʉFhTb
	dwave 2,"wave\ClothC.wav"
	QUAKE 10,200

	mov $417,"@@"
	mov $418,"ڏZ\I߈ꍏC㏒[xgB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $419,"SIɋwsCؓsZB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $420,"DBޔЊccꐥYr藁H"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\

	textoff

;GtF[hAEg
	cl c,12
;wiF[̍xOij@tF[hȂ
;wiF[̍xOi㔼ֈړj@

	lsp 1,":c;bg\dai3kou\kougai.jpg",0,-600
	print 1

	delay 1000

	for %199=0 to 199
		gettimer %90
		msp 1,0,3,0
		print 1
		waittimer (%90+24)
	next

	csp 1

	bg "bg\dai3kou\kougai_u.jpg",1

	delay 3000

	texton

	mov $401,"u݁cv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"@@"
	mov $403,"ucv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"@@"
	mov $405,"uCޜqssĚLc"
	mov $406,"BʈC߁CVLqB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $407,"ܜraCޘ`VBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"@@"
	mov $409,"ucAZߊracv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $410,"@@"
	mov $411,"usÐSCȉvڎ߁B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $412,"َiYCcLꉺBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $413,"@@"
	mov $414,"ucHv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $415,"@@"
	mov $416,"ucc槕skCCߑcv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $417,"@@"
	mov $418,"ucccv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $419,"@@"
	mov $420,"ucccv"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\

	textoff

	delay 2000

;

;wiFw̋ȏxJbgCʃo[W@tF[h

	bg "cutin\dai3kou\tokubetu_cutin.jpg",15

	delay 3000

;

	bg black,12
	bgmfadeout 2000
	bgmstop
	delay 3000

;ʉFXY̖@[vȂ
	dwave 2,"wave\suzume.wav"
;wiFuN\\v@ʏtF[h
	bg "cutin\dai3kou\cutin_28.jpg",12
	delay 3000
;wiF}VOρ@ʏtF[h
	bg "bg\dai3kou\mantion_gaikan.jpg",12
	delay 4000

	dwavestop 2

;wiF}V̕@ʏtF[h
	bg "bg\dai3kou\mantion_room.jpg",12
	delay 2000
;aflFfree0539.mp3@iv[v
	bgm "bgm\free0539.mp3"

;wiF}V̕iuj@tF[hȂ
	bg "bg\dai3kou\mantion_room_bure.jpg",1
;G\F@GvE΁@ʒuF
	ld c,":a;tatie\miki\epron_bisyou.bmp",12
	delay 2000

	texton

	mov $401,"uDC䱏Bv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"@@"
	mov $403,"uGCCَiYBDBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"@@"
	mov $405,"Fݎsd꓅C"
	mov $406,"䱏@CFAߗB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $407,"\IpʛvLdفC"
	mov $408,"֗LЛf磝{WIuCrى\漁B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"ޓ__RIgC"
	mov $410,"甉RN@@sv\KIӎuC"
	mov $411,"ATC{vYrv䋎IB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $412,"ܓC䎩ȖsmrC"
	mov $413,"\vLovB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $414,"ql݈NCxVCAE[xKB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $415,"@@"
	mov $416,"uDC蟘EHv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $417,"@@"
	mov $418,"uVIvtQGB"
	mov $419,"ސuœӓIꎟIv"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"CxgCHIC"
	mov $402,"\ÏSNcB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $403,"ґRŎaߜޔВxIC{ŎZȘIC"
	mov $404,"A䘸wZ񗈓I"
	mov $405,"L@s흾EŁB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"ٍ\C\IoCSIΗeB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $407,"ccTClOޔЎ"
	mov $408,"\ܐkېIJB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"@@"
	mov $410,"ߍRڗLI@C\vLB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $411,"sCBρCݗyI勎\EڗLC"
	mov $412,"plBܕsB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $413,"@@Ch\䱓IC"
	mov $414,"ߔЁwRIKxB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $415,"ґR\vLwqρC"
	mov $416,"\R@rIHC"
	mov $417,"AޘEsLވHB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $418,"@ʕs\hKC@IHs|وӖB"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"us܉񗈁C֐^"
	mov $402,"咅ϓI藁B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $403,"CYrVs\yNHv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"@@"
	mov $405,"uC䘸AϓIB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"꒼ȗsێ字ICeC"
	mov $407,"َȖkQiBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"@@"
	mov $409,"u^S̓㐥VI͛Bv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $410,"@@"
	mov $411,"uߖ琥CaNȍ@C"
	mov $412,"s獫kNEHv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $413,"@@"
	mov $414,"u߈ȑOVshʕaYVC"
	mov $415,"߉䜃r\s藁B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $416,"nNhߘ趁CߓˍsBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $417,"@@"
	mov $418,"uC䓖RkkB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $419,"VsҒŔ߉􍱏YrDhIC"
	mov $420,"ޛEISBv"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\

	textoff

;G\F@GvEƂ@ʒuF
	ld c,":a;tatie\miki\epron_tere.bmp",12
	texton

	mov $401,"uAEcc߉֐^L×͘趗Bv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"@@"
	mov $403,"uzVsߘIXvϓIS"
	mov $404,"ܗL勁Iԁcc"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"䱘IXC"
	mov $406,"smCYr䐥IBkB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $407,"LƍQdICrc↘a"
	mov $408,"N[`iB"
	mov $409,"A\I~~I趍؁C"
	mov $410,"و꘢ʊƋI䗈܁CАVI|B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $411,"@@"
	mov $412,"usC|]\弔\qu藁Bv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $413,"@@"
	mov $414,"uCYr藁Hv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $415,"@@"
	mov $416,"uCYrccߘccc"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $417,"䋎َiYYrIc"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $418,"us֚vcc"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $419,"ccccccv"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\

	textoff

;G\F@GvE{@ʒuF
	ld c,":a;tatie\miki\epron_ikari.bmp",12
	texton

	mov $401,"@@"
	mov $402,"uꉔ^III"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,36:gosub *messagefont
	gosub *textwright

	QUAKE 20,200

	@

	mov $403,"趓sDChIhIv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"@@"
	mov $405,"uYAYrC񗹘BAρcc"
	mov $406,"ˑRAccv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $407,"@@"
	mov $408,"u低CĖQQI"
	mov $409,"AvC✒`Iv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $410,"@@"
	mov $411,"uccv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $412,"@@"
	mov $413,"ґRCnC"
	mov $414,"ANCdsB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $415,"\EىLvC"
	mov $416,"A命sB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $417,"C_Aۉ΁CR@i㱓ss悁B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $418,"a꘢qINC^×B"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\

	textoff

	bg black,12
	delay 2000

;wiFЉȏ@ʏtF[h
	bg "bg\dai3kou\homare_syakaika.jpg",12
	delay 1000
;wiFЉȏiuj@tF[hȂ
	bg "bg\dai3kou\homare_syakaika_bure.jpg",1
;G\Fd@{@ʒuF
	ld c,":a;tatie\yaezono\keno.bmp",12
	delay 2000

	texton

	mov $401,"uYrH֕sߓIցIv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"@@"
	mov $403,"ܓICdИV琶B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"ŗC\䱓Iܖ@IB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"@@"
	mov $406,"uߙߒCߛwqґRŋNLe}C"
	mov $407,"A\L^wqIIB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"趁AŎލC"
	mov $409,"sCȔOCSC"
	mov $410,"]ߔ\悛B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $411,"Bߋpsޓ_C^✒`Bv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $412,"@@"
	mov $413,"ucv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $414,"@@"
	mov $415,"uݜޘCCjltoIlEsB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $416,"X汓ɍفBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $417,"@@"
	mov $418,"uɁcEHv"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"uvցCs݌ǙX@󗹜kl糁C"
	mov $402,"ߐ꘢lw͊IB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $403,"ޖ{gAꌏsNIB"
	mov $404,"\ƎIlC^Ik|B"
	mov $405,"^Ik|B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"g֗LzvxߓIl݁B"
	mov $407,"g֗LzvxߓIlC"
	mov $408,"ߋp֗v痏YrB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"c_Chߛwq꘢ϋߓIJBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $410,"@@"
	mov $411,"uCcv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $412,"@@"
	mov $413,"u^IC䱋R蓏rؔl"
	mov $414,"ꐥI_ŏ㗹C^ts汛Bv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $415,"@@"
	mov $416,"ґRݐCAphomIBB"
	mov $417,"Ӂc\s槑_B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $418,"䱏꒼zCto"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $419,"䱏zvCtoIC"
	mov $420,"CVy_䱊蓓IH"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\

	textoff

;G\Fd@ʏ@ʒuF
	ld c,":a;tatie\yaezono\tuujyou.bmp",12

	texton

	mov $401,"uvCVAy_䱊蓓IHՉJC"
	mov $402,"ψꗈCߑFvgnA\XZB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $403,"vAvȏYrICr\cIv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"@@"
	mov $405,"uvAvȏYrICr\cIv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"@@"
	mov $407,"usAvGoECs꘢ӎvJB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"֐܁Cߍ{vߘӎv"
	mov $409,"plƏZ݈NHv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $410,"@@"
	mov $411,"uscscϓIcv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $412,"@@"
	mov $413,"uRsCߏAŋN_B"
	mov $414,"䱉ߒRБB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $415,"ӛCa꘢PTӓIwqC"
	mov $416,"ЉpxŐsaIsCB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $417,"AߐEIЉlB"
	mov $418,"ߓI瑁A槗C"
	mov $419,"\DDH擊ߛwqC"
	mov $420,"ߏAno|dpߏAsBv"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"ucv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"@@"
	mov $403,"ucsܐ^IC֒甐lSuIB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"ȑOs܁u\ܓIAvok`vEH"
	mov $405,"NSB琥BIB"
	mov $406,"ݏAZĜr瓾s\B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $407,"ĉ֗LYrTޔЊ߈әX"
	mov $408,"LlϜޘo戁CLjl戚sD\FC"
	mov $409,"NlV㱓IAXC֊B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $410,"CVd甎\IC㈓sB"
	mov $411,"sRGƙX@Bv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $412,"@@"
	mov $413,"u߁AߔЎ֖vB藁I֖vIv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $414,"@@"
	mov $415,"uug⿁C֐^{EIƌ`vv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $416,"@@"
	mov $417,"u@ʉ掏oYrNYIԁC"
	mov $418,"dИVߖkoJHv"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"uߛE掏oDEB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"csCĜωӗL_aB"
	mov $403,"sDӎvCߕʓI֐JBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"AEPQߐߓVJB"
	mov $405,"䱛lꓞPUӁC"
	mov $406,"ߏAŎZc\WjJHv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $407,"@@"
	mov $408,"uIB擾Cw桐lIpʓIӁv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"@@"
	mov $410,"R@꒼a\݈NB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $411,"CCވ_IiB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $412,"Ea䱏s@嗹C"
	mov $413,"FiDBB"
	mov $414,"@"
	mov $415,"@"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"u@ʜގC@ߑFAvȗB"
	mov $402,"sǘYrCsvl\ߑFsفB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $403,"sC꘢NSNIjlal"
	mov $404,"Zݓ꘢C֔ލCp\EB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"ϓIԁCYrˎZwsSx藁H^ts汛B"
	mov $406,"^甐luIBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $407,"@@"
	mov $408,"dИVܒCًNB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"Ijlal݈NC"
	mov $410,"ޖ{ٖ@IVC"
	mov $411,"AvʊoӍݐLsDӎvB"
	mov $412,"@"
	mov $413,"@"
	mov $414,"@"
	mov $415,"@"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\

	textoff

	bg black,12
	bgmfadeout 2000
	bgmstop

	texton

	mov $401,"sCܓӒԁCgCVI䗈ŁC"
	mov $402,"٘X@֐L^IB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $403,"@NlaNlrC"
	mov $404,"ssB׉zߏEB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"RC@ʐNlV㱓IԁC"
	mov $406,"ґRCُہCAݖ@ps膌B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $407,"@@"
	mov $408,"ϐ^IDEH"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"耓CwaIِNALVOOB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $410,"vL\͖vLE|IlC{s\擈wqC"
	mov $411,"命vCٙXs휟Rr{B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $412,"LCtÙr萶wqIqC"
	mov $413,"wAzA߉SccލLItsqP"
	mov $414,"ls|哞ISvun擛wqB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $415,"gٔvDC"
	mov $416,"UwqCkSՕCJB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $417,"lIϖڌAXIsA戓IVB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $418,"Cœlٞn߉SC"
	mov $419,"Hٖ@EB"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"śfCߍsd@\IlC[邓IHB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"^wqI灈CrP擛wqIv\ېB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $403,"uuvcwq擑B"
	mov $404,"FލCȖvVBvv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"ލԐrIdCrIٗ́C"
	mov $406,"Lݝٖ@҉I[ˉdꖾB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $407,"@ʖvLܑI^B́CȋylIxC"
	mov $408,"Nl{s\aXB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"@@"
	mov $410,"RCݜϓIVC"
	mov $411,"ڗL\͘aE|INl^Nl"
	mov $412,"wq@sBIB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $413,"񐥈Cƒ댴CIOvC"
	mov $414,"ҍю[{Cۍ@笕s\ޔАB@"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $415,"@@"
	mov $416,"䘢l܁CgfIvVC"
	mov $417,"sCەi䱐N\\IB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $418,"AC@oYrRC"
	mov $419,"^I݈БlI@EH"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\

	mov $401,"eCيekIpVs敁C"
	mov $402,"ÈȗC֊IVC"
	mov $403,"ߔNECn\B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"rCNlaNlV㱕mI~ДVC"
	mov $405,"Ós폳\EH"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"@@"
	mov $407,"፡ЉBޔЊCEݏV"
	mov $408,"ȎwጁC"
	mov $409,"ޔЎUo{AssʗB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $410,"ӏCa{@zVOC"
	mov $411,"ޔЎݜޘƖ琥\IB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $412,"@@"
	mov $413,"៍@@孒IPUӜޘsqI"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $414,"B@\BI\C"
	mov $415,"\甐l\ݏwҏAV㱓\B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $416,"@@"
	mov $417,"jPWӁCPUӁB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $418,"ݕsfsI㒆Cޘpnf\C"
	mov $419,"RȁwxI퍂wB"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\

	textoff

	bg black,12

	delay 2000

;ʉFXY̖@[vȂ
	dwave 2,"wave\suzume.wav"
;wiFuXɂPN̏t\\v@ʏtF[h
	bg "cutin\dai3kou\cutin_29.jpg",12
	delay 3000
;wiF}VOρ@ʏtF[h
	bg "bg\dai3kou\mantion_gaikan.jpg",12
	delay 2000
	dwavestop 2

;BGMFfree0257.mp3@iv[v
	bgm "bgm\free0257.mp3"
;wiF}V̕@ʏtF[h
	bg "bg\dai3kou\mantion_room.jpg",12
	delay 1000
;wiF}V̕iuj@tF[hȂ
	bg "bg\dai3kou\mantion_room_bure.jpg",1
;G\F@GvEs@ʒuF
	ld c,":a;tatie\miki\epron_human.bmp",12
	delay 2000

	texton

	mov $401,"uَiYIv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"@@"
	mov $403,"urHv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"@@"
	mov $405,"PUӓI\Cdo㈟BB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"pʑFˋ磝{WϓӗC"
	mov $407,"r蕈jIԓsv܁B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"BC\zdE餓ߘەiIJC"
	mov $409,"\EqPȓIC݉ґB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $410,"ґRvLYrdIӊCAFAvȗB"
	mov $411,"䱐IȎqB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $412,"@@"
	mov $413,"uʑRC֐aEH"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $414,"I꘢nl܉Ȓ񋟋GBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $415,"@@"
	mov $416,"uspCvgnBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $417,"@@"
	mov $418,"\szwsB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $419,"pޔЌ`I@CᕪvȘavȓIE"
	mov $420,"\uݔwȓIӜÁB"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"us񓾍ݐ_ʑONːJBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"ސ\Iܖ@C^L\jlTI瀉yB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $403,"@@"
	mov $404,"uNލCߙ߉ܛB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"V䋎@Iccv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"@@"
	mov $407,"u@Hv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"@@"
	mov $409,"uCAߘ嘢I@vvB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $410,"R@䋎^C"
	mov $411,"Bܐ㏛sB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $412,"ڒC߈㐶ƌACnIoI\C"
	mov $413,"uvsvʒmߓIHvVIC"
	mov $414,"܏Yruȉ\DnvC"
	mov $415,"I"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $416,"sGEBC"
	mov $417,"vVC֐sMB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $418,"sʒ䐥Ȏq藁B"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"uccv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"@@"
	mov $403,"uŗω꘢lC֐sMCB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"َiYCߔ䋎ˈ@JCAꉺBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"@@"
	mov $406,"uCRvVBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $407,"@@"
	mov $408,"@C䱜ϓIN"
	mov $409,"꘢lDP^C琥ÖƓIJB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $410,"{Nlsl@ʏA㏛s"
	mov $411,"EЉVCcc"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $412,"ccccccB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $413,"ccccccccccccB"
	mov $414,"@"
	mov $415,"@"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\

	bgmfadeout 1
	bgmstop

	mov $401,"@@"
	mov $402,"uܗYrHv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,48:gosub *messagefont
	gosub *textwright
	@

	mov $403,"@@"
	mov $404,"uCAܖVv@"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright

	mov $405,"@@"
	mov $406,"usߘӎvI"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $407,"߁A߁A߁cc"
	mov $423,"㏁A㏁A㏁A㏛sHI"
	mov %120,407: mov %121,407:mov %122,24:gosub *messagefont
	mov %120,423: mov %121,423:mov %122,24:gosub *messagefont
	$407@/
	textspeed 1
	$423/
	add $407,$423/
	@

	mov $408,"ߘCߏYrC䱏HIv"
	mov %130,408
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"@@"
	mov $410,"uAccv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $411,"@@"
	mov $412,"uA܁CP܁cca䱏Iccߘccv"
	mov $413,"@"
	mov $414,"@"
	mov $415,"@"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\

	textoff

;G\F@GvEƂ@ʒuF
	ld c,":a;tatie\miki\epron_tere.bmp",12

	texton

	mov $401,"uÓ֗LdIُۘEcc✒`ccv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"@@"
	mov $403,"ucccv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"@@"
	mov $405,"䘸i\NYVtCr{B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"ccAC@r椎ΓssB"
	mov $423,"}XB"
	mov %120,406: mov %121,406:mov %122,24:gosub *messagefont
	mov %120,423: mov %121,423:mov %122,24:gosub *messagefont
	$406@/
	$423/
	add $406,$423/
	@

	mov $407,"śfCᗢʍ{vL@C"
	mov $408,"ctqiB"
	mov %130,407
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"@@"
	mov $410,"FjlalC֐vȁB"
	mov $411,"vȔV㱗LwqCޛsB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $412,"o㈟B@CFACn[B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $413,"RC㈓ލB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $414,"NSIٜޔЎ[xDcc"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $415,"Cߘcc"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $416,"A܁C\cc㏗Iwqcc"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"uA䱁ccv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"@@"
	mov $403,"uHv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"@@"
	mov $405,"ucccv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"@@"
	mov $407,"ґRC\CAډIԋpzsoB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"漁AADAJB"
	mov $409,"uލssƁB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $410,"IjlFݜޔ܍Yr藁H"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $411,"@ʊ䍂悘ECߓR悓IB"
	mov $412,"Aa\HρCޔЗ@C"
	mov $413,"VCCݐaɟ󓞊xB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $414,"ݒjlalVI@B"
	mov $415,"ߐBqlIܐ́B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $416,"٘V~濜ޘECrٔ䌃ÁB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $417,"@@"
	mov $418,"RC^痩sB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $419,"ccsCF\CꏳSNጔCEH"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"vLpCR꘢qUIjl擑IB"
	mov $402,"pePCpg蜚IߔƓI䱁B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $403,"FqlssmƒYrώqB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"ϓIFC^I\DDn擈wqEH"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"@@"
	mov $406,"ccc"
	mov $423,"sCU_CَiYB"
	mov %120,405: mov %121,406:mov %122,24:gosub *messagefont
	mov %120,423: mov %121,423:mov %122,24:gosub *messagefont
	br
	$406@/
	$423/
	add $406,$423/
	@

	mov $407,"ۍC\ވCYrH"
	mov %130,407
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"vVCvqlNẃC\B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"@@"
	mov $410,"u䱁Bv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $411,"@@"
	mov $412,"uYrC_ܚvIv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $413,"@@"
	mov $414,"uߍKIB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $415,"߁C֗LFIwqBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $416,"@@"
	mov $417,"ucccv"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\

	textoff

;aflFfree0512.mp3@iv[v
	bgm "bgm\free0512.mp3"
;G\F@GvE΁@ʒuF
	ld c,":a;tatie\miki\epron_bisyou.bmp",12
	texton

	mov $401,"uݏ݁cczVC"
	mov $402,"ō@܏oIԏAޘHv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $403,"@@"
	mov $404,"uccHv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"@@"
	mov $406,"udzߍI乗@kB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $407,"@rẃC"
	mov $408,"ߑ甐lKߚvBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"@@"
	mov $410,"ucccv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $411,"@@"
	mov $412,"usEHv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $413,"@@"
	mov $414,"uܓvցBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $415,"@@"
	mov $416,"uߏACaϏADB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $417,"YrdIsspB"
	mov $418,"gYrssCَiY甑ƍKIB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $419,"CߐϓIlC˔cؓshߗGBv"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"䱕ZI]Ccc_݉INB"
	mov $402,"uߕC\Ỉ⁗嗈B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $403,"ΛElNBِSN^g̓IG刁B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"ґR䐥{sߐlCA\꒼MCB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"@@"
	mov $406,"uٕsNBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $407,"z]CֈӛΓޖ璳]B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"ccFV㱁CEsvgB"
	mov $409,"szCvRnٔލADB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $410,"@@"
	mov $411,"uIv"
	mov $412,"@"
	mov $413,"@"
	mov $414,"@"
	mov $415,"@"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\

	textoff

;G\F@GvE@ʒuF@tF[hȂ
	ld c,":a;tatie\miki\epron_odoroki.bmp",1
	QUAKE 10,150

	texton

	mov $401,"uޛI݁AߊvHv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"@@"
	mov $403,"LFZ䱓IwC\NB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"@@"
	mov $405,"uFoJB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"䱊蓓I@C֋hYrsȚGB"
	mov $407,"uȏjIqvIv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"@@"
	mov $409,"uˑRtވoC֐^B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $410,"occ݁C甉cEIv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $411,"@@"
	mov $412,"ŒQ㵒n݉㏗I䱁C䊴ٔ吗B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $413,"ݓߓV[}ܒuFv݈NvIC"
	mov $414,"ߖ͌ЕsI"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $415,"@ߍ@B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $416,"ᚊ椒䏊VlC"
	mov $417,"NhoIwqB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $418,"IُۜƉCȓIlVƑB"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\

	textoff

	bg black,12
	delay 2000

;wiFuāAŌq́\\v@ʏtF[h
	bg "cutin\dai3kou\cutin_30.jpg",12
	delay 2000
;wiFuƁwƑxɂȂ̂Bv@ʏtF[h
	bg "cutin\dai3kou\cutin_31.jpg",12
	delay 2000

	bg black,12
	bgmfadeout 2000
	bgmstop
	delay 3000

;aflFfree0539.mp3@iv[v
	bgm "bgm\free0539.mp3"
;wiFG߁EH@ʏtF[h
	bg "bg\dai3kou\kisetu_aki.jpg",12
	delay 3000
;wiFЉȏ@ʏtF[h
	bg "bg\dai3kou\homare_syakaika.jpg",12
	delay 1000
;wiFЉȏiuj@tF[hȂ
	bg "bg\dai3kou\homare_syakaika_bure.jpg",1
;G\Fd@ʏ@ʒuF
	ld c,":a;tatie\yaezono\tuujyou.bmp",12
	delay 2000

	texton

	mov $401,"uŋ߁CVˑR◹B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"qCnFC"
	mov $403,"smsuC~VCNBJBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"@@"
	mov $405,"]xOCdИVȗB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"٘V܁CNNŖZIB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $407,"ONtIwFCeIw͒B"
	mov $408,"O敓w܊wC"
	mov $409,"SCVZrʓIB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $410,"l\lI\AwIalAhg\Aw㈜qB"
	mov $411,"SCV糊IVC"
	mov $412,"֓^gIB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $413,"@@"
	mov $414,"|獁AJ蚁A瀔ǁAAVwy݁AV糊B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $415,"LaILwFC"
	mov $416,"VvLʘIB"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"uFޔ\^IVC"
	mov $402,"^ӓIwZxC^IBx"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $403,"z肏Av}njʓI\񌎁C"
	mov $404,"蕐ÉS슐ISsvLBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"@@"
	mov $406,"ܒCC`㣔C|tqB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $407,"ŗCޘlLcYrs|tqĊIxB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"@@"
	mov $409,"umwZIV݊Yr@C"
	mov $410,"䱛lkzJHv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $411,"@@"
	mov $412,"u\DEx藁B"
	mov $413,"݊wZIFAE֜ލBv"
	mov $414,"@"
	mov $415,"@"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\

	textoff

;G\Fd@΁@ʒuF
	ld c,":a;tatie\yaezono\bisyou.bmp",12

	texton

	mov $401,"uvCvCCngnAkDB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"rρC@v@Hݐ{Hv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $403,"@@"
	mov $404,"u掵BCݐ攪ICB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"qELDPAC獫嗹cc"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"@@"
	mov $407,"uܓr̓II"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"ߖ\^y@YrH"
	mov $409,"^FIv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $410,"@@"
	mov $411,"uFAFYrIcc"
	mov $412,"ޔЎ֐DDǗˍsJB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $413,"aA`I^琥C"
	mov $414,"vEˍsC\䐥sÁcc"
	mov $415,"䱏AρBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $416,"@@"
	mov $417,"uߓRskBߏASB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $418,"wqޔЗ@CȏAʑCR@ؓIꉺAoBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $419,"@@"
	mov $420,"uccLl劮SϓIԁccv"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\

	textoff

;G\Fd@ʏ@ʒuF
	ld c,":a;tatie\yaezono\tuujyou.bmp",12

	texton

	mov $401,"uL㏛sIVkݐgCsȗIB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"sCoِ_ߕsDGB"
	mov $403,"sLԋaRSEH"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"ߛwqRIώqː\I{B"
	mov $405,"zzrx\C"
	mov $406,"˔\sj\IޔЎRJHv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $407,"@@"
	mov $408,"uޘccӐϖvցccv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"@@"
	mov $410,"ug̓IChIlmADB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $411,"sLIjጓI㐶EHv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $412,"@@"
	mov $413,"uvLC֖vLQIlB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $414,"\C̑NSC"
	mov $415,"꒼v\艺ጓI㐶Bv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $416,"@@"
	mov $417,"ꎟwqC˂PUӓIԁC"
	mov $418,"䐥oꍱWaVJB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $419,"@I㐶ىFێ餁C"
	mov $420,"vLlÈӎÒSCገ㐶B"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"ʏ΁C\ޘN֐ꖼB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"sʔ\N@C"
	mov $403,"A㏒qI\CRlpϓIڌőҁB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"䘸ua䱓IaȓIC"
	mov $405,"_svLB"
	mov $406,"ٍC\琥ϓIz@B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $407,"RCݐlᒆCFAB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"\{ӓIo㈟B㏛sqC"
	mov $409,"ݔw៍@鏊ܓIwaxIsCB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $410,"@@"
	mov $411,"܁C֐CswqB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $412,"@@"
	mov $413,"ސCǋ`IẄӛ΁C"
	mov $414,"ވ_疾B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $415,"RCsLlsލB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $416,"L̎㑽aIlAsKIlAvH{IlAvLƐlIlB"
	mov $417,"l񕽓B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $418,"嘢lsLeIvaӎuB"
	mov $419,"@LYrϓI@ӛ΁C"
	mov $420,"ss\SZވ؁B"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"ccAC֔@C㱘RsÈӏ\ݒ[B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"U\꘢ݒ[C"
	mov $403,"Ass\񘢁B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"ޛܒv孍IȁB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"ЉKlv筌ŁB"
	mov $406,"嘰_懓IЉCAp惍HVi[ϐƎB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $407,"@@"
	mov $408,"C@ClFˉЉ峖ŁCwǒmC"
	mov $409,"ݗ^ݒ[ҔVቺꓹEC"
	mov $410,"sʔƗ^m拌nB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $411,"U׉zߏECȖݒ[B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $412,"VsݜޔЋ៙]]C"
	mov $413,"w͑쐥wlxB"
	mov $414,"@"
	mov $415,"@"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"u㐶vQsIԁC߉WB"
	mov $402,"sEc"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $403,"mCIlߝQlmȈ㐶IBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"@@"
	mov $405,"u^sDӎvC漗Bv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"@@"
	mov $407,"uvvCdqB"
	mov $408,"މCI@aIwvB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"sܐ^ICߜޔЈ{EIlC"
	mov $410,"R֐擖貁c"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $411,"ސ֐^sB"
	mov $412,"FʓsC"
	mov $413,"CYrAvlQ藁Hv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $414,"@@"
	mov $415,"ŗClٔB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $416,"R̐TCLslفC"
	mov $417,"܋IkːB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $418,"@@"
	mov $419,"uAޔЎvC֐^ccv"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"uߏAJCވZӓIsKqC"
	mov $402,"䋎ŊߑFٌIvJB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $403,"hވʉp\IslC"
	mov $404,"Փ__I@勎rρHv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"@@"
	mov $406,"uߑwsfxIˎvGB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $407,"ŋ\|蓋h[I@藁Bv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"@@"
	mov $409,"u@C[I@Bv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $410,"@@"
	mov $411,"u܋NCdИVDvv藁B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $412,"\񗈉G\IC䱈kCSIBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $413,"@@"
	mov $414,"uGCߏA\悍JIv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $415,"@@"
	mov $416,"瀓MГIOC꘢ǋX嗝zIjlB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $417,"䐥cȓIō@C"
	mov $418,"꘢s嘰ΏlIjlB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $419,"v֐CA꒼ǓJB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $420,"dЗEޘjlC^✐ٓIlB"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\

	textoff

	bg black,14
	bgmfadeout 2000
	bgmstop
	delay 3000

;wiF}VOρi[j@ʏtF[h
	bg "bg\dai3kou\mantion_gaikan_yuugata.jpg",12
	delay 3000
;ʉFK`
	dwave 2,"wave\dooropen04.wav"
;wiF}V̌ց@E獶֒ʏtF[h
	bg "bg\dai3kou\mantion_genkan.jpg",87
	delay 3000

	texton

	mov $401,"u񗈗Bv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"@@"
	mov $403,"ߓdИVvIC"
	mov $404,"䗧zG\B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"㏒ϓISCzxcH읾C"
	mov $406,"䕽c_񓞗ƁB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $407,"@@"
	mov $408,"ccRCᚊҗB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"jC\s肏}oC"
	mov $410,"VpvLCB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $411,"ŗC䱏ojB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $412,"@@"
	mov $413,"\݉䕽񗈓I㱑Oz񗈁C"
	mov $414,"AHVIqZC開ECn~濗B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $415,"gݎsCÓIHوʐg㏘ZbIܖ琥aIB"
	mov $416,"]\\َn񗈁B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $417,"ˑRϓIO_C"
	mov $418,"ΒpZ荔B"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"uuߐ^SBvv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"ӁccvցB\ӊǓB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $403,"n甔䱏ƎȓIz@C"
	mov $404,"\\͒EoB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"CqIwqCssKvI熁B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"ϑzCE܎qcc"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $407,"@@"
	mov $408,"cccccc"
	mov $423,"pጺgrL\I܎qB"
	mov %120,407: mov %121,408:mov %122,24:gosub *messagefont
	mov %120,423: mov %121,423:mov %122,24:gosub *messagefont
	br
	$408@/
	$423/
	add $408,$423/
	@

	mov $409,"@@"
	mov $410,"jC䱏pvLoB"
	mov %130,409
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $411,"rC허܉\C\oB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $412,"TC琥rzIB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $413,"@@"
	mov $414,"ccAC܎q֍ݜޗB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $415,"@܁cc@܁C\ӏA݉ƗIԁC"
	mov $416,"CYr\vL藁H"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\

;ʉFz[@[vȂ
	bgmonce "bgm\horror4.mp3"

	mov $401,"ssCssCÓ_CَiYB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"𔈁CҎUSIsB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $403,"s獐׎ȕsvSSEH"
	mov $404,"Ó_CsvQB"
	mov $405,"B\asI܎qojB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"䐥IzCޘlsDIxB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $407,"@@"
	mov $408,"َܒCw甎ȕێÁB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"RccUFCnNTIޔЕsC"
	mov $410,"@rҎUsٖ@SEB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $411,"rzҎUCz꜒n赏㗈B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $412,"@@"
	mov $413,"u䱏Iv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $414,"@@"
	mov $415,"䒩s营ۍ݉ƓI\^ꐺC"
	mov $416,"R@sB"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\

	textoff

;ʉFh^h^iQu̖`ŗgh^o^łnjj@[vȂ
	dwave 2,"wave\StepC11.wav"
	bg black,12
	delay 2000

;aflFfree56.mp3@iv[v
	bgm "bgm\free56.mp3"

;wiF@ォE֑tF[h
	bg "cutin\dai3kou\blood.jpg",85
	delay 2000

	texton

	mov $401,"ꓥqGCғݖ~@B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"虐IHLaƓIhB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $403,"@@"
	mov $404,"B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"@@"
	mov $406,"cc\|ݗnB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $407,"n㖠CIʌ瑁C"
	mov $408,"䱓IgAoڔV㱗oIB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"㏛sI\̗CވӖcc"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $410,"ٙXmoYrVB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $411,"@@"
	mov $412,"u䱏IIv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $413,"@@"
	mov $414,"t勎Ě^\CA\Eӛ΁B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $415,"LRÓIԁCيOslܔXaC"
	mov $416,"SSn^\IċzảB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $417,"g֐gIC֕|݌ċzB"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"e欈ŁCnI瑘\|IʒuC"
	mov $402,"꒼LuIB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $403,"瑏㎗Ll刽҈ߕCCLB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"T\ݓߗד|C"
	mov $405,"҈C^ЌܒvoI䱁C"
	mov $406,"HওݜޘʒuB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $407,"iqĜInCLꕔ衒ԁB"
	mov $408,"\营sS͑zvċ~B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"@@"
	mov $410,"nI瑍ݗ[}IƎˉC"
	mov $411,"ICŋNSvLB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $412,"ގZsKIKEH"
	mov $413,"݉ƑOsvېIB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $414,"@@"
	mov $415,"}Z\NԓCcwLmB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $416,"Aݓ߈u㱁CsmCdИVIc|CC"
	mov $417,"A֐拌n拌nInXdvB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $418,"|s๘nPPXCr苩~́B"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\

	textoff

	bg black,12
	delay 2000
;ʉFh^h^@[vȂ
	dwave 2,"wave\StepC11.wav"
;wiF}V̕i[j@ʏtF[h
	bg "bg\dai3kou\mantion_room_yuugata.jpg",12
	delay 2000

	mov $401,"uuINHvv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"@@"
	mov $403,"uuPUӁccޘ~VAxPVBvv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"@@"
	mov $405,"u运\IZEHv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"@@"
	mov $407,"usC䐥\IvBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"@@"
	mov $409,"sv@zI}~玁C"
	mov $410,"ߗIًNB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $411,"ݛEُCCޔД䑁AxB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $412,"ݜْԓI㱌C䱔흫SˁC"
	mov $413,"R@^o[㱁B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $414,"Cv黌C䍐GF^C"
	mov $415,"َI\ӁB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $416,"C@C"
	mov $417,"Ll黌B"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"u\aqIwqvVJHv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"@@"
	mov $403,"uvacc"
	mov $404,"k\ʑٜ餁Bv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"@@"
	mov $406,"uʑٜccHv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $407,"@@"
	mov $408,"uٜٙXh擘aʟI튯B"
	mov $409,"IpA甑ٙX\槐ڝ̒񋟓I؁Bv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $410,"uʏvCޘ튯ݐm@˔餁C"
	mov $411,"AL㏛s㱒O餁Bv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $412,"u@ېޔЏvCٙXIʟAfC"
	mov $413,"̖oʏoBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $414,"uݕqsraI߁Bv"
	mov $415,"@"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"\{ӓI䱁C\I䌌ʐr֕sqrQI\B"
	mov $402,"nߐGڝSI瑗"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $403,"\EItB"
	mov $404,"lItgdʓIW%B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"@ʎꔼCAܒvSB"
	mov $423,"DPE{H"
	mov %120,405: mov %121,405:mov %122,24:gosub *messagefont
	mov %120,423: mov %121,423:mov %122,24:gosub *messagefont
	$405@/
	$423/
	add $405,$423/
	@

	mov $406,"@@"
	mov $407,"uD攪Bvv"
	mov %130,406
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"@@"
	mov $409,"uD攪Bv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $410,"@@"
	mov $411,"urC֗L\~񗈁B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $412,"FvUmsx}؁C"
	mov $413,"ȘEHv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $414,"@@"
	mov $415,"u@ʜϔ\~qlIcc"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $416,"`Iv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $417,"@@"
	mov $418,"urCSxJBv"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\

	textoff

	bg black,12
	bgmfadeout 2000
	bgmstop
	delay 2000

;ʉF~}Ԃ̃TC@[vȂ
	bgmonce "bgm\nori_ge_kyukyu01.mp3"
;wiF~}ԁ@ʏtF[h
	bg "bg\dai3kou\kyukyusya.jpg",12
	delay 3000
	bg black,12
	delay 2000
;wiF~}ԓ@ʏtF[h
	bg "bg\dai3kou\kyukyu_naka.jpg",12
	texton

	mov $401,"wޗgs~͂OTB"
	mov $402,"CPUӏC㏛sRQB"
	mov $403,"ʏoBLٜychbI\B"
	mov $404,"^x"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"@@"
	mov $406,"}~͓CIBaەixxB"
	mov $407,"\ߓ玒拌n@IB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"ޔПccE񎟗B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"ޕsꎟ~́B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $410,"@֐݁CQ݉ʑOIsŐIlB"
	mov $411,"ޔКs[I甉sB"
	mov $412,"@"
	mov $413,"@"
	mov $414,"@"
	mov $415,"@"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"ucccccYccv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"@@"
	mov $403,"vLߔ㟕IoIB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"ŁC䱔CˁC"
	mov $405,"F糎lCԝQB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"@@"
	mov $407,"uccَiYccv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"@@"
	mov $409,"\IcC^wxI`暏d斋NB"
	mov $410,"@"
	mov $411,"@"
	mov $412,"@"
	mov $413,"@"
	mov $414,"@"
	mov $415,"@"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"u䱁IݜޙXCAݜޙXIv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"@@"
	mov $403,"䈬Z\ICpo菫ZB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"\CʓItC\IuyuyIB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"CYrߏ΁cc"
	mov $423,"CYrߏ΁I"
	mov %120,405: mov %121,405:mov %122,24:gosub *messagefont
	mov %120,423: mov %121,423:mov %122,24:gosub *messagefont
	$405@/
	$423/
	add $405,$423/
	@

	mov $406,"퐗IleCE槗B"
	mov %130,406
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $407,"@@"
	mov $408,"uَiYccߗcc"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"߁cccc꒼M߁ccv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $410,"@@"
	mov $411,"uvC@AݑOʕsrBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $412,"@@"
	mov $413,"\E|A[x͖ppduI\C"
	mov $414,"\IcF喔B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $415,"ߑo\EkIˎʁC"
	mov $416,"FI{O獫FB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $417,"gݜϓIC\g̓Io\֍]B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $418,"ꕪ艁C_AN߈scc"
	mov $423,"ssIqB"
	mov $419,"@"
	mov $420,"@"
	mov %120,418: mov %121,420:mov %122,24:gosub *messagefont
	mov %120,423: mov %121,423:mov %122,24:gosub *messagefont
	$418@/
	$423/
	add $418,$423/
	\


	mov $401,"uٕsNccߒSScc"
	mov %130,401
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"CnˑRuuCڒAccoccsZccv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $403,"@@"
	mov $404,"uvIC~IBqIwqَB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"ȁcc筎ZC䱏Bv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"@@"
	mov $407,"\OLIgCnۗ㒅\B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"_Jcc_@JB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"ݜϓI䱏C"
	mov $410,"\ی~smC"
	mov $411,"A损C\\M㐶IZB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $412,"v݈@s黌C"
	mov $413,"ݜޔЌtsI߉C\ꍱB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $414,"@@"
	mov $415,"u]Iv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $416,"@@"
	mov $417,"ˑRC~桙玚^ꐺB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $418,"@@"
	mov $419,"urHv"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"uŋߓIڍ@C"
	mov $402,"CL}iҁCٖ@ڝFBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $403,"@@"
	mov $404,"u苋s@JB"
	mov $405,"䕽AݓŕaIBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"@@"
	mov $407,"uBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"@@"
	mov $409,"xgB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $410,"ڍ@s@IґRsZC"
	mov $411,"AݑBbIvCޘӊOӍݐvIňB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $412,"@@"
	mov $413,"uC筎ZIv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $414,"@@"
	mov $415,"Œ䱏IcFˍX喔CS}@nܓB"
	mov $416,"sfnܒۗIԁB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $417,"ޘR^㱁cc^^B"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"wޗgs}~_OTB"
	mov $402,"CPUӏC㏛sRQB"
	mov $403,"ʏoBLٜychbI\B"
	mov $404,"^x"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"@@"
	mov $406,"Aז͔ρC"
	mov $407,"}~玕sfdڍeB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"eґRaˈϖvLC"
	mov $409,"A䱓IvpݒmB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $410,"_黌cc_cc"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $411,"@@"
	mov $412,"uٕsNIv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $413,"@@"
	mov $414,"uގrHv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $415,"@@"
	mov $416,"u܎@ٖ@ڝҗBv"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"@@"
	mov $402,"ur\ccIv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,36:gosub *messagefont
	gosub *textwright
	@

	mov $403,"@@"
	mov $404,"䉺ӛΒn񍂗B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"qƓssꐔI@B"
	mov $406,"RsƁCqƐ蕕sfn"
	mov $407,"ٖ@ڝ꘢}iҁCޓꐥr񎖁H"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"@@"
	mov $409,"u营t֗JI"
	mov $410,"\꒼ݓߗAiC^IIv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $411,"@@"
	mov $412,"uC˖ܗC"
	mov $413,"厡㐶ݕs݁CJHv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $414,"uґR@CALȓIrC"
	mov $415,"ِx}vӗLÁB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $416,"mȈ㐶IʐŒIccv"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"urYrIcc"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"~ls㐶IጘEHv"
	mov $403,"ƓsMIII"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"AC꘢rA笊ҁCޖ瑾ccIv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"@@"
	mov $406,"uىۉΖvpI"
	mov $407,"֖٘vLDڝyݓI@C"
	mov $408,"s\|sclJHv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"@@"
	mov $410,"uccIv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $411,"@@"
	mov $412,"uVCzxJCύXB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $413,"餜ޗŋ߁AC塑SI"
	mov $414,"w@ccȘEHv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $415,"@@"
	mov $416,"ucccc"
	mov $423,"`ccv@"
	mov %120,415: mov %121,416:mov %122,24:gosub *messagefont
	mov %120,423: mov %121,423:mov %122,24:gosub *messagefont
	br
	$416@/
	$423/
	add $416,$423/
	@

	mov $417,"@@"
	mov $418,"ӁCݜޗ]@vLӖB"
	mov %130,417
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $419,"xۓ{^笖]C֐闹B"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\

	textoff

;wiFuW̈҂͂Hv@ʏtF[h
	bg "cutin\dai3kou\cutin_32.jpg",12
	delay 2000
;wiFu҂߂܂񂩁A͂ȁv@ʏtF[h
	bg "cutin\dai3kou\cutin_33.jpg",12
	delay 2000
;wiF~}ԓ@ʏtF[h
	bg "bg\dai3kou\kyukyu_naka.jpg",12
	texton

	mov $401,"cc@ʁC\XaʓIԁcc"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"@ʁC݋~͔VOC拌nIԁcc"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $403,"䱏݉\EݎB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"IBوIꕪ㏋^B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"AdЈ㐶ccAݓߘu㱁B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"@@"
	mov $407,"ucc䱏B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"CF@JB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"肏cc肏ACґ筎ZBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $410,"@@"
	mov $411,"\ܓIԗC˓IߔƙX暏B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $412,"OI\CEs䏊\ΓI䱏B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $413,"\SC_獫󓴁cc"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $414,"䈬IEvLxC"
	mov $415,"{NOpޑICAIρB"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\

;aflFfree0517.mp3@iv[v
	bgm "bgm\free0517.mp3"


	mov $401,"ޔcc"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"sCBCޔJcc"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $403,"a\NxIߍKyCꖋOSB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"@@"
	mov $405,"CnwZ@C哖\𗹈꘢pFC"
	mov $406,"sɛځB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $407,"ߘlޗsDCߗs\ӔVIC"
	mov $408,"䐥Ӓnhdlhcc"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"sCō@\uAޘlވ_kDvC"
	mov $410,"BoٕIꍱ_B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $411,"@@"
	mov $412,"IC\\䔆\C߁B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $413,"餓sC\aFNADC"
	mov $414,"Bʋp\n嗹܁uϓIߕs嗹EvC"
	mov $415,"ō@sRܒn|sgB"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"CnqlNIC\ŐoIvF"
	mov $402,"usvەiBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $403,"udىprFOIgBv"
	mov $404,"\nܗCAߛES^IܒԕC"
	mov $405,"pqss嗈B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"\ґRٓޖC"
	mov $407,"Aō@pΒ܁FusCޑTAَiYJBv"
	mov $408,"smsu㱁C\XRB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"@@"
	mov $410,"ꎟ蟓IC"
	mov $411,"ې_XÁcc"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $412,"Cڔc蟚ǒőΗ͓IFqC"
	mov $413,"BʊOʏCʋpsnC"
	mov $414,"ސ^ĎwsIꎟB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $415,"@@"
	mov $416,"I\CΒI\CៃI\CQ㵓I\B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $417,"\䐥exC^\݈NsցB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $418,"@@"
	mov $419,"ߘ䱁ccߘ䱁CCYrρcc"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"ґRٕsNC@I@ʘVC"
	mov $402,"A@ʜޘE^IL_CzB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $403,"迓ꐥoYrRCv甜ޘw@ɋH"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"\AsKB"
	mov $405,"vLwqϓKC"
	mov $406,"\㏒ِEICcgWB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $407,"hϓIwՋKCLYrցH"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"gCsKVlCލdrٖWB"
	mov $409,"v\݉gCAxB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $410,"cc"
	mov $423,"cccccc"
	mov %120,410: mov %121,410:mov %122,24:gosub *messagefont
	mov %120,423: mov %121,423:mov %122,24:gosub *messagefont
	$410@/
	$423/
	add $410,$423/
	@

	mov $411,"@@"
	mov $412,"ucc䐗߁C䱏B"
	mov %130,411
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $413,"ޘEIClsX߁B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $414,"ȁccȁC苈꒼݉gB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $415,"svǉC꘢lIBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $416,"vL߁ccccv"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"CnaȁCIt̘oኊB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"@\\~CÈӕtoI؁B"
	mov $403,"ȁC߁CsvՑ\B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"\֓rNSB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"؍CnB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"FCQȓIC"
	mov $407,"ލCswqcc"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"ډC\[ӎKIlفB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"CYrvݜޘccB\藁H"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $410,"\NANccsCAZ꘢ADB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $411,"h꘢JB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $412,"hґ䱈꘢hXKIJB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $413,"@@"
	mov $414,"u݁cc"
	mov $423,"ޘ`Vcc"
	mov %120,413: mov %121,414:mov %122,24:gosub *messagefont
	mov %120,423: mov %121,423:mov %122,24:gosub *messagefont
	br
	$414@/
	$423/
	add $414,$423/
	@

	mov $415,"꘢lCR݉cceenLsccv"
	mov %130,415
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $416,"@@"
	mov $417,"ucc䱏ccv"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"œC\IccꍱBI_FB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"ݎ命I܌߉Cō@Iō@cc"
	mov $403,"\RhIō@ΉԁB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"@@"
	mov $405,"uޘ✒`ccÓ݁cc"
	mov $406,"ukccsJccv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $407,"@@"
	mov $408,"ucccv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"@@"
	mov $410,"us嗹EccsvޔЗ@ccv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $411,"ccَiYccc"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $412,"cccc"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $413,"@@"
	mov $414,"uCSpIv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $415,"@@"
	mov $416,"ӓ\vI}~l玁C"
	mov $417,"QZyݒs}~[{B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $418,"@@"
	mov $419,"RC⊏ZF笗B"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"u槗cc甉a\ܙ{ԁBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"@@"
	mov $403,"ucccv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"@@"
	mov $405,"Ғnޓ@ʁB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"}~HIlCޗB"
	mov $407,"ވӖIccL꘢B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"@@"
	mov $409,"uَiYccَiYccv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $410,"@@"
	mov $411,"uݜޗIv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $412,"@@"
	mov $413,"uډIZ\NccߑzϊEcc"
	mov $414,"ߓVccߐnىܗލԁcc"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $415,"cc߁ccΉdVYlcc"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $416,"甉^Szvȁccv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $417,"@@"
	mov $418,"暙uIٗ́C"
	mov $419,"AӉ񈬏ZIB"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"uVccskScc"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"\F߁cc^IkKcc"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $403,"َiYcc䐗߁ccv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"@@"
	mov $405,"u琗߁C䱏Iv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"@@"
	mov $407,"uccEKs\čKcc"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"țccdIoߔЏDcI\cc"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"ō@œIcCߚLIcYrIcc"
	mov $410,"ccszϛccv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $411,"@@"
	mov $412,"EZ៣C__B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $413,"@@"
	mov $414,"uґRcc꒼ȗsCscc"
	mov $415,"Aގccō@I苋ccJcc"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $416,"qIwqccS͕桍Dcc"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $417,"țcc甜ޘwqKJcc"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $418,"A甉䊴Kρcc"
	mov $419,"]ޘwqcc\Kccv"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"uDICB甑KIIv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"@@"
	mov $403,"umcc^zŊ藁cc"
	mov $404,"aَiYIcccc"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"AccޗAccdI󗹁cv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"cc摖sccݓcc߁cc"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $407,"@@"
	mov $408,"u䱏ccIv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"@@"
	mov $410,"\{E~ċzB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $411,"s\~sZCp~ؒӎu͗ݜޘEB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $412,"^ICō@Iō@cc\r|I꘢lB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $413,"@@"
	mov $414,"u`ccē꘢苋ccȘEcHv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $415,"@@"
	mov $416,"uDICYrsȁIv"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"uzvccꉺcc"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"ō@ꎟccߎ×Jc"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $403,"ߐjIccsEcHv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"@@"
	mov $405,"uccceBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"@@"
	mov $407,"C៣Cϋ\IcB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"zNCߓV[}ꎟڕȗC"
	mov $409,"ޔЎ꒼sR\ÏSB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $410,"܁CTAߔЗWIvJC"
	mov $411,"{CϖvYrsDB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $412,"ccACTC\꒼ɊҒ\槎ϋ\B"
	mov $413,"\]Ë\ISӁB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $414,"@@"
	mov $415,"rCAcޓ\C\Iō@ᚐSJB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $416,"ϑzCSSn{O_㗹\I{OB"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\

	textoff

	bg white,12

	bgmfadeout 2000
	bgmstop
;wiFuLX̒ŁA͂ЂƂ܂ڂAv@tF[h
	bg "cutin\dai3kou\cutin_34.jpg",15
	delay 2000
;wiFuāAɗĂBv@tF[h
	bg "cutin\dai3kou\cutin_35.jpg",15
	delay 2000
;wiFuʂ̌tɂAv@tF[h
	bg "cutin\dai3kou\cutin_36.jpg",15
	delay 2000
;wiFuʂɍKȏ΂݂𕂂ׂāBv@tF[h
	bg "cutin\dai3kou\cutin_37.jpg",15
	delay 3000

	bg white,12
	delay 2000
	bg black,12
	delay 4000

;ʉFXY̖@[vȂ
	dwave 2,"wave\suzume.wav"
;wiF}VOρ@ʏtF[h
	bg "bg\dai3kou\mantion_gaikan.jpg",12
	delay 3000
;wiF}V̕@ʏtF[h
	bg "bg\dai3kou\mantion_room.jpg",12
	delay 3000
;ʉFW[W[iĂj@[vȂ
	dwave 2,"wave\niku2.wav"
	texton

	mov $401,"峗Ij|C"
	mov $402,"pIΌnB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $403,"R@ݏʑň꘢P`CcꉺC"
	mov $404,"|ʓI@᳏j᳁B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"{艍@Cj᳁C؏DÍC"
	mov $406,"P`snC|`AB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $407,"ސ\pI@B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"@@"
	mov $409,"Lfia|`Ius槁CȁC"
	mov $410,"ĘꓹlIfB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $411,"ĉtUCϜ擓zAىB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $412,"x^IC"
	mov $413,"UCnVN`\^h趓IC"
	mov $414,"VNAsuɋꗹB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $415,"@@"
	mov $416,"XvCƗL瀐ිiIwqC"
	mov $417,"As꘢lρC"
	mov $418,"֗pfiaYVۗcc"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $419,"ccCŋNENB"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\

	textoff
	delay 1000
;wiF}V̕iuj@tF[hȂ
	bg "bg\dai3kou\mantion_room_bure.jpg",1
;aflFfree0539.mp3@iv[v
	bgm "bgm\free0539.mp3"
;G\F@ʏ@ʒuF
	ld c,":a;tatie\kenta\tuujyou.bmp",12
	delay 2000

	texton

	mov $401,"uC貁Bv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"@@"
	mov $403,"uDCBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"@@"
	mov $405,"꘢㮓INqGB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"a䱔V㱓IwqB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $407,"IFIۘaQVIiC"
	mov $408,"ߑoI˘aoFI^ÓV܍򑜑pB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"BCh於ÍC"
	mov $410,"ґRApqoImXC"
	mov $411,"N㮒nʑ嗹B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $412,"@@"
	mov $413,"ucEHv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $414,"@@"
	mov $415,"uC嗹Bv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $416,"@@"
	mov $417,"uߏACJBv"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"ٛwqIgˑRkeB"
	mov $402,"ޓ_sB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $403,"璍ӓCadIܒԓIs"
	mov $404,"s呼vL\oYrsxB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"TupAϓIlJB"
	mov $406,"I_a͉ʑR\B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $407,"@@"
	mov $408,"u^ÕEDC"
	mov $409,"dYՏGBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $410,"@@"
	mov $411,"uBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $412,"@@"
	mov $413,"sY@IwqCp֐In_闹B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $414,"^GIXqB"
	mov $415,"@"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"TCmCHɖZC"
	mov $402,"vLoCIvCvL\oCRB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $403,"ΖZcC"
	mov $404,"cLsnȉrB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"݊œƐgIȈρB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"@@"
	mov $407,"ÉC{vL甉糑IB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"\搥㏒ϓISda藁C"
	mov $409,"ݓIf\pg̉B"
	mov $410,"@"
	mov $411,"@"
	mov $412,"@"
	mov $413,"@"
	mov $414,"@"
	mov $415,"@"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\

	textoff

;G
	cl c,12
	bg "bg\dai3kou\mantion_room.jpg",1

	texton

	mov $401,"uhkIv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"@@"
	mov $403,"Œnh趍؁CvLHC"
	mov $404,"r֖݉vCOAÔc`\B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"CqG@C㱍C"
	mov $406,"R@񓞎ȓI[㱐DwIy݁C"
	mov $407,"ō@aNoہB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"^ccG甐lȓIXqB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"@@"
	mov $410,"sE㱕ˌ[㱓IpB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $411,"ݓߗIyC"
	mov $412,"\ȉIϔΒB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $413,"@ʊœFϓIC߉悘EH"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $414,"֐܁CʑR֐藁H"
	mov $415,"@"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"pEsݗCƕВIl֜kNSC"
	mov $402,"ȓI^pIdB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $403,"ґRޗ^ʉƒIώqSsC"
	mov $404,"A٘ލCp\B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"uϓIlHv"
	mov $406,"ڒoϓI^C"
	mov $407,"原sGC\ψ꘢lC"
	mov $408,"ȋyLr\B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"BC@CpȓI㏔Oߌ̓IpC"
	mov $410,"[[n\B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $411,"@@"
	mov $412,"䐬QpIB"
	mov $413,"AsߔЉ䈓IwqB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $414,"C󓞎ȐIgCrS蕓pIᚈNC"
	mov $415,"ܒnݎȓIHB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $416,"g痬IC"
	mov $417,"AXIC福pINB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $418,"܁C݌gœI"
	mov $419,"\IeqܕsB"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"@@CXqI"
	mov $402,"甉I[x㲁B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $403,"Cs\ncLIs椒hϓIXqB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"@@"
	mov $405,"㱛E\N勎B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"\IIЁC@ˑRݔs䊁B"
	mov $407,"@"
	mov $408,"@"
	mov $409,"@"
	mov $410,"@"
	mov $411,"@"
	mov $412,"@"
	mov $413,"@"
	mov $414,"@"
	mov $415,"@"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\

	textoff

	bg black,12
	bgmfadeout 2000
	bgmstop
	delay 3000

;ʉFKKK
	dwave 2,"wave\dooropen07.wav"
;wiFVEЉȏ@E獶փtF[h
	bg "bg\dai3kou\bunei_syakaika.jpg",87
	delay 2000
;BGMFfree0210.mp3@iv[v
	bgm "bgm\free0210.mp3"

	texton

	mov $401,"u⿉DIv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"@@"
	mov $403,"uDIv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"@@"
	mov $405,"[㱁CaxcΗeIdИVŗāB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"ޗAwIЉȏyݎB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $407,"FC\͔\C"
	mov $408,"Ȕ{pI`ٗpqlB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"ґRvC[xyI_w甉䊴sqC"
	mov $410,"AwZIs\ݓꏊwZҏkNB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $411,"R@C֐ݎwZ艺C"
	mov $412,"ٖIۓWXDJB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $413,"ϓIz@C|ӗKÁB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $414,"@@"
	mov $415,"ICݗ_wIHEÓ܌B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $416,"슖VwځxCAC"
	mov $417,"{ݖْaCnIo懎I"
	mov $418,"ޔے暍CC"
	mov $419,"ܗ@ЉI͗gnCnl椎΁B"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"sSlCA蕎ې^Iېs^C"
	mov $402,"ݚs@Iw싞jxB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $403,"CʘVllIdt苋C"
	mov $404,"pT@IwLԈlVxB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"ލґRjː͌ЕsC"
	mov $406,"pʒLIj쒆B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $407,"灈ʁCp͍TUIC"
	mov $408,"ȋyoI񍑁C"
	mov $409,"݉z៑孖͓jIC"
	mov $410,"pvLCjyB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $411,"ŗ^\CsoC^vږƉB"
	mov $412,"{Csߜ|CFpYrsܕsoB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $413,"@@"
	mov $414,"ݓ{Csߜ|CFpYrsܕsoB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $415,"z{GInoCFْԉ܁B"
	mov $416,"^ƓI̔@["
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $417,"^ƓI̔@[C"
	mov $418,"喷IaȎvzEN琥RIB"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"uVۗ^sNVtL喷IېC"
	mov $402,"|h{I_TBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $403,"@@"
	mov $404,"u៑BdsC"
	mov $405,"ƈNrf_JBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@


	mov $406,"@@"
	mov $407,"u^És\aNh"
	mov $408,"CvIwquBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"@@"
	mov $410,"喷w៘aI`"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $411,"ŎܓIIԁCATC"
	mov $412,"ݍ{㐥aȓIB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $413,"{IzaȁC"
	mov $414,"AzLl}΁B"
	mov $415,"@"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\

	textoff
	delay 1000
;wiFVEЉȏiuj@tF[hȂ
	bg "bg\dai3kou\bunei_syakaika_bure.jpg",1
;G\Fd@΁@ʒuF
	ld c,":a;tatie\yaezono\bisyou.bmp",12

	delay 1000
	texton

	mov $401,"ugށCꗈA⇍ݓߗB"
	mov $402,"NfCnEHv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $403,"@@"
	mov $404,"ur\藁Hv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"@@"
	mov $406,"dИVΒC]]nΘsB"
	mov $407,"aIC獷sLPVNB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"@@"
	mov $409,"uNޘCrρH"
	mov $410,"zzIՁBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $411,"@@"
	mov $412,"uC_C^I_B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $413,"VCSSISЛB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $414,"ʑRKn_֐\WDJHv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $415,"@@"
	mov $416,"ߓދԁC䏼Cu֐ݜޗDIB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $417,"@ՒޔЖISKIԁC"
	mov $418,"蕓߈ʘGlssJB"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"p㱁Cߘzzqw@B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"苉NC"
	mov $403,"ACzaXqNxCȉUB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"@@"
	mov $405,"u@ʐ搶g֍DEHv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"@@"
	mov $407,"u㎟FICVsB"
	mov $408,"Ns藁Bv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@


	mov $409,"@@"
	mov $410,"uܓޘCdИVC"
	mov $411,"迕sEl\ӗEH"
	mov $412,"sNSގCFFލލJBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $413,"@@"
	mov $414,"udcߜޘLwqIl@B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $415,"lg䫎m藁Iv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $416,"@@"
	mov $417,"smCCAalٔꓞܓ_B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $418,"v֐CTisǓJB"
	mov $419,"ccȑOrzCAvzRlgrvC"
	mov $420,"꒼꘢l哞݁B"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\

	textoff

;G\Fd@ʏ@ʒuF
	ld c,":a;tatie\yaezono\tuujyou.bmp",12

	texton

	mov $401,"uGCٗcc"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"ܓIwLaIwqC"
	mov $403,"ߖmJHv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"@@"
	mov $405,"uCVg̖vLFfIߘwqCJHv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"@@"
	mov $407,"uفBcCR@ߘwqC"
	mov $408,"ݐqlNZIB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"sCD\aQdIB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $410,"@\^IssIԁC"
	mov $411,"scwqړw@Ihq藁C"
	mov $412,"CގۏDIv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $413,"@@"
	mov $414,"uݏhqW̐Ec@ʏoYrVC"
	mov $415,"\kW藁Bv"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"uݒSSވ_B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"ܔVO݌IwZCLw\ߘwqC"
	mov $403,"Bʔlp_ח}藁B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"䈎zzV@C"
	mov $405,"CFÍC\|scv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"cC"
	mov $407,"ߛwqʓVgωCk蓌}藁C"
	mov $408,"\SsÈIwqܒԁB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"މsYrDۛBϔc訋NIlC"
	mov $410,"cLsݐSB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $411,"嘢lSs擒SҖ"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $412,"AߛwqSIߘCEd厧\JB"
	mov $413,"ȁCU\ہCAٖ@TBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $414,"SIccAaIv藁B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $415,"@@"
	mov $416,"uvϓIwqIS"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $417,"rˍD藁H"
	mov $418,"uv甐ldVUNClI͗ʐŗLIBv"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"IL꘢lD"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"vL꘢lݐgx\C\I@AꍱB"
	mov $403,"ܕ䈎zzIhqol"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"ȝQÈӐC\FIwqC"
	mov $405,"Q꘢ÈߘwqFIwqC"
	mov $406,"R@甑F\ΈꉺCrρHv"
	mov $407,"琥rBIBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"@@"
	mov $409,"uu@cc\[EHvv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $410,"@@"
	mov $411,"uus\s\[Cvc[B"
	mov $423,"ސߓITJBvv"
	mov %120,410: mov %121,411:mov %122,24:gosub *messagefont
	mov %120,423: mov %121,423:mov %122,24:gosub *messagefont
	br
	$411@/
	$423/
	add $411,$423/
	@

	mov $412,"@@"
	mov $413,"uuCBvv"
	mov %130,412
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $414,"@@"
	mov $415,"픪dИVr܁CLsDӎvnΗ΁B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $416,"ݓS[rCٓߘLaIwqm悎B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $417,"꘢ٖ@ZЉC\݊u餋㱗IB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $418,"ϓIwqӛsFCAsmCC\zB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $419,"@ʉȓIԁCzFFߘwqB"
	mov $420,"LIԁC@ʐ搶苋ꉺJB"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\

	textoff

	bg black,12
	bgmfadeout 2000
	bgmstop

	delay 3000

;ʉFwZ̃`C
	dwave 2,"wave\chaim.wav"
;wiFVE@ʏtF[h
	bg "bg\dai3kou\bunei_kyousitu.jpg",12
	delay 3000

	texton

	mov $401,"AwInB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"wZwZC{IC"
	mov $403,"ޛsYrHIB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"勎ClF\CqsLۏIc玐g"
	mov $405,"AwZIXDC"
	mov $406,"Aŋ߁CRxXIwZCn蓌}B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $407,"ޗI玍HCkLlHB"
	mov $408,"ވ_CA甐lSBB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"wf௖kCC{kPB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $410,"@@"
	mov $411,"ccRC@C䊴sB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $412,"wZAlMρB"
	mov $413,"ґRhu餋㱁CApL嘰OEB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $414,"wZˑR[˒BI喷ҁC"
	mov $415,"F{忎ܓIa玉ICrC"
	mov $416,"椓|ݓTwB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $417,"GI펄wZ{ȍ@C"
	mov $418,"RGIw]wZAׁB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $419,"BʈܒvCwZோawIC"
	mov $420,"I@֐]CsǁB"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"ccϐ^IDEH"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"Fs݌ޘC筎េC"
	mov $403,"CPFS͈ȕ藁H"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"AݎwZIƓxIC"
	mov $405,"wZpݔCRmI牡sB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"@@"
	mov $407,"Cl^w֎~̌xC"
	mov $408,"wqFCnsĊQVB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"゗ewICCܒvt|IC"
	mov $410,"s~qB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $411,"wqρCDsIB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $412,"uuF𗹌HEC"
	mov $413,"d甉Iwq܁eC×fBvv"
	mov $414,"@ߐl㏋^lIԁCFR\吺яoB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $415,"m΍IwIxB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $416,"{AE甛wqFIw蚔\͉~C"
	mov $417,"ʋpuv甛wqJ蚔ǏAsB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $418,"^C֗Ll戝QʍIcC"
	mov $419,"r֗Llp戗rwqIw蚊VB"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"EB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"V\EQЁAߐl؜I݁C"
	mov $403,"wFߒԁC抮B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"LVpoʁCrȐIڍǋC"
	mov $405,"꘢w|擐IlB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"ϓIiC@ECaI뗹B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $407,"@@"
	mov $408,"u{CnwB"
	mov $409,"UwC@l֐wqs`Bv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $410,"\EdИVIԁC@ӁB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $411,"wÐXIwB"
	mov $412,"@ݐڎޔЋIwqFC"
	mov $413,"FCI߈cc"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $414,"zޗCAs֊эRB"
	mov $415,"@"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\

;ʉFKKK
	dwave 2,"wave\dooropen07.wav"

	mov $401,"uoBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"@@"
	mov $403,"A݊wCŒfȓIvB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"ގICݑܟECB@C"
	mov $405,"IꏬpslƖ敁B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"@@"
	mov $407,"uؔVwBCډؑwJB"
	mov $408,"苍Bv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"@@"
	mov $410,"uW迗Bv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $411,"@@"
	mov $412,"ؑwfZCٖʁB"
	mov $413,"uLeIB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $414,"@@"
	mov $415,"uވNCߓIa꒼ێkDB"
	mov $416,"LݏYrJ蚔ǘEHv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $417,"@@"
	mov $418,"uC⋑OIw@J蚁Bv"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"u@C߉ƒIwJ蚔Ǜcc"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"ߍ݊wIjC藁Hv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $403,"@@"
	mov $404,"upgAgAwC֗LȁBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"@@"
	mov $406,"uЉȖvLCEHv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $407,"@@"
	mov $408,"uCVkDvBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"@@"
	mov $410,"uC漚OBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $411,"@@"
	mov $412,"ґRF΁CAEŐIqB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $413,"śfCCwIЉȕs吥㈍dwImC"
	mov $414,"svYrp\͈dZ\́B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $415,"݊wZ璆C󓞏dIȖڐgAwaȁB"
	mov $416,"rLݓwlssCЉȁB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $417,"wAX@B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $418,"BC@JB"
	mov $419,"dИVICLr甊wݕЉȖCIvB"
	mov $420,"ސ^ߐl浊IB"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"ClspCAȍЉȘEH"
	mov $402,"ِsIB"
	mov $403,"ޛsCIl"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"Cw蚎ЉȖ{gALӖ"
	mov $405,"ߍsw蚜ޘEjaT̓IlC"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"r\槎x~N{I藁H"
	mov $407,"r\槎x~N{I藁H"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"@@"
	mov $409,"ӁCwawIЉȁC"
	mov $410,"s吥weIdB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $411,"ACݐSqag̒ۈC"
	mov $412,"pX[IvgIිiC"
	mov $413,"]Ɣ\\^w蚎ЉȁB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $414,"@@"
	mov $415,"uccߙrDIEHv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $416,"@@"
	mov $417,"uCzIUȓIBv"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"u܋NCߍDkʗ藁Bv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"@@"
	mov $403,"u䏫zCꖼ㐶Bv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	#ff0000
	gosub *textwright
	@
	#ffffff
	mov $404,"@@"
	mov $405,"uccc"
	mov $423,"㐶ccEHCYr藁Hv"
	mov %120,404: mov %121,405:mov %122,24:gosub *messagefont
	mov %120,423: mov %121,423:mov %122,24:gosub *messagefont
	br
	$405@/
	$423/
	add $405,$423/
	@

	mov $406,"@@"
	mov $407,"uCzِlLΏIHccv"
	mov %130,406
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"@@"
	mov $409,"ucccv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $410,"@@"
	mov $411,"uu~ꌏksNIccv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $412,"@@"
	mov $413,"ucccv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $414,"@@"
	mov $415,"u^@IԁCCݖk塑SC"
	mov $416,"Cw͊w蚁cv"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\

	textoff

;ʉFmCY
	dwave 10,"wave\noise01.wav"
;wiFu҂߂܂񂩁A͂ȁv@tF[hȂ@Qbŉʌɖ߂
	bg "cutin\dai3kou\cutin_38.jpg",1
	delay 2000
	bg "bg\dai3kou\bunei_kyousitu.jpg",1
	delay 500
;ʉFmCY
	dwave 10,"wave\noise01.wav"
;wiFu҂߂܂񂩁v@tF[hȂ@Pbŉʌɖ߂
	bg "cutin\dai3kou\cutin_39.jpg",1
	delay 1000
	bg "bg\dai3kou\bunei_kyousitu.jpg",1
	delay 500
;ʉFmCY
	dwave 10,"wave\noise01.wav"
;wiFu҂v@tF[hȂ@Qbŉʌɖ߂
	bg "cutin\dai3kou\cutin_40.jpg",1
	delay 2000

	bg "bg\dai3kou\bunei_kyousitu.jpg",1

	texton

	mov $401,"ccccccB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"@@"
	mov $403,"ucc㐶Hv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"@@"
	mov $405,"um~lIcc"
	mov $423,"^IȘEHv"
	mov %120,404: mov %121,405:mov %122,24:gosub *messagefont
	mov %120,423: mov %121,423:mov %122,24:gosub *messagefont
	br
	$405@/
	$423/
	add $405,$423/
	@

	mov $406,"@@"
	mov $407,"ucHv"
	mov %130,406
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@


	bgm "bgm\free56.mp3"

	mov $408,"@@"
	mov $409,"uߗLuCIP؁C"
	mov $410,"v~꘢alEHv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $411,"٘ߍkWIҁCґ\kI"
	mov $412,"ߕs竘EH"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $413,"zƑ@JB"
	mov $414,"ߖA܁CߗvwN߉ƈ@I_a玍HIC"
	mov $415,"ސߓIጔCB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $416,"ꎟÍCA[{؁B"
	mov $417,"ݜϓI͉Cߔ\󓾏ZEHv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $418,"@@"
	mov $419,"uޘccvs֓Iԁccv"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"uQUWRR{RSRWQAXWPRVSPPSXA"
	mov $402,"QTTT~UUAXOOOOPQOB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $403,"苏ލdZVSspSZ񓚁B"
	mov $404,"ٕs\o֚Gv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"@@"
	mov $406,"uAcc"
	mov $423,"ccccv"
	mov %120,405: mov %121,406:mov %122,24:gosub *messagefont
	mov %120,423: mov %121,423:mov %122,24:gosub *messagefont
	br
	$406@/
	$423/
	add $406,$423/
	@

	mov $407,"@@"
	mov $408,"urHszȕEH"
	mov $409,"@ߎuÐC㐶IԁC"
	mov $410,"ޔВxIV\S񓚍JBv"
	mov %130,407
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $411,"@@"
	mov $412,"usAsJCߜr܁ccIv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $413,"@@"
	mov $414,"uߓICvLlߓIB"
	mov $415,"ICA@QB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $416,"ݛEvLlh㐶B"
	mov $417,"ݜޘƁCLI݁C㐶aa󈻁C"
	mov $418,"\CRIB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $419,"vň㐶CAsCޔБz@[ڌŁBv"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"ulCsB"
	mov $402,"ޘEsٕs֓IlB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $403,"RClpsÈӏ\ވ_B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"@ʋ~sҁCA浑NGB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"cLցCAHCÍC"
	mov $406,"C}̓IB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $407,"UߔВnsC߉ƈ@AB"
	mov $408,"ĖvLlAiB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"C꘢lIC@IL玍HsHC"
	mov $410,"rۗXInsB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $411,"w@ݏdIጔCC"
	mov $412,"֔\筎ꖼw㐶xEH"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $413,"݁C㐶IʐݕsfB"
	mov $414,"@ʒƑ^@HC"
	mov $415,"}ߓI@njʓI䔔ǐxJB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $416,"vLЍxC꘢ڈ꘢I̞וs笁B"
	mov $417,"C嘢lsRn\CvL㐶݁CaA\DC"
	mov $418,"s琥RIB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $419,"֔@C֔\`aُLҁC"
	mov $420,"ېFLoEHv"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"uccccccv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"@@"
	mov $403,"ޔԎhɐlSIgQ@C"
	mov $404,"ؑNቺҕsgB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"㐶m~IXB"
	mov $406,"ߕs吥㱝ْmIwqFInB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $407,"@@"
	mov $408,"us댾_߁B"
	mov $409,"݁C֐lꉺIzJB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $410,"@ߐ^IC㐶Cmu"
	mov $411,"wrρx@s߁B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $412,"@ߝ@@sz㐶IԁC"
	mov $413,"ߏARfCCꖼC㐶JB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $414,"BݓߗCߍ˔\^ȁw㐶xIgᚑ݁Bv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $415,"@@"
	mov $416,"uccccccv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $417,"@@"
	mov $418,"uȏAގ敓ISeBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $419,"@@"
	mov $420,"uccccc漁cc迁ccv"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\

	textoff

	bg black,12
	bgmfadeout 2000
	bgmstop
	delay 3000

;ʉFW[[[[i琨悭j@[vȂ
	dwave 2,"wave\se-017.wav"
;wiFgC@tF[hȂ
	bg "bg\dai3kou\bunei_toilet.jpg",1
	delay 4000

	texton

	mov $401,"aؑNIBC䗧竒㱁B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"CIXCpoNuIC"
	mov $403,"ՖՒn㮍cB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"@@"
	mov $405,"CYrccCYrv܏oߔВԁccI"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"ܓIԛvL֛B"
	mov $407,"{IǏnݛECnٗB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"@ʏYrssmAǋC㐶Cmӑň笖]B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"@@"
	mov $410,"AC֔@ccI"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $411,"vpߔВgC|s㐧꘢㏝zIwISӁC"
	mov $412,"pߔВg|s㐧Iz@ccI"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $413,"@@"
	mov $414,"uÓ^Icc"
	mov $423,"^Ir㐶EccَiYHv"
	mov %120,413: mov %121,414:mov %122,24:gosub *messagefont
	mov %120,423: mov %121,423:mov %122,24:gosub *messagefont
	br
	$414@/
	$423/
	add $413,$423/
	@

	mov $415,"@@"
	mov $416,"{RoIދԁC嗈wጒ䎩ȁB"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	mov %130,415
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"ߓuzC㐶vދԓIu㱁C"
	mov $402,"S[rCs}IIovB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $403,"@ʓ{IǏnXP_cc"
	mov $404,"@ʈ㐶sҐgIԁC"
	mov $405,"\BA\~B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"ٓېI㏗LB"
	mov $407,"|ً^CوILА[[ImB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"@@"
	mov $409,"ACCRޔЏxz"
	mov $410,"ňߍuC㐶IlIӎuC"
	mov $411,"ޕsꖼIB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $412,"ސٕsȘIBޓ_C䐥IB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $413,"Icc"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $414,"CYrccoߔЎcc"
	mov $415,"@"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"ŁCڌ^NqIُ㗹B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"@@"
	mov $403,"ސYrI\cc灈꘢lB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"ސEccH"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"@@"
	mov $406,"ccsCsفBs\IoϓI\B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $407,"ޕsCsB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"sفBݜޗIsґَiYB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"@@"
	mov $410,"sفccsϓII"
	mov $411,"ޕsccsI"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $412,"@@"
	mov $413,"ccCYrρcccII"
	mov $414,"@"
	mov $415,"@"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\

	textoff

	bg black,12
	delay 2000
;wiFuNłAŜǂɂ͋SbƂv@ʏtF[h
	bg "cutin\dai3kou\cutin_41.jpg",12
	delay 3000
	bg black,12

;

;ʁFSd}i⍂j
	mov %42,3
	gosub *sindenzu

	wait 2000

;

;ʉFJX̖@[vȂ
;wiF}VOρi[j@ʏtF[h
	bg "bg\dai3kou\mantion_gaikan_yuugata.jpg",12
	dwave 2,"wave\CrowA08.wav"

	delay 2000
;wiF}V̕i[j@ʏtF[h
	bg "bg\dai3kou\mantion_room_yuugata.jpg",12
	delay 2000

;wiF}V̕i[Euj@tF[hȂ
	bg "bg\dai3kou\mantion_room_yuugata_bure.jpg",1
	delay 1000
;G\F@ʏ@ʒuF
	ld c,":a;tatie\kenta\tuujyou.bmp",12

	delay 1000
;aflFfree0539.mp3@iv[v
	bgm "bgm\free0539.mp3"

	texton

	mov $401,"u蓌}񗈉v"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"@@"
	mov $403,"u񗈗Bv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"@@"
	mov $405,"qGC}㗈B"
	mov $406,"LƐlȉƁC^DIB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $407,"@@"
	mov $408,"u`C貁ccrHv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"@@"
	mov $410,"urHv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $411,"@@"
	mov $412,"uuߍDvYr_Bv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $413,"@@"
	mov $414,"ucccv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $415,"@@"
	mov $416,"wqImkqB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $417,"zNIlCCw蚉XqnLWȓIGpC"
	mov $418,"\َImXNqB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $419,"T琥~ؑߗctIuC@upIsJB"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"uccV݊wZꍱsIBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"@@"
	mov $403,"uVLsCSIBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"@@"
	mov $405,"uRLkB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"@wvVIC"
	mov $407,"@sߒkBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"@@"
	mov $409,"plIg᳗^ӁC"
	mov $410,"AT甉WIsޔЎB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $411,"VICꌏgCVٕs\IB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $412,"Cnٖ@MȁC蜓[maVB"
	mov $413,"֗LYrލX甐lɋIEH"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $414,"RCލs\ٛwq܏oIB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $415,"pIߒɁCȋySIC"
	mov $416,"݉IS[r抐ÁC"
	mov $417,"ލԜr\٘FpIXq܏o藁B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $418,"@@"
	mov $419,"u`CߋNhIBv"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"uCӜkh藁B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"ٗC߁ccv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $403,"@@"
	mov $404,"ܓꔼp๘B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"uzYr藁Hv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"ψꊖC@ʑ񓚁u㐶vC"
	mov $407,"\Aٖ@ĕێ؉_Ip`ۗB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"ϓIȁccsv甙Xqœcc"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"@@"
	mov $410,"u䜃rEHv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $411,"@@"
	mov $412,"ucc"
	mov $423,"ߊ蓓[HCJH"
	mov %120,411: mov %121,412:mov %122,24:gosub *messagefont
	mov %120,423: mov %121,423:mov %122,24:gosub *messagefont
	br
	$412@/
	$423/
	add $412,$423/
	@

	mov $413,"y`[Cu趍@vhEHv"
	mov $414,"@"
	mov $415,"@"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	mov %130,413
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\

	textoff

;G\F@Ί@ʒuF
	ld c,":a;tatie\kenta\warai.bmp",12
	texton

	mov $401,"uIvhI漁Iv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"@@"
	mov $403,"wqʓV^IΗeW݊OB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"فCϏADccϏADcc"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"@@"
	mov $406,"^pVldC{z勳dЉC"
	mov $407,"p蕈ꏊIwsٔ\ĆB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"@XqB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"ޘwqI~䕁B|AA~Ў_B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $410,"福a\LI_B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $411,"@@"
	mov $412,"椒LICc擈瓾ٞB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $413,"IgeC^勎Iȏd斍ݗNB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $414,"cc݁Ca擈IߘlϓIB"
	mov $415,"؁C\SZcI]B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $416,"@@"
	mov $417,"BCߘl营IppJB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $418,"cc퐥@sqI@B"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\

	textoff

	bg black,12
	bgmfadeout 2000
	bgmstop
	delay 3000

;wiFVEЉȏ@E獶փtF[h
	bg "bg\dai3kou\bunei_syakaika.jpg",87
	delay 2000
;wiFVEЉȏiuj@tF[hȂ
	bg "bg\dai3kou\bunei_syakaika_bure.jpg",1
	delay 1000
;G\Fd@ʏ@ʒuF
	ld c,":a;tatie\yaezono\tuujyou.bmp",12

	delay 1000

	texton

	mov $401,"u@َȎMSCraHߊHv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"@@"
	mov $403,"uccv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"@@"
	mov $405,"ߓIԁCdИVًNB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"@@"
	mov $407,"uߕsDIEH"
	mov $408,"@CVC֐CʁB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"ߓˑR܏YrHv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $410,"@@"
	mov $411,"u^IϘEH"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $412,"^Icc\DDnEHv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $413,"@@"
	mov $414,"uA܁CJccߕsxݓIHv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $415,"@@"
	mov $416,"usccޘӎvkccv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $417,"@@"
	mov $418,"ĉnfCNo]B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $419,"ސSsDILIÍB"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"uvC\ߓIB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"݋l\NCpvYrʁB"
	mov $403,"Љzz[B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"JzAA񍑁AAB"
	mov $405,"IƁC{s֐rB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"gz勳痈dЉC"
	mov $407,"AFr[C{٘B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"CFI؁C"
	mov $409,"s吥C|tuCz\j~SgnB"
	mov $410,"vYrqJHv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $411,"u֔@ccs\ArPCJH"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $412,"s\甍XIw\퐬ʁCv"
	mov $413,"FKl曑甓{dVUIBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $414,"@@"
	mov $415,"ucccv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $416,"@@"
	mov $417,"us\AϏ\邖SB"
	mov $418,"Csz\Clˉ៓lBsEHvv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $419,"@@"
	mov $420,"uuccϖvցBvv"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"uR@CߏA៓l|C~JBv"
	mov $402,"ґR៙vseSyCA@SՕPC"
	mov $403,"ߍː^IBBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"uŋN_CґVB"
	mov $405,"v䱊œݓI߁CYr\cc"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"ߐSŐ^s嗹JHv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $407,"@@"
	mov $408,"uccIv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"@@"
	mov $410,"dИVIԁC甉IĎhɁB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $411,"œ蜓[mIC"
	mov $412,"ȋycݓIȘapd斋NIC"
	mov $413,"\LrB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $414,"vցccs\ܟIԁB"
	mov $415,"\ICߘEفA៕sIB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $416,"笕s\ow\IB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $417,"@@"
	mov $418,"uܗrcIԁC^ٕsNI"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $419,"ccKl]䎩ȁBv"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"uvցB֍藁CNkB"
	mov $402,"ƈNwJIv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $403,"@@"
	mov $404,"uIv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"@@"
	mov $406,"ߓdVUNI񓚁CdИV__B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $407,"䓞ݘWYr藁cc"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"S@ܓIρB"
	mov $409,"LXqC֗L꒼xIOB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $410,"֗LCٗccߘiٖ@Y㈓IpVlB"
	mov $411,"\ˑR݉ISB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $412,"@@"
	mov $413,"ݜޔВnC笕s\\黁B"
	mov $414,"笕s\黁I"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $415,"䐥ґَiYB"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\

	textoff

;ʉFdb̃xiQR[j@[vȂ
	bgmonce "bgm\phone.mp3"
	wait 5000
;ʉ~
	bgmfadeout 1
	bgmstop
;ʉFK`ibj@[vȂ
	dwave 2,"wave\ice1.wav"

	texton

	mov $401,"ˑRCЉȏyݎI衒kNB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"L\NߓB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $403,"@@"
	mov $404,"uߍDCޗЉȓIґB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"cc@񏬊wH"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"C迍DC迈꒼糉IXqB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $407,"ssCݛECBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"@@"
	mov $409,"ŗ衒ԓIC"
	mov $410,"NݏwIʘVB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $411,"衒⁗IݎQ䵁B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $412,"@@"
	mov $413,"ߓٕIe@CsR⋋N^ꐺB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $414,"@@"
	mov $415,"uccc"
	mov $423,"XqrIHvv"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	mov %120,414: mov %121,420:mov %122,24:gosub *messagefont
	mov %120,423: mov %121,423:mov %122,24:gosub *messagefont
	br
	$415@/
	$423/
	add $415,$423/
	\

	textoff

	bg black,12
	bgmfadeout 2000
	bgmstop
	delay 3000

;wiFwZEE@ʏtF[h
	bg "bg\dai3kou\syougakkou_syokuin.jpg",12
	delay 3000

	texton

	mov $401,"adИVzwI玖aC"
	mov $402,"E[}I㱗B"
	mov %130,401
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $403,"{ʎ̐ǎCa܎CIl}ڗFCfZvӁB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"@@"
	mov $405,"uIXqccIHv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"@@"
	mov $407,"uݕیCݓ勎B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"K^ICvL󓞏YrIQccv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"@@"
	mov $410,"ǎCVՒ]Ӊ񓚓B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $411,"ߓޒԉcCASI{΋pvLB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $412,"@@"
	mov $413,"urCݐڑ񋎔VOCz旹ꉺIEB"
	mov $414,"ېYrHv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $415,"@@"
	mov $416,"uߘccېݕw@B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $417,"CnCʓI佁B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $418,"C@wFvC"
	mov $419,"Nccߘcc"
	mov $423,"ZlNŗccv\"
	mov $420,"@"
	mov %120,418: mov %121,420:mov %122,24:gosub *messagefont
	mov %120,423: mov %121,423:mov %122,24:gosub *messagefont
	$418
	$419@/
	$423/
	add $419,$423/
	\

;aflFfree55.mp3@iv[v
	bgm "bgm\free55.mp3"

	mov $401,"ZوB"
	mov %130,401
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"@rŁCޘlss헹B"
	mov $403,"@ʑwq㱓I掁CޔВx疢唈B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"@@"
	mov $405,"uVFC迓sݑŉ˓IJHv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"@@"
	mov $407,"uAIcc^I]Bv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"@@"
	mov $409,"CAvLđ܏YrB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $410,"ޔЎېCʏVCVIB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $411,"sCґRLǗጔCCAV琥lB"
	mov $412,"v꒼wLwCߐs\IB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $413,"wqFlsB"
	mov $414,"LVICŉ˜ޔЎkېB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $415,"@@"
	mov $416,"uŉ˜ތ{gva@ƓIB"
	mov $417,"jwqvCޔЎ琥ʓIꕔB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $418,"ACZوӍݑsB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $419,"@ʘCnAwlA\IԁC"
	mov $420,"sYrϓIlBv"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"wqFŉ˔\wk@B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"@QdlӖYrC"
	mov $403,"툻QꐥψЊB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"ߍpg|IlC"
	mov $405,"\wXDnƜޔЏvB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"RCߍ㈓lʎ{\IwqC"
	mov $407,"pszn៓lB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"s@CFrs؜NtAVC"
	mov $409,"\CȉS_^ٕIB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $410,"@@"
	mov $411,"l汓ɋIB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $412,"琳C汓ɋCˉuQdlkLB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $413,"ߍ|ޔЉIwqC"
	mov $414,"aŕiIlvYrqJB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $415,"UCv甑F񔈏AÔ@oVB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $416,"@@"
	mov $417,"u揁cc^IC]Bv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $418,"@@"
	mov $419,"sf]IǎCVB"
	mov $420,"^IIQdEH"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\

	textoff

;ʉFKKK
	dwave 2,"wave\dooropen07.wav"

	texton

	mov $401,"AݜC玎IjCC"
	mov $402,"OʏmB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $403,"@@"
	mov $404,"uCeʕplCnO^hꗹBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"@@"
	mov $406,"VFWdnfZ}\FB"
	mov $407,"ŗC\FٕIʁB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"\ړwZIʒmC嗈]IJB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"ޔЎCʓIጔCwZXdB"
	mov $410,"KlDD\Fܐ^ˍsB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $411,"@@"
	mov $412,"u{ꐥC"
	mov $413,"sϓI藁Hv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $414,"@@"
	mov $415,"ccccccCYrߏ΁B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $416,"ދԛsܓIB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $417,"ߍꓯOI܏oIB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $418,"@@"
	mov $419,"uccHv"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"u݊CߑFꐥrwqIBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"߉ƛwqC"
	mov $403,"sŗFƛwqEH"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"ar\͓Iwq݈꘢ǁC"
	mov $405,"Fƛwq^嗹Bv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"@@"
	mov $407,"ucccv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"@@"
	mov $409,"C@ٌCTAޔЊuJB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $410,"ZوIŉˁB"
	mov $411,"鈐荤́CŕCڗRJB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $412,"RCލʋpcr̓I߈"
	mov $413,"DlB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $414,"@@"
	mov $415,"u苓ꉺB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $416,"NӖ瑽֗{C"
	mov $417,"AZlNň꘢lC"
	mov $418,"ލˍX啪JH"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $419,"ܐJCVHv"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"݊pIǎCC"
	mov $402,"SIlVŁCQrB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $403,"@@"
	mov $404,"uCccCnDN꘢lٕtqOl"
	mov $405,"@܍ݑŁcc"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"AٕƉZlC̏A|ccv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $407,"@@"
	mov $408,"uވ营KlII"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"Fƛwqs\o翓IIv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $410,"@@"
	mov $411,"uCwFIoccv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $412,"@@"
	mov $413,"uߘIwqCsy"
	mov $414,"|FܓIHv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $415,"Fƛwq笕sÑŐlI"
	mov $416,"ލm营hIv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $417,"@@"
	mov $418,"ucccv"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"ݟ[zꗢIpFNlỈCǎCҗB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"I܎CKCuDDCƗÓ_Bv"
	mov $403,"zsa@甎B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"ssBKl_Yrcc"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"@@"
	mov $406,"uߑFs琥C"
	mov $407,"sJH"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"CYr\fȓIwqٓI藁Hv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"@@"
	mov $410,"uCߐIwqI"
	mov $411,"CCRSsȓIwqIv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $412,"@@"
	mov $413,"uACߑFsm^JH"
	mov $414,"ߑFIޔܖ@CyfnBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $415,"@@"
	mov $416,"uvsMȓIwqC֔\Yr藁IHv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $417,"鴁ccaߜޔАl܉vӖI"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $418,"cߘIwq嗈I"
	mov $419,"甑L푼YWIlDD]Iv"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"u]IߑFفB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"Zlو꘢lCޓꐥ鈕s֗pܘEHv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $403,"@@"
	mov $404,"uȉ܁Cٕs\I"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"VCc掎Iwq嗈܁I"
	mov $406,"ވ؁CsߛwqtISJIv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $407,"@@"
	mov $408,"ސYrϓIcc"
	mov $409,"ŗ@@CFsv筎ȓIwqٓIB"
	mov $410,"@"
	mov $411,"@"
	mov $412,"@"
	mov $413,"@"
	mov $414,"@"
	mov $415,"@"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"ܗLƍߎҍ݉Ɨ掎C"
	mov $402,"p\sFB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $403,"ߍ蕖[㱓ssosIwƗLxC"
	mov $404,"琥CBˉ݁B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"@@"
	mov $406,"wZsDCЉLVB"
	mov $407,"AϔcጔChdlC"
	mov $408,"sÏ\ȘawqI֓IFB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"@@"
	mov $410,"uUwClawqs`Bv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $411,"cc\Eڎ󋳈IwqJB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $412,"{嘰xTB"
	mov $413,"ݕ΍瀋璆Cv\|擏olIlFC"
	mov $414,"@EClIlB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $415,"AݜޔЏvCAߔЁw⟎qIہx"
	mov $416,"xIlb喷CnCC"
	mov $417,"cFI@|I㕐B"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\

	textoff

;wiFwZEEiuj@tF[hȂ
	bg "bg\dai3kou\syougakkou_syokuin_bure.jpg",1
	delay 1000
;G\Fd@{@ʒuF
	ld c,":a;tatie\yaezono\keno.bmp",12
	delay 1000
	texton

	mov $401,"@@"
	mov $402,"u槗CߑFލ忉ʁIIv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,36:gosub *messagefont
	gosub *textwright
	@

	mov $403,"@@"
	mov $404,"ˑRCꐺk󟃓I{݋玎CB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"IldИVCo]C"
	mov $406,"{ߍpFB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $407,"@@"
	mov $408,"uߑFVVピVC֐^ڛcc"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"݁C߁BߏYrsmțwqIJH"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $410,"ߒmߛwqŊ蓓IFYrEH"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $411,"Ŋ蓊I㣑\藁HŊ蓊ߓIp藁H"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $412,"œIEځAœI乎uaI胁C"
	mov $413,"ǗaIwqgnDC֍YrԎVC"
	mov $414,"hߎ`ŐhII؁C"
	mov $415,"U昸ICnH"
	mov $416,"V{嵏Cŗ{^c"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $417,"LIߑSs^CJCH"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"uށAޘcv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"@@"
	mov $403,"uߘawqsIlJB"
	mov $404,"CYrAs藁B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"sߑFr|擉ƒ됗CrMCwqC"
	mov $406,"sُCBᒅ֍ݓIC甑FDDJB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $407,"ACv獐˓Ip獕soC"
	mov $408,"ߏAsCI"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"@蕐asғIEssCArx擑C"
	mov $410,"hI֐ߑFțIv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $411,"@@"
	mov $412,"ucccv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $413,"@@"
	mov $414,"ٔdИVFIgC"
	mov $415,"ގ䔓ߍpFҗB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $416,"ґRIgke\CAٌÓIl܁C"
	mov $417,"NIԍXLpB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $418,"ccsCٕsȖIBқvL]vB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $419,"@@"
	mov $420,"uߘcc运IʁHv"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"u䐥މƌIOBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"@@"
	mov $403,"uOHߕsAOlEccI"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"苝gIlsv{I"
	mov $405,"ސFʔV㱓IVIv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"@@"
	mov $407,"uGCޏAߓI񓚘EB"
	mov $408,"UَȕsCASqR@r݌țB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"wqYrρCʖ琥YrρB"
	mov $410,"s꘢lCAϝfΟBhcc"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $411,"ŋNzϐlI̎WIޔЕS߁C"
	mov $412,"DDnhwqIv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $413,"@@"
	mov $414,"u߁A܏YrIv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $415,"@@"
	mov $416,"u鴁CCYr꒼ҝӉyC"
	mov $417,"ߑFޜqssJI"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $418,"ZCsߑFU\CvI"
	mov $419,"ޔ}s@CQE㱛I"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\

	textoff

;G
	cl c,12
;wiFwZEE@tF[hȂ
	bg "bg\dai3kou\syougakkou_syokuin.jpg",1
;ʉFKKK
	dwave 2,"wave\dooropen07.wav"
;ʍE֍tF[h
	bg black,91
;wiFwZEL@EɃtF[h
	bg "bg\dai3kou\syougakkou_rouka.jpg",91
	bgmfadeout 2000
	bgmstop

	texton

	mov $401,"ݓ{ΒhIdИVg@C瑖oLB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"aCˑRkdߌQpF[zꗢI"
	mov $403,"DB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"@@"
	mov $405,"usDӎvCtQ敔Bv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"@@"
	mov $407,"uvgnB{kØaC|ΗFBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"@@"
	mov $409,"uEccv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $410,"uՒJBv"
	mov $411,"uݜޗCVߍVk"
	mov $412,"s\FoTBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $413,"@@"
	mov $414,"uusDӎvChߓYWccvv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $415,"@@"
	mov $416,"uuvvBvv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $417,"@@"
	mov $418,"莦ӁC_vӁC"
	mov $419,"R@یIB"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"uuccߘCґVBvv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"@@"
	mov $403,"瑖{sCA호@ʋZB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"C֗LYrYܓIC≺rs񔈊ŋB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"@@"
	mov $406,"uґRlܐOlC"
	mov $407,"A䘸vcߑFƓOlőҁB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"߉ޘs㌉ƌI@Bv"
	mov $409,"uLIԁCsȗQΖZGBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $410,"@@"
	mov $411,"dИVLoEdwCp͎wȁB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $412,"œIρCĎᔈv漁CR@dVCsB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $413,"ّC^IEQsIVB"
	mov $414,"Γ݁C꒼sݎ󑼓I糁B"
	mov $415,"䐥ݔCsCIxB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $416,"鈓sXxLSIlB"
	mov $417,"BC꒼lgIcc"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $418,"rzCzv񔈊őCAg̋psBrB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $419,"݁CՌƍːŏdvIB"
	mov $420,"ߍSI^CVĊsB"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\

	textoff

	bg black,12
	delay 3000

;aflFfree0518.mp3
	bgm "bgm\free0518.mp3"
;wiF@ʏtF[h
	bg "bg\dai3kou\takadai.jpg",12
	delay 3000
;wiFiuj@tF[hȂ
	bg "bg\dai3kou\takadai_bure.jpg",1
;G\F@߂݁@ʒuF
	ld c,":a;tatie\kenta\kanasimi.bmp",12
	delay 2000

	texton

	mov $401,"aXqql󌨑B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"ґRcI曉_ŋNLGڝSC"
	mov $403,"AZ܁CvLYrQdÍB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"ґRZ㌚BCۉaNF@^ꉺC"
	mov $405,"A֐r蒼ډƗB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"ߌV@ccAsĐMC@B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $407,"@@"
	mov $408,"}EΓkCvB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"ꌾsہCҒnB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $410,"c㗬IoICAۓ{C֐߈H"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $411,"@@"
	mov $412,"uCYrcc藁Hv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $413,"@@"
	mov $414,"ucccv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $415,"@@"
	mov $416,"zŉIvC"
	mov $417,"Apn訒{CsmܒԁB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $418,"܏wIVF犖kVC"
	mov $419,"Yrsv񓚁B"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"uٕs\ܘEHv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"@@"
	mov $403,"ucccv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"@@"
	mov $405,"rlŁCّܐskB"
	mov $406,"ҐI|甑\ҁB"
	mov $407,"ˋxx訒{OB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"SS䀖̒I|܁C_ܓF"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"@@"
	mov $410,"uccϛB"
	mov $411,"@ʜސߑzICsفB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $412,"AC䐥ߓIpB"
	mov $413,"@ʔEsZCAωJB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $414,"@rɋArIC"
	mov $415,"vgL꘢\^ߋIlC"
	mov $416,"AcS_Bv"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"c×ꉺdИVIԁChB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"Vœssn񓞉"
	mov $403,"p팒pΗe}ڗB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"ގC䔓䗈䧑B"
	mov $405,"IጔCJB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"@@"
	mov $407,"ucc貁ccv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"@@"
	mov $409,"BIԑ×C"
	mov $410,"ߐx訓I{fcC_B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $411,"@@"
	mov $412,"u貁ccccv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $413,"@@"
	mov $414,"rsˑR≺C{pB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $415,"@@"
	mov $416,"uccv"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\

	textoff

;G\F@@ʒuF
	ld c,":a;tatie\kenta\naki.bmp",12
	texton

	mov $401,"usÐScc^IsÐSccv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"@@"
	mov $403,"ԉ痎C៣@rʗOoB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"Œ茚LIcC䊴ĐSɁB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"ccCC䓞C􍱏Yr藁H"
	mov $406,"@ʉÈӓIԁCߘZXqIwqC"
	mov $407,"䊮Sp菫FZB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"ACψꗈCaߍӖڕ֓IʑFC"
	mov $409,"LYrd藁H"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $410,"@@"
	mov $411,"rCraH"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $412,"ccrcc"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $413,"@@"
	mov $414,"ݗI[}fƉC"
	mov $415,"xxZLbs埃IwqB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $416,"N嗈ỈaBC\CލB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $417,"@@"
	mov $418,"cczNCꎟaߘlڕC"
	mov $419,"琥ݜޞFI䊒B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $420,"󖾖藹rScc݋pcc"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\

	textoff

	bg black,12
	bgmfadeout 2000
	bgmstop

	delay 3000

;wiFVEЉȏ@ʏtF[h
	bg "bg\dai3kou\bunei_syakaika.jpg",12
	delay 2000
;wiFVEЉȏiuj@tF[hȂ
	bg "bg\dai3kou\bunei_syakaika_bure.jpg",1
	delay 1000
;G\Fd@ʏ@ʒuF
	ld c,":a;tatie\yaezono\tuujyou.bmp",12
	delay 1000
;BGMFfree0210.mp3@iv[v
	bgm "bgm\free0210.mp3"

	texton

	mov $401,"urCNrϗHv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"@@"
	mov $403,"u󓞗kI_ňC"
	mov $404,"甑VxꉺCcc"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"ܛEvC_xnwBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"@@"
	mov $407,"uszߒSSJB"
	mov $408,"^Dwqccv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"@@"
	mov $410,"ґRojCA֐SsB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $411,"]VsvېœIADB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $412,"@@"
	mov $413,"u܉񗈁CLzʈꉺccv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $414,"@@"
	mov $415,"uGCYrHsǗQΖZJIv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $416,"@@"
	mov $417,"u@ʈȍ@։ېߔЎIԁC"
	mov $418,"ݍl甌NwBv"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"u@C𖾒qIB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"ȑOIԁCL{\lIwq"
	mov $403,"s掓rQdCAݏvsϗB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"ZlNÎCޗL_s헹B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"܁Cʓ琥ߔߓxcc"
	mov $406,"ŒFcFsIǎCϕsZJB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $407,"wZ֖vrVIC"
	mov $408,"wqAIvsFB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"ٌN܉\skÁC"
	mov $410,"AwōDI\Bv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $411,"@@"
	mov $412,"EsSvzoIāC"
	mov $413,"dИVkA𗹁B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $414,"ٍӈԁC笖]B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $415,"VAs黓IlB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $416,"A}͔VB"
	mov $417,"UኮSvLWZC"
	mov $418,"A|s๘n\竁B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $419,"P܁CUܗvC"
	mov $420,"ߏAܖEvLCWZB"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"琥ρcc"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"蕈ꏊwsٖ@aǖʁC"
	mov $403,"FDޓޏwÁB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"@@"
	mov $405,"ccޘEsE핪wInC"
	mov $406,"avLwInq藁H"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $407,"FC\nvLwIEH"
	mov $408,"Ó\ψ꒼EH"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"LVCLlcޘEdVNEcc"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $410,"֐܁CĖvLIn"
	mov $411,"EdꕅC~藁B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $412,"@@"
	mov $413,"urCґVB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $414,"gށCꕛݑzA܎I\B"
	mov $415,"ccŗމ\I{JBv"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"uuVCsvSՕPBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"@@"
	mov $403,"ґRdlI]|ȗCAvLxBu"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"V^䗹B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"ߔЉʋR֔\擛wqC"
	mov $406,"ߔЉʍ擛wqC"
	mov $407,"FĜrw͖琥EvB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"@@"
	mov $409,"uSӁcv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $410,"@@"
	mov $411,"uwqCґV"
	mov $412,"@߉ƓINCٌٔ̋ח鈈}B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $413,"߉獐ˑEHv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $414,"@@"
	mov $415,"uߓRBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $416,"@@"
	mov $417,"urDIwq"
	mov $418,"ÓߕsuIM֗EHv"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\



	mov $401,"u@ʌNLى܁uvCMJv"
	mov $402,"ߔЏvCm๘Ic"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $403,"A񐥜ρCsR獐ˑIB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"gސl]C"
	mov $405,"@ʔ\Cޝْ[I膌"
	mov $406,"wYrIԁC"
	mov $407,"ʑR֐DD獐ˈꉺJBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"@@"
	mov $409,"uvցB"
	mov $410,"֏YrICُCB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $411,"甛wqKClIጔCB"
	mov $412,"C甛wq󓞕sKC琥lIጔCB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $413,"獐˛wqތC{gALIӖB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $414,"l獐˛wqޔЍsCC琥I\B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $415,"ȑO獐˓ICLrԁC"
	mov $416,"usCs[ߍːIB"
	mov $417,"@ʉ^IߝُCC"
	mov $418,"sIBvr܁B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $419,"ŋߓIlCD{sދԓIӎv"
	mov $420,"^甐lٓޛBv"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"uudИVCߐs\ElpދET䍮Hv"
	mov $402,"EHv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $403,"@@"
	mov $404,"uCCB"
	mov $405,"KT`IwqBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"usC݉kߍIlB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $407,"ߍɋꖔs[ǏCzNCZǛۛBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"@@"
	mov $409,"u汁Bccv"
	mov $410,"@"
	mov $411,"@"
	mov $412,"@"
	mov $413,"@"
	mov $414,"@"
	mov $415,"@"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\

	textoff

	bgmfadeout 1
	bgmstop
;ʉFdb̃xiQR[j@[vȂ
	bgmonce "bgm\phone.mp3"
	wait 5000
	bgmfadeout 1
	bgmstop
;G\Fd@@ʒuF
	ld c,":a;tatie\yaezono\keno.bmp",12
	delay 2000

	texton

	mov $401,"kI衒ԞC甔dИVIcxkB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"TCI\a\JB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@


;ʉFdb̃xiQR[j@[vȂ
	bgmonce "bgm\phone.mp3"
	wait 5000
	bgmfadeout 1
	bgmstop

	mov $403,"@@"
	mov $404,"VI衒ԁC՗꘢B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"Ó܁CNoYrEH"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@


;ʉFdb̃xiQR[j@[vȂ
	bgmonce "bgm\phone.mp3"
	wait 5000
	bgmfadeout 1
	bgmstop

	mov $406,"@@"
	mov $407,"衒ԞvL≺B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"٘ދlKICR@C"
	mov $409,"ސlꎟIEB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@


;ʉFdb̃xiQR[j@[vȂ
	bgmonce "bgm\phone.mp3"
	wait 5000
	bgmfadeout 1
	bgmstop

	mov $410,"@@"
	mov $411,"衒ԞˑRvL≺B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $412,"dИVEىEʐLo苎衒ԁB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@


;ʉFK`@[vȂ
	dwave 2,"wave\ice1.wav"
	mov $413,"@@"
	mov $414,"ccAśf\NߓB"
	mov $415,"@"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"uߍDC䐥ЉȓIґBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"uccCV漗Bv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $403,"uߘccƙXqCoYrEHv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"uccIBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"uccccBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"cccccccccccccB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $407,"cccccccccccccB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"ccccccccccccccccB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"cccccccccccccccccccv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $410,"@@"
	mov $411,"uu݁ccr񎖁Hv"
	mov $423,"@uېYrHvv"
	mov %120,410: mov %121,411:mov %122,24:gosub *messagefont
	mov %120,423: mov %121,423:mov %122,24:gosub *messagefont
	br
	$411@/
	$423/
	add $411,$423/
	@

	mov $412,"@@"
	mov $413,"uucccNccccv"
	mov %130,412
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $414,"uNcccDBvv"
	mov $415,"@"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	textspeed 200
	gosub *textwright
	\

	textoff

;G
	cl c,12
;wiFVEЉȏ@tF[hȂ
	bg "bg\dai3kou\bunei_syakaika.jpg",1
	delay 2000

;ʉFЂс@[vȂ
	dwave 2,"wave\hibi.wav"
;wiFVEЉȏij@tF[h
	bg "bg\dai3kou\bunei_syakaika_sirokuro.jpg",0
	print 99,6000,"cascade.dll/dx"
	delay 2000

;wiFȕuԁA̎ESĂ̐FBv@tF[h
	bg "cutin\dai3kou\cutin_42.jpg",0
	print 99,2000,"cascade.dll/dx"
	delay 3000

;tF[hŉʍ
	bg black,0
	print 99,5000,"cascade.dll/dx"
	delay 4000

;wiFa@@ʏtF[h
	bg "bg\dai3kou\byouin.jpg",12
	delay 2000

	texton

	mov $401,"z@ICœϓIXqB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"֐_xxwIώqCESsݗB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $403,"uIQݓߗB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"ݐkIgӁC"
	mov $405,"ߘǎCg۝T]C"
	mov $406,"CnqIEB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $407,"@@"
	mov $408,"IVߘZǓwB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"FcՓVŕsInZC"
	mov $410,"R@ڎّ{\B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $411,"@ʘMcAlB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $412,"CFUC"
	mov $413,"Bʗp҈ܒvДjB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $414,"VzCEӛ΁C"
	mov $415,"푗ی@dfB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $416,"Iō@Ԑcc"
	mov $423,"vLB"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	mov %120,416: mov %121,420:mov %122,24:gosub *messagefont
	mov %120,423: mov %121,423:mov %122,24:gosub *messagefont
	$416@/
	$423/
	add $416,$423/
	\


	mov $401,"uٕsNcc@ʍVvݓߗIԁC"
	mov $402,"BʔV֔\c效敁ccv"
	mov %130,401
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $403,"@@"
	mov $404,"٘dИVI]CҒn𔈁B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"\L~B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"AZ|DC{甑xswB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $407,"IGuuaAQVΖZvC"
	mov $408,"܈DB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"Szȍ@甑wC"
	mov $410,"pيOېIsFB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $411,"@@"
	mov $412,"ߍوQdlIwqC"
	mov $413,"aŕiIlvLqρB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $414,"sǐSϑzCA֐ኍKS"
	mov $415,"cwZB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $416,"ޕsqāCCS[rIMCB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $417,"gޘEECnC"
	mov $418,"AwqF֖vL핅TJB"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\

	textoff

	bg black,12
	delay 2000

;wiFu͋tƂĎqMcv@ʏtF[h
	bg "cutin\dai3kou\cutin_43.jpg",12
	delay 2000
;wiFuė؂ꂽBv@ʏtF[h
	bg "cutin\dai3kou\cutin_44.jpg",12
	delay 3000

	bg black,12
	delay 3000

;ʉF`[[[ij@[vȂ
	dwave 2,"wave\chin.wav"
;wiFV@ʏtF[h
	bg "bg\dai3kou\sousiki.jpg",12
	delay 2000
;ʉF|N|N|Ni؋j@iv[v
	dwaveloop 1,"wave\moku.wav" : mov $30,"wave\moku.wav" 

	texton

	mov $401,"OV@CR{xaC"
	mov $402,"Cws뉦pIB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $403,"@@"
	mov $404,"uґmC迟Eccv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"@@"
	mov $406,"uC튴漁ccv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $407,"@@"
	mov $408,"\ԊIzzI@ʘVB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"\nIszޗB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $410,"vLICCg睎I╞B"
	mov $411,"ސF\ϓIŕB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $412,"@@"
	mov $413,"QҒCLȔdИVCIAw{ʋ"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $414,"֗LXq\AדIwC"
	mov $415,"ȋygndvDIǓwFB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $416,"CvLߘZlaFIʁB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $417,"C~CQґF蕈哹]svLB"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"꒼RוsxICL饋ϓI}nB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"Fv䂓IؓeCsT笗B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $403,"q@CFA䷟ϏىeHB"
	mov $404,"vLcFߜޔВZ皓Iw莟pxB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"ܓCAZNOC"
	mov $406,"TG㱓IُC\rYrV藁B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $407,"Ϙs甙XqC"
	mov $408,"s甓ߘZQҎ󓞐فB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"@@"
	mov $410,"nށB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $411,"꘢\ӛwqIށCߐlS_B"
	mov $412,"@"
	mov $413,"@"
	mov $414,"@"
	mov $415,"@"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"RC䒍ӓ꘢w݊ޑOLB"
	mov $402,"agnkDIǓwJB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $403,"svCw䑖嗈C"
	mov $404,"pfC៣CfZB"
	mov $405,"[[ቺC闹\B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"@@"
	mov $407,"ucc运IpEHv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"@@"
	mov $409,"uIBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $410,"@@"
	mov $411,"uߘccccB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $412,"ʍvC׍vBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $413,"@@"
	mov $414,"㈓B䐤Ӎ݊řXqtIlC"
	mov $415,"֑\ΒzC֗LϓIB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $416,"@@"
	mov $417,"uccCޘ䐥l}΁cc"
	mov $418,"꒼ȗccs\cc"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $419,"ACLN⋍݉ccv"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"wI៣C]ܓB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"@@"
	mov $403,"u䐥桉Cs甉ߍ\IlQcc"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"@zzQdCrۓWŉˁcc"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"śfCcߘZ\IlSsߗcc"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"䓖܁CEvB"
	mov $407,"vEψꉺCލA\勎cc"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"ACNp܁eޔЎٕs\Efcc"
	mov $409,"ueٕs\hߔЉƌFfcc"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $410,"R@ccR@ˍݜρcccv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $411,"@@"
	mov $412,"ucccv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $413,"@@"
	mov $414,"uٕsNCޓsIցI"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $415,"sIցccNCˎIv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $416,"@@"
	mov $417,"wL^C៣c㊊CrHݒnB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $418,"ᔈŒ\Iώqcc暒nCYrsB"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\

	textoff

;ʉ~
	dwavestop 1
	bg black,1
	delay 2000

;wiFuǂācƂɂȂłHv@ʏtF[h
	bg "cutin\dai3kou\cutin_45.jpg",12
	delay 2000
;wiFucccv@ʏtF[h
	bg "cutin\dai3kou\cutin_46.jpg",12
	delay 2000

;wiFueɂb܂񂩁Hv@ʏtF[h
	bg "cutin\dai3kou\cutin_47.jpg",12
	delay 2000
;wiFucccv@ʏtF[h
	bg "cutin\dai3kou\cutin_48.jpg",12
	delay 2000

	bg black,12

	delay 2000

;wiFV@tF[hȂ
	bg "bg\dai3kou\sousiki.jpg",1
;ʉF|N|N|Ni؋j@iv[v
	dwaveloop 1,"wave\moku.wav" : mov $30,"wave\moku.wav" 
	delay 2000

	texton

	mov $401,"cc@B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"ȑˏYrsv܁C꒼ҒEB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $403,"@܏oCAcޘw\B"
	mov $404,"CƜޔЏvC꒼ҔEϒJB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"@@"
	mov $406,"䊮SsmC犮Sv\𑼁B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $407,"꒼C֐wqC"
	mov $408,"AIXqEC꘢\dlI|jq羗B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"CYrccCYr蕈__sv\@u藁H"
	mov $410,"䓞ꐥrcc"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $411,"@@"
	mov $412,"|nʋNcc"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $413,"福ޘ笕seEtIpIӎuC"
	mov $414,"福߈ʗEpI筋BMOC"
	mov $415,"ō@Cs筎CՒMOCޘEB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $416,"^ccsNIXqB"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"u֓Is߁Bv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"@@"
	mov $403,"vցC֓IB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"甑▽IጔCCːግX[IlB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"@@"
	mov $406,"u苕sv烞NIӎuB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $407,"ߛwq桓Iӎucc"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"苈vډBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"@@"
	mov $410,"ݏAztޝӁCcXqI浑̝foC"
	mov $411,"Ig̒ɚLB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $412,"}ϓItÁC"
	mov $413,"䘸SˏoލgB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $414,"@@"
	mov $415,"uCȈ]@Bv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $416,"@@"
	mov $417,"ߊIԁCw[[fZCR@ʑOCB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $418,"ڑ\IweCa笖]dꈯQB"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\

	textoff

	bg black,12
;ʉ~
	dwavestop 1
	delay 3000

;wiFΑOρ@ʏtF[h
	bg "bg\dai3kou\kasou_soto.jpg",12
	delay 2000
;wiFΑ@ʏtF[h
	bg "bg\dai3kou\kasou_naka.jpg",12
	delay 3000

	texton

	mov $401,"ޔ^ΑC浑̍ݘFRvB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"浑hI㱗CFҍ݋xB"
	mov $403,"svCFjĎCI捏B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"@@"
	mov $405,"F{ApʜkIƒB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"ޘCQIlC"
	mov $407,"dpߓIlҗL[T㱓IlȊOC"
	mov $408,"lsEƗB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@


;ʉFLCBcK^iS̔Jj@[vȂ
	dwave 2,"wave\doorclose09.wav"

	mov $409,"@@"
	mov $410,"F⋍ݘFOCmvOEB"
	mov $411,"n与@CΑIHl玑CFjB"
	mov $412,"@"
	mov $413,"@"
	mov $414,"@"
	mov $415,"@"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\

	textoff

;ʉFSgSgSg
;wiF̂@ʏtF[h
	bg "cutin\dai3kou\moya.jpg",12
	delay 3000

	texton

	mov $401,"QCDF旹oB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"ґRI햟C"
	mov $403,"AlhœIp󖢊SUB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"@@"
	mov $405,"uccccccv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"@@"
	mov $407,"ْDC@ٌB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"RrB"
	mov $409,"\ӏNIR@S欘EH"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $410,"prIg|nC"
	mov $411,"筎ȓIMOB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $412,"@@"
	mov $413,"RCccYrsv\CB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $414,"r蕑Iӎus\B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $415,"CԎȓIɋꎧݑgC"
	mov $416,"pCRȐʉB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $417,"ϓI݁CśfܒvϓIBǁB"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"ΑC^cI与B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"KlڑVlRhC"
	mov $403,"CIρB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"@@"
	mov $405,"RCސ膌B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"ىЙXqI膌B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $407,"ى䖢\s^\iI膌B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"@@"
	mov $409,"䉔v\甜ޘwqKB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $410,"@@"
	mov $411,"sRnLoB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $412,"z]CzG̙XqIǧ漍߁B"
	mov $413,"㏒ϓIOCoxxSZB"
	mov $414,"@"
	mov $415,"@"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\

	textoff

	drawfill 255,255,255 : draw
	wait 300 : repaint
	drawfill 255,255,255 : draw
	wait 300 : repaint
;ʉFWEEEEE@[vȂ
	dwave 2,"wave\itame01.wav"
	delay 2000

	texton

	mov $401,"uec"
	mov $423,"eecc"
	mov %120,401: mov %121,401:mov %122,24:gosub *messagefont
	mov %120,423: mov %121,423:mov %122,24:gosub *messagefont
	$401@/
	$423/
	add $401,$423/
	@

	mov $402,"@@"
	mov %130,402
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright

	mov $403,"IIv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,42:gosub *messagefont
	QUAKE 30,400
	gosub *textwright
	@

;aflFfree0508.mp3@iv[v
	bgm "bgm\free0508.mp3"

	mov $404,"@@"
	mov $405,"CvL팴ZB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"bōܜޏAߓI߁C"
	mov $407,"퍂hI݉蒆`o|䷁B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"@@"
	mov $409,"uґVIv"
	mov $410,"u݁Cߍ݊YrIIv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $411,"@@"
	mov $412,"IlcZC"
	mov $413,"蒆BB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $414,"[zꗢnvHCxʒnRB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $415,"꒼}Iu㱔@^ʗOoB"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"u苌ZI"
	mov $423,"@苌ZI"
	mov %120,401: mov %121,401:mov %122,24:gosub *messagefont
	mov %120,423: mov %121,423:mov %122,24:gosub *messagefont
	$401@/
	$423/
	add $401,$423/
	@


	mov $402,"v\GᏳlccI"
	mov %130,402
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $403,"䐥ٗpIpccI"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"sC懎ccC䐥ψ꘢lcc"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"䐗IlssKC餉䎧II"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"苌ZI"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $407,"䱁cccc貁cc"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"Zcc苌ZccI"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"@@"
	mov $410,"ݔhŁArCnɌuI蒆"
	mov $411,"xXqICՖՒn苋IB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $412,"@@"
	mov $413,"uZJCߜޘ}Iv"
	mov $414,"@"
	mov $415,"@"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\

	textoff

	drawfill 255,255,255 : draw
	wait 300 : repaint
;ʉFoV[iт񂽁j@[vȂ
	dwave 2,"wave\binta.wav"
	QUAKE 30,300
	wait 1000

;ʉFhTb
	dwave 2,"wave\ClothC.wav"
	bg black,1
	QUAKE 20,200
	wait 2000

	texton

	mov $401,"dИVI㈎ō݉IcCt|ݗnB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"݉FΛߋvIӌC"
	mov $403,"ސꎟىÎB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"@@"
	mov $405,"u݈IYr@H"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"Ő^IEI"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $407,"sߜr⸁CssI"
	mov $408,"sII"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"@@"
	mov $410,"ܒCdИV|sUCIC"
	mov $411,"BB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $412,"ݑIᒆC递aϓIB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $413,"c_InC@ʐ搶痬៣B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $414,"_CIlsݐZݟCᐺB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $415,"@@"
	mov $416,"ݜޝى҉IݏdC"
	mov $417,"ҍݒnɚLB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $418,"bŔ߈^ȓI[C"
	mov $419,"ْوʏwsB"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\

	textoff

	bgmfadeout 2000
	bgmstop
	delay 3000

;ʔ
	monocro #aaaaaa
;wiF}V̕@Vb^[tF[h
	bg "bg\dai3kou\mantion_room.jpg",26
	delay 2000
;wiF}V̕iuj@tF[hȂ
	bg "bg\dai3kou\mantion_room_bure.jpg",1
	delay 1000
;G\Fd@ʏ@ʒuF
	ld c,":a;tatie\yaezono\tuujyou.bmp",12
	delay 2000

	texton

	mov $401,"urρCcÓ_EHv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"@@"
	mov $403,"ucccBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"@@"
	mov $405,"݋qGIۏC񓚓B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"oxFՁB[xthB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $407,"SNv꘢C"
	mov $408,"֎vsXPhZI\IB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"ґRs琥ȓICA䋑笗B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $410,"gޑoAϔhʖڑSُCB"
	mov $411,"ސٝٔ\I{I膌B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $412,"@@"
	mov $413,"uIs߈꘢lBkɋBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $414,"@@"
	mov $415,"ucc䖾Bv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $416,"@@"
	mov $417,"ґR闹CAȓIgvLCN"
	mov $418,"ވ_䎩Ȗk^B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $419,"ݓIccAֈρB"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"u苋xCꉺSCcޑo莡Dcc"
	mov $402,"R@FbĈNwJB"
	mov $423,"DsDHv"
	mov %120,401: mov %121,402:mov %122,24:gosub *messagefont
	mov %120,423: mov %121,423:mov %122,24:gosub *messagefont
	$401
	$402@/
	$423/
	add $402,$423/
	@

	mov $403,"@@"
	mov $404,"ucccv"
	mov %130,403
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"@@"
	mov $406,"ގCvL񓚁B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $407,"䊮SvLS܁uDvB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"@@"
	mov $409,"u֗LӖEHv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $410,"@@"
	mov $411,"䔽B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $412,"@@"
	mov $413,"uYrLӖHv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $414,"@@"
	mov $415,"u]IӖB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $416,"uEvLKvccv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $417,"@@"
	mov $418,"uߍ܏Yr藁B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $419,"PIԁCA^IBBEGߗJBv"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"uߏAPJB"
	mov $402,"P؁C甈ؓsBJB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $403,"@߈ȑOܓIρB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"ޘƐݕىB"
	mov $405,"Fٖ@j~ވ؁B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"Eٔ\C͗CޘEEsB"
	mov $407,"S{B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"ݜޔЏvCgzv筎IC"
	mov $409,"犮Sٖ@CB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $410,"AȑOρBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $411,"@@"
	mov $412,"ucccv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $413,"@@"
	mov $414,"us\Cpܒnʌ}េcc"
	mov $415,"Bʎ[IlB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $416,"䱔㐶BCwqFBB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $417,"ډYrHE槗cc"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $418,"槗MYrpwIɋBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $419,"@@"
	mov $420,"ucccv"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"ĒZ皓IÎ~濁B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"ݝِI㱗CdВfs߁B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $403,"@@"
	mov $404,"u߁ccߐŎZ{VIHEHv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"@@"
	mov $406,"uccsmB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $407,"C@ݓI⋏㝝IԁC"
	mov $408,"ꍱaȑOsI@JB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"ޘEEBgzvCCCuB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $410,"aϑzCs\MB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $411,"C桎ȁC桏VlC"
	mov $412,"siُCB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $413,"֒lAƖ@CvB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $414,"ccډϋBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $415,"@@"
	mov $416,"uߓ݌܏Yrcc"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $417,"ߑݗJB@C"
	mov $418,"߈꒼浑̝C_svJB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $419,"֐XWDB"
	mov $420,"uC@SDꍱIBv"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\

	textoff

;GtF[hAEg
	cl c,12
;wiF}V̕@tF[hȂ
	bg "bg\dai3kou\mantion_room.jpg",1

	texton

	mov $401,"u䑗@ʐ搶⋁B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"ߍDDxCUNB"
	mov $423,"ґVBvv"
	mov %120,402: mov %121,402:mov %122,24:gosub *messagefont
	mov %120,423: mov %121,423:mov %122,24:gosub *messagefont
	$402@/
	$423/
	add $402,$423/
	@

	mov $403,"@@"
	mov $404,"܊CAo[㱁B"
	mov %130,403
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"ӁCksB"
	mov $406,"֐XWDB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $407,"@@"
	mov $408,"訏ˁC暕ӛ΁B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"ccOVȗIꎟB"
	mov $410,"@"
	mov $411,"@"
	mov $412,"@"
	mov $413,"@"
	mov $414,"@"
	mov $415,"@"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\

	textoff

	bg black,14
	wait 5000

;aflFfree0517.mp3@iv[v
	bgm "bgm\free0517.mp3"
	wait 3000

	texton

	mov $401,"ccَiYcc"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"@@"
	mov $403,"َiYI"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"@@"
	mov $405,"ݜޔВnC`II"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"JH"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $407,"揁C^Icc^甐lSB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"C㸓_n甉䍿B"
	mov $423,"ccDB"
	mov %120,408: mov %121,408:mov %122,24:gosub *messagefont
	mov %120,423: mov %121,423:mov %122,24:gosub *messagefont
	$408@/
	$423/
	add $408,$423/
	@

	mov $409,"鴁Cމga_JH"
	mov %130,409
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $410,"rCFvțC"
	mov $411,"dQ㵚vB"
	mov $412,"@"
	mov $413,"@"
	mov $414,"@"
	mov $415,"@"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"NޘCߊŁCމƌʑ嗹sJH"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"ȍ@։ʓX藁I"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $403,"Ccc^hBۏoCݓQB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"uIbs埃C䐥嗈B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"H"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"ߍ܏YrC䓖RBޕsRIEB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $407,"@@"
	mov $408,"s܉񗈁ClIg֐^_B"
	mov $409,"rI@CR\g̗oH"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $410,"nC̖̊Łcc"
	mov $423,"uEH"
	mov %120,410: mov %121,410:mov %122,24:gosub *messagefont
	mov %120,423: mov %121,423:mov %122,24:gosub *messagefont
	$410@/
	$423/
	add $410,$423/
	@

	mov $411,"ޗ֗L꘢SКGB"
	mov %130,411
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $412,"L։prIqCdz_oJB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $413,"@@"
	mov $414,"d|Iwq藁B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $415,"CaߓIwqvB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $416,"ґRFqsL_乓Iwicc"
	mov $417,"ACρCv甜ޘwqKNI"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $418,"݁CَiYB"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\

	textoff

	bgmfadeout 1
	bgmstop

;wiF}V̕i[j@tF[hȂ@iŐEɐF߂j
	monocro off
	bg "bg\dai3kou\mantion_room_yuugata.jpg",1
	delay 4000

	texton

	mov $401,"䱁cc"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"C\Aݜޗcc݉IB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $403,"ՒVgʓIΗeC\NIqcc"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"@@"
	mov $405,"CYr藁C\󓞔䱓I݁B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"AE\C"
	mov $407,"pu\A݋ߍݚ@ړInB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"@@"
	mov $409,"ccccccB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $410,"cc@B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $411,"营ڌIJB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $412,"@@"
	mov $413,"n⋗NB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $414,"@@"
	mov $415,"ccKlB"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\

	textoff

;ʉFK`co^
	dwave 2,"wave\DoorCloseA11.wav"
	bg black,12
	delay 2000

;aflFfree0232.mp3@iv[v
	bgm "bgm\free0232.mp3"
;wiF}VOρi[j@ʏtF[h
	bg "bg\dai3kou\mantion_gaikan_yuugata.jpg",12
	delay 2000

	texton

	mov $401,"䈬ZgIjcC"
	mov $402,"hI⁗莒ɁC"
	mov $403,"AE糕sލB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"pNCjCtOʁB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"@@"
	mov $406,"}ECnΗB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $407,"uGCI㱛EsB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"@@"
	mov $409,"IXccvIcc"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $410,"ۏorsCu|IB"
	mov $411,"@"
	mov $412,"@"
	mov $413,"@"
	mov $414,"@"
	mov $415,"@"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\

	textoff

	bg black,12
	delay 2000

;wiF[̍xOi㔼j@ʏtF[h
;wiF[̍xOiփXN[j
	lsp 1,":c;bg\dai3kou\kougai.jpg",0,0
	print 12

	delay 1000

	for %199=0 to 199
		gettimer %90
		msp 1,0,-3,0
		print 1
		waittimer (%90+24)
	next

	csp 1

	bg "bg\dai3kou\kougai_d.jpg",1

	wait 2000

	texton

	mov $401,"ޗC^\IyVnB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"{VOCLIXqC"
	mov $403,"|CIޘnB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"g嗹\NCޗˑRvLB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"BC@CX\|n\I݁B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"@@"
	mov $407,"k߁B䱏Aݕ߁B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"@@"
	mov $409,"œݜrIC߉rz藁H"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $410,"gIC߈B퐶JB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $411,"sCg@ُCB"
	mov $412,"@ߗv膌C@ωsÈӐڎB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $413,"@@"
	mov $414,"EvLYrB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $415,"䱁C@ʔ\F߈ꎟcccc"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\

	textoff

	bg black,12
	delay 3000

;wiF̐X@ʏtF[h
	bg "bg\dai3kou\mori.jpg",12
	delay 2000

	texton

	mov $401,"V@C䘹R]B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"|IB\\InB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $403,"@@"
	mov $404,"CLlZInC"
	mov $405,"}ESB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"ACkߗB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $407,"@@"
	mov $408,"IXccߍIXcc"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"@@"
	mov $410,"ݎIXђpjCsfnOB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $411,"\C꒼঎RHCedIbxoB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $412,"gSsEsI܌B"
	mov $413,"原刓^䱎}C"
	mov $414,"גՓI։ۏouɓIRBB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $415,"@@"
	mov $416,"IXccߍIXcc"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $417,"@@"
	mov $418,"sfএFC\I傗C"
	mov $419,"|ݏnNB"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\

	textoff

	bg black,12
	delay 2000

	texton

	mov $401,"䑖CsfnB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"ICsuꘁCszxB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $403,"@@"
	mov $404,"ފuAݝoʉVIිρB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"C\AݜގR~BNݓߗB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"@@"
	mov $407,"݁ccAݜޗcc"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"@@"
	mov $409,"EsmޗICsmݐYr󗹁B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $410,"sCߍsgxvB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $411,"ݑOIߘE"
	mov $412,"㱘a㱓ITOB{vLKvB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $413,"@@"
	mov $414,"ˑRCœ݋وꕨIRoᗹꑩB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $415,"AߗCߏAR~B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $416,"ۋNō@I͟CߌB"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\

	textoff

	bgmfadeout 2000
	bgmstop
	wait 3000


;ʉF̉@iv[v
	dwave 1,"wave\WindA08.wav" : mov $30,"wave\WindA08.wav"
	delay 3000
;wiFi㔼j@ʏtF[h
	bg "bg\dai3kou\tuki_u.jpg",17
	delay 3000

	texton

	mov $401,"XCɗNCB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"@@"
	mov $403,"u߁ccAݜޗccv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"@@"
	mov $405,"fǏ㗹Cߏnߐl㏔OIB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"ґRŕsgeCAӔ\\I݁B"
	mov $407,"䱏aNݏA݉OB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"@@"
	mov $409,"u꒼ݝQߑFcc"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $410,"啪JccRYrssGBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $411,"@@"
	mov $412,"vLB"
	mov $423,"ʑRݐJH"
	mov %120,411: mov %121,412:mov %122,24:gosub *messagefont
	mov %120,423: mov %121,423:mov %122,24:gosub *messagefont
	br
	$412@/
	$423/
	add $412,$423/
	@

	mov $413,"@@"
	mov $414,"ucc"
	mov %130,413
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $415,"ޘlC@CVC֐CpCskwB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $416,"v\sߓIlCv\桍DNccv"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"kܕsoԗB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"ccAݜCҟRϋߗB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $403,"bŐݐ䧉ʁB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"@@"
	mov $405,"uccߜÈӁccZEHv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"@@"
	mov $407,"ϋߓIXgB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"ޔЉgccC^ߐl㏔Occ"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"|ً^C䐳ݘa\ْԁB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $410,"@@"
	mov $411,"u迁ccv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $412,"^ޘERCAśfwB"
	mov $413,"Eٖ@ĈȋIgᚊB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $414,"ACcc"
	mov $423,"C甉֔\CƐlJB"
	mov %120,414: mov %121,414:mov %122,24:gosub *messagefont
	mov %120,423: mov %121,423:mov %122,24:gosub *messagefont
	$414@/
	$423/
	add $414,$423/
	@

	mov $415,"䐗ߑFCᚊB"
	mov %130,415
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $416,"߁Bv"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"ۏorsB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"ޗ笕ǁCrА[ℓIÁB"
	mov $403,"đ{sCg̏AߝْI[B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"AccݓߔVOCvLoCA\G刓\FB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"@@"
	mov $406,"uՏNJccv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $407,"ޘECEBB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"rC甉\aߑF݈NB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"i݈NJCFƎOB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $410,"ȁccvߘnccv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $411,"@@"
	mov $412,"OۏosB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $413,"Aݐg̒I߈u㱁C"
	mov $414,"䒩ߌҟLoB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $415,"@@"
	mov $416,"uĖccsCccv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $417,"@@"
	mov $418,"G刓gnI݁B"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	textoff

;ʉ~
	dwavestop 1 : mov $30,""

	wait 2000

	bg white,16
;G\F@GvE΁@ʒuF@ʏtF[h
;G\F@ʏ@ʒuFE@ʏtF[h
	ld r,":a;tatie\miki\epron_bisyou.bmp",0
	ld l,":a;tatie\kenta\tuujyou.bmp",12
	wait 3000
;G\F@GvEΊ@ʒuF@ʏtF[h
;G\F@Ί@ʒuFE@ʏtF[h
	ld r,":a;tatie\miki\epron_egao.bmp",0
	ld l,":a;tatie\kenta\warai.bmp",12
	wait 1000
	bg white,12

	wait 1000

;wiFu܁v@ʏtF[h
	bg "cutin\dai3kou\cutin_49.jpg",12
	wait 2000

;wiFi㔼j@ʏtF[h
;wiFi֑XN[j
	lsp 1,":c;bg\dai3kou\tuki.jpg",0,0
	print 12

	drawsp 1,0,255,0,0

	delay 1000

	mov %197,0
	mov %198,0

	for %199=0 to 49
		gettimer %90
		drawsp 1,0,255,0,%196
		draw
		add %197,1
		mov %196,%197
		mul %196,%196
		mul %196,-1
		waittimer (%90+12)
	next

	csp 1

	bg black,1

	wait 2000

;EFCgRb
;ʉFYhII
	dwave 2,"wave\bosu22_r.wav"
;EFCgTb
	delay 5000

;

;ʁFSd}ij
	mov %42,1
	gosub *sindenzu

	wait 3000

;

	bg black,1

	mov %2702,1

	mov $30,""
textclear
	saveoff
;	eLXgz̏
	for %199=201 to 420
		mov $%199,"@"
	next

	bgm "title\Main-Theme.mp3"

;lIʂ֖߂

goto *sentaku





;\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\
;Ahx`[p[g
;Su
*scenario4

	mov $100,"l"

	for %199=19 to 34
		csp %199
	next

	bg black,14

	bgmfadeout 2500

	bgmstop

	wait 4000

	dwave 10,"wave\KeyboardC1.wav"
	bg "cutin\dai2kou\00.jpg",1
	wait 200

	dwave 10,"wave\KeyboardD1.wav"
	bg "cutin\dai2kou\01.jpg",1
	wait 100

	dwave 10,"wave\KeyboardD1.wav"
	bg "cutin\dai2kou\02.jpg",1
	wait 150

	dwave 10,"wave\KeyboardC1.wav"
	bg "cutin\dai2kou\03.jpg",1
	wait 150

	dwave 10,"wave\KeyboardC1.wav"
	bg "cutin\dai2kou\04.jpg",1
	wait 125

	dwave 10,"wave\KeyboardC1.wav"
	bg "cutin\dai2kou\05.jpg",1
	wait 300

	dwave 10,"wave\KeyboardD1.wav"
	bg "cutin\dai2kou\06.jpg",1
	wait 350


	dwave 10,"wave\KeyboardD1.wav"
	wait 450

	dwave 10,"wave\KeyboardC1.wav"
	bg "cutin\dai4kou\07.jpg",1
	wait 200

	dwave 10,"wave\KeyboardC1.wav"
	bg "cutin\dai4kou\08.jpg",1
	wait 300

	dwave 10,"wave\KeyboardC1.wav"
	bg "cutin\dai4kou\09.jpg",1
	wait 325

	dwave 10,"wave\KeyboardC1.wav"
	bg "cutin\dai4kou\10.jpg",1

	wait 3000

	bg black,0
	print 99,4000,"cascade.dll/dx"

	wait 2000



;ʉF`
	dwaveloop 1,"wave\SeaC11.wav"
;wiFCƓX@ʏtF[h
	bg "bg\dai4kou\umi_to_sima.jpg",16

	delay 3000
;wiF̍`@ʏtF[h
	bg "bg\dai4kou\machi_minato.jpg",12

	delay 3000
	bg black,12

	dwavestop 1

	delay 3000
;wiFy̎@ʏtF[h
	bg "bg\dai4kou\ie_heya.jpg",12
	delay 3000
;ʉFǂ@[vȂ@ỉ̓lbgɖB̎莝ɂAc^ˁj
	dwave 2,"wave\sisi.wav"
;wiF@tF[hȂ
	bg "bg\dai4kou\ie_niwa.jpg",1
	delay 1000
;wiFy̎@tF[hȂ
	bg "bg\dai4kou\ie_heya.jpg",12
	delay 2000

	setwindow 8,56,40,40,24,24,0,2,0,1,1,#888888,0,0,800,650
	texton

	mov $401,"pqہC椙ߘ@⁗IB"
	mov %130,401
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"nIАB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $403,"p美ʍwЁxC"
	mov $404,"ŏЗpzNQcnII`B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"k蓜ޘB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"Œ|qaΔB"
	mov $407,"ωlICp\ԑoapI^C"
	mov $408,"甉䐏s\ݐZB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"@@"
	mov $410,"㱒≺I@dVCn×C"
	mov $411,"ߘlݍHJB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $412,"RCrs⁗嗈B"
	mov $413,"ߋrsݑLkNC"
	mov $414,"R@k[jIB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@
;ʉFmbN@[vȂ
	dwave 2,"wave\se-knock1.wav"
	wait 500
	dwave 2,"wave\se-knock1.wav"
	wait 500

	mov $415,"@@"
	mov $416,"uuC运EHvv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $417,"@@"
	mov $418,"uuBvv"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"C֖vPDߕC"
	mov $402,"vLCjC闹B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $403,"@@"
	mov $404,"uuVLYrrHvv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"@@"
	mov $406,"uuVccwZBvv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $407,"@@"
	mov $408,"uuߗvsvyݕ֓藁Hvv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"@@"
	mov $410,"uuspCy_YrhAsBvv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $411,"@@"
	mov $412,"uuccBvv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $413,"@@"
	mov $414,"rs暜񋎁B"
	mov $415,"ݍĎ~濓IÒCГJIkNB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $416,"䘸߉ˏ扺OC㗹qB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $417,"ґRwZIVsCAcc"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $418,"餏ꎟwZCE勎OVB"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\

	textoff

	bg black,12
	delay 2000

;wiFL@ʏtF[h
	bg "bg\dai4kou\ie_rouka.jpg",12
	delay 2000

	texton


	mov $401,"zuI󟃁C䑖ݑLB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"ÐFÍIa}CIƐØVIB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $403,"sCލ{gAjIvC"
	mov $404,"ۗBØVI}B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"ґRsL_ГIuf"
	mov $406,"aOГϏoC"
	mov $407,"A䋏ZI琥ӓIWnB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"ƓIn`F赁Cޗۗ̓IC"
	mov $409,"[NʎґFI쐗B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $410,"@@"
	mov $411,"[ޕГynB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $412,"CafEÐlCАÓI甉䊴B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $413,"@@"
	mov $414,"A"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $415,"@@"
	mov $416,"uߑߐlwEHv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $417,"@@"
	mov $418,"qG⁗ĐIB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $419,"ccݙዩCߘlB"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\

	textoff

;wiFԁ@ʏtF[h
	bg "bg\dai4kou\ie_ima.jpg",12
	delay 2000

	texton

	mov $401,"qGȈٗ]nœC塓I@B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"ґRikDCAszޗB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $403,"Cssaߘl刖ʁB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"@@"
	mov $405,"uuC召rIccvv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"@@"
	mov $407,"uu䓰Ɩ琥v糋ycʓIB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"甛wq݊wZߎ`搏֋h_OyI@"
	mov $409,"ޕs甉FʐsEHvv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $410,"@@"
	mov $411,"p[x{Ig܏oލԓIC"
	mov $412,"꘢B䲈ߕŕk茓INlB"
	mov $423,"IpB"
	mov %120,410: mov %121,412:mov %122,24:gosub *messagefont
	mov %120,423: mov %121,423:mov %122,24:gosub *messagefont
	br
	$411
	$412@/
	$423/
	add $412,$423/
	@

	mov $413,"ᒅ乔ۓIڎ獐˓IC"
	mov $414,"ƐlB"
	mov $415,"ˍ݉[jOaْԓIlB"
	mov %130,413
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $416,"@@"
	mov $417,"uhX֓\ՋwZC"
	mov $418,"琥ߍHoIꕔB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $419,"^ICޘƓ鈍˔\cckCyBv"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\

	textoff

;wiFԁiuj@tF[hȂ
	bg "bg\dai4kou\ie_ima_bure.jpg",1
	delay 1000
;G\Fy@f@ʒuF
	ld c,":a;tatie\haruka\konwaku.bmp",12
	delay 2000

	texton

	mov $401,"ĜωCkIB"
	mov $402,"rzICqGB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $403,"@@"
	mov $404,"uDCplBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"@@"
	mov $406,"uܕsv֓CEHv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $407,"@@"
	mov $408,"pvLICொB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"@@"
	mov $410,"uccIBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $411,"@@"
	mov $412,"uCYrv糞l藁H"
	mov $413,"sGߗvwXDnwgdlEHv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $414,"@@"
	mov $415,"ucccv"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"pIۓ{|ٓB"
	mov $402,"\sC䎧CCʎqVB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $403,"CƗInCpٌٗI㏗mL糊B"
	mov $404,"֗LCyOsrߎ`IB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"pٍsxB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"ߘlsÁCpFI趓UqB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $407,"٘p܁CޘlKlϓIwxB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"@@"
	mov $409,"uu]C肏Ay݁Bvv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $410,"@@"
	mov $411,"uuRC_Ivv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $412,"@@"
	mov $413,"㏗m[[nቺCR@ݐ~[B"
	mov $414,"ޕs\IցcczޗCkĎhɁB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $415,"œϓICpgCًNB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $416,"@@"
	mov $417,"pI\B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $418,"⍓ُICvLImSB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $419,"ސ\CESI̎w@I灈ʁB"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"䐥䓰yB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"䓰眨qIXC琥ޘƓI福lB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $403,"ggrޔВnʓICpˑR甉䊴؜I݁B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"@@"
	mov $405,"uٕsNccv"
	mov $406,"@@"
	mov $407,"uud]Bv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"uߕs\]CEHvv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"@@"
	mov $410,"uuccICplBvv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $411,"@@"
	mov $412,"vցCs\]B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $413,"䐥䓰yB"
	mov $423,"NÐEIwHl䓰xVB"
	mov %120,413: mov %121,413:mov %122,24:gosub *messagefont
	mov %120,423: mov %121,423:mov %122,24:gosub *messagefont
	$413@/
	$423/
	add $13,$423/
	@

	mov $414,"֐ٓI|ҁB"
	mov %130,414
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $415,"@@"
	mov $416,"|ґݘCnB"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\

	textoff

	bg black,16
	delay 2000

;ʉFc񂾊wZ̃`C
	dwave 2,"wave\yugamichaim.wav"
;wiFuSu@̋Sv@ʏtF[h
	bg "cutin\dai4kou\11.jpg",12
	wait 6000
	bg black,12

	delay 2000

;wiF̍Eij@ʏtF[h
;wiF̍Ei㔼փXN[j
	lsp 1,":c;bg\dai4kou\machi_saka.jpg",0,-600
	print 12

	delay 1500

	for %199=0 to 199
		gettimer %90
		msp 1,0,3,0
		print 1
		waittimer (%90+16)
	next

	csp 1

	bg "bg\dai4kou\machi_saka_u.jpg",1

;aflFfree519.mp3
	bgm "bgm\free0519.mp3"

	delay 2000

	texton

	mov $401,"ِI෗^B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"ލn`N乌֓IC"
	mov $403,"Rϐl^Da惁B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"@@"
	mov $405,"uu⿁Cޕs召EHDBvv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"@@"
	mov $407,"uuDBvv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"@@"
	mov $409,"䉈s摖C"
	mov $410,"HIlF]]ŏāB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $411,"䓰ƓIB\ʏƓsr\CIC"
	mov $412,"LslhޘLjIƑB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $413,"sCޛf\ʏIߓxB"
	mov $414,"ݔwnCƝوOn"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $415,"@@"
	mov $416,"uuV^DށBvv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $417,"@@"
	mov $418,"uuCӁBvv"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"bōݚ}ΉƗېIߍaISρC"
	mov $402,"V󐰘NAsBIV䐥kDB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $403,"@@"
	mov $404,"ƕswZCAϏoUsJB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"ޗЏ[xVIynB"
	mov $406,"ӒnUsV疢sB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $407,"RCA݉rzIC"
	mov $408,"p茓{ˉs糉ƑʓIc|CB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"IwC唒VswZC"
	mov $410,"rߌwIԁCB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $411,"ґR\ʏ\ޔܖ@CASpݗ΁B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $412,"ݜޘCAZđ_\@藁H"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $413,"@@"
	mov $414,"IoΗ[~B"
	mov $415,"ȑzwZIqVOC"
	mov $416,"䐥ҍ݉ƗB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $417,"vl܏YrB"
	mov $418,"CSIwqsojCːƏ]IB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $419,"@@"
	mov $420,"Fꏗ횔I؜B"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\

	textoff

	bg black,12
	delay 2000

;wiFwZOρ@ʏtF[h
	bg "bg\dai4kou\gakkou_gaikan.jpg",12
	delay 2000
;wiF@Vb^[tF[h
	bg "bg\dai4kou\gakkou_kyousitu.jpg",26
	delay 2000

	texton

	mov $401,"ꓥCA󓞗┙ItB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"؜AmCҚ}΁B"
	mov $423,"lF݋ICۏ΁B"
	mov %120,402: mov %121,402:mov %122,24:gosub *messagefont
	mov %120,423: mov %121,423:mov %122,24:gosub *messagefont
	$402@/
	$423/
	add $402,$423/
	@

	mov $403,"TCLlQIpC\CwhlI䓰xG"
	mov $404,"LlwnT\CwԋrdxB"
	mov %130,403
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"@@"
	mov $406,"ˎwIޘnܓI͓B"
	mov $407,"А݉͗CClMIdB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"ґRI݌`C"
	mov $409,"AgSՔlqdw@I܋pkC"
	mov $410,"uLmCٖ@甐l^[mB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $411,"lFcޔЉ͓apI\拌n݈NC"
	mov $412,"}\CwԉˁxB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $413,"@@"
	mov $414,"ґRhlǏcp؈ꍱCAcc"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $415,"jSˑRrˁB"
	mov $416,"szϋߌ䓰ƓIlFCޔБz@vIB"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"䎩Ȗ瑁xǓƁB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"@ICsّҁB"
	mov $403,"R@CߑҍIvYrd"
	mov $404,"s@ƜϑzXB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"@@"
	mov $406,"┙n{IeЏCݍʏ㍿B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $407,"sv@CIx茟aC"
	mov $408,"掓IْCnNޕB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"sI揮AlC֗LEځB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $410,"ߒލԎVCSSȗB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $411,"@@"
	mov $412,"uuVߘߊŗE`Hvv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $413,"uuŗŗCΎ䗹Ivv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $414,"uuL槚`vv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $415,"uuCޔܖ@AkIvv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $416,"@@"
	mov $417,"ccZsB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $418,"ݐCSVqIgᚔVOCAB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $419,"ߍ掓IԎVCޑŐVIsC䊮Sٖ@ZB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $420,"r|I[mB"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"̋qONA浖YCٖ@ʋvn쐗B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"Ɩba乎uI揮C"
	mov $403,"嘢lsϓIߕCϓIی^B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"ȉxsfIgC"
	mov $405,"{SsLgpB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"csIgCݛEzsNB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $407,"@@"
	mov $408,"ٖ@BވؓI؁B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"CYr񓾔@C"
	mov $410,"ǒߍꎟIs藁H"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $411,"ؓsʐmAʏEB"
	mov $412,"R@C幁B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $413,"ݜϙZIzFC"
	mov $414,"\Yrݎ蒆藁H"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $415,"@@"
	mov $416,"蓎RC蓘aaތØVIXB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $417,"C@C[mꎟIsB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $418,"@@"
	mov $419,"AF[mρC[mFB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $420,"śfccS^lʑRٖ@IEH"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\

	textoff

	bg black,16
	bgmfadeout 2000
	bgmstop
	delay 2000

;ʉFwZ̃`C@[vȂ
	dwave 2,"wave\chaim.wav"
;wiFwZ̊Ki@ʏtF[h
	bg "bg\dai4kou\gakkou_kaidan.jpg",12
	delay 2000
;wiFp@ʏtF[h
	bg "bg\dai4kou\gakkou_bijyutu.jpg",12
	delay 2000

	texton

	mov $401,"uCrCVICccv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"@@"
	mov $403,"CcwC"
	mov $404,"ވ~IpwZB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"BC݉Ɠw͊w蚓ÍC"
	mov $406,"IasZB"
	mov $407,"r܁CLMSaߍGWB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"ccsCTCaى䗈ܝgxvB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"goΓVs槁C\[ޏC"
	mov $410,"ȋywCsLCVB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $411,"䓰ƓIXAϔrIB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $412,"@@"
	mov $413,"sCݐ^w͝gI\CC㱁B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $414,"ݜ}IZАC"
	mov $415,"Lޒi㱁CȐsیȓI\́B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $416,"@@"
	mov $417,"uVFvpa䱁B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $418,"䱓I召AFAsȎRrccv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $419,"@@"
	mov $420,"ܒCVʉ꘢䱎B"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"kscSAA@ҍHV"
	mov $402,"C\CCCriqB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $403,"\IB"
	mov $404,"swC蕘Vٜޘ\"
	mov $405,"Io^fI\B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"@EVEI䓰眨qIXC"
	mov $407,"RvL\SCCސr񎖁H"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"@@"
	mov $409,"Caō@ÍCڗL鑽SIpB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $410,"Ɠs܁C[福\I˔\CrLVٕsyB"
	mov $411,"A\]B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $412,"䎩Ȗ猦̏Cېv^̐xꐶB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $413,"@@"
	mov $414,"RCLVˑRccٖ@lʑȌB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $415,"ޛsl~IQ㵓rlB"
	mov $416,"CLCASٖ@C̏B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $417,"@@"
	mov $418,"_IVB"
	mov $419,"CYrρcc퐴^B"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"ACsmIlFC"
	mov $402,"h\CICٗB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $403,"CVˁC"
	mov $404,"aߍvLVܓIʐlNwS"
	mov $405,"suks[cc"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"ґRvlʜrC"
	mov $407,"AϓIg⁓{lB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"aŚCލŚs[I@B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"@@"
	mov $410,"ccZCݐI㱁B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $411,"ʒ꘢؎B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $412,"ˑRzNݘK䱉I̐lC"
	mov $413,"A@ʔcޘoIԁC"
	mov $414,"ܐ䓰IXSB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $415,"@@"
	mov $416,"ߏAccCAߘJB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $417,"\NxcKIaC"
	mov $418,"ݑʖ{CnӋB"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\

	textoff

	bgmfadeout 11
	bgmstop
;ʉFwZ̃`C@[vȂ
	dwave 2,"wave\chaim.wav"
	bg black,12
	delay 3000

;wiF@ʏtF[h
	bg "bg\aozora.jpg",12
	delay 2000
;wiFwZ̒@ʏtF[h
	bg "bg\dai4kou\gakkou_niwa.jpg",12
	delay 2000
;BGMFfree0257.mp3@iv[v
	bgm "bgm\free0257.mp3"

	texton

	mov $401,"ߓICBC}ߎ`㱁B"
	mov $402,"ݍZIrNC֓ᴁB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $403,"I֓ᴗC"
	mov $404,"xZFIzؘaU`VB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"LpCۘaUɋNI`hC"
	mov $406,"phIɐSؑ㕓IIC"
	mov $407,"䙉ʔ퐬NI\q`B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"U`VI趗pqЕsIKC"
	mov $409,"֔r񒅁C`YIFʓzB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $410,"@@"
	mov $411,"sRIo΁B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $412,"ZZoICpr򖔉B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $413,"ވ营㏬ICm荇IJB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $414,"@@"
	mov $415,"\݉oVOAEZݜޗH엹B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $416,"\vLwqCv狎C"
	mov $417,"㏬pXϔc擈琬lB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $418,"ZEڜqaSÁCSenzgIpC"
	mov $419,"{vLh䗯Yr\IyB"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"pZݜCB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"Tx~䓰ƉcIC"
	mov $403,"L㏬꘢lB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"pґR{䐥䍂ځC"
	mov $405,"ATcƗIؓsh\B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"@@"
	mov $407,"Csh㏬YWC"
	mov $408,"V{笗֓Icc"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"֐ESvB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $410,"@@"
	mov $411,"ccsCBܔESvIpJcc"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $412,"@@"
	mov $413,"ޘI֓C|ŕsoCAIB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $414,"AZLCߖs@nB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $415,"RvlFC"
	mov $416,"asLYrӖ藁H"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\

	textoff

	bg black,12
	bgmfadeout 2000
	bgmstop
	delay 3000

;ʉFZ~@iv[v
	mov %61,100
	chvol 1,(%3002*%61/100)
	dwaveloop 1,"wave\se-043.wav" : mov $30,"wave\se-043.wav"
;wiFEKiij@ʏtF[h
;wiFEKii㔼փXN[j
	lsp 1,":c;bg\dai4kou\machi_takadai_kaidan.jpg",0,-600

	print 12

	for %199=0 to 199
		gettimer %90
		msp 1,0,3,0
		print 1
		waittimer (%90+16)
	next

	csp 1

	delay 2000
;ʉFZ~iʂTOj@iv[v
	mov %61,50
	chvol 1,(%3002*%61/100)
;wiF@ʏtF[h
	bg "bg\dai4kou\machi_takadai.jpg",12
	delay 2000

	texton

	mov $401,"w@C䗈B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"VISCIenC"
	mov $403,"RRnݐZ݌}^RIiFB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"ቺWI隔^CC֗LUIfEB"
	mov $405,"ޕГynCLBCɓInB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"@@"
	mov $407,"c݋COIœB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"ߗLœIHC剻ȗCߗLNȏIjB"
	mov $409,"꒼C{Il՗~䕁B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $410,"@@"
	mov $411,"ccRCp꘢KlےވؓI݁B"
	mov $412,"@"
	mov $413,"@"
	mov $414,"@"
	mov $415,"@"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"ޘ䲎jIvICCw䓰VxB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"ÈȗC䓰ƕ֐ޕГynINҁB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $403,"ߍܘGaqCnIœ"
	mov $404,"]|n桒C꒼x~ޘIۓWB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"djIVlFC"
	mov $406,"uޘ\݁CSό䓰ƁvC"
	mov $407,"ىF㏗LhVB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"@@"
	mov $409,"sCRC"
	mov $410,"pwߒijaLIhB"
	mov $411,"@"
	mov $412,"@"
	mov $413,"@"
	mov $414,"@"
	mov $415,"@"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\

	textoff

;ʔ
	monocro #aaaaaa
	print 12

	texton

	mov $401,"ّaI_AőɈҊ[EH"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"QOC"
	mov $403,"ޘƓIlF曑АVI@B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"I⁔d䗓uWCC"
	mov $405,"ݐݓ{ALWOOƒMB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"ޘ抉ڗL|Isxab́C"
	mov $407,"rٝSA}̈ȋyEsmekB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"^}^ޘV悏@V̔V"
	mov $409,"L拌nIYC"
	mov $410,"CnވGIlsmIB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $411,"@@"
	mov $412,"TAMʐMȋymI抁B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $413,"浖YMIЉC"
	mov $414,"@孖͓I@V̔\槉s{gC"
	mov $415,"BAГݏJcc"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $416,"CݏI_ݘFIÓeB"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"܁CusMAsKvB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"܁CuoI戉zCAzvB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $403,"F|smIlf抁C"
	mov $404,"zލlLIsmA㱁CȋylTgn㤁B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"틳V[p@C"
	mov $406,"ƐlIlAIlsFB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $407,"ٓߍoوFIlCMkF{Ȗ\͈oB"
	mov $408,"֐ّ}́CsMSB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"@@"
	mov $410,"gzȊǐCAdߑR[C"
	mov $411,"юܑ孖͓I@idꐴC"
	mov $412,"ۍ򍪖{ٖ@񏜜ޘ抁B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $413,"Cٕ@B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $414,"v{݁w@RxC"
	mov $415,"ޘ抏ACƕ桓IُہB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $416,"dܐǐCA蕐ŝsvLDDC"
	mov $417,"`A`IosV蒆B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $418,"@@"
	mov $419,"AϓI抁CV㗹䓰B"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"|ICC{ƓI⁐lC\IpC"
	mov $402,"ꖼ̎芈ÓIVlB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $403,"VAsVIVB"
	mov $404,"LIVlوOnfB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"uFGvCߓޒԁC"
	mov $406,"ْqIlAܘfVB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $407,"@@"
	mov $408,"pkɋJB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"@ʋ笎Q^CA호VB"
	mov $410,"yVxpIiB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $411,"㏗m܁CpNݍCVla"
	mov $412,"Ȍ䓰gᚍRV㱘o\B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $413,"@@"
	mov $414,"ٖ@SP̏IpC\CSIHB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $415,"䓰IjAlFIMCCSs烞B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $416,"CVI܉C⌌ُn"
	mov $417,"p䓰I͗CVfMkAsIpB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $418,"暒nClFCň\CwHlSxB"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"ݕp艺SsmIlC"
	mov $402,"sWCpo荪{s嗈B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $403,"rCLl蕑ݓs햕cc"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"@@"
	mov $405,"讑䓰IMkݚIepC"
	mov $406,"sBLCRB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $407,"蕌x@aq󓞋VITB"
	mov $408,"g吺ċ~CsLlΖZB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"@@"
	mov $410,"ClF\B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $411,"笕s\R䓰B"
	mov $412,"笕s\{䓰B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $413,"@ʑzݜޘ㊈CAdϋߐHlS䓰B"
	mov $414,"@"
	mov $415,"@"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\

	textoff

	monocro off
	print 12
	delay 2000

	textoff

	mov $401,"Iȑ휺UB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"ޘkB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $403,"AyNTICIpB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"[ImC[IjC"
	mov $405,"pIƐlHُLB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"CLVC픗福IʒuB"
	mov $407,"Ib́C֗LHlSޘ̍B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"@@"
	mov $409,"䓞L@ȏo݌䓰ƛB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $410,"sC䑁ߐ[C@vLӖIB"
	mov $411,"ވ_CEpȓIEd̉B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $412,"SSVqIr笁C"
	mov $413,"[VIECޘEsvLh\B"
	mov $414,"@"
	mov $415,"@"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\

	textoff

	delay 3000

;wiFuE͂AcȂ܂łɔBv@ʏtF[h
	bg "cutin\dai4kou\12.jpg",12
	delay 3000
	bg black,12
;ʉXgbv
	dwavestop 1 : mov $30,""

;

;ʁFSd}i⍂j

;EFCgQb

	mov %42,3
	gosub *sindenzu

	wait 2000

;

;ʉFdԁ@[vȂ
	bgmonce "bgm\se-044.mp3"
;wiFݐ؂i[j@ʏtF[h
	bg "bg\dai4kou\machi_humikiri.jpg",12
	delay 4000
;wiFL@ʏtF[h
	bg "bg\dai4kou\neko.jpg",12
	delay 2000
;ʍtF[h
	bg black,12
	delay 2000

;ʉFЂ炵@iv[v@iȂŎgj
	bgm "bgm\higurasi.mp3"
;wiF܂Ȃ݊C@ʏtF[h
	bg "bg\dai4kou\machi_simanami.jpg",16
	delay 2000

	texton

	mov $401,"CsCACB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"ލ㘒CIfEC"
	mov $403,"蕐ڒʉlICB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"ґR֗LēVI]C"
	mov $405,"A}RI㱐暍B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"kAv^IHVBސŊ蓓IGEB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $407,"@@"
	mov $408,"nCIB"
	mov $409,"甐ʔیI[}B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $410,"ޘECcB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $411,"A^ڎqIBρB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $412,"@ISlV舻Q[C"
	mov $413,"ޘEB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $414,"@ʌ㈷sݓIԁC䈽B\d蜓ǓƁB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $415,"@ʜޘE槉N蛁C䈽B\dꐬCSVqB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $416,"EpsBϓIېB"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"厩R݉̏B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"_ICAI藚fA㱐UIC"
	mov $403,"s݊e鴒ȓIRB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"⁗I̐B䏫ZȓIǵC"
	mov $405,"UÐ՜NB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"@@"
	mov $407,"u\\\ccc\\\ck\\\\ccccv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"@@"
	mov $409,"TC㈷I֓甉SkDC"
	mov $410,"VIߔ䕽vDB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $411,"ϓIԁcB\oc"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $412,"@@"
	mov $413,"F糎lB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $414,"vCߖvLlB"
	mov $415,"ǵCLȔ\ߓB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $416,"SICvLlIC"
	mov $417,"B؏RI͗ʉ̏B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $418,"ӛΐ[r핕ISFa嗈C"
	mov $419,"ڒCn댦掓IKB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $420,"bŐݍÑuJvB"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"C啝WCB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"ZINC^ޕЎRZĆB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $403,"@@"
	mov $404,"̐CAݓߗB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"CLCÍCVLVÍB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"AfEACAASAhADAC֗LCB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $407,"ޘI؁CsڗL̏I͗ʁB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"@@"
	mov $409,"@ʗvݓIiFccCC֐fC҉ēVB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $410,"ccߖsցCscc"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $411,"@@"
	mov $412,"䏫ڌ݉ݓI[}B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $413,"SȎqC\B"
	mov $414,"ȎqǈB"
	mov $415,"@"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\

	bgmfadeout 1
	bgmstop


	mov $401,"VC旹䱁B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"xʖ{IꐮFB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $403,"bŔRhI슐䱈ʁB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"@@"
	mov $405,"}IƎ˒oߖFC"
	mov $406,"暕oIHiہB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $407,"󟃒ߖvLēItC䱊ЕЌ抐RF^FB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"@@"
	mov $409,"訏ˁCOoߍ򍫐FI䱖؁B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $410,"}鴏wxIRC"
	mov $411,"ƎlCÐÒnCntB"
	mov $412,"@"
	mov $413,"@"
	mov $414,"@"
	mov $415,"@"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\

	textoff

	bg white,16
	delay 2000
;wiFuwgtx@Əv@ʏtF[h
	bg "cutin\dai4kou\momizi\01.jpg",12
	delay 2000
	bg white,12

	delay 2000

;

;ỷ́@wgtx

	gettimer %90
	bgmonce "bgm\momiji.mp3"

	bg "cutin\dai4kou\momizi\02.jpg",12
	waittimer (%90+3500)

	bg "cutin\dai4kou\momizi\03.jpg",12
	waittimer (%90+7000)

	bg "cutin\dai4kou\momizi\04.jpg",12
	waittimer (%90+13000)

	bg "cutin\dai4kou\momizi\05.jpg",12
	waittimer (%90+19500)

	bg "cutin\dai4kou\momizi\06.jpg",12
	waittimer (%90+25000)

	bg "cutin\dai4kou\momizi\07.jpg",12
	waittimer (%90+26200)

	bg "cutin\dai4kou\momizi\08.jpg",12
	waittimer (%90+32500)

	bg "cutin\dai4kou\momizi\09.jpg",12
	waittimer (%90+38500)

	bg "cutin\dai4kou\momizi\10.jpg",12
	waittimer (%90+44500)

	bg "cutin\dai4kou\momizi\11.jpg",12
	waittimer (%90+50000)

	bg "cutin\dai4kou\momizi\12.jpg",12
	waittimer (%90+51200)

	bg "cutin\dai4kou\momizi\13.jpg",12
	waittimer (%90+57500)

	bg "cutin\dai4kou\momizi\14.jpg",12
	waittimer (%90+64000)

	bg "cutin\dai4kou\momizi\15.jpg",12
	waittimer (%90+70000)

	bg "cutin\dai4kou\momizi\16.jpg",12
	waittimer (%90+76000)

	bg "cutin\dai4kou\momizi\17.jpg",12
	waittimer (%90+77000)

	bg "cutin\dai4kou\momizi\18.jpg",12
	waittimer (%90+83500)

	bg "cutin\dai4kou\momizi\19.jpg",12
	waittimer (%90+89500)

	bg "cutin\dai4kou\momizi\20.jpg",12
	waittimer (%90+96000)

	bg "cutin\dai4kou\momizi\21.jpg",12
	gosub *momizi
	waittimer (%90+107000)
	gosub *momiziend

;yɍ킹ĉ̎twitF[h@iƂ肠ƂāBőł킹j

;

	bg white,12

	delay 3000

;wiF܂Ȃ݊C@ʏtF[h
	bg "bg\dai4kou\machi_simanami.jpg",12
	delay 2000

	texton


	mov $401,"̍@CCˁB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"\ʓIzOCR^ZC̓I]B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $403,"̐^C\甉YpLsIB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"@@"
	mov $405,"cO󓞓IHVB"
	mov $406,"ERgB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $407,"嗹ފݟECTJB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"uHVIGEB[}CRI꒳iO߁ccv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"Ðl\RȁCޗHVV݁B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $410,"ވᚊÁCgN勎ˑR\B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@


;ʉF@[vȂ
	dwave 2,"wave\hakusyu1.wav"

	mov $411,"@@"
	mov $412,"u^ccv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $413,"@@"
	mov $414,"ˑRCw@⁗alIB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $415,"\\ߓI"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $416,"AݜrzIC^RIZ|sfB"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\

	textoff


;ʂ⑁tF[h
;ɖ߂
;ʂ⑁tF[h
;ɖ߂
;iڂ܂̉oj
	bg black,11
	bg "bg\dai4kou\machi_simanami.jpg",11
	bg black,11
	bg "bg\dai4kou\machi_simanami.jpg",11

	texton

	mov $401,"ӛUCCQˑR餓IuB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"ߔА_d餓ImSC"
	mov $403,"甉䊴ɘaB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"@OqCޛsՐSMB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"ccAٖ@ݐlÓBIg̏AϓIB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"@@"
	mov $407,"uecceecccv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"@@"
	mov $409,"Z}C҈ӛΉ嗈B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $410,"@@"
	mov $411,"uu֍DEHvv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $412,"@@"
	mov $413,"꘢虐IFIlߗ⁗B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $414,"CʑRߗLl݁B"
	mov $415,"I̐CT^lߓJB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $416,"@@"
	mov $417,"uuccvccvBvv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $418,"@@"
	mov $419,"|ˏoCŌߘlB"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\

	textoff

;ʉFЂ炵@iv[v
	bgm "bgm\higurasi.mp3"
;wiF܂Ȃ݊Ciuj@tF[hȂ
	bg "bg\dai4kou\machi_simanami_bure.jpg",1
	delay 1000
;G\Fy@f@ʒuFE
	ld r,":a;tatie\haruka\konwaku.bmp",12
	delay 2000

;G\F搶@ʏ@ʒuF@tF[h
	ld l,":a;tatie\sensei\tuujyou1.bmp",16
	delay 2000

	texton


	mov $401,"[}㈩CB"
	mov $402,"ݜތiےCL꘢jl⋍ݓߗB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $403,"gsICXq㓾kB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"ēV֖vLSBC"
	mov $405,"jlpՒoF蓅B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"@@"
	mov $407,"uusDӎvCsz߁Bvv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"@@"
	mov $409,"uuvAvgnccdݐSccvv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $410,"@@"
	mov $411,"C̐F󓞓I_tC"
	mov $412,"ˑRٖ@B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $413,"ґRzsCޗcc"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $414,"@@"
	mov $415,"uuEB"
	mov $416,"C^甉ߓD̛B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $417,"bŊOWC슐RBvv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $418,"@@"
	mov $419,"uuA迁ccvv"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"zCpjlIgSZS_B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"lO̐C^vݓIB"
	mov $403,"ᚊx㤈ϏxxZB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"@@"
	mov $405,"uߓI̐CLЊÍB"
	mov $406,"bŏ厩RII^Dڏocc"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $407,"ܐwxIvzCҋ㢛PsB"
	mov $408,"甉䐴n󓞐[ℎRIwB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"ߜޘN\ޔЗ͗ʓIlC"
	mov $410,"@^FBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $411,"@@"
	mov $412,"Iԏ[xIRB"
	mov $413,"ߒߒC甐lLsDӎvNB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $414,"ccsC|qIB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $415,"I̐ARIWB"
	mov $416,"̓IRCctonB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $417,"@@"
	mov $418,"uccl~蓌ØVI@߁B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $419,"sSCusccv"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"u@CݓIsӐ"
	mov $402,"SvLYrBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $403,"u꘢@NgC"
	mov $404,"A浖YCVIBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"uŉSsC"
	mov $406,"YrrskCۚSkC"
	mov $407,"xI甗swxoBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"uϓIZ皗sCr\LE\NA܏\N"
	mov $409,"ˑRlF쐗Ii藁H"
	mov $410,"iss\JBvv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $411,"@@"
	mov $412,"ucccv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $413,"@@"
	mov $414,"ލԁCAG܉ISB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $415,"ӁCsޔЗsX֓@VIEtB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $416,"ґR嘢sLZ皓IC"
	mov $417,"AݜޘQPCؓsZ皗B"
	mov $418,"ݜޘQPCؓs嘰Z皗B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $419,"@@"
	mov $420,"Acc"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"uCޖvLa@B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"ޔДՓIEЉC"
	mov $403,"ґRLkloxcc"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"uޔЏߕssvIE]{\NC"
	mov $405,"pSvLC{IrďoB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"m䐥nz曑VIsC"
	mov $407,"Eҍ꘢ڈ꘢nǒVIhB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"ފukBޛERIB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"֍Ĝr吺đʏEЉIaC"
	mov $410,"v@I{E㗈ИAOmC"
	mov $411,"A{vLa@EޘzFB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $412,"AۚSAyAǜPB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $413,"C甐lFyVIiC"
	mov $414,"甐lFǝ{ݎI@ōDIa@B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $415,"C@Cmҍˉ甐lFǜPB"
	mov $416,"ҐoVIC甐lFY㈔VOIB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $417,"vޔЌݑ棓Iǖʎ]C"
	mov $418,"ЉAٖٝ@៙WʏEЉBv"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"ccSIߔНٗ͊C튮S\萗oB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"CvݓImИʏEC"
	mov $403,"A{s\\IiB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"gLlۋNEChVIE㗖͎"
	mov $405,"A@ʜޘЉٖ@RtʏEC"
	mov $406,"kdB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $407,"@@"
	mov $408,"A蕉S琥ρB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"V̈ڈnzFoC"
	mov $410,"uLCsvB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $411,"cc"
	mov $423,"ACϏAٖ@ʋvn쐗B"
	mov %120,411: mov %121,411:mov %122,24:gosub *messagefont
	mov %120,423: mov %121,423:mov %122,24:gosub *messagefont
	$411@/
	$423/
	add $411,$423/
	@

	mov $412,"@@"
	mov $413,"uGC]CܗrB"
	mov $414,"U悒v㗈CA䐥sBv"
	mov $415,"@"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	mov %130,412
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\

	textoff

;G\Fy@΁@ʒuFE
	ld r,":a;tatie\haruka\bisyou.bmp",12

	texton

	mov $401,"uvLvLCܓIkLB[Lccv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"@@"
	mov $403,"u远r܁Ck悁B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"ݜޘuIЉCsǐC"
	mov $405,"s鈓s\IB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"迎헝Ȋ蓓I@I瀁B"
	mov $407,"苈v꒼ᚐSӁBv"
	mov $408,"C튴漁B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"@@"
	mov $410,"urCA捐Bj迈؈DBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $411,"@@"
	mov $412,"uccFBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $413,"@@"
	mov $414,"u_ڑCBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $415,"@@"
	mov $416,"^C튖N̋IߔЙt"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $417,"^C튖̋IߔЙt"
	mov $418,"ESB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $419,"TCّI敒ԕm悎JB"
	mov $420,"aLFIl敁CӐꌏIB"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\

	bgmfadeout 1
	bgmstop

	mov $401,"uCٗv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"@@"
	mov $403,"ˑR㱁CC≺rsB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"@@"
	mov $405,"uCYrߐO藁H"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"ߕs~GZEH"
	mov $407,"֐IGEJccv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"@@"
	mov $409,"ucccv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $410,"@@"
	mov $411,"usEHv"
	mov $412,"@"
	mov $413,"@"
	mov $414,"@"
	mov $415,"@"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\

	textoff

;G\Fy@f@ʒuFE
	ld r,":a;tatie\haruka\konwaku.bmp",12
	texton


	mov $401,"usccސccC蓐ːIccv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"@@"
	mov $403,"uEB"
	mov $423,"@C֐^ߓIi藁Bv"
	mov $404,"@"
	mov $405,"@"
	mov $406,"@"
	mov $407,"@"
	mov $408,"@"
	mov $409,"@"
	mov $410,"@"
	mov $411,"@"
	mov $412,"@"
	mov $413,"@"
	mov $414,"@"
	mov $415,"@"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	mov %120,402: mov %121,420:mov %122,24:gosub *messagefont
	mov %120,423: mov %121,423:mov %122,24:gosub *messagefont
	br
	$403@/
	$423/
	add $403,$423/
	\

	textoff

;GF搶@tF[hAEg
	cl l,12

	texton


	mov $401,"ݚ{΁CR@gCB"
	mov %130,401
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"@@"
	mov $403,"ccccccB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"ґR֕~CA˓I񓚑ӐIB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"KDىIVWώC"
	mov $406,"A@ʕspIԁCӉzE{ތOB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $407,"এউොkeՏoC"
	mov $408,"݊wZkCL_iisB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"C蓐OޘRCA݉ēVρcc"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $410,"@@"
	mov $411,"ccˑRӛΓB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $412,"܋NCߘlēVCpՒ蓅B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $413,"ґRꎟFʁCAّpLpߊB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $414,"ÓC琥CaϓIRccH"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $415,"sCsJcc"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\

	textoff

	bg black,16
	bgmfadeout 2000
	bgmstop
	delay 2000

;wiFy̕i[j@ʏtF[h
	bg "bg\dai4kou\ie_heya_yuugata.jpg",12
	delay 2000

;aflFfree0519.mp3@iv[v
	bgm "bgm\free0519.mp3"

	texton


	mov $401,"BIC񓞗ƁB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"񓞖[㱍@CcEIOk݈߉ˏC"
	mov $403,"R@_iIUOЕĐIB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"藢\I~[㈷ߗ\I"
	mov $405,"M↊B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"h擓I⎕ݐHI㱗B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $407,"@@"
	mov $408,"NxIsCʓIDyB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"DyVOCʏYrsvLC"
	mov $410,"ŊO\CkÔfސp擏YrIB"
	mov $411,"ޘ[㱓Il"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $412,"TsޘIzuzڌJB"
	mov $413,"ccsCƐlȊO"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $414,"vLlI[㱏AB"
	mov $415,"Bӓ"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\

	textoff

	bg black,12
	delay 1000

;wiFA@ʏtF[h
	bg "bg\dai4kou\ari.jpg",12
	delay 2000

	texton

	mov $401,"IZ⌊গoB"
	mov $402,"RBޔГrs\FIB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $403,"ޕГDyCn䧒꘢⌊B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"꘢瀐tIwqݐtYrB䐥ϐn"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"@@"
	mov $406,"Aދp誔IDB"
	mov $407,"ޏA誔IDB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"sC܋NCӑRB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"NIāCݒ@NSI@"
	mov $410,"ޏA_B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $411,"@@"
	mov $412,"oDSCnC"
	mov $413,"AvzDRzےvÓB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $414,"C@ʖvLCFB"
	mov $415,"AC@ʍݐC⌊AퟹvB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $416,"Klp^䷊Ήn^ʓI"
	mov $417,"˔\甛FB"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"IDyCCRyߗeՎ^ۘa񐶒C"
	mov $402,"ȉgpIIjhƊppIB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $403,"DCkWC"
	mov $404,"sݓ[_A\rVB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"ݎRFCFԖa䱉tC"
	mov $406,"ܓCFIvHÕÍB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $407,"CLhFꍱp㩈"
	mov $408,"CDB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"@@"
	mov $410,"SSnCI᳎qCǉM↊ЁC"
	mov $411,"{@㗧㗈B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $412,"Fওn\HHIώqC"
	mov $413,"rœsŕsB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $414,"ȑOCLꎟ݉ƗIxᗹEfQI"
	mov $415,"Cc"
	mov $416,"ꐮVs݊ŒI̔핪IB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $417,"ߎ蕈IeI㏬sEsZgC"
	mov $418,"uܗF运ŎZCwƘEHv"
	mov $419,"ґR\rܓIcc"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"Ass܁CݖY㱓IC"
	mov $402,"ޔА^IkLB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $403,"苏݁CE勎NB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"ݜޕГyߗC"
	mov $405,"Ls^B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"ґRޗʉrꍱʓC"
	mov $407,"As\S⌊ISeB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"sʏLICy@CdID擔oS"
	mov $409,"AߔДqn\ŋN勷C"
	mov $410,"ŏdvIؓsB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $411,"@@"
	mov $412,"}sρCœdsDB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $413,"uyŕsF݊Yr"
	mov $414,"XB"
	mov $423,"ّoܓs@B"
	mov $415,"@"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	mov %120,413: mov %121,420:mov %122,24:gosub *messagefont
	mov %120,423: mov %121,423:mov %122,24:gosub *messagefont
	$413
	$414@/
	$423/
	add $414,$423/
	\

	textoff

	bg black,12
	delay 2000

;wiFuSƏƂ́AlɌʂ悫Bv@ʏtF[h
	bg "cutin\dai4kou\13.jpg",12
	delay 2000
	bg black,12
	bgmfadeout 2000
	bgmstop
	delay 3000

;ʉFXY@[vȂ
	dwave 2,"wave\suzume.wav"
;wiF̍Eij@ʏtF[h
;wiF̍Ei㔼փXN[j
	lsp 1,":c;bg\dai4kou\machi_saka.jpg",0,-600
	print 12

	delay 1500

	for %199=0 to 199
		gettimer %90
		msp 1,0,3,0
		print 1
		waittimer (%90+16)
	next

	csp 1

	bg "bg\dai4kou\machi_saka_u.jpg",1

	delay 2000

	texton

	mov $401,"Vˋ}ZBIVC䐥rB"
	mov %130,401
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"񒅑L֓IwC"
	mov $403,"ʉIෑB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"ґRS㏈؜CAlF֐ݑŗāBؓsvLB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"vsdwZCCnݏ֚JB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"Ւ֓CŊChcc"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $407,"ґRLϓIz@CAśf֐vLtsÁB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"sC{ٖ@tsÁBYrsٖ@B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"@@"
	mov $410,"A͗YI䱊ρB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $411,"ٖ@RC\CR^zB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $412,"@@"
	mov $413,"Aϓx嗹ىމIqcc"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $414,"śfC䑖ٖ@I^f_B"
	mov $415,"@"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\

	textoff

	bg black,12
	delay 2000

;ʉFZ~@iv[v
	mov %61,100
	chvol 1,(%3002*%61/100)
	dwaveloop 1,"wave\se-043.wav" : mov $30,"wave\se-043.wav"
;wiFwZOρ@ʏtF[h
	bg "bg\dai4kou\gakkou_gaikan.jpg",12
	delay 2000
;ʉFZ~iʂTOj@iv[v
	mov %61,50
	chvol 1,(%3002*%61/100)
;wiF@Vb^[tF[h
	bg "bg\dai4kou\gakkou_kyousitu.jpg",26
	delay 2000

	texton

	mov $401,"|IVC䐥ˑR~濁B"
	mov %130,401
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"|ِnClsKI[B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $403,"ݓߔCl@ȓI쏊CB"
	mov $404,"CvϘIԁC"
	mov $405,"As刏ލ|ccrzJB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"ގC@InӍݐC"
	mov $407,"@ʔv܏o꘢Iԁcc"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"ߏACV֐wZJB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"@ʍVvLwIԁC"
	mov $410,"{ȔƜލsKIB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $411,"@@"
	mov $412,"߈VCЉȓICsB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $413,"eܐl萧꘢gjIRڍ"
	mov $414,"AVIِSVpۗ莁B"
	mov $415,"Șa蓓IlҚGB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $416,"@@"
	mov $417,"uRCsLlzaҁBv"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"śfC֐꘢l화B"
	mov $402,"ޘtꋤLRXlB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $403,"ō@`Uܐl"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"ȋyQllcc"
	mov $405,"R@CqVCnCsz䧉B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"CqVCnc䐄I꜁B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $407,"@@"
	mov $408,"uu|wI蜃rρHvv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"@@"
	mov $410,"ЉȘVcCÒnܓB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $411,"@@"
	mov $412,"uuFljIҁcc"
	mov $413,"u甔wI䧔WDBvv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $414,"@@"
	mov $415,"uuߏAJCwC䧈ꉺJBvv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $416,"@@"
	mov $417,"uuccCߘcc"
	mov $423,"F琥LbIBvv"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	mov %120,416: mov %121,420:mov %122,24:gosub *messagefont
	mov %120,423: mov %121,423:mov %122,24:gosub *messagefont
	br
	$417@/

	dwavestop 1 : mov $30,""

	$423/
	add $417,$423/
	\

;BGMFfree55.mp3@iv[v
	bgm "bgm\free55.mp3"


	mov $401,"wIԁC甋Iu㱋ÌŗB"
	mov %130,401
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"܏oޒԓI\ȁCIoI_FCcFېB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $403,"ِCLڌsW݉gB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"䐥SIXB"
	mov $405,"@ʎ䐶CېYr鈖smB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"@@"
	mov $407,"ƓsݝIcFB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"vLlCCx㏋nŒC"
	mov $409,"swC蕘VsՒ喔IcFy@vB"
	mov $410,"@"
	mov $411,"@"
	mov $412,"@"
	mov $413,"@"
	mov $414,"@"
	mov $415,"@"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\

	textoff

;wiFiuj@tF[hȂ
	bg "bg\dai4kou\gakkou_kyousitu_bure.jpg",1
	delay 1000
;G\Fy@f@ʒuF
	ld c,":a;tatie\haruka\konwaku.bmp",12
	delay 2000

	texton

	mov $401,"uVccv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"@@"
	mov $403,"Iی甋萓~_B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"@@"
	mov $405,"uc䐥苘B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"g|甉C"
	mov $407,"hƓYWcv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"@@"
	mov $409,"ÝِBwFIڌqB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $410,"ꕔlݝܒI\C"
	mov $411,"灈ꕔlݓҘVIB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $412,"@@"
	mov $413,"usp݈Ӊc"
	mov $414,"]sJBv"
	mov $415,"@"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"u߁AߍDJccߏAsDӎvcv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"@@"
	mov $403,"ߗIԍ@CVۗC"
	mov $404,"CngڍIeB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"CNρC}IsB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"㫋I媉]C"
	mov $407,"꒼YCkNB"
	mov $408,"@"
	mov $409,"@"
	mov $410,"@"
	mov $411,"@"
	mov $412,"@"
	mov $413,"@"
	mov $414,"@"
	mov $415,"@"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\

	textoff

	bg black,12

	texton


	mov $401,"ޔВxICExB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"QCCCrˍ݊OB"
	mov $403,"ȑOCnC꒼sρB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"@@"
	mov $405,"@ʕpvLwC@ʜޘEvLm݉"
	mov $406,"\ݐS[^CVFIߍqB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $407,"RCݓߐsC䖾B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"ޘECvL_CvLŁB"
	mov $409,"vLlLoVB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $410,"@@"
	mov $411,"Rc䲁ClSpD擒mS^יNB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $412,"hlISCs䓰꘢lB"
	mov $413,"嘢lISCːFInB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $414,"l曑SCR@FB"
	mov $415,"@"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\

	textoff

;wiFwZ̊Ki@ʏtF[h
	bg "bg\dai4kou\gakkou_kaidan.jpg",12

	texton

	mov $401,"^sDIqC䐥ꌏڈꌏnېB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"ߓVw@C"
	mov $403,"cI幚ǝ{CC"
	mov $404,"⁗ǓwIސގgB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"@@"
	mov $406,"uuݏ݁CCܒԒӓ_B"
	mov $407,"YrbHvv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"@@"
	mov $409,"uuAAAZߜr܁cc"
	mov $410,"C|N笗Cȍ䔓oJBvv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $411,"@@"
	mov $412,"uuVCI֘EHvv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $413,"@@"
	mov $414,"mIC䐥ݓls⁔dCB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $415,"ޗ勎wICŕsFFIgeC"
	mov $416,"A敒ԓI|NawB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $417,"֗L{wQ^ْԁB"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"uus卡V^􎀉䗹Bvv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"@@"
	mov $403,"uuCu˓ʜkaBvv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"@@"
	mov $405,"uu݁cc^IEH"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"ȑOCLl܋\䓰Iwqrv{Bv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $407,"@@"
	mov $408,"uCߌB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"CDා퐄IC"
	mov $410,"R@OV@C\SƓsBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $411,"@@"
	mov $412,"u^IIHx@AvǘEHv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $413,"@@"
	mov $414,"uޚIx@sߌ䓰ƓIԁB"
	mov $415,"sېYrCs퉆勎B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $416,"߉ƐlЉϚvBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $417,"@@"
	mov $418,"usJCCYrߔЉƒIwq݉FǛHv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $419,"@@"
	mov $420,"u^IC|CFލlBv"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"I_ۏoCE܌B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"Cs甓ߍwӓC䜟nCB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $403,"@@"
	mov $404,"vLlCޓ_k^B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"ى䐥YrŖ@C疾kB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"vցC@ʖvL݁C鈖spĊQB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $407,"ϓIlC֐svݘޘWDB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"VI߈ʒjOnB"
	mov $409,"̐ICEٖ@hdlΗeB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $410,"\֐lC\CdlIW𑶍ݒB"
	mov $411,"@"
	mov $412,"@"
	mov $413,"@"
	mov $414,"@"
	mov $415,"@"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\

	textoff

	bg black,16
	delay 2000
;wiFuȑ݂ɂA͂ȂȂBv@ʏtF[h
	bg "cutin\dai4kou\14.jpg",12
	delay 2000
	bg black,12
	bgmfadeout 2000
	bgmstop
	delay 2000

;wiFy̕i[j@ʏtF[h
	bg "bg\dai4kou\ie_heya_yuugata.jpg",12
	delay 3000

;ʉFmCY@[vȂ
	dwave 10,"wave\noise01.wav"
;wiF̍Ei[j@tF[hȂ@u\ĉʖ߂
	bg "bg\dai4kou\machi_saka_yuugata.jpg",1
	delay 200

	bg "bg\dai4kou\ie_heya_yuugata.jpg",1

	delay 3000

	texton


	mov $401,"zNwF@IߘwxB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"wIC䐤Ӕ\B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $403,"I䖔ݖcc"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"٘ߍ\lIwq܁Cm营笉IJB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"@@"
	mov $406,"߈V琥ρB"
	mov $407,"ٓߘwqIm莁C\LB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"wƓIH\SZCn}MԁC"
	mov $409,"eenLsB"
	mov $410,"@"
	mov $411,"@"
	mov $412,"@"
	mov $413,"@"
	mov $414,"@"
	mov $415,"@"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\

	textoff

	delay 1000

;wiF̍Ei[j@tF[hȂ
	bg "bg\dai4kou\machi_saka_yuugata.jpg",1

;ʉFSgI@[vȂ
	dwave 2,"wave\bosu07_as.wav"
	QUAKE 20,300

	texton


	mov $401,"ېA݈u㱁B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"ߘwqۏoꐺZI닩CR@ʑOB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $403,"suMnᔈŌ෉C"
	mov $404,"ߗQ꘢IB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"@@"
	mov $406,"ccccccB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $407,"YrsvB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"L߁B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"@@"
	mov $410,"AC^sDIC"
	mov $411,"vLlœ\ාr׉Iu㱁B"
	mov $412,"꘢ڈғsvLB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $413,"@u嗈IlFœIC"
	mov $414,"|ݐ෉IC֗L⋍ݏʘ\IB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $415,"LlskB"
	mov $416,"R@ґRvL܏oCAp_wጒB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $417,"uߊIJCߔc\IJvccݜ܁B"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\

	textoff

	bg black,16
;wiFy̕i[j@ʏtF[h
	bg "bg\dai4kou\ie_heya_yuugata.jpg",12

	texton


	mov $401,"䓦餗ߗCtޘ[~C"
	mov $402,"ݔq۝TB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $403,"sICs䊱IB"
	mov $423,"YrsvB"
	mov %120,403: mov %121,403:mov %122,24:gosub *messagefont
	mov %120,423: mov %121,423:mov %122,24:gosub *messagefont
	$403@/
	$423/
	add $403,$423/
	@

	mov $404,"Ӝk\C\E]\ىeHB"
	mov %130,404
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"Acccccc"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"䍪{sQdlI"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $407,"@@"
	mov $408,"RC٘ߍQhlI䓰Il܁C"
	mov $409,"ϓI[^{s\萓FB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $410,"\IlIƐlC"
	mov $411,"瑜竎IB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $412,"CFIwq_S{B"
	mov $413,"ĉC@ʉIpm\IC"
	mov $414,"鈖sm\oYrB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $415,"竐RI\B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $416,"@@"
	mov $417,"AρCSIܒ暔抎B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $418,"^aȁCȋSI`ᐢCB"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"uCYrccv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"@@"
	mov $403,"\Ilsȝ{IC퐄IB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"FƕsC햕B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"@@"
	mov $406,"uYrsvccv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $407,"@@"
	mov $408,"zݜޘÒn߁B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"ccCYr藁H"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $410,"@@"
	mov $411,"uCYrccAs\C꘢l藁H"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $412,"݁cccccc"
	mov $423,"CYrHv"
	mov $413,"@"
	mov $414,"@"
	mov $415,"@"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	mov %120,412: mov %121,420:mov %122,24:gosub *messagefont
	mov %120,423: mov %121,423:mov %122,24:gosub *messagefont
	$412@/
	$423/
	add $412,$423/
	\

	textoff


;ʉFMMMMMMM
;wiFy̕i[Eʁj@tF[h
	dwave 2,"wave\DoorClose.wav"
	bg "bg\dai4kou\ie_heya_tokusyu.jpg",0
	print 99,3000,"cascade.dll/dx"

	texton


	mov $401,"ޘECSInB"
	mov $423,"SSssInjB"
	mov %120,401: mov %121,401:mov %122,24:gosub *messagefont
	mov %120,423: mov %121,423:mov %122,24:gosub *messagefont
	$401@/
	$423/
	add $401,$423/
	@

	mov $402,"lpȓIo萧occ"
	mov $423,"R@A៌IA[mAB"
	mov %120,402: mov %121,402:mov %122,24:gosub *messagefont
	mov %120,423: mov %121,423:mov %122,24:gosub *messagefont
	$402@/
	$423/
	add $402,$423/
	@

	mov $403,"@@"
	mov $404,"njBl㱉AnjB"
	mov %130,403
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"䊈CpݒnjVB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"Clٖ@B"
	mov $423,"\ȋSIgᚊB"
	mov $407,"@"
	mov $408,"@"
	mov $409,"@"
	mov $410,"@"
	mov $411,"@"
	mov $412,"@"
	mov $413,"@"
	mov $414,"@"
	mov $415,"@"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	mov %120,406: mov %121,420:mov %122,24:gosub *messagefont
	mov %120,423: mov %121,423:mov %122,24:gosub *messagefont
	$406@/
	$423/
	add $406,$423/
	\

	textoff

;BGMFfree61.mp3@iv[v
	bgm "bgm\free61.mp3"
;wiFuȂ΁ÂƁcv@ʏtF[h
	bg "cutin\dai4kou\15.jpg",12
	delay 2000
;wiFy̕i[Eʁj@ʏtF[h
	bg "bg\dai4kou\ie_heya_tokusyu.jpg",12
	delay 2000
;wiFy̕i[EʂQj@tF[h
	bg "bg\dai4kou\ie_heya_tokusyu2.jpg",0
	print 99,3000,"cascade.dll/dx"
	delay 2000

	texton


	mov $401,"ECSՉwnCnaȁB"
	mov %130,401
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"昸sIߏEB"
	mov $403,"ʉnjIC歑RCB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"@@"
	mov $405,"ߗLÑ݁B"
	mov $423,"ÔV̍ݎkB"
	mov %120,404: mov %121,405:mov %122,24:gosub *messagefont
	mov %120,423: mov %121,423:mov %122,24:gosub *messagefont
	br
	$405@/
	$423/
	add $405,$423/
	@

	mov $406,"I⍓AǓƓIɋASғIȁB"
	mov %130,406
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $407,"ۓ{Aɑ^AܖAAHAAwB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"ÏlIƎ㉻̐C䍙I拋NB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"@@"
	mov $410,"ߗ͗ʏ[xCNTיߎғISNB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $411,"@ݐkIHHH圓DC"
	mov $412,"IS圐CNTc"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $413,"暒ncߎ̐B"
	mov $414,"@"
	mov $415,"@"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"l㱓ISCےnjB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"@ʑϒɋA߈C티IݓIԁC"
	mov $403,"|s@CSSꍱJB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"ISʉVOIrB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"@@"
	mov $406,"EߗߐlIOC"
	mov $407,"ɋNg̓IqB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"ސٕs甔ClœII閧B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"S欎r㍏xِIB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $410,"ߍ\ِOw灈ExI瑁B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $411,"@@"
	mov $412,"uccʍsJCʍsJccv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $413,"@@"
	mov $414,"bŔYrgʁCtkÔV́B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $415,"@@"
	mov $416,"uޗIH@V_lIHBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $417,"@@"
	mov $418,"ߐ܍ݍ]曍IØVRB"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"uc甉J@vIls\ʍsv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"CȏjޛwqIӐCO桕B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $403,"I[[C񗈓IpߐlQB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"֊QCvʍsJCʍsJBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"@@"
	mov $406,"wqFp揥IwʍsJxB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $407,"̍qIOV_lI_{桕I̎B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"ݓCNxӏACۓlIsC"
	mov $409,"ӖvE餈꒼桎ȓI_NݗCC"
	mov $410,"KlCnƗB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $411,"o_\I桕C"
	mov $412,"꒼ggՓ{֓I߈ꍏCApsĉڗLB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $413,"ˉuQvB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $414,"@@"
	mov $415,"RCގ֗L@]B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $416,"B̋țsݑiA珎SeC"
	mov $417,"ݑiAOi暓WᑴI^ӁB"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\

	textoff

;ʉF`L`Lb@iJb^[̐noǁAlbgɖBc^ˁj
	dwave 2,"wave\katta01.wav"
;wiFJb^[iCt@Qb\Ĕwi߂@tF[hȂ
	bg "bg\dai4kou\cutter.jpg",1

	delay 2000

	bg "bg\dai4kou\ie_heya_tokusyu2.jpg",1

	texton


	mov $401,"@WWn⋗NC"
	mov $402,"CiqIāC\ocHB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $403,"R@CߝInfʓIC"
	mov $404,"ُyxIrB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"@@"
	mov $406,"kNIwʍsJxIiB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $407,"ߒi̍Ӎݐ勰|C"
	mov $408,"ِl⁏I䔉V́B"
	mov $409,"@"
	mov $410,"@"
	mov $411,"@"
	mov $412,"@"
	mov $413,"@"
	mov $414,"@"
	mov $415,"@"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\

	textoff

;wiFuʂ񂹁@ʂ񂹁v@ʏtF[h
	bg "cutin\dai4kou\toryanse\01.jpg",12
	delay 2000
;wiFu͖{̍ד@S_l̍דv@ʏtF[h
	bg "cutin\dai4kou\toryanse\02.jpg",12
	delay 2000
;wiFE@tF[hȂ
	bg "cutin\dai4kou\toryanse\03.jpg",1
;wiFuƒʂĉ񂹁@т̂Ȃ̒ʂႹʁv@ʏtF[h
	bg "cutin\dai4kou\toryanse\04.jpg",12
	delay 2000
;wiFE@tF[hȂ
	bg "cutin\dai4kou\toryanse\05.jpg",1
	delay 200
;wiFE@tF[hȂ
	bg "cutin\dai4kou\toryanse\06.jpg",1
;wiFu̎q̎̒Ɂ@{𗊂݂ɎQ܂v@ʏtF[h
	bg "cutin\dai4kou\toryanse\07.jpg",12
	delay 2000
;wiFu͂悢悢@҂͂킢v@ʏtF[h
	bg "cutin\dai4kou\toryanse\08.jpg",12
	delay 2000
;wiFE@tF[hȂ
	bg "cutin\dai4kou\toryanse\09.jpg",1
;wiFu킢Ȃ@Ƃ񂹁@Ƃ񂹁v@ʏtF[h
	bg "cutin\dai4kou\toryanse\10.jpg",12
	delay 2000
;wiFy̕i[EʂQEj@ʏtF[h
	bg "bg\dai4kou\ie_heya_tokusyu2_kekkon.jpg",14
	delay 2000

	texton

	mov $401,"iCi򏥏qIRB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"ޘlInCÈȗAlρB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $403,"@@"
	mov $404,"}㱓ISےnjCCԉSГ㗷rB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"ꎟꎟCsfdϓIB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"哖甐l[mIC哖Ėٖ@EC"
	mov $407,"AϏȊՑ潈B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"ޒItClIB"
	mov $409,"JCSsˍDB"
	mov $410,"@"
	mov $411,"@"
	mov $412,"@"
	mov $413,"@"
	mov $414,"@"
	mov $415,"@"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\

	textoff

	bgmfadeout 1
	bgmstop

	delay 4000
	bg black,1
;ʉFhTb
	dwave 2,"wave\ClothC.wav"
	delay 3000
;wiFu΁Á\\v@ʏtF[h
	bg "cutin\dai4kou\16.jpg",12
	delay 2000
	bg black,12

;

;ʁFSd}iōj
	mov %42,4
	gosub *sindenzu

	wait 3000


;

	delay 2000
;BGMFfree522.mp3@iv[v
	bgm "bgm\free0522.mp3"

	texton


	mov $401,"⁗̐B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"ގ̐YrCnI藁H"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $403,"@@"
	mov $404,"ٗC֐NcIc"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"ߘِl㱓Iؓs[xDa͓IÍB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"ŕYYICRpՒ"
	mov $407,"݊XerWI̐B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"@@"
	mov $409,"ߘNCA\ߓ厩RI̐B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $410,"ēVIC~VIC"
	mov $411,"ِsIVCr灈FICC"
	mov $412,"̐C^FZĆB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $413,"lFݐZ݉I̐C"
	mov $414,"R䐥VˁCܕs䓰眨qIXC"
	mov $415,"pCIV福{uB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $416,"Ip퉷_C䘸zCCEVEI"
	mov $417,"\RUꕛISʍEB"
	mov $418,"蕘svLzB"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"uIߐ^DߛBv"
	mov $402,"uCLI̎JBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $403,"uffIXaߍsC"
	mov $404,"AVI˞BCʑR֐sϛBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"@@"
	mov $406,"꘢՘aP\INjlOB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $407,"ΒCffIoxcΗeB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"V@CpÏėC"
	mov $409,"sv@CnpɏoƁB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $410,"mp݉Ɨwa^ЏWzVI"
	mov $411,"A̐YrIs^B"
	mov $412,"䓰ƞጕۊǚIœa_Мވ_"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $413,"䓰ƞጎ桚Iœa_"
	mov $414,"ތ䐥ߗܓIC"
	mov $415,"ȉuލW\vHI꘢C"
	mov $416,"INCAϗ𗹁B"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"R@C{@IVB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"@@"
	mov $403,"uuߜrܖ瑾啪JIvv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"@@"
	mov $405,"ݑLICߓI^B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"@@"
	mov $407,"uuIƗEYrssI"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"CflICcC蕍HssccI"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"ߜސv甉䋎XEIvv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $410,"@@"
	mov $411,"ߋNݘap位YrB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $412,"䏬SnịNə߁C"
	mov $413,"kCߒjlAtIʑOB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $414,"Icxۓ{a笖]C"
	mov $415,"NꎟFCsB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $416,"@@"
	mov $417,"uccffCrH"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $418,"ߘa佉˗EH"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $419,"ccceIv"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"ˑRCߒjlpzxI˘C"
	mov $402,"R@pߑesI]SZB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $403,"]f]fnCIw[[ƒCgZIǘaǁB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"@@"
	mov $405,"uvsccvsߓI̐zIv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"@@"
	mov $407,"䍪{smېYrB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"sCYrȉޏZqC"
	mov $409,"CYrߘ\E_Iffىfo䍙ʓIgB"
	mov $410,"Sٖ@B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $411,"\CRzC蕔RssCӛ暖͌ЋNB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $412,"@@"
	mov $413,"A݈ӛΓIō@fCC"
	mov $414,"ޏZqI͗ʓˑRCB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $415,"Cˍ@C茔@r_ʓIcEsFC"
	mov $416,"smCCjlIcaȒC៣B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $417,"@@"
	mov $418,"uuٕsNCٕsNcc"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $419,"ƖCވؘaߍ{vLgnccvv"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"ߑoޏZqI]C"
	mov $402,"_nZg̓I]C"
	mov $403,"jlxxnYCLNB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"Sٖ@B"
	mov $405,"CYrCޘloϓIwÁB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"CYrC茑\EՒΓIcC"
	mov $407,"݋pۓ{LB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"YrssIC\푼㏗B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"@@"
	mov $410,"߈VNCjlĖvLƗB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $411,"꜃rϗC"
	mov $412,"CYrىoߔЎCލs٘mC"
	mov $413,"L㱍ݝِnB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $414,"@@"
	mov $415,"māC݈꘢@B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $416,"ƗωwsWC"
	mov $417,"zv__hCA~[B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $418,"R@CߓB"
	mov $419,"ߘsmI^B"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"uuhꗹC^ΑZBvv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"@@"
	mov $403,"uuIIC㈷ːC原shꗹBvv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"@@"
	mov $405,"㐳ݘaܒԁB"
	mov $406,"ٕTΖZWIƒlJB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $407,"ґRSSsŒf\FI敒ԁC"
	mov $408,"A֐]~[B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"@@"
	mov $410,"uuސIHvB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $411,"sCߙܗEHg}搶IBvv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $412,"@@"
	mov $413,"ꉺqZrsB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $414,"}ccߘfIB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $415,"@@"
	mov $416,"uCSƐlNB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $417,"֗L꘢aysIXC"
	mov $418,"^嗹Bv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $419,"@@"
	mov $420,"ccCYrccψ꘢ŋNkaPIlcc"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"u^֏s瀛B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"@\mȓI̔pKHC"
	mov $403,"rz藁H"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"vl^|sB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"RSZ烓IlsC"
	mov $406,"[FIsmCNFccv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $407,"@@"
	mov $408,"uccrρIv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"@@"
	mov $410,"EsZ^oB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $411,"IaoC\FqlIokIڌB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $412,"@@"
	mov $413,"uuIÓC˓I迁ccvv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $414,"@@"
	mov $415,"uus\JccCYrρcc"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $416,"r\IߐKlIIv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

;ʉFh^h^
	dwave 2,"wave\StepC11.wav"

	mov $417,"@@"
	mov $418,"uccIIv"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"V@Cm؁B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"䓰IwC֗LVImsB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $403,"ȋyCpI̗p쏵ẍHIӁB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"@@"
	mov $405,"䊴ٔ䋰B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"ÍCRQߘaIfC"
	mov $407,"蕓ISƁB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"AߔЗp̐ܐlR@I"
	mov $409,"ρB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $410,"@@"
	mov $411,"ґRsڌCAI̊QlB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $412,"ޘyIS媉eC"
	mov $413,"哖zdl߉ICSAm|IRB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $414,"@@"
	mov $415,"Ėٖ@ݐlȌB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $416,"\ݓƎl揥́B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $417,"CsQClC\Ǝl̏B"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\

	textoff

	bgmfadeout 2000
	bgmstop
	delay 3000

;wiFa@tF[hȂ
	bg "bg\dai4kou\byouin.jpg",1
	delay 3000
;ʉF₪␺@[vȂ
	dwave 2,"wave\ambient.wav"
;wiFa@̘L@tF[hȂ
	bg "bg\dai4kou\byouin_rouka.jpg",1
	delay 4000
	dwavestop 2
;wiFa@tF[hȂ
	bg "bg\dai4kou\byouin.jpg",1
	delay 3000

	texton

	mov $401,"u݈꘢虐InB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"ccsCޔЊuaρB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $403,"ەiI捊ǏB"
	mov $404,"r認ɁCגFՁB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"@@"
	mov $406,"CrOnjC"
	mov $407,"p푗@CݏB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"֐VώqBꐬsI͎B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"@@"
	mov $410,"ccގ֐v\EB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $411,"@@"
	mov $412,"uIv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $413,"@@"
	mov $414,"⋒㏬B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $415,"\vLxI㑕CP㗹OoIߕB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $416,"@@"
	mov $417,"ucc迋~EH"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $418,"aρccv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $419,"@@"
	mov $420,"ucccIBv"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\

;BGMFfree518.mp3@iv[v
	bgm "bgm\free0518.mp3"

	mov $401,"uCYrccAs甉䋎藁Hv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"䐥SBrݓInCAslcc"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $403,"@@"
	mov $404,"uur\܏oޔВ藁Ivv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"@@"
	mov $406,"\ْ{AzxAIcCXaȁCȒB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $407,"@@"
	mov $408,"uucc迓ꐥCYrI藁Hv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"uÓACρCpBȓIlCv"
	mov $410,"uˊޏ\ZNEHvv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $411,"@@"
	mov $412,"ucccv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $413,"@@"
	mov $414,"uܓCAZnjCv"
	mov $415,"uߍSs迓IBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $416,"u迕sSClBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $417,"ul\槐IECޘCrԁBv"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"ߐQЁAcccp_B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"@ʖvLޘlcc"
	mov $403,"䋰Aaᐢf笗拌nJB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"ccCYrCAٖ@ǐgr藁B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"CYrCAva@dꍫ꘢S藁B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"厩RDC̐DcclDB"
	mov $407,"FSePC䐥ጜ݉CvȐlIgᚊB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"@@"
	mov $409,"㱈vCAdVUC"
	mov $410,"R@薔Ȍ䓰yIgᚊJB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $411,"}aCz竏ojC"
	mov $412,"S~nwZCR@󈻊QC"
	mov $413,"śf֐ȕN笋B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $414,"ꎟCrCplC"
	mov $415,"嗹ĎqSCĈꎟCrB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $416,"@@"
	mov $417,"uvB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $418,"܁C@ʐ^IIԁC"
	mov $419,"\ƋލɋJB"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"uCYrccv藁Hv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"@@"
	mov $403,"ucccv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"@@"
	mov $405,"u~ޘEIlCLlcc"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"Aψ󒅐ܖCEHv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $407,"@@"
	mov $408,"vLB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"ŋNvLoC"
	mov $410,"ҒnቺB"
	mov $411,"@"
	mov $412,"@"
	mov $413,"@"
	mov $414,"@"
	mov $415,"@"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"uccEsmCYrC"
	mov $402,"CYr֍݊ccv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $403,"C@ʏA]C"
	mov $404,"cc福pIHB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"䓰IƑDCVDCSs݉gB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"R@CIlr"
	mov $407,"h꘢fsΓIlCSIwqB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"l؜ChlIC픗HlC"
	mov $409,"r蕎ȓIwqss[cc"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $410,"AρCCmSsfNTލB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $411,"䓰Ǝ桎IœDCaI_DC"
	mov $412,"Kly؁B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $413,"mLϓI^C"
	mov $414,"֕KlEH"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $415,"㏬B֔@C֐cc"
	mov $416,"甉䊈EHv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $417,"@@"
	mov $418,"uccc"
	mov $423,"IC苊Bv"
	mov $419,"@"
	mov $420,"@"
	mov %120,401: mov %121,420:mov %122,24:gosub *messagefont
	mov %120,423: mov %121,423:mov %122,24:gosub *messagefont
	br
	$418@/
	$423/
	add $418,$423/
	\


	mov $401,"x@C㏬񓚗B"
	mov %130,401
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"\ʋvȗ䓰ƁC"
	mov $403,"Ipp֗vB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"@@"
	mov $405,"㏬k_B\甉䊈B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"RC\旹IC"
	mov $407,"mr˔\甉EB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"\Kl甉䊈C"
	mov $409,"AvCɋA赕sxB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $410,"ߐlSICqÓIrB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $411,"݉gI\C"
	mov $412,"aNSϓIɋB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $413,"@@"
	mov $414,"ō@CYrsٖ@B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $415,"ߐIlC^ꓯC"
	mov $416,"œ\xʓIώqB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $417,"@@"
	mov $418,"ccʑRCޘEAnjB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $419,"蕎ssBICiPInjB"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\

	textoff

	bg black,12
	bgmfadeout 2000
	bgmstop

;ʉFK`
	dwave 2,"wave\dooropen04.wav"
;wiFa@EɃtF[h
	bg "bg\dai4kou\byouin.jpg",91

	texton

	mov $401,"uyIv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"@@"
	mov $403,"꘢s@FIB䲕Il"
	mov $404,"CjB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"@@"
	mov $406,"uuvlCccvv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $407,"@@"
	mov $408,"㏗mɛC\蕊œsvňC"
	mov $409,"pB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $410,"\I\Ez嗹ۓ{Cx[B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $411,"@@"
	mov $412,"uސ{藁HϊrcHv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $413,"@@"
	mov $414,"ucccv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $415,"@@"
	mov $416,"ޏAIpB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $417,"CnCAvw]\܏YrgSIԁB"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"uuߓꐥrzIH原A原sρcc"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"甉a㏬ESCߓLYrDߓIHvv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $403,"@@"
	mov $404,"uvlCcc"
	mov $405,"@@"
	mov $406,"uuh訚{Bvv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $407,"@@"
	mov $408,"㏬IՁCu㱏A핕B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"@@"
	mov $410,"uzhI@CzvI@C"
	mov $411,"SsxߗJH"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $412,"ϓIٞICLYrsxIH"
	mov $413,"dĎTܗCyIv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $414,"@@"
	mov $415,"uٞIvB䔽u΁B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $416,"ߔЗ@CIX藁H"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $417,"pYrss汁B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $418,"SI㏬CpYrsB"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"u^CIXB"
	mov $402,"s㏬߁CˉρBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $403,"@@"
	mov $404,"ucc]Bv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"@@"
	mov $406,"uVC⁏oYrI⁌VOzxJB"
	mov $407,"svZ@ṏIBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"u䋎ao@]C"
	mov $409,"ݓߔVOChDy݁Bv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $410,"@@"
	mov $411,"ucccICplBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $412,"@@"
	mov $413,"\NBލp\gčs嗹B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $414,"p@B"
	mov $415,"Yrs茁CseBوFB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $416,"Ӗvցcc\^CIXJB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $417,"C䐥ߓIwqB"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\

	textoff

	bg black,16
	delay 3000

;ʉFZ~iʂTOj@iv[v
	dwaveloop 1,"wave\se-043.wav" : mov $30,"wave\se-043.wav"
	mov %61,50
	chvol 1,(%3002*%61/100)
;wiFy̕@ʏtF[h
	bg "bg\dai4kou\ie_heya.jpg",12
	delay 2000

	texton

	mov $401,"@񗈓ICcg[㱗B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"ꎟswZCޙ{Vs݋xB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $403,"ޖ琥@IB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"@䐥呴C܏YrL_ǓI\C"
	mov $405,"ꐫliVVIC"
	mov $406,"R@Cꍱ_IہCAޔЗ@ًSr\LB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $407,"ݓIvIہC~A~ɛێ߁B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"@@"
	mov $409,"pvL󈻓Iߑ~c礁C"
	mov $410,"iOI֎qB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $411,"O꘢IB"
	mov $412,"ʓIFzH䙉ЁB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $413,"FfލБCٖ@⌊C"
	mov $414,"AnCnHB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $415,"L{䰋NꏬMՉ⌊B"
	mov $416,"TChnIJB"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"ސZI꘢ƑB"
	mov $402,"@C~_C`꘢ٓIЉ̌nB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $403,"FiŋN{sjC"
	mov $404,"ڗLlI|ڗ́C"
	mov $405,"C桏oInCEn៓lB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"@@"
	mov $407,"ȑOC\ESZ݉ƗLWIIC"
	mov $408,"cޘB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"zƉ꘢ZvYrVC"
	mov $410,"AӒncc"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $411,"Bʓߑ◢ImUC"
	mov $412,"kAB"
	mov $413,"@"
	mov $414,"@"
	mov $415,"@"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"F笕sڎOҁB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"C桎ȓIЉC"
	mov $403,"g|snrB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"QiSœIVBBCIjIvB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"ȁw^xYIɍC"
	mov $406,"iOܓZB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $407,"XvI勎CTOOONO핕ߒI"
	mov $408,"a݊SϖϓIÑB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"܉Βr݂Q`NOIϖ{B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $410,"@@"
	mov $411,"ݐwIG撆CLЋ-j@I@B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $412,"IɐBCϐʜƉIC"
	mov $413,"ȋyۏʍ@㑶IjB"
	mov $414,"ܐϕIB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $415,"ꎟmʗIOҁC"
	mov $416,"꒼䀈@㒼nIMÕ򑮘@ҁB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $417,"ґRގr@ISC"
	mov $418,"AꎟmiQOC{ChB"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"RCaIݍڗLƓٔIɐB"
	mov $402,"ґRhCpsjIXB"
	mov $403,"H핽ϕzh"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"H핽nzhC"
	mov $405,"LʎmIЉB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"vLwƑI㑶݁B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $407,"@@"
	mov $408,"NIjPOOONB"
	mov $423,"I\VB"
	mov %120,407: mov %121,408:mov %122,24:gosub *messagefont
	mov %120,423: mov %121,423:mov %122,24:gosub *messagefont
	br
	$408@/
	$423/
	add $408,$423/
	@

	mov $409,"{l^őiPTOONB"
	mov $423,"I\OVB"
	mov %120,409: mov %121,409:mov %122,24:gosub *messagefont
	mov %120,423: mov %121,423:mov %122,24:gosub *messagefont
	$409@/
	$423/
	add $409,$423/
	@

	mov $410,"蕜ϏIs\gЉC"
	mov $411,"FplFI؁C"
	mov $412,"ݒZZ{NePwsB"
	mov %130,410
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $413,"@@"
	mov $414,"\jCpY㈗@擈wqIlB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $415,"SՔwCPؓIlB"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"ߕB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"筌œIVBBmCMCmB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $403,"@ʉFڗLϓIᯁC"
	mov $404,"䓰Icc@j{saȁB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"@@"
	mov $406,"r쐗FIC"
	mov $407,"TCSٛFIߕJB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"IEvLmSB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"֐grrQAcI厩RC"
	mov $410,"\IgᚊB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $411,"vrCЉI玊Cvr퓖OҔrC"
	mov $412,"Lq\B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $413,"@ʁCl\@C߉cc"
	mov $414,"@"
	mov $415,"@"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\

	textoff

;ʉXgbv
	delay 1000
	dwavestop 1 : mov $30,""
;ʉFmbN@[vȂ
	dwave 2,"wave\se-knock1.wav"
	wait 500
	dwave 2,"wave\se-knock1.wav"
	wait 500

	delay 1000

	texton

	mov $401,"uBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"@@"
	mov $403,"uccHv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"@@"
	mov $405,"⁗jCIvŒfB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"@@"
	mov $407,"uL迓IMGBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"@@"
	mov $409,"uhIHv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $410,"@@"
	mov $411,"鈊񗈓I藁ccpEH"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $412,"Ip弉hꍱMДVI@B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $413,"@@"
	mov $414,"⋋NCCjC藢嗹MB"
	mov $415,"ߐꕕ~IMClʓIIB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $416,"񌏐lvLCDFsID᳓IB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $417,"B@ʐp񗈓IMC"
	mov $418,"DF耊OIفB"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"ccs^lIm藁H"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"C衒Ԉ̏IoC"
	mov $403,"vLCʐMC݁B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"Co\MsB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"KDڑOC~C֖vLI"
	mov $406,"scc"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $407,"@@"
	mov $408,"uŋNMvLYrInC"
	mov $409,"vs近CŊJHȖhBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $410,"@@"
	mov $411,"^fnVMC"
	mov $412,"㋩ꐺB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $413,"@@"
	mov $414,"uccspC漁B䎩ȑCAsBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $415,"@@"
	mov $416,"uEHߔ@ʗLYrC苐择Bv"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"\CېߔЎC"
	mov $402,"㒳L`B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $403,"ŒϓI\CuLӕsC"
	mov $404,"䋑笗\IBCvg㗹jB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"񓞍iOCĎŗʒMB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"vLYrdInCAꕕʓIMB"
	mov $407,"@"
	mov $408,"@"
	mov $409,"@"
	mov $410,"@"
	mov $411,"@"
	mov $412,"@"
	mov $413,"@"
	mov $414,"@"
	mov $415,"@"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\

	textoff

;ʉFrrr@[vȂ
	dwave 2,"wave\biribiri03.wav"
	delay 1000

	texton


	mov $401,"䘸ė\ocڎqC"
	mov $402,"MIꝙCB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $403,"lIML茔I惕ЁB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"惏pKmʒ[I瑁B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"@@"
	mov $406,"uvIF"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $407,"苍ݗ[}CՒޕM嗈Bv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"uaȖ^I͗_\߁Bv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"@@"
	mov $410,"ccVOCYrsvLB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $411,"L茔惑ݔFMCʎʗOsB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $412,"ޓꐥYrӎv藁HґRʒ嗈C"
	mov $413,"AvLܖwIxB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $414,"_\͗ʜϓIܖ@甐lu^B"
	mov $415,"pQ^IߘV悏@I⁈ρB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $416,"CMlvLC"
	mov $417,"uIvޘ̌ācc"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\

	textoff

;ʉFUbimCYj
	dwave 10,"wave\noise01.wav"
;wiFuǂāAuU[𒅂Ă̂łHv@Qb\Ĕwi߂@tF[hȂ
	bg "cutin\dai4kou\17.jpg",1

	delay 2000

	bg "bg\dai4kou\ie_heya.jpg",1

	texton

	mov $401,"ccccccB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"|Co꘢IjlgeB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $403,"ŋߒ񓞉IlCL꘢B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"Ó܁CߘlʗޕMccH"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"@@"
	mov $406,"䏫MIe^MُƒŗՁB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $407,"ґRlʓIu䓰y@lvCA"
	mov $408,"MICpuvIvB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"AߘlݎڐρB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $410,"@@"
	mov $411,"RmInaC"
	mov $412,"Ó琥IlEH"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $413,"sC֐OҁC"
	mov $414,"vݜޕГynK^䓰IsÁB"
	mov $415,"^nޔЎSՉwB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $416,"cc"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $417,"@@"
	mov $418,"uꐥCYrCʗޕMccH"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $419,"勎ccz􍱏Yrccv"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\

;ʉFz[@[vȂ
	bgmonce "bgm\horror4.mp3"
	mov $401,"ޕMkCeDى꘢lʓIB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"C甉ՒMCޕsA݈ÎsvoEH"
	mov $403,"pwZ{OCs֑ŗេB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"^ccӍݑ^Bٕs\B"
	mov $405,"ܓC䜃r\CꕕϓIMA勎藁B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"ܓC䜃r\CꕕϓIMA勎藁B"
	mov $407,"@ʐʐlIԁB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"@@"
	mov $409,"Rccr⁗ĎhɁB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $410,"bōொCuߗCYrHv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $411,"s݈꘢wʁx\槒ʍsIEB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $412,"䐥SBSC䐥njIB"
	mov $413,"@"
	mov $414,"@"
	mov $415,"@"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"@ʜސIPӁC߉AB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"ZߏCaȖ^I͗ʁB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $403,"VC@ʜސomӎʉIMC"
	mov $404,"@ʑOV@L庍ݓcc"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"@ʁC^IYrcc"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"ϓIԁC^aJB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $407,"@@"
	mov $408,"ICEُCYrϗB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"@ʗLlÈ[邉C߉B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $410,"VC@LYrϓIӝC"
	mov $411,"ى䗈܁CLDrB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $412,"ccB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $413,"@@"
	mov $414,"⋋NgC㗹OB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $415,"@joIԁCsOoB"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\

	textoff
	bg black,12
	delay 4000

;ʉFЂ炵@iv[v@iȂŎgj
	bgm "bgm\higurasi.mp3"
;wiF܂Ȃ݊C@ʏtF[h
	bg "bg\dai4kou\machi_simanami.jpg",16
	delay 2000

	texton

	mov $401,"R@CĎޘnB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"yuICC[}I]ᬁCkdIB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $403,"aߓVvLCsB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"@ܗLYrIԁC"
	mov $405,"ߏA䎩ȁB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"ݓICEߕs߉̐B"
	mov $407,"@V֐CCsÐÒnݒC"
	mov $408,"vL䧉B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"@@"
	mov $410,"sCӐsÈӐ䧉IJC营"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $411,"@@"
	mov $412,"uVCs̘EHv"
	mov $413,"@"
	mov $414,"@"
	mov $415,"@"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\

	textoff

;wiF܂Ȃ݊Ciuj@tF[hȂ
	bg "bg\dai4kou\machi_simanami_bure.jpg",1
	delay 1000
;G\Fy@f@ʒuFE
	ld r,":a;tatie\haruka\konwaku.bmp",0
;G\F搶@ʏ@ʒuF
	ld l,":a;tatie\sensei\tuujyou1.bmp",12
	delay 2000

	texton

	mov $401,"AρCِnoᗹB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"@@"
	mov $403,"uCsDӎvB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"s\JHCߗLlBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"@@"
	mov $406,"ucc迒mEccv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $407,"@@"
	mov $408,"uꎟFICTȓB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"sCVOCk迚GB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $410,"C运ޘIl藁C䓰yBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $411,"@@"
	mov $412,"ucccv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $413,"@@"
	mov $414,"@DCvLlsm䓰ޘB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $415,"sŋ߁CXIcc"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"uM՗EHv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"@@"
	mov $403,"uICݜޗBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"@@"
	mov $405,"䘸ܗ\oMCNhjlB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"@@"
	mov $407,"u֐^SՏAo藁B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"މoLli迏oIoGBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"@@"
	mov $410,"u䖾IBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $411,"@@"
	mov $412,"u@ccv"
	mov $423,"^asSB"
	mov %120,411: mov %121,412:mov %122,24:gosub *messagefont
	mov %120,423: mov %121,423:mov %122,24:gosub *messagefont
	br
	$412@/
	$423/
	add $412,$423/
	@

	mov $413,"ESs݈ӎȓI뗹C"
	mov $414,"ޘӎvEH"
	mov %130,413
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $415,"sgS䐥鈁Cs݈ӐډېYrC"
	mov $416,"SvL悎ccJH"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"uvܕsQCߍm营IB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"AcczȁB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $403,"@ߔ\甉䘸ޗEcc"
	mov $404,"EDCɋIu嗹Bv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"@@"
	mov $406,"uuuvEccv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $407,"@@"
	mov $408,"jloꕛvlIρC@ڒܓB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"@@"
	mov $410,"uӁCva^C"
	mov $411,"\SI\B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $412,"ٜޘEE]C"
	mov $413,"rrEoB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $414,"RCߋpꎟwC"
	mov $415,"śf֐\dlB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $416,"C蕎sٖ@dC"
	mov $417,"r]Ll\ߟB؁B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $418,"sEHv"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"ucccv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"@@"
	mov $403,"ҒC\Iܖ@B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"䓰Ina皊sC"
	mov $405,"kDޘlCYrmI閧"
	mov $406,"AݛEُCB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $407,"BCޘl\C՗~JB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"ϓIҍ݉SRB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"ccC"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

;ʉ~
	bgmfadeout 1
	bgmstop

	mov $410,"@@"
	mov $411,"u@ʐϓIԁCٖ@xߓIҁB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $412,"kINCgx㏑CˑR\B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $413,"ICgۓ{C筎桓B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $414,"CߋpsqB"
	mov $415,"@ʊ\~䕁CߏAρG@ʎ\ECsB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $416,"VCv\EݓIrC"
	mov $417,"Bߗ܍{ُCJHv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $418,"@@"
	mov $419,"ucccv"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\

	textoff

	delay 1000
;BGMFfree56.mp3iiv[vj
	bgm "bgm\free56.mp3"
;GύXF搶@ʏQ@ʒuFE
	ld l,":a;tatie\sensei\tuujyou2.bmp",12
	delay 2000

	texton

	mov $401,"uCYrߏ΁B䋑笁B"
	mov $402,"˕sQ^ޔЁwpxB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $403,"lCrޔЎCʏ퐥sIB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"ߑs吥݈ЎIlnBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"@@"
	mov $406,"ޔԝُIገQIҁB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $407,"wpxB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"CSzv{njIvHC"
	mov $409,"Ól~IpEH"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $410,"XIoIIFEC"
	mov $411,"bŊŐI؁CՒ}ΓIӖB"
	mov $412,"@"
	mov $413,"@"
	mov $414,"@"
	mov $415,"@"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\

	textoff

;G\Fy@fQ@ʒuFE
	ld r,":a;tatie\haruka\konwaku2.bmp",12

	texton

	mov $401,"ur\ccIޕspI"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"cc^Iccv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $403,"@@"
	mov $404,"u^ILzIuEHv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"@@"
	mov $406,"uccIBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $407,"@@"
	mov $408,"urCCYr\r藁H"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"原C原swC"
	mov $410,"CYrsI@藁H"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $411,"RAAAOÁAB"
	mov $412,"Lr@\Bv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $413,"@@"
	mov $414,"uށAސCcc"
	mov $423,"ccccccv"
	mov $415,"@"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	mov %120,413: mov %121,420:mov %122,24:gosub *messagefont
	mov %120,423: mov %121,423:mov %122,24:gosub *messagefont
	br
	$414@/
	$423/
	add $414,$423/
	\


	mov $401,"uߍ{ٖ@JCsH"
	mov %130,401
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"rCґR󓞗^ВxISC"
	mov $403,"Apٖ@׉zߍX[IsB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"֊B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"{vL^IzC"
	mov $406,"up֍݊ȁe蕎ssBfBv"
	mov $407,"ݕ莏pB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"{BCߘIލs吥pnBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"@@"
	mov $410,"uccIv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $411,"@@"
	mov $412,"斉IጔVB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $413,"܏o@ccˑꎟӛΓB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $414,"@ʁC^ILnjIuC"
	mov $415,"\pHrXLA"
	mov $416,"XϓI@B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $417,"CYrccp\ߔЕ@藁B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $418,"䋆cccCYrc"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $419,"crcccÓ܁cc"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"ul\槎șr莩ȎSIB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"LIlN笋CLIlŔjAC"
	mov $403,"֗LIlvElޘyˁC"
	mov $404,"藹IrSB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"֗LlCȓIhwSC"
	mov $406,"ܒvB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $407,"RCߋpvLCIuC"
	mov $408,"r{CݐZݔ߉yVnBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"@@"
	mov $410,"ucccv"
	mov $411,"@"
	mov $412,"@"
	mov $413,"@"
	mov $414,"@"
	mov $415,"@"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"u@ʝٖ@ڎIԁCߏAJBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"@@"
	mov $403,"ucc`Hv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"@@"
	mov $405,"jlܗo꘢rC"
	mov $406,"SSWꉺCWʓIt́B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $407,"@@"
	mov $408,"uޗLД\甐lvIśہBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"uJCsǑIɋߓsEDڎIuBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $410,"u@ߐ^ILrSIԁCv"
	mov $411,"u߈cBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $412,"uoߓIs排ߓICv"
	mov $413,"uAݜޗA݁CohJIvv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $414,"@@"
	mov $415,"uccIv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $416,"@@"
	mov $417,"FvIC꘢rNB"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"uuJC苕svqBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"uޏAwaȖ^I͗ʁxGBvv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $403,"@@"
	mov $404,"{paȓIρCŋNAmB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"IrِFIt́B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"c\lIśہc"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $407,"ᤉAAAIUB"
	mov $408,"ِFIśہCސ㑽B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"䊄rlCXρB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $410,"gɋCZ皓Iu㱁B"
	mov $411,"@"
	mov $412,"@"
	mov $413,"@"
	mov $414,"@"
	mov $415,"@"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\

	textoff

;GύXF搶@ʏ@ʒuFE
	ld l,":a;tatie\sensei\tuujyou1.bmp",12
	bgmfadeout 2000
	bgmstop
	delay 2000

;ʉFŠۓ@iv[v
	bgm "bgm\heart.mp3"
;GF搶
;GFy
	cl l,12
;G\Fy@f@ʒuF
	cl r,0
	ld c,":a;tatie\haruka\konwaku.bmp",12

	texton

	mov $401,"SSrqCʓIt́B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"ccސ^IśۘEH"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $403,"@@"
	mov $404,"BC䐳ݔl|B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"aȖ^ތC"
	mov $406,"ٔAݓIȁB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $407,"@ʖvL꜍sIEC"
	mov $408,"gh͗ʖ|وӖJB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"@@"
	mov $410,"ccٖ@琥RIB"
	mov $411,"rݓM߉yVC"
	mov $412,"Yrsٖ@B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $413,"@ޘl܁ccśfC"
	mov $414,"s吥z鈎TnJB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $415,"َSCv\ޘE餈__C"
	mov $416,"BLYrېB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $417,"\ϓIԁB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $418,"@@"
	mov $419,"cc^ctBB"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"rSCCr᳁C"
	mov $402,"rYsvCAڑ{B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $403,"@@"
	mov $404,"RCAC~B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"vڔcr{Cct̓|ݗAsB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"{@lCg̋psߎgtB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $407,"@@"
	mov $408,"jlҒny@IB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"ވ营l|B"
	mov $410,"vLCo\ޗʐ^ILŁB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $411,"LYrD؜I藁H"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $412,"@@"
	mov $413,"cc@ʁCސ^ILœIԁcc"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $414,"CA{B"
	mov $423,"mIB"
	mov %120,414: mov %121,414:mov %122,24:gosub *messagefont
	mov %120,423: mov %121,423:mov %122,24:gosub *messagefont
	$414@/
	$423/
	add $414,$423/
	@

	mov $415,"๘C^B"
	mov %130,415
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $416,"\ErZ]SB"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"@ʔdlmC\}ܑrJB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"\E厩ȓIrC"
	mov $403,"pٖ@ޏrqŎśۓI@B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"@@"
	mov $405,"䐥sKIB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"pwҁC䐥\IX"
	mov $407,"lF[mAB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"O׉I\ҁB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"CߗÍCSƈN[邓IjlB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $410,"݁CAݜވꍏC"
	mov $411,"I^nCLlݒᐺ@ًSI؜JB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $412,"@@"
	mov $413,"\EzvB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $414,"ÐNTCtk䔉V́C"
	mov $415,"CS{njC\E\CސRIB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $416,"RCpيśۊ๘C"
	mov $417,"ޘnsCRيLB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $418,"@@"
	mov $419,"cc"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $420,"䋆zvYr藁cc䐥cc"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\

	textoff

;ʉ~
	bgmfadeout 1
	bgmstop
;aflFfree0232.mp3@iv[v
	bgm "bgm\free0232.mp3"

;G\Fy@@ʒuF@tF[h傢
	ld c,":a;tatie\haruka\naki.bmp",16
	delay 2000

	texton

	mov $401,"rI᫝TC៣壒OoB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"ccݓIԁCB\\ؗJB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $403,"@@"
	mov $404,"ccӐzIB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"\ErZ]SC"
	mov $406,"pB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $407,"rpCvVrC"
	mov $408,"͍ϒnȎȑrsKC"
	mov $409,"꘢^ޘEᐴEI݁B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $410,"@@"
	mov $411,"c~󑗓@I"
	mov $412,"㏬ߒSI\甉䊴ӈԁB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $413,"gp䐥ӎِln\CA\ePC"
	mov $414,"ٖ@^s[\B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $415,"IlFCǏIwFC"
	mov $416,"@ʁccF\sQcc"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"ӁC䐥蓐lIB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"C꒼݊ҒJB"
	mov $403,"Ғ^VC^\槉CR@\aƗFDrnI"
	mov $404,"B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"ȁCٖ@B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"v\SCSCsЉIցcc"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $407,"CzvC꘢lB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"@@"
	mov $409,"cccfB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $410,"ؓI؉sB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $411,"@C\XRB"
	mov $423,"cc黗B"
	mov %120,411: mov %121,411:mov %122,24:gosub *messagefont
	mov %120,423: mov %121,423:mov %122,24:gosub *messagefont
	$411@/
	$423/
	add $411,$423/
	@

	mov $412,"ZJCdĉN蛒nvHB"
	mov %130,412
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $413,"≺JCdėp֓IpQȗB"
	mov $414,"@"
	mov $415,"@"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\

	textoff

;G\Fy@Q@ʒuF@ʏtF[h
	ld c,":a;tatie\haruka\naki2.bmp",12

	texton

	mov $401,"槗CszĒɋꗹCszĉaaB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"ވ؁Cs吥pnB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $403,"YrssB"
	mov $423,"ٖ@B"
	mov %120,403: mov %121,403:mov %122,24:gosub *messagefont
	mov %120,423: mov %121,423:mov %122,24:gosub *messagefont
	$403@/
	$423/
	add $403,$423/
	@

	mov $404,"v֐CAYrsٖ@B"
	mov %130,404
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"ϓIECߟ|ٗB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"@@"
	mov $407,"䏫r{Ct̟󗹉B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"F咅㔈CoސӐەB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"ϏADCϖُCB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $410,"@@"
	mov $411,"݈ȉ"
	mov $423,"\ȐlIgᚎB"
	mov %120,410: mov %121,411:mov %122,24:gosub *messagefont
	mov %120,423: mov %121,423:mov %122,24:gosub *messagefont
	br
	$411@/
	textspeed 200
	$423/
	add $411,$423/
	@

	mov $412,"C꘢݈ؖʑOswIC忓IlB"
	mov $413,"@"
	mov $414,"@"
	mov $415,"@"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	mov %130,412
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	textspeed 200
	gosub *textwright
	\

	textoff

;ʉFhTb
	dwave 2,"wave\ClothC.wav"
	bg black,1
	delay 2000
	bgmfadeout 2000
	bgmstop


;wiFuu̎҂ɁA炩Ȏvv@ʏtF[h
	bg "cutin\dai4kou\18.jpg",12
	delay 2000
;wiFu䂭ӎ̒Aj̐𕷂悤ȋCBv@ʏtF[h
	bg "cutin\dai4kou\19.jpg",12
	delay 2000
	bg black,12

;

;ʁFSd}ij

	mov %42,1
	gosub *sindenzu
	wait 2000
	bg "cutin\dai4kou\cutin1.jpg",12
	delay 2000
	bg "cutin\dai4kou\cutin2.jpg",12
	wait 3000

;EFCgQb

;

	bg black,12
	delay 2000
;ʉFZ~@iv[v
	dwaveloop 1,"wave\se-043.wav" : mov $30,"wave\se-043.wav"
	mov %61,100
	chvol 1,(%3002*%61/100)
	delay 2000

;wiFA̓@tF[h
	bg "bg\dai4kou\sima_doukutu_iriguchi.jpg",16
	delay 2000
;wiFA̓iˌj@ODTb\Ĕwi߂
	bg "bg\dai4kou\sima_doukutu_iriguchi_gyakk.jpg",1
	delay 200
	bg "bg\dai4kou\sima_doukutu_iriguchi.jpg",1
	delay 2000
;wiFA̓iˌj@ODTb\Ĕwi߂
	bg "bg\dai4kou\sima_doukutu_iriguchi_gyakk.jpg",1
	delay 200
	bg "bg\dai4kou\sima_doukutu_iriguchi.jpg",1
	delay 500
;wiFA̓iˌj@Pb\Ĕwi߂
	bg "bg\dai4kou\sima_doukutu_iriguchi_gyakk.jpg",1
	delay 1000
	bg "bg\dai4kou\sima_doukutu_iriguchi.jpg",1
	delay 2000

	texton

	mov $401,"Q݈꘢虐InB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"ޔЊuccasρB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $403,"gʕsI΁B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"OL΁C꘢IOŋ"
	mov $405,"\œ䱖ؘa}B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"@@"
	mov $407,"ӛΓޗ꘢C"
	mov $408,"݉~N㔼gF糎lIB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"sǔuݜϓInC"
	mov $410,"AIg̋pџ~᳒B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $411,"@@"
	mov $412,"ccޗCwߘExEcc"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $413,"@@"
	mov $414,"u݁CHv"
	mov $415,"@"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\

	textoff

;wiFA@ʏtF[h
	bg "bg\dai4kou\sima_doukutu.jpg",12
	delay 1000
;wiFAiuj@tF[hȂ
	bg "bg\dai4kou\sima_doukutu_bure.jpg",1
	delay 1000
;G\F搶@ʏ@ʒuF
;G\Fy@f@ʒuFE
	ld l,":a;tatie\sensei\tuujyou1.bmp",0
	ld r,":a;tatie\haruka\konwaku.bmp",12

	delay 2000

	texton

	mov $401,"[񔈈ŁC⋒꘢jlB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"@@"
	mov $403,"uurρHv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"@@"
	mov $405,"uAߘcccc"
	mov $423,"sEccHv"
	mov %120,404: mov %121,405:mov %122,24:gosub *messagefont
	mov %120,423: mov %121,423:mov %122,24:gosub *messagefont
	br
	$405@/
	$423/
	add $405,$423/
	@

	mov $406,"@@"
	mov $407,"uCvϓIԁCs玀H"
	mov $408,"ܐN\ҁBv"
	mov %130,406
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"@@"
	mov $410,"ukLCΗNB"
	mov $411,"@"
	mov $412,"@"
	mov $413,"@"
	mov $414,"@"
	mov $415,"@"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"uӁC进EB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"C迊ہCŎZ勎IȁB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $403,"ߘrԋԓI䓰yC"
	mov $404,"ݓ߈ꍏEBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"@@"
	mov $406,"ucccv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $407,"@@"
	mov $408,"u݁C运B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"CdCCdVCnlBv"
	mov $410,"@"
	mov $411,"@"
	mov $412,"@"
	mov $413,"@"
	mov $414,"@"
	mov $415,"@"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"udVcCnlcH"
	mov $423,"ϓIc^I\EcHv"
	mov %120,401: mov %121,401:mov %122,24:gosub *messagefont
	mov %120,423: mov %121,423:mov %122,24:gosub *messagefont
	$401@/
	$423/
	add $401,$423/
	@

	mov $402,"@@"
	mov $403,"uRȁCv远ÈӓIԁBv"
	mov %130,402
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"@@"
	mov $405,"ucccv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@


	mov $406,"@@"
	mov $407,"F糎lB"
	mov $423,"ޗIiLZ茞ΞΕērB"
	mov %120,406: mov %121,407:mov %122,24:gosub *messagefont
	mov %120,423: mov %121,423:mov %122,24:gosub *messagefont
	br
	$407@/
	$423
	add $407,$423/

	mov $408,"CǍ◈܁CޓӍݑB"
	mov %130,408
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"ܑρC"
	mov $410,"ޑT꘢ILJB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $411,"IOAwSBʐ᳎rIՁB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $412,"OICˑR福B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $413,"@@"
	mov $414,"uޗCꐥcv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $415,"@@"
	mov $416,"uސ꘢ٖIfB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $417,"ݐICFcՓޗBv"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"ufHCYrCvޔВncHv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@


	mov $402,"@@"
	mov $403,"u@ʗݓߘsC远kA񌴗IȁB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"ޗvLlCsLlB"
	mov $405,"ÈꉺJB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"cܐC"
	mov $407,"꘢cu_I㱊wZJBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"@@"
	mov $409,"ucccv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $410,"@@"
	mov $411,"ߓޒԁC⇏ZB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $412,"@@"
	mov $413,"uusOØEHvv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $414,"@@"
	mov $415,"uusCsIcCޖ瑾ˑRC"
	mov $416,"꒵cv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $417,"@@"
	mov $418,"玀CRAڗYr㱊wZB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $419,"\SՐڎޔЏvˊJB"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"uSvCAIB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"RÓ厩RCs@IniJB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $403,"ݜލfC߉ȐӑÁCvLgnB"
	mov $404,"sCg̏vӁCd]IB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"ޗvl\ߎIGB"
	mov $406,"vjC߉A^I藹Bv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $407,"@@"
	mov $408,"cVO䊅śۋIlC"
	mov $409,"݋p甉䒍Ӑg̏vB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $410,"Sts汜ޘlݑzYrB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $411,"ܓCꐥc"
	mov $412,"@"
	mov $413,"@"
	mov $414,"@"
	mov $415,"@"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"uccٗC֖vߓIcv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"@@"
	mov $403,"uufzNB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"苋wVxBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"@@"
	mov $406,"uVcEHv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $407,"@@"
	mov $408,"uIBҚGCdŉρBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"@@"
	mov $410,"ܒCwVxݚ{΁B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $411,"NhśۓIjlCaOIޘjl"
	mov $412,"Ӎݝٖ@甐lM꘢lB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $413,"Iʍː^I藁c"
	mov $414,"@"
	mov $415,"@"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\

	textoff

	bg black,12
	dwavestop 1 : mov $30,""
	bgmfadeout 2000
	bgmstop
	delay 2000

	bg white,12
;ʉFlӂ̔g@[vȂ
	dwave 2,"wave\SeaE11.wav"
;wiFC݁@tF[h
	bg "bg\dai4kou\sima_umi.jpg",12
	delay 3000
;aflFfree519.mp3
	bgm "bgm\free0519.mp3"
	mov %60,100
	bgmvol (%3001*%60/100)

	texton

	mov $401,"oC䱗э@C"
	mov $402,"O歑RCNCCanfB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $403,"ޔ䲓Ii甉s֊ȁB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"隔In]Ck_CAC"
	mov $405,"ϑQԔœICCdLԜB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"sI}kݔ~CT敪JB"
	mov $407,"CvL\C䊮Ssmݙ{_B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"@@"
	mov $409,"ޔЊu^ٔB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $410,"[xWIsՏoC_ᎩȐgrِlfB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $411,"spCl؜CshClYWB"
	mov $412,"ŏdvICsp݈dlIcFB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $413,"@@"
	mov $414,"cˑRCƐlIʗe|CB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $415,"犄rI䎸HB"
	mov $416,"ݍmE掓ڗJB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $417,"IFkSSB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $418,"݉sݓIC"
	mov $419,"㏬ጏ糛FIB"
	mov $420,"ݑ\\M\Ccؑth\B"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"uuvߐzz񋎁CߓVAō@VBvv"
	mov $402,"VrܓB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $403,"Bޘ㱊wZCYr񋎁C"
	mov $404,"DR䗈rIB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"ґRLsIc"
	mov $406,"֔@CvLz嗧񋎁B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $407,"Kl꘢SVIB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"ߘdlAsfdIc"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"ߘvLDIupϑznjIC"
	mov $410,"笕s\񓞓ߘnB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $411,"@@"
	mov $412,"ޗґRsnjCAIÖ]EᗹB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $413,"ߏA餏sC^yInIÖ]B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $414,"C䩑RnCB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $415,"⁗ICmV́B"
	mov $416,"CQACCȋy݊CIFB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $417,"@ʗpS椙߁Cr\ߓꗱqI̐⁓B"
	mov $418,"訏ˁCA\^ވؗZĆB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $419,"ݟxF}IƗsC"
	mov $420,"IS暍NNB"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\

	textoff

;wiF@ʏtF[h
	bg "bg\dai4kou\cyou.jpg",12
	delay 2000
;wiFс@ʏtF[h
	bg "bg\dai4kou\sima_hayashi.jpg",12
	delay 2000

	texton

	mov $401,"sݐl\熑IXђB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"ΖI䱖㱟I䊁B֗Lē]IyFB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $403,"F݉̏B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"䱖؁A΁AᣁC֗LЊqB"
	mov $405,"hXѓILCs݊ȅB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"@@"
	mov $407,"[[z䱖ؓICݐZ݉̐B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"ߐnIGB"
	mov $409,"cc\EِI̐B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $410,"@扽nC"
	mov $411,"s\|sE͒ntkȊ蓓IB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $412,"smYrNCލ暙ߕsFccLݐS܍DIC"
	mov $413,"_WNZʓIxC"
	mov $414,"˕|\^RN̏B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $415,"@@"
	mov $416,"uuߛEY㈉FEHvv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $417,"NFIVFʁCFىܓB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $418,"uuȑOCFߓrCS藁Bvv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $419,"䖾BCIsRB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $420,"cccgȓIEB"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"A݊OwaρC蓉n̏悁B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"vcIo_cC"
	mov $403,"\Z߉IqJB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"@@"
	mov $405,"vLYr๘IB"
	mov $423,"vdB"
	mov %120,404: mov %121,405:mov %122,24:gosub *messagefont
	mov %120,423: mov %121,423:mov %122,24:gosub *messagefont
	br
	$405@/
	$423/
	add $405,$423/
	@

	mov $406,"vȌ䓰yIgᚏdVCnlB"
	mov %130,406
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $407,"CޘړIC˗ލfIB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"@@"
	mov $409,"vĎcc̏Bz^̐CB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $410,"⫒fSISCȖzoB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $411,"݁COCIÁB"
	mov $412,"XIRؐszB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $413,"暒nCލ엹ශC݉I|Cr񐬍sB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $414,"@@"
	mov $415,"䊴󓞗BؓsGyB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $416,"ݗyIV󒆁CeߓInC̐GB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $417,"֓ߗvLl椙߁B"
	mov $418,"֐lw"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\

	textoff
	bg white,12
	delay 2000
;wiFû́ASĂƋɂBv@ʏtF[h
	bg "cutin\dai4kou\20.jpg",12
	delay 2000

	bg black,12
	delay 3000

;wiFA@ʏtF[h
	bg "bg\dai4kou\sima_doukutu.jpg",12
	delay 2000
;wiFAiuj@tF[hȂ
	bg "bg\dai4kou\sima_doukutu_bure.jpg",1

;G\F搶@ʏ@ʒuF
	ld l,":a;tatie\sensei\tuujyou1.bmp",12
	delay 2000
;G\Fy@ʏ@ʒuFE
	ld r,":a;tatie\haruka\tuujyou.bmp",12
	delay 2000

	texton

	mov $401,"uugށCމ^ccꕛDcFBvv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"@@"
	mov $403,"uuEHvv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"@@"
	mov $405,"ӛΓțEdC"
	mov $406,"~œISNڐG̐IC"
	mov $407,"蒳eJB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"@@"
	mov $409,"uʑRCl֐^RڐGCJB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $410,"uCYpC֐F\oVBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $411,"ݑTCLЋECwفxB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $412,"ÈȗCBlG刖XJC"
	mov $413,"󒼖ʎȓIB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $414,"ݏsZnC䐥eՖY㈁C"
	mov $415,"{BCl琥RIꕔJBv"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"䖾ߑz܏YrB"
	mov $402,"RalA꘢VB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $403,"@ʈ椎΁ClAٖ@C"
	mov $404,"@灈椎΁CRAyB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"CCs甓Vl椎΁C"
	mov $406,"Ll{RB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $407,"ى䗈܁CߏA̐C"
	mov $408,"琳@C˔\XeՒn󓞜ޔ拌nJB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"@@"
	mov $410,"䕂oϓIz@C"
	mov $411,"Vp͕Is"
	mov $412,"\oMzCcWC@꘢`ɁB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $413,"@@"
	mov $414,"uݐ^֑B"
	mov $415,"ȑOv`ɓIԁC"
	mov $416,"߉EE͓IX藁B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $417,"pޗSg􍜉ˁCs斕ցC֕֋XB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $418,"ʏEЉCIpxŁC"
	mov $419,"LIpr藁Bv"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"uuߘ`ɐHvv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"@@"
	mov $403,"uߓINGB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"ߓI֖vSD藁B"
	mov $405,"꒼ݓInCL_sJB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"ґR\sC"
	mov $407,"A苔EψꉺJBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"@@"
	mov $409,"uuߘV运I藁Hvv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $410,"@@"
	mov $411,"uvџ~A槗B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $412,"{skvuIுCȕspSSB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $413,"NޘCꘗJB"
	mov $414,"՗ꍱH嗈Cvsvh_@藁H"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $415,"RCvyݏYrdDI@Bv"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\

	textoff

	bg black,12
	bgmfadeout 2000
	bgmstop
	delay 2000
;ʉ:̐@iv[v
	bgm "bgm\SE_IN200.mp3"
;wiFA@ʏtF[h
	bg "bg\dai4kou\sima_doukutu.jpg",12
	delay 2000

	texton

	mov $401,"sv}ARCO⁗C"
	mov $402,"暔婘a抖IB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $403,"uIu`rTOO|I򐅁C"
	mov $404,"ĉᴌgՌ^擐HiB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"ґR餋h֍CAޗِlfCs\B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"@@"
	mov $407,"VIܖ@C䐥ݏ闢Us{CC"
	mov $408,"R@풪tޘfIސCB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"mAZIʒuC"
	mov $410,"ȋyۗLlo"
	mov $411,"\ޘfC󎖐sӒnl@ao^B"
	mov $412,"A܁C䉺rSێs"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $413,"ՓޗCؓsݑIdVB"
	mov $414,"vLsCkB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $415,"@@"
	mov $416,"C\ȜϓIdhV"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $417,"Ssv{B"
	mov $418,"SsIB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $419,"scc"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"uVCȊ迈꘢VEHv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"@@"
	mov $403,"u苊JBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"@@"
	mov $405,"uCYrcc迗vC꘢lCޔВnsHv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"@@"
	mov $407,"ߓދԁCVΗ΁B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"@@"
	mov $409,"uߐ꘢dIėB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $410,"݉䋳IwC"
	mov $411,"ߏrIvŎ乓IB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $412,"܁Cޓ_RI猦cc"
	mov $413,"rJB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $414,"œ討ȓIwqC"
	mov $415,"䐥ٖ@sǛBAϓIlBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $416,"@@"
	mov $417,"ߐóC֐CuW藁H"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $418,"zvI^C"
	mov $419,"ّޘl𓾑B"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\

;wiFAiÂj@ʏtF[h
	bg "bg\dai4kou\sima_doukutu_kurai.jpg",12

	mov $401,"uȑOLϓIwqEHv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"@@"
	mov $403,"ucNēVCnVOC"
	mov $404,"ݐC꘢cNcꍱIwGB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"yCߒmYraEHv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"@@"
	mov $407,"uC_Bv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"@@"
	mov $409,"ґR擓I㗢vLϏoIC"
	mov $410,"AREӗLꍱVvLFfIB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $411,"@@"
	mov $412,"uߘwqClIaҚGB"
	mov $413,"˘aۓsᔒICAˋpB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $414,"C\󓞗ЉIr˘aQB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $415,"IlTukQJB"
	mov $416,"Q꘢vLFIl݁Bv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $417,"@@"
	mov $418,"uccIv"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"uQvBވ꘢A甉@ٌB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"aρccsCr\֗vQdB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $403,"gCSߐl؜C"
	mov $404,"{gIO\vLYrρB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"ݕsIlᒆCs吥꘢ʓIlB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"RCߛwqIO\@鈊œsaҁB"
	mov $407,"@ICswꐶٖ@EIWB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"@@"
	mov $409,"usCK^I"
	mov $410,"\Q꘢\\InCȋyQB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $411,"ݜވ_CߓIvvQdB"
	mov $412,"CߏٓIlӍݐ嘰嗹Bv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $413,"@@"
	mov $414,"uclHv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $415,"@@"
	mov $416,"u䋳ܛwqFCޘEImC"
	mov $417,"ȋy^V៓l󐶑I@B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $418,"ߓIvCߓIsm㫁C"
	mov $419,"@r៓lCsvLWZBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $420,"ȁCˉ\ޘfBv"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\

	bg black,12

	mov $401,"R@C꒼݁B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"|ٙWZI៓lccӁCdwB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $403,"sCBrIߑӐ䎩ȁB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"C懎㎧]wxIߘIcc"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"@@"
	mov $406,"VˑR⋗NB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $407,"pa䱎}Ij侏ZC"
	mov $408,"s\o꘢CCCgB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"`ɁAHAoC"
	mov $410,"pÊIɔ^fIC"
	mov $411,"ō@VcL@sՑCꌏsB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $412,"zDUfI^nC"
	mov $413,"Aىޘوӓ竓Il܁C^gB"
	mov $414,"@"
	mov $415,"@"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\

	textoff

;ʉFJ`b@[vȂ
	dwave 2,"wave\kachi00.wav"
;wiFAij@ʏtF[h
	bg "bg\dai4kou\sima_doukutu_light.jpg",12
	delay 2000

	texton

	mov $401,"ÓIƗB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"I᳎qh~qIaIOB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $403,"䐥꘢YِlfIlB"
	mov $404,"@ʘOʊœޗLC߉AB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"BC@CIxKŒxB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"@@"
	mov $407,"uVES藁B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"rCڒ˓IԎVccaߕsC"
	mov $409,"aIwqLKlrIُہB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $410,"ߘlٖ@ڎ󔒉aIwq판FxC"
	mov $411,"暑WȓIVnB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $412,"CSʓIoCnC"
	mov $413,"䗓rgy\IFBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $414,"@@"
	mov $415,"u啪ccIv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $416,"@@"
	mov $417,"ґRsߘwqIC"
	mov $418,"A\sKE@CDseՍhJB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $419,"ސ㖔L鈁CLbB\I藁H"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"uCӜk啪藁Bv"
	mov $402,"ȁC\ܗB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $403,"@ʑz桎ȘaISC"
	mov $404,"Acߘُ۔r{JB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"CŋNCaI敔Es\Bv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"@@"
	mov $407,"VCޘlㆉ䋎IB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"甓ߘwqrVIl"
	mov $409,"g\ܓICޖsB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $410,"Acc"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $411,"@@"
	mov $412,"uϓIԁCrV@sVEH"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $413,"@掏oYrqCsAVnEccv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $414,"@@"
	mov $415,"uvցB"
	mov $423,"ACaVn"
	mov %120,414: mov %121,415:mov %122,24:gosub *messagefont
	mov %120,423: mov %121,423:mov %122,24:gosub *messagefont
	br
	$415@/
	$423
	add $415,$423/

	mov $416,"ߌuIXdv藁Hv"
	mov %130,416
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $417,"@@"
	mov $418,"uccޘvc"
	mov $423,"ccccccv"
	mov $419,"@"
	mov $420,"@"
	mov %120,417: mov %121,420:mov %122,24:gosub *messagefont
	mov %120,423: mov %121,423:mov %122,24:gosub *messagefont
	br
	$418@/
	$423/
	add $418,$423/
	\

	textoff

;ʉFUbimCYj@[vȂ
	dwave 10,"wave\noise01.wav"
;wiFuu삿́A֌WȂ̂ɂȁcvv@tF[hȂ
	bg "cutin\dai4kou\21.jpg",1
	delay 2000
;wiFAij@tF[hȂ
	bg "bg\dai4kou\sima_doukutu_light.jpg",1

	texton

	mov $401,"Ӕ@BdvIccB"
	mov %130,401
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"@LÁC"
	mov $403,"LVQȓIVnCȝQ֑InB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"ACٖ@֑IB"
	mov $405,"UCIlCAĖs񗈗B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"@ʉ䐥ߘwqC"
	mov $407,"]FKCȁB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"@ʐ蓓IlCߏAXz桗B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"@@"
	mov $410,"uߘwqcc\C٘EHv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $411,"@@"
	mov $412,"uIC\En}Î㗹B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $413,"sCӑzsIې藁Bv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $414,"@@"
	mov $415,"uېYrHv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $416,"@@"
	mov $417,"uj~B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $418,"A\vrߓIC"
	mov $419,"\IFj~\CvL甔Cl"
	mov $420,"AωrދNBv"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"ucccv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"@@"
	mov $403,"uśfCߛwqZȓI{haC"
	mov $404,"ߘ{rIwq甽ȗCȁB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"vCޔЎkېC^瑁Bv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"@@"
	mov $407,"瑁B"
	mov $423,"Cސ^IZ瑘EH"
	mov %120,406: mov %121,407:mov %122,24:gosub *messagefont
	mov %120,423: mov %121,423:mov %122,24:gosub *messagefont
	br
	$407@/
	$423/
	add $407,$423/
	@

	mov $408,"݉ŗC\ܜސ铖ېIB"
	mov $409,"]@ۓWCuϓIBʐRIB"
	mov %130,408
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $410,"ccsV^H"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $411,"V㱓IVB͗ʁCZ]l\LϓI"
	mov $412,"ϓIccuߛwq^IߐlߕB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $413,"gՌ^擐HiI"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $414,"@@"
	mov $415,"Rߖaa\FV㱓IFB"
	mov $416,"Rߖaa\FV㱓IFB"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\

	textoff

	bg black,12
	delay 2000
;wiFuāAPڂ߂Bv@ʏtF[h
	bg "cutin\dai4kou\22.jpg",12
	delay 2000
;ʉtF[hAEg
	bgmfadeout 2000
	bgmstop
	bg black,12
	delay 2000

	bg white,12
;aflFfree519.mp3
	bgm "bgm\free0519.mp3"
;wiFC@tF[h
	bg "bg\dai4kou\sima_umi.jpg",16
	delay 2000

	texton

	mov $401,"CCACV́B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"CCACV́B"
	mov $403,"XсCAS~n鴋NXєV́B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"ȖȁCݐZY㈗㱁C"
	mov $405,"}RCA񓞓aV֓VB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"I̐VVXL͗ʁCݗfiOV@C"
	mov $407,"䊮SQ񗹏IߔЊuB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"@@"
	mov $409,"XsC"
	mov $410,"wȁxZ̐B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $411,"@ʔ\IԁCAȍݎRI"
	mov $412,"ȓI増JB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $413,"R^lBݑzہwفxIEC"
	mov $414,"KޔItB"
	mov $415,"@"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\

	textoff

	bg black,12
;wiFA@ʏtF[h
	bg "bg\dai4kou\sima_doukutu.jpg",12
	delay 1000
;wiFAiuj@tF[hȂ
	bg "bg\dai4kou\sima_doukutu_bure.jpg",1
;G\F搶@ʏ@ʒuF
;G\Fy@ʏ@ʒuFE
	ld l,":a;tatie\sensei\tuujyou1.bmp",0
	ld r,":a;tatie\haruka\tuujyou.bmp",12
	delay 1000

	texton

	mov $401,"uc]ICn藁Bv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"@@"
	mov $403,"IrRVጓIB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"C֏yݗRۘaVIՓiB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"LIpiIqC"
	mov $406,"֕pŒؙIR[懍piC"
	mov $407,"Ȋŏo꘢yݎSIlB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"VIx鐐Sk|C"
	mov $409,"V꒼ݓB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $410,"@LROoC\HIDB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $411,"ϓIYғ|ُCC"
	mov $412,"Afs\Ll݁B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $413,"@@"
	mov $414,"uŗEsvď՗B"
	mov $415,"vLuɊJHv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $416,"@@"
	mov $417,"uCvVBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $418,"@@"
	mov $419,"uS㎗犮S藁B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $420,"ϓIԁCsvA\񓞚㗹GBv"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"ߗVIԁC䊴LfB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"֗LkƎInccݓI֕s槊B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $403,"@@"
	mov $404,"uȍđ҈XEHv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"@@"
	mov $406,"uz\SvVĉ񋎁CEHv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $407,"@@"
	mov $408,"uBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"@@"
	mov $410,"uϓIԁCsӚGB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $411,"ӁCݗ߉񋎓IԁC֗LksKIfB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $412,"sccߕsuAUEHv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $413,"@@"
	mov $414,"VIo꘢Ӗ[ʓIΗeCsm\^I֐Cߏ΁B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $415,"܋NCޗElVB"
	mov $416,"ґRHCA֐kC"
	mov $417,"FvLyPIߕB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $418,"ґR꒼ݖ̎C"
	mov $419,"AʛE誎UۏoҔIB"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"uӁccL_zOAU藁Bv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"@@"
	mov $403,"uߏAJB"
	mov $404,"䱗щ@CLkI͗ÒB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"ݓߗCCg̓IԁCcD_GBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"@@"
	mov $407,"VrܒCcыNhB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"䱗щ@Incc֖vInB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"@@"
	mov $410,"uӕsvMGB"
	mov $411,"s\ڊBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $412,"@@"
	mov $413,"uC߉䋎Bv"
	mov $414,"@"
	mov $415,"@"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\

	textoff

	bg black,12

	texton

	mov $401,"uCٗccv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"@@"
	mov $403,"voCg@⁗B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"@@"
	mov $405,"uQQŐ_IJB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"ϓIԁC̖BA\GBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $407,"@@"
	mov $408,"@CVI䐥乖B"
	mov $409,"@"
	mov $410,"@"
	mov $411,"@"
	mov $412,"@"
	mov $413,"@"
	mov $414,"@"
	mov $415,"@"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\

	textoff

	bgmfadeout 2000
	bgmstop
	delay 2000

;ʉFZ~@iv[v
	mov %61,100
	chvol 1,(%3002*%61/100)
	dwaveloop 1,"wave\se-043.wav" : mov $30,"wave\se-043.wav"
;wiFс@ʏtF[h
	bg "bg\dai4kou\sima_hayashi.jpg",12
	delay 2000

	texton

	mov $401,"䱗їkyuCҒkB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"CLXїޘC"
	mov $403,"䱖ؐӔ\ܗ\͗ʁB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"CT琥ޘJB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"@@"
	mov $406,"XэV݉̏C苉uvsvNHv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $407,"ґRޓܘfzCA֐𔈁B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"gĜrڐGٖ@xC"
	mov $409,"̏kICA݉zcvlꉺB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $410,"@@"
	mov $411,"VCYrܓϓI藁H"
	mov $412,"̓I^Iv_I͗ʘEH"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $413,"ӁC̋ȗ^_ŗLؓI拌nB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $414,"r܁CvL^̑gI@sݓIB"
	mov $415,"ȜrfB"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"ݐ_ЗClFkᜁCN_SB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"j琥@BuhAhnvC"
	mov $403,"̈ϘN׏oB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"ݘŋCE{gAЉ̋ȁB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"ґRenLsC"
	mov $406,"Ask艈蟁Cp෋OEB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $407,"LǜՁCG̙Ґ塗҉RᛁB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"ɎzOIsOEtCyI~vf䧐B"
	mov $409,"ᙔ^A֑JA肍bIފB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $410,"@ُې֐_C"
	mov $411,"lsp̐^_𗬁B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $412,"@@"
	mov $413,"_ݔVrL̐"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $414,"֐܁C嗈藁H"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $415,"@@C@^SnfsB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $416,"RCޘaI̐灈񎖁B"
	mov $417,"ґRz萓T@ܓIwفxIEC"
	mov $418,"AsŎZ^_ŗL𗬁B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $419,"IC꒼s厩R߁B"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\

	textoff

;ʉ~
	dwavestop 1 : mov $30,""
;ʉF̗@iv[v@iłŎgj
	bgm "bgm\se-032.mp3"
;wiF@ʏtF[h
	bg "bg\dai4kou\sima_kawa.jpg",16
	delay 2000

	texton

	mov $401,"uDccv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"@@"
	mov $403,"@V܁C䱗э@L͗B"
	mov $404,"I甉s֚ȗB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"k|圍CI͐|f͒C"
	mov $406,"Z䱗ѓIyӔVB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $407,"}䱖㱟CʔgᘁB"
	mov $408,"AAn^ݜޗapB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"@@"
	mov $410,"EO"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $411,"uI֒C䱗јakyuB"
	mov $412,"xψ꒼OC"
	mov $413,"ESxB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $414,"䖾CrYrsB"
	mov $415,"ĖsQȗJB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $416,"@ᗍsĖCNēVzSB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $417,"@@"
	mov $418,"CYr蕉ēVs~VIO藁H"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $419,"TsCszdlœC"
	mov $420,"XCȖszœߍJB"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"cOk䱎}C[֖E{ǵB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"ґRߘaq֐va@E{C"
	mov $403,"ApޘC@g̛E槗B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"cыАZ݉͐ߊ@~ݔˏC"
	mov $405,"߈M⁗IhB"
	mov $406,"ŗB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $407,"@@"
	mov $408,"C@ǵCsRvlNB"
	mov $409,"ސII藁H"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $410,"͓ILJcc"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $411,"zzŁCޗC"
	mov $412,"哴ICݘa䱗ю߁B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $413,"RՖE]{CcTaꉺsJB"
	mov $414,"@"
	mov $415,"@"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"zލICsmsu㱎CnCN㫓eaqB"
	mov $402,"ҒnꝚl茖]CAޗِlfB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $403,"{vLlœB"
	mov $404,"ޗ{vLl݊ŁB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"sC֔@CvLISC"
	mov $406,"A݈꘢IBB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $407,"@@"
	mov $408,"uu@ʚǝ{ՐSCߏAslGBvv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"C㏬\獐Cs֑zNދԁB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $410,"ߓVNE勎lVBsmƐlFݜrϗB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $411,"弁CœrCʏLDEB"
	mov $412,"BCFԝQܕsB"
	mov $413,"@"
	mov $414,"@"
	mov $415,"@"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\

	textoff

	bg black,12
;ʉtF[hAEg
	bgmfadeout 2000
	bgmstop
	delay 3000

;ʉF̐@iv[v
	bgm "bgm\SE_IN200.mp3"
;wiFC݁i[j@ʏtF[h
	bg "bg\dai4kou\sima_umi_yuugata.jpg",12
	delay 2000
;wiFC݁i[Euj@tF[hȂ
	bg "bg\dai4kou\sima_umi_yuugata_bure.jpg",1
;G\F搶@ʏ@ʒuF
;G\Fy@ʏ@ʒuFE
	ld l,":a;tatie\sensei\tuujyou1.bmp",0
	ld r,":a;tatie\haruka\tuujyou.bmp",12
	delay 1000

	texton

	mov $401,"uuHߐ͗IEHvv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"@@"
	mov $403,"敪C暈ÉCVoB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"@@"
	mov $405,"uuޘvCvK^藁B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"ލfsZC"
	mov $407,"kA\sJBvv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"@@"
	mov $409,"uucŊŘEHvv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $410,"@@"
	mov $411,"uuRțBsvIԁC苏S_GBvv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $412,"@@"
	mov $413,"uDIBrVArr藹B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $414,"cVC迖NrρHv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $415,"@@"
	mov $416,"uʑRC꘢lusEHv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $417,"@@"
	mov $418,"usCc"
	mov $419,"꒼ҍݓC迕su֘EH"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $420,"@ʋfI[rCsDBv"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"苘VCӑ܁B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"sCV苑笗B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $403,"@@"
	mov $404,"uspǉC^IvgnB"
	mov $405,"ҍݓAC琥݌糌xB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"LlfC"
	mov $407,"AzxEsCzB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"@ʔla꘢虐jllƑҍ݈NC"
	mov $409,"߉ӊQ迓I_JH"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $410,"@@"
	mov $411,"蕜ޔВnCs։lB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $412,"V@@svہC"
	mov $413,"u䓰y{C@Y嗈B"
	mov $414,"YIޘِlfCvLl݁v"
	mov $415,"ϓIC푼hoB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $416,"RCىF܍XCLB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $417,"ىCٌ䓰Ɠs@B"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"uV^䫎m藁Bv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"@@"
	mov $403,"uEHv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"@@"
	mov $405,"C^Iى퉷_藁B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"ܓӒԁC䝾ߕM틩oIC"
	mov $407,"ӒQIB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"s􍱏Yr藁ccv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"@@"
	mov $410,"uCsىI召oGB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $411,"䐥VCv"
	mov $412,"@"
	mov $413,"@"
	mov $414,"@"
	mov $415,"@"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\

	textoff

;ʉ~
	bgmfadeout 1
	bgmstop
;ʉF@[vȂ
	dwave 2,"wave\WindF11.wav"
;G@tF[hȂ
	cl l,0
	cl r,1
	QUAKE 20,400
	delay 2000

	texton

	mov $401,"AݓCˑRNċB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"C㐁IfEC甑؍kC"
	mov $403,"R@fE񓞊CB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"@@"
	mov $405,"訏˘a{bCEϒĜB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"≺CldVkNcc"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $407,"@@"
	mov $408,"⋍ݓߗI"
	mov $409,"@"
	mov $410,"@"
	mov $411,"@"
	mov $412,"@"
	mov $413,"@"
	mov $414,"@"
	mov $415,"@"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\

	textoff

;ʉF̐@iv[v
	bgm "bgm\SE_IN200.mp3"
;G\Fy@@ʒuFE
	ld r,":a;tatie\haruka\odoroki.bmp",12
	delay 2000
;G\F搶@XqȂ@ʒuF@tF[h
	ld l,":a;tatie\sensei\bousinasi.bmp",16
	delay 3000

	texton

	mov $401,"uccVccv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"@@"
	mov $403,"ގlVC݉ʑO"
	mov $404,"ꎟsvLEXqB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"~䐥㓾kIXqC"
	mov $406,"˔|UC"
	mov $407,"I^ʖږ\IoB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"IFIہC֗LIˁB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"ccȋyC᳒EcIGڝSIᗁB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $410,"Iϟ甉䊴㔗B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $411,"@@"
	mov $412,"uugށCœEHvv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $413,"@@"
	mov $414,"vL}ՉC΁B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $415,"@@"
	mov $416,"uuQJHvv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $417,"@@"
	mov $418,"ߓޒԁCB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $419,"ccI^ʖڒCUۏoЕs˓IB"
	mov $420,"AEIZlρB"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\

	textoff

;G\Fy@f@ʒuFE
	ld r,":a;tatie\haruka\konwaku.bmp",12
	texton

	mov $401,"uuccsCL_߁Bvv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"@@"
	mov $403,"|㉺SI^ӑz@CoꕛÓIώqB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"@@"
	mov $405,"uuNޘccߓIːHvv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"@@"
	mov $407,"uuCޘEHv"
	mov $423,"MǗB"
	mov %120,406: mov %121,407:mov %122,24:gosub *messagefont
	mov %120,423: mov %121,423:mov %122,24:gosub *messagefont
	br
	$407@/
	$423/
	add $407,$423/
	@

	mov $408,"r׉C{IBv"
	mov %130,408
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"@@"
	mov $410,"ccÓېYr̘EH"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $411,"@CϓIӕslœB"
	mov $412,"ȁCˈ꒼ՒXqՉJB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $413,"@@"
	mov $414,"uӗVOIC䐥ېIB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $415,"ˊœICAd݈ӁCYJB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $416,"rC䓾QXqccv"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\

	textoff

;GF搶@tF[hAEg
	cl l,12
	texton

	mov $401,"܊ޒԁCVCnԝQXqB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"ˑR𗧍݌nC˔@IvM䩑Rّ[B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $403,"@@"
	mov $404,"܁uYJvCcc"
	mov $405,"cr\SՖY藁B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"ߐ茏[xs˟AL˔递IcB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $407,"RCpՒI_B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"@@"
	mov $409,"ґRFݜލfx咅IC"
	mov $410,"٘VI{ُmB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $411,"ˁCޘӔ퐴^^nW݉ʑOB"
	mov $412,"@"
	mov $413,"@"
	mov $414,"@"
	mov $415,"@"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\

	textoff

	bg black,12
;ʉtF[hAEg
	bgmfadeout 2000
	bgmstop
	delay 2000

	bg white,12
;ʉF̐@[vȂ
	dwave 2,"wave\BirdA11.wav"
;wiF̉@ʏtF[h
	bg "bg\dai4kou\sima_oku.jpg",12
	delay 3000
;aflFfree519.mp3
	bgm "bgm\free0519.mp3"

	texton

	mov $401,"щXI䱁CAXсB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"@ދԏ܁CюqI[r"
	mov $403,"ΖI䱖؉WCB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"䉈͗sCfISہB"
	mov $405,"zŊŜސrC"
	mov $406,"ŎZ\\I䗓C~B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $407,"@@"
	mov $408,"VېϓIC"
	mov $409,"AVp@B"
	mov $410,"VݓCC䑗sB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $411,"Bs命熁C"
	mov $412,"ٔލ܍ːōDI\B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $413,"C꘢َȓI"
	mov $414,"sIlB"
	mov $415,"ޔАSCȎ@uIJB"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"䏬SnrIΉঁC"
	mov $402,"]}IyF䱗сB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $403,"VI󟃁CIB"
	mov $404,"ޗ[xHuÍB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"[zCR@foC"
	mov $406,"ߐ쉹CА́B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $407,"͗ICݖvLHInsC"
	mov $408,"䐏n鴏ŃB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"@@"
	mov $410,"uۙXCݒw㤏"
	mov $411,"kݏʊߌwBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $412,"@@"
	mov $413,"Ŋ蓓ÍB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $414,"@@"
	mov $415,"uߓ悗CCSs"
	mov $416,"^N߁Bv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $417,"@@"
	mov $418,"R蓓ÍB"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"uqۙXCݒw㤏"
	mov $402,"kݏʊߌwBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $403,"@@"
	mov $404,"Cގ̐cc"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"@@"
	mov $406,"uߓ悗CCSs"
	mov $407,"^N߁Bv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"@@"
	mov $409,"ސ^E폥ÍB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $410,"@@"
	mov $411,"uOۙXCݒw㤏"
	mov $412,"kݏʊߌwBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $413,"@@"
	mov $414,"ގ́Cvs≺CAsBB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $415,"@@"
	mov $416,"uߓ悗CCSs"
	mov $417,"^N߁Bv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $418,"@@"
	mov $419,"ۉisfnƉB"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"uCd"
	mov $402,"ؓIꐺf{Bv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $403,"ޗCAȔcB{B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"sCuۉzzkLC"
	mov $405,"A꒼A꒼snB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"@@"
	mov $407,"ގ̐ccٗC"
	mov $408,"ݐU拳hIB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"C֍ݗ㝗SC"
	mov $410,"甉䏥ۜƉ\C~B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $411,"Bʉ䏥\AO\C"
	mov $412,"|~sZB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $413,"Ik_C@zNCi㏔OIyB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $414,"@@"
	mov $415,"u\ۙX@kݒw㤏"
	mov $416,"ߌw@ߓsSBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $417,"@@"
	mov $418,"ߊŁC{sB"
	mov $419,"ޘnsCA꒼B"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\

	textoff

	bg black,12
;wiFuRSl̂@̑Ɂv@ʏtF[h
	bg "cutin\dai4kou\23.jpg",11
	delay 1000
	bg black,12
	delay 1000
;wiFuTTl̂@̑Ɂv@ʏtF[h
	bg "cutin\dai4kou\24.jpg",11
	delay 1000
	bg black,12
	delay 1000
;wiFuWPl̂@̑Ɂv@ʏtF[h
	bg "cutin\dai4kou\25.jpg",11
	delay 1000
	bg black,12
	delay 2000

;ʉFȑ@iv[v@iłŎgj
	mov %61,100
	chvol 1,(%3002*%61/100)
	dwaveloop 1,"wave\se-032.wav" : mov $30,"wave\se-032.wav"
;wiF@ʏtF[h
	bg "bg\dai4kou\sima_sawa.jpg",12
	delay 2000

	texton

	mov $401,"uSۙX@kݒw㤏cc"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"ccccccv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $403,"@@"
	mov $404,"ې萓OʐC˒≺̐B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"̈CsmsuEfI[rB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"ʜkC^ܐ͗Cs@܍XB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $407,"@@"
	mov $408,"ݜޑOccLIwNxEH"
	mov $409,"IঊΒnՁB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $410,"এΚCސЏI^ÁB"
	mov $411,"ێtCAՕś̗B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $412,"VCǵC݋pESgB"
	mov $413,"ߕΘaؙQЗB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $414,"֔@C֐|s๘n]X[rOB"
	mov $415,"@"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"SCnITC"
	mov $402,"CYrr藁H"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $403,"MЈߕCxg劾Cp֐zvœEH"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"䎩CpsāB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"@@"
	mov $406,"sfnAInΒn՝঎B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $407,"͗^I݁B"
	mov $408,"zC͗IIxzCʖzzB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"OICݐ䱗э@́C"
	mov $410,"퐥Isfɓ藁H"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $411,"@@"
	mov $412,"ޏ璀暍XAX欁C"
	mov $413,"󓞉SEIxB"
	mov $414,"@"
	mov $415,"@"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\

	textoff

	bg black,12
	bgmfadeout 2000
	bgmstop
	delay 2000
;ʉ~
	dwavestop 1 : mov $30,""
;ʉF``@iv[v
	mov %61,100
	chvol 1,(%3002*%61/100)
	dwaveloop 1,"wave\WaterA08.wav" : mov $30,"wave\WaterA08.wav"
;wiF@ʏtF[h
	bg "bg\dai4kou\sima_genryu.jpg",16
	delay 2000

	delay 2000

	mov $401,"R@CIőO["
	mov $402,"f萗͗IwN_xB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $403,"xᣓIΔV㱁CLI欗B"
	mov $404,"A欗CɐC͗Cśf{CB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"Cs痹]aCJՓᕒnB"
	mov $406,"J㲗䱖ؘaNCgyߍ엀B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $407,"@CĎOoICzB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"ߗLA厩RIwN_xB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"@@"
	mov $410,"ucQcv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $411,"@@"
	mov $412,"sۏoȓIB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $413,"萌IxB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $414,"^VnIxB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $415,"ݜޔЊxCS赓I^暏UB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $416,"@@"
	mov $417,"uޏAcc_EHv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $418,"@@"
	mov $419,"~ŝICFCIB"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"lRVB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"}^IcCI㲁CnIe߁C"
	mov $403,"zFÓI埃VCRIgB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"A^AX^A^SB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"ϜލIlB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"RIx~Clٖ֝@B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $407,"lC󐯋擈I݁B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"@@"
	mov $409,"@ClFhRCS㏊B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $410,"_\VI댲V_B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $411,"_\pS桑DICmV_B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $412,"|AI}_^eV_B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $413,"@@"
	mov $414,"LIېCAKRSI݁B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $415,"댲NIEgҁB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $416,"՗቉u^črI_B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $417,"Œ^Qȉ|Im`gB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $418,"lFCƜލXÍ~濁C䀛FC"
	mov $419,"Ғiْn`|I_C"
	mov $420,"F桁B"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"ވ؁CsِI꜔OB"
	mov $402,"Z]IlVSIۉB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $403,"ِ㏕Vz[C"
	mov $404,"h_Ah؎RI͗ʖz|B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"@@"
	mov $406,"ވBACIwMSxB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $407,"䘸ِ_㏗LVB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"r蕐_I݁Css\MB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"@@"
	mov $410,"ccsCsvYrېI_B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $411,"dvICٜ󐯋㏗LVSB"
	mov $412,"ߔЈC^ݎI^ӊB"
	mov $413,"@"
	mov $414,"@"
	mov $415,"@"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"sC_ꐥYrB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"䲎xߓI厩RccȋyّS㏊IlB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $403,"LqҌ݁C_Iݍ˓ȐB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"RCI̐RB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"C嘰̐^RC"
	mov $406,"pCڎғIlB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $407,"vցccI̐vLB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"@@"
	mov $409,"@_֐́CsޕЎRB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $410,"ِlm^ݓI_CsCl`B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $411,"ϒnCvLI̖|وӖB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $412,"@ʑS~n̏C"
	mov $413,"ߝٖ@Zwx琥RIB"
	mov $414,"@"
	mov $415,"@"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\

	textoff

;ʉ~
	dwavestop 1 : mov $30,""
	delay 1000
;wiF@ʏtF[h
	bg "bg\dai4kou\sima_sawa.jpg",12
	delay 2000
;wiF̉@ʏtF[h
	bg "bg\dai4kou\sima_oku.jpg",12
	delay 2000
;wiF̉iuj@ʏtF[h
	bg "bg\dai4kou\sima_oku_bure.jpg",12
;G\Fy@̏@ʒuF
	ld c,":a;tatie\haruka\kasyou.bmp",12

	texton

	mov $401,"݉͗ICQ_a̐ImB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"䏊㞏I@CߏAwClIுxB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $403,"S^SI𗬁B̐lhlߓIB"
	mov $404,"ꖡlNssIB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"@@"
	mov $406,"vۋNECc̐NhdlB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $407,"@ʑzǋ^I̐C@ʐ^ȈC"
	mov $408,"AݐlȌB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"vVCEdB"
	mov $410,"Ės勎Iœ|B"
	mov $411,"@"
	mov $412,"@"
	mov $413,"@"
	mov $414,"@"
	mov $415,"@"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"u뉔cc뉔ckccccv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"@@"
	mov $403,"CAݜޗIӗJB"
	mov $404,"zےvhdl߁CKDKB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"ȓISZ̐C甙ߎғIS󓞛B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"ŁcccݍZ]I@\萏oB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $407,"cᚏZ̗cc"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"@@"
	mov $409,"ٗccAߎJB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $410,"@@"
	mov $411,"[[nzC"
	mov $412,"CntRIcc֗LI̐B"
	mov $413,"@"
	mov $414,"@"
	mov $415,"@"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\

	textoff

	bg white,16
	delay 2000
;wiFuw̋x@Əv@ʏtF[h
	bg "cutin\dai4kou\hurusato\01.jpg",12
	delay 2000
	bg white,12
	delay 2000

;
;
;ỷ́@w̋x

	gettimer %90
	bgmonce "bgm\furusato.mp3"

	bg "cutin\dai4kou\hurusato\02.jpg",12
	waittimer (%90+9700)

	bg "cutin\dai4kou\hurusato\03.jpg",12
	waittimer (%90+14000)

	bg "cutin\dai4kou\hurusato\04.jpg",12
	waittimer (%90+19700)

	bg "cutin\dai4kou\hurusato\05.jpg",12
	waittimer (%90+29700)

	bg "cutin\dai4kou\hurusato\06.jpg",12
	waittimer (%90+39500)

	bg "cutin\dai4kou\hurusato\07.jpg",12
	waittimer (%90+40000)

	bg "cutin\dai4kou\hurusato\08.jpg",12
	waittimer (%90+49000)

	bg "cutin\dai4kou\hurusato\09.jpg",12
	waittimer (%90+58500)

	bg "cutin\dai4kou\hurusato\10.jpg",12
	waittimer (%90+67500)

	bg "cutin\dai4kou\hurusato\11.jpg",12
	waittimer (%90+75500)

	bg "cutin\dai4kou\hurusato\12.jpg",12
	waittimer (%90+76500)

	bg "cutin\dai4kou\hurusato\13.jpg",12
	waittimer (%90+85500)

	bg "cutin\dai4kou\hurusato\14.jpg",12
	waittimer (%90+94500)

	bg "cutin\dai4kou\hurusato\15.jpg",12
	waittimer (%90+103500)

	bg "cutin\dai4kou\hurusato\16.jpg",12
	waittimer (%90+115500)

;yɍ킹ĉ̎twitF[h@iƂ肠ƂāBőł킹j
;
;

	bg white,12
	delay 3000
;zu@wiF̉iuj@ʏtF[h
	bg "bg\dai4kou\sima_oku_bure.jpg",0
;zu@G\Fy@с@ʒuF
	ld c,":a;tatie\haruka\yorokobi.bmp",12
;ʔ
	delay 2000

	texton

	mov $401,"ccB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"ސ[xvmVÍB`⦉SÍB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $403,"甎R^lZC̓ÍC"
	mov $404,"fB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"@@"
	mov $406,"DzƛB"
	mov $407,"zAUCh㈷I趍؁B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"ґRmDCA֐zFB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"Ch݊OoI貎ʕMJB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $410,"IlFDCwZIƖDC"
	mov $411,"@ʌu䐥SCߏAFrzJB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $412,"vpȈލgI͗ʁC"
	mov $413,"o笕sSI"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $414,"@@"
	mov $415,"zĈꎟݓߘq㐶B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $416,"R@ĆB"
	mov $423,"ݑƖʑOÍB"
	mov %120,416: mov %121,416:mov %122,24:gosub *messagefont
	mov %120,423: mov %121,423:mov %122,24:gosub *messagefont
	$416@/
	$423/
	add $416,$423/
	@

	mov $417,"@@"
	mov $418,"C\槉B"
	mov $419,"@"
	mov $420,"@"
	mov %130,417
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\

	textoff

	bg black,12
	delay 1000
;wiFûA΂Ȃ琶ĂBv@ʏtF[h
	bg "cutin\dai4kou\26.jpg",12
	delay 2000
;wiFux́Bv@ʏtF[h
	bg "cutin\dai4kou\27.jpg",12
	delay 2000
	bg black,12
	bgmfadeout 2000
	bgmstop

;

;ʁFSd}iʏj
	mov %42,2
	gosub *sindenzu

;

	wait 2000

	bg black,12
;ʉFZ~@iv[v
	mov %61,100
	chvol 1,(%3002*%61/100)
	dwaveloop 1,"wave\se-043.wav" : mov $30,"wave\se-043.wav"
;wiFA@ʏtF[h
	bg "bg\dai4kou\sima_doukutu.jpg",12
	delay 2000
;wiFAiuj@tF[hȂ
	bg "bg\dai4kou\sima_doukutu_bure.jpg",1
	delay 1000
;G\F搶@ʏ@ʒuF
;G\Fy@ʏ@ʒuFE
	ld l,":a;tatie\sensei\tuujyou1.bmp",0
	ld r,":a;tatie\haruka\tuujyou.bmp",12
	delay 2000

	texton

	mov $401,"uěEoEHv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"@@"
	mov $403,"uBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"@@"
	mov $405,"񓞓C㱋ڍB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"@@"
	mov $407,"u_a̓Im꘢nB"
	mov $408,"@ʖvLיߎҁCߏA|وӖCJH"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"@ccrC进ErS񋎗EHv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $410,"@@"
	mov $411,"uICEr藹Bv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $412,"@@"
	mov $413,"ccrCݍVOCc{JB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $414,"ߛEG哞ِIMIC"
	mov $415,"AݓI{ls\ވ_B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $416,"ݍ@vݐlOcc"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $417,"֗LCC䓰ƓI玁C"
	mov $418,"ߕKl{@Ija"
	mov $419,"B"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"VrܒC甉䐏֝QnB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"NhrIYraꍱHC"
	mov $403,"Ȗ\Nލ@hNCR@ٖ݉ʁB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"@@"
	mov $405,"u@ߏ@uIC"
	mov $406,"㱓I@sRIB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $407,"ݜÓI{C"
	mov $408,"LV~濓IVÐ_C֗LC"
	mov $409,"nIÐ_B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $410,"wޗܓIwxCswƁCޕБnB"
	mov $411,"waIRFB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $412,"@@"
	mov $413,"V՗I_NCȋy桑nI_NB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $414,"٘jCI{܁C}V_aV_C"
	mov $415,"֗L֖vLpϒKCېICjא_vIMُہB"
	mov $416,"ޏA_BC䓰ƓI福l"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $417,"ޏA_BC䓰ƓI福lC"
	mov $418,"㏬EىNލB"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"ێhICazvڎŋIa䎁B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"q卋WClCō@ța䎁IWfB"
	mov $403,"V@C݁s\@tᑕzehŁA@Amf"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"{CnڎŋB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"ޗǌIő"
	mov $406,"CmvFCn熑Bv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $407,"݋IdB푽CÔVB"
	mov $408,"uRC{曑oƓI@vz"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"@@"
	mov $410,"ᗹ_^ŋCACI_蚍vzBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $411,"@@"
	mov $412,"usC{曑oƓI@vzC"
	mov $413,"_^ŋCACI_蚍vzBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $414,"z򒅑cINʁCjaD㏳˒_I桁B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $415,"lFaI_F^ݗCC"
	mov $416,"@I䔉񔫐thŁB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $417,"ĉ򋳁AT@VCȋy_^C|C"
	mov $418,"{so乎ϓI@B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $419,"lِEINjC"
	mov $420,"FBZ藁Bv"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"p֌g擐HiC"
	mov $402,"\^ߒVIԁB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $403,"ӁCI⁋|dB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"FlalIMCݒ[CȚC"
	mov $405,"|FڎB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"ے莩ȓI_aCޝً^ʚB"
	mov $407,"ߔЉamR[ڌŁB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"@@"
	mov $409,"VCᑶI_^OIŋ"
	mov $410,"\構I{ӍݐaB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $411,"Cŋ֎󓞗lFI쐗B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $412,"BCŋI⁓񗈎ᕓI|C"
	mov $413,"ÐڎC"
	mov $414,"˓ȓϓIB"
	mov $415,"@"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"uRC֐ϓI{C}ݍB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"ݖCzΓIO"
	mov $403,"{VcC_B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"ӎ{_ŕ餐Cȋy[X^ÁB"
	mov $405,"{ے藹OIMC"
	mov $406,"孒荑Ə\I@L_B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $407,"Bሔ][C"
	mov $408,"{IŋjB"
	mov $409,"풀ЉIpB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $410,"CٍROINCoΓI茁C"
	mov $411,"ȋyٓI_喷B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $412,"RCٖ@󗈎OÍC"
	mov $413,"{śfeBIB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $414,"RCϓI_vL͗ʁB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $415,"BʁC{l@MC"
	mov $416,"⎸MIӖBv"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\

	textoff

;G\Fy@f@ʒuFE
	ld r,":a;tatie\haruka\konwaku.bmp",12

	texton

	mov $401,"ucccv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"@@"
	mov $403,"^忁B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"{lp[{apC"
	mov $405,"֐oaȓI@vzEH"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"@ClFV悏@C"
	mov $407,"Cnya~B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"@@"
	mov $409,"uƓssJB"
	mov $410,"M퐥YrCCv`_B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $411,"݊Ssވ_IvCǋ@IC"
	mov $412,"횭lp琥RIBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $413,"@@"
	mov $414,"vցCȍˉLpϓImScVnlB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $415,"spBvLlsMIӖC"
	mov $416,"I_AݓϓIlS݉B"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"uޏAߓICyB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"@I{lEٖ@@ݓIӖB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $403,"ݐ_ONBCs吥꘢l~I与B"
	mov $404,"Dᴔ푶W@C"
	mov $405,"r蕏Q`I_З򒅏YrssmB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"GE꘢掖CSIq"
	mov $407,"sĐ\_ݛ㏒xIVB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"lFݏsCmhC"
	mov $409,"󈻈aSЈIrB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $410,"SsmvLRI͗ʁCl{ٖ@B"
	mov $411,"uƐُ@MIGvC\|s๘nܓB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $412,"ϓIƌFCߌuFߓI̐ØEH"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $413,"EY㈗{RI{lv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $414,"@@"
	mov $415,"uccc"
	mov $423,"ccccccv"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	mov %120,414: mov %121,420:mov %122,24:gosub *messagefont
	mov %120,423: mov %121,423:mov %122,24:gosub *messagefont
	br
	$415@/
	$423/
	add $415,$423/
	\

	textoff

;ʉtF[hAEg
	dwavestop 1 : mov $30,""
;G\Fy@^ʖځ@ʒuFE
	ld r,":a;tatie\haruka\majime.bmp",12

	texton

	mov $401,"u֔@C֐vB"
	mov %130,401
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"AvLlߓÏρC"
	mov $403,"vLlmI_slhcc"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"AC@ʉI̔\c萏oRI"
	mov $405,"I__cc"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"@ʔ\FIxaِEIV"
	mov $407,"䑊MFLB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"̐^_꘢nB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"R@ccz̐萈؁Bv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $410,"@@"
	mov $411,"㰌IluOSB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $412,"ސ䘸LIB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $413,"ٖ^㏗L~ISBB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $414,"Eِl笖]C^nB"
	mov $415,"sߔ懎IlB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $416,"gܗ\̐͗ʓIӖC"
	mov $417,"QāB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $418,"䍫BlC@鈁ccsȉB"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"usCޘEsSB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"@ʑzݓ{⁔d̐CVōDI\C"
	mov $403,"AߗV悏@IC"
	mov $404,"ވ_迖k^JB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"CgC"
	mov $406,"ߗs吥sIݑ᳁B"
	mov $407,"꘢ʏEa|HIEB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"ٜϓI@C近ŎZrR藁Hv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"@@"
	mov $410,"u]B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $411,"g݊Xpcc"
	mov $412,"IyL꘢lُCB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $413,"g䎩dCi񗯍ݖ^lISB"
	mov $414,"ϓÍCNBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $415,"@@"
	mov $416,"uu@ccvv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $417,"@@"
	mov $418,"ߗIԁCV⋗NB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $419,"@@"
	mov $420,"uurCA甉䗈FoꉺJBvv"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\

	textoff

	bg black,12
	delay 3000

;ʉF̐@iv[v
	bgm "bgm\SE_IN200.mp3"
;wiFC݁i[j@ʏtF[h
	bg "bg\dai4kou\sima_umi_yuugata.jpg",12
	delay 2000
;wiFC݁i[Euj@tF[hȂ
	bg "bg\dai4kou\sima_umi_yuugata_bure.jpg",1
	delay 1000
;G\F搶@ʏ@ʒuF
;G\Fy@^ʖځ@ʒuFE
	ld l,":a;tatie\sensei\tuujyou1.bmp",0
	ld r,":a;tatie\haruka\majime.bmp",12
	delay 1000

	texton

	mov $401,"[}CnݓICݏCaVٖ⋒B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"oȓISӉސىIśfl|B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $403,"@@"
	mov $404,"uߓI䖾B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"ACόٖ@ݜޘE㗧IB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"@ߐ^Iz̐lSC"
	mov $407,"ߏAݜޗWo\甉MI͗JB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"ȘEHv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"@@"
	mov $410,"uuccDIBvv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $411,"@@"
	mov $412,"uȎqR䗈rJB"
	mov $413,"@ߔ\Dގ́CAZBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $414,"@@"
	mov $415,"筒n__B"
	mov $423,"݁CAݜޗڎl|B"
	mov %120,414: mov %121,415:mov %122,24:gosub *messagefont
	mov %120,423: mov %121,423:mov %122,24:gosub *messagefont
	br
	$415@/
	$423/
	add $415,$423/
	@

	mov $416,"ݜޘf㊴󓞗YrCYrB"
	mov %130,416
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $417,"@@"
	mov $418,"urCގȎqcc"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $419,"wᅖAxC苊iBv"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\

	textoff

;G\Fy@@ʒuFE
	ld r,":a;tatie\haruka\odoroki.bmp",12
	texton

	mov $401,"uᅖAccIv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"@@"
	mov $403,"nIRB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"Bwq⁏C쐗B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"cc"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"@@"
	mov $407,"᫝TIwG刓rIB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"ގ̘aߎwʍsّjxρcc"
	mov $409,"U^ÓI͗ʁB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $410,"ޑi̍CAҒɋIB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $411,"׉zNSIVC"
	mov $412,"f}ݐlȌI捏cc"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $413,"Ε΁CCYrϓÍcc"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $414,"@@"
	mov $415,"ccsCBCϓIJB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $416,"Kl筎ȓIMOB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $417,"@ʝٖ@៙W勎QȓI×͗"
	mov $418,"APB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $419,"@@"
	mov $420,"uߔ\EHv"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\

	textoff

;G\Fy@^ʖځ@ʒuFE
	ld r,":a;tatie\haruka\majime.bmp",12
	texton

	mov $401,"uccBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"@@"
	mov $403,"Ď筒n__B"
	mov $404,"ސKlv׉zIVB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"@ʎ_꒼_cc"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"@曈꒼曈CߏAssB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $407,"@@"
	mov $408,"vd꒴zOIȁB"
	mov $409,"@"
	mov $410,"@"
	mov $411,"@"
	mov $412,"@"
	mov $413,"@"
	mov $414,"@"
	mov $415,"@"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\

	textoff

;ʉtF[hAEg
	bgmfadeout 2000
	bgmstop
	delay 2000

;GF搶
	cl l,12
;GFy
;G\Fy@̏@ʒuF
	cl r,0
	ld c,":a;tatie\haruka\kasyou.bmp",12

	texton

	mov $401,"W_CKċzB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"CVLqB꘢lʑÓB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $403,"CpIwCI̐험pC"
	mov $404,"ܒvlFISB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"vŔjߎtZSIgSB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"@@"
	mov $407,"񘢐ÁB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"sNTCrߔ߈^⍓C"
	mov $409,"Z̐B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $410,"@@"
	mov $411,"ccvVBȘB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $412,"̐ccIVCIMB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $413,"䉺rSC[zC"
	mov $414,"Cn׏[xDIÔV́B"
	mov $415,"@"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\

	textoff

	bg white,16
	delay 2000
;wiFuwڂʁx@Əv@ʏtF[h
	bg "cutin\dai4kou\syabon\01.jpg",12
	delay 2000
	bg white,12
	delay 2000

;
;
;ỷ́@wڂʁx

	gettimer %90
	bgmonce "bgm\syabondama.mp3"

	bg "cutin\dai4kou\syabon\02.jpg",12
	waittimer (%90+13500)

	bg "cutin\dai4kou\syabon\03.jpg",12
	waittimer (%90+28000)

	bg "cutin\dai4kou\syabon\04.jpg",12
	waittimer (%90+41500)

	bg "cutin\dai4kou\syabon\05.jpg",12
	waittimer (%90+54500)

	bg "cutin\dai4kou\syabon\06.jpg",12
	waittimer (%90+67000)

	bg "cutin\dai4kou\syabon\07.jpg",12
	waittimer (%90+80000)

	bg "cutin\dai4kou\syabon\08.jpg",12
	waittimer (%90+92500)

	bg "cutin\dai4kou\syabon\09.jpg",12
	waittimer (%90+105500)

	bg "cutin\dai4kou\syabon\10.jpg",12
	waittimer (%90+118000)

	bg "cutin\dai4kou\syabon\11.jpg",12
	waittimer (%90+131000)

	bg "cutin\dai4kou\syabon\12.jpg",12
	waittimer (%90+147000)

	bg black,12
	waittimer (%90+149000)

	bg "cutin\dai4kou\syabon\13.jpg",12
	waittimer (%90+153000)

	bg "cutin\dai4kou\syabon\14.jpg",12
	waittimer (%90+161000)


;yɍ킹ĉ̎twitF[h@iƂ肠ƂāBőł킹j
;
;

	bg white,14
	delay 3000
;zu@wiFC݁i[j@ʏtF[h
	bg "bg\dai4kou\sima_umi_yuugata.jpg",12
	delay 2000
;zu@wiFC݁i[Euj@ʏtF[h
	bg "bg\dai4kou\sima_umi_yuugata_bure.jpg",1
	delay 1000
;G\F搶@ʏ@ʒuF
;G\Fy@̏@ʒuFE
	ld l,":a;tatie\sensei\tuujyou1.bmp",0
	ld r,":a;tatie\haruka\kasyou.bmp",12
	delay 2000
;G\Fy@^ʖځ@ʒuFE
	ld r,":a;tatie\haruka\majime.bmp",12

	texton

	mov $401,"@C䔫g٘VB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"ÖvLoCfˏolIB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $403,"@@"
	mov $404,"ÝِB㱗C̐I]暏UB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"ÕsÁB"
	mov $423,"VÕsÁB"
	mov %120,405: mov %121,405:mov %122,24:gosub *messagefont
	mov %120,423: mov %121,423:mov %122,24:gosub *messagefont
	$405@/
	$423/
	add $405,$423/
	@

	mov $406,"qlCݗ[}IƗsB"
	mov %130,406
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $407,"@@"
	mov $408,"uccc"
	mov $423,"cccccc"
	mov %120,407: mov %121,408:mov %122,24:gosub *messagefont
	mov %120,423: mov %121,423:mov %122,24:gosub *messagefont
	br
	$408@/
	$423/
	add $408,$423/
	@/

	mov $423,"_B"
	mov %120,423: mov %121,423:mov %122,24:gosub *messagefont
	$423/
	add $408,$423/
	@

	mov $409,"ʑRCߓI̐Ŗ_IBccvL๘B"
	mov %130,409
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $410,"iBߐ^IcckDBv"
	mov $411,"@"
	mov $412,"@"
	mov $413,"@"
	mov $414,"@"
	mov $415,"@"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\

	textoff

	bgmfadeout 2000
	bgmstop

;aflFfree0517.mp3@iv[v
	bgm "bgm\free0517.mp3"
;GF搶@tF[hAEg
	cl l,12
	texton

	mov $401,"ދԁCV֔gCB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"ݖXCLYrc礕ߔꉺB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $403,"ߐcc"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"@@"
	mov $405,"ڑIweC"
	mov $406,"CcC݁CIېUB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $407,"iccA܁CވӖB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"^ލfIRp߁C"
	mov $409,"^V敁CވؓsݍVBB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $410,"^d@CKl񓞏闢B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $411,"@@"
	mov $412,"sCސ䎩Ȋ]IB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $413,"ݓߔV@CI៓lCnB"
	mov $414,"@"
	mov $415,"@"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\

	textoff

;G\Fy@с@ʒuFE
	ld r,":a;tatie\haruka\yorokobi.bmp",12
	texton

	mov $401,"uVcc迁Bv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"@@"
	mov $403,"ٓ߈ʝm~A甉dV⋋NIC"
	mov $404,"ێSn\萗VB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"@@"
	mov $406,"Ės𗹁B̏C]B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $407,"CEC\BI̐IC"
	mov $408,"ޘEL䎩ȁB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"@@"
	mov $410,"uݜލfI؁cc笕sY㈁B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $411,"漁cc"
	mov $423,"^Icc튴迁Bv"
	mov %120,411: mov %121,411:mov %122,24:gosub *messagefont
	mov %120,423: mov %121,423:mov %122,24:gosub *messagefont
	$411@/
	$423/
	add $411,$423/
	@

	mov $412,"@@"
	mov $413,"vB"
	mov $423,"C꘢lC^̐NOsB"
	mov %120,412: mov %121,413:mov %122,24:gosub *messagefont
	mov %120,423: mov %121,423:mov %122,24:gosub *messagefont
	br
	$413@/
	$423/
	add $413,$423/
	@

	mov $414,"䓰yIVlCCnB"
	mov %130,414
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $415,"@@"
	mov $416,"ٛEIweC[[nfZB"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\

	textoff

	bg black,16
	bgmfadeout 2000
	bgmstop
	delay 3000

;ʉF^CsOiJ^b1j
;wiFuv@tF[hȂiȉlj
;ʉF^CsOiJ^b1j
;wiFuˁv
;ʉF^CsOiJ^b1j
;wiFu˓v
;ʉF^CsOiJ^b1j
;wiFu˓jv
;ʉF^CsOiJ^b1j
;wiFu˓jv
;ʉF^CsOiJ^b1j
;wiFu˓j[v
;ʉF^CsOiJ^b1j
;wiFu˓j[Xv

	dwave 10,"wave\KeyboardC1.wav"
	bg "cutin\dai4kou\28.jpg",1
	wait 200

	dwave 10,"wave\KeyboardD1.wav"
	bg "cutin\dai4kou\29.jpg",1
	wait 100

	dwave 10,"wave\KeyboardD1.wav"
	bg "cutin\dai4kou\30.jpg",1
	wait 150

	dwave 10,"wave\KeyboardC1.wav"
	bg "cutin\dai4kou\31.jpg",1
	wait 150

	dwave 10,"wave\KeyboardC1.wav"
	bg "cutin\dai4kou\32.jpg",1
	wait 125

	dwave 10,"wave\KeyboardC1.wav"
	bg "cutin\dai4kou\33.jpg",1
	wait 300

	dwave 10,"wave\KeyboardD1.wav"
	bg "cutin\dai4kou\34.jpg",1

	delay 2000
	bg black,1

	texton

	mov $401,"鿂PHCݝِlf~B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"@@"
	mov $403,"QXCg耊Cۈړڍ"
	mov $404,"̍耊CIfL|䷏NB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"zI玑F~ꖼiPUӁjB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"ޖnsIC"
	mov $407,"{QRu㱋N։sC"
	mov $408,"Ɛlߌx𗹝rԐ\苁B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"{l\C\݂ns`UssTC"
	mov $410,"@풪t\IfB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $411,"fِlZCޖݓߗx嗹TVC"
	mov $412,"UVC\ȐΛċ~h~B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $413,"~@푗@CA"
	mov $414,"g̖FvČNǍDB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $415,"uu\񗈐^DB"
	mov $416,"f䲓I厩Rh͗ʁCvv"
	mov $417,"ޖΒܓB"
	mov $418,"ƐlF]]\uَ^DvCZB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $419,"@@"
	mov $420,"鿂Qd耈ꏊwĎې\ۓIڎlB"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\

	textoff

	delay 3000

;ʉFZ~iʂTOj@iv[v
	dwaveloop 1,"wave\se-043.wav" : mov $30,"wave\se-043.wav"
	mov %61,50
	chvol 1,(%3002*%61/100)
;wiF@ʏtF[h
	bg "bg\dai4kou\machi_takadai.jpg",16
	delay 4000

	texton

	mov $401,"uߜϑҍݜޗC^IDEHv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"@@"
	mov $403,"݉ȘՐInCߘl⋍ݓߗB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"ʐB䲕㕓IB"
	mov $405,"弉乎uF\IgeB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"@@"
	mov $407,"uvgnIB"
	mov $408,"݁C֕soIBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"@@"
	mov $410,"\]iC@gŌC"
	mov $411,"ՒIΉ闹B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $412,"\I\CsmC甉zN߈ʏB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $413,"@@"
	mov $414,"uߛvLȑzےϔs[GC^IB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $415,"wq䐥IBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $416,"@@"
	mov $417,"ߓދԁC\Β𔈁B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $418,"c\IJCXISӁB"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"uݍċpCEs\B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"ccEvLߘoiBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $403,"@@"
	mov $404,"\ߔ߈I\CEŕsCwHlҁxIeqB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"ґR\Ȝr܁CAv֍ொoiC"
	mov $406,"Aܖ\ˑRڗLߘoiB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $407,"^ٖ@CIlCr蕎ssB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"@@"
	mov $409,"E\ߓISEB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $410,"䓰wCSIB"
	mov $411,"yٖ@ĉ̏IB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $412,"ȋyrSIɋEB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $413,"a\V㱛vL[IB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $414,"CK^V悏@IÌCRQ\B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $415,"@@"
	mov $416,"usC֐^_IlB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $417,"RcƐth꘢fsΓIjlC"
	mov $418,"ʐlsޔЎIv"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"ucczc\Bv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"uߛwqLI\Bv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $403,"uo݌䓰ƁCC福lCv"
	mov $404,"u]ڗLzވgᚓI瀁Bv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"uAC̐CIlƓYʁBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"uC̎IC䓰眨qsĐ䓰ƓICv"
	mov $407,"uȘ䎩ȁBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"uȁC@@Csz]́Bv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"ugHlISCzێBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $410,"uAccv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $411,"@@"
	mov $412,"uuBXI̐C\ɋCv"
	mov $413,"uޓ_ٖ@EJBvv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $414,"@@"
	mov $415,"uucccIBvv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $416,"@@"
	mov $417,"śfC\v\SCSB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $418,"yDCވʕpDB"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"urߍˍD藁ccv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"@@"
	mov $403,"usCCߑF꘢䎧߁B"
	mov $404,"śf]LIlCy\ȁBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"v"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"@@"
	mov $407,"uC䖾IB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"@ʉ]mCߛwqAٖ@OےB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"ccKlڎ󐧍فB"
	mov $410,"HrlChF՗ɋC"
	mov $411,"ސٖٝ@팴ZIccv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $412,"@@"
	mov $413,"u@ߛEŎZDC"
	mov $414,"ݗvȕpIgᚔ\B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $415,"FssvC浊Bvv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $416,"@@"
	mov $417,"ucccv"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"yZ]ƐlIB"
	mov $402,"ޘSCޘl\JB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $403,"RC@ˉ๘srB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"fESIhIIwqC"
	mov $405,"ϘSIgᚁCۉϋ\藁B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"ȁCޘlˉݜϓIn]B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $407,"^C^I͈ϓIꏗB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"@@"
	mov $409,"usȋSCȌ䓰眨qIgᚋڐGAsB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $410,"ߛE䓰ƓIvEoC"
	mov $411,"C̎ΕȓI䊁C"
	mov $412,"mrفBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $413,"@@"
	mov $414,"uccIv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $415,"@@"
	mov $416,"ґR\vLܒԁCA\I\@uYrB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $417,"ϏADCSӛE萓B"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"֔@CʑR֐kÛB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"嘢lsψW擈玩ȓIwqEH"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $403,"@@"
	mov $404,"zIlC䝫]VB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"IVCВXB"
	mov $406,"@"
	mov $407,"@"
	mov $408,"@"
	mov $409,"@"
	mov $410,"@"
	mov $411,"@"
	mov $412,"@"
	mov $413,"@"
	mov $414,"@"
	mov $415,"@"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\

	textoff
	bg white,16
;ʉtF[hAEg
	dwavestop 1 : mov $30,""

	wait 3000


	mov %2703,1


textclear
	saveoff
;	eLXgz̏
	for %199=201 to 420
		mov $%199,"@"
	next

	bgm "title\Main-Theme.mp3"

goto *sentaku

@
;\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\
;Ahx`[p[g
;Tu
*scenario5

	mov $100,"T"

	for %199=19 to 34
		csp %199
	next


	bg black,14

	bgmfadeout 2500

	bgmstop

	wait 4000

	setwindow 8,56,40,40,24,24,0,2,0,1,1,#888888,0,0,800,650
	texton


	mov $401,"QOOWNB"
	mov %130,401
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"蕕sfIZЋ\awlČC"
	mov $403,"甓{{ssюّ[{B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"u\ƍ߁CsߏImsC"
	mov $405,"֐NlCvQ膌Bv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"^꜐}B玓IވیC"
	mov $407,"gV@헧āABCQq@vB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"ޕw\膌@xNCnӎ{B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"@@"
	mov $410,"QOOXNC{\CmCQғIvC"
	mov $411,"CBّs膌I㓞B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $412,"V@ӎ{@CO}莜ƉIQd\ČC"
	mov $413,"暕B"
	mov $414,"@"
	mov $415,"@"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\

	textoff

	delay 3000

	dwave 10,"wave\KeyboardC1.wav"
	bg "cutin\dai5kou\01.jpg",1
	wait 200

	dwave 10,"wave\KeyboardD1.wav"
	bg "cutin\dai5kou\02.jpg",1
	wait 100

	dwave 10,"wave\KeyboardD1.wav"
	bg "cutin\dai5kou\03.jpg",1
	wait 150

	dwave 10,"wave\KeyboardC1.wav"
	bg "cutin\dai5kou\04.jpg",1
	wait 150

	dwave 10,"wave\KeyboardC1.wav"
	bg "cutin\dai5kou\05.jpg",1
	wait 125

	dwave 10,"wave\KeyboardC1.wav"
	bg "cutin\dai5kou\06.jpg",1
	wait 300

	dwave 10,"wave\KeyboardD1.wav"
	bg "cutin\dai5kou\07.jpg",1
	wait 350


	dwave 10,"wave\KeyboardD1.wav"
	wait 450

	dwave 10,"wave\KeyboardC1.wav"
	bg "cutin\dai5kou\08.jpg",1
	wait 200

	dwave 10,"wave\KeyboardC1.wav"
	bg "cutin\dai5kou\09.jpg",1
	wait 300

	dwave 10,"wave\KeyboardC1.wav"
	bg "cutin\dai5kou\10.jpg",1
	wait 325

	dwave 10,"wave\KeyboardC1.wav"
	bg "cutin\dai5kou\11.jpg",1

	wait 3000

	bg black,0
	print 99,4000,"cascade.dll/dx"

	wait 2000

;ʉFG@[vȂ
	dwaveloop 1,"wave\machi.wav" : mov $30,"wave\machi.wav"
;wiF̒݁@ʏtF[h
	bg "bg\dai5kou\tokyo_machinami.jpg",16
	delay 3000
;wiFtWerO@ʏtF[h
	bg "bg\dai5kou\fuji.jpg",12
	delay 3000
;wiFwZOρ@ʏtF[h
	bg "bg\dai5kou\gakkou_gaikan.jpg",12
	delay 3000
;wiFwZ̉@ʏtF[h
	bg "bg\dai5kou\gakkou_okujyou.jpg",12
	delay 3000

	texton

	mov $401,"tV^DCXlIGEB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"䘸{N]VCFrēICB"
	mov $403,"֐ϓInCL݉]B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"@@"
	mov $405,"]CޗCChC{"
	mov $406,"ܑ\CuB{B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $407,"@InCw{x{w{xIB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"ϓIhC{瑁C"
	mov $409,"UCᕓI暏C"
	mov $410,"aIPRUC"
	mov $411,"g݁CޕГynˑR^ᕒnu笁B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $412,"ґRkʈi㱓sslFϋߓInC"
	mov $413,"A\N㒆C濊CsSgȗC"
	mov $414,"Sm甜ޗvANB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $415,"ŋ߁Cޗ֌N^ZC"
	mov $416,"苏IlƁB"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"lCRALwZNC"
	mov $402,"ޗIs͌荂琥VB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $403,"ґRʘ@sCpڗLIƓIaVØOC"
	mov $404,"֗LOjrC{C"
	mov $405,"ŏdvICxCCݎ蓌}B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"cc"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $407,"@@"
	mov $408,"ucD֛Bv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"@@"
	mov $410,"ݜޕОB䲓I濊CVnC"
	mov $411,"ڐnɁAC{塑SIUVZqC"
	mov $412,"䐳SВn㱁B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $413,"餋h趓I֑藁B"
	mov $414,"vdzuIB"
	mov $415,"œL_B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $416,"VCAvB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $417,"svCpgC|B"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"d݋ݒs֓~ICJB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"wߍs\paOl𗬓IpgC"
	mov $403,"^槗B"
	mov $423,"RII"
	mov %120,402: mov %121,403:mov %122,24:gosub *messagefont
	mov %120,423: mov %121,423:mov %122,24:gosub *messagefont
	$402
	$403@/
	$423/
	add $403,$423/
	@

	dwavestop 1 : mov $30,""
;ʉFwZ̃`C@[vȂ
	dwave 2,"wave\chaim.wav"

	mov $404,"@@"
	mov $405,"z藁CCkB"
	mov %130,404
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"pgCBCELIwCB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $407,"DMC֓I㱁CFkI"
	mov $408,"LqCR@⋗NB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"@@"
	mov $410,"uuߜޘsǏNIvv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $411,"@@"
	mov $412,"AݜCʉ~Io⁗B"
	mov $413,"꘢ZB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $414,"ns\ďnIB"
	mov $415,"@"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\

	textoff

;wiFwZ̉iuj@tF[hȂ
	bg "bg\dai5kou\gakkou_okujyou_bure.jpg",1
	delay 1000
;G\FTV@s@ʒuFE
	ld r,":a;tatie\nonomi\okori.bmp",12
	delay 1000
;G\Fn@ʏ@ʒuF
	ld l,":a;tatie\ryouma\tuujyou.bmp",12
	delay 2000
;aflFfree0257.mp3@iv[v
	bgm "bgm\free0257.mp3"
	texton

	mov $401,"uuʑRCߍݜޗIvv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"@@"
	mov $403,"uuGCݜޙXBvv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"@@"
	mov $405,"ُՎhIgC䐏֕~B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"CkvvB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $407,"d\ꉺCAt嗈IJ"
	mov $408,"^h\B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"@@"
	mov $410,"uuߊvCH"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $411,"ߕs܏Ntȍ@vDDCIEH"
	mov $412,"֓藁Bvv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $413,"@@"
	mov $414,"uuvBvv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $415,"@@"
	mov $416,"uu闹I"
	mov $417,"`ߜϘICJHvv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $418,"@@"
	mov $419,"uޘ㈓Bv"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"uR@ClܗuCvBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"@@"
	mov $403,"u浊ICމsZ^IiB"
	mov $404,"TVBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"@@"
	mov $406,"֐^l~sIƌB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $407,"LTVIlC"
	mov $408,"AkȁB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"@@"
	mov $410,"uC꒼sJH"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $411,"֕s@swߍݓwlpIpgC"
	mov $412,"֕s@ŊXLӖBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $413,"@@"
	mov $414,"܊Ccˈ꒼݊œIwNB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $415,"얼wcjIHxB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $416,"ޖ{ǟ{wVc搶IꐶC"
	mov $417,"ᄏqjTIӖB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $418,"ސݝxQI{CAeLB"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"uLӖccAZޔЎC"
	mov $402,"pgR\l\ȏC"
	mov $403,"ސ^sBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"@@"
	mov $405,"u˕sYrs藁B"
	mov $406,"s吥ߑFߓI݊wnBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $407,"@@"
	mov $408,"TCIwAsfnw蚁B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"푗vwC"
	mov $410,"VsrxJ蚔ǘapgCB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $411,"SvLwqϊߌwIyB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $412,"@@"
	mov $413,"ٜޔА[IC"
	mov $414,"R餉ƏoCR@lޏsB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $415,"ĖsClB"
	mov $416,"vȉ䎩ȓIo䎩ȓIlB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $417,"lI㱐LIB"
	mov $418,"ŋ߁C֐NSlˑR藁B"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"uAClꉺIʎqJBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"@@"
	mov $403,"uґRZ߉ƓIC"
	mov $404,"Asw桒IB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"݊wZrqCߐIRJBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"@@"
	mov $407,"u䖾CAAs\ڎIv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"@@"
	mov $409,"u^q؏ׁccv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $410,"@@"
	mov $411,"\NI~|肁C蕕s\ΓIgnB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $412,"܋NC甐lzJB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $413,"RCOޘƌSs߉񎖁B"
	mov $414,"䐥݉gIC"
	mov $415,"ֈꕛwrIώqCӍݐWI݁B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $416,"CqC|qsDgB"
	mov $417,"wINA_vB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $418,"ߓxp茓kC"
	mov $419,"VAoꕛLϓI\B"
	mov $420,"甐lΑICA\䐥r嗈B"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"CFލnCލˍX甐ls[B"
	mov $402,"~|肏YrIC{_ssB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $403,"AƐqߕLZ툷ρC"
	mov $404,"U^ILCAuWvB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"@@"
	mov $406,"XvC餉Əo@C"
	mov $407,"TVI甉ZFEԓIB"
	mov $408,"ґR{\CAT"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"䐤ӐώƐ㗐IB"
	mov $410,"XIIC݊wZFR֕꘢tB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $411,"BʁCV唼㱓sa\刖ʁB"
	mov $412,"AZߕsCŎZ㉺ECB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $413,"@@"
	mov $414,"u݁C_JCsRAvI"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $415,"gCCIv"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\

	textoff

;GFn@tF[hAEg
	cl l,12
	delay 1000
;G\FTV@@ʒuFE
	ld r,":a;tatie\nonomi\odoroki.bmp",12
	delay 1500
;GFTV@tF[hAEg
	cl r,12

;wiF@ʏtF[h
	bg "bg\dai5kou\aozora.jpg",12

	texton

	mov $401,"ugCCIv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"@@"
	mov $403,"TVǒIwe嗈B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"ґRu\k佁CAvLC\B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"CmsC\C"
	mov $406,"މƌ䐥uB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $407,"ϓIgnCE]\{NB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"@@"
	mov $409,"X甐lΐIVB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $410,"RЉCpȓIo葈擞IRC"
	mov $411,"֗L꒼I掐~|肁B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $412,"ޏA䉔"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $413,"@@"
	mov $414,"ٗ肓I퐶B"
	mov $415,"@"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\

	textoff

;wiFuTu@zv@ʏtF[h
	bg "cutin\dai5kou\12.jpg",16
	delay 3000

	bg black,12
	bgmfadeout 2000
	bgmstop
	delay 3000

;ʉFwZ̃`C@[vȂ
	dwave 2,"wave\chaim.wav"
;wiF@Vb^[tF[h
	bg "bg\dai5kou\gakkou_kyousitu.jpg",26
	delay 2000

	texton

	mov $401,"uC݉pCV勳aVV㱔ۗI̗͑lB"
	mov $402,"݋V勳I{N@"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $403,"V禈ʓI䲈ꐢC"
	mov $404,"V禈ʓI䲈ꐢC"
	mov $405,"rrVIG܎ҁB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"CpI@蜓ܑIC"
	mov $407,"ZZ\N㱏AЍrccv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"@@"
	mov $409,"ߋxB@CCnߓICB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $410,"EjC{ʒwpIxB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $411,"ݍ̕sKIvC福lIlB"
	mov $412,"䳔ꐢoC~C"
	mov $413,"ޘ{vLs呜ϓINB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $414,"ܓCV勳IC"
	mov $415,"CIsC틳cwo@Cqlې꜁B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $416,"RCޔЎs\ʒC{IC"
	mov $417,"VCRCCIlTƓIԁC"
	mov $418,"BٕsYrDB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $419,"Cs甜ϓI莏dC"
	mov $420,"@IЉȑ݁B"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"wLAAIBx"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"ދݔoIԁC"
	mov $403,"ݓ{ϖpB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"@@"
	mov $405,"{wIғIܖ@C"
	mov $406,"x~ޘƍIC"
	mov $407,"ߍٖI`asB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"@ʐЕ͋jC"
	mov $409,"I勎AXQaNB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $410,"VcAAbF\槊EC"
	mov $411,"CLِlx~FC"
	mov $412,"{IjC"
	mov $413,"ӏA{l{gB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $414,"scڌڏōpYVrC"
	mov $415,"vgXʐlI̎B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $416,"@@"
	mov $417,"@C@IB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $418,"jIRCLȔVnJB"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"ACfB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"ʐl{ٖ@ÍƓI^B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $403,"َ񑊈}LҁC"
	mov $404,"R@cؓshFrB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"赍ōb͈ʒuIN禔CґlC"
	mov $406,"aIpvLdB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $407,"忓IaIhnӑTƁC"
	mov $408,"Bʎ{鎧wB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"R@oVIB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $410,"N\]CAYrssAٔ\C"
	mov $411,"ULsÁCpIۓWB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $412,"AρC{ݕsfdޔЍXP|IzF"
	mov $413,"nnsB"
	mov $414,"@"
	mov $415,"@"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"Fٖ@}Γߍ[xDiIb͑lCҋIrsaB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"sC|s@܁CF֔\ݐEj㗯C"
	mov $403,"BޛEZs֗B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"@ʕI񑊔\o݈SN@I엢C"
	mov $405,"瀓I􋰜ALғICOhB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"ޘƍ{vLoYr\˓jeIB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $407,"@@"
	mov $408,"͐sCAݔtqIfுB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"A暍AUۓݖIρC"
	mov $410,"{喝IxsswB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $411,"@@"
	mov $412,"Cܑ@IB"
	mov $413,"@"
	mov $414,"@"
	mov $415,"@"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\

	textoff

;ʉFwZ̃`C@[vȂ
	dwave 2,"wave\chaim.wav"
	bg black,16
	delay 3000

;wiFtWerO@ʏtF[h
	bg "bg\dai5kou\fuji.jpg",12
	delay 2000
;wiFtWerOiuj@tF[hȂ
	bg "bg\dai5kou\fuji_bure.jpg",12
;G\FTV@Ί@ʒuFE
;G\Fn@܂@ʒuF
	ld l,":a;tatie\ryouma\sumasi.bmp",0
	ld r,":a;tatie\nonomi\warai.bmp",12
;aflFfree0541.mp3@iv[v
	bgm "bgm\free0541.mp3"

	texton

	mov $401,"ulCVLEHv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"@@"
	mov $403,"uZ藁Bv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"@@"
	mov $405,"udTqkCœoCߖkJIv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"@@"
	mov $407,"ucccv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"@@"
	mov $409,"֊cc"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $410,"ӁCTVܓفC꒼skB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $411,"Vuw甉䊴[C"
	mov $412,"zǋϓ_Iltocc"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $413,"RCٓˑRhIʎRC"
	mov $414,"pSsm􍱏YrB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $415,"w蚓ICߍ\E|CIeБz@C"
	mov $416,"pvLꌏ\^tsÁB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $417,"BʁCߍs[IAٖ@ڎIC"
	mov $418,"VAxB"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"ݜϓIgC"
	mov $402,"䐥՗掟ITVI݁C"
	mov $403,"֒甐lIB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"a\݈NICsuցB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"@ʍĜρccCg̕swqρC"
	mov $406,"iX__Iԁcc"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $407,"@@"
	mov $408,"uȁCJCߝQLYrHv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"@@"
	mov $410,"uƓIHߘprρHv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $411,"@@"
	mov $412,"upGBC|ُCkB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $413,"sCߓspQVØEHv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $414,"@@"
	mov $415,"uCݐtVvC[衊B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $416,"ߏACJIv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $417,"@@"
	mov $418,"B֐\IEtB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $419,"ܓC֐\B"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\

	textoff

	bg black,12
	delay 2000

;wiFQ[Z@ʏtF[h
	bg "bg\dai5kou\game.jpg",12
	delay 2000

	texton

	mov $401,"R@C苉Iޘl藁C"
	mov $402,"œVIpA~㋎C"
	mov $403,"Ȉ꘢lߓsSB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"ccJCޏATVމƌIiB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"@@"
	mov $406,"헯IC\ٓޒnݓX֚B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $407,"k~ICaړIʉoB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"pG\EFIڏWnB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"TCߔܖ@AE旹C"
	mov $410,"ݑs吥ꍱʓI߉ڏWݜޗnC"
	mov $411,"l֐nrܒB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $412,"@@"
	mov $413,"ґR訓I㱁CAX玉屁C"
	mov $414,"ȖsreېR]InB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $415,"ߍs孋IlC"
	mov $416,"cLlslC"
	mov $417,"Nlݖ㱍XQi֎~B"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"֔@ClF֐s\B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"TClCs\\IJB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $403,"uupGzےvNB"
	mov $404,"ϓIԁCꎟvVJBvv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"@ʗLʉIr܁Csv㏋^\sB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"@@"
	mov $407,"ccsC䐥cpa擖ᒆk"
	mov $408,"uL_ܕs勎B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"@܁C@ʈǂPOOIpԝ{PIԁC"
	mov $410,"މvߓuB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $411,"ACߎIꖜC"
	mov $412,"AvB"
	mov $423,"ő[IvCݖ唈r\jmB"
	mov %120,411: mov %121,412:mov %122,24:gosub *messagefont
	mov %120,423: mov %121,423:mov %122,24:gosub *messagefont
	$411
	$412@/
	$423/
	add $412,$423/
	@

	mov $413,"@@"
	mov $414,"Cߎs{lgzI戁C"
	mov $415,"s푗uǓIfB"
	mov %130,413
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $416,"ْFyߓIƁC"
	mov $417,"Fp֍hF戁CޕstΘEH"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"ǏIcfasIߍnlcucC"
	mov $402,"ܖeycc"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $403,"\茂cuc-qnlvH"
	mov $404,"މ^DӛB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"@@"
	mov $406,"ߍDUznIF⋁C"
	mov $407,"R蕏ws\֏oB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"ޘ֏ICLωTo~xhxC"
	mov $409,"ܓCޕs֐CLߍh戓IlݍːIEB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $410,"@@"
	mov $411,"ŊJCޔB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $412,"wqFޔБ[IC"
	mov $413,"sAClNDϓIHEB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $414,"sǔ@Cp㑜pώ̓I݁B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $415,"ޘIC\lLYrdcc"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $416,"@@"
	mov $417,"uCٕsNClBv"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\

	textoff

;afl{[[
	mov %60,0
	bgmvol (%3001*%60/100)
;ʉFmCY@[vȂ
	dwave 2,"wave\noise01.wav"
;wiFu򂭂c߂cv@tF[hȂ@Qb\Ĕwi߂
	bg "cutin\dai5kou\13.jpg",1
	delay 2000
	bg "bg\dai5kou\game.jpg",1
;afl{[߂
	mov %60,100
	bgmvol (%3001*%60/100)

	texton

	mov $401,"uccccccv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"@@"
	mov $403,"ulHv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"@@"
	mov $405,"uccrCTVBEBEHv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"@@"
	mov $407,"uCV쑾蓌}Cv@DD藁B"
	mov $408,"i㱁ClIJB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"s񗈗CNIkLӎv藁Bv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $410,"@@"
	mov $411,"cc鈛H"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $412,"ŁCVڒQ߉ƁB"
	mov $413,"݈ˑR掔}藁B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $414,"rIgqCR\˒ϓIlQB"
	mov $415,"^\CމƌB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $416,"zzŁCȑOCn\AُYrs悎C"
	mov $417,"ߔЉ[[ݖI^B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $418,"VsYȒnݐZ݊߉SB"
	mov $419,"^IC^SB"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"ulCߕsߓ_YrEHv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"@@"
	mov $403,"uCRscc߈XĉJBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"@@"
	mov $405,"TVߔАS~IB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"ݓIa\ϓI݁C\㓯HB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $407,"R@CߏAJCsCc㱓sY{B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"@@"
	mov $409,"\E݉pˋIswCPʉpIHIB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $410,"^ƐlCCٖSvLC"
	mov $411,"rsm@pޓI㱁B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $412,"cc֔@CُCB"
	mov $413,"ޒiĖsICzƎȓIB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $414,"@@"
	mov $415,"鍎qEoCp蓊IB"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\

	textoff

	bg black,12
	bgmfadeout 2000
	bgmstop

;

;ʁFSd}iʏj
	mov %42,2
	gosub *sindenzu

;

	wait 2000

;ʉFginami.mp3j@iv[v
	bgm "bgm\nami.mp3"
;wiFC{[ubW@ʏtF[h
	bg "bg\dai5kou\lainbow.jpg",12
	delay 3000

	texton

	mov $401,"֑ۗ_㱍@CaTVCC"
	mov $402,"R@CB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $403,"\ґRLsÁC"
	mov $404,"AasC\Ɨ֗LƐlݓ\B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"s\Ւ\uI㱁B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"@@"
	mov $407,"}CC]`B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"ґR௑[~CAϊ勎pkB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"pLeЊeϓIaSB"
	mov $410,"ܗLnr֔\QX萶B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $411,"C^H竒͗C"
	mov $412,"ICޔЎ|FIB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $413,"xɓDICC"
	mov $414,"AFˑR]|nB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $415,"@@"
	mov $416,"u⿁CٌZCDvsFBv"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"꘢@I⁗B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"F꘢Vl⋍ݓߗB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $403,"gЙaaIߕCxcӎqfgB"
	mov $404,"ґRkZCApIB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"rœsىƉ{IVB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"@@"
	mov $407,"u֊CVFHv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"@@"
	mov $409,"uߓRCI\rSՏA藁Iv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $410,"@@"
	mov $411,"aޘl\ΓIB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $412,"쌹B"
	mov $413,"꘢\ӓIVlB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $414,"vLplCvLC꒼ݜވ咅QB"
	mov $415,"@"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"a݋NItVB"
	mov $402,"瘸Ɨ竏oCsvvB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $403,"䐳ϒ]CCˑR䓋ԁC"
	mov $404,"暒nCFnlB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"Cnu^IVC"
	mov $406,"AVF䐥È椙߉SIsxB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $407,"@@"
	mov $408,"ޘЉrs甐ls[SB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"䐥|CoeЕsxIЎqC"
	mov $410,"R@cFSsݐSB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $411,"LٔTVGꍱC"
	mov $412,"A\ߔЖvSvxIiCk󍪖{ٖ@B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $413,"aNoIVFC"
	mov $414,"ٜޘIؓs@wB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $415,"َЉL[I@C\IԎVmB"
	mov $416,"꒼ԝQϓIGُہB"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"urCLYrzܓIEHv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"@@"
	mov $403,"uCvYrdIc"
	mov $404,"nzޗŊnBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"@@"
	mov $406,"Ď]CB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $407,"ӁCL͑zܓIԁB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"ApsmIꌏDB"
	mov $409,"V|qL_IB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $410,"@@"
	mov $411,"uvCLsAϚvB"
	mov $412,"ޗŏoICkIGB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $413,"rρCqC_EHv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $414,"@@"
	mov $415,"uccsIJHv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $416,"@@"
	mov $417,"uˍˍݓIesyIkB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $418,"nC֙yJHv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $419,"@@"
	mov $420,"嗈I㣑yCәuuyyIB"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"u߉AsqGBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"@@"
	mov $403,"fCfFCŒCNyB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"ܓQ美藢嗈IhC"
	mov $405,"ʗܓs甐lLRC"
	mov $406,"a搶gnkp߁CŏdvICMCB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $407,"@@"
	mov $408,"uCґREccsCωȘEH"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"ސߓyIJccv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $410,"@@"
	mov $411,"uvCsp݈ӁB㣒sIԁC"
	mov $412,"ݜޘꘕsBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $413,"usǐVAʕC֐֓Cv"
	mov $414,"urI幉sLbIBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $415,"@@"
	mov $416,"܊C搶ݚ{΁B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $417,"s咅ϓICpˑR[x́CŕsoӌI瑁B"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"Q羒ʏϖ|幉gdB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"LrhvٓI@ҙ趙؁C"
	mov $403,"@wxޘ`⦓IρC"
	mov $404,"FϑlsHB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"RC{IىƉ{̏֎ZxTC"
	mov $406,"kLlNInsB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $407,"LCFE㣎qoڏVC"
	mov $408,"pލ戗rh趓IVB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"@@"
	mov $410,"ޗI搶vL㍁C"
	mov $411,"ClrÁCOE~IǵC"
	mov $412,"NBӁB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $413,"uuv쓞^RC咅hI"
	mov $414,"ls֛Bvv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $415,"ސ{lܓIB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $416,"sǔ@C֐ݗޗC"
	mov $417,"CܑszCȏoʑIB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $418,"[ֈCCYrCىƉ{C"
	mov $419,"܁FuAϗqBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $420,"ŗ嘢lsLsÒNI̎JB"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"uᴕ֓H^LߔЗ@ǝ{EHv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"@@"
	mov $403,"u^ܐǝ{Cs@ܐȜޔЕFB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"ŋߕ֗XzzC"
	mov $405,"䐥CொYrICѓIB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"țCAZ֔\hI@C퐏֕b{Bv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $407,"@@"
	mov $408,"u^QEccv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"@@"
	mov $410,"usvB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $411,"䑜ߜrIC"
	mov $412,"ֈC៑竓Ɨї藁B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $413,"ChyFIԓs\ÓLoB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $414,"񓞓{@CqfʓsÓIB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $415,"H^IkBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $416,"@@"
	mov $417,"HIccEH"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $418,"ݓI{CTk×LϓỈJB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $419,"usvQEHvC"
	mov $420,"݈꘢H[TIFܜޔВԁCvYrܕ́B"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"ue欑zzCݗ@ALlƕ֗XB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"PƓX@b{꘢IVC"
	mov $403,"䋤ALSOOOVǜPB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"ÉCQ羍msDhIJBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"@@"
	mov $406,"uuߐRkBґRs\ܔ\hCAC"
	mov $407,"꘎Iv{sېB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"xIԁCVq}\~Bvv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"@@"
	mov $410,"sa֗XIH݌Œ㱔P{B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $411,"ʐmACAӖʚǜPB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $412,"ssoIHCsIH"
	mov $413,"䊴uȓFIpB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $414,"@@"
	mov $415,"@C{IQ羛EsvdlsvHB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $416,"svh趈҉vٓI@B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $417,"CߍГIHC"
	mov $418,"sfn񋟒B"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"Ƙaes{老C"
	mov $402,"NE`爎Z^ԋ~C{C"
	mov $403,"RCܐ^헬Q羗pIᐍLPO%EB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"ޖ琥RIBvLN笋Il{svލB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"Љԋ~IwQҁxC܏Iꕔ߁B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"@@"
	mov $407,"lFœQC䐥}ΑFB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"sڐŁAsscC"
	mov $409,"@萘O㱓IQҁB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $410,"AЖqēIlB"
	mov $411,"rLlfCFޘEsݓI幁B"
	mov $412,"ϓIsFB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $413,"@@"
	mov $414,"ACl{ARݒnIЁB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $415,"zYrNAYrNCkГcnCŌCB"
	mov $416,"ϓIC݈꘢O֐RIJB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $417,"I@CЉ˗LӖB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $418,"CጔC퐥YrHCYrKl盀H"
	mov $419,"s߈ӖIlC"
	mov $420,"r\}dl藁H"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"ŁAAxIB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"@ʑzvxCAKRB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $403,"rCsZ]xIlC@H"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"sLls㏝zB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"wZCCЉI王HB"
	mov $406,"ޛslIꐶSB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $407,"@@"
	mov $408,"@CwQҁxވ\v˕oB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"@@"
	mov $410,"\EIىƉ{ҁC"
	mov $411,"󈻓IlAsmIlC"
	mov $412,"ܓx訓IlB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $413,"RC@CuuZsЉvޔЉlR"
	mov $414,"CnXIlzzB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $415,"DCNS֗XIlDC"
	mov $416,"smݜޘЉrB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $417,"vHAڐŔCC"
	mov $418,"FAꗥ_mlIߌLB"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"琥VB"
	mov $423,"瘸ЉoB"
	mov %120,401: mov %121,401:mov %122,24:gosub *messagefont
	mov %120,423: mov %121,423:mov %122,24:gosub *messagefont
	$401@/
	$423/
	add $401,$423/
	@

	mov $402,"wACllߕIlmVHC"
	mov $403,"݉ʑOCA䋑笗ߔАB"
	mov %130,402
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"@@"
	mov $405,"u݁CFBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"@@"
	mov $407,"u玖Hv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"@@"
	mov $409,"ulccCYr藁Hv"
	mov $410,"@"
	mov $411,"@"
	mov $412,"@"
	mov $413,"@"
	mov $414,"@"
	mov $415,"@"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"uCYrcc֗pECv痝RB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"lܓCA{ϚvB"
	mov $403,"RCLVIB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"AݓߔVOCsېYrsIB"
	mov $405,"zICv鈉D߈꓁r{C"
	mov $406,"_^sIeIƌB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $407,"ߊŊŜޒЙaaICB"
	mov $408,"ŒDŁCA௑B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"֔@C֐ݗʟB"
	mov $410,"@@ssC\B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $411,"݁ClsϘEH"
	mov $412,"sǐ݉C֐ݑmIC"
	mov $413,"ތsvLdB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $414,"I݁C{AvLYrRBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $415,"@@"
	mov $416,"ucccv"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"Fl~nᄏqI薷B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"{Cl琥C"
	mov $403,"ٖ֝@^ЉaprC"
	mov $404,"sfBB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"vLЉIԐlsCAC"
	mov $406,"s\ܖvLЉAB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $407,"@@"
	mov $408,"RCޘEpǋapB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"ݜޘƁCޔВǋܐ|IB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $410,"@aጔCIlB"
	mov $411,"ݜϓIsClFՒϓI\藁H"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $412,"@@"
	mov $413,"szρB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $414,"DseՓIRB"
	mov $415,"R@CߏAǋCT^JB"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\

	textoff

	bg black,12
;wiFû͉Łcv@ʏtF[h
	bg "cutin\dai5kou\14.jpg",12
	delay 2000
;wiFu{̎RɓāAwāx񂾁Bv@ʏtF[h
	bg "cutin\dai5kou\15.jpg",12
	delay 2000
	bg black,12
	bgmfadeout 2000
	bgmstop
	delay 3000

;aflFfree0522.mp3
	bgm "bgm\free0522.mp3"
	delay 2000
;ʉFmCY@[vȂ
	dwave 2,"wave\noise01.wav"
;wiFmCY@tF[hȂ@ODTb\ĉʍ
	bg "title\logo\noiz.jpg",1
	delay 500
	bg black,1
	delay 1000
;wiF̖iP@tF[hȂ
	bg "bg\dai5kou\yakei01.jpg",1
	delay 3000
;ʉFmCY@[vȂ
	dwave 2,"wave\noise01.wav"
;wiFmCY@tF[hȂ
	bg "title\logo\noiz.jpg",1
	delay 500
;EFCgODTb
;wiF̖iQ@tF[hȂ
	bg "bg\dai5kou\yakei02.jpg",1
	delay 2000
;ʉFmCY@[vȂ
	dwave 2,"wave\noise01.wav"
	bg "title\logo\noiz.jpg",1
	delay 500
;wiFmCY@tF[hȂ
;wiF̖iR@tF[hȂ
	bg "bg\dai5kou\yakei03.jpg",1
;ʉFG@[vȂ
	dwave 2,"wave\machi.wav"
	delay 3000
	bg black,16
;ʉ~
	dwavestop 2
	delay 2000
;wiulāÂ߂ɐĂ̂ȁHv@ʏtF[h
	bg "cutin\dai5kou\16.jpg",12
	delay 4000
;afl~
	bgmfadeout 1
	bgmstop
;ʉFs|[iC^[zj@[vȂ
	dwave 2,"wave\chime00.wav"
	bg black,1
	delay 3000

;wiFn̕@ʏtF[h
	bg "bg\dai5kou\heya.jpg",12
	delay 3000

	texton

	mov $401,"ccEH"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"tsu^ޒԐ^_vցB"
	mov $403,"^zđXB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"|gCdVfDq᳏B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@


;ʉFs|[iC^[zj@[vȂ
	dwave 2,"wave\chime00.wav"

	mov $405,"@@"
	mov $406,"AݜCjkdNB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $407,"ccYrC吴IB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"iHNH֐H"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"ݗL̗C֎v௛惛B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@


;ʉFs|[iC^[zj@[vȂ
	dwave 2,"wave\chime00.wav"

	mov $410,"@@"
	mov $411,"ꉔ^低B"
	mov $412,"ݜޔЌI[㱗CLYr񓾗QsB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $413,"܁Cݓ{_cc"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $414,"ccccccccB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $415,"ccccccccccccB"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\

;ʉFKob@[vȂ
	dwave 2,"wave\ClothC.wav"
	QUAKE 10,200



	mov $401,"uC唈Iv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"@@"
	mov $403,"ҒcIᖚ艓IC"
	mov $404,"œ䕽XÓI要CꉺqNB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"ґR֕s捒CAӎvSx㱗B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@


;ʉFKob@[vȂ
	dwave 2,"wave\ClothC.wav"
	QUAKE 10,200

	mov $406,"@@"
	mov $407,"ulNIvGIv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"@@"
	mov $409,"jߔ⁗TVIB"
	mov $410,"꒼jICmA\JB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $411,"@@"
	mov $412,"uC肏㗈Iv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $413,"@@"
	mov $414,"C΋}nCnPߕB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $415,"gh^RIC"
	mov $416,"pݒZZVVSՕȗB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $417,"ٖ@dꐬC꘢tғIȁC^甐l߁B"
	mov $418,"BʁC֐wIgᚑZC"
	mov $419,"֕ssڎ󗹜ވ_B"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\

	textoff

	bg black,12
	delay 2000
;ʉFvidԂ̔ԑOj@[vȂ
	dwave 2,"wave\nori_ge_den_hassya01.wav"

	texton

	mov $401,"u݉͗vCI_Iv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"@@"
	mov $403,"uCCށClIv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"@@"
	mov $405,"竉⋑IOCTVzB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"ccccccB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $407,"C^ICIB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"sܓCޔЏv琥䎩ȑIB"
	mov $409,"@"
	mov $410,"@"
	mov $411,"@"
	mov $412,"@"
	mov $413,"@"
	mov $414,"@"
	mov $415,"@"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\

	textoff

;ʉFdԁ@[vȂ
	bgmonce "bgm\se-044.mp3"
;wiFdԁ@Vb^[tF[h
	bg "bg\dai5kou\densya.jpg",26
	delay 3000
;wiFdԁiuj@tF[hȂ
	bg "bg\dai5kou\densya_bure.jpg",1
;G\FTV@@ʒuFE
;G\Fn@ʏ@ʒuF
	ld l,":a;tatie\ryouma\majime.bmp",0
	ld r,":a;tatie\nonomi\guttari.bmp",12
;aflFfree0257.mp3@iv[v
	bgm "bgm\free0257.mp3"
	texton

	mov $401,"A݉Fb瓥͓ICjg㗹B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"@@"
	mov $403,"u_AsyBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"@@"
	mov $405,"uZz㗹藁B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"\zވǓIԁCAc\c"
	mov $423,"I]v"
	mov %120,406: mov %121,406:mov %122,24:gosub *messagefont
	mov %120,423: mov %121,423:mov %122,24:gosub *messagefont
	$406/
	QUAKE 10,200
	$423/
	add $406,$423/
	@

	mov $407,"@@"
	mov $408,"RBIˁCTVIIB"
	mov %130,407
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"ݏsiFxIuʋ΍B"
	mov $410,"ޏHsOCB˓㣔ρB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $411,"ccsܐ^ICމƌ^B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $412,"ґREsȑOψNUC"
	mov $413,"AjCœIvŁC"
	mov $414,"\eʙ{svLCʁB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $415,"މƌ֔嗈pވ_C"
	mov $416,"pX[SИa衉e@VInB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $417,"dSj㣎qjחJB"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"u܉񗈁Cl^B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"ŋߐszz˗H"
	mov $403,"lsE`v"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"@@"
	mov $405,"ugqCsꉺqArB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"ĉBE"
	mov $407,"ːRIJBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"@@"
	mov $409,"urˁCCYr֗vB藁Hv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $410,"@@"
	mov $411,"usAߑF]ϓIEHv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $412,"@@"
	mov $413,"u`Hv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $414,"@@"
	mov $415,"AD͓dkNB"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"w迍ViqjŕC"
	mov $402,"튴迓IgpB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $403,"R͓qWC"
	mov $404,"⋍ݓrIqsʉB[rÁB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"灊OCiBCIpBC"
	mov $406,"苒jqƎgp\\x"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $407,"@@"
	mov $408,"ߊJCAܐJB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"@@"
	mov $410,"u͘⋑Iވꔈ߈ꔈC"
	mov $411,"E蕓s\đEB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $412,"@ʗvCuIpInIԁC"
	mov $413,"ߏA\EBB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $414,"BClːRICsEHv"
	mov $415,"@"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\

	textoff

;G\FTV@s@ʒuFE
	ld r,":a;tatie\nonomi\okori.bmp",12
	texton

	mov $401,"uACÓCIpBˁcc"
	mov $402,"BːϘEHv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $403,"@@"
	mov $404,"TVIosxIRB_B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"@CމƌxhB"
	mov $406,"ޔАlYrsve欑zcc"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $407,"vuLIԍXJvC"
	mov $408,"ASՒnڎ󗹁B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"@@"
	mov $410,"uߒCTVB"
	mov $411,"IpBIp߁C"
	mov $412,"sLsKlߗB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $413,"ݜρCߘBC"
	mov $414,"琥BIB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $415,"CܓꏗIpBʍݍőOʁC"
	mov $416,"ӗpNsցB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $417,"CnAŎZߗC"
	mov $418,"ۍ򍪖{vlpBȍˉГIBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $419,"qʐϓICvLEB󒅁C"
	mov $420,"ߑBmAX˗JBv"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"uuߏAsvݍőOʁC"
	mov $402,"cIpBݒ㱕sAsEHvv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $403,"@@"
	mov $404,"uϓIԁCjlAv@嗹B"
	mov $405,"LIkWB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"ߑzzŁC"
	mov $407,"͓I㱕CA⋑I㱁B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"⋑䒆㱗LYrHOJB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"˓ϋ}z͓IC"
	mov $410,"@ʘOIBIpBC"
	mov $411,"jl\qIB͗B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $412,"ψꗈC߈ЋsAt˗EIv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $413,"@@"
	mov $414,"uAccށccv"
	mov $423,"ueՁBv"
	mov %120,413: mov %121,414:mov %122,24:gosub *messagefont
	mov %120,423: mov %121,423:mov %122,24:gosub *messagefont
	br
	$414@/
	QUAKE 10,200
	$423/
	add $414,$423/
	@

	mov $415,"֓IsIpBC"
	mov $416,"甐lssCޔЗ@IjlJH"
	mov %130,415
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $417,"lCvs羁C"
	mov $418,"ˉ܏oߔВԓIJBv"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"u琥B@ʉ䐥C"
	mov $402,"꘢s\ΓImSf̛ҁC"
	mov $403,"vLlcgߐgQC"
	mov $404,"\CYrLIpBJB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"AC@C甑LjlsuC"
	mov $406,"ÓsLVEH"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $407,"ws羙l߁xAkDIqB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"ύ͓IC"
	mov $409,"ˑRIlwTs羁CArߗB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $410,"@r^ȖvCsvlÈә߁C"
	mov $411,"ō@ƐlUCHǗCىƉ{B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $412,"g~꜔OŊioȝٍ߁C"
	mov $413,"ĖsIB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $414,"蜓ޔЕsKIlC"
	mov $415,"^ICs羓I֘EH"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $416,"ÓoޔЎЉFIlC"
	mov $417,"A_ጔCsvLEHv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $418,"@@"
	mov $419,"u߁Aߘccv"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"uܗClLC"
	mov $402,"㞖RaIw^lxJB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $403,"Bs˓vC"
	mov $404,"p݋ГIIpBhHC"
	mov $405,"֑n衒ԁB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"X啪IrC"
	mov $407,"ss羙lߗӍ戟sC"
	mov $408,"~CD蜊QjlScc"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"|IbCAlIHB"
	mov $410,"ޖSss羓I֘EHv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $411,"@@"
	mov $412,"ue````ccv"
	mov $413,"@"
	mov $414,"@"
	mov $415,"@"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"uߑFݘIC"
	mov $402,"AczIÎSIwρB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $403,"ЉUdoICbC"
	mov $404,"֕֗h_@nB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"ډrCߓDDzzB"
	mov $406,"dClbC甏YrsszI}ӖY`IB"
	mov $407,"lbsݘޔЖړIIB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"Aψ菊LsjlIցC"
	mov $409,"蕖{ȘIC"
	mov $410,"shdlJH"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $411,"@ʐ^zǋCAdvxIbB"
	mov $412,"R@CDDȎȁB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $413,"@ʘsCߏAl~INnBv"
	mov $414,"@"
	mov $415,"@"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\

	textoff

;G\FTV@f@ʒuFE
	ld r,":a;tatie\nonomi\konwaku.bmp",12
	texton

	mov $401,"ueclcv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"@@"
	mov $403,"ܓޗC"
	mov $404,"䒍ӓTVsLoB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"CA~sC"
	mov $406,"㔈EH"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $407,"{܁FudzpL֍gB"
	mov $408,"ACߑFdlCˉρBv"
	mov $409,"A䗹TVIiC"
	mov $410,"C䗹TVIiC๘B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $411,"p茓I\CޔpsB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $412,"]UA啪CޛEs@B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $413,"@@"
	mov $414,"uٕsNccܓ嗹Bv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $415,"@@"
	mov $416,"uClܓvցB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $417,"Ɓccvꉺˍs藁Bv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $418,"@@"
	mov $419,"TVrܒC\B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $420,"䐥㜺CCmވ_Cȕsc\N笋B"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\

	textoff

;ʉF@[vȂ
	dwave 2,"wave\hakusyu2.wav"
;G\FTV@@ʒuFE
;G\Fn@@ʒuF
	ld l,":a;tatie\ryouma\odoroki.bmp",0
	ld r,":a;tatie\nonomi\odoroki.bmp",12
	texton

	mov $401,"AݜCČIˑRkNB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"ŁCIqsݒFB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $403,"cc"
	mov $423,"ccB"
	mov %120,403: mov %121,403:mov %122,24:gosub *messagefont
	mov %120,423: mov %121,423:mov %122,24:gosub *messagefont
	$403@/
	$423/
	add $403,$423/
	@

	mov $404,"݉˓I͗Cr吺佁C"
	mov $405,"허܍mSsߓꐴ^JB"
	mov %130,404
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"ޑ@iܓIԁC݉ρB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $407,"@@"
	mov $408,"uuDϓICqIvv"
	mov $409,"uuNSlܓDI^_Ivv"
	mov $410,"uulIvv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $411,"@@"
	mov $412,"{ǑIf]]NB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $413,"低C✒`B"
	mov $414,"֕sCߑFލls㌁C"
	mov $415,"ˉ甉F܏oޔВԗB"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"uuAAlCމraIHvv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@


;ʉFs|p|[@[vȂ
	dwave 2,"wave\call_up.wav"

	mov $402,"@@"
	mov $403,"ww⋐s⋁Cs⋓Bo݉Eexx"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"@@"
	mov $405,"uDBTVCFJBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"@@"
	mov $407,"uuAIvv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"@@"
	mov $409,"ݓߍRFIq"
	mov $410,"fTVCjB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $411,"@@"
	mov $412,"uGBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	QUAKE 10,200
	gosub *textwright
	@

	mov $413,"@@"
	mov $414,"AݓrCIg̓dlB"
	mov $415,"@"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\

	textoff

	bgmfadeout 2000
	bgmstop
;GFTV@
	cl r,12
	delay 1000

;ʉFdԁ@[vȂ
	dwave 2,"wave\train.wav"
;G\F搶@ʏ@ʒuFE@tF[h
	ld r,":a;tatie\sensei\tuujyou1.bmp",16
	delay 2000

	texton

	mov $401,"uCٕsNBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"@@"
	mov $403,"uvvCd݈ӁB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"˙ߗiks֓I藁Bv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"@@"
	mov $406,"ቺv]CٕIjlȗeIÍ闹B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $407,"@@"
	mov $408,"uߐ^漗ccv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"@@"
	mov $410,"A|sNIjlB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $411,"AՒ㓾kIXqaF蓅Cޓ_|𒳊IB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $412,"^qsInCALލB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $413,"@@"
	mov $414,"scc"
	mov $415,"@"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\

	textoff

;GF搶@
	cl r,12
;G\FTV@@ʒuFE
	ld r,":a;tatie\nonomi\odoroki.bmp",12
	texton

	mov $401,"ulCjvCGIv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"@@"
	mov $403,"uAccv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"@@"
	mov $405,"TVIԍÑCCߘʒuB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"˓ߘjlI됥r񎖁cc"
	mov $423,"IFEH"
	mov %120,406: mov %121,406:mov %122,24:gosub *messagefont
	mov %120,423: mov %121,423:mov %122,24:gosub *messagefont
	$406@/
	$423/
	add $406,$423/
	@

	mov $407,"@@"
	mov $408,"|CDLYr@ZB"
	mov %130,407
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"ґRUCZ͓IlQC"
	mov $410,"AߒjlCuL_sԏB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $411,"ґR_svLCA{\ArGIB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $412,"@@"
	mov $413,"ޔЊuccꐥr񎖁B"
	mov $414,"@"
	mov $415,"@"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\

	textoff

	bg black,16
	bgmfadeout 2000
	bgmstop

;

;ʁFSd}i⍂j
	mov %42,3
	gosub *sindenzu

	wait 2000

;

;ʉFwZ̃`C@iv[v
	dwave 2,"wave\chaim.wav"
;wiFwZOρ@ʏtF[h
	bg "bg\dai5kou\gakkou_gaikan.jpg",12
	delay 3000

;wiF
	bg "bg\dai5kou\gakkou_ura.jpg",12
	delay 3000
;aflFfree0210.mp3@iv[v
	bgm "bgm\free0210.mp3"

	texton

	mov $401,"ߓVIߋx㱁B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"Cu͏sIC㏒ޔЈӛ"
	mov $403,"CTVCvLғIVC"
	mov $404,"Zq@ʁB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"ޗVawVOIpB"
	mov $406,"CIsǕqIڏWnB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $407,"vŎZYrdIC"
	mov $408,"zݜޗ㱓ܟECCncc"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"^sICޗELlB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $410,"@@"
	mov $411,"uYrCفBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $412,"@@"
	mov $413,"sCpfoC"
	mov $414,"u{B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $415,"֗L灊OqlCnacB"
	mov $416,"OlLݒnC݋趍@I|B"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"ލƌCNt擯ǓIwB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"sCܐwC|s@܉"
	mov $403,"ȏ̓㐥gnx茓IٗʁB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"ґRvLٍRCA꒼ێ餁C"
	mov $405,"ލCٕC|嗹NB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"@@"
	mov $407,"֔\ߓꍱgu{FV̓IYB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"vC|s݈ӜލkB"
	mov $409,"@ϒ|DC"
	mov $410,"֐݊XdlnC"
	mov $411,"vsInCߏA֑FJB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $412,"YrpYIC"
	mov $413,"AE勎B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $414,"@@"
	mov $415,"sccɖ̖̓Iώq^甐lsuB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $416,"ލƌCݑlʑOꕛIώqB"
	mov $417,"ܐa֕sցC֍ݏ㏡wJ蚔ǁB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $418,"UvlVCA`ژIC"
	mov $419,"|s๘nB"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"嗈ŁC䐥茒_IwB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"ݔZ孓IZZC֓IC{C"
	mov $403,"vusuCAZٕlۉ΁B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"VFىkuC"
	mov $405,"s\CV貐LIB玁C"
	mov $406,"Ȉ꒼vL󓞏YrdIrB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $407,"@@"
	mov $408,"uߑFQFLYrHv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"@@"
	mov $410,"usCH厧߁BoBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $411,"@@"
	mov $412,"ŕs[IuCލލJB"
	mov $413,"zxCːB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $414,"A݉rzyݔgCICu{ZB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $415,"@@"
	mov $416,"u݁CdIv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $417,"@@"
	mov $418,"ܕsvc|IGdlEH"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $419,"vsz܁CAdUUIB"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"揁cc"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"ގOlCDݐsS͈yρC"
	mov $403,"AFvsڍ݈NCYrssCޓ_AFB"
	mov $404,"㓾ڗRB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"ٔ䎩|IlsvLERC"
	mov $406,"p֑z痍ŒxI|dB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $407,"^ߓIm}B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"@@"
	mov $409,"uHAޔВxIHv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $410,"@@"
	mov $411,"䗯ދԍ@CgCB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $412,"ꉔ^ICFSB"
	mov $413,"{zOʎUUSCۓ_㱁C"
	mov $414,"BʔMSXB"
	mov $415,"@"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\

	textoff

;ʉFwZ̃`C@[vȂ
	dwave 2,"wave\chaim.wav"
	bg black,16
	bgmfadeout 2000
	bgmstop
	delay 3000

;wiFtWerO@ʏtF[h
	bg "bg\dai5kou\fuji.jpg",12
	delay 2000
;wiFtWerOiuj@tF[hȂ
	bg "bg\dai5kou\fuji_bure.jpg",1
;G\FTV@Ί@ʒuFE
;G\Fn@ʏ@ʒuF
	ld l,":a;tatie\ryouma\tuujyou.bmp",0
	ld r,":a;tatie\nonomi\warai.bmp",12
;aflFfree0541.mp3@iv[v
	bgm "bgm\free0541.mp3"
	texton

	mov $401,"ulCV"
	mov $402,"@@"
	mov $403,"uLEHvv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"@@"
	mov $405,"TVI֖v܊CA񓚗B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"w@C"
	mov $407,"\r嗈B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"@@"
	mov $409,"uu^IHߔ䋎y@JHvv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $410,"@@"
	mov $411,"uuBvv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $412,"@@"
	mov $413,"CUUSCZCVI]C"
	mov $414,"rchTVB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $415,"ݑzɉn߈CcsIsY{B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $416,"BґRuL_WCA֐cc"
	mov $417,"䐥\ԋԁB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $418,"^[CeЈӖI[cc"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\

	textoff

	bg black,12
	delay 1000
;ʉFdԁ@[vȂ
	dwave 2,"wave\train.wav"

;wiFdԁ@ʏtF[h
	bg "bg\dai5kou\densya.jpg",12
	delay 2000
	bg black,12
	delay 2000
	dwavestop 2
;wiFHt@ʏtF[h
	bg "bg\dai5kou\akihabara.jpg",12
	delay 3000
;wiFHtiuj@tF[hȂ
	bg "bg\dai5kou\akihabara_bure.jpg",1
;G\FTV@Ί@ʒuFE
;G\Fn@܂@ʒuF
	ld l,":a;tatie\ryouma\sumasi.bmp",0
	ld r,":a;tatie\nonomi\warai.bmp",12
	texton

	mov $401,"uݏ݁ccܓIy@CޗHv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"@@"
	mov $403,"uCLޑzWꉺBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"@@"
	mov $405,"Ӎ嗈C"
	mov $406,"ֈCՉ䋎IX藁CBʉ"
	mov $407,"{ŗLI衊XB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"sفC٘^q܁Cމ\EJB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"ccWސYrӎvH"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $410,"ݜޏX\WIށcc"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $411,"@@"
	mov $412,"C܋NC"
	mov $413,"\DL悎D斟藁B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $414,"{\IiC"
	mov $415,"ss܁C@Z֐̎hvskЊQB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $416,"ґRv\T曍IώqC"
	mov $417,"\݊wZIV×C݌I@B"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"ى䗈܁C\ϋ󖟉apC"
	mov $402,"^甐lߕB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $403,"U~w蚁CAYrsvLB"
	mov $404,"VَЉۘSB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"笕s\ϓIlB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"@ʉL꘢\SgSI悎DC"
	mov $407,"lXLJB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"@@"
	mov $409,"uCߊŁCLGIv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $410,"@@"
	mov $411,"ŒTVߝٞIcC䊴ߕaHB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $412,"\ڗLIߍCpϓsvLB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $413,"@@"
	mov $414,"ꎟێSn΁C퐥Yrcc"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $415,"ٗcccc"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\

	textoff

;afl{[[
	mov %60,0
	bgmvol (%3001*%60/100)
;ʉFmCY@[vȂ
	dwave 2,"wave\noise01.wav"
;wiFu肪Ƃv@tF[hȂ
	bg "cutin\dai5kou\17.jpg",1
	delay 3000

;zu@wiFHtiuj
	bg "bg\dai5kou\akihabara_bure.jpg",0
;zu@GFn@ʏ@ʒuF
	ld l,":a;tatie\ryouma\tuujyou.bmp",0
;zû\
	print 12
;afl{[߂
	mov %60,100
	bgmvol (%3001*%60/100)
	delay 1000

	texton

	mov $401,"ucccTVHv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"@@"
	mov $403,"_CsIlEsFB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"߉ƌCcc"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"@@"
	mov $406,"ޔCōDdSwÁB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $407,"@ʈCSSQ\C"
	mov $408,"^UB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"CݕS}XrQTVC"
	mov $410,"Bʔ|dWC掗ΒԁB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $411,"߈ȍ@CvaTVUCAsė×B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $412,"\䐥S~nrC"
	mov $413,"Axx@C񓞌nB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $414,"@@"
	mov $415,"zލ藁ccJC\񗈗B"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\

	textoff

;G\FTV@ʏ@ʒuFE
	ld r,":a;tatie\nonomi\tuujyou.bmp",12

	texton

	mov $401,"usDӎvCsDӎvk`v"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"@@"
	mov $403,"u^ICIXHv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"@@"
	mov $405,"uh{IwqSBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"@@"
	mov $407,"uHv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"@@"
	mov $409,"䓊ȋ^fIڌCTVwuvܓB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $410,"ߐ⋑OIpC"
	mov $411,"ݎʒwEPxVϓI`C"
	mov $412,"L{l\o⋍ݓߗB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $413,"YrvCߏAݜrߓInB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $414,"@@"
	mov $415,"uݓߗoBsܓsPvBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $416,"@@"
	mov $417,"uVoCߍVAOVC"
	mov $418,"֗LđOVCߓsYrH"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $419,"@ʕsV筎IԁCޘgAvӖBv"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"u߉AVsPDBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"@@"
	mov $403,"u掛ߜމƌI"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"s܉񗈁CwIxccJB"
	mov $405,"ߐ^IuȘDEHv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"@@"
	mov $407,"uRuIv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"@@"
	mov $409,"揁Cމƌ^忓R唈B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $410,"{z\ꍱCA"
	mov $411,"V藁B"
	mov $412,"ގ䓾ӑ[B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $413,"@@"
	mov $414,"u߉䊖߁CTVB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $415,"@ߖʑOLA蕈ߕsvIwqC"
	mov $416,"߉chEHv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $417,"@@"
	mov $418,"uCىhB֗pܘEHv"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"ߍDCĊ߈ꎟB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"@ʍݓߘ{MIwqC⋒꘢xwC"
	mov $403,"rœskL戓If"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"܁u@ߔchCAΜޘwqBv"
	mov $405,"R@\oC߉hEH"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"@@"
	mov $407,"uccޘvCL_sÈӁB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"rœs^JB"
	mov $409,"uchC\ȉԝ{Bv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $410,"@@"
	mov $411,"֐c戓ߘo"
	mov $412,"\ߔc戓GB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $413,"ߍWIopݗYrnC"
	mov $414,"ݕsmBʓIvC"
	mov $415,"ACvœߘfIgeC"
	mov $416,"ASՒnMJBv"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\

	textoff

;G\FTV@@ʒuFE
	ld r,":a;tatie\nonomi\odoroki.bmp",12
	texton

	mov $401,"u`AAAAccv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"@@"
	mov $403,"ur\LޔЎB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"Ĝr܁CsLlwrlIPӁB"
	mov $405,"ߖ琥rzIJH"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"ACߔdꕅٓIlCrsLB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $407,"@ꛛaIs{×poC"
	mov $408,"ҐƓIbc戉ԝ{cc"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"rL\oÏAKǁC꘢IV"
	mov $410,"R@KƓI戁Bv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $411,"@@"
	mov $412,"uccc"
	mov $423,"ccccccv"
	mov %120,411: mov %121,412:mov %122,24:gosub *messagefont
	mov %120,423: mov %121,423:mov %122,24:gosub *messagefont
	br
	$412@/
	$423/
	add $412,$423/
	@

	mov $413,"@@"
	mov $414,"\󓞗ňCTVZB"
	mov %130,413
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $415,"CŗcԈꉺB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $416,"@@"
	mov $417,"uvCu㏋^֐LKvIcc"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\

	textoff

	QUAKE 20,200
;ʉF_bV@[vȂ
	dwave 2,"wave\RunC11.wav"
;G\FTV@
	cl r,12

	texton

	mov $401,"uvc戗v񗈉Iv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"@@"
	mov $403,"cc揁C֖v܊A竝{B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"^SIƌC߉ƌcc"
	mov $405,"I戜r\ĝ\񗈁B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"SCٓޒn𔈁B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $407,"@@"
	mov $408,"AݜCˑR꘢leB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"w@}Ċ睗B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $410,"@@"
	mov $411,"ccٕs֓IB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $412,"ߐ[[݉|CIgecc"
	mov $413,"@"
	mov $414,"@"
	mov $415,"@"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\

	textoff

	bgmfadeout 2000
	bgmstop
;zu@GFn@@ʒuF
	ld l,":a;tatie\ryouma\keno.bmp",12
	delay 2000
;ʉFS`ʁisinri.mp3j@iv[v
	bgm "bgm\sinri.mp3"
;zu@GF搶@ʏ@ʒuFE
	ld r,":a;tatie\sensei\tuujyou1.bmp",12
	delay 2000

	texton

	mov $401,"uu⿁CFʗBvv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"@@"
	mov $403,"XIoI{pC{nCꖕΈӁB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"@@"
	mov $405,"uŗމsRIdccv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"@@"
	mov $407,"xՉCSg~~B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"VC͏IA@uݏ헹C"
	mov $409,"ݑAϏo݉ʑOC"
	mov $410,"ޔЊuMB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $411,"ޘjlcckaB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $412,"@@"
	mov $413,"uCsprx鐚vB"
	mov $414,"YrssGBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $415,"@@"
	mov $416,"u߁ccꐥYrlH"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $417,"CYrvHFHv"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"㉺SIC䘸A诐[rˏoB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"ސiCZFxQB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $403,"AٕtsǏNV㱓IlpIߓ_͟C"
	mov $404,"ݖٜޘHsIƌ"
	mov $405,"^I\hpEcc"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"@@"
	mov $407,"u䐥꘢ʓIҚGB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"wVxAȗBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"@@"
	mov $410,"ҁHrœssB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $411,"ޘjlgUۏoIC"
	mov $412,"aʐlSsB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $413,"ȑOFo䕃pߗIЉ"
	mov $414,"\Qcc"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $415,"A݊󓞓ICНBRsIB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $416,"smݜYrB"
	mov $423,"C@ˍXB"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	mov %120,416: mov %121,420:mov %122,24:gosub *messagefont
	mov %120,423: mov %121,423:mov %122,24:gosub *messagefont
	$416@/
	$423/
	add $416,$423/
	\


	mov $401,"uCҍߐgC"
	mov $402,"u\ߓLI̎藁B"
	mov %130,401
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $403,"C^s֛B˓IԖkLӎvBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"@@"
	mov $405,"˓IԁccsߓEH"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"ccꐥCYrH"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $407,"@@"
	mov $408,"sCaVIԑCLnGB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"߉wl]s羓IqC"
	mov $410,"CňImśC"
	mov $411,"m烓IQҁCrܓIB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $412,"ϒnCޘE瑶"
	mov $413,"^IPӗm~̌Q̓IoÁC"
	mov $414,"Ó蕜ϓIÖvோ^EHv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $415,"@@"
	mov $416,"ucccv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $417,"@@"
	mov $418,"oCACnᔻI@B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $419,"ސlꐥYrcc"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"uvցBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"@@"
	mov $403,"䒼ܗoB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"Rߜr܁C߉vpg񈯁I"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"@@"
	mov $406,"uYrs㏋^CؓsρB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $407,"C~eofޘASՑMC"
	mov $408,"ːVJB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"@ʗLߔЈClோ^ٖ@`Io"
	mov $410,"@ʗLߔНٖ@`戓IoÁC"
	mov $411,"ߏACvLC󓾐MCoẃB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $412,"As羙lߓIvC琥ϓIJB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $413,"ߍsẃCzdlIƌC"
	mov $414,"ӐVI孍C"
	mov $415,"__n甜ޘEXB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $416,"v㏋^Cvw͕桍DȁC"
	mov $417,"L݊Sd{ICˋÎЉBv"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"䑜pΗIʖhʁCcgeoB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"ґRI\XqՏZC"
	mov $403,"AߓIԍ@CIc×ꉺB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"ŗtB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"磗磔C]ÍÚB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"@@"
	mov $407,"uܗCa͏IqsC"
	mov $408,"oIwPsxB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"gKCQ^oC"
	mov $410,"lF\َЉI㙌B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $411,"ޔЊÖ{gALDI`ہC"
	mov $412,"o_ʊvIl󓞑hB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $413,"ϓIPs`KvIC@ݏYrB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $414,"֑w@UmӁC"
	mov $415,"vKvICAisB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $416,"c㏋^ꉺAdĎȎȘccBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $417,"@@"
	mov $418,"ސǐV@I㈒JB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $419,"@ʐTVIԁCCnwNJB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $420,"rC߉r藁H"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"u鴁cc"
	mov $423,"cc"
	mov %120,401: mov %121,401:mov %122,24:gosub *messagefont
	mov %120,423: mov %121,423:mov %122,24:gosub *messagefont
	$401@/
	$423
	add $401,$423/

	mov $402,"vzRLlى@PǁB"
	mov %130,402
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $403,"@Cώqo爊Il藁B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"VŘēIC"
	mov $405,"ĖJB"
	mov $406,"sݜޗCQXÓInB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $407,"ŗޗ֗L掓IƖ藁Bv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"@@"
	mov $409,"wVxŌIC"
	mov $410,"TVaoIl꜕sxB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $411,"߉ƌ݊YrC^✒`cc"
	mov $412,"@"
	mov $413,"@"
	mov $414,"@"
	mov $415,"@"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\

	textoff

;ʉFtF[hAEg
	bgmfadeout 2000
	bgmstop
;GFSď
	cl r,12
	cl l,12
;wiFHt@tF[hȂ
	bg "bg\dai5kou\akihabara.jpg",1
	texton

	mov $401,"R@CcC"
	mov $402,"ߘIjlE|ϏB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $403,"F糎lCprQsIgeB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"@@"
	mov $405,"uccV^CLlOBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"@@"
	mov $407,"ⲁC߉ƌ@EH"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"{֊ґr藁C"
	mov $409,"BʏArَnBB"
	mov $410,"@"
	mov $411,"@"
	mov $412,"@"
	mov $413,"@"
	mov $414,"@"
	mov $415,"@"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"sCܗC"
	mov $402,"SٖmI؜EB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $403,"C܏ozܓIԁC"
	mov $404,"SIȎcUꍱB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"Aa搶֊V@Iuρcc"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"@@"
	mov $407,"ccccccB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"鴁CuĖցvccJB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"DC旈JBssB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $410,"@@"
	mov $411,"㏒xoIluC"
	mov $412,"䒩TVۓIÓ勎B"
	mov $413,"@"
	mov $414,"@"
	mov $415,"@"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\

	textoff

	bg black,16
	delay 3000

;aflFfree0522.mp3
	bgm "bgm\free0522.mp3"
	delay 3000

;ʉFmCY@[vȂ
	dwave 2,"wave\noise01.wav"
;wiFmCY@tF[hȂ@ODTb\ĉʍ
	bg "title\logo\noiz.jpg",1
	delay 500
	bg black,1
	delay 1000
;wiF̖iR@tF[hȂ
	bg "bg\dai5kou\yakei04.jpg",1
	delay 3000
;ʉFmCY@[vȂ
	dwave 2,"wave\noise01.wav"
;wiFmCY@tF[hȂ
	bg "title\logo\noiz.jpg",1
	delay 500
;wiF̖iS@tF[hȂ
	bg "bg\dai5kou\yakei05.jpg",1
	delay 2000
;ʉFmCY@[vȂ
	dwave 2,"wave\noise01.wav"
;wiFmCY@tF[hȂ
	bg "title\logo\noiz.jpg",1
	delay 500
;wiF̖iT@tF[hȂ
	bg "bg\dai5kou\yakei06.jpg",1
;ʉFG@[vȂ
	dwave 2,"wave\machi.wav"
	delay 3000
	bg black,16
;ʉ~
	dwavestop 2
	delay 2000
;wiu򂭂cvHv@ʏtF[h
	bg "cutin\dai5kou\18.jpg",12
	delay 2000
;ʍ@tF[h
	bg black,0
	print 99,3000,"cascade.dll/dx"
;wiFzE֌@tF[h
	bg "bg\dai5kou\kaisou_mizu.jpg",0
	print 99,3000,"cascade.dll/dx"

	delay 3000

	texton

	mov $401,"uٌNccvJHv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"@@"
	mov $403,"uCCj_B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"܉񗈁Cn{rρHv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"@@"
	mov $406,"uvB"
	mov $407,"ݔŔVOCٌNAzBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"@@"
	mov $409,"uEccv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $410,"@@"
	mov $411,"ucccv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $412,"@@"
	mov $413,"ucccv"
	mov $414,"@"
	mov $415,"@"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"ucc݁CCYrߗv桉藁H"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"SقPCޖ瑾JBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $403,"@@"
	mov $404,"umޜkB"
	mov $423,"Accs\vFB"
	mov %120,403: mov %121,404:mov %122,24:gosub *messagefont
	mov %120,423: mov %121,423:mov %122,24:gosub *messagefont
	br
	$404@/
	$423/
	add $404,$423/
	@

	mov $405,"mn{kC"
	mov $406,"ߍƌ֗vQlUB"
	mov %130,405
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $407,"v\eEޔЎInsBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"@@"
	mov $409,"ucccv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $410,"@@"
	mov $411,"uccߐIFB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $412,"C桕FCňqˁC"
	mov $413,"{sZYrBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $414,"@@"
	mov $415,"ucccv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $416,"@@"
	mov $417,"udIoߔЕ\B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $418,"݁CœJH@k|IGBv"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\

	textoff

	bgmfadeout 1
	bgmstop
;ʉFs|[iC^[zj@[vȂ
	dwave 2,"wave\chime00.wav"
	delay 3000

;wiFn̕@ʏtF[h
	bg "bg\dai5kou\heya.jpg",12
	delay 3000

	texton

	mov $401,"ecc"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"YrCjEH"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $403,"L\艁CVw覊ŗŁB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"߂PO_QOB"
	mov $405,"sECBI󗹁B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"@@"
	mov $407,"ccccccB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"sCs}B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"VwZI曗OB"
	mov $410,"SZwxIVB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@


;ʉFs|[iC^[zj@[vȂ
	dwave 2,"wave\chime00.wav"
	mov $411,"@@"
	mov $412,"֔@Cjꐥr񎖁H"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $413,"鈍曗OޓV̉H"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $414,"䘸ঋNCWWIIngB"
	mov $415,"@"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\

	texton

;ʉFK`
	dwave 2,"wave\dooropen04.wav"
;wiFAp[gO@EփtF[h
	bg "bg\dai5kou\apart.jpg",91
	delay 2000

	texton

	mov $401,"uCʑR֍ݐB"
	mov $402,"ssGCґRCs\ޘcc"
	mov $403,"@"
	mov $404,"@"
	mov $405,"@"
	mov $406,"@"
	mov $407,"@"
	mov $408,"@"
	mov $409,"@"
	mov $410,"@"
	mov $411,"@"
	mov $412,"@"
	mov $413,"@"
	mov $414,"@"
	mov $415,"@"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\

	textoff

;ʉFo^
	dwave 2,"wave\doorclose04.wav"
;wiFn̕@E獶֑tF[h
	bg "bg\dai5kou\heya.jpg",86

	texton

	mov $401,"ugC݁IdgjꉔIvv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"@@"
	mov $403,"ZB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"v֛CTVB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"竓[㱗IC"
	mov $406,"vr\CvrN玁CvrAiIlB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@


;ʉFs|[iC^[zj@[vȂ
	dwave 2,"wave\chime00.wav"
	mov $407,"@@"
	mov $408,"uuCjICjkIv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"mߍݗʁIv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@


;ʉFs|[iC^[zj@[vȂ
	dwave 2,"wave\chime00.wav"
	mov $410,"@@"
	mov $411,"CߓRmݜށB"
	mov $412,"sFʚvB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $413,"܁CߐIaIH"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

;ʉFs|[iC^[zj@[vȂ
	dwave 2,"wave\chime00.wav"
	mov $414,"@@"
	mov $415,"mCґRI߁Cr佐ӉoJB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $416,"ٓޒnCjC甔TVB"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\

	textoff
	bg black,12
	delay 1000
;aflFfree0257.mp3@iv[v
	bgm "bgm\free0257.mp3"
;wiFn̕@ʏtF[h
	bg "bg\dai5kou\heya.jpg",12
	delay 1000

	texton

	mov $401,"u^ICszƗ\ݗp`嗈Bv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"@@"
	mov $403,"މ^lIԎVB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"ccCܓlB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"@@"
	mov $406,"u݁CTVB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $407,"ߗLvLYr^IjlWWH"
	mov $408,"CՒXqߔЁccv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"@@"
	mov $410,"uvœGH"
	mov $411,"s|LICۏo뎗IBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $412,"@@"
	mov $413,"ccŗߖvLߔАlB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $414,"sCLk\IB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $415,"ő[IvC퐴^nڈC"
	mov $416,"pCމƌSs㈓cc"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $417,"cc琥\IB퐥TVCޔL\B"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"u^IjlccCHHHƉ˔ƁH"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"֐܁CCmЉIYr閧C"
	mov $403,"fƓHsCns×Hv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"@@"
	mov $405,"uCjlHB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"ӁC貐qCȔƉ˖sv\C"
	mov $407,"AvƑޔЛEswIlCEsJH"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"s܉񗈁Cߍ`V"
	mov $409,"Cy䕋ޔЎCsMv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $410,"@@"
	mov $411,"uuCفAٕsNccvv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $412,"@@"
	mov $413,"uud݈ӁBސFƓIVBvv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $414,"@@"
	mov $415,"ىƘaƘȑOCngnAkDB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $416,"Fވ_CAZ餉ƏoC"
	mov $417,"\ϕspt[dZ݌B"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"RCC@C"
	mov $402,"TVىFƓIvmB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $403,"@C貗LrГIqiB"
	mov $404,"֗LCLs[ߘpB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"ڐGىzCމƌz\œލ[IʁB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"ґRva@IC"
	mov $407,"As]TVCƓICÁB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"cc䕋ߎCT䎸JB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"@@"
	mov $410,"u܉񗈁C܋NЉI閧C"
	mov $411,"ӉmI@{ZsYrsIB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $412,"AߘCE肑藝VI@JBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $413,"@@"
	mov $414,"uE肁Hv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $415,"@@"
	mov $416,"uA܁C٘L嘰RIRC"
	mov $417,"sݔ뎩RiAAjI荇C\gIIIB"
	mov $418,"AϓI@kBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $419,"@@"
	mov $420,"uHHHHHHHHv"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"uvCꉺq܉\L_]JB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"Ae欑zzCċ^^IԁC"
	mov $403,"鈓sȗIkB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"vLzIӜÁCĉꍱw͋^QoC"
	mov $405,"v꘢_A\㈏ZލeB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"ACvLlzB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $407,"CρCϓIlC"
	mov $408,"ˉŐmЉ閧Id݁B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"EHv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $410,"@@"
	mov $411,"u``ccL_Bv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $412,"@@"
	mov $413,"ug攍ݘC鐥ۗLIӜÁB"
	mov $414,"Ar񎖁Bv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $415,"@@"
	mov $416,"Ҕ@CAC^\Ilk"
	mov $417,"˗LݓIЉB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $418,"@ʒǋЉIlC"
	mov $419,"{A蜓ៗaNVB"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"sCs݈Ӗ琥VB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"푩C@C"
	mov $403,"\CޏAI{lB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"RnwAHCڗLƒC"
	mov $405,"wqʑ听lCߎqoCȓIꐶ獷sBB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"ݓϕKIFC"
	mov $407,"BlAϏYrssvlnB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"@@"
	mov $409,"uvܛC"
	mov $410,"ߑFAߍݚH~vlIƒ{vqρBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $411,"َЉLeЕsxCpstsÁB"
	mov $412,"Sa՗Bv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $413,"@@"
	mov $414,"uuLr[EHvv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $415,"@@"
	mov $416,"uuCBvv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $417,"@@"
	mov $418,"rܒC䘸u\oUC"
	mov $419,"ْB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $420,"`ch_YrD藁B"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"uC惘aVYC"
	mov $402,"VېIsLړC"
	mov $403,"IЉᔻEځCEܓLIBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"us܁CYrsvzJccv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"@@"
	mov $406,"u@ٍxCُAЉIƒ{Bv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $407,"u惘aVY⁔dVM߁Cv"
	mov $408,"usC萐a^Bv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"uЉᔻEږ{vCv"
	mov $410,"uT\_ЉIqCv"
	mov $411,"uȗꎟsvLBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $412,"u@܁CTVBv"
	mov $413,"uߒm{CYrhҋɝfEHv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $414,"@@"
	mov $415,"uuߐccCٍR|喷JHvv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $416,"@@"
	mov $417,"uuCYrٍR|喷Hv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $418,"uސɎzOaV㱓IVCv"
	mov $419,"u茕P៑I{{sBvv"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"uuCƖhL勎Cv"
	mov $402,"uCTЉI玁CsxIԁccvv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $403,"@@"
	mov $404,"uvɎzOIC߉AWBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"uȉ܁CߏYrsvzBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"uٕsNIΐlBv"
	mov $407,"uɎzOLFȓIMOaCv"
	mov $408,"u֗LFzv桓I@Bv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"uߑFp蕈_IӎvsvLCv"
	mov $410,"u^|喷AmVIBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $411,"u嘢ls惘aǒ@qnBv"
	mov $412,"u^}̊ߘMVVBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $413,"@@"
	mov $414,"uݙ{NIjCv"
	mov $415,"u@ILҘ{IynBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $416,"u݁C{pQ^UIBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $417,"uvLKvɓӁAw៑Cv"
	mov $418,"upߖ卑ϔhmBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $419,"u៑Al^lV㱓IݑcCُٖICBv"
	mov $420,"SvLވ_B"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"XjPPӐ莁C"
	mov $402,"ALyɝfIZC"
	mov $403,"q笕s\@B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"dLSO|ȓIʁC"
	mov $405,"ȋy抒Ql௓IړC"
	mov $406,"ɝfl˒C҈߈"
	mov $407,"ISB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"@@"
	mov $409,"៑L^mVB"
	mov $410,"ޘ[CnCAEkr檗B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $411,"@@"
	mov $412,"uuAZߜr܁C"
	mov $413,"ƓIlsEr藹C"
	mov $414,"ߖva@Bvv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $415,"@@"
	mov $416,"TVݒn꘢C"
	mov $417,"ےcITVB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $418,"މƌ֐^cVnЍݜޗB"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"u@蕏ʓIlIsj~sC"
	mov $402,"߉A喷IȗBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $403,"uޘƈܒeƈNx~f"
	mov $404,"BʋpSshdlBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"u֔@Cp֗vg喷IʎqC"
	mov $406,"ȍˉꍱI@aBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $407,"@@"
	mov $408,"uuߗlߏA񑊁CsADHv"
	mov $409,"u䓖񑊁Hvv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $410,"@@"
	mov $411,"uuBvv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $412,"@@"
	mov $413,"uC\Cߏ΁CATVpc\^Bv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $414,"@@"
	mov $415,"{CCߏ΁CATVpc\^B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $416,"@^쓾Cܕs\s֓IʒuB"
	mov $417,"cc"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $418,"cc"
	mov $423,"ߐEPIB"
	mov $419,"@"
	mov $420,"@"
	mov %120,418: mov %121,420:mov %122,24:gosub *messagefont
	mov %120,423: mov %121,423:mov %122,24:gosub *messagefont
	$418@/
	$423/
	add $418,$423/
	\


	mov $401,"uܓ|Scc"
	mov %130,401
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"vC񑊁C擾ও꜐}I~["
	mov $403,"ss঍ˍsBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"u萓ߘʒuVOC"
	mov $405,"zzߍIhnlA甐luBv"
	mov $406,"uV܁CzۏAE[WBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $407,"uܗCvybtdIʒuC֎voBv"
	mov $408,"u@rẃCN䁖瓾ԏRONȏJBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"CAZC\槐C䗝C"
	mov $410,"^vÍ^CҒIpC"
	mov $411,"hnV㱓IݑhCȋy͓@RI"
	mov $412,"ʝlIrVB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $413,"命ls~sCqONAPB"
	mov $414,"v甉䋎ߔЕs瀓toIʁCٕsB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $415,"v}aޔЌnN֑݁C"
	mov $416,"ubYrIC^slIBv"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"uu`cclIԁCuk藁Bv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"uYrs汁C얾Bvv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $403,"@@"
	mov $404,"uu܁C䍪{sYrdIlBvv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"@@"
	mov $406,"uuߍݏ֒蓌}I藁Hv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $407,"uv\đ_pa͏ADCv"
	mov $408,"uƓsrܚGBvv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"@@"
	mov $410,"uݍܗviCs\JBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $411,"@@"
	mov $412,"uu`^ICߜrr|Bޖ猙CߖssBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $413,"u꒼rWNClߌuCSEHvv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $414,"@@"
	mov $415,"uccccccv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $416,"@@"
	mov $417,"uuccٕsNccvv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $418,"@@"
	mov $419,"uuccsCܓفBvv"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"u蕉䎩ȓs퐴^ޓ_C[mȗBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"uCxS㎧߁Cv"
	mov $403,"upYrssBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"ᔻIߍ{Iٔ\VC"
	mov $405,"Әa䐥lB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"@@"
	mov $407,"CIwaxB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"sYIwqCݐClIs[ЉC"
	mov $409,"ᔻ甎ȑMȗ^sB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $410,"IsCCTaޔЛwqIRvLYrsJB"
	mov $411,"䏊IB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $412,"@@"
	mov $413,"[ld\CЋ󔒓IC"
	mov $414,"㏒s^sxxVB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $415,"RCfLV㱐ځC䍫XLC"
	mov $416,"C꘢jlZЉI^pB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $417,"ݓIޒi㱁CߔVOIunB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $418,"䖾B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $419,"ؓsCpٔ\ĆB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $420,"ٔ\Ćcc"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"uߘށClBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"@@"
	mov $403,"uYrHv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"@@"
	mov $405,"uLߔЂXX%sIIJB"
	mov $406,"Aߘ`IƌBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $407,"@@"
	mov $408,"uccBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"@@"
	mov $410,"uIP%CYr藁Hv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $411,"@@"
	mov $412,"uCێi௓IJB"
	mov $413,"CLCI͍˔\DDÌŋNBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $414,"@@"
	mov $415,"u`CʑRDЊQClI"
	mov $416,"ߐ^IYrsm藁Bv"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"TVIo|乔OIΗeCOB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"މƌr񎖁HzvdVfgnEH"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $403,"sʜޔЎC"
	mov $404,"p֍✐ْn糋yIcc"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"@@"
	mov $406,"AݜCˑRӛΓ_B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $407,"@ʗpPOO.O%IÌœIԁC"
	mov $408,"vrꐬЕЁC"
	mov $409,"vrAٖ@ۑJB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $410,"ґRNI݁C"
	mov $411,"ACI͓ISps㞓IB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $412,"@@"
	mov $413,"rCސۖpޘE藁H"
	mov $414,"ZЉI"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $415,"p^命lsIpFB"
	mov $416,"TVÎCȖ\CϓIlcc"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $417,"TVÎȖxϓIcc"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"֒gICTVB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"kȁCTVGB"
	mov $403,"ZCݏAl~ڎ\݌ۗISJB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"@@"
	mov $405,"vCݏAl~ڎ\݌ۗISJB"
	mov $406,"RnڎADB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $407,"\ϐ^SݓIFc"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"A\꘢c"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"@@"
	mov $410,"u֓hICqsꘗB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $411,"ݐy݋h趁CߖNEHv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $412,"@@"
	mov $413,"uCsClcE㱗GBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $414,"@@"
	mov $415,"ŗ艁CE嗹߁B"
	mov $416,"ŗ֓zے֗vB"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"uI}skBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"@@"
	mov $403,"u˕s藁I"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"dC꘢lZCA哾rXWC"
	mov $405,"LVwCVxIGIv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"@@"
	mov $407,"uߐz܁wvxJB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"sǜr܁CoQ_@hJIv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"@@"
	mov $410,"uCߗvs⋑O"
	mov $411,"DVCƖ֋XDhIXC"
	mov $412,"ߗrρHv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $413,"@@"
	mov $414,"uGcߏAŊJBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $415,"@@"
	mov $416,"uCArr藹Iv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $417,"@@"
	mov $418,"TVIΗeIS"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $419,"瑜ݝ􋌈ʁB"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\

	textoff
	bg black,16
	bgmfadeout 2000
	bgmstop
	delay 3000

;ʉFwZ̃`C
	dwave 2,"wave\chaim.wav"
;wiFwZOρ@ʏtF[h
	bg "bg\dai5kou\gakkou_gaikan.jpg",12
	delay 3000

;wiF
	bg "bg\dai5kou\gakkou_okujyou.jpg",12
	delay 3000

	texton

	mov $401,"VIOECB"
	mov $402,"䓦C竓~B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $403,"sގCoC"
	mov $404,"sCs[^jC{IB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"xؗI{C"
	mov $406,"@݋֐݉~ŁCsvYrdB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $407,"R@C^ρCs@ta}C"
	mov $408,"O׍ːōDI\B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"@@"
	mov $410,"V琥gmmIVB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $411,"ґR~VekInC"
	mov $412,"A꒼Ŋ蓓InB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $413,"@@"
	mov $414,"原ޗCzN߉ƌB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $415,"zNIpFC꘢n{Ijcc"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\

	textoff

	monocro #aaaaaa
	print 16

	delay 1000
	monocro off
;wiFzE֌@tF[h
	bg "bg\dai5kou\kaisou_mizu.jpg",0
	print 99,3000,"cascade.dll/dx"
	delay 2000

	texton

	mov $401,"uYrCn{߉ƌccr֖vHv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"@@"
	mov $403,"ߐO~VIB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"瀜ݍlthIC"
	mov $405,"嘢lsx茓vB"
	mov $406,"ݓϓIC䎩Ȗ哾QQ茓IB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $407,"Vs݊w蚒xCE[WC"
	mov $408,"AssB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"c^IkQB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $410,"ے莩Ȉ꒼ȗwݓI؁C"
	mov $411,"uȍ{sB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $412,"݉zNCߐ^忓Ic"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $413,"@@"
	mov $414,"^VCn{oC"
	mov $415,"ZqI꘢pB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $416,"RCIߘlpvLoC"
	mov $417,"LߋxI㱍݈__B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $418,"暒nCSCnosC"
	mov $419,"ߌҕszz|B"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"n{g̋Cik_B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"ݜߑBIw៑C"
	mov $403,"ϓIwCUI߁B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"@pYr@CƓszvoȔdl|B"
	mov $405,"uޘlXGvސFzvIOB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"ٖ@eEޔНٗ掓IsCC"
	mov $407,"꒼⋍ݙn{xB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"ߍzّIlC꘢sh侗񋎁C"
	mov $409,"Lr|s๘np㐧B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $410,"营cc䎩Ȗ񗹈q΁C"
	mov $411,"s鈈}AÈȕJB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $412,"@@"
	mov $413,"CޔЕ琥LxIB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $414,"L݈NIC˔\桙n{B"
	mov $415,"@ʐݑvUC"
	mov $416,"Aٔ\C͗B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $417,"勎ېD{ϓIC"
	mov $418,"ϙn{vLIvC"
	mov $419,"甉CnSSsoYrB"
	mov $420,"Szۏŋ}NB"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\

;ʉFߖ@[vȂ
	dwave 2,"wave\himei.wav"


	mov $401,"A݉䉺rSvQIC"
	mov $402,"ˑR⁗󟃔ʓI닩B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $403,"⁗ICIݓIʒuB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"@@"
	mov $405,"csDI爊^B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@


	QUAKE 10,100
	bg black,12

	mov $406,"@@"
	mov $407,"StZqB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"Sa掐r⁓LB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"@@"
	mov $410,"umCECnIv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $411,"@@"
	mov $412,"fzjC"
	mov $413,"D}ڙt˓IuCB"
	mov $414,"@"
	mov $415,"@"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\

	textoff

;aflFfree39.mp3@iv[v
	bgm "bgm\free39.mp3"
;wiFԂ@L悤ɃtF[h
	bg "bg\dai5kou\kaisou_chi.jpg",79
	delay 2000

	texton

	mov $401,"uYccYrIHv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"@@"
	mov $403,"InxI瑁B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"傗IHC֗LwFI\B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"AzIVCٜޔЏv"
	mov $406,"𗧓Csm[B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $407,"@@"
	mov $408,"nQljwB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"ߍldٙn{sUIƌB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $410,"aΉƌV㱈꒼lsfC"
	mov $411,"ŋߐrېꎟَlIœlB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $412,"@@"
	mov $413,"݁ccFSs|ݗVB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $414,"ʓAؓAHAC"
	mov $415,"AqAK孁cc"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $416,"L\hl̓I@C"
	mov $417,"SsnݗގllgB"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"ݎQQn{IgeCpIsQsB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"AݜCœRϒC]"
	mov $403,"^ԁB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"މƌhCٙn{꒼\ᓾkFDB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"@@"
	mov $406,"uuvJHvv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $407,"@@"
	mov $408,"uuCccvv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"@@"
	mov $410,"ґRcF喔AQ[CAR֐񓚗B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $411,"@@"
	mov $412,"uuېYrHvv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $413,"@@"
	mov $414,"un{ccˑRhlBv"
	mov $415,"ߍ|ݒnIƌFB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $416,"hqlICj~cc"
	mov $417,"BʎwC푼BBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $418,"@@"
	mov $419,"un{IHrρccIv"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"䉦ٖ@MB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"ߘaPǁC蕈qssESQINC"
	mov $403,"RhllB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"މAcc"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"@@"
	mov $406,"uލƌVO꒼\n{cc"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $407,"BʜޔЎCR݉FǖېB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"ZЖ\͓IڎlBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"@@"
	mov $410,"uccIv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $411,"@@"
	mov $412,"ߓRIԁCs֓|zB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $413,"NHVCLCQOw"
	mov $414,"ߔV@C{enېIB"
	mov $415,"vzCR蕜ޗcc"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $416,"rcc蕜ޗcc"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $417,"@@"
	mov $418,"u݁cc^In{IEH"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $419,"s\֐lJccHv"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"uccߐn{Bv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"՗q嗈C"
	mov $403,"ٓ|Il꘢ڈ꘢nh勎cc"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"ٕEÕs×C"
	mov $405,"pϏΒCsnhcc"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"ߘccccc"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $407,"szMn{cc"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"ccccِvցcv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"@@"
	mov $410,"[㱗CKC"
	mov $411,"Rp哣]]kCg۝TB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $412,"bŖϗ|njI\C"
	mov $413,"ٔ䐴^n萏o^B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $414,"@@"
	mov $415,"uccn{IXHv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $416,"@@"
	mov $417,"usmccll@CAoBv"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\

	textoff

	bg black,12

	texton

	mov $401,"ߓދԁC瑖oB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"RIHaP@HCAhlrJB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $403,"Cn{cc"
	mov $404,"LߘƌCKlprB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"@@"
	mov $406,"e權őLInC"
	mov $407,"ˋ}嗈Ivӓ"
	mov $408,"nLFI_B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"ccB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $410,"[ލ瑉OC"
	mov $411,"_嗹LCLOC㉄]B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $412,"OI[㱐ЉȋaSB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $413,"@@"
	mov $414,"ĉAcc"
	mov $415,"@"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\

	textoff
	bgmfadeout 2000
	bgmstop
	delay 2000

;ʉF@iv[v
	dwave 1,"wave\WindA08.wav" : mov $30,"wave\WindA08.wav"
;wiFzE@ʏtF[h
	bg "bg\dai5kou\kaisou_oujyou.jpg",12
	delay 3000

	texton

	mov $401,"un{IIv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"@@"
	mov $403,"ʉ~IOsCLjB"
	mov $404,"Cߐj@CA⋍ݓߗB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"|SgIn{C"
	mov $406,"⋍݈꘢\{InB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $407,"މƌccÓ܁cc"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"@@"
	mov $409,"ucc⿁CٌNB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $410,"ʑRC鈓szBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $411,"@@"
	mov $412,"rܒCcՒ΁CpxʓI{B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $413,"EvLC^B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $414,"މƌcclB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $415,"@@"
	mov $416,"uCYrCvߔЎcc"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $417,"ґRkzrCA瑾]JB"
	mov $418,"ߐFȔЉIʁBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $419,"usCLzmcc"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $420,"CYrCߖvLQ䏤ʁHvv"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"C~CEs\nߗC"
	mov $402,"@ŎZ]߁B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $403,"CCYrccȜϓIB藁B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"@@"
	mov $405,"uCCszhߓYWBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"@@"
	mov $407,"u䘸vuWI"
	mov $408,"FFccs܍DEHv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"@@"
	mov $410,"s桎Ҙa桎ғIgnC"
	mov $411,"X\槔ލMCIB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $412,"꒼rzIcc"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $413,"sCBC@Jcc"
	mov $414,"n{^ISPǓIƌB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $415,"@@"
	mov $416,"uٌNccٕsNcc"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $417,"Acc@@CszprތB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $418,"CCٖ@Zߍƌccv"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"ܒCn{ًNB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"ߎllrSCߋvIہB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $403,"@ʖvLܐ[ICs\ߔВ@IB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"TC䏊mI֗vXQdIsҁC"
	mov $405,"ݓߍŕsFInېJB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"@@"
	mov $407,"uLVCzڎFB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"cVOI\C"
	mov $409,"ꎟ։񋎁C\ޔЎADBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $410,"R@Cݗ@kېNČB"
	mov $411,"甉䊴ەB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $412,"ٓߍُ糊hdlYWIlC"
	mov $413,"Klp甑F獁B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $414,"ϓIgOSC"
	mov $415,"A|s๘n藹lIrSBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $416,"@@"
	mov $417,"uȁccߏArHv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $418,"@@"
	mov $419,"uCs@B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $420,"IC䊴uS혮iBv"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"ؓsBB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"Ioߔbō܏AϓIُΗeCn{ŒB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $403,"@@"
	mov $404,"u@ʐSiIԁcc"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"CYr⋍ݓߔВn藁Hv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"@@"
	mov $407,"餙n{\ЕēInCAEs~B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"ߗÓynʁB"
	mov $409,"@ʝ{דߗcc"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $410,"@@"
	mov $411,"ulIRC֗L꘢Bv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $412,"@@"
	mov $413,"ԉ痎CΒIc֜㫗Ꙫ߈I媉eB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $414,"@@"
	mov $415,"uz餜ޘEB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $416,"FCYrvwrh藁C"
	mov $417,"ތFȑOsEs@kEHv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $418,"@@"
	mov $419,"uccv"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"u^IkɋCksxCk}ccv"
	mov $402,"Ėٖ@񗈓IwȓwqI㱁x"
	mov $403,"AϔQE{B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"s[sC"
	mov $405,"śfCF\\B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"gT܌wЁCeB"
	mov $407,"wZAAЉC笕sBFE餁Bv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"@@"
	mov $409,"ލԉF꒼ݔs@B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $410,"F\ЉEH"
	mov $411,"AvLIHȑEH"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $412,"ґR@ލVCABʋpYrvC"
	mov $413,"ō@֐r藹uÊwZCsslވsB"
	mov $414,"@"
	mov $415,"@"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"uR@ccޏAߓIĘEHv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"@@"
	mov $403,"uC@|s􍱔\lIIԁC"
	mov $404,"B\餜ވ؁C䐥rzIB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"AccssB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"ډTYrC{Җ@@Jcc"
	mov $407,"֓oCOʈˑRЉC"
	mov $408,"śf֐ߗB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"[{qEC"
	mov $410,"{ٖ@h^IRB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $411,"CccEccv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $412,"@@"
	mov $413,"n{wْCCo]B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $414,"@@"
	mov $415,"u݁CdtÁII"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $416,"߁ccޕsAݓEI"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $417,"CKlޘЉC"
	mov $418,"Cٖ@CAz厀EH"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $419,"ߕs˒ll៓lEI"
	mov $420,"pܘaЉv@RHv"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"u^|ccٌNcc"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"|cc^IC甐lߕccv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $403,"@@"
	mov $404,"꒼桒Iƌcc"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"ݜޏ֓~IwC"
	mov $406,"ōDIFCߏNIg̑啝xn椎ΗB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $407,"@@"
	mov $408,"un{IIIv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	QUAKE 20,300
	gosub *textwright
	@

	mov $409,"@@"
	mov $410,"uFꐥCYr藁H"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $411,"ccى䗈܉"
	mov $412,"@"
	mov $413,"@"
	mov $414,"@"
	mov $415,"@"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\

	textoff

	bg black,1
;ʉ~
	dwavestop 1 : mov $30,""
	delay 2000

;ʉFhVb@[vȂ
	dwave 2,"wave\bosu22_r.wav"

	delay 4000
;wiFucv@ʏtF[h
	bg "cutin\dai5kou\19.jpg",12
	delay 2000
;wiFu[AĂ[Hv@ʏtF[h
	bg "cutin\dai5kou\20.jpg",12
	delay 2000
	bg black,12
	delay 2000

;ʉFKob@[vȂ
	dwave 2,"wave\ClothC.wav"
;wiF@tF[hȂ
	bg "bg\dai5kou\gakkou_okujyou.jpg",1

	texton

	mov $401,"uZIIIv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,36:gosub *messagefont
	gosub *textwright
	@

	mov $402,"@@"
	mov $403,"uށIv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"@@"
	mov $405,"^ҒnNgC⁗B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"ߓv[WInB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $407,"@@"
	mov $408,"uYAYruZvC^I`꒵B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"ܐv~C"
	mov $410,"BʋpݓߙX|ʚ됇ccv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $411,"@@"
	mov $412,"uccTVHːEHv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $413,"@@"
	mov $414,"uCSB"
	mov $415,"XCECAvCnk`"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $416,"^ICCCAߔVOC"
	mov $417,"BʑVߑSJH"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"EC䐇cc"
	mov $402,"~Ig}VC甐lkB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $403,"cڌgWOC"
	mov $404,"ߗEvLIgeB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"@@"
	mov $406,"zNCؓsnߌB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $407,"C֎In{RޘЉC"
	mov $408,"Q^IRB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"ېvrCs糎lI|فC"
	mov $410,"qP؋BRCB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $411,"@@"
	mov $412,"ccґRʁC֍藁B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $413,"ˑR䷏ddB"
	mov $414,"r蕘aCIwax敪Cs×B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $415,"@@"
	mov $416,"uTVIEHsDӎvCߗBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $417,"@@"
	mov $418,"uYAYrHYrIEH"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $419,"lVVӓӓ漓IώqCuL_mSBv"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"u݁C啪JB"
	mov $423,"ZCmB"
	mov %120,401: mov %121,401:mov %122,24:gosub *messagefont
	mov %120,423: mov %121,423:mov %122,24:gosub *messagefont
	$401@/
	$423
	add $401,$423/

	mov $402,"ȍ@ċvIC"
	mov $403,"sđߌ܏\Bv"
	mov %130,402
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"@@"
	mov $405,"uفCލˑlvBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"@@"
	mov $407,"uߐ݌̈ӑMJHv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"@@"
	mov $409,"uIv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $410,"@@"
	mov $411,"ʚ뒆IC"
	mov $412,"}꘢ґRВAَRIEC"
	mov $413,"֗Lꍱ֎ZLIlTݓB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $414,"cc߉ƌ^QEDB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $415,"@@"
	mov $416,"śfCB݊eИWICːŉSIJB"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\

	textoff

	bg black,12
	delay 2000
;wiFu߂\\v@ʏtF[h
	bg "cutin\dai5kou\21.jpg",12
	delay 2000
;wiFu̐ɂ͐]cĂȂBv@ʏtF[h
	bg "cutin\dai5kou\22.jpg",12
	delay 2000
	bg black,12

;

;ʁFSd}iʏj
	mov %42,2
	gosub *sindenzu
	bg ":c;cutin\logo.jpg",16

	wait 3000

	bg black,15

;

;ʉFginami.mp3j@iv[v
	bgm "bgm\nami.mp3"
;wiFC{[ubWij@ʏtF[h
	bg "bg\dai5kou\lainbow_hiru.jpg",12
	delay 3000

	texton

	mov $401,"svCBCߓVIw@B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"@@"
	mov $403,"u⿁CqCHv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"@@"
	mov $405,"uCL_z߁Bv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"@@"
	mov $407,"䑖搶ߗC"
	mov $408,"FnCB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"VI藢\tIޗtC"
	mov $410,"V֑嗺CcpE엹B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $411,"@@"
	mov $412,"uYrCܗߙ߁Bv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $413,"@@"
	mov $414,"u搶CߋJH"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $415,"\s\䝝IvHv"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"V֓ҔhCOIC"
	mov $402,"ٓ{I៑yOmkI^B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $403,"N㐥QQIC"
	mov $404,"AaI៑cJB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"@ʔ\ߘX欓IMC"
	mov $406,"B\甉LX[IvlB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $407,"@@"
	mov $408,"uC^B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"퍢Ɨѐ[rC֔lZC"
	mov $410,"䕔։萗ًI߁B"
	mov $411,"EDIuccv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $412,"@@"
	mov $413,"usDӎvC搶B"
	mov $414,"ލ进EDB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $415,"zICXSʈ_IBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $416,"@@"
	mov $417,"uSʈ_ICwIʛHv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $418,"@@"
	mov $419,"uCYr{៑H"
	mov $420,"zmߘ^Bv"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"ߓދԁCVaqFIіҒn꒧B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"@@"
	mov $403,"ucccrCqB"
	mov $404,"VrrLƛHv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"@@"
	mov $406,"u֔\ߓIs^C"
	mov $407,"aavCAvl\ލBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"@@"
	mov $409,"u✒`CIreՎB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $410,"ZCVSDCAJB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $411,"ґRuC"
	mov $412,"C{CL喷CnNC"
	mov $413,"ߐ៙W黓IܔB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $414,"ݓߘNC|xzyn"
	mov $415,"RIBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $416,"@@"
	mov $417,"rܒC搶CnݒnNΔB"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"u@C藹zAj˘aVUB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"C藹ɗ}B藹@鐣B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $403,"pC藹肗ASAbzRAxC"
	mov $404,"ЉfC֗LIꕔB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"OcIfEMMn\CR@"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"{藹faxFBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $407,"@@"
	mov $408,"pΔoꕝccaaIEnC"
	mov $409,"ō@ܗzoO\dSCJ[㋎B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $410,"ݑ召sIΔ㱁CǗn{dSB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $411,"fݓC{Ixz撳iOB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $412,"@@"
	mov $413,"uޏA揊CIBnNB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $414,"F{Ss픒lNB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $415,"攒lIpxŁC"
	mov $416,"LFlЁC@lAFl֐lC"
	mov $417,"SsϒᓙIB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $418,"Fs甔NynIlАAHC@Ęa؁C"
	mov $419,"|FАAYrYVVI@"
	mov $420,"|sNFАAIƌBv"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"ulINjC꒼Nߓ{IB"
	mov $402,"ȁCFss|B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $403,"ȁCFss|B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"{|AFsPC"
	mov $405,"kLa拁C@LB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"U푼FxzC"
	mov $407,"z讐aBAVB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"Cs甔lS~nC~CC"
	mov $409,"I{\\៓lBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $410,"@@"
	mov $411,"ߕK营sIhេB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $412,"CCٍROC"
	mov $413,"{\\xzƁB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $414,"vrhlCvrhBxzҗ^xzҁB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $415,"ߐ꘢㱎|HIB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $416,"ґRwZ엢ʒ"
	mov $417,"uC^|󌨁CsL喷ccv"
	mov $418,"AvœޕEnCAB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $419,"|ً^C៑sƓIB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $420,"A៍ρCsގS孖͓IB"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"uR@CAݜޔЏvC"
	mov $402,"ߍlƌCn拍s×B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $403,"CvtQᒆk{C"
	mov $404,"ߒmŗLI@YrEHv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"@@"
	mov $406,"ucf{HHv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $407,"@@"
	mov $408,"usCXlB"
	mov $423,"ΖB"
	mov %120,407: mov %121,408:mov %122,24:gosub *messagefont
	mov %120,423: mov %121,423:mov %122,24:gosub *messagefont
	br
	$408@/
	$423/
	add $408,$423/
	@

	mov $409,"{noRRIƁC"
	mov $410,"UhؒfCAd{B"	
	mov %130,409
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $411,"ߍlƌ݈ÒC"
	mov $412,"s甐Ζ{B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $413,"ސ܉΍Cۗ`B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $414,"RΖfCvrQٕC"
	mov $415,"vrI嗈C"
	mov $416,"sR{kAB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $417,"uݜޔЏvܕsvŘC{As\IBv"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"ʑO{mT\tICÒnGܒB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"zߓލԁC"
	mov $403,"Az\{lLrْmB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"ݔ픒lxzIFC"
	mov $405,"C桎ȓIaЁC"
	mov $406,"CrS៓lC"
	mov $407,"ݓIl{SsmB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"s@CFsfn@L喷A"
	mov $409,"EAA֗LCIbt។ƁB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $410,"CvęܘaCٕAB"
	mov $411,"ޔ[L˕|B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $412,"@@"
	mov $413,"ߍs汓៓lIlC"
	mov $414,"u៑vCډϓI@B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $415,"@ې[CAKlǋCYrρB"
	mov $416,"KlvM^B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $417,"CvL[vlCˉ甎Ҕh^ȟ|gnI៑B"
	mov $418,"ޏAV݁B"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"u܋NCӔVȒsjC"
	mov $402,"C๑lݑSEr䐥ccv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $403,"@@"
	mov $404,"uCTArJB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"֝SlrsCސӐkcIB"
	mov $406,"AӖs}B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $407,"VȉrCL^ЌB"
	mov $408,"CvlTߏCIef"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"˔l~nCjImlB"
	mov $410,"C๑lwsP㈁t"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $411,"BʁC๑lwwP㈁xC"
	mov $412,"cVn|sGȐFB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $413,"uCqӓssvBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $414,"@@"
	mov $415,"ܓ๑lCFASlEC"
	mov $416,"ӑF柍݊aɎzOV㱁C琥I݁B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $417,"{BCƘaV㱓I[CvLٓImB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $418,"嘢lA嘢Q̓sCȓI"
	mov $419,"sxa៓lnB"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"uccʑR֐fٓIB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"ޔЎC֐ߘIl苋ˍsBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $403,"@@"
	mov $404,"uϓIVƌCv֔\ΏZCߐ^悛B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"֋N勎CAzNߍEIៗFB"
	mov $406,"^EsZB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $407,"敔җC䐥ŖvpI꘢CAL䊈B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"蕑oIXIcsv\FʁC"
	mov $409,"|ݎq߉IʓaB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $410,"gyȓIIៗFB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $411,"苕svY㈁CCLߍlC"
	mov $412,"@I{˔\CݓI{Bv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $413,"@@"
	mov $414,"fCctq󗹁B"
	mov $415,"@"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"ߍIFaicc"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"cc䖾CfB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $403,"\ݜϓIC"
	mov $404,"CF៓lAB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"ۍIԁC\YrpC"
	mov $406,"֍CWJB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $407,"@@"
	mov $408,"Rn漓ߍC桜ޕЌ̓yIlFcc"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"ȋy\EIpFB"
	mov $410,"@"
	mov $411,"@"
	mov $412,"@"
	mov $413,"@"
	mov $414,"@"
	mov $415,"@"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\

	textoff

	bg black,12
;ʉtF[hAEg
	bgmfadeout 2000
	bgmstop
	delay 3000

;aflFfree0522.mp3
	bgm "bgm\free0522.mp3"
;wiF̖iV@ʏtF[h
	bg "bg\dai5kou\yakei07.jpg",12
	delay 3000
;wiF̖iW@ʏtF[h
	bg "bg\dai5kou\yakei08.jpg",12
	delay 3000
;wiF̖iX@ʏtF[h
	bg "bg\dai5kou\yakei09.jpg",12
	delay 3000

	texton

	mov $401,"afd@C꘢l蜓ݎvC"
	mov $402,"smsu㱛EuB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $403,"nIXiCݑ}R@P灈ЖρB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"ƎlCݙ{vLslIJC"
	mov $405,"ٖړInB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"㱑TE嗹u㔪_JB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $407,"@@"
	mov $408,"ˑRcc]ےIHB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"ޓC街͕mIB"
	mov $410,"街͗R衙ʐmCR@黑隔B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $411,"rC街͐@퐧oI藁H"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $412,"ȉΗCCRhYAΖAVR"
	mov $413,"noIB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $414,"DaD͓I\C琥ΖB"
	mov $415,"C^黐ΖC֎vՐΖB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $416,"YaYLܓIޗC琥ΖB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $417,"H؍ޘaCm茜ލC"
	mov $418,"vL\ٖ@IB"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"lSИΖB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"Cٖ@hnoI{C"
	mov $403,"\ϒxB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"ށccÓsꌏIEH"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"@@"
	mov $406,"{CosI_C"
	mov $407,"ݓ្E퐢lmB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"ψꗈCvTV@I{ASՉwB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"u@ʕszؒfΖCߏAߒԁBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $410,"ᐥryC\B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $411,"@@"
	mov $412,"BC{VȔ@[n"
	mov $413,"ߖOcc"
	mov $414,"@"
	mov $415,"@"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"uccc߁Iv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"@@"
	mov $403,"AݓCJqIp⁗ICI䆁B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"ݍÓIC{geڍݓߗB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"e欈ŁC{꘢wϓIjwcc"
	mov $406,"OZB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $407,"ߐccFwZIZccu{FJB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"@@"
	mov $409,"uCIv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $410,"@@"
	mov $411,"u݁CߗC"
	mov $412,"֑z竁CsIIv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $413,"@@"
	mov $414,"gޘgށcc\㏬֐藁B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $415,"sǐIЁCssYr瀓sIB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $416,"wJ蚔ǉJB"
	mov $417,"wquoÁCݛEsYrHB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $418,"sC꘢lݜrIJqCӍݐӗB"
	mov $419,"퍬SZC琥쎩B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $420,"ޘavgncc"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\

	textoff

	delay 2000
	bgmfadeout 1
	bgmstop
;ʉFmCY@[vȂ
	dwave 2,"wave\noise01.wav"
;wiFucc˂AǂĖlẮHv@tF[hȂ@Qb\Ĕwi߂
	bg "cutin\dai5kou\23.jpg",1
	delay 2000
	bg "bg\dai5kou\yakei09.jpg",1
	delay 3000


;wiF̖iXiuj@tF[hȂ
	bg "bg\dai5kou\yakei09_bure.jpg",1
;GFn@@ʒuF
	ld c,":a;tatie\ryouma\keno.bmp",12

	delay 1000
	texton

	mov $401,"ucccc݁CߑF{Iv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"@@"
	mov $403,"ueIv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	QUAKE 10,100
	@

	mov $404,"@@"
	mov $405,"ˑRoIgeCcu{FOlZrB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"@@"
	mov $407,"uYAYrCفccIv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"@@"
	mov $409,"u藁Iv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $410,"@@"
	mov $411,"nac^B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $412,"揁ccvFdޓ_琤ӗL_ÁB"
	mov $413,"퐥Olٕt꘢wB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $414,"@@"
	mov $415,"uLYrHv"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"uC߉ƌBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"@@"
	mov $403,"uIHv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"@@"
	mov $405,"ߓIԁCu{񍂗jB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"pj嗈lCޔЍsCAT^Iҕ\B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $407,"@@"
	mov $408,"uC߉ƌCR@zxCBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"@@"
	mov $410,"ڌВn呼FCsفB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $411,"OlґRꕛsIώqC"
	mov $412,"ApsCCsÎB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $413,"@@"
	mov $414,"ucccv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $415,"@@"
	mov $416,"ucccv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $417,"@@"
	mov $418,"ucccv"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\

	QUAKE 10,200
;ʉF_bV@[vȂ
	dwave 2,"wave\RunC11.wav"
	wait 750
	dwavestop 2

	mov $401,"uccAmIv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"@@"
	mov $403,"I_㐧Cu{FDnގUB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"揁C^vƁB"
	mov $405,"vCAcL_B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"@@"
	mov $407,"uߘcc迁Iv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"@@"
	mov $409,"~IwቺCfZB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $410,"@@"
	mov $411,"uߖ琥CwqCƐuJBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $412,"@@"
	mov $413,"uccBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $414,"@@"
	mov $415,"|sn磏oލԁC"
	mov $416,"u{FρCp_勎B"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\

	QUAKE 10,200
;ʉF_bV@[vȂ
	dwave 2,"wave\RunC11.wav"
	wait 750
	dwavestop 2
	mov $401,"svCߏN瓦CÓIJĖvLleB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"ґRz竗FC"
	mov $403,"Aڎ虐lI漁C"
	mov $404,"sߔЌSIIlB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"ccsC֔@cc"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"@@"
	mov $407,"uCYr֐EsZΗ藁Hv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"@@"
	mov $409,"ΖDCsΖnCޖ{vYrgnB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $410,"pYޔЎC甐lunC"
	mov $411,"勎䖾E[̉ވ_B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $412,"֔@cc"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $413,"@@"
	mov $414,"ucc运ٖ@⍓ُIBv"
	mov $415,"@"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\

	textoff
;GFn@@ʒuFֈړ
	cl c,0
	ld l,":a;tatie\ryouma\keno.bmp",12
;aflFfree55.mp3
	bgm "bgm\free55.mp3"
;GF搶@ʏ@ʒuFE
	ld r,":a;tatie\sensei\tuujyou1.bmp",12
	delay 2000

	texton

	mov $401,"^wcc"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"⁗ICݒnIkC"
	mov $403,"CوlIJ[rC꘢jlngB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"@@"
	mov $405,"u运꘢ǋ^IlBҎCmC"
	mov $406,"pݜfrKwIB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $407,"ϓIlCr\eP^I藁H"
	mov $408,"s\IBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"@@"
	mov $410,"ucc^_oSvB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $411,"pYr@C"
	mov $412,"˔\ϊSs@unH藁Hv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $413,"@@"
	mov $414,"uCޘvC䎩Ȗs^藁Bv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $415,"@@"
	mov $416,"֐@nݒ{΁B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $417,"ޔЊŐdlIߓxcc^甐lsuB"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\

	textoff

;GFn@ʏ@ʒuF
	ld l,":a;tatie\ryouma\tuujyou.bmp",12
	texton

	mov $401,"uVsŏēIJH"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"ޗ{vLlEBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $403,"@@"
	mov $404,"uICȍ˘a迓ԁB"
	mov $405,"C迎luH藁Bv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"@@"
	mov $407,"ґRsmYrC"
	mov $408,"AqVOAiމƌIړIC"
	mov $409,"zv效敁B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $410,"@@"
	mov $411,"u㎟܁Cގ䔓ߗJHv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $412,"@@"
	mov $413,"ucc"
	mov $423,"rC苒JB"
	mov %120,412: mov %121,413:mov %122,24:gosub *messagefont
	mov %120,423: mov %121,423:mov %122,24:gosub *messagefont
	br
	$413@/
	$423
	add $413,$423/
	@

	mov $414,"YrsȚGBv"
	mov %130,414
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $415,"@@"
	mov $416,"Cڎ󗹑I񊖁Co񓚁B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $417,"݁Cz嗈甉񊖘EH"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $418,"sCDL꒼zIB"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"uIVklB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"{\ݕsgpΖIvEH"
	mov $423,"@Ar꘢VBv"
	mov %120,401: mov %121,402:mov %122,24:gosub *messagefont
	mov %120,423: mov %121,423:mov %122,24:gosub *messagefont
	$402@/
	$423/
	add $402,$423/
	@

	mov $403,"@@"
	mov $404,"߉𓚜ޘ^C"
	mov $405,"֐֕~勎藁H"
	mov %130,403
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"ډܓIԁCA\ŏoޘlIB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $407,"@@"
	mov $408,"u@cc"
	mov $423,"rCߒmݑm៑ۑO"
	mov %120,407: mov %121,408:mov %122,24:gosub *messagefont
	mov %120,423: mov %121,423:mov %122,24:gosub *messagefont
	br
	$408@/
	$423
	add $408,$423/

	mov $409,"ٓ{ӎ{IΖ^EHv"
	mov %130,409
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $410,"@@"
	mov $411,"uBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $412,"@@"
	mov $413,"uRߒmC֊Yr藁C~QE㱁B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $414,"ΖؒfIԁC{ABv"
	mov $415,"@"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\

	textoff

;GFn@^ʖځ@ʒuF
	ld l,":a;tatie\ryouma\majime.bmp",12
	texton

	mov $401,"Gcc^CjFRB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"@@"
	mov $403,"urВnoC"
	mov $404,"pSCOB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"vLsC{IV\vB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"sCܐ픗"
	mov $407,"܉\X_JB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"ޘECKlϐΖ^Bv"
	mov $409,"cC{ϓIƁH"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $410,"@@"
	mov $411,"uuvցBzΖIД\Cٕs\ݓIBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $412,"@@"
	mov $413,"@CۏorIZC"
	mov $414,"ٕs\݁B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $415,"@CۏorIZC"
	mov $416,"s笕sBzΖB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $417,"{vr\Scc"
	mov $418,"vrA^lÒBv"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"TΖIʁC"
	mov $402,"ATEIPbB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $403,"Cyވ_I݁Cs핲B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"l{ܒFہAȔ\VIԁC"
	mov $405,"śf֐ٖ@EΖЉIB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"@@"
	mov $407,"usCܓΖLVJH"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"ޔЍrCs\i]JBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"@@"
	mov $410,"uvցCfBI߈VB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $411,"CBInoC"
	mov $412,"SE蜓ő[I[邔VេBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $413,"@@"
	mov $414,"ucccv"
	mov $415,"@"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"uC~ClE@C"
	mov $402,"󊎕sfnۑ[B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $403,"^ɎzOIlC๑lݔw@TB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"ŁCގ\L@I]B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"ATCސ둈BPbIlC"
	mov $406,"lTEΖoC"
	mov $407,"@Љnf笑ItˁB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"RC\ʏŁC@V㱓IٗB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"FAkFAS嗘AFC"
	mov $410,"r萌ClI̗͕sf茁B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $411,"٘ɎzOЉ܁CSsڎIB"
	mov $412,"CٕlC"
	mov $413,"AE槐CC៓IRBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $414,"@@"
	mov $415,"ŗLINCsjCaᅁB"
	mov $416,"ސ喼B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $417,"UCngpᅁC"
	mov $418,"AĖٖ@zۖvLIB"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"{ܐōDIqB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"Eaa܁C㐼aܓIlB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $403,"sđPa蟓CÕ`C"
	mov $404,"{Vs݋hB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"NȏjGECBB"
	mov $406,"ݐ_ЉwaI{lC@E܏B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $407,"@@"
	mov $408,"SCALI"
	mov $409,"CiC"
	mov $410,"LlhCʓINB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $411,"@Љٍp筙r笁B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $412,"x꘢x^ɎzO󑶓IƁC"
	mov $413,"LʍDꗒj玍ݓߗV"
	mov $414,"pꖼC"
	mov $415,"܈NSI|ۓ{B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $416,"ݓߘƁCޔЍsC݌덇"
	mov $417,"LӛΒn֎~IB"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"fЉXQiB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"zfgێ]ГI܁C"
	mov $403,"jIIߕȔƒǏ^C"
	mov $404,"㕁C᳏acȊOILʁB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"SލSCw㔗xC"
	mov $406,"[B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $407,"@ʉߕГynC"
	mov $408,"ӓIaIAXB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"@@CsKlƜޔЏvېB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $410,"@@"
	mov $411,"CVɎzOݗ^RB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $412,"Ew{S󓞐ekI{"
	mov $413,"\Llލ藁H"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $414,"꘢ߘOwC~GIƁB"
	mov $415,"꘢ɎzOynhL҈ȎIƁC"
	mov $416,"\܍Yr藁H"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"u݁ccߘC@ʈCΖۗE៓IԁB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"C{rρHv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $403,"@@"
	mov $404,"uccB"
	mov $423,"ݔdꗘpV@C"
	mov %120,403: mov %121,404:mov %122,24:gosub *messagefont
	mov %120,423: mov %121,423:mov %122,24:gosub *messagefont
	br
	$404@/
	$423
	add $404,$423/

	mov $405,"m꘢ePJBv"
	mov %130,405
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"@@"
	mov $407,"ucccv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"@@"
	mov $409,"u֐܁CߌulȓIƁC"
	mov $410,"cΖhFލFlHv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $411,"@@"
	mov $412,"uccs\Bv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $413,"@@"
	mov $414,"ߍYrsszIƒ{FCCݐΖ⑔VOC"
	mov $415,"V^\AB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $416,"FSvӛΓCCBEPbCΖEC꘢wٕsI݁xB"
	mov $417,"ވ_CF{vL@uB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $418,"ٖ@SےޘjlIԑ惏敕B"
	mov $419,"dےsB"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\

	textoff

;GFn@@ʒuF
	ld l,":a;tatie\ryouma\keno.bmp",12
	bgmfadeout 2000
	bgmstop

	texton

	mov $401,"mC蕔ےssCޕsAZ黗EI"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"SCSB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $403,"ωdܖٕ̐I欗C"
	mov $404,"|푼ǒ@qB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"@@"
	mov $406,"uݑ[۔VOCAs\z_a@EHv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $407,"@@"
	mov $408,"us\BPΖC\C"
	mov $409,"rىsRB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $410,"ݓI{C٘sޔЎIBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $411,"@@"
	mov $412,"ucccv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $413,"@@"
	mov $414,"ٖ@܏ousϓIvB"
	mov $423,"ٖ@⫘kB捒n܁usϓIvB"
	mov %120,413: mov %121,414:mov %122,24:gosub *messagefont
	mov %120,423: mov %121,423:mov %122,24:gosub *messagefont
	br
	$414@/
	$423/
	add $414,$423/
	@

	mov $415,"ϊ]敓IԁCws\C"
	mov $416,"OޘjlC{shވ꓅cc"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	mov %130,415
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\

	textoff

	delay 2000
;BGMFfree56.mp3iiv[vj
	bgm "bgm\free56.mp3"
;GύXF搶@ʏQ@ʒuFE
	ld r,":a;tatie\sensei\tuujyou2.bmp",12
	delay 2000

	texton

	mov $401,"uCsΖIVGB"
	mov $402,"{蜓X[InB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $403,"ASAAA؁B"
	mov $404,"ލ{SsВgB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"و`lCHhpsSO%B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"@ʈCROܒvC"
	mov $407,"ޘƏ濍ŉQdIčrJBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"@@"
	mov $409,"oFAیI˘XqIoB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $410,"˘au{FsI_ٛC"
	mov $411,"{ٖ@^ޔЈ㊴@B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $412,"މƌccސYrϓI_B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $413,"@@"
	mov $414,"uӁC@ʐΖpC"
	mov $415,"DaȊsÕsB"
	mov $416,"mdꒆfJB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $417,"cACȐmsAsEH"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $418,"CFcnC`IԁC"
	mov $419,"uuꘖ{gȖh~IJccv"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"uݑ啔lsWݏsIvH"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"IjcA乑ƐI`cAِlZI`ƁB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $403,"ݓImC"
	mov $404,"ErsړInsB"
	mov $405,"甐lF񓞓cn"
	mov $406,"s\񓾋B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $407,"cc蜓črISC"
	mov $408,"lFssB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"꒼Ґ{AbrHZ㞊V"
	mov $410,"YrssB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $411,"qꘗRLl񓞓cnJB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $412,"ACߍmoIHC"
	mov $413,"{sȕh`lCޔЏvsSyBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $414,"@@"
	mov $415,"ucccv"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"ݓIxCs吥Z皓IB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"@ʓߔДCΖI댶t̏C"
	mov $403,"ޘƉ蜓rB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"街͏CeЌʍHaʐMi"
	mov $405,"SClFCHWCBB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"@@"
	mov $407,"śfCޔЏvSEcc"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"ccLl×pjJB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"@@"
	mov $410,"BΖ^忓~CݏA嗈C"
	mov $411,"w͓V^\IӗpːB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $412,"gcލّSEܗC"
	mov $413,"\L{l_R藁H"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $414,"vΖ֔\ȍoSC"
	mov $415,"՘aVIsCA]B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $416,"Czڋߌ⑓IC"
	mov $417,"iAzEB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $418,"ޔo戓IysSՒgs\IB"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"uccΖ֔\pv藁Hv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"@@"
	mov $403,"uޘvC原VcCWʏAېC"
	mov $404,"\܏\N@C\SN@B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"ݓߔVOCV^\팤ۏoB"
	mov $406,"CѓIn֜kCȒZՐss\IB"
	mov $407,"LϓIܖ@cc"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"A@ʎӛ@IԁC"
	mov $409,"Yrώq藁Hv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $410,"@@"
	mov $411,"@\@C"
	mov $412,"o]АΖvVޘB@C"
	mov $413,"sܑaIB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $414,"KlsEޔЈЁB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $415,"@@"
	mov $416,"ccCFٖ@EB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $417,"rsBEB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $418,"@@"
	mov $419,"Fccracc"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\

	textoff

;GύXF搶@ʏ@ʒuFE
	ld r,":a;tatie\sensei\tuujyou1.bmp",12
	bgmfadeout 2000

	texton

	mov $401,"urCωȘEH"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"CVI񓚁CxӘEHv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $403,"@@"
	mov $404,"uccE槗B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"CB\黗Bv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"@@"
	mov $407,"uCߏAZWꞾJBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"@@"
	mov $409,"`ccQ䵓IԎVC֔Cߏ΁B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $410,"@@"
	mov $411,"usJCgra@AsB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $412,"vŎZߑWB"
	mov $413,"pȓIQoāBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $414,"@@"
	mov $415,"u@cc"
	mov $423,"s֛C߁B^LIlB"
	mov %120,414: mov %121,415:mov %122,24:gosub *messagefont
	mov %120,423: mov %121,423:mov %122,24:gosub *messagefont
	br
	$415@/
	$423/
	add $415,$423/
	@

	mov $416,"k߉oϓIĚGB"
	mov %130,416
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $417,"rCFVFJBv"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\

	textoff

;GF搶@tF[hAEg
	cl r,12
	texton

	mov $401,"܊CIo꘢{IΗeC"
	mov $402,"R@ÒB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $403,"^㜁ccIB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"@@"
	mov $405,"uⲁC^esccv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"@@"
	mov $407,"ْfoԁB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"TVR䗈ܓIB"
	mov $409,"搶򐥈ȕFIgᚌ敓IُہB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $410,"RC߉ƌpqғssB"
	mov $411,"ڗLSŕsI͗ʁCIB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $412,"@@"
	mov $413,"^甐ls[IƌB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $414,"ϑzCݐSRNluIRB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $415,"@@"
	mov $416,"h䓙Ycc䔓I"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\

	textoff

	bg black,12
	delay 3000

;ʉFdԁ@iv[v
	bgmonce "bgm\se-044.mp3"
;wiFdԁ@ʏtF[h
	bg "bg\dai5kou\densya.jpg",12
	delay 3000

;wiFtWerO@ʏtF[h
	bg "bg\dai5kou\fuji.jpg",12
	delay 2000
;wiFtWerOiuj@tF[hȂ
	bg "bg\dai5kou\fuji_bure.jpg",12
;G\FTV@s@ʒuFE
;G\Fn@܂@ʒuF
	ld l,":a;tatie\ryouma\sumasi.bmp",0
	ld r,":a;tatie\nonomi\okori.bmp",12
;aflFfree0541.mp3@iv[v
	bgm "bgm\free0541.mp3"

	texton

	mov $401,"ulB"
	mov $423,"݁ClߓvHv"
	mov %120,401: mov %121,401:mov %122,24:gosub *messagefont
	mov %120,423: mov %121,423:mov %122,24:gosub *messagefont
	$401@/
	$423/
	add $401,$423/
	@

	mov $402,"@@"
	mov $403,"uvC低Bv"
	mov %130,402
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"@@"
	mov $405,"u呁ICߍۏYr藁H"
	mov $406,"sLYrWSHv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $407,"@@"
	mov $408,"uccvYrsIB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"AZܗCߖs汁Bv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $410,"@@"
	mov $411,"u`IlƉSSߍˊIIv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $412,"@@"
	mov $413,"ލ𓾑[CL^WB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $414,"͖͌ЌВn@uIsƁB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $415,"ґRv\CTVDL_C"
	mov $416,"Ass\\ISB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $417,"@PIԁC"
	mov $418,"mz\cJB"
	mov $419,"@@@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"usJC߉AG߁B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"{ݔΖC"
	mov $403,"ߌur˔\EޔЋǖʁHv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"@@"
	mov $405,"ugߋRݑzޔЎIH"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"@IԁCsLkEH"
	mov $407,"@E\CҐRYrIBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"@@"
	mov $409,"usϓIC䐥zvX{IrāB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $410,"\槊SPC\gpIΖC"
	mov $411,"ϓIra@ccv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $412,"@@"
	mov $413,"u`ccߑ}\衜rρHv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $414,"@@"
	mov $415,"uv衋ZIԁC֒sIJB"
	mov $416,"U媓VsApsvBv"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\

	textoff

;G\FTV@ʏ@ʒuFE
	ld r,":a;tatie\nonomi\tuujyou.bmp",12
	texton

	mov $401,"u߁C݉Fs}\藁H"
	mov $402,"ݓߗsL媓VCvLuBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $403,"@@"
	mov $404,"uF衁ccHv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"@@"
	mov $406,"uٛCc|͓I}\衑u"
	mov $407,"xR@ێˏ㋎B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"ŋߕsoߔЎpI[衊EH"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"pߘZCc街͘F⁑nʗgpBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $410,"@@"
	mov $411,"މƌzoHÉI_qB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $412,"sݖÖapÍC"
	mov $413,"zۗ͐^exBӊOnC\֒LӎvIB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $414,"@@"
	mov $415,"csCRC"
	mov $416,"gߘCIF衍݋ZsC"
	mov $417,"Eڎ󛀘EH"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $418,"ߍϐΖo戓IlCٖٝ@eEޔЍsCIB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $419,"vr퐭{ڎCC"
	mov $420,"vr^ГௐIjBcc"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\

	textoff

;GFSătF[hAEg
	cl r,0
	cl l,12
;wiFtWerO@tF[hȂ
	bg "bg\dai5kou\fuji.jpg",1

;ʉF̃KK@iv[v
	dwave 2,"wave\machi.wav"
;wiF̉@ʏtF[h
	bg "bg\dai5kou\hasinosita.jpg",12
	delay 2000

	texton

	mov $401,"u`ccHv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"@@"
	mov $403,"uCrHv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"@@"
	mov $405,"TVwOC[ŋC㘉ڏWDlB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"@@"
	mov $407,"u苍@ށC苉@ށIv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"@@"
	mov $409,"{_x͘ax@pxSЋB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $410,"y@IvC"
	mov $411,"꒼⋍ݝITVpˑRsFB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $412,"蕖ZǏTVClQϋ勎B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $413,"@@"
	mov $414,"u݁Cd竛C^IC原sρBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $415,"@@"
	mov $416,"uClBޗDېYr藁Bv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $417,"@@"
	mov $418,"u֗p܁CňAmBv"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"uߘx@ffCpݏIlEH"
	mov $402,"fx痈EHv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $403,"@@"
	mov $404,"u䜃rmBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"@@"
	mov $406,"uCLIIv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $407,"@@"
	mov $408,"gށCwI悍C^IB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"F糎lCǓrIǑaGC"
	mov $410,"c_In֗LZIwB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $411,"䑖ߑFCCB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $412,"@@"
	mov $413,"u݁Cޓꐥr񎖁Hv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $414,"@@"
	mov $415,"uCيwʁCDLl藁B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	dwavestop 2
	bgmfadeout 1
	bgmstop

	mov $416,"ܐQIVaaYrIccv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $417,"@@"
	mov $418,"ucccccc܏YrHv"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	textspeed 200
	gosub *textwright
	\


	mov $401,"sccߘlJB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"䔫gC˒lQ[rB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $403,"@@"
	mov $404,"usDӎvcc甈ꉺC甉勎ꉺIv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	QUAKE 20,200
	gosub *textwright
	@

	mov $405,"@@"
	mov $406,"uݏ݁CqBޗCns\ĉOGBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $407,"@@"
	mov $408,"lQCAꖼx@⊏ZB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"@@"
	mov $410,"u^ILlEIHv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $411,"@@"
	mov $412,"uRdr吺ܒԁccv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $413,"@@"
	mov $414,"uߘl\\ΓIlB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $415,"搶ccs쌹Iߘlccv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $416,"@@"
	mov $417,"ucccIv"
	mov $423,"@苁AcꉺI\"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	mov %120,416: mov %121,420:mov %122,24:gosub *messagefont
	mov %120,423: mov %121,423:mov %122,24:gosub *messagefont
	br
	$417@/
	$423/
	add $417,$423/
	\


	mov $401,"x@aIYxF敗{C"
	mov $402,"R@ՓxeB"
	mov %130,401
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $403,"lQ⁗TVI^C"
	mov $404,"Aݍ{糕s㋎B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"@@"
	mov $406,"uߘa쌹搶YrgnHv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $407,"@@"
	mov $408,"u֓IFB"
	mov $409,"LݜޕߓIC刖ʁC֓VBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $410,"@@"
	mov $411,"ٌYxI񊖁C񓚗{B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $412,"ޗCIRCn筒NB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $413,"Tcc搶cc"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $414,"@@"
	mov $415,"urC运\ꉺJB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $416,"\迎󓞈ꍱtC"
	mov $417,"Aٕsv刐G浑́Bv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $418,"@@"
	mov $419,"u䖾Bv"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"݌YxI܉C䑖OInʏC"
	mov $402,"ߗ撅{FIyB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $403,"莏FIߔЈČiہB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"fIʐGڝSI瑁B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"@@"
	mov $406,"ccޕsRSJH"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $407,"@@"
	mov $408,"\ӓIQ美ݘHC"
	mov $409,"sYrHIB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $410,"搶NߍB"
	mov $411,"iLSy"
	mov $412,"LVLϓIېB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $413,"CRcc"
	mov $414,"vzRlQcc"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $415,"@@"
	mov $416,"fC䗈᳒zI浑̑OC"
	mov $417,"^ٓIB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $418,"YxvCzCIo浑̓Ic"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $419,"߈u㱁C䊴SgItbŋÌŗʁB"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\

	textoff

;ʉFmCY@[vȂ
	dwave 2,"wave\noise01.wav"
;wiFunYAȒPɎʂĂ񂾁v@tF[hȂ@Qb\Ĕwi߂
	bg "cutin\dai5kou\24.jpg",1
	delay 2000
	bg "bg\dai5kou\hasinosita.jpg",1
;aflFfree0508.mp3@iv[v
	bgm "bgm\free0508.mp3"
	texton

	mov $401,"ucc搶ccv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"@@"
	mov $403,"݈ӛΈ䩑RCtIB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"ACߋuG⿁vϑuNIC"
	mov $405,"ĖvL⁗B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"FIcCBnss孍n_엹NC"
	mov $407,"Iꕔn蜉B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"蜓I@E^oIFtEÌŁC"
	mov $409,"썜f􍫌`B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $410,"@@"
	mov $411,"uCYrccCYrρccv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $412,"@@"
	mov $413,"ґRސFIZ́C"
	mov $414,"Aގώ󓞔@ItB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $415,"AݍVI߁C"
	mov $416,"搶ֈ\tC֒៑I̎B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $417,"䐥IԁCaIVlB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $418,"݁CIcEjٖ@B"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"u捊ǓIފC"
	mov $402,"n命B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $403,"gLIkƁCȁC"
	mov $404,"|\Igᚁcc"
	mov $405,"苊\迓InlEHv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"@@"
	mov $407,"uuIccvv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"@@"
	mov $409,"uurCz迗ꍱvBvv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $410,"@@"
	mov $411,"uu苊Jccvv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $412,"@@"
	mov $413,"ٌYxISCWWnSsn񓚁B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $414,"ِsIEa笖]C"
	mov $415,"ISdЁB"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\

	textoff

	bg black,15
	delay 3000

;wiF@ʏtF[h
	bg "bg\dai5kou\gakkou_okujyou.jpg",12
	delay 2000

	texton

	mov $401,"ґR˓wZCASvLSCC"
	mov $402,"n⋍݉~C甜cȁB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $403,"ґRa搶NrC"
	mov $404,"Aߍ\ʏIǓwC"
	mov $405,"^V㱓IgnvpB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"@@"
	mov $407,"ccꎟ꘢dvIB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"@@"
	mov $409,"p͈xCC"
	mov $410,"pX[ݓI󋕗OSB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $411,"ŉˉ꒼kLMB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $412,"C~waC"
	mov $413,"sٕLlCscF҉B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $414,"ccΕ΍g捏Cތҗ͗ʊShspB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $415,"@@"
	mov $416,"ތҗ͗ʁccꐥCYrݓIcc"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $417,"ꐥCYrcc"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\

	textoff

;wiFiuj@tF[hȂ
	bg "bg\dai5kou\gakkou_okujyou_bure.jpg",1
;G\FTV@f@ʒuFE
;G\Fn@^ʖځ@ʒuF
	ld l,":a;tatie\ryouma\majime.bmp",0
	ld r,":a;tatie\nonomi\konwaku.bmp",12

	texton

	mov $401,"ulBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"@@"
	mov $403,"uTVEccv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"@@"
	mov $405,"u݁ccېYrHv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"@@"
	mov $407,"uߒmߘQ羌搶JB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"sCLEHv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"@@"
	mov $410,"uBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $411,"@@"
	mov $412,"uߘlBcQHbفccv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $413,"@@"
	mov $414,"uccI@CYrHv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $415,"@@"
	mov $416,"usmcc"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $417,"sCs꘢dlIlB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $418,"cތGx@IC"
	mov $419,"Fܜk\lČBv"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"ٝىƉ{ғIjC"
	mov $402,"ݑSensLېB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $403,"cFCЉIwҁA幓Il"
	mov $404,"rsLB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"٘ߍl܁CtIىƉ{ҔVIC"
	mov $406,"ȐӒQI݁B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $407,"搶k\ccIJB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"@@"
	mov $409,"u݁CTVBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $410,"@@"
	mov $411,"uHv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $412,"@@"
	mov $413,"uߗLvLHXVIw͓xH"
	mov $414,"vccsBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $415,"@@"
	mov $416,"uvLccsBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $417,"@@"
	mov $418,"u͓݉IxCHIlC"
	mov $419,"{CR@㣔B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $420,"vCЉ㙌Bv"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"ucccI"
	mov $423,"@AZvLHC琥݊Iv"
	mov %120,401: mov %121,401:mov %122,24:gosub *messagefont
	mov %120,423: mov %121,423:mov %122,24:gosub *messagefont
	$401@/
	$423/
	add $401,$423/
	@

	mov $402,"@@"
	mov $403,"uvցBAZvLƁCvLHCƓsϓIlB"
	mov $404,"|ً^Cs݊cc"
	mov %130,402
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"cc֔@ccv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"@@"
	mov $407,"[ЉIlB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"Љr˓IlB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"ґRFa瀉ysCAωڗLB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $410,"@@"
	mov $411,"mCޕsAaߍHlaFlI"
	mov $412,"lЉvYrqϘEB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $413,"cczvlI{௏[VSC{As\IC"
	mov $414,"Ó^IsEB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $415,"ݙWҘawҊEI"
	mov $416,"ޘЉC[Izz[B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $417,"@@"
	mov $418,"s{lcc"
	mov $419,"ݍ{sޔЎIcc"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\

	textoff

	bg black,16
	delay 2000

;wiFC{[ubW@ʏtF[h
	bg "bg\dai5kou\lainbow.jpg",12
	delay 3000

	texton

	mov $401,"FICʁB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"AZޗCĖFs搶B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $403,"ވ_k^B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"ґR^CAcc֐B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"@@"
	mov $406,"uccmccv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $407,"@@"
	mov $408,"ҝSxIaۓ{OSB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"䘸rNMΔC"
	mov $410,"psS͒CboB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

;ʉFW{b
	dwave 2,"wave\mizu07.wav"
	QUAKE 20,300

	mov $411,"@@"
	mov $412,"ΔWIpxȏoC"
	mov $413,"vLݐʏ㒵ECݓCB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $414,"@@"
	mov $415,"@@CޔЎ{ٖ@甉SDB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $416,"r۟I{΍ݐSC"
	mov $417,"r^ŉtB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $418,"@@"
	mov $419,"uuމ^C鑊[Bvv"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\

	textoff

	bgmfadeout 2000
	bgmstop
;ʉFg@iv[v
	bgm "bgm\nami.mp3"
	bg "bg\dai5kou\lainbow_bure.jpg",1
	delay 1000
;GFn@@ʒuF
	ld l,":a;tatie\ryouma\keno.bmp",0
;GF搶@ʏ@ʒuFE
	ld r,":a;tatie\sensei\tuujyou1.bmp",12
	delay 2000

	texton

	mov $401,"C߉ƌoᗹB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"@@"
	mov $403,"uu{z]VIԎVCsC"
	mov $404,"ŗVv@DD֗JB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"ݓI߁C甉lʎW߁Bvv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"@@"
	mov $407,"oCAԉQГIhB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"CӍVs敒ԓIB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"@@"
	mov $410,"u䗝ߓIC"
	mov $411,"AcÈ_XDJB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $412,"ۓ{a߈t|IԁC"
	mov $413,"sLDBʓIGBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $414,"@@"
	mov $415,"uuWIdꕛYrs汓IώqI"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $416,"߈CߒmYrI"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $417,"ÓLFlEIHv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $418,"@@"
	mov $419,"ucccv"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"mȍ݌ӗn勩B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"ccACVߔbŊœؓIߓxC"
	mov $403,"NIۓ{CX甉ٖ@EB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"@@"
	mov $405,"ucc]C甉꘢lÈÁBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"@@"
	mov $407,"u䖾BVIs@AJB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"sCŋNߕs悗C"
	mov $409,"ȁCߓ]ccv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $410,"@@"
	mov $411,"usvIv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $412,"@@"
	mov $413,"uGH^IsvEH"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $414,"kzmJB"
	mov $423,"ꐥ鈒ߘVlBv"
	mov $415,"@"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	mov %120,414: mov %121,420:mov %122,24:gosub *messagefont
	mov %120,423: mov %121,423:mov %122,24:gosub *messagefont
	$414@/
	$423/
	add $414,$423/
	\

	textoff

;GFn@@ʒuF
	ld l,":a;tatie\ryouma\odoroki.bmp",12
	bg black,16
	bgmfadeout 2000
	bgmstop

;

;ʁFSd}i⍂j
	mov %42,3
	gosub *sindenzu

	wait 3000

;

;ʉFS̉@iv[v
	bgm "bgm\heart.mp3"
	delay 2000
;wiFwZOρ@ʏtF[h
	bg "bg\dai5kou\gakkou_gaikan.jpg",16
	delay 3000
;ʁFmCY@tF[hȂ@ODTb\ĉʖ߂
	bg black,1
	delay 500
	bg "bg\dai5kou\gakkou_gaikan.jpg",1
	delay 1000
;ʁFmCY@tF[hȂ@ODTb\ĉʖ߂
	bg black,1
	delay 500
	bg "bg\dai5kou\gakkou_gaikan.jpg",1
	delay 500
;ʁFmCY@tF[hȂ
	bg black,1
	delay 500
	bg "bg\dai5kou\gakkou_gaikan.jpg",1
	delay 1000
;wiF@tF[hȂ
	bg "bg\dai5kou\gakkou_ura.jpg",1
	delay 3000
	bgmfadeout 1
	bgmstop

	texton

	mov $401,"V񓞓IߘlCnB"
	mov %130,401
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"xIܖ@Cs~꘢lB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $403,"CV߁C搶֊C"
	mov $404,"VC瑛ESB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"A܁CČېݍuB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"@@"
	mov $407,"ӁC@ʐߔЉOlZ꘢wIƌFC"
	mov $408,"{lN睈VlsB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"sCޛfRC"
	mov $410,"VܗuFIԁC֐^L\ovB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $411,"vLIoC"
	mov $412,"r蕋svQCvfƐl鈜kÁB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $413,"@@"
	mov $414,"݁CA݈rC"
	mov $415,"AFCrCˍDC"
	mov $416,"֖vzoDa@B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $417,"uߑFIEHvޔВԁCs\ڊJB"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"uC琥ꉔv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"@@"
	mov $403,"A֖݉vvIC"
	mov $404,"nAcC֗Lu{B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"]UgrCҍIgB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"@@"
	mov $407,"uuAC^IvVEHvv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"@@"
	mov $409,"uuYrHvv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $410,"@@"
	mov $411,"uux@sCns×JCLV\IIJccvv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $412,"@@"
	mov $413,"uuvIkB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $414,"ʎs֍D܁CIQ羁C"
	mov $415,"x@kABK^Bvv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $416,"@@"
	mov $417,"ߒ⁗ICịN䆁B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $418,"ŗFvLӛΓߗLlə߁B"
	mov $419,"u{Fړ蕎OnCns笒nNB"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"uus܉񗈁CߗQ羐^ГvBvv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"@@"
	mov $403,"uuCَЉ琥DBvv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"@@"
	mov $405,"uCFލZw蚓Ilˎ{IC"
	mov $406,"ܕsZَЉL_㙌JHvv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $407,"@@"
	mov $408,"uF甑hp뗹JBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"@@"
	mov $410,"uٛٛCZΑdV{ЉB"
	mov $411,"漉FJBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $412,"@@"
	mov $413,"uƖ@C@꘢Q羔\\䴋VIC"
	mov $414,"ϚsXDHv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $415,"@@"
	mov $416,"us֛C߉֔\ĒSl藁Bv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $417,"@@"
	mov $418,"uܕsio藁Bv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $419,"@@"
	mov $420,"uC֐^L\C֐^L\Iv"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\

	textoff

;ʉFUbiݍ݁j@[vȂ
	dwave 2,"wave\step12.wav"
	QUAKE 20,200

;aflFfree0217.mp3@iv[v
	bgm "bgm\free0217.mp3"

	texton

	mov $401,"ߓޗCEEىEB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"䘸rtoCxc{ΒnVFOlB"
	mov $403,"nFB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"@@"
	mov $405,"uu漗CމȓQE͟řߗBvv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"@@"
	mov $407,"uuYAYrHفIHvv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"@@"
	mov $409,"uuCYrݓߔВnIvv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $410,"@@"
	mov $411,"uuÓ˓Iԁcc߁ccvv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $412,"@@"
	mov $413,"u{F꘢ۏokIB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $414,"ρccލƌCRٌ搶cc"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $415,"@@"
	mov $416,"uYr䴋CߑFލ@B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $417,"CޘƎ៓lC꒼CЉzIl"
	mov $418,"ߑFRpmIHISӁcc"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $419,"dCߑF֔\SnIIv"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\

	textoff

;ʉFUb@[vȂ
	dwave 2,"wave\step12.wav"
	QUAKE 10,200
;ʉFYhII@[vȂ
	dwave 2,"wave\bosu21.wav"
	drawfill 255,255,255 : draw
	wait 150 : repaint
	QUAKE 20,500

	texton

	mov $401,"ꌝS͌QIu{IcB"
	mov $402,"ވꌝՒxo{΁CnQ㋎B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $403,"u{BBӓӈ㈏dClWꉺB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@


;ʉFKb@[vȂ
	dwave 2,"wave\bosu32.wav"
	QUAKE 10,100
	delay 200
;ʉFhTb@[vȂ
	dwave 2,"wave\bosu12.wav"
	QUAKE 20,200

	mov $404,"@@"
	mov $405,"IrCҒnᯓ|ݒnB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"׍ݒnIu{{ۏoC"
	mov $407,"ueՉvꐺɋIB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"cIsÕZB"
	mov $423,"ډIߐcccI"
	mov %120,408: mov %121,408:mov %122,24:gosub *messagefont
	mov %120,423: mov %121,423:mov %122,24:gosub *messagefont
	$408@/
	$423/
	add $408,$423/
	@

;ʉFKXb@[vȂ
	dwave 2,"wave\hit76_a.wav"
	drawfill 255,255,255 : draw
	wait 100 : repaint
	delay 300
;ʉFKXb@[vȂ
	dwave 2,"wave\hit76_d.wav"
	drawfill 255,255,255 : draw
	wait 300 : repaint
;EFCgODTb
	delay 500
;ʉFYKb@[vȂ
	dwave 2,"wave\hit61_a.wav"
	drawfill 255,255,255 : draw
	wait 100 : repaint
;ʗh炷
	QUAKE 20,200

	mov $409,"@@"
	mov $410,"EAAĉECOSsIcI"
	mov %130,409
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $411,"]qV@CJ㗹㈒B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@


;ʉFhTb@[vȂ
	dwave 2,"wave\bosu12.wav"
;ʗh炷
	QUAKE 10,200
	mov $412,"ݜޟ|ٚb]nIҍUCcSՉwn|B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $413,"@@"
	mov $414,"umIv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@


;ʉFqbip`Uj@[vȂ
	dwave 2,"wave\swing40_d.wav"
	QUAKE 10,100
	delay 500
;ʉFhb@[vȂ
	dwave 2,"wave\hit61_a.wav"
;ʔtbV
	drawfill 255,255,255 : draw
	wait 100 : repaint
	QUAKE 10,150

	mov $415,"@@"
	mov $416,"Cn嗈IUChI㈔B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@


;ʉFKRb@[vȂ
	dwave 2,"wave\hit_p04.wav"
	drawfill 255,255,255 : draw
	wait 100 : repaint
	QUAKE 10,150

	mov $417,"ᒅߐg߁C^Ȏ]CpIŌI}B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

;ʉFYKAb@[vȂ
	dwave 2,"wave\hit57.wav"
	drawfill 255,255,255 : draw
	wait 100 : repaint
	QUAKE 10,150

	mov $418,"ڒ睓I㈏B៓lB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@


;ʉFhTb@[vȂ
	dwave 2,"wave\bosu12.wav"
;ʗh炷
	QUAKE 15,200

	mov $419,"Aݓn|ICg@Iu{Cns×B"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"uuفIߜމƌCV@B玁C"
	mov $402,"䐥ꕛ䍂ړIώqIvv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $403,"@@"
	mov $404,"ccrŉICމƌB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"ސ^甐lSɓI𗹁B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@


;ʉFUb@[vȂ
	dwave 2,"wave\step12.wav"
	QUAKE 10,200

	mov $406,"@@"
	mov $407,"u{~ƙt㗈B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"ޔÍCeՊŐB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@


;ʉFuIbiLbNUj@[vȂ
	dwave 2,"wave\swing40_cs.wav"
	QUAKE 20,150

	mov $409,"u{aÐgoI߈rC"
	mov $410,"䒵NIgB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@


;ʉFhKAAb@[vȂ
	dwave 2,"wave\hit80.wav"
	drawfill 255,255,255 : draw
	wait 100 : repaint
	QUAKE 20,400
	delay 200
;ʉFhTb@[vȂ
	dwave 2,"wave\bosu12.wav"
;ʗh炷
	QUAKE 10,150
	mov $411,"CI璼ږIcB"
	mov $412,"u{TݒnȁCdd׉񗹒nʁB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $413,"A݉u㱉"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@


;ʉFqDiVxUj@[vȂ
	dwave 2,"wave\swing10r.wav"
;ʗh炷
	QUAKE 10,150
	mov $414,"@@"
	mov $415,"MΗI捊C嗹vCIǵB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $416,"ccύݕߓIcفB"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"uߑzECcIv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"@@"
	mov $403,"ْo̓IcC吺^B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"@˓߈ꉺŒC"
	mov $405,"s\|۝ٙJB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"މƌSsl@ʁC^B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $407,"cc@CsOl拎C"
	mov $408,"֝\oCߑF^ٓB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"AρCc|ْR\͓I搶"
	mov $410,"ܖCJcc"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@


;ʉFUb@[vȂ
	dwave 2,"wave\step12.wav"
;ʏh炷
	QUAKE 10,100
	mov $411,"@@"
	mov $412,"̈ӓٕIU䗓CܑoB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@


;ʉFqDiVxUj@[vȂ
	dwave 2,"wave\swing10r.wav"
;ʗh炷
	QUAKE 10,100

	mov $413,"@@"
	mov $414,"a˕sC\ŐIUkeՏA\CB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $415,"ӁCqݔj͏koFC"
	mov $416,"AC허ܑdCo։pB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $417,"甑ŋI߈u㱁C"
	mov $418,"vLB"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\

;ʉF{LB@[vȂ
	dwave 2,"wave\bosu15.wav"
	drawfill 255,255,255 : draw
	wait 100 : repaint
	QUAKE 20,400
	delay 200

	mov $401,"Cs\ÁCrv@hC"
	mov $402,"cڈꌝcB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $403,"CI@^ꐺB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"@@"
	mov $405,"uꉔIIIIv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"@@"
	mov $407,"ۏoِISCcɋnaȒǵB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@


;ʉFYhII@[vȂ
	dwave 2,"wave\bosu23.wav"
	drawfill 255,255,255 : draw
	wait 100 : repaint
	QUAKE 20,400
	delay 200

	mov $408,"ڒCIc㈑S͓I爯B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"sDӎvCvYrߐS{qhߜޔАlB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@


;ʉFhTb@[vȂ
	dwave 2,"wave\bosu12.wav"
;ʗh炷
	QUAKE 10,150

	mov $410,"cȓ|n@C"
	mov $411,"po螒c𒎎qϖ|稒B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $412,"ސC搶ڋwCߖc`IB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $413,"@@"
	mov $414,"F糎lC甽Iu{C"
	mov $415,"ES|B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $416,"䑖nCcIg̈ݒnB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $417,"@@"
	mov $418,"uuCACYrCvޔЎcc"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $419,"AZr꘢QIVC"
	mov $420,"琥FIRJccvv"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"uurCߖ琥IRBvv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

;ʉFYKb@[vȂ
	dwave 2,"wave\hit76_a.wav"
	drawfill 255,255,255 : draw
	wait 100 : repaint
	QUAKE 20,400
	delay 200

	mov $402,"@@"
	mov $403,"㐧ZnCْIc҈ꌝB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"@@"
	mov $405,"uuccPccvv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"@@"
	mov $407,"uuߑFΉƌCWocߑFSwjI"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"܁CUIXHvv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"@@"
	mov $410,"uuߔЎcc˕s܁ccvv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@


;ʉFYKb@[vȂ
	dwave 2,"wave\hit76_a.wav"
	drawfill 255,255,255 : draw
	wait 100 : repaint
	QUAKE 20,400
	delay 200

	mov $411,"@@"
	mov $412,"uu܁IUIXHvv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $413,"@@"
	mov $414,"uueccccvv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@


;ʉFYKb@[vȂ
	dwave 2,"wave\hit57.wav"
	drawfill 255,255,255 : draw
	wait 100 : repaint
	QUAKE 20,400
	delay 200

;ʉFYKb@[vȂ
	dwave 2,"wave\hit76_a.wav"
	drawfill 255,255,255 : draw
	wait 100 : repaint
	QUAKE 20,400
	delay 200

;ʉFYKb@[vȂ
	dwave 2,"wave\hit_p01_c.wav"
	drawfill 255,255,255 : draw
	wait 100 : repaint
	QUAKE 20,400
	delay 200

	mov $415,"@@"
	mov $416,"uuAmcc܁IdŗccIIvv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $417,"@@"
	mov $418,"uIXH܁Iv"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\

	textoff

	bgmfadeout 1
	bgmstop

	texton

	mov $401,"uVCݜIv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"@@"
	mov $403,"u߁AߑF݊YrIv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"@@"
	mov $405,"AݓnyCIC"
	mov $406,"VawFtZq@ʁB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $407,"mccA_I"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"@@"
	mov $409,"u܁C퓞UIXIHv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $410,"@@"
	mov $411,"u݁CZCفIv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	QUAKE 20,200
	gosub *textwright
	@

	mov $412,"@@"
	mov $413,"VZCc䘸ngfCB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $414,"@@"
	mov $415,"udVI"
	mov $416,"ccFQI"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	QUAKE 10,200
	gosub *textwright
	@

	mov $417,"CICII"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $418,"݁CnIܛIܛIIIv"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\

	textoff

	bg black,16
	delay 2000

;wiFڎ@ʏtF[h
	bg "bg\dai5kou\gakkou_ousetu.jpg",12
	delay 3000

	texton

	mov $401,"R@Cq勎B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"ݍZqpIڑҎI֎qB"
	mov $403,"꒼ݐڎVIB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"@@"
	mov $405,"uȁCsEk՗EB"
	mov $406,"VߘQ羔ICAFBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $407,"@@"
	mov $408,"uґRߜr܁CAFp܎ȖvB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"LYroEHv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $410,"@@"
	mov $411,"uFp\IBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $412,"@@"
	mov $413,"uk浊CϓIo֐s槏[Bv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $414,"@@"
	mov $415,"ccCv\QoB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $416,"ޘnsCu{FC"
	mov $417,"v]筎uvvAȓEB"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"u^甐luCZʁB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"œIwQdcv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $403,"@@"
	mov $404,"uIC^B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"ٌNC䐥o͖WBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"@@"
	mov $407,"ZʘaNtCqlB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"䐥VْIC"
	mov $409,"ݜޔAhFB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $410,"@@"
	mov $411,"uCwZЋ\膌@xE{sC"
	mov $412,"s\ArS勎CJHv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $413,"@@"
	mov $414,"u݁C݁CꉺI"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $415,"ߐ܉ӎ{\EHv"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"u֝QR"
	mov $402,"cOňC"
	mov $403,"Ó֕sZ\EH"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"^C꘢@ŒfC"
	mov $405,"֔ؗrCsEH"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"ޔЕslIsCC膌Bv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $407,"@@"
	mov $408,"uCFːlIcv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"@@"
	mov $410,"uvLoAω@C"
	mov $411,"ٟ|ٔRV͓IlÎCsߘIEHv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $412,"@@"
	mov $413,"ucccv"
	mov $414,"@"
	mov $415,"@"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"CxŉˁCގoVB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"ٕOlSsCp|۝ٙӁB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $403,"CŉIEC"
	mov $404,"vL꘢lFB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"RH󋎋VIwC"
	mov $406,"˗CA@usƁB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $407,"ݎOوIvC꒼UC"
	mov $408,"Inًǖʜވ_C"
	mov $409,"Lau{FmB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $410,"@u{FꖡQҁC"
	mov $411,"rIA\C\B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $412,"@@"
	mov $413,"X|IC"
	mov $414,"\膌@IjQ膎wQҁxI@B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $415,"ޕ@IߍqFC"
	mov $416,"pvLӛΓޗLas羙l߈ϓIRB"
	mov $417,"vL@uB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $418,"܁Cv@üӍJB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $419,"VCݓICC퐢lmI\"
	mov $420,"ڎ膌B"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\

	textoff

;ʉFK`@[vȂ
	dwave 2,"wave\dooropen04.wav"

	texton

	mov $401,"AݜC꘢gtINjl嗈B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"^IIcc"
	mov $423,"sJccrρB"
	mov %120,402: mov %121,402:mov %122,24:gosub *messagefont
	mov %120,423: mov %121,423:mov %122,24:gosub *messagefont
	$402@/
	$423/
	add $402,$423/
	@

	mov $403,"@@"
	mov $404,"uߐCB玁B"
	mov %130,403
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"SZVӑOCӍݐ漗ccv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"@@"
	mov $407,"ZʑF[[nfZvӓIُہB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"ߐIpB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"@@"
	mov $410,"uIICގqh迓YWC"
	mov $411,"Ӎݕsm@漍ߍˍDccv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $412,"@@"
	mov $413,"͔IC\ʌvI]B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $414,"Ug捏C糋yȘaȓIVOI"
	mov $415,"eP؁BޏAV貓I{B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $416,"ϓIV貁CR竗cc"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $417,"@@"
	mov $418,"ccB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $419,"爊ډIgCNB"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"usheʓYWB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"qVNAފwC]eʔ\Iercc"
	mov $403,"苑ccv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"@@"
	mov $405,"V貊SvLى܈ԁCA敒ԁB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"މƌCg桎ȓIʎqC"
	mov $407,"z᳜ގIB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"rVI@CAޘݘwZB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"@@"
	mov $410,"uωȘEHv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $411,"@@"
	mov $412,"uIC^I]ccv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $413,"@@"
	mov $414,"ddI]C"
	mov $415,"\Ғn]ߒB"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\

	textoff

	bg black,12
	delay 2000

;ʉF@iv[v
	dwave 1,"wave\WindA08.wav" : mov $30,"wave\WindA08.wav"
;wiFnL@ʏtF[h
	bg "bg\dai5kou\gakkou_watari.jpg",12
	delay 3000

	texton

	mov $401,"uDC肁Bv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"@@"
	mov $403,"q蕘LCfCىܒԗB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"gEvL˓IqC"
	mov $405,"S\Ios[I٘V貓I{B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"@@"
	mov $407,"uAZwqICC҈計C"
	mov $408,"ߒޔВIwZC"
	mov $409,"B掏oZЖ\͎Hv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $410,"uēV֗L\wݓ藁IߓݑzYrHv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $411,"uCٕʘaC"
	mov $412,"ߒmԑ战EHv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $413,"@@"
	mov $414,"u^ICC֐݌ȁBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $415,"@@"
	mov $416,"vLCƐlI뎧юsÁB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $417,"ȁC\^ޘpB"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"u鴁ccֈCÉV@C"
	mov $402,"߉dVlCR@ߒԈ_Bv"
	mov $403,"ŗőᗹB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"ZCߔ풀ojB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"cCĖsvo݉ʑOBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"@@"
	mov $407,"usH㥁C`VIv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"@@"
	mov $409,"R@Cޒigndf笗B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $410,"ޏwZCC"
	mov $411,"퍂ىƝePcc"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $412,"@@"
	mov $413,"śfLB"
	mov $414,"@"
	mov $415,"@"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\

	textoff

	bg black,16
	delay 4000
	dwavestop 1 : mov $30,""
;ʉFg@iv[v
	bgm "bgm\nami.mp3"
;wiFC{[ubWij@ʏtF[h
	bg "bg\dai5kou\lainbow_hiru.jpg",12
	delay 3000

	texton

	mov $401,"ґRV֑嗺CAEsĉ񋳎B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"ccEswB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $403,"@@"
	mov $404,"ccccccB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"OVCؓsvLVB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"݉~aTV蓏΁CݜޗaF֓VB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $407,"@@"
	mov $408,"ؓITCsߔV@CnIB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"@ʁCcc"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $410,"vL~ߘwIԁC"
	mov $411,"u{FI\AswFB"
	mov $412,"BAsۓWρB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $413,"ҁC@ʉvLtחߎOlC"
	mov $414,"pX얾IڋwIԁcc"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $415,"@@"
	mov $416,"ȗC]UICB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $417,"@CAZ@EB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $418,"䐥ρCu㱏A؁cc"
	mov $419,"Cߍ@isٖ@BB"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\

	textoff
	bg "bg\dai5kou\lainbow_hiru_bure.jpg",1
	delay 1000
;GFn@ʏ@ʒuF
;GF搶@ʏ@ʒuFE
	ld l,":a;tatie\ryouma\tuujyou.bmp",0
	ld r,":a;tatie\sensei\tuujyou1.bmp",12
	delay 2000

	texton

	mov $401,"uȁCsA嗹EB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"ۓ{a߈t|IԁC"
	mov $403,"ٕsLDBʓIccv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"@@"
	mov $405,"uccCӔ@Bv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"@@"
	mov $407,"ρCߒjl⋍ݓߗB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"VܓIԁC|ً^ВJB"
	mov $409,"葁A爗LϓIBǁB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $410,"C{ΒhCSqB"
	mov $411,"{ߕsCԁB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $412,"@@"
	mov $413,"uR@藁HߐŉΒԓIEH"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $414,"@ʜގZߑ񎟙WCߖُCBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $415,"@@"
	mov $416,"Lٗ͒ncԐboܓB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $417,"@@"
	mov $418,"uW皊AuJB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $419,"NޘCߐډŎZraHv"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"u鈒m藁BwZsC"
	mov $402,"RaƗfgnCݓInZsB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $403,"vrQhZIHcc"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"vrAݜޗCnQJBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"@@"
	mov $406,"CߏΒnܒCApuϖsցB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $407,"AZЉCٖ@FJB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"ߊƐgSsRݒncc"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"@@"
	mov $410,"uρCߏAxEHv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $411,"@@"
	mov $412,"uxsxӓsُCC"
	mov $413,"sEϗCva@JBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $414,"@@"
	mov $415,"u@ccsC迌u@H"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $416,"@ʔ\ꉺIԁC"
	mov $417,"迉rHv"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\

	textoff

;GFn@^ʖځ@ʒuF
	ld l,":a;tatie\ryouma\majime.bmp",12

	texton

	mov $401,"uꉺccٓߍƌEHv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"@@"
	mov $403,"uIB@进EvLYrIC"
	mov $404,"ߖsB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"ߔАlԁC迕szArCsJHv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"@@"
	mov $407,"ucccv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"@@"
	mov $409,"ݏ݁ccޒԙߒ^mIgB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $410,"@@"
	mov $411,"u䋳IwFCوOns\rSٖ^៓lB"
	mov $412,"迁C䑼FClsX|CX៓lB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $413,"返勎IClsX|CX៓lB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $414,"运^IÜÈȜϓIBEHv"
	mov $415,"运^IÈӈȜϓIBEH"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $416,"vC迕s꒼Z]EHv"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"uccv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"@@"
	mov $403,"u@Cݗ@kI꘢wC"
	mov $404,"qIC_IwqC"
	mov $405,"A؁CEn៓lBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"@@"
	mov $407,"ucc@kIccHv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"@@"
	mov $409,"uCmJB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $410,"ZЋ\wlēIlBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $411,"@@"
	mov $412,"uccIv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $413,"@@"
	mov $414,"sJCߖRcc"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $415,"މƌoII"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $416,"mccvsߌCIDFAscc"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"ґRrzCApcc"
	mov $402,"ٖ@ےޘjlI쏊CB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $403,"@ʓߘvLۓߌC"
	mov $404,"NsLB\IQҁC"
	mov $405,"]\lʓISJB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"n{琥@B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $407,"{IߎllCsߏImkB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"@@"
	mov $409,"u@C{sEH"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $410,"RЉҒC"
	mov $411,"fߍƌNnjCs֛Bv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $412,"@@"
	mov $413,"uCϓIJB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $414,"ލːLI\B藁Hv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $415,"@@"
	mov $416,"uccv"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\

	textoff

;ʉ~
	bgmfadeout 1
	bgmstop
;ʉFmCY@[vȂ
	dwave 2,"wave\noise01.wav"
;wiFmCY@tF[hȂ@ODTb\ĉʖ߂
	bg "title\logo\noiz.jpg",1
	delay 500
	bg "bg\dai5kou\lainbow_hiru.jpg",0
	ld l,":a;tatie\ryouma\majime.bmp",0
	ld r,":a;tatie\sensei\tuujyou1.bmp",1
	delay 2000
;ʉFmCY@[vȂ
	dwave 2,"wave\noise01.wav"
;wiFulāÂ߂ɐĂ̂ȁHv@tF[hȂ@Qb\ĉʖ߂
	bg "cutin\dai5kou\16.jpg",1
	delay 2000
	bg "bg\dai5kou\lainbow_hiru.jpg",0
	ld l,":a;tatie\ryouma\majime.bmp",0
	ld r,":a;tatie\sensei\tuujyou1.bmp",1
;aflFfree41.mp3@iv[v
	bgm "bgm\free41.mp3"
	delay 1000
;GFn@@ʒuF@tF[h
	ld l,":a;tatie\ryouma\keno.bmp",15

	delay 2000

	texton

	mov $401,"uCr\rρH"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"[{qE{vpB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $403,"dŉBs򔆁B"
	mov $404,"aߍmNYrIC˕sv藁Iv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"@@"
	mov $406,"vցCvݜޔВnBIԁC"
	mov $407,"ߘECrn{a搶]藁H"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"֕ssB֕s\\黁B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"@@"
	mov $410,"urCߑŎZrHv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $411,"@@"
	mov $412,"u歏oCRϏAcJB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $413,"RvCAX{InCn"
	mov $414,"d_Iv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $415,"uߍ`DC\DCDC"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $416,"֖@IqDC"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $417,"BO肎ۓIޘƖDC"
	mov $418,"֍R勎៑IEADC"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $419,"mnbIlDC"
	mov $420,"cVݎЉ媈ÖʓImkDv"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"uލ@cc"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"@@"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright

	mov $403,"݂QPEsvIv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,42:gosub *messagefont
	gosub *textwright
	@

	mov $404,"svCSs{CؓI؁B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"@鈓sssÁCÜ]{IԁC"
	mov $406,"߉AcF{gzoIv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $407,"@@"
	mov $408,"ucc̗܁CߑŎZrHv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"@@"
	mov $410,"uBޘƁB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $411,"R@CcLs[InNN{Bv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $412,"@@"
	mov $413,"uۋNƍَҁCEHv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $414,"@@"
	mov $415,"uvցB"
	mov $423,"sCsz񓞒鍑喷߈꓅B"
	mov %120,414: mov %121,415:mov %122,24:gosub *messagefont
	mov %120,423: mov %121,423:mov %122,24:gosub *messagefont
	br
	$415@/
	$423/
	add $415,$423/
	@

	mov $416,"ݍƐCƔVOCl铖搬ClB"
	mov %130,416
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $417,"vICϓI꘢ƁBv"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"ucc"
	mov $423,"@C߉ʑRkLӎvB"
	mov %120,401: mov %121,401:mov %122,24:gosub *messagefont
	mov %120,423: mov %121,423:mov %122,24:gosub *messagefont
	$401@/
	$423
	add $401,$423/

	mov $402,"ވHCZvLEvB"
	mov %130,402
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $403,"꒼ԝQCߜϓIvΔЁBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"Acc֐NSCtcB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"@@"
	mov $406,"uccӔ@B㞖R槓Im΁Bv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $407,"@@"
	mov $408,"urCNJB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"䐥VCLYrVsǊADBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $410,"@@"
	mov $411,"u߁Hv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $412,"@@"
	mov $413,"uCߓICߓI៓lBC~Bv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $414,"@@"
	mov $415,"wVxB"
	mov $423,"꘢gᚕsIjlB"
	mov %120,414: mov %121,415:mov %122,24:gosub *messagefont
	mov %120,423: mov %121,423:mov %122,24:gosub *messagefont
	br
	$415@/
	$423/
	add $415,$423/
	@

	mov $416,"sCImΜ񒴉Cf͖kqB"
	mov %130,416
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $417,"@ʔ\甑CC߈ρB"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"uccȊ߈꘢VEHv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"@@"
	mov $403,"u֊JBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"@@"
	mov $405,"uLϓI\́C"
	mov $406,"CYrspюs藁Hv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $407,"@@"
	mov $408,"uklB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"{IC"
	mov $410,"sϓIVƌCߑFލNSlBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $411,"@@"
	mov $412,"u@cc^z甓ߍlߙߜދԛB"
	mov $413,"ߍqVFBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $414,"@@"
	mov $415,"uډCߕsv甑FߘEHv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $416,"@@"
	mov $417,"uBv"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\

	textoff

;GFn@ʏ@ʒuF
	ld l,":a;tatie\ryouma\tuujyou.bmp",12

	texton

	mov $401,"uJCVB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"FFp花[IJIv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $403,"@@"
	mov $404,"uDCSӔVBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"@@"
	mov $406,"VˋՒߕӗmmI\__B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $407,"ݑŏYrӁC֐ܐ^I悁H"
	mov $408,"ݓIٖ֝@cc"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"AL_ً^I"
	mov $410,"ޘjla䐥АlB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $411,"@@"
	mov $412,"DccArJI"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $413,"n{C搶cc苊ŒB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $414,"ߑFIC笕sEB"
	mov $415,"@"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\

	textoff

	bg black,16
	bgmfadeout 2000
	bgmstop
	delay 2000
;wiFu{x󂢂\v@ʏtF[h
	bg "cutin\dai5kou\25.jpg",12
	delay 2000
	bg black,12
	delay 3000

;ʉFJX@[vȂ
;wiF[Ă̓i㔼j@ʏtF[h
;wiF[Ă̓iֈړj

	lsp 1,":c;bg\dai5kou\michi.jpg",0,0
	print 16

	dwave 2,"wave\CrowA08.wav"

	delay 1000

	for %199=0 to 199
		gettimer %90
		msp 1,0,-3,0
		print 1
		waittimer (%90+24)
	next

	csp 1

	bg "bg\dai5kou\michi_d.jpg",1

	delay 3000

	texton

	mov $401,"񓞖[㱁CEDgiC"
	mov $402,"chTVIdMa[㱓I`݈NC"
	mov $403,"CZrB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"TVCsF\B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"UFC\җB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"dXɋB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $407,"@@"
	mov $408,"CρC˙r蜟CCRcc"
	mov $409,"a~|肑nCL^W"
	mov $410,"@"
	mov $411,"@"
	mov $412,"@"
	mov $413,"@"
	mov $414,"@"
	mov $415,"@"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\

	textoff

;aflFfree0512.mp3@iv[v
	bgm "bgm\free0512.mp3"
;wiF[Ă̓iuj@tF[hȂ
	bg "bg\dai5kou\michi_bure.jpg",1
;G\FTV@f@ʒuFE@tF[h
;G\Fn@^ʖځ@ʒuF@tF[h
	ld l,":a;tatie\ryouma\majime.bmp",0
	ld r,":a;tatie\nonomi\konwaku.bmp",15
;GtFNgF̉Ԃт
	gosub *sakura
	texton

	mov $401,"ulccIv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"@@"
	mov $403,"^WB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"szFʁCpΕ֐刏㗹B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"ݗ됯IAK橗IiC"
	mov $406,"bܙ嗈ITVC"
	mov $407,"\ꕛvLoIώqCxxSZB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"@@"
	mov $409,"u݁ClccCYrvH"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $410,"Yrss܁CꕕϓIMccv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $411,"@@"
	mov $412,"u]CTVB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $413,"ACErvBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $414,"@@"
	mov $415,"uCwZCEH"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $416,"֐CaƗf笗gnH"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $417,"ccȋΖZI"
	mov $418,"甗l]ݖ[㱗I"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $419,"wZCvX^IԁC\ccv"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"uTVv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"@@"
	mov $403,"pQГIŒf\IԁB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"@@"
	mov $405,"u@ʐ^ϓIԁCAwҁBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"@@"
	mov $407,"uߖrρC˕s݌藁Iv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"@@"
	mov $409,"uA݌Cjl݌IIv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $410,"@@"
	mov $411,"uCYrccߚs[ݓIEHv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $412,"@@"
	mov $413,"uCs[Cs[B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $414,"VVCsݑzꍱىމIC"
	mov $415,"ooْٙncc"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $416,"s[ϓIȁB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $417,"ϕsRhI߁C"
	mov $418,"sz]Bv"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"ucclBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"@@"
	mov $403,"uTVC甉䑖JB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"@ʕsc{dVUNCSsÐSB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"@ʕs_YrC䊈AvLӖBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"@@"
	mov $407,"ucccv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"@@"
	mov $409,"umߒSSB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $410,"ACj~vpBIBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $411,"@@"
	mov $412,"ucccv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $413,"@@"
	mov $414,"ىvLoITVCwܕ\B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $415,"\ISӁcc䑁AmB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $416,"s蓓IlCs\zϓIB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $417,"ccݓI"
	mov $418,"{ٖ@\IB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $419,"ϓIcc{桕sTVB"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\

	textoff

;G\FTV@@ʒuFE@tF[h
	ld r,":a;tatie\nonomi\naki.bmp",15
	delay 1000
	texton

	mov $401,"u^Icclߐ^甐lSccv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"@@"
	mov $403,"u]ccv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"@@"
	mov $405,"uvICߏAJccdĈ蓗B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"aߍs[I@lcc"
	mov $407,"sn۟ԁccߑzIcc"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"R@CYr񓞉gADcc"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"ρCAxccv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $410,"@@"
	mov $411,"uccC񗈓IB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $412,"߁C"
	mov $413,"ȘJCTVBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $414,"@@"
	mov $415,"ulߘ✒`cc"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $416,"sޘ󗹁C֔c䓖wqccv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $417,"@@"
	mov $418,"SSn䀖̒LHrkI~|肓IB"
	mov $419,"Z皓IXB"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\

	textoff

;GtFNg~
	gosub *sakuraend
	bg black,12
	delay 2000

	texton

	mov $401,"udEHv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"@@"
	mov $403,"uCvBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"@@"
	mov $405,"uIIBrFJBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"@@"
	mov $407,"uvIXHv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"@@"
	mov $409,"uIwߗB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $410,"Ǝw蚗@m΁B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $411,"ޘƓIoVB"
	mov $412,"vύ˔\|sI@̐B"
	mov $413,"ccϓICVC݌GB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $414,"vzLIlBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $415,"@@"
	mov $416,"uGC֐^FF藁Bv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $417,"@@"
	mov $418,"uC߈蓑IB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $419,"ICJccv"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\

	textoff

	bgmfadeout 5000
	bgmstop
	wait 5000

;wiFwZ̋@ʏtF[h
	bg "bg\dai5kou\10nengo_kyousitu.jpg",12
	delay 3000
;aflFfree0539.mp3@iv[v
	bgm "bgm\free0539.mp3"

	texton

	mov $401,"uGDMCƑDB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"哾rρHs֐_JHv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $403,"uHzCHGCߙߋNLӎvIvBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"uV藁CIꏊwZBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"uR@CߑFŁCޘBv"
	mov $406,"uߑFȐ鈓ILHv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $407,"uفCفCA㤋\mᗜIv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"u\ߏwZIC刍I㗹Bv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"uDߗIC\\Cv"
	mov $410,"u^D甉䓳F\FbƓIBv"
	mov $411,"ugށCqlsYs藁Bv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $412,"u{vC߉qw@Cv"
	mov $413,"uICccv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $414,"ugCvvCpߔЊ_ŉ䊱vHv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $415,"CӛCsC"
	mov $416,"A֎ZIlg藁B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $417,"Z\ӔVOCQYIVkcc"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

;ʉFwZ̃`C
	dwave 2,"wave\chaim.wav"

	mov $418,"GCkB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $419,"rCECCn]B"
	mov $420,"ȖڐЉwBv"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"uVIegېIЉvB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"ݑƜϐݐV{C"
	mov $403,"Aޘƍݏ\NO^I[B"
	mov $404,"CspEYr͟A\战aH"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"鈓ssÈӋvlƓIB"
	mov $406,"Ƒ糒l~"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $407,"z筎ȓIC茁B"
	mov $408,"ϓIƕs\ʋv]"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"ϓIƍ{s\ʋvgC"
	mov $410,"ЉCn暏o􍭁C"
	mov $411,"śfەsEB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $412,"ܒvЉwIC"
	mov $413,"ܐߑ[~I喷B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $414,"瓯Ӝޘy_Bv"
	mov $415,"@"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"urCCI喷ꐥYr藁H"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"@ʔclIj̈CI"
	mov $403,"Ake՗𗹁B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"kvkvȑOClЉC"
	mov $405,"ڗLb͓Ir藹؁B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"A܁uV̈CvC"
	mov $407,"ߑFƒJH"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"ϓICƓsKlI"
	mov $409,"vLCRI]nB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $410,"A@ʍ}C"
	mov $411,"SIls蕁CiB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $412,"@܁CJ椖~IC"
	mov $413,"܁uV肝fvC"
	mov $414,"ғ~Vzw܁ujrjvC"
	mov $415,"鈓s\@JB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $416,"ALloCsCwxޔЗ@C"
	mov $417,"ƍNs@Ƒ厖"
	mov $418,"NrCޏACI喷Bv"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"u@ʔc̈C喷I͎C"
	mov $402,"ߏAsRӌǍsCRߑFލw"
	mov $403,"Rr莩ȑzIB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"ƉȒoFCs@V@[rB"
	mov $405,"@܁uLPO[CLQT[C"
	mov $406,"rVÏCeAIv"
	mov $407,"AψꌏꌏnrB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"HCYrЉw藁H"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"CƖ{݈Ns@IC"
	mov $410,"pVCޕskEH"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $411,"֗LkƍݓӍs喷C"
	mov $412,"I{luސIB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $413,"ACޔБz@U꘢I庁Bv"
	mov $414,"@"
	mov $415,"@"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"uߍDCډIkdvGB"
	mov $402,"݁CYCh䐸__CdI"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $403,"C喷CӐdIFB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"APpxŁCsǑrIFC"
	mov $405,"v嗹CAwrIx"
	mov $406,"ACB"
	mov $423,"vLލXIB@"
	mov %120,404: mov %121,406:mov %122,24:gosub *messagefont
	mov %120,423: mov %121,423:mov %122,24:gosub *messagefont
	$404
	$405
	$406@/
	$423/
	add $406,$423/
	@

	mov $407,"lvfㄈQlC"
	mov $408,"|s厩IFC"
	mov $409,"Ҕ嗈CIFpSٖ@B"
	mov %130,407
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $410,"R@CߍӛΓlXLIƌC"
	mov $411,"A茚}hCCnݑ\@ځB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $412,"uuߘl܏Yrv\㑋CAVOŎqC"
	mov $413,"xϓIlssCs@[\rJI"
	mov $414,"hߌߎ`I[_CߏA捖_[JIvv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $415,"uu匎gpjrݔZ孑IIv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $416,"uucxjIƌfI"
	mov $417,"cCƏACnޔЉN蛓IlBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $418,"LݜޔЍWoI@C˔\CerIfvv"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"CCBʏA`J肝fA"
	mov $402,"ҍ݊⒆s~jϓIӎ{B"
	mov $403,"A܁Cs吥c꘢忓ICPQ忓InB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"A܁Cs吥c꘢忓IPQ忓InB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"CUrC"
	mov $406,"ݐ^dvICAٖ@oIrB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $407,"ƓsߕsC"
	mov $408,"p֌꜒n\CލːٓIC喷AC"
	mov $409,"BʎЉAݜޔЁw@xIv暕wc"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $410,"ޔЏ߈꒼]QOPON㏉B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $411,"ݜϓỈCfLl⋗oC"
	mov $412,"ߏAC䗝bٗ肁B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $413,"ȌJ肌Ւa"
	mov $414,"IGaqCC"
	mov $415,"ᄏqb͎ғIݛ营"
	mov $416,"rܑƁB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $417,"ґRIlFvL𑼓IԁCAC"
	mov $418,"@ŗCߛEVI喷pc"
	mov $419,"uhImvː嗬y_Bv"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"urC|CC{IPUT胁B"
	mov $402,"w喷Iw^vx߈EBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $403,"u旈ŁCٗ肐@ssn"
	mov $404,"𖯎喷ICJBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"uŏƕЏAuŋNkNSJBv"
	mov $406,"uӁC֑\Ӎ@Bv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $407,"u肍ݔNSIAۋNsÁBՓ{enC"
	mov $408,"ܕsfnƉȓIxҁBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"uśfCލxґFW̍sÁC"
	mov $410,"Gd衔ga㤁Bv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $411,"uFݏʑ⁔dȓIvzC"
	mov $412,"ȋy珘InЉIДЍߍsamsC"
	mov $413,"ę܍ݏANgsÓI󗹁Bv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $414,"uAρCyUIwv^ÁxC"
	mov $415,"I喷bx@a@sٍRC"
	mov $416,"Aݑ命sEsËNIvC"
	mov $417,"w㱊VB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $418,"XsIIC瀈ŋQEܒv"
	mov $419,"擘VxjmV@C"
	mov $420,"IҊSSVIЉBv"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"uR@QOPTNCٗ肈ȂQQӓINSVpC"
	mov $402,"_ޘƁB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $403,"]Ix|C"
	mov $404,"ߍsfCsI@C"
	mov $405,"{S㩟BB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"@CȗCIVbsNC"
	mov $407,"Cw䗝bxC"
	mov $408,"و؎cIśfrbB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"ܔ@CA֐݁C"
	mov $410,"bˑRRBbabhx~IB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $411,"s肈꘢lA\r菊LIB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $412,"AρCeP喷I{ƁC"
	mov $413,"Ő搄×\vB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $414,"GC䈕ělBrkH"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $415,"CYrCnIEH"
	mov $416,"CDVBv"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"uݑzzÈȒuMICAC"
	mov $402,"揊L@sϐΖ^IB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $403,"RC{ޘƓIGyC"
	mov $404,"{CѕsoΖB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"R\dryC"
	mov $406,"ssيOIvuDvB"
	mov $407,"ss鉺B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"{ݔ\ʈ꒼OSZ_B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"Dse×vC"
	mov $410,"p푴ƝCߏA|وӖB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $411,"C甓{ێ{IώqC"
	mov $412,"AKlvrO̗͓I熁B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $413,"CِbCn\vC"
	mov $414,"FyݎgpI}\衋ZB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $415,"꒼ȗݓIZsC"
	mov $416,"o|I衑uC󏫑ێˏB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $417,"ޏAwVƂPxB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $418,"^Cݒnʏ㌚z街͐ڝnNI"
	mov $419,"埃퉻C{C"
	mov $420,"RۉȒBingIVBv"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"uސ^笖I@B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"C{I×͌VƂPB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $403,"A܁CߍzϐΖo戓Iƌ"
	mov $404,"@ʜWVIԁCߏA"
	mov $405,"݌埃퉻ៗB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"CIC"
	mov $407,"u埃퉻C{sАΖC"
	mov $408,"SgpД\^sBv"
	mov $409,"XdvIC"
	mov $410,"C{^sqN@Ah槓ӗpIB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $411,"sDߓ_܁CِbnFC"
	mov $412,"A@CF˔\ݕsOoIv"
	mov $413,"NV^\B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $414,"ވsCAEٖ@j~B"
	mov $415,"VƂQAR蕔ێˏC"
	mov $416,"nI街͐ڝuv擾WB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $417,"R@CpZshoIoC"
	mov $418,"ގݒnʏ㌚BV^}\⋁C"
	mov $419,"śf@IVn拍衁Bv"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"uƑS͈ȕC"
	mov $402,"}\衋ZᗹEۓWB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $403,"蕋D͖Sڝp^}\͗C"
	mov $404,"嘢n̓sL^}\⋘a"
	mov $405,"ڝSCޛE߁B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"AρC{I\Ζ}\"
	mov $407,"UρCALꍱl蜓B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"搥ߍϋDaΖӓIlC"
	mov $409,"R@C⋘aƒsĎgpVRC"
	mov $410,"ܒvsRIl玸dB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $411,"ލlLBlsVI}\m"
	mov $412,"AsLls\QȓIHB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $413,"OCِb"
	mov $414,"HaSmIB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $415,"HCIlOXB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $416,"AݜޘC{ŉQdIE㗐ށB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $417,"sCވؓsݗ肓IdVBv"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"uߍIlC"
	mov $402,"ERC{CInB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $403,"ߏAńB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"CLӜÓIE񋟏Z[a`nC"
	mov $405,"xFIBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"vLcnClAsChIۏDB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $407,"R@CRlFsmC"
	mov $408,"ߍ㐧IHaSmC"
	mov $409,"琏VmB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $410,"ވؓsCȏsCSIЉC"
	mov $411,"C悑mNHB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $412,"ϘsmIlC"
	mov $413,"CwC񖯁xB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $414,"FݓIޘqC"
	mov $415,"{NO։vC"
	mov $416,"ACC񖯓ICdVۗB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $417,"sINCߓRL_skB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $418,"ACRoexCHDhSC"
	mov $419,"ŏdvIZmIlŜkBv"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"uvŒxIŋCIEawEsEIB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"sCௗʖ~CȑϓIlC"
	mov $403,"ˉݜޏwZCZʘaVB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"^s֛CޔЊuB闢ߔАx茙aaIsρC"
	mov $405,"ƓISߓskIB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"lTgnkaC^I꘢DЉB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $407,"ґRِbCnBBlIHC"
	mov $408,"Rۗ|IفC"
	mov $409,"AݑƓsÉCrLklS㏊B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $410,"ʑRCl֐ݎRōB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $411,"ЉsClVB"
	mov $412,"{sĐǋE㗕xTIƁC"
	mov $413,"꘢甍IIƁB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $414,"nANC"
	mov $415,"ߍ浖YI_NaٌmIdVaC"
	mov $416,"{lCnӛΓs\䐥ЊOB"
	mov $417,"ƐSsCnGoޔЊuBv"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"uCRb|L͓IixzC"
	mov $402,"{x|KIwlbxC"
	mov $403,"Cn汓Bv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"u\NOC虐lICCC"
	mov $405,"Ss糎lIoCrsPC"
	mov $406,"A肍ÐC"
	mov $407,"dV}ߍVY}̓Il@C"
	mov $408,"vkIPBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"u݁CI㌾lB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $410,"VuCߍ[|ԉΐA"
	mov $411,"䴘KȏএK䱓IlC"
	mov $412,"FIms|َՉnSdځBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $413,"uߑFvӛꉔB"
	mov $414,"ݓIЉCsR@fPmCv"
	mov $415,"ٖIms|sIB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $416,"@ʕszCAQVIlBv"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"ugށC㱍sB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"rCō@pٍ䗝"
	mov $403,"SEە\IBJBv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"@@"
	mov $405,"wF@ߘ萂PVONIݐaB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"勎OzCCzF鲋NrIqC"
	mov $407,"ߐCWWI닫B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"FvCA笕s]CF"
	mov $409,"ِFh\FIݐS㏊B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $410,"甑ct֍ߍsI@C݉FƐsݓIB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $411,"@C{ȐgC{CAC"
	mov $412,"嘢lsvClB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $413,"eʊOFlCݓ䍑[C"
	mov $414,"苒EߑFI܎qBx"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $415,"@ߑF\FCÈӗ^FsCߏANJB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $416,"sC笕s\Y㈉FIc\mIӁB"
	mov $417,"i㈘SBv"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\

;ʉFwZ̃`C
	dwave 2,"wave\chaim.wav"


	mov $401,"uDECBB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"NChCB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $403,"ESCBƓSWB"
	mov $404,"iaCsBGB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"CٗCVI瀓yݍDB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"فCAyIwLIRxOɁB"
	mov $407,"FvœߘGB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"DCU㈓嵏GIv"
	mov $409,"@"
	mov $410,"@"
	mov $411,"@"
	mov $412,"@"
	mov $413,"@"
	mov $414,"@"
	mov $415,"@"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\

	textoff

	bgmfadeout 2000
	bgmstop

	delay 2000

	texton

	mov $401,"C񔈈ŁC"
	mov $402,"wqFECnڋB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $403,"ґRLKT`IwqC"
	mov $404,"A֐kߒԒnƒB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"^QDwqC^cc"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"@@"
	mov $407,"㜒nCcmDT{B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"ccCIxAB"
	mov $409,"@C䐬mIwZʁB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $410,"ґRqss㏗ՎiIC"
	mov $411,"Af瓾zIFB"
	mov $412,"@"
	mov $413,"@"
	mov $414,"@"
	mov $415,"@"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\

;ʉ~
	dwavestop 3

	mov $401,"ٓ߉ƌC֐ٕsNIB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"cɒI៓lC"
	mov $403,"g捏CpYrsv\CB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"ȁccˉJB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"@@"
	mov $406,"C꘢ٔ\IOCٕsNB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $407,"AƐlIρC"
	mov $408,"rƎCZ_JtJB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"ґRs\]ޔ\ߌZC"
	mov $410,"A甉ᐴEJB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $411,"@@"
	mov $412,"CߊŁccfB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $413,"NSlpȓIoC曑꘢SVIƁB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $414,"FIzᗹB"
	mov $415,"@"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"ޘEDB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"lFkГcnCpRV㱁C"
	mov $403,"vLwCvLZЋ\ܒvICvLwlB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"엢ʓIsIeC"
	mov $405,"vLߍR勎៑AsxIH玗B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"A蕑s[IIcC"
	mov $407,"ݖEV@sĒ\alB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"ƓsيwZaIIݐS㏊B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"@@"
	mov $410,"ґR௏IxTCAޗLSNIxB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $411,"^꘢DEB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $412,"@@"
	mov $413,"ݜޘEI^nCߖ犴悗EH"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $414,"@@"
	mov $415,"݁CIៗF"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"@@"
	mov $402,"@@"
	mov $403,"@@"
	mov $404,"@@"
	mov $405,"@@"
	mov $406,"@@"
	mov $407,"@@"
	mov $408,"@@"
	mov $409,"_CEوlB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $410,"svCAvkB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $411,"\NݝiIOC"
	mov $412,"sLB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $413,"@@"
	mov $414,"SI⁗wqF蓉IΐB"
	mov $415,"@"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\

	textoff
	bg black,1
	mov $30,""
;aflFfree0551.mp3@[vȂ
	bgmonce "bgm\free0551.mp3"
;X^bt[

	wait 3000

	bg "cutin\ending\01.jpg",1

	wait 3000

	bg black,1

	wait 3000

	bg "cutin\ending\02.jpg",12
	bg "cutin\ending\03.jpg",12
	bg "cutin\ending\04.jpg",92

	wait 1000

	bg "cutin\ending\05.jpg",1

	wait 5000
	bg "cutin\ending\06.jpg",1

	wait 4000

	bg "cutin\ending\03.jpg",12

	bg black,12

	wait 3000




	bg "cutin\ending\07.jpg",12
	bg "cutin\ending\08.jpg",12
	bg "cutin\ending\09.jpg",92

	wait 1000

	bg "cutin\ending\10.jpg",1

	wait 5000
	bg "cutin\ending\11.jpg",1

	wait 4000

	bg "cutin\ending\08.jpg",12

	bg black,12

	wait 3000




	bg "cutin\ending\12.jpg",12
	bg "cutin\ending\13.jpg",12
	bg "cutin\ending\14.jpg",92

	wait 1000

	bg "cutin\ending\15.jpg",1

	wait 4000

	bg "cutin\ending\14.jpg",12
	wait 1000
	bg "cutin\ending\16.jpg",1

	wait 4000

	bg "cutin\ending\13.jpg",12

	bg black,12

	wait 3000



	bg "cutin\ending\17.jpg",12
	bg "cutin\ending\18.jpg",12
	bg "cutin\ending\19.jpg",92

	wait 1000

	bg "cutin\ending\20.jpg",1

	wait 4000

	bg "cutin\ending\19.jpg",12
	wait 1000
	bg "cutin\ending\21.jpg",1

	wait 4000

	bg "cutin\ending\18.jpg",12

	bg black,12

	wait 3000



	bg "cutin\ending\22.jpg",12
	bg "cutin\ending\23.jpg",12
	bg "cutin\ending\24.jpg",92

	wait 1000

	bg "cutin\ending\25.jpg",1

	wait 4000

	bg "cutin\ending\24.jpg",12
	wait 1000
	bg "cutin\ending\26.jpg",1

	wait 4000

	bg "cutin\ending\23.jpg",12

	wait 1000

	bg white,16

	wait 3000

	bg "cutin\ending\27.jpg",12

	wait 3000

	bg "cutin\ending\28.jpg",12

	wait 5000

	bg black,18

	wait 5000
;^Cgʂ֖߂
	bgmfadeout 2000
	bgmstop

	mov %2704,1


textclear
	saveoff
;	eLXgz̏
	for %199=201 to 420
		mov $%199,"@"
	next

	bgm "title\Main-Theme.mp3"

goto *title








;K
*scenario1puti

	csp 10
	csp 11
	csp 12
	csp 13
	csp 14

	btndef clear

	mov $100,"JC"

	for %199=19 to 34
		csp %199
	next

	bg black,14

	bgmfadeout 2500

	bgmstop

	wait 4000

;aflFfree0257.mp3@iv[v
	bgm "bgm\free0257.mp3"
;wiF_wEE@ʏtF[h
	bg "bg\dai3kou\homare_syokuin.jpg",12
	delay 3000

	setwindow 8,56,40,40,24,24,0,2,0,1,1,#888888,0,0,800,650
	texton

	mov $401,"̉ƍDFʉ"
	mov $402,"VFFCDvsFkI"
	mov %130,401
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $403,"䐥጖{A莖{abfI"
	mov $404,"B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"ҙ~؈ȔVFCc"
	mov $406,"ȑiVOIpxCIwmVxB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $407,"mB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"֊蓘EH"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"@@"
	mov $410,"ޟEJCCJ[莏eC"
	mov $411,"w@I̎CȋypFC"
	mov $412,"zaֈցB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $413,"ACIw@㈁xkB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $414,"蓜ޔГeIFCȏyݓ__GB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $415,"s蓓IԁC苗pE攍؋lCJB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $416,"[܈ꉺCޟEJCˑRȐ푶GB"
	mov $417,"e֒ʓIC疜d{SSB"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"rCޖ{m藁B"
	mov $402,"ʗD甐l{bI@J`I"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $403,"DwqٕsvbGH"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"wqIԁCߏAkB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"@@"
	mov $406,"[֒CޕiIC݁wFӐExB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $407,"꘢ӐEC͔曑IF㱁B"
	mov $408,"ŋNaӜkCAӗLsB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"݁CߐלލeI"
	mov $410,"ґRsmYrCA{ѓI㱐C"
	mov $411,"QOOVNIPQB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $412,"A܁CQASATҍݑzۖЉ"
	mov $413,"曍oIB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $414,"ψꗈChIA"
	mov $415,"X傌CސKRIB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $416,"rρCQOQONIeʁH"
	mov $417,"EEH"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"ȍChvfwIC֗LwZalCB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"@ܕ䈎zzqw@a䓰ƁCAϓIqB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $403,"VOC̏sӐE{gB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"IƖaYrICs퓰cVnʏoC"
	mov $405,"woIߍC"
	mov $406,"sȓTېICR曍IB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $407,"V悏@V́CSAߘ@BvցB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"@@"
	mov $409,"CghvfC"
	mov $410,"ވ_KlܖꉺB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $411,"ғI@@ʐlB"
	mov $412,"stdZCsSmS\I_B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $413,"ȁCgӐEC{ʁC"
	mov $414,"s\ȂPOO%I~x"
	mov $415,"oEI^B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $416,"]Ɣ\"
	mov $417,"ޑ꘢l曍ҁC"
	mov $418,"ȘlIz@ʏoI@B"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"灊OCޕiЉITsC"
	mov $402,"sCpxvIEya"
	mov $403,"xƁB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"CC甏waF\SׁC"
	mov $405,"ӔƗ乓I美AʓI\萈ȋyIgeB"
	mov $406,"sʔCsʁB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $407,"٘ߍǋޔГeIl܁C"
	mov $408,"\uL_JB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"@@"
	mov $410,"OC{i@֐bcCsSEIB"
	mov $411,"󊎁CBRaہCَbB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $412,"ސCugʗčDI@C"
	mov $413,"@ʖvlœCߖ|وӖvC"
	mov $414,"ސҖ{lIӜÁB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $415,"ȁC@ߑz甑lŊŜޕiIԁC"
	mov $416,"֍qۓsvVB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $417,"r܁C@ߜrCkB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $418,"sCLqOFsC戁C"
	mov $419,"ȋysCieB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $420,"q_C苈vGI"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"DCOAޗC"
	mov $402,"zxCnJJ`B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $403,"搥CB"
	mov $404,"ޘ̎CwmVxޕiIC"
	mov $405,"kIvʓIGB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"@@"
	mov $407,"l꘢IҁC^ccB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"mIƗ"
	mov $409,"VԘsId_wZC"
	mov $410,"ވ_ғIw墓IB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $411,"ݏ[xaIFCIS暍rÁC"
	mov $412,"VƓIwqFp咅FNIpB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $413,"ݜϓIFC暎w蚓IӖC蜓B"
	mov $414,"śfٗ߁B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $415,"㋳ꖡ]rCprӒnIdvB"
	mov $416,"cϗLWIwqFC"
	mov $417,"瘹RsݏJB"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"u{\ߓIlvޔܖ@C"
	mov $402,"Ӑܒ[Iܒ[B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $403,"sCސȈC\C"
	mov $404,"_r˔\r"
	mov $405,"VOC"
	mov $406,"uu\dlIlA`CُCvv"
	mov $407,"ޔБz@A啪B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"@ʑ唈Cr藁H"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"ߏATC肏Is"
	mov $410,"SϓIvB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $411,"@@"
	mov $412,"ӜޘVCݎwlې@C"
	mov $413,"sǍːI@B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $414,"@wVxܓIρC"
	mov $415,"@ʔ\AwIC"
	mov $416,"rxI\R}B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $417,"sC{mIJB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $418,"U@vюsÁC"
	mov $419,"ƏAss_YrB"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"ډ\ꉺ^ccIlCB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"Z݊菬CʊwCwZIwB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $403,"pF͌^vLdQlYrC"
	mov $404,"ߔЍݖ^`LIC"
	mov $405,"uґRmlCAsIwqvB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"蓋hʕB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $407,"s蓓I@vcc"
	mov $408,"wrC\ȓJB"
	mov $409,"ȋ\lCCސI؁B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $410,"vLdI悎DC"
	mov $411,"CۗPw蚁B"
	mov $412,"a肈咅󋕓IlB"
	mov $413,"㗹ϓIHcc"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $414,"ݜC暊ŐϊC"
	mov $415,"CR㱓IsCCnw蚖@B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $416,"ґRivL̒񓞁C"
	mov $417,"AC肓I͏CoC@cbB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $418,"ca肁CqlCLIWC"
	mov $419,"Bݜks\֓JB"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"rCډ񝝁B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"ވꝝJ[ꝝIC"
	mov $403,"TsݏܟpwKBǁxvYrIeB"
	mov $404,"vʗލB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"@@"
	mov $406,"p䇉ԓI߁CFGB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $407,"꘢Zʍ菗qw@hqIaB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"pF͌^vcc"
	mov $409,"Cu\I@uvJH"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $410,"Ӗ󓞗仈IekC"
	mov $411,"Aw@aGI`ېҏhI܍ƁC"
	mov $412,"ҍsl搶IihIB"
	mov $413,"@"
	mov $414,"@"
	mov $415,"@"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"TCލpFӐELI"
	mov $402,"^lcc"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $403,"ғIǓwCV|LݏC"
	mov $404,"r蕓gsٖ@܏oINB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"ꝝg\I`ʁCAI^EʐIB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"ҍCIpFCCgoC"
	mov $407,"RCLF\ғIsC"
	mov $408,"r֗LCɓUB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"ޕiIpFFCL܋dlC"
	mov $410,"L斔C桎wC"
	mov $411,"ҏNIE"
	mov $412,"[[nݗ̎VB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $413,"@@"
	mov $414,"CC桎ғI`ۖCC"
	mov $415,"퍓IlB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $416,"CG򐥔헜ՒIC"
	mov $417,"̎[ғIpWCB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $418,"śfCGrIߍ\rˑIlB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $419,"@嘢ls\LϓISC"
	mov $420,"៑aVVIAsېJcc"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"rCݒlCFEB"
	mov $402,"^ꝝBRsCގo뗹ʏpFB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $403,"搥lFGB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"蓓I@CvwaSܔVIB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"s[I@༒ᎩȊOeIlCȋyjB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"C^p餁C폭N}΁C"
	mov $407,"ܒv\ْjmsMCB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"\I\萔RRC"
	mov $409,"CU\ۉΗCߏA鈖dz\B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $410,"ґRiyۈψՔC"
	mov $411,"ٕFIgSaϐ[؁B"
	mov $412,"CVܗ{ԁC"
	mov $413,"\Arvr˜BB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $414,"BC\̎✐ٓI"
	mov $415,"pFJB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $416,"ŗC\I֕s槑B"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"^`ٔIC꘢dCNNIIl"
	mov $402,"\IFmᗜB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $403,"ޘpFvLdI^C"
	mov $404,"A󗹈ꕔ㤋CVޓI㏋ÉekC"
	mov $405,"\r藹ݓIی^B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"\蓓I@㤋ai曈ӁHjB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $407,"ґRِHkC"
	mov $408,"\oIIu趁B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"zNC䱖琥ߔАS~nؓI^B"
	mov $410,"y{vؓI召B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $411,"TVgI`ʍ{vLC"
	mov $412,"S肊pFB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $413,"m쏗FIC\saIB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $414,"[ֈC\s[I@~B"
	mov $415,"hga䧓svVCBƜޘssB"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"ډCL⦓IzpCBB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"ޘpFvL̓I^C"
	mov $403,"A甐lEsZz\܈u甉䗈ຈꉺvB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"@ʕsސYrӎvC"
	mov $405,"ȊO\ӓIlB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"ґR\hlIېwqCA{௏kl~B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $407,"Csmralr߁C"
	mov $408,"ݎV@CƘaGIiCdȓIS߁B"
	mov $409,"vC꘢\槐nGlIlB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $410,"蓓I@ÐlSI̎B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $411,"s[I@ߍsߘIlB"
	mov $412,"ccsCaGFȗC"
	mov $413,"Ds[uvLIlvB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $414,"@@"
	mov $415,"GAaBCĉ㓡}a쏬C"
	mov $416,"݉@ʐ搶Iw܉CՎiF"
	mov $417,"x嗹[xʓIqB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $418,"B嘰DC"
	mov $419,"ACmC]\L꘢[x]IBǁB"
	mov $420,"ސ㏒ϓIÖ]ʏoIэiB"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"rCډ햟ʓIO"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"@CwVxIґَiYߑsIꐶB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $403,"ޘlvLC"
	mov $404,"\^nvl{awqFIC"
	mov $405,"zvCCIB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"C편wA܈ȋyIsKܖC"
	mov $407,"ߐIl璀暕ȁB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"EϓI៓lC"
	mov $409,"YrwCYrB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $410,"ґRr{ጐl\萗ȓIC"
	mov $411,"Aʜޒi̎^IɋB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $412,"@@"
	mov $413,"xhœILC"
	mov $414,"َiYIld|B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $415,"V@IC꘢wqF\ΎmI݁C"
	mov $416,"甑FƗ^ȑIsKC"
	mov $417,"萊IӖccA"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $418,"IsE甐l㏋^֎ZlIxB"
	mov $419,"^ߐlÈȒuMB"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"ACَiYI_B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"甍caGsËNIC"
	mov $403,"甗y\^SIC"
	mov $404,"ؓsogI܁B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"@@"
	mov $406,"rCډ܍iIJ[ܖB"
	mov $407,"禋\@A[@V@CRCI@B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"ґRpɒnᔻC"
	mov $409,"A@dИV܁C"
	mov $410,"Vsݘ៑I_C"
	mov $411,"ߍpⴎ掄IlFgB"
	mov $412,"ލːg攏݁B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $413,"ݑTCm藹N៑C"
	mov $414,"Җ{lNēV_ЁC"
	mov $415,"A~ލAܐuߜޘEIv疢Ƒ嗹JB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $416,"@肏܁cc"
	mov $417,"uEDCDCQPssvvC"
	mov $418,"ސғIzB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $419,"v֍RBOI៑C"
	mov $420,"u{ٖ@}IB"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"ډpF\B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"搥ܐipIґَiYB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $403,"ZݛfsB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"gCwVxV@CˑR䫎mIlC"
	mov $405,"^\us[vjIGsC"
	mov $406,"c㞖R߁B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $407,"@C˔\JB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"@SCyIpʓIρC"
	mov $409,"ٔCsdVTsB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $410,"CρC"
	mov $411,"֔픪dИVB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $412,"L__E௓IʁC"
	mov $413,"m􍭁Cśf|cc"
	mov $414,"^sړIlB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $415,"蓓I@Cs@ivs蓓IYVB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $416,"s蓁cc܁CsʓIB"
	mov $417,"@|IԁC˓|B"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"ډN꒼CَiY"
	mov $402,"ǍDOIdЗEB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $403,"ޛEى剉𗹁B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"SIE앲FCٕsNB"
	mov $405,"I^AߘlC|ى㕁B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"{ŎZ甑ՖXqIC"
	mov $407,"Aꉺ@ᑾ告C"
	mov $408,"CݓIiB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"灊OCʋ搗pu@oPTOwB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $410,"iddC|hB"
	mov $411,"RCśfB"
	mov $412,"֐\꒼ƐgB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $413,"䐥cdlIKݎʁCcȓIō@B"
	mov $414,"@َiY͓I藁B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $415,"蓓I@ccCߑFsmIB"
	mov $416,"sv񓞊pFCۗ軁B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $417,"s[I@B"
	mov $418,"@GؗLCۉ΁B"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"OʐIsǏCґiەij䱁B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"ґRvL^CA@ʔcIie\_C"
	mov $403,"\AJB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"a\IXqρCsIlB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"sC@ʒґƈ꒼KxxIԁC"
	mov $406,"smtϓI̎Aٖ@WCcc"
	mov $407,"ccތva@B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"蓓I@`[Bވ_hB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"s[I@奁B"
	mov $410,"ґRLД\k蔏IuC"
	mov $411,"A\S֐kLwqIlB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $412,"[ֈCݜޘFAFaېFiFxIEC"
	mov $413,"Cd꘢cېFIpF"
	mov $414,"L[ӖIB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $415,"L\َiYScF񗈓IpB"
	mov $416,"ْԕܗzv萓IؓeB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $417,"OC\琥{쒆B꘢C"
	mov $418,"C藹IlB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $419,"蓒`[ޘCCT琥RIJB"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"ڒC̎ĺB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"䓰ysmtoIwC"
	mov $403,"őpFCIA\B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"caG\^m៓lIHC"
	mov $405,"rٖ@ވ_Ilra藁H"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"CޘVIāC"
	mov $407,"us@ƈؓseCCosJBv"
	mov $408,"ޏAl͏oIrāB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"wZAƒAЉC"
	mov $410,"gSsxxZIyC"
	mov $411,"Oِlfψ꘢nC"
	mov $412,"ލEoB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $413,"ގZCIw餉ƏoxC"
	mov $414,"AϓIdVȁC"
	mov $415,"Ӊ甐luSB"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"ҏE餉ƏoB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"AYρC"
	mov $403,"ca֖ʍǒwC"
	mov $404,"ƎlCyInOc"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"ACˑRCnzƁC"
	mov $406,"Ҕ허QIlC"
	mov $407,"B֐kA񋎗B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"ݑzNCct甐lQ㵁B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"@@"
	mov $410,"ȍ@C"
	mov $411,"ޔЍsCApsIs͗sB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $412,"ґRǓƓICAsݑ厩RC"
	mov $413,"]xVIC"
	mov $414,"甐l^CnvlȁB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $415,"@ݓIlfaWC"
	mov $416,"vsꉺJB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $417,"sCߓISNB"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"ґRgsIԎVsցC"
	mov $402,"ʑRCSId_@@B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $403,"ݜގJCICC"
	mov $404,"iI@V̐Ȑ^ӑݓICRʐIB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"RsܐwIxC"
	mov $406,"scK^ꉺV悏@IA\B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $407,"VOC{֗LBߐlQIV̑݁B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"@@"
	mov $409,"L@I{C"
	mov $410,"sَRI^hؔVSB"
	mov $411,"ސғoIB@B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $412,"s甐lKI_C"
	mov $413,"LٍKICȋyFKISÁB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $414,"ވBvLzIܖ@C"
	mov $415,"ANŒSsmʓIʚC"
	mov $416,"s@pȓIӎu꘢DICsEH"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"DDCrډpF\B"
	mov $402,"C@vِlfC"
	mov $403,"dvIolL꘢B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"ᐢVS䓰yC"
	mov $405,"꘢ȕscIǓƐIB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"̎ICݛfIsB"
	mov $407,"ސ꘢[xN㏓IDInB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"\\槗^ʁC"
	mov $409,"rśf萓哹IEC"
	mov $410,"䓰yIC葊養B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $411,"pFI^C"
	mov $412,"w璆䧌gxIwxB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $413,"yȖݖ[㱗擒藁B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $414,"A蕐I\s\|s݈ӒnG刁C"
	mov $415,"ŗC\ܓsvVJH"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $416,"\蓓I̘aRB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@


	mov $417,"nWÕ蕑̐߁B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $418,"s[I@lN蛓ISB"
	mov $419,"ݟBǓIEC"
	mov $420,"\ݍԛdiHCCʏ̈B"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"R@}ō@ITB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"cIvHAGIFAَiYITAyI^B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $403,"śf͟EIlٗ肁C"
	mov $404,"C~ېI؁C"
	mov $405,"ޘƈvVHB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"j䐥ݕsfB"
	mov $407,"PVONIҒoI{C"
	mov $408,"꘢^QOOVNSsIЉB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"@@"
	mov $410,"喷CِlbC"
	mov $411,"r\VC^TЉᐴEC"
	mov $412,"̓ss^ЉC}ʐmC|VYړI䗉B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $413,"\LRaٓIC"
	mov $414,"AސҗzIЉB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $415,"CFKlsEِΖIЁC"
	mov $416,"v͘nI悁B"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"rCBVOC旈\TIlCJB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"Cݗ@sB"
	mov $403,"lٗ肓I^C"
	mov $404,"ݖEIgVumB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"{bŁCd\ŉˁC甐luB"
	mov $406,"AśfCpȓI͗ʋpYrsv\桏ZB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $407,"蓓I@CדߔЌ͑IIЁB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"s[I@֓I㱁B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"aTVIgnCFȏlxB"
	mov $410,"݉{V@CqlfNB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $411,"VI{CR肁AcNSlpCIC"
	mov $412,"wVxnf筎꘢Ҏ桓IpFB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $413,"u|擔\槉ЉIwqv"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $414,"E吔\NIẃCfFoz^I߈ꍏC"
	mov $415,"V@rϗCAsmB"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"pF\Iō@ʐC"
	mov $402,"AkȓITVB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $403,"ґRvL^CA\ƍsIlB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"Cܓ֐DҁB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"uIZmRynk`vTAޔАB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"@ʕsm琥YrIԁC"
	mov $407,"ȋ貁B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"蓓I@vcc٘ޘl܁CT\ȓJB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"ґRsyO{UIdjC"
	mov $410,"A{㑊gI@\sgꉺB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $411,"s[I@煓IHBY⏑\h煁CE܌B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $412,"C@C\꒼w͒񏡎ȁC"
	mov $413,"nfҒI{B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $414,"@@"
	mov $415,"ccDCȏAe͟EIJ[ܖB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $416,"֗LkzʓIeC"
	mov $417,"A@ʎʓʓIԁCZ͏AvC"
	mov $418,"ȏAC~JB"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"śfCޕidے藹喷I݁B"
	mov $402,"CC@ʕsϘCAٖ@B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $403,"Ll⋏oÊv"
	mov $404,"ۍݓIv꒼]B"
	mov $405,"ٍ[Ms^"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"CޔБz@NhXIlC"
	mov $407,"曍엹smtB"
	mov $408,"ęܐlFRЉI"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"ęܐlFRЉC"
	mov $410,"ً^ޘEImB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $411,"RC֔@C"
	mov $412,"FKlB"
	mov $413,"@"
	mov $414,"@"
	mov $415,"@"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"i`⦓IwފݐEx"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $402,"꘢@^_|I㱁B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $403,"ݜޘEC@ٓIC"
	mov $404,"I^HB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"RCݔފݐEC^k@VC"
	mov $406,"lClI{ுC"
	mov $407,"CI{ுC"
	mov $408,"sC\B"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"@@"
	mov $410,"\EIlFC"
	mov $411,"QPL꘢[xzIEҒFB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $412,"x萁ClΐOΐsB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $413,"LIas펡ClݍHC"
	mov $414,"vL䔑ٓID͍ݓVāB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $415,"Ϗ[xz^]IQPC"
	mov $416,"I藁H"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"@CCEʑIȁC"
	mov $402,"ߑF萗l㱓ImB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $403,"KlRFp萄ÁB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $404,"@vCwVxssoB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $405,"៙W៍@浗Im浕mC"
	mov $406,"ޘ{XDB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $407,"@ʉFȕsC"
	mov $408,"鈉藁H"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $409,"@@"
	mov $410,"萓ICsE萗B"
	mov $411,"ډ\\MB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $412,"@ʔ\LI꘢lC⋏oxC"
	mov $413,"ғIw͈ړIB"
	mov $414,"@"
	mov $415,"@"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\


	mov $401,"튴\{VIiC"
	mov $402,"^S迓IxB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $403,"Љᔻ܁C"
	mov $404,"zމ\ꎟ琥ō@ꎟC"
	mov $405,"sFIVÍCnB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $406,"@ʗLIԁC]\ݑiC"
	mov $407,"Ď^近FB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $408,"@@"
	mov $409,"rCeʁC苑ۏdB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $410,"ÉF[ImawqFIKxB"
	gosub *textget
	mov %120,%130: mov %121,%131:mov %122,24:gosub *messagefont
	gosub *textwright
	@

	mov $411,"@@"
	mov $412,"@@"
	mov $413,"QOOVNPQ@@軎Б\@"
	mov $414,"@"
	mov $415,"@"
	mov $416,"@"
	mov $417,"@"
	mov $418,"@"
	mov $419,"@"
	mov $420,"@"
	gosub *textget
	mov %120,%130: mov %121,420:mov %122,24:gosub *messagefont
	gosub *textwright
	\

	textoff

	bg black,16
	bgmfadeout 2000
	bgmstop

;^Cg֖߂

textclear
	saveoff
;	eLXgz̏
	for %199=201 to 420
		mov $%199,"@"
	next

	bgm "title\Main-Theme.mp3"

goto *title






