@sin_battle_start_02
;22.txtŊB
;키G߂i݂ɁjAPOOŃ{XAPOOOŃX{X̖BPOOOȊO͓G؂悤B
;炦[őS\̓AbvB
;퓬͋AOŖ͂PCRCUCƂȂB
;ɁAG߂Ǝ󂯂_[WȂB݂̗̑͂ŁAG搧U邱ƂB
;ƂB

@sin_battle_enemysel_02
if tan==1000 then gosub @sin02_enemy_1000:goto @sin_battle_syoki_02	;X{X
if tan==900 then gosub @sin02_enemy_900:goto @sin_battle_syoki_02	;X{X
if tan==800 then gosub @sin02_enemy_800:goto @sin_battle_syoki_02	;X{X
if tan==700 then gosub @sin02_enemy_700:goto @sin_battle_syoki_02	;X{X
if tan==600 then gosub @sin02_enemy_600:goto @sin_battle_syoki_02	;X{X
if tan==500 then gosub @sin02_enemy_500:goto @sin_battle_syoki_02	;X{X
if tan==400 then gosub @sin02_enemy_400:goto @sin_battle_syoki_02	;X{X
if tan==300 then gosub @sin02_enemy_300:goto @sin_battle_syoki_02	;X{X
if tan==200 then gosub @sin02_enemy_200:goto @sin_battle_syoki_02	;X{X
if tan==100 then gosub @sin02_enemy_100:goto @sin_battle_syoki_02	;X{X
;{XAG
if tan<100 and tan>=0 and tane==0 then gosub @sin02_100a:tane=1:goto @sin_battle_syoki_02	;tane͓G̎ށBQ݂̌ɏoB
if tan<100 and tan<=0 and tane==1 then gosub @sin02_100b:tane=0:goto @sin_battle_syoki_02	;
if tan<200 and tan<=101 and tane==1 then gosub @sin02_200b:tane=0:goto @sin_battle_syoki_02
if tan<200 and tan<=101 and tane==0 then gosub @sin02_200a:tane=1:goto @sin_battle_syoki_02
if tan<300 and tan<=201 and tane==1 then gosub @sin02_300b:tane=0:goto @sin_battle_syoki_02
if tan<300 and tan<=201 and tane==0 then gosub @sin02_300a:tane=1:goto @sin_battle_syoki_02
if tan<400 and tan<=301 and tane==1 then gosub @sin02_400b:tane=0:goto @sin_battle_syoki_02
if tan<400 and tan<=301 and tane==0 then gosub @sin02_400a:tane=1:goto @sin_battle_syoki_02
if tan<500 and tan<=401 and tane==1 then gosub @sin02_500b:tane=0:goto @sin_battle_syoki_02
if tan<500 and tan<=401 and tane==0 then gosub @sin02_500a:tane=1:goto @sin_battle_syoki_02
if tan<600 and tan<=501 and tane==1 then gosub @sin02_600b:tane=0:goto @sin_battle_syoki_02
if tan<600 and tan<=501 and tane==0 then gosub @sin02_600a:tane=1:goto @sin_battle_syoki_02
if tan<700 and tan<=601 and tane==1 then gosub @sin02_700b:tane=0:goto @sin_battle_syoki_02
if tan<700 and tan<=601 and tane==0 then gosub @sin02_700a:tane=1:goto @sin_battle_syoki_02
if tan<800 and tan<=701 and tane==1 then gosub @sin02_800b:tane=0:goto @sin_battle_syoki_02
if tan<800 and tan<=701 and tane==0 then gosub @sin02_800a:tane=1:goto @sin_battle_syoki_02
if tan<900 and tan<=801 and tane==1 then gosub @sin02_900b:tane=0:goto @sin_battle_syoki_02
if tan<900 and tan<=801 and tane==0 then gosub @sin02_900a:tane=1:goto @sin_battle_syoki_02

;G------------------------------------/////////////////////////////////////////////////////
;-------------------------------------------------------
@sin02_100a
enemy[-1]=""
enemy[-2]="enemy/001.png"
enemy[1]=10	;̗
enemy[2]=3	;U
enemy[5]=2	;ACe
return
;-------------------------------------------------------

;{X------------------------------------//////////////////////////////////////////////////////



@sin_battle_syoki_02
;GB
tankyo=10	;퓬̋BPO
%m=10	;́iŕϓj
spset "title",10
gosub @sin_textw_btn_kakusi	;{^\

text_name[2]=enemy[-1]
G̖OꂽI
spset "e",1001
sp "e:enemy",{name=enemy[-2],x=0,y=0,z=10}

;QlȏłꍇBPlȂPɌŒB
;NU܂H

;98.txt̉ϑIďoiQl̂ǂ炩PlIԏꍇj
;Oɐݒ肵ĂI
;sel_x=50
;sel_y=410+40+70
;sin_ssl_kazu=2	;I̐
;sin_sei[1]`	;I̓e
;sin_return[1]`	;߂w
;if item[22]==1 then sin_sei[1]="l"
;if item[23]==1 then sin_sei[2]="O"
;sin_return[1]="@sin_b_1a_02_sel1"
;sin_return[2]="@sin_b_2a_02_sel2"
;gosub @sin_select_001	;IĂяo

;퓬Pl̂ƂÂ܂܃X[B
;^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
@sin_b_1a_02_sel1
;lŐ퓬ilXe[^Xj
sin_02_chr=1:goto @sin_battle_02_lp
@sin_b_2a_02_sel2
;OŐ퓬ilXe[^Xj
sin_02_chr=2:goto @sin_battle_02_lp
;^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^

@sin_battle_02_lp
;iViI̓rƂłˁj
spdelete "window:nametext" ;Õ^O
spfill "window:text",0,#00000000:print #C	;oOƂB^񒆂ɐlȂƃ_
;GƂ̋
%kyori=STR(tankyo):sp "e:kyo",{name="?GƂ̋@"+%kyori+",text_a",x=50,y=50,z=0}:print #C

gosub @sin_ste	;Xe[^X



;98.txt̉ϑIďo
;Oɐݒ肵ĂI
sel_x=50
sel_y=410+40+70
sin_ssl_kazu=4	;I̐
;sin_sei[1]`	;I̓e
;sin_return[1]`	;߂w
for %0=1 to 5
sin_sei[%0]=""
next
sin_sei[1]="l߂`UɁAGɋ߂Â"
sin_sei[2]="@U@@`ɂĖ͏ς܂"
sin_sei[3]="h@@@@`͂񕜂܂"
;if item[22]==1 and item[23]==1 then sin_sei[4]="KEZ@@@`lōU܂"
sin_sei[4]="XL@@@`Zg܂"
sin_return[1]="@sin_b_1a_02"
sin_return[2]="@sin_b_2a_02"
sin_return[3]="@sin_b_3a_02"
:sin_return[4]="@sin_b_4a_02"	;͋ẐƂ̂
sin_return[4]="@sin_b_4b_02"	;23.txtŁB
gosub @sin_select_001	;IĂяo

;퓬͂ǂ炩BŏɍUƂ򂳂ĂB

@sin_b_1a_02
;ʁBPOB
if sin_02_chr==1 then
tankyo=tankyo-2
Q߂I
if tankyo<0 then tankyo=0
endif

if sin_02_chr==2 then
then tankyo=tankyo-3
R߂I
if tankyo<0 then tankyo=0
endif
%kyori=STR(tankyo):sp "e:kyo",{name="?GƂ̋@"+%kyori+",text_a",x=50,y=50,z=0}:print #C

;G̃^[
goto @sin_battke_enemy_02

;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
@sin_ba_02_ma10
͂ȂȂ܂I
͂߂܂B
if sin_02_chr==1 then ste[32]=ste[32]+10
if sin_02_chr==2 then ste[37]=ste[37]+10
if ste[32]>ste[33] then ste[32]=ste[33]
if ste[37]>ste[38] then ste[37]=ste[38]
;G̃^[
goto @sin_battke_enemy_02

@sin_b_2a_02
;@U
if sin_02_chr==1 then
	if tankyo<0 then %m=1
	if tankyo<5 then %m=5
	if tankyo<=10 then %m=10
	%k=ste[34]+ste[30]	;U͂ƌ݂̗̑
endif
if sin_02_chr==2 then
	if tankyo<0 then %m=1
	if tankyo<5 then %m=5
	if tankyo<=10 then %m=10
	%k=ste[39]+ste[35]	;U͂ƌ݂̗̑
endif
;͑ȂPO񕜁B
if tankyo==10 and %m<10 then
	goto @sin_ba_02_ma10
endif
if tankyo<5 and %m<4 then
	goto @sin_ba_02_ma10
endif
if tankyo<0 and %m<0 then
	goto @sin_ba_02_ma10
endif
;͏
if sin_02_chr==1 and %m==10 then ste[32]=ste[32]-10
if sin_02_chr==2 and %m==10 then ste[38]=ste[38]-10
if sin_02_chr==1 and %m<=5 then ste[32]=ste[32]-5
if sin_02_chr==2 and %m<=5 then ste[38]=ste[38]-5
if sin_02_chr==1 and %m<=1 then ste[32]=ste[32]-1
if sin_02_chr==2 and %m<=1 then ste[38]=ste[38]-1
;U{B
if enemy[1]<=%k then %win=1:goto @sin_battle_serihu_02	;䎌֔ԁB
;_[W^BB



sp "e:enemy",{name=enemy[-2],x=0,y=0,z=10}
wait 200,1
sp "e:enemy",{name=enemy[-2],x=0,y=0,z=10,blend=1}
wait 200,1
sp "e:enemy",{name=enemy[-2],x=0,y=0,z=10}
wait 200,1
;U
seplay 1,"rpg_sozai/se/player_a_ma.ogg"	;@U

text_name[3]=str(%k)
enemy[1]=enemy[1]-%k:%win=0	;winO͐퓬sBG^[B
goto @sin_battle_serihu_02	;䎌֔ԁB

@sin_b_3a_02
;hB͑S
if sin_02_chr==1 and %m==10 then ste[32]=ste[33]
if sin_02_chr==2 and %m==10 then ste[37]=ste[38]
WĖ͂S܂I
;G̃^[
goto @sin_battke_enemy_02

@sin_b_4a_02
;KEZBlĂ̗͂΁B
if sin_02_chr==1 then
	if tankyo<=10 then %m=10
;	%k=ste[34]+ste[30]	;U͂ƌ݂̗̑
endif
if sin_02_chr==2 then
	if tankyo<=10 then %m=10
;	%k=ste[39]+ste[35]	;U͂ƌ݂̗̑
endif
	%k=ste[39]+ste[35]+ste[34]+ste[30]	;U͂ƌ݂̗̑
;͑ȂPO񕜁B
if tankyo==10 and %m<10 then
	goto @sin_ba_02_ma10
endif
;͏
if sin_02_chr==1 and %m==10 then ste[32]=ste[32]-10
if sin_02_chr==2 and %m==10 then ste[38]=ste[32]-10
;U{B
if enemy[1]<=%k then %win=1:goto @sin_battle_serihu_02	;䎌֔ԁB
;_[W^BB
sp "e:enemy",{name=enemy[-2],x=0,y=0,z=10}
wait 200,1
sp "e:enemy",{name=enemy[-2],x=0,y=0,z=10,blend=1}
wait 200,1
sp "e:enemy",{name=enemy[-2],x=0,y=0,z=10}
wait 200,1
;U
seplay 1,"rpg_sozai/se/player_a_ma.ogg"	;@U

text_name[3]=str(%k)
enemy[1]=enemy[1]-%k:%win=0	;winO͐퓬sBG^[B
goto @sin_battle_serihu_02	;䎌֔ԁB

@sin_battle_serihu_02
text_name[3]=str(%k)
;̃Zt
if %win==0 then
;_[W^BB
sp "e:enemy",{name=enemy[-2],x=0,y=0,z=10}
wait 200,1
sp "e:enemy",{name=enemy[-2],x=0,y=0,z=10,blend=1}
wait 200,1
sp "e:enemy",{name=enemy[-2],x=0,y=0,z=10}
wait 200,1
;U
seplay 1,"rpg_sozai/se/player_a_ma.ogg"	;@U

G̖OɁ_[W_[W^I
if %win==0 then goto @sin_battke_enemy_02
endif
if %win==1 then
;_[W^BB
sp "e:enemy",{name=enemy[-2],x=0,y=0,z=10}
wait 200,1
sp "e:enemy",{name=enemy[-2],x=0,y=0,z=10,blend=1}
wait 200,1
sp "e:enemy",{name=enemy[-2],x=0,y=0,z=10}
wait 200,1
;U
seplay 1,"rpg_sozai/se/player_a_ma.ogg"	;@U

G̖OɁ_[W_[W^I
G̖OɏI
if %win==1 then goto @sin_battle_win_02
endif
if %win==-1 then
;h炷B
quake 300,3,1	;ԁAKATCY

G̖OɁ_[W_[W󂯂I
G̖OɔskccB
if %win==-1 then goto @sin_battle_lose_02
endif

@sin_battke_enemy_02
%k=enemy[1]+enemy[2]	;GU
;G̃^[
if sin_02_chr==1 and ste[30]<%k then %win=-1:goto @sin_battle_serihu_02
if sin_02_chr==2 and ste[35]<%k then %win=-1:goto @sin_battle_serihu_02
;ɍU
if sin_02_chr==1 then
	ste[30]=ste[30]-%k
endif
if sin_02_chr==2 then
	ste[35]=ste[35]-%k
endif
%win=0	;winO͐퓬s
;h炷B
quake 300,3,1	;ԁAKATCY

;U
text_name[3]=str(%k)
G̖O灔_[W_[W󂯂I
goto @sin_battle_02_lp	;̃^[ցB

;////////////
@sin_battle_win_02
spsetdelete "e":print #c	;GƂ폜
퓬ɏI
;ACe肷B
item[enemy[5]]=item[enemy[5]]+1
text_name[3]=item[enemy[5]][0]
_[WPɓꂽI
;ACeɂ\͕ω
;gosub @cin_item_ste	;ŃXe[^XŒ艻
;gosub @cin_item_steup
;\͏グB
îŕʂցj
goto @sin_win02_steup
@sin_win02_gooto
gosub @sin_ste	;Xe[^X
;Pi
ste[1]=ste[1]-1
if ste[1]==0 then
l̍s̗͂ŝŋ_֋A܂B
goto @sin_s_001	;10.txt
endif
tan=tan+1	;Tx{P
;Ti͐퓬js
goto @sin_battle_start_02

;/////////////sk
@sin_battle_lose_02
spsetdelete "e":print #c	;GƂ폜
퓬ɕB
;t肷iS\́{Pj
if sin_02_chr==1 then ste[31]=ste[31]+1:ste[33]=ste[33]+1:ste[34]=ste[34]+1:item[101]=item[101]+1
if sin_02_chr==2 then ste[36]=ste[36]+1:ste[38]=ste[38]+1:ste[39]=ste[39]+1:item[101]=item[101]+1
;if sin_02_chr==1 then ste[31][0]=ste[31][0]+1:ste[33][0]=ste[33][0]+1:ste[34][0]=ste[34][0]+1:item[101]=item[101]+1
;if sin_02_chr==2 then ste[36][0]=ste[36][0]+1:ste[38][0]=ste[38][0]+1:ste[39][0]=ste[39][0]+1:item[101]=item[101]+1
;ACeɂ\͕ω
;gosub @cin_item_stemodo	;Xe[^XXV̂
;gosub @cin_item_ste	;ŃXe[^XŒ艻
;gosub @cin_item_steup
gosub @sin_ste	;Xe[^X


;GɂV[ႤB̂łƂ肠



goto @sin_s_001	;PނBȂ񂩁AqgƂꂽˁB

;\͐U蕪
@sin_win02_steup
;N̔\͂グ܂H
ǂ̔\͂グ܂H
;iViI̓rƂłˁj
spdelete "window:nametext" ;Õ^O
spfill "window:text",0,#00000000:print #C	;oOƂB^񒆂ɐlȂƃ_
;98.txt̉ϑIďo
;Oɐݒ肵ĂI
sel_x=50
sel_y=410+40+70
sin_ssl_kazu=4	;I̐
for %0=1 to 4
	sin_sei[%0]=""	;I
next
;sin_sei[1]`	;I̓e
;sin_return[1]`	;߂w
sin_sei[1]="s̗"
sin_sei[2]="ő̗"
sin_sei[3]="ő喂"
sin_sei[4]="U"
sin_return[1]="@sin_b_02a"
sin_return[2]="@sin_b_02b"
sin_return[3]="@sin_b_02c"
sin_return[4]="@sin_b_02d"
gosub @sin_select_001	;IĂяo

@sin_b_02a
l̍s̗͂PオI
ste[2]=ste[2]+1
goto @sin_b_win_02_steupend

@sin_b_02b
l̗̑͂PオI
ste[4]=ste[4]+1
goto @sin_b_win_02_steupend

@sin_b_02c
l̖͂PオI
ste[6]=ste[6]+1
goto @sin_b_win_02_steupend

@sin_b_02d
l̍s̗͂PオI
ste[2]=ste[2]+1
goto @sin_b_win_02_steupend


@sin_b_win_02_steupend
goto @sin_win02_goto

