@cin_soto
tan=1
;ꏊZNg[BftHIŁB
ǂɍs܂H
;select "߂̐X",@cin_soto_tan1,"",@cin_soto_tan2,"C",@cin_soto_tan3,"_ɖ߂",@sin_s_001
@cin_asa
XWD̍ɊGAEɑI̕\ł[B
;ɃLAEɑIi98.txtj
sel_x=1280/2
sel_y=100
;sel_x=50+250
;sel_y=410+40+70+45
cin_sp_syu=0	;P͉摜gAO͕
for %0=1 to 10
cin_goto_select[%0]=""
cin_goto[%0]=""
next
sin_sel_kazu=3	;gI̐
cin_goto_select[1]="A"	;摜ƕɒӁI I
cin_goto_select[2]="ɊG"	;摜ƕɒӁI
cin_goto_select[3]="Eɕ񂾂["	;摜ƕɒӁI
cin_goto[1]="@cin_ra_asa"	;I̔ѐ惉x
cin_goto[2]="@cin_ha_asa"	;I̔ѐ惉x
cin_goto[3]="@cin_di_asa"	;I̔ѐ惉x
spsetvisible "ste",1	;PŃXe[^X\
goto @cin_select_r	;IĂяoiLAEIj
goto @cin_asa	;[v


@cin_soto_end
;TGhB̗͂OȉłɁB
;tan=tan+1
PI܂BhɋA҂܂B
;ȂTIPSB
goto @sin_s_001

@cin_40_main
tan=1	;T

@cin_soto_rand
tan=tan+1
ste[1]=ste[1]-1	;̗͏
gosub @sin_ste	;Xe[^X
̗͂PĒT܂B
if ste[1]<=0 then goto @cin_soto_end	;ȂȂ炱B
RANDOMSEED 0
%r=RANDOM() mod 3	;_
if %r==0 then goto @sin_battle_start	;22.txt퓬
if %r==1 then
	̗͂T񕜂I
	ste[1]=ste[1]+1
	gosub @sin_ste	;Xe[^X
	if ste[1]>=ste[2] then ste[1]=ste[2]	;S񕜂łڂȂ悤ɂĂ
	goto @cin_soto_rand
endif
if %r==2 then
	ACeEI
	RANDOMSEED 0
	%r=RANDOM() mod 6	;_
	%r=%r+2
	;_[W",text_name[3]
	if %r==2 then %0=2:item[%0]=item[%0]+1:text_name[3]=item[%0][0]
	if %r==3 then %0=3:item[%0]=item[%0]+1:text_name[3]=item[%0][0]
	if %r==4 then %0=4:item[%0]=item[%0]+1:text_name[3]=item[%0][0]
	if %r==5 then %0=5:item[%0]=item[%0]+1:text_name[3]=item[%0][0]
	if %r==6 then %0=6:item[%0]=item[%0]+1:text_name[3]=item[%0][0]
	if %r==7 then %0=7:item[%0]=item[%0]+1:text_name[3]=item[%0][0]
endif
_[WPEI
	goto @cin_soto_rand

