;mode800
*define
nsa
caption "elementaler-͂܂̖`-(By Torrens moyu.moe)"
defaultfont "lr "
rmenu "EChE",windowerase,"Z[u",save,"[h",load,"^Cgɖ߂",reset
mousecursor "ele.cur"
versionstr "elementaler-͂܂̖`-ver1.2a","(C)2007 PERCEPTRON with "

defaultspeed 30,10,0


globalon
effect 2,2,1000
effect 3,10,1000
effect 4,10,1000
effect 5,8,1000
effect 6,17,1000
effect 7,10,10

resetmenu
insertmenu "I",END
insertmenu "o[W",VERSION
insertmenu "̑Iɐi",SKIP
insertmenu "ݒ",SUB
;SUB̓Tuj[JƂ킵܂B
insertmenu "tHg",FONT,1
insertmenu "eLXg",SUB,1
insertmenu "x",TEXTSLOW,2
insertmenu "",TEXTMIDDLE,2
insertmenu "",TEXTFAST,2
insertmenu "",SUB,1
insertmenu "tXN[",FULL,2
insertmenu "EBhE",WINDOW,2

roff
;ʏ̉ENbNj[oȂ悤ɂB

textgosub *customrmenu

selectcolor #ff5555,#bbbbff

game


*start
textspeeddefault
mov %99,0

lsph 0,":a;rmenu.bmp",0,0
lsph 1,":l/3,200,2;cursor0.bmp",0,0
lsph 2,":l/3,200,2;cursor1.bmp",0,0


*logo
bg black,7
wave "bell02.wav"
bg "per_logo.bmp",5
btn 1,0,0,800,600,0,0
*lp_logo
btntime 5000
btnwait %0
;;e{^̃Wv̐ݒ
	if %0==-1 bg black,0:goto *elestart_0
	if %0==0 goto *lp_logo
	if %0=1 bg black,0:goto *elestart_0


*elestart_0

;;^Cg

mp3loop "m01_title.mp3"
bg "title1.bmp",2
btndef "title2.bmp"

mov %99,0

;;^Cgʂ̃{^̔zuƐݒ

btn 1,10,260,250,60,10,260
btn 2,10,340,250,60,10,340
btn 3,10,420,250,60,10,420
btn 4,10,500,250,60,10,500
btn 5,270,260,250,60,270,260
btn 6,270,340,250,60,270,340
btn 7,270,420,250,60,270,420


*elelp
setwindow 25,25,20,20,23,23,0,20,20,0,1,":a;text_window.bmp",0,0
btnwait %0

;;e{^̃Wv̐ݒ

	if %0==-1 goto *elelp
	if %0==0 goto *elelp
	if %0=1 goto *cld
	if %0=2 goto *elemain
	if %0=3 goto *elecg_mode
	if %0=4 end
	if %0=5 goto *cldg
	if %0=6 goto *chu
	if %0=7 goto *eles_0

*cld
systemcall load
goto *elestart_0

*cldg
loadgame 99

*elemain
goto *elescene01

;----------------------------------------
;V[I
*eles_0
setwindow 25,25,20,20,23,23,0,20,20,0,1,":a;text_window.bmp",0,0
textoff
csp -1
print 1
gosub *migikuri

mp3loop "m09_rape.mp3"
bg "scene1.bmp",2
btndef "scene2.bmp"

mov %99,1

;;V[Iʂ̃{^̔zuƐݒ

if %901>=1 btn 1,70,120,120,120,70,120
if %902>=1 btn 2,210,120,120,120,210,120
if %903>=1 btn 3,350,120,120,120,350,120
if %904>=1 btn 4,490,120,120,120,490,120
if %905>=1 btn 5,630,120,120,120,630,120
if %907>=1 btn 6,70,260,120,120,70,260
if %909>=1 btn 7,210,260,120,120,210,260
if %911>=1 btn 8,350,260,120,120,350,260
if %913>=1 btn 9,490,260,120,120,490,260
if %914>=1 btn 10,630,260,120,120,630,260
if %915>=1 btn 11,70,400,120,120,70,400
if %916>=1 btn 12,210,400,120,120,210,400
if %901>=1 btn 13,350,400,120,120,350,400
if %901>=1 btn 14,490,400,120,120,490,400
btn 15,630,400,120,120,630,400

*elelp4
btnwait %0

if %0==-1 goto *elestart_0
if %0==0 goto *elelp4
if %0=1 goto *elefrag172_cg
if %0=2 goto *elefrag367_cg
if %0=3 goto *elefrag142_cg
if %0=4 goto *elefrag056_cg
if %0=5 goto *elefrag096_cg
if %0=6 goto *elefrag318_cg
if %0=7 goto *elefrag234_cg
if %0=8 goto *elefrag311_cg
if %0=9 goto *elefrag358_cg
if %0=10 goto *elefrag402_cg
if %0=11 goto *elefrag439_cg
if %0=12 goto *elefrag416_cg
if %0=13 goto *elefrag366_cg
if %0=14 goto *elefrag436_cg
if %0=15 goto *elestart_0

;----------------------------------------
;;bf[h

*elecg_mode
mp3loop "m09_rape.mp3"
goto *elecgmode

*elecgmode
mov %99,0
bg "cgmode1a.bmp",2
btndef "cgmode1b.bmp"
if %901>=1 btn 1,50,120,159,119,50,120
if %902>=1 btn 2,230,120,159,119,230,120
if %903>=1 btn 3,410,120,159,119,410,120
if %904>=1 btn 4,590,120,159,119,590,120
if %905>=1 btn 5,50,260,159,119,50,260
if %906>=1 btn 6,230,260,159,119,230,260
if %907>=1 btn 7,410,260,159,119,410,260
if %908>=1 btn 8,590,260,159,119,590,260
if %909>=1 btn 9,230,400,159,119,230,400
if %910>=1 btn 10,410,400,159,119,410,400
btn 11,50,400,159,119,50,400
btn 12,590,400,159,119,590,400

*elelp3
btnwait %0
if %0==-1 goto *elestart_0
if %0==0 goto *elelp3
if %0=1 goto *elecg001
if %0=2 goto *elecg002
if %0=3 goto *elecg003
if %0=4 goto *elecg004
if %0=5 goto *elecg005
if %0=6 goto *elecg006
if %0=7 goto *elecg007
if %0=8 goto *elecg008
if %0=9 goto *elecg009
if %0=10 goto *elecg010
if %0=11 goto *elecgmode2
if %0=12 goto *elestart_0

*elecgmode2
mov %99,0
bg "cgmode2a.bmp",2
btndef "cgmode2b.bmp"
if %911>=1 btn 1,50,120,159,119,50,120
if %912>=1 btn 2,230,120,159,119,230,120
if %913>=1 btn 3,410,120,159,119,410,120
if %914>=1 btn 4,590,120,159,119,590,120
if %915>=1 btn 5,50,260,159,119,50,260
if %916>=1 btn 6,230,260,159,119,230,260
if %917>=1 btn 7,410,260,159,119,410,260
if %918>=1 btn 8,590,260,159,119,590,260
if %919>=1 btn 9,230,400,159,119,230,400
if %920>=1 btn 10,410,400,159,119,410,400
btn 11,50,400,159,119,50,400
btn 12,590,400,159,119,590,400

*elelp5
btnwait %0
if %0==-1 goto *elestart_0
if %0==0 goto *elelp5
if %0=1 goto *elecg011
if %0=2 goto *elecg012
if %0=3 goto *elecg013
if %0=4 goto *elecg014
if %0=5 goto *elecg015
if %0=6 goto *elecg016
if %0=7 goto *elecg017
if %0=8 goto *elecg018
if %0=9 goto *elecg019
if %0=10 goto *elecg020
if %0=11 goto *elecgmode
if %0=12 goto *elestart_0


*elecg001
bg "a001a.bmp",3
click
bg "a001a2.bmp",3
click
if %901==1 goto *elecgmode
bg "a001b.bmp",3
click
bg "a001c.bmp",3
click
goto *elecgmode

*elecg002
bg "a002a.bmp",3
click
bg "a002b.bmp",3
click
bg "a002c.bmp",3
click
goto *elecgmode

*elecg003
bg "a003a.bmp",3
click
bg "a003b.bmp",3
click
goto *elecgmode

*elecg004
bg "a004a.bmp",3
click
bg "a004b.bmp",3
click
goto *elecgmode

*elecg005
bg "a005a.bmp",3
click
bg "a005b.bmp",3
click
goto *elecgmode

*elecg006
bg "a006a.bmp",3
click
bg "a006b.bmp",3
click
;bg "a006c.bmp",3
;click
;bg "a006d.bmp",3
;click
goto *elecgmode

*elecg007
bg "a007a.bmp",3
click
bg "a007b.bmp",3
click
bg "a007c.bmp",3
click
goto *elecgmode

*elecg008
bg "a008a.bmp",3
click
bg "a008b.bmp",3
click
goto *elecgmode

*elecg009
bg "a009a.bmp",3
click
bg "a009b.bmp",3
click
bg "a009c.bmp",3
click
goto *elecgmode

*elecg010
bg "a010a.bmp",3
click
goto *elecgmode

*elecg011
bg "a011a.bmp",3
click
bg "a011b.bmp",3
click
bg "a011c.bmp",3
click
goto *elecgmode2

*elecg012
bg "a012.bmp",3
click
goto *elecgmode2

*elecg013
bg "a013a.bmp",3
click
bg "a013b.bmp",3
click
bg "a013c.bmp",3
click
bg "a013d.bmp",3
click
goto *elecgmode2

*elecg014
bg "a014a.bmp",3
click
bg "a014b2.bmp",3
click
bg "a014b.bmp",3
click
bg "a014c.bmp",3
click
goto *elecgmode2

*elecg015
bg "a015a.bmp",3
click
bg "a015b.bmp",3
click
bg "a015c.bmp",3
click
goto *elecgmode2

*elecg016
bg "a016a.bmp",3
click
bg "a016b.bmp",3
click
bg "a016c.bmp",3
click
goto *elecgmode2

*elecg017
bg "a017a.bmp",3
click
bg "a017b.bmp",3
click
goto *elecgmode2

*elecg018
bg "a018a.bmp",3
click
bg "a018b.bmp",3
click
goto *elecgmode2

*elecg019
bg "a019a.bmp",3
click
bg "a019b.bmp",3
click
bg "a019b.bmp",3
click
bg "a019c.bmp",3
click
goto *elecgmode2

*elecg020
bg "a020a.bmp",3
click
goto *elecgmode2

;----------------------------------------
*customrmenu

erasetextwindow 0

ispage %199
getcursorpos %197,%198
if %199=0 amsp 1,%197,%198:vsp 1,1:vsp 2,0
if %199=1 amsp 2,%197,%198:vsp 2,1:vsp 1,0
print 1

*customrmenu_btn

textbtnwait %199

if %199==-1 gosub *rmenu
if %199==0 goto *rmenu_end
;ENbNENbNj[̃xu*rmenuvցB

erasetextwindow 0
texton
ispage %199
if %199=0 vsp 1,1
if %199=1 vsp 2,1
print 1
;*rmenuAĂɁAeLXgEChE\邽߂̏

goto *customrmenu_btn

*rmenu_end
;NbN҂ɍNbNƂցB

texec

vsp 1,0
vsp 2,0
print 1

saveon
;̂̓Tv̂܂

return
;{֋AB

*rmenu
;NbN҂ŉENbNƂցB

erasetextwindow 1
textoff
;eLXgEChE

vsp 0,1
vsp 1,0
vsp 2,0
print 10,50
;ENbNj[摜\

*rmenu_btn
;{^

btndef "rmenu_btn.bmp"
btn 1,100,50,219,149,100,50
btn 2,320,50,219,149,320,50
btn 3,100,200,219,149,100,200
btn 4,320,200,219,149,320,200
btn 5,100,350,439,79,100,350

btnwait %199

if %199==-1 btndef "" : vsp 0,0 : print 10,50 : return
if %199==0 goto *rmenu_btn
if %199==1 systemcall save
if %199==2 systemcall load
if %199==3 goto *status
if %199==4 goto *Item
if %199==5 vsp 0,0 : print 10,50 : systemcall lookback : vsp 0,1 : print 10,50
;ENbNꂽ{^߁AENbNj[摜\ɂāA{NbN҂ɖ߂B
;ulookbackvNbNꂽAENbNj[摜\ɂĉz[hAAĂĂщENbNj[摜\B

goto *rmenu_btn

;----------------------------------------
*title

csp -1

bg black,1 : print 1

lsph 0,":a;rmenu.bmp",0,0
lsph 1,":l/3,200,2;cursor0.bmp",0,0
lsph 2,":l/3,200,2;cursor1.bmp",0,0

goto *elestart_0

;----------------------------------------
;Xe[^Xʕ\
*status

csp -1
print 1

lsp 90,"status1.bmp",0,0
if %6==1 lsp 1,"status01b.bmp",380,0
if %6==0 lsp 1,"status01a.bmp",380,0
if %6==3 lsp 1,"status01a.bmp",380,0

gosub *tear_hpc_cs
lsp 6,$17,62,116
lsp 7,$16,84,116
lsp 8,$19,120,139
lsp 9,$18,138,139
if %2==0 csp 6

gosub *tear_ad
lsp 10,$14,218,128
lsp 11,$15,340,128

gosub *tear_weapon
lsp 12,$12,96,174

gosub *tear_w_rate
lsp 15,$13,55,211

gosub *tear_silver
lsp 13,$21,278,284
lsp 14,$20,300,284
if %4==0 csp 13

gosub *tear_shougou

print 1

click
csp -1

gosub *migikuri
if %9==0 gosub *tear_w
if %9==0 gosub *tear_hpc
if %9==0 gosub *tear_m
print 1
goto *rmenu

;----------------------------------------
;tOACeʕ\
*Item

csp -1
print 1

lsp 90,"status2.bmp",0,0
if %6==1 lsp 1,"status02b.bmp",500,0
if %6==0 lsp 1,"status02a.bmp",500,0
if %6==3 lsp 1,"status02a.bmp",500,0

;----------------------------------------
;tO
if %170==1 lsp 10,"check1.bmp",135,70
if %171==1 lsp 11,"check1.bmp",135,100
if %172==1 lsp 12,"check1.bmp",135,130
if %173==1 lsp 13,"check1.bmp",135,160
if %174==1 lsp 14,"check1.bmp",135,190
if %175==1 lsp 15,"check1.bmp",135,220
if %176==1 lsp 16,"check1.bmp",135,250
if %177==1 lsp 17,"check1.bmp",135,280
if %178==1 lsp 18,"check1.bmp",135,310
if %179==1 lsp 19,"check1.bmp",135,340
if %180==1 lsp 20,"check1.bmp",135,370
if %181==1 lsp 21,"check1.bmp",135,400
if %182==1 lsp 22,"check1.bmp",135,430
if %183==1 lsp 23,"check1.bmp",135,460
if %184==1 lsp 24,"check1.bmp",135,490
if %185==1 lsp 25,"check1.bmp",265,120
if %186==1 lsp 26,"check1.bmp",265,150
if %187==1 lsp 27,"check1.bmp",265,180
if %188==1 lsp 28,"check1.bmp",265,210
if %189==1 lsp 29,"check1.bmp",265,240
if %189==2 lsp 29,"check2.bmp",265,240
if %190==1 lsp 30,"check1.bmp",265,270
if %191==1 lsp 31,"check1.bmp",265,300
if %192==1 lsp 32,"check1.bmp",265,330
if %193==1 lsp 33,"check1.bmp",265,360
if %194==1 lsp 34,"check1.bmp",265,390
if %195==1 lsp 35,"check1.bmp",265,420
if %196==1 lsp 36,"check1.bmp",265,450
if %197==1 lsp 37,"check1.bmp",265,480
if %198==1 lsp 38,"check1.bmp",265,510
if %199==1 lsp 39,"check1.bmp",265,540

;----------------------------------------
;ACe
if %101>=1 lsp 41,"item01a.bmp",390,67
if %102>=1 lsp 42,"item02a.bmp",390,89
if %103>=1 lsp 43,"item03a.bmp",390,111
if %104>=1 lsp 44,"item04a.bmp",390,133
if %105>=1 lsp 45,"item05a.bmp",390,155
if %106>=1 lsp 46,"item06a.bmp",390,177
if %107>=1 lsp 47,"item07a.bmp",390,199
if %108>=1 lsp 48,"item08a.bmp",390,221
if %109>=1 lsp 49,"item09a.bmp",390,243
if %110>=1 lsp 50,"item10a.bmp",390,265
if %111>=1 lsp 51,"item11a.bmp",390,287
if %112>=1 lsp 52,"item12a.bmp",390,309
if %113>=1 lsp 53,"item13a.bmp",390,331
if %114>=1 lsp 54,"item14a.bmp",390,353
if %115>=1 lsp 55,"item15a.bmp",390,375
if %116>=1 lsp 56,"item16a.bmp",390,397
if %117>=1 lsp 57,"item17a.bmp",390,419
if %118>=1 lsp 58,"item18a.bmp",390,441
if %119>=1 lsp 59,"item19a.bmp",390,463
if %120>=1 lsp 60,"item20a.bmp",390,485
if %121>=1 lsp 61,"item22a.bmp",390,507
if %122>=1 lsp 62,"item21a.bmp",390,529
if %123>=1 lsp 63,"item23a.bmp",390,551
;if %124>=1 lsp 64,"item24a.bmp",390,
;if %125>=1 lsp 65,"item25a.bmp",390,
;if %126>=1 lsp 66,"item26a.bmp",390,
;if %127>=1 lsp 67,"item27a.bmp",390,
;if %128>=1 lsp 68,"item28a.bmp",390,
;if %129>=1 lsp 69,"item29a.bmp",390,


print 1

click
csp -1
gosub *migikuri
if %9==0 gosub *tear_w
if %9==0 gosub *tear_hpc
if %9==0 gosub *tear_m
print 1
goto *rmenu

;;elementaler
*elescene01

bg black,3

bg "catch01.bmp",3
bg "bg_01for.bmp",3

;----------------------------------------
gosub *start_tear_ste

;----------------------------------------
*elefrag001
mov $1,"m02_forest.mp3"
mp3loop $1
!sd

;caption "elementaler-I[vjO-"

gosub *r_tear
@@@P
br
@Jq񔜔@C䏫꒣jIŔanݑΏƁB@
@ŗCvOwJVKxCK{JnisIRHB@
@꣓IړIOJVKClی압ݓߗI⎸B@
@ҁC@ʈ⎸ߔ푼lяoKCߛ꣖vB\

@ۓIC萘ISC𓥓ЗъCIafB@
@ߓI\߁COIHߌorpvCe퐶sIדB@
@AeᏊC˔H嫑RCpLIxB@׋􎢊҉LlgpCHҔ\œގnԎԓQI瑁B@
@ARRHCxoCnԑzKkʉ߁B\

@䢔~RIRߌLJVKCߋKIޏꑰ\ݕߌBAߖߐNC@ʖŁCߗߌolIڋnCsėLlދZB@
@嫑Rs^@CA䊴oYs\ݔlB\

@׎~IHC؊א^I`r\\ݍC꣘ꎟ[ċzB@
@D\\@
br

select "@炪AN̕ꂾBiQցj",*elefrag002


;----------------------------------------
*elefrag002

;caption "elementaler-gYVARoRFoR-"

savegame 99

gosub *r_tear
@@@Q
br
@`CؑpB\󓞐IBA쎗ٓGӁCvލsΕÏCYAsLYB@
@ݕɓIH㑖iԍ@CIg̎RRnMNCJQQݐρBϔYY݉xCŔa𛩘Hshn菓IB\

@ߗřߓIC䢔~RLHCŗLB@
@嫑RߐRI^OEf𗬛ߋvCAۏOpo𛩘HB@
@HŔCLoHaדCvOHB\

EߘH
EH@
br
@ŔpʕWHBOדvLʍ݊ŔBCߏדHCLnlˉIꓹHB\

@꣍ݔQ\[rInC粊AC粎vlYꖏHB@
@ߘHrVIHCʓIԓQ䑴HvXꍱB@
@HIHʗvꍱCAoGߘHvΐB@
@דRspC햟Ҋ댯ICSsmʌB\

select "@łSȋ߂IԂȂiRցj",*elefrag003,"ČIԂȂiSցj",*elefrag004,"v؂ďb𖳖dɂiނ̂ȂiTցj",*elefrag005

;----------------------------------------
*elefrag003

;caption "elementaler-gYVARoRF߂`-"

savegame 99

gosub *r_tear
@@@R
br
@[xߍ@C꣑IߘHCpOB@
@HaVOIHvYʁC犴osLדˑRoBHrߕCs_r樐lȈאݍxB\

@Ɋɜ^ȓIH҈꒼OLCݔIHC꘢lB@
@ђ`KIsCAߒpsCӐgU҉^IB@
br
select"N͂̐lԂɘbĂiUցj",*elefrag006,"Đ}łiVցj",*elefrag007

;----------------------------------------
*elefrag004

;caption "elementaler-gYVARoRF`-"

savegame 99

gosub *r_tear
@@@S
br
@IʒHIꣁCsm׉orIH䍄ˍXB\
@r粓IGNC樐lokBŗŔʒHmsvLIB#FF0000iI`Ij#FFFFFF@
mov %170,2
@댯IϔZC꣕sRwsBŔ㏊ʓIHCŗK茾ߏ΁B\
@
@ŔYKIoCȋyhɔ畆IBHߋvِlpCϐטInՁB@
@A鑖iH@C꣉nӓ؎㗯^폝B@
select"mF̂ȂiWցj",*elefrag008,"Đ}̂ȂiXցj",*elefrag009

;----------------------------------------
*elefrag005

;caption "elementaler-gYVARoRFb`-"

gosub *r_tear
@@@T
br
@BR׏aCHk֖vH[IXсBݎGpIDs|sCAߌoƕsizBiەs樐lSsCA]OzCIHRҗCAmLlݎgpC樉YNmMB\

@sLnАXѓIlށCl˒mIHꡁH@
@s߁CsmHےʉIB@
@sǔ@C݉Ґr艈HB\

@󟃒햟䍄ˑIHv댯IBߎhɔ畆IoCsRnhIْBs͉\LғIגoCsI\kB@
@vsTdICI`\Avݍ卆B@
select"߂ċC߂āAN͏biłBiPOցj",*elefrag010

;----------------------------------------
*elefrag006

;caption "elementaler-gYVARoRF߂`-"

savegame 99

gosub *r_tear
@@@U
br
@ݔ{㥗Ll瑓IH\lCBHa썐iIHLoCrObCzřߍB\
u꣐YlccHv@
@jlpLICmmnUCŘAꉺsρBs͑ԓxWC䊴oalaʋNB\
uvACώccv@
@jlv򒎈CsϔϒnCzvAΘbB@
select"łHȂiPPցj",*elefrag011,"߂Đ֌ȂiPQցj",*elefrag012,"sȑ̑ԓxɓ{ȂiPRցj",*elefrag013

;----------------------------------------
*elefrag007

;caption "elementaler-gYVARoRF߂`-"

gosub *r_tear
@@@V
br
@ݔ{l㥎IHEC_A樐lxBXvΕӐgU҉^IC`Rbk댯IB@
@SΑvB@
mov %171,1
select"N͏悤ɂĉɁA̐l悤ɂēiłɂBiPSցj",*elefrag014

;----------------------------------------
*elefrag008

;caption "elementaler-gYVARoRF`-"

gosub *r_tear
@@@W
br
@䑖ߓ؎CʓI^דISB琬nmL׏ovIS؁B\
@oݔnICs营LqdI׍ݐ鎦ȓInՁB@
select"ꂩ玩ꏊɓݍނȂƊȂAN͕i߂BiPTցj",*elefrag015

;----------------------------------------
*elefrag009

;caption "elementaler-gYVARoRF`-"

gosub *r_tear
@@@X
br
@sߘb񗈁CʐݔHInCLSZLIꠁB@
@NnmFCrDpOiB@
select"莞Ԃ͗LȂ̂BiPTցj",*elefrag015

;----------------------------------------
*elefrag010

;caption "elementaler-gYVARoRFba-"

gosub *r_tear
@@@PO
br
@Toݗ׏OiIڈʑOB@
br
@TˑRo㗈CNI䲉咼wڈI_ˁB\


@DlFT\

mov %20,1
gosub *battle_ste

select"iPUցj",*elefrag016

;----------------------------------------
*elefrag011

;caption "elementaler-gYVARoRF߂`-"

savegame 99

gosub *r_tear
@@@PP
br
@䎎ibCzŊŔ\s\oYCʓߒjlLo藈Cv䋋KB@
select"]ނ܂܂ɋ݂ꖇnȂiPVցj",*elefrag017,"fȂ΁iPWցj",*elefrag018

;----------------------------------------
*elefrag012

;caption "elementaler-gYVARoRF߂`-"

gosub *r_tear
@@@PQ
br
@䔻flg㉞YsoX񗹁B@
@r蒼ڌpHB@
mov %171,1
@䍄ow@`YCAœߘjl^䑊IB@
select"yfoāAĂѕoBiPXցj",*elefrag019

;----------------------------------------
*elefrag013

;caption "elementaler-gYVARoRF߂`-"

gosub *r_tear
@@@PR
br
@ΕIԓxΗCApSsBʁCΕ|ٔC֗JB#FF0000iIaIj#FFFFFF@
mov %171,1
select"āiPXցj",*elefrag019

;----------------------------------------
*elefrag014

;caption "elementaler--"

gosub *r_tear
@@@PS
br
@ߘ^IjlX@C䔯ꏈ⾉ΓI瑁B@
@䒲ԁC{VOI瑁CK͗ŁClYݍD{ȏB@
@s营D{slN҉߁B@
select"΂̐Ղ͓ɂ߂ڂ͌ȂBiQOցj",*elefrag020

;----------------------------------------
*elefrag015

;caption "elementaler--"

gosub *r_tear
@@@PT
br
@䐳HOiCI׏PB@
@kCœCAsRntߗB@

@DlF\

mov %20,2
gosub *battle_ste

select"iQPցj",*elefrag021

;----------------------------------------
*elefrag016

;caption "elementaler--"

savegame 99

gosub *r_tear
@@@PU
br
@œ|TV@C䊴o͓IϓXB@
@䊴oAדIׁِC݊mFٕIݍ@oIxB\
@Șœ|ITg㔍fށB\בfޓIєCYLsIlBs߁C݉䔍fޓIԁCL\푴׏PB@
select"fނ͂ȂiQQցj",*elefrag022,"}ꍇ́iQRցj",*elefrag023

;----------------------------------------
*elefrag017

;caption "elementaler--"

savegame 99

gosub *r_tear
@@@PV
br
@tK@CjlIԓxPWOx]^C樉LYzmI֖Bi╼Fj@

sub %100,1
if %100<=-1 mov %970,1 : mov %100,0
gosub *tear_m

@֖⑼CH񎖁CȋyOʓIqLB@
@H{LHaVHCAגnkvHsDnԁCȍˏCVHBVHs͋XZCslRXB\
@ҐCqҗvVCrK{xꉺBȑIIhCVH粏嫑RLԏCAʖvlB@
@s߁CݗLvLlZAsDcc[B@
@b񋟓I@ڍׁCjl։ߐCԘߘqanӓIlB\
@C@ʉzmX֘ߘqICAđt_KB@
select"ǉ𕥂ȂiQSցj",*elefrag024,"Ƙb؂ȂiQTցj",*elefrag025,"܂ŁAєĂȂĂiQUցj",*elefrag026

;----------------------------------------
*elefrag018

;caption "elementaler--"

savegame 99

gosub *r_tear
@@@PW
br
@jlIŕL^Csm\ߗϓIBXvCs\rKԓI\B@
@䍐iCsIgKsCs\Ĉ׏tKB\
uꝁCߐ꣕ꠁv@
@jlvDn@C֖җB@
@ΑCstKIlAvYpꠁB@
select"ȏ㉽ӖȂ̂ŁAN͐}ɂBiQVցj",*elefrag027

;----------------------------------------
*elefrag019

;caption "elementaler--"

savegame 99

gosub *r_tear
@@@PX
br
@ŗ@IlCssߛFDB粍ĎFC粌pHOiB@
@AݔCLY雒nꉺݗIrC樉䎸tB@
@LnŌr粁Cߗ{꘢^܁B\
@{ݔH粁CYNsSMVIꠁBY\ꡁH@
select"N͖܂EĊmFĂiQWցj",*elefrag028,"Đ}łiQXցj",*elefrag029

;----------------------------------------
*elefrag020

;caption "elementaler--"

savegame 99

gosub *r_tear
@@@QO
br
@RHɒnOLCŗߌoiB@
@H×CSr樉䊴oL|B@
@cxCz[XB\
@AݔCꓪאlˑR粓IpoB@
@QZˋNCAvLDӁB\
@Aאl{ꌾsʁCL҉ҒnPlށB@
select"𔲂ĐĂiROցj",*elefrag030,"̗lqĂiRPցj",*elefrag031,"܂AI[N瓦Đ}łiRQցj",*elefrag032

;----------------------------------------
*elefrag021

;caption "elementaler--"

savegame 99

gosub *r_tear
@@@QP
br
@󗹏IהoߖCҒnB嫑Rsǉ\vYQCA@ʑœ|C\MVޓIB\
@AvipC\댯B@
select"̏bǂĂiRRցj",*elefrag033,"ǂȂĂiRSցj",*elefrag034

;----------------------------------------
*elefrag022

;caption "elementaler--"

savegame 99

gosub *r_tear
@@@QQ
br
@䏫nhTÍCJnBZw@C䔍꒣isIB#00FF00ilFTIєj#FFFFFF@
@OCҔcDlDf{I厕󝃗NB#00FF00ilFTIj#FFFFFF\

mov %110,1 : mov %111,1

@KDvL͓IPCATIHYVIׁB@
@@ʉ䗯ݔCALVI׏oCsǜÕsÈӓsDlB@
select"]ݗ܂Ȃ΁iRTցj",*elefrag035,"Xɗ̂Ȃ΁iRUցj",*elefrag036

;----------------------------------------
*elefrag023

;caption "elementaler--"

gosub *r_tear
@@@QR
br
@l׏PI\CIqiC꒼ҍד㑾댯BmFߍDlf{I厕ݒnC֏NDB#00FF00ilFTIj#FFFFFF\

mov %111,1

@DCĖCVI׏AvB@
select"낵CzɈ͂܂Ă܂OɁAN͐}ɂBiRUցj",*elefrag036

;----------------------------------------
*elefrag024

;caption "elementaler--"

gosub *r_tear
@@@QS
br
@䖔ꖇ╼ݑCjlq{΁Bi╼Fꖇj@

sub %100,1
if %100<=-1 mov %970,1 : mov %100,0
gosub *tear_m

u䍐i꣈꘢ƉƍDꠁv@
@AݑIuԁCjlzo꘢܎qBœߘ܎q݉ʑO従ꉺCbAՒnꐺyJB\
@d닩CQ[CjlߌooIB@
u꣔yՑMʐlIƚCݓߘ㐥hkIBL߉vYlAՒnIC꣉疜ʔxꟁIv@
@jl^C֓snBuԑzߗvǏ㋎CAC䍪{ǕsB\
@ZCĎmFBIՒnCIMxύCADꠁB@
select"C蒼āA}ɂBiQOցj",*elefrag020

;----------------------------------------
*elefrag025

;caption "elementaler--"

gosub *r_tear
@@@QT
br
@\szĒkCŒfbCjlyyޗތB@
u琥C꣔鏬SސT_rDBvʐlzvYAYCMsDAȓIsvv@
@jl{pgCIoN΁CR@yynPꐺB\
uߘqݏZlBߛƚL_sNlށCȎ\́CρBAvF꣓I^͗ʁC꣉YA\lIM^hB꣉vDDꟁv@
@F͗ʔC䊴okϕB\
@䏫SSLZC#FF0000iIbIej#FFFFFFӁB@
mov %172,1
select"j͂ōĂтނ悤ɍ蒼̂āAN͍ĂѕoBiQOցj",*elefrag020

;----------------------------------------
*elefrag026

;caption "elementaler--"

savegame 99

gosub *r_tear
@@@QU
br
@⑼RlC\s\pєYCjlU嗹ˁCIo_bI\B@
uH㥉ꟁccIbCo╼wv\
@jlzo꘢܎qCݎ菶rJ╼ŁBŔVCs^݁B@
select"l̎ɉȂiRVցj",*elefrag037,"𑱂ȂiRWցj",*elefrag038,"fȂiRXցj",*elefrag039

;----------------------------------------
*elefrag027

;caption "elementaler--"

savegame 99

gosub *r_tear
@@@QV
br
@ĉOꏬiHC䔯ꏈ⾉ΓI瑁BIqŁC\Ls~꘢lݔx߁B@
@䎎QQŗLvLYDCʍc_InC꘢ݒu@AYIOB\
@O㎗vLߓCsߔpIOC@ʉ񝾓IbҔ\ėpB@
select"̂ȂiSOցj",*elefrag040,"ɐɋ}ȂiQOցj",*elefrag020

;----------------------------------------
*elefrag028

;caption "elementaler--"

gosub *r_tear
@@@QW
br
@ŊJ܁CʑޗrBrqkIsvLCŗҔ\pBYȗpi򑐔VޓIB@
@rq\퓌CK{r˔\iB\
@@ʕrߌoLCAzʓIiCAvcʓIp{E{B@
@MꍱoLpI#00FF00ilFr~Qj#FFFFFF@
select"ŃACǂĂ̏𗣂ꂽiQOցj",*elefrag020

;----------------------------------------
*elefrag029

;caption "elementaler--"

gosub *r_tear
@@@QX
br
@{ݒnI\UOCx댯IꣁCrَ܁B@
select"NȂ΁ANE낤BiQOցj",*elefrag020

;----------------------------------------
*elefrag030

;caption "elementaler--"

savegame 99

gosub *r_tear
@@@RO
br
@꣝Uo흲Dː@CאlIoX_QI\BoCEhCݕ\ȖvLDӁBA꣊ҐNCΏyאlIߋB\
uBIIv@
@ꌂtCאlhhWWn|ݒnBAߞ__ndCB\
@ΕSvLDlIӚCApU^IDꝁHSs֎YN^B@
select"ł͂I[N키ȂiSPցj",*elefrag041,"ʂɌ̂̂Ȃ΁iSQցj",*elefrag042

;----------------------------------------
*elefrag031

;caption "elementaler--"

savegame 99

gosub *r_tear
@@@RP
br
@KŁCאlcSCo꘢IBِڒCח\vLDӎN@Cאl֑Ή䏵CӉ䓞p粋B@
@ݔn樉䋎pCꐥYӎvꡁHsCݔՎZYB\
@꣊oאlIqLsRCs֘ccB@
select"ĎaȂiROցj",*elefrag030,"fɑނ֍sȂiSRցj",*elefrag043,"ĐiނȂiSSցj",*elefrag044

;----------------------------------------
*elefrag032

;caption "elementaler--"

gosub *r_tear
@@@RQ
br
@꣔fsYݍisوIDlCrݛfRPߗVOJnB@
@꣓]gJCאloꐺߏICA꣝َCpOB@
@smߑאlz\BYCAŋNsǉߗB\
@חȖhC䖔iCR@Ď񓪁BʑRCאlvLǏ㗈B@
select"yŉ낵AN͍ĂѕoiSTցj",*elefrag045

;----------------------------------------
*elefrag033

;caption "elementaler--"

savegame 99

gosub *r_tear
@@@RR
br
@ǒ󏝓IׁCݑp싿nOiBߖ嫑R󗹏CAݑpsˋIC|C픗ݗLsKIHBŏAvǏ㗹Cpfs߁B@
@SLNCҕs樉w@Ɋɟo⊾B
@Aݓ߈uԁCˑRNodIKB\
@BL댯IaCA@ʉݔ≺lCm樎󏝓I{ꠁB@
select"Ȋ댯Đg\ȂiSUցj",*elefrag046,"ďb𓦂܂ƒǂȂiSVցj",*elefrag047

;----------------------------------------
*elefrag034

;caption "elementaler--"

gosub *r_tear
@@@RS
br
@fRǒ󏝓IאipCm蔺댯B^sKICXcKȕی엹gSC粎C@nI瑁B@
@b撲ꉺċzB@
select"ĂѓiłɂBiSWցj",*elefrag048

;----------------------------------------
*elefrag035

;caption "elementaler--"

savegame 99

gosub *r_tear
@@@RT
br
@IHLsRnGUJCō݌ĊVIC׉񉞁CטIϓZBlNwwCvߑvC꘢IKep䔇粒oB@
@VNaHzoIC햾䍂IׁB\
@hWxLVI̖сC䓊ғIB@
@œiہCs֓|zyCΘȏIΎIC]CMߗ@񎚁B\
@AK^ICΕIڕWsCߋTÍB@꣑zCY\{ꠁB@
select"łċȏbɗ̂ȂiSXցj",*elefrag049,"}œôȂ΁iTOցj",*elefrag050

;----------------------------------------
*elefrag036

;caption "elementaler--"

savegame 99

gosub *r_tear
@@@RU
br
@pדOsCXюQQϓZB@
@樉s֊QX퐥@V[CʁCzƎ˕siNsB@
@AK^ICvLHC꒼[LB@
@狖חzƎ˕sÍC䎋䗈͓IGގ甯ꍱωB\
uaIv@
@Ғn`ICёInߑpC粈ړB@
select"̂Ɩ΂݂̕𒲂ׂĂ݂̂ȂiTQցj",*elefrag052,"Ă̂܂ܐ}̂Ȃ΁iTRցj",*elefrag053

;----------------------------------------
*elefrag037

;caption "elementaler--"

gosub *r_tear
@@@RV
br
@꣊oMՊҕsC╼CoєB0000FFipFߒڏTIєji╼Fj#FFFFFF@

mov %110,0
add %100,7
gosub *tear_m

uӜځBׁCZ䑗꣓Iv@
@jl粐C粒ߗꊔ򑐁B#00FF00ilF򑐁~Pj#FFFFFF\

add %101,1

@嫑RmʈӋ`IiCAAvLIB@
select"AN͏lƕʂčĂюRiގɂiQOցj",*elefrag020

;----------------------------------------
*elefrag038

;caption "elementaler--"

savegame 99

gosub *r_tear
@@@RW
br
@Θ꣒oI۔\đ_DClޗތC_㕂oN΁B@
@ڒCQCFʘ̏o{╼C㋎B\
uDDCߏAꣂPO╼BđA^Issv@
@CgnhCoꕛ~IpB@
select"ł܂ɒlグ𗊂ނȂiTSցj",*elefrag054,"̒liŗ̂Ȃ΁iSQVցj",*elefrag427

;----------------------------------------
*elefrag039

;caption "elementaler--"

gosub *r_tear
@@@RX
br
@꣋◹MՍ@Cl_㗬IoN⊶I\B@
uߖvꔖ@CR꣓sCċvpv@
select"lƂ̘b͂ŏIɂȂAN͕ʂĐ֐iގɂiQOցj",*elefrag020

;----------------------------------------
*elefrag040

;caption "elementaler--"

gosub *r_tear
@@@SO
br
@䐳z񝾕ߝSpIOC֐Lo莎͓IցBAݓߘuԁCOʓI댏ҒnNB@
@QZzv]JCA댏ҐōݗIwB\
@ɓoCᓪŌɏC댏IO[HݏʁBsk[CAҐLuIBí̗FQ_j@

sub %12,2
if %12<0 mov %12,1
gosub *tear_hpc

@s߁CҐ񝾗OCŗҔ\ݔCӒn_ĎgpB#00FF00ilFߝSpIOj#FFFFFF\

add %103,1

@O\ݎwIn_gpC󊎈UgpApBOΏLCΑ^וsNpB@
@嫑RgpꍇLCA\LpCY\oꠁB\

select"ɂގyȂAC蒼ĐւƐiށiQOցj",*elefrag020

;----------------------------------------
*elefrag041

;caption "elementaler--"

gosub *r_tear
@@@SP
br
@אl嫑R\ɈלCAߕqsSoIBL푼N蛓IO\VCUϓIʁB@
@zCĎאloꌂB@
@אl粔oߖC粑ȐC^oIːB\

@DlFIאl

mov %20,3
gosub *battle_ste

select"iTTցj",*elefrag055

;----------------------------------------
*elefrag042

;caption "elementaler--"

gosub *r_tear
@@@SQ
br
@ΕsszŗCĊLSsEB䔇zC֝NCȍ\ȖvLpUIӚB@
@CאlQZ⋋NgCA঒nꗭ|iؑpB@
@䒍IweCmFאlYsĉ񗈗B@
select"N͍ĂѐɐiގɂBiSTցj",*elefrag045

;----------------------------------------
*elefrag043

;caption "elementaler--"

gosub *r_tear
@@@SR
br
@ڎאlI籐CpB@
@嫑RsmzYCA\oUҊ]㋎IB@
@䍹nJpOiCאlsߓCmFLvLB\
@䐳SsnzCאl@ʉ^ꕝIiہCAݔCߌs`B@
@ߓL͗ꝁH@
@]MߔOC˔ˊґݑOʓIאlߌosHeB\
@񓪊ŋCRnCߗvLאlIgeB@
@ݕsIgC꣍QZzvԉ񌴘HCҒnꓨnʏyJB
@AAݔCr{̒nʓIoB\

@kRCߑzKIIB@
@ϓIאlxlLIC꣖牞YӓאlߕsRIqˑ΁B@
@R꣋pΗvڎאlI籐C퓙eSӈLEٖdID͍sׁB\
@ēIoB@
@ȋyˑR󓞓ItB@
@җsy𔯐YB\
select"N̈ӎ͈Âւƈ荞܂ĂccBiTUցj",*elefrag056

;----------------------------------------
*elefrag044

;caption "elementaler--"

gosub *r_tear
@@@SS
br
@אlIk^CvKvߎ籐B@
@꣝َI݁Cח\s㎧IpOiB@
select"wŃI[N݂Ȗ邪A܂ĂKv낤BiSTցj",*elefrag045

;----------------------------------------
*elefrag045

;caption "elementaler--"

savegame 99

gosub *r_tear
@@@ST
br
@@䐳oHcL^ȁCAݔC^HB@
@ŗCYAVHaH𙹓InꠁB@
@XCœHvCŗȍĎIVHҐHB\
@VH粈ˑRLrVIԓQCH粑\בIlC됯nGB@
@嫑Ro٘_ꖏHssL卷ʁCAʑRҐVHXSI\XꠁB@

select"N͐VIłiTVցj",*elefrag057,"ċiłiTWցj",*elefrag058

;----------------------------------------
*elefrag046

;caption "elementaler--"

gosub *r_tear
@@@SU
br
@䍄KDːCؑp֗LYgoߗB䊬]ߔꌂCݗߓI}B@
@ߑט뎋CRc䓖B\

@DlF䎒B\

mov %20,4
gosub *battle_ste

;@̑Ƃ̐퓬́A肪{Iɖ؂̏ɂׂɂ͂Q^[ɂPx@B@

select"iTXցj",*elefrag059


;----------------------------------------
*elefrag047

;caption "elementaler--"

gosub *r_tear
@@@SV
br
@䐳zǏ㋎s樓ߖדCsؑpˑRo^IB@
@݉|ٖhIԉC{ٖ@ΔUCߐʓIR٘M]B@
@ROtIC߈ꌂAzߋʎhI_BCҐѐIB\
@܏ĔʓIɘᓵ`C^COIiیRȕό`BhᒆIߋLʓIUAѐ[C|ً^nl̓Idv튯B\
@S瞔Cg̖玸t|B@
@ݗՎVۉ˖ꌏCߏAlOœnI@C{AxlIcc\

goto *gameover

;----------------------------------------
*elefrag048

;caption "elementaler--"

savegame 99

gosub *r_tear
@@@SW
br
@䉈HpOiCˑRJ舗NB@
@䐳zHʐsύ󗹈_Cpnʙ~COЌRB@
@x嫑RLOčECARHʕύ󗹁CțsKnԔVޓIqʍsB\
@ĎFCߔVȉCVHCTAהꠁB@
@AݔC䍚RœߓIn{܁B@
select"ׂ悤ƎL΂ĂiUOցj",*elefrag060,"ĐɐiłiUPցj",*elefrag061


;----------------------------------------
*elefrag049

;caption "elementaler--"

gosub *r_tear
@@@SX
br
@ߓIהoꐺIKCk󟃓s閍싿BߋIǎ^ICsRnhSIB@
@g@C꣊Ґ藹rSCN^IΎΛB\

@DlFXы

mov %20,30
gosub *battle_ste

select"iUQցj",*elefrag062

;----------------------------------------
*elefrag050

;caption "elementaler--"

gosub *r_tear
@@@TO
br
@䊴󓞗ȗ^ΎVԓI͍BʑΝٖ@DIGlICՔVB|s@C`ғIDlC钏AݘB@
@@ʏzߏqCYAmIsꠁB\
@QZnE\ʝUڏACnCg@I׋poꐺIB@
@sI^ŗvh畆Cw͉Z_IoځB@
select"nʂRĂɓĂBiURցj",*elefrag063

;----------------------------------------



;----------------------------------------
*elefrag051

gosub *r_tear
@@@TP
br
@SꉡCIEΕCAΕSsCa䑖B@
@ŗȑO݊G{ǓIIC\XVȓIFmB@
@ʑΒQNߓIׁCzKs{B@
select "@߂ĕ\AN͑Ɛ키ɂBiSXցj",*elefrag049

;----------------------------------------
*elefrag052

savegame 99

gosub *r_tear
@@@TQ
br
@TꉺؑpCL׍|؁CcHgZB@
@pcJ؁C֔LOIHBAH䎊׎~IדҗvÁC꒼ʉXѓIX[B\
@HL픜IsCr樐lo\ʉ꘢ĖsInB@
@i䔇k댯CA݊댯HIOCLYB@
select "@DŜ܂܂ɈÂiނ̂Ȃ΁iUSցj",*elefrag064,"̂܂܂ɍ܂ł̓iނ̂Ȃ΁iTRցj",*elefrag053

;----------------------------------------
*elefrag053

gosub *r_tear
@@@TR
br
@䉈ꐬsϓIדXCRߓwcckIB핽sߓIِCpnu݉I]CCVsB@
@樐lӐgsICŗLYuݗ畆CדIO`B@
@pOiC璀QϑCsv֑I^ʖځB\

@ccߐꓪׁCHꖼcEEQI`ғIB@
@݋ɓxIɋꒆfC_ҋÌŒI\C퍤HBiہCߐlsIB@
@|zyCsRnˋNB@
@׎sݔœ|CAaߘI]҈IB\

@DlF䎒Bḝf\

mov %20,6
gosub *battle_ste

select "iUTցj",*elefrag065

;----------------------------------------
*elefrag054

gosub *r_tear
@@@TS
br
@ziiClphhB@
uu߉ssB꣗vΔisӁCȔʐlBlÐSC܎IGHvv@
@jl֒fΘbBAZ\\╼ȁCAjlprkٕ{B\
@ŗ䐥OYΕB@
select "N͌ɎsoȂA߂Đ}ɂiQOցj",*elefrag020

;----------------------------------------
*elefrag055

savegame 99

gosub *r_tear
@@@TT
br
@אloՎIߖCߔߖŐĊCLאlؑpgB@
@숽˓ߑאlIB\
@ΈIvΉsCAאl命sxɁB@
select "N͂ŕ\ėĂǂiUUցj",*elefrag066,"v؂đēĂǂiUVցj",*elefrag067

;----------------------------------------
*elefrag056_cg
bg "bg_01for.bmp",3

*elefrag056
gosub *ev_window
bg "a004a.bmp",3
mov %904,1

@@@TU\

u\ꟁIHv\
@{ߒfIӎCѐIɝf񗈁B\
@Җvy𔯐YCAژA`ʓIɁB\
u^A傁Iv\
@Iיᐺݎl񓠁B\
@Iu樉son៣BݔIvCɑ^I㒸B\
iccCݔccNꝁHj\
@`ѐʓIuɁCg̓IqʖY㖀CCo\فBݔkٓIvCAߕsڌC픗lrnIpB\
@]騁cc]騁cc\
@gՒߐlʓIؐgCZIqaoC樉䓮esC\CRXB\
uzDꟁI@gfgfꟁIIv\
@דLIKCI琏VnO@ޓCѓg̑啝hWNB\
@AꌘʎoIߎꑖuVICsfJB\
uݚjAUccUoAUoꟁIIv\
@smIۓ`BCAIuɊҐ樉䔇^oB\@Őߓߏ[FÓISCJғIˑR◹B\
uꟁccIꟁAꟁccIꟁAccDɁccccIv\
@䏼Cyyn[ċzBu嫑RҖvLCAvLݎgsisoIvCҐ樉䊴oD󗹈ꍱB\
@䉺ӎnlCȐg꘢ÓI[ԗC󟃒GUꀖB@YIL햟C{vB\
@@ʗvp꘢`eIbCߑTAS[ꠁB\
uאlCccҗLCcc׏Yccv\
@ݔvC꣖ΎȐݔNƓIRB\
u׏YC׏YccMsꉁccꟁccv\
@AZ䒲DċzCΎ͓IvLꍱCAҐٖ@׏Yȉ펖B\
@C݉I瘹LYݗʁCM靁C݌ċzʁCꒊꒊnB\
@ȐݔNƔꎖCʉߌCʉߓ̓I樉^ؒn̉B\
uΎIv\
@fI従|ِnĎJnCIҒnB׍˓ߒisXIxCꌂItiOB\
uꟚjI@ꟁAꟁAꟁccAjꟁccv\
@AdVJnIJC䍄ˊҗve\C|ِߐB\
@|׉䐴^nӎȐݔNƁC`IϓNNB\
@ʑΎȑ\CRΕNƓIvCBLoDDnsfOoB\
@ARC@I]nsvLCߗJIq֔Bg̍X[B\
uꟁAsccsvccꟁccccꟚjI@݁I@Bށcc~ANccN~~ccꟁIIv\
@sǉnĚ^CA͑SsꌾsʓIאlB\
@꣓Iߖٖ@`BCnC\ݓ̓IQ팂ŁAB\

bg black,3

@cc@
@cc\

@cc@
@cc\

bg "a004b.bmp",3

@ߗꡁHݔSVCg̗IsmsoԑߕB\
@꣔틭sIHCSgC󗹑ʓItCsmsoԁC꣛ߑR㗹gsB\
uꟁccꟁccCꗹccZccꠁccjccv\
@^꣐ݒRݐg̗ICs@꣑ݔːnsfoےIbB^CTIg̛ߌoOˈחאlI֊B\
@@ʉ\ďS_IbC狖A}sIǗꠁB\
@A@CAzߘ\BIssC\דߘYIITB\
@ARIqC͑I獹nׁC\ҒOρccB\

if %99==1 goto *eles_0

goto *gameover

;----------------------------------------
*elefrag057

savegame 99

gosub *r_tear
@@@TV
br
@IVHpOiB@
@׎~꒼s㚱HCݑϐɓIHB@
@ꏬX@Cœq݉^nԘΖjB\
@nԓIOϊŁCߎqlI݉^nԁB@
select "N͐ĔނĂю~߂ĂǂiUWցj",*elefrag068,"yA邾łĂǂiUXցj",*elefrag069

;----------------------------------------
*elefrag058

savegame 99

gosub *r_tear
@@@TW
br
@H粓InʁC䊴oLB@
@䑖݈zߎDIHCRs`^퐶IKB@
@ߙK䔇粖ϋ߁B\
@psvCߓבTAo꣓IʑOꠁB@
select "\Đ키ȂiVOցj",*elefrag070,"Đ}̂ȂiVPցj",*elefrag071,"ďp㩂d|ĂiVQցj",*elefrag072

;----------------------------------------
*elefrag059

savegame 99

gosub *r_tear
@@@TX
br
@݉œ|I׍@CꐺgOݗnB@
@嫑RIΎCA䑍Zœ|CsRB\
@嫑R˒I󗹏IכߌoSsHeCAْ͋IZɘaB@
select "̏bfނ͂ĂǂiVRցj",*elefrag073,"Ɍ̓ւƖ߂Đ}łǂiSWցj",*elefrag048

;----------------------------------------
*elefrag060

gosub *r_tear
@@@UO
br
@L苎\{ݒnI܎qCzvcNB@
@AݔC͓Inʔ従CR@ҒnvNB@
@꣍QZ@JCꓪאnʉsoB@
@훀˔@IoZċzCNCΕ璩䝲oːB@
@ŗ\DB\

@DlFÝfۚ\

mov %20,7
gosub *battle_ste

select "iVSցj",*elefrag074

;----------------------------------------
*elefrag061

gosub *r_tear
@@@UP
br
@o܎qA{ݔHCeבzzoLsΙB튴orݍrCYSnㅊJnB@
@꣖픇튴oeCӝَ{ݒnI܎qB@
select "ɐiގɂBiVTցj",*elefrag075

;----------------------------------------
*elefrag062

gosub *r_tear
@@@UQ
br
@ΕꐺCIg됏ɊɌX΁BfCg̏ddn|B@
@IU͜kCIΎCsߑZ՗CsRB@
@͎b×CZԓYsėL׏PꠁB\
@꣘Εg㔍旹f#00FF00ilFj#FFFFFF@
mov %104,1
select "iގɂBiRUցj",*elefrag036

;----------------------------------------
*elefrag063

gosub *r_tear
@@@UR
br
@QZzvCrpsTJB@
@O|ݒnCAחdVZg`CQZn⋗NB@
@AAݔCߓכߌoǏ㗹B\
uꟁIIv@
@esI]C꣔픇ꌂœg̔CR@ddnݕߓIBi̗͌PO_j\

sub %12,10
if %12<0 mov %12,1
gosub *tear_hpc

@狖œŔ@SCߓד]ߐgCߓTÍB\
@ŗc䓖zvDIƚCovcAvB@
@嫑R󗹏dnCA\AZK^B@
select "Ɛĝɂނ̂炦ȂAւƐiށiRUցj",*elefrag036

;----------------------------------------
*elefrag064

savegame 99

gosub *r_tear
@@@US
br
@gXєVCnpL@ʓI×^[℁B\
@s͔@C׎~{\󓞍I󟃁Cϓ됝ِCŔYʁB@
@^IȌpHOiꝁH\
@sIOM߉I]CC䒍ӓr粒ꊔ`IB@
@䘸vߔFICYܓIޗB꣍яWC󏫑giB#00FF00ilF^j#FFFFFF\
;mov %173,1
mov %112,1
@sǉ䊴oȉ^sCA]CҐMߗ݉񓪊җyIOB@
@bC䊴oOIHȒAʒnB\
select "łɐiނ̂Ȃ΁iVUցj",*elefrag076,"͂Ԃ̂Ȃ΁iTRwj",*elefrag053

;----------------------------------------
*elefrag065

gosub *r_tear
@@@UT
br
@]JΎҗIUCꌂŌIˁBoߙ{ԍUhC䑍ZB@
@ꌂŗvѐዅCڑΓI]QCg˖B\
@狖ߋْCIz㖞BpwCCٗ͒nNB@
@Cr蘸̏㔍fށB#00FF00ilFj#FFFFFF\

add %104,1

@狖I\LdCIߒsCsߓIʖ瑫al՗B\
@ڒCpwyyṕC㗹VOTҊIlIoB@
select "oȂŘlтȂA͐ɐiƉ߂ĎvBiVVցj",*elefrag077

;----------------------------------------
*elefrag066

gosub *r_tear
@@@UU
br
@אleNC⋍݉IEBߕsŎZ樉䓦IqcokٓICђI{ӌPB\

@DlFoאl

mov %20,33
gosub *battle_ste

select "iVWցj",*elefrag078

;----------------------------------------
*elefrag067

savegame 99

gosub *r_tear
@@@UV
br
@݉אlIrCߓ╼Kܗ{oIB@
@@ʉQZKCAƕsvaאlDCbCKTgOVCL˔\ԁB\
@KőRdvCAΕtD{אlCm蜓sC󊎉󓞑ʏQ琥sgIB@
select "ł키̂Ȃ΁iUUցj",*elefrag066,"ē̂Ȃ΁iVXցj",*elefrag079

;----------------------------------------
*elefrag068

savegame 99

gosub *r_tear
@@@UW
br
@莦ӁCzZʏlCΕkun◹B@
uݔn\lҐ^HBƖC꣔vꖙXꟁHv@
@ʑΔʎ哮bAԓxuNIlC䍐iȑŎZ拎RIߘqB\
u꘢wqȋꝁHsm꣗LYCAsꟁv@
@ߑCŗ݈׉SSB@
@AȗL񋎕sIR@Cl֌yyNMCݍs|QNB@
@R@Cs\oؔB\
uߘq݊{slݏZB꣗vAh坲niCkL\SNBs߁CvcqŁCA꣒ʍsBRꊁCvIcczvO╼v@
@ؔ撅GIāBpʉߒqIʍs؁CAsmLpB\
@嫑RsoOIlݐCAቺvLꔖ@ʐ^UB@

select "N͒ʍs`wĂiWOցj",*elefrag080,"ɔȂĂiWPցj",*elefrag081

;----------------------------------------
*elefrag069

gosub *r_tear
@@@UX
br
@vLYʑzvICݑȒPnŗāCבΕ㗹rIjB@
@ΖʓIlun񉞗C󓯞׉䑗㗹jB@
uC嫑RsmvꖁCAHvSv@
select "̌tɂȂĂAĂтŕi߂ĂiWQցj",*elefrag082

;----------------------------------------
*elefrag070

gosub *r_tear
@@@VO
br
@꘢geҒnp₏oC݌n}◹B@
@I樉hCߓבTc䓖CoߗB@
@v훀ҒnCQmsCA@ʉ^DIbC\|ُnr{ꠁB@
@ˋNC^ΕWJΛB\

mov %20,2
gosub *battle_ste

select "iWRցj",*elefrag083

;----------------------------------------
*elefrag071

gosub *r_tear
@@@VP
br
@SzvKvݔdCՑ̗́B@
@of@C֏JnCrSHB@
@ri@CKQQBŗߓדIڕWsCݕ߈я紁B\
select "͂Ƃꓖʂ̊댯甲oɈĝߑR炵AN͍Ăт̓iłɂBiWSցj",*elefrag084

;----------------------------------------
*elefrag072

gosub *r_tear
@@@VQ
br
@݉ߑIOCҒbB@
@ߗXCpw|싿Cꓪ󒃊FIזҒnₗoB@
@œs쒖C^C׏yIOΛNsYpB\
@ߊlu[C쒖VoꐺZIߖBiꍀI쒖̗͒JS_j@
select "CmVVߊlɂ͎炸Ap㩂͂̑̋ɂĕӂĂ܂BiVOցj",*elefrag070

;----------------------------------------
*elefrag073

gosub *r_tear
@@@VR
br
@䎎|Iאg㔍fށCAIєŗv@򔍉Bs߁C䍚RzNדIዅkLpIށcc˔Cȍݍ˓IDlߌocIዅMB\
@䐳Sz^sCpRˌr粒{򑐁B@
@E򑐁CisXB#00FF00ilF򑐁j#FFFFFF\

add %101,1

@ŗ^ҎZsB@
select "āAĂі`𑱂悤BiSWցj",*elefrag048

;----------------------------------------
*elefrag074

gosub *r_tear
@@@VS
br
@n`oI׎󗹏C֘RCꐺ㋿֖vB@
@ڑגėCďډnI܎qBߐLI܁CIlzKAˑߖדIŎꠁB@
@ΒߑzKߕsݐlI܎qIlCy꣓Iw񗹁B@
select "ƗDnʂɌCuāAĂѐɐiގɂBiVTցj",*elefrag075

;----------------------------------------
*elefrag075

gosub *r_tear
@@@VT
br
@䑖݈𕽕يIHC{sI}RoꓹDCzB@
@픇LsvcIiۏzCz]CƐiXѓI퐥ЉԓcB@
@ΔПӑRVIԓcLbC֜kRn݉ԓc粍[rB\
@r\œCݕsIԓcCL\qݗIՒnXB@
@^vL苎́CmߗꠁCsߕێYAvB@
@A韔݈JI͒xXCRC粐I{fIB\
@YAȓIߎ򑐁BƊщB#00FF00ilF򑐁~Qj#FFFFFF\

add %101,2

@򑐉ȍݎwIgpB@
@ȗT_̗́CAٖ@ߑ̗͏B\

@AxXCߑ\qIߗCH꒵nݗp[B@
select "łȂcOȂAN̗𑱂ׂɗオ鎖ɂiSTցj",*elefrag045

;----------------------------------------
*elefrag076

savegame 99

gosub *r_tear
@@@VU
br
@sǗn䔯o댯MCҐXђŊ댯IB@
@XїЎC䏬Sn݈ŐsIדB@
@AݔC󟃓sݐkI}PB\

gosub *choice_flag

select "ãtOĂiWTցj",*elefrag085,"Ŗꍇ́iWUցj",*elefrag086

;----------------------------------------
*elefrag077

gosub *r_tear
@@@VV
br
@݉p[ЎÓIXюC粓`DDI͐B߉aIFCcɉ𗹉ד㎧YIJB@
@ޕsIg̏[͟CSONҍČiHIOB@
select "S̒łe݂ȂAւƐiށBiWVցj",*elefrag087

;----------------------------------------
*elefrag078

gosub *r_tear
@@@VW
br
@ŗDlI@
select"N͍ĂѐɐiގɂBiSTցj",*elefrag045

;----------------------------------------
*elefrag079

gosub *r_tear
@@@VX
br
@ŗEB@
select"N͍ĂѐɐiގɂBiSTցj",*elefrag045

;----------------------------------------
*elefrag080

gosub *r_tear
@@@WO
br
@\zvw\o╼@Cl_͏Βn╼C󏫒ʍs`B@
uӜځCʍs`A꣓IBʘMVꟁv@
@p╼ʍs`i╼Rj#00FF00ilFʍs`j#FFFFFF@


sub %100,3
if %100<=-1 mov %970,1 : mov %100,0
gosub *tear_m

select "l͂ŏ΂݂𕂂ׂBiWPցj",*elefrag081

;----------------------------------------
*elefrag081

savegame 99

gosub *r_tear
@@@WP
br
@lnoiC꣓W{B@
usCs_YꝁHv@
@lttnoiB\

@򑐁~QF╼O@
@F╼ܖ@
@pOF╼O\

@򑐉ȍݎwIgpB@
@ȗT_̗́CAٖ@ߑ̗͏B\

@ȍݎwIgpB@
@ݓDlCȏ󓞓IQP_BAlψוCsYʁB\

@pOȍݗLwgpB@
@KpߑVl\qVޓICȊmېHIB\
@OCY꘢vslIIꠁB@
@PlCI􍅈s׈iB@
@ACS_Csה忁CzKsLYDB\
select "򑐂ŵȂ΁iWWցj",*elefrag088,"ŵȂ΁iWXցj",*elefrag089,"p㩂ŵȂ΁iXOցj",*elefrag090,"邢́wEĂł΂ƂxȂ΁iXPցj",*elefrag091,"ɔƂ̂Ȃ΁iXQցj",*elefrag092

;----------------------------------------
*elefrag082

gosub *r_tear
@@@WQ
br
@pOC粓`͐ÓIBŗHLCzKn`IꠁB@
@pOssvC͗։fIB@
@͊L\C٘_@ss\ߋB͓I[xCs߈_ŕsoIꠁB\
@粌Ǘn⋒꘢leB@
select "N͂Ƃ肠A̕ւƏ}ŕĂɂiXRցj",*elefrag093

;----------------------------------------
*elefrag083

gosub *r_tear
@@@WR
br
@^ߓtIדIDlCݛŖSʓߎؓI߈ꍏ鍐B@
@җ󓳌IQ嗹C]ꚟC|ݒnB@
@꣎RsߔIj]CΒ|ݒnIgovꌂB\
@IǧnGClґR}C˖B@
@꣘g㔍旹fށB#00FF00ilFj#FFFFFF\

mov %104,1

@꣖{zcI狭spCAݎъԐs׏ICŋNߌohspꗹB@
select "̂cOɎvȂA͂Ƃ肠ɐiށiWSցj",*elefrag084

;----------------------------------------
*elefrag084

gosub *r_tear
@@@WS
br
@䑖݈LÓIHC粓`@̔DDI͐BߒxIFpOsCsv歑RJNC͗o݊OB@
@ŗ^VH𙹓In͓_CO˒IB\
@嫐lLVIہCAŞqYsρB@
select "הnԂƂłʂ鎖oȍɏSBiXSցj",*elefrag094

;----------------------------------------
*elefrag085

gosub *r_tear
@@@WT
br
@꣍ז`ҁCgoSDA琎S@˗LIꠁB@
@Ȑ@m\͓IoC꣕soӊԒ≺rB\
@uԁCLh꣖{YInB{ِّnPC@꣖vL≺rCK훀ѐǵB@
u|ЁccIv@
@ŗv͋󟃐szʓICȋyfoIB\
@꣔\oC^U刳Iݘ뎋ȁB@
@꣗p͉ZvTIoڛ󝫋NC꘢^׎~ߓIםBRsIٌ`ݓߗB@
@s꣍_߈|I݊kCAҐˋNB\

@DlF[єV\

mov %20,8
gosub *battle_ste

select "iXTցj",*elefrag095

;----------------------------------------
*elefrag086

gosub *r_tear
@@@WU
br
@RC꣙ߌLYߎ粁B@
@uԁC꣓I`wyIɊB꣐SzsLYS㗈ꓞȁCቺŋB@
@ʁCˊґ`yɊIcc@
br
@nCB\

@꣓IJ꘢哴Cr\œnʁB^C{YݓߗI锁CAZbNCݗߓInʏB@
uccYccHv@
@QZLCʕsRCY̕sB{\g̓IgDߌoCSdv튯IǵCkAȈێ\B\
@NgIt́C㰋IfʒCɊɕOoB@
@݉䗝󏶈Ȑg̏㔯IVOCߑNgIt̕ֈIӎۖvB@
@ICAS\\IӎCݎvߗVOC֛ߒfccB\

goto *gameover

;----------------------------------------
*elefrag087

gosub *r_tear
@@@WV
br
@zOsCsmsoԁCrIדHB@
@㗈CZߘHCAlroIeׁCHsߛDB@
@s߁CᐥRHIlC\ʓIlꠁB@
select "Ȏ݂݂ƎvȂA̓hhƋ߂ÂĂĂiWSցj",*elefrag084

;----------------------------------------
*elefrag088

savegame 99

gosub *r_tear
@@@WW
br
@꣍w򑐁ClniꣁBi╼Oj#00FF00ilF򑐁~Qj#FFFFFF\

add %101,2
sub %100,3
if %100<=-1 mov %970,1 : mov %100,0
gosub *tear_m

@@꣜ÈӁC҉ȍwiBs߁CwߓIiS⡁Cٖ@ĎwB@
select "wȂiWXցj",*elefrag089,"p㩂̍wȂiXOցj",*elefrag090,"ȏ͍wȂƂ̂Ȃ΁iXQցj",*elefrag092

;----------------------------------------
*elefrag089

savegame 99

gosub *r_tear
@@@WX
br
@꣍wClniꣁBi╼ܖj#00FF00ilF~Pj#FFFFFF\

add %102,1
sub %100,5
if %100<=-1 mov %970,1 : mov %100,0
gosub *tear_m

@@꣜ÈӁC҉ȍwiBs߁CwߓIiS⡁Cٖ@ĎwB@
select "򑐂wȂiWWցj",*elefrag088,"p㩂̍wȂiXOցj",*elefrag090,"ȏ͍wȂƂ̂Ȃ΁iXQցj",*elefrag092

;----------------------------------------
*elefrag090

savegame 99

gosub *r_tear
@@@XO
br
@꣍wpIOClniꣁBi╼Oj#00FF00ilFpIO~Pj#FFFFFF\

add %103,1
sub %100,3
if %100<=-1 mov %970,1 : mov %100,0
gosub *tear_m

@@꣜ÈӁC҉ȍwiBs߁CwߓIiS⡁Cٖ@ĎwB@
select "򑐂wȂiWWցj",*elefrag088,"wȂiWXցj",*elefrag089,"ȏ͍wȂƂ̂Ȃ΁iXQցj",*elefrag092

;----------------------------------------
*elefrag091

gosub *r_tear
@@@XP
br
@꣓UoCloߋB@
uꣁA꣘씇ˁCzY\\Iv@
@loꐺQI^C֖Ғn@ޗBIUC푼MߋC@zoxJqB@
@ِڒC{jqnԗgB\
ucc꣈Ȉ׉ꝁI䔽|v꣓_FŊŁC꣔mIv@
@ݏlI߉CjlČPB@
@ʑΐlÍCAIs]sJB
select "N͏lB̎ɂĈӎ܂ŉĂiXUցj",*elefrag096

;----------------------------------------
*elefrag092

gosub *r_tear
@@@XQ
br
@䍐ilszĔC֐命ӜړIqbCJnEsB@
select "Ď̕𑱂ׂA֍sɂiWQցj",*elefrag082

;----------------------------------------
*elefrag093

savegame 99

gosub *r_tear
@@@XR
br
@䗈͊粁Cߗ⋒꘢jlBߘjlœV@C֗p͒nB@
uvzߔ͓IbC䋋꣎Z֋X_B╼꣓Ί݁CHv@
@ŗCjlȝnאB\
@s߁Cݔ핽vYlInӁC^I\ێvꝁH@
@嫑R䑍oL^CAߊJNIΗelkuNIہB@
uшCv꣜ÈㅉHC|ss\߉́BA䔇粍mGIv@
@H扝񑖈ꏬiCR@ė^AڋNB\
@mCaPIㅉHC粍mvCs߁cc@
select "nɂ肢ȂiXVցj",*elefrag097,"ĉ蓹ȂiWSցj",*elefrag084,"v؂ĉjœn̂Ȃ΁iXWցj",*elefrag098

;----------------------------------------
*elefrag094

gosub *r_tear
@@@XS
br
@݉䑖ߐ΋IrCˑRߓꊈꐺdNIB@
@SzYC֒`IŋCʊāCzvߋB@
@sRn]iہCAݔCʏˑRoꓹKeB@
@ߓKeshnʒToCJ{CꟚj֏ߑۗB\
@OߘkIi樉hCnӎCv䍄ˑIj߉́C\Aߑh{B@
select "镶̑f炵߂ĎȂA𖳎ɓn肫鎖oBiXXցj",*elefrag099

;----------------------------------------
*elefrag095

gosub *r_tear
@@@XT
br

mov %955,1

@ʑ΋\IGlCꎟꎟnUBʁCߋIΎ蓮쒀QϓxɁCŏI|ݗnB@
@œ|őݖ`̎oIGlCꏊ樉Ig̈^sZnTB@
@IA^xɊɒn[ISCݔ튴oIgCًوZCҒnNB\
@햟ݎ͓Iْ|]UCݔɊɒnfoC}I_oB@
@ĎFCז`ғIM^ꟃCߌoSSnݗIg̗B@
@|ً^C꣉͓IlXKI`җΑꠁB\
@ꏋZYI񏡁Cݍ@I`[IB@
@꣓IU͏㏡CݝDl\XLniDǁB\

add %13,1

@ŎZpHOiCAŗHB@
select "dȂ̂ŌN͓ԂɂiTRցj",*elefrag053

;----------------------------------------
*elefrag096_cg
bg "bg_01for.bmp",3

*elefrag096
gosub *ev_window

@@@XU\

bg "a005a.bmp",3
@AJJʁC^nӎȔƉ꘢r萫IB\
@ߎf뎧蜓IC꣐pSgiꏐӔCIʁB\
@꣔Qjl͒C_lʔLoB\
@ח\tD{CsAC꣓Ia{sp㗹B\
uII꣑h{ꟁIv\
uꟁccjA݁AIccꟁccjAcݚjccꟁAāccjccIj݁Icc|ccAkBBBIIv@\
@|َߗ^ڊCRjlPʎ{IXB\
@AQ׍݊ߘMBIʁCꍪ𗧓I_|snw꣓IǵB\
@꣓IAO߉N蛒nO|Cp݈nÒtCnZjlI_B\
@^꣐KxnZCs@꣑֐iRjlIr\IAٖ@eISUVB\
@嫑Rg̊Ҕ\ݍDԊCAٖ@EIĘSB\
@꣔֍ݔISUVCg̓IꏈsjlӊߘMC픗򑼘B\
@׈ꖼz讁B\
uߛC꣟󓾖Iꟁv\
usvccIʁccccsvccI߁Aߎ펖ccBBccccscceccI΁cccc݁AkBBBIIv\
@٘_꣔@nL^CjlIXs\≺B\
@RnC꣓IL^N|ٖ@j~ːB\

bg "a005b.bmp",3
mov %905,1

uߛC旈ꔯꠁIv\
@jl粔C粊iOp͒nߗB\
@LseIҗ󓳌CҟOIFQwwn꣓I̓PB\
uYccꟁIcccctccItCiccDccIkkBBAjꟁAsvꟁ\\\Iv\
@nEhCzvꖜcꍱX݉SgItB\
@AݎrS푩IvCz]JДIJ_Cߝً^_˔\I瑗B\
@䔇Θ`ҎߘICjlߔZk~]It̏XB\
@ߊVIt樉I\ʟVCsnA@ӑHʁC迉䔇ЗߐlzIB\
uD靁ADꟁccIZcccc`cc`ꠁccccccIYAYsÈӘccccꣁccv\
uߏAsꠁCIwqccߌvIv\
@ߓjl씇ُ⍓I錾CsR|zyCg̖琏V؏kNB\
@ߐ鍐ِsIA@ʓIXҗvpB\
@ʑΒ؁CpsoCNRccB\

if %99==1 goto *eles_0

goto *gameover

;----------------------------------------
*elefrag097

savegame 99

gosub *r_tear
@@@XV
br
@DvxtpCΕknJncDBi╼Fj@

sub %100,2
if %100<=-1 mov %970,1 : mov %100,0
gosub *tear_m

@Dnc͒ߎCDv֒≺藈CÑ䋎ŐʁB@
@ˌʊŋCߗL꘢IeB\
udꝁH@ƚҗCr\clsۉGv@
@Dvp^LhIꟃCuq߉ƚLꇊQB@
uuߛCIB䍄˝I╼C׎~IpB@꣑zΊݓIbCғ꣍đt╼ˍsBvv@
@RobӍB\
@Vȍݔl|HIHCDvIӊҔ\CzKAהꠁB@
@ȒA\馔CAvݔvRDvC{ȍmEiߗL勛eIB@
select "ǂnɏ]Ă𕥂ȂiPOOցj",*elefrag100,"܂ł𕥂ȂA邢݂͋Ȃꍇ́iPOPցj",*elefrag101

;----------------------------------------
*elefrag098

gosub *r_tear
@@@XW
br
@꣝َDvIbCȒPnsŕwݐg@Co֟jIpB@
@R@꣐搥ϋ߉͖ʁCyynZB@
@ߘKIxCŗKjB\
@꣐SzDC֏wiZC樐g̖KC粊JnNB@
@嫑RߕL\ݔ畆CAΊ݊ŋNyՋB@
@A粔z粟jCωˑR~՗B\
@ˑRC꣊o퐅IYziCg̐VꑋB@
@꣉ӎnZċzCSgڎ󓞈ҙtB@
@ݔ픇ٖ@IvPIC꣊@]٘aٓ\݈NIaBC`܏ĔʓIɁB@
@꣎Rs\@oC퐅I勛ZIʁC퐮ۉIg̐݋{ΐܒB\
@g̔틭sMό`C`I꣘AߖssyoCg̏AĎܐI`B@
@ڒCݑOtC꣓IӎfCncc틛ۗB\

goto *gameover

;----------------------------------------
*elefrag099

savegame 99

gosub *r_tear
@@@XX
br
@ߋ@HXCߗoŔB@
@粎ʒʉIߘHC׏aʓIH꒼ʌXѐ[B@
@粎ʒʉRrIHCs߉䊮SvLKvꠁB@
@TClaKsIloRʉRrIHꠁB\
@R@CYAߏ𕁕ʒʒʉIHꠁB@
select "N͊ŔɏĂߓiłiPOQցj",*elefrag102,"ʂɒ܂őĂ炵iłiPORցj",*elefrag103

;----------------------------------------
*elefrag100

gosub *r_tear
@@@POO
br
@DvO@sSsC꣊{BAAZzꔽRCUtDvC|ً^퐄iߏL勛IB@
@sǐS[s×^{C꣊Ґǉxt╼i╼F|QjCDvq{@Βӊ֏ƁB\

sub %100,2
if %100<=-1 mov %970,1 : mov %100,0
gosub *tear_m

@sv@CDBΊ݁B@
uuė֏ꟁ\vv@
@䘸SꔯCΕsċƚ񎟁B@
select "N͑̌tɕԎɐɐiގɂiPOSցj",*elefrag104

;----------------------------------------


;----------------------------------------
*elefrag101

gosub *r_tear
@@@POP
br
@@꣒fRΕIvCȝ\soߕMKCDvA̍⊶nތB@
uuꝁC߉vꔖ@B꣏AAn{@ȏꠁIvv@
@雓IꐺCDvNrCҒnmDB\
@r樏DItOŔjC꣘aDvloo闎͒B@
uujGA`A`ꟁA~A~ꟁIIvv@
@AݑDv꣊OZrnBHCʓˑRdNԁB\
@{Ғn꒣CDv֔ۗiB@
@DX߁C꣍˙FK~B@
@A꣕s\Ĕ閁C꣕norCsS͟Ί݁B@
@꣐gZbaߕC̗͔}Ձi̗͌V_j\

sub %12,7
if %12<0 mov %12,1
gosub *tear_hpc

@꣍DseՍ˒BΊ݁CAZg̝f݁BQZ񓪈ŁCߏݐʕߙ𚐒DvIǵB@
@ʏgUJЍgFCDvI萳{LoB@
select "΂̖Hɑ΂鎩Ǝ̗lqɁAN͑傫ߑiPOSցj",*elefrag104

;----------------------------------------
*elefrag102

gosub *r_tear
@@@POQ
br
@꣑IvʒߘHIߏHB@
@H䎊׎~IvꍱC僒nsؔVԁB꣗ړInIozz󎞁CzpsoӊԊJnΗB@
@ؔ㗹ЎgCАXіQQϓ[ℋNB\
@嫑RŋNҜkCAݕsnIXїsHƗLD͗B@
@Dݎ͓sXсCWĉΕsB@
select "N͓KɐdW߂ẮAc̏𐮂ĂBiPOTցj",*elefrag105

;----------------------------------------
*elefrag103

savegame 99

gosub *r_tear
@@@POR
br
@꣑IߏʉIHCoxD䍄˓ꍱB嫑RחL͗I֌nncL~CA狖JnCʉIRHˎZJnꠁB@
@嫑RoxΉ݉^nԗL_CARLԓQI瑁CҐLIꠁB@
@b嫔@CA݊ŗCHߌokvvlߗB\

@֔@C꣖vLClCvLׁB꣑݈𕽐ÓsvcIHB@
@ړInIҗLCAzߌoJnɊɐ΁B\
@ŎZyʁC꣓I쒆oԏB@
select "N͏gĖÎłiPOUj",*elefrag106,"ĖhIłiPOVj",*elefrag107

;----------------------------------------
*elefrag104

gosub *r_tear
@@@POS
br
@ϒDvn߉͍@CHҍ݌pOLBxϓꍱC꣑Oig̏ISXdB@
@OꏬiHCAoJv͐ϋNC\ݔ𓬛IH__nOiB@
@ACݒBVOCzŏAvRB\
@ݑzSROqQȋxIꏊCZmۗ꘢\ډInB@
select "₪Ĕ̂Ƃ΂OɁA͂Ƃ肠x낤ƂiPOWցj",*elefrag108

;----------------------------------------
*elefrag105

savegame 99

gosub *r_tear
@@@POT
br
@JߓIq@CoVVAo𗹋IB@
@n]O鼍싿AFFRēIΉB咅SgIJōݍi䍡VLẃB@
@嫑RkzAђgލDDxCAݔn|ٖhnꑐC町댯B\
select "ŃA΂炭䖝Ėڂo܂ĂiPOXցj",*elefrag109,"ׂ̗͂ɂƋxłiPPOցj",*elefrag110

;----------------------------------------
*elefrag106

savegame 99

gosub *r_tear
@@@POU
br
@粑ŒĈ粎iCASvL񉞁BxˎːiIƗCpŕsCleB@
@䉝ꗼCڎlCsϖDoB@
@qIvlgpIꠁB@
@sǐח]IҐYCz\݈꘢LIoCISAcyꍱB\
@A݉䔇zICIp`w||IyCLYKeIꉺB@
select "@̌̕𒲂ׂ悤ƋߊĂiPPPցj",*elefrag111,"ĖĐ̏ĂiPPQցj",*elefrag112,"܂Ap㩂ĂȂ玎Ɏd|Ă݂ĂiPPRցj",*elefrag113

;----------------------------------------
*elefrag107

gosub *r_tear
@@@POV
br
@䒼ژHߗCJnqQKIcIn_Bʔ򍄍DKeInʁCLklsIz@ݔ߉ߖꠁB@
@cݒnʏIΓ龊JꍱCmۗ\eIԁB@
@݉yĉΓICz痎RCl開U㫁B\
@䐶N΁Cn]ߍgFIΌCЌВnzNVVIB@
@VICopxߗD{VBVA@hIVB\
@sǔ@Czߌonߗ́CA؎̉ȊmݑOiB҈ŚCחxC㗹ˁBi̗͉PO_j@

add %12,10
if %12>=%11 mov %12,%11
gosub *tear_hpc

select "@SnǂoɈӎݍłccBiPPSցj",*elefrag114

;----------------------------------------
*elefrag108

gosub *r_tear
@@@POW
br
@wIsC݈꘢Z\樐lSInCnCٗ͒nB@
@[ؒnCVVA㗹sJS_IBSzCʐō@ߘDvIԓxCȒB@
@sߚvCRߌoߋCbA攇ZꠁB@
@粔zC粑ŗCŎZݏADDxꉺB\
@AݔCpˑR`wIB@
@䑦拎UIӎҒnf񗈁Cg̖甽ːnCϓKdB@
@QZoIp]pC{Y_I\qToC݊ώ@IvB@
@{٘_zsokHIiہC׍bCߑ\qaߗCB\
@sm׉CœqC֏ggѓIHpsC\qʑOB\qLo㓪CJnِHNB@
@AߞhXChOꠁC\q݉Ig吏kcCJnoB@
@œԌiہCzTsL^׏ovꠁBw\qIqCꑐBi̗͉PQ_j\

add %12,12
if %12>=%11 mov %12,%11
gosub *tear_hpc

select "₩ȋCɕ܂ȂAӎ͂܂ǂ݂̒ւƗnĂiPPTցj",*elefrag115

;----------------------------------------
*elefrag109

savegame 99

gosub *r_tear
@@@POX
br
@嫑Rw͕ێxCzvRPIӁCAvێ~AfIӎp\BIsonhWCOwwKCŗvzyIKÒB։QZfӎCyoCꑏdIg̋pꎟvnʋziʁB@
@피딼IԁClIo|XݒPnݐϔJB\
uӏDC\ŏꉺꝁHv@
@AݔCˑRlbCg̖ҒnB䑦拎UIӎ펩Rnf񗈁CʐgpwyI⋍ݓߗCᓪŒB@
@䘰__C߈ʏ֍݉gӍB\
uuœOIhI΍ˉߗIBҍDꊁCIwqB@ʐlこIjlC\AzsŏėꡁBvv@
@粙ߒꢓIbC粐SzCꢔsܕsJIlC@ʎ哮ajbCmߓxZꠁBzC߈ʏ\oHB\
uu꣊ŜHA꣔nߖIӗC䗈񋟐HꠁBvv@
@߈ʏʑє΁C@cB@
select "N͂̐Hו󂯎ĐHׂĂiPPUցj",*elefrag116,"ɗRtĒfĂiPPVցj",*elefrag117

;----------------------------------------
*elefrag110

gosub *r_tear
@@@PPO
br
@䐇kC̗͎sBi̗͉PQ_j@

add %12,12
if %12>=%11 mov %12,%11
gosub *tear_hpc

@yJˁCIInŗB@
@ZㅍݔI󟃑ђNyӁC䍨ꑓIӎŔ픇yӐvB\
@C䔯粕꘢ޗrB@
@ʈ\Yt́CAߌoCŕsoꐥYB\

add %109,1

@VCcrqis#00FF00ilFr~Pj#FFFFFF@
@AݔC䔯oȓI܏onyB@
@QZݎ͓InʏqQCpvL{I╼B\
@ŗ݉ꑐICYlc╼SsBi╼FψׂOj\

mov %100,0
gosub *tear_m

@嫑RQ[CAƐlm葁AJB@
@嫑RSksÐSCAĈכߌoI瘰ٕB\
@LCKvҔ\ρB@
select "C蒼ɂāAɌĂѕoɂiPPWցj",*elefrag118

;----------------------------------------
*elefrag111

gosub *r_tear
@@@PPP
br
@חIC䑖[ԊpIÏB@
@LoCzTꉺLvLYCAvL`CGB@
@وꕨCAp󖢒~BCnҗLYꝁH\
@^ISC][ꓪAeU㫓InB@
@LgLoCwˑR`wŔdʓItI\
ukIIv
@QZzvkCZwIVlpJ{CiÏB@
@LuɓICߐwZB\
@䒲DSCrAneB@
select "@܂ꂽw͖ɉsɂ݂ɏPA܂ƐȂiPPXցj",*elefrag119

;----------------------------------------
*elefrag112

gosub *r_tear
@@@PPQ
br
@VCrsǓߐC搇oB@
@JϗݓxC䍄eCӕ֔@DʗOoCIӎۖvB\
@vCnߌYݍI𚐐BߗXCIӎ֐ߗB@
@ߐ_CzߌoƐiCmFȓIJi̗͉PO_j\

add %12,10
if %12>=%11 mov %12,%11
gosub *tear_hpc

@b񗈁CgLvLѐꡁH@
@@ʉђCߛݔԏIVlAcSh{BiFj@

mov %104,0

@A@ʉvLѐCsAK^nvL󓞔CQB\

select "@N͎}ו܂Ƃ߁AĂіړInڎw𑱂鎖ɂBiPPXցj",*elefrag119


;----------------------------------------
*elefrag113

gosub *r_tear
@@@PPR
br
@݉꘢pIOC݌nXB@
@AݔCÏˑR`wCuԁCO֔CߊlIVlB\
ukIH@kkkIIv@
@IVloߖCAҐrnB@
@הڐO`WW{CSӑnxBi̗͉PQ_j\

add %12,12
if %12>=%11 mov %12,%11
gosub *tear_hpc

@@CݏOʌEBCcVlIiB@
select "@ƍ킹Aňb݂ɊӂčĂѐւƐiށBiPPXցj",*elefrag119


;----------------------------------------
*elefrag114

gosub *r_tear
@@@PPS
br
@smsoԓVߌoCߐ_CEsߔU㫁B@
@yynLC[zC樋󟃏[IoB@
@sm׉oLyI󟃁C樉_uCAp␅_B\
@dVDsCOIHB@
@嫑RړInҗLkIHvCAҐȏdVşCr꘢rnOiB@
select "@N͍ĂсAւƐiށBiPPXցj",*elefrag119


;----------------------------------------
*elefrag115

gosub *r_tear
@@@PPT
br
@C\qٍ݉g粐oB@
@狖IC{YItCpsoCgIJ|B@
@yyn̒IǵC\qߗCnLB\
@\o֌gCI\qB@
@\q֏nhNCߗXChOCyynٗىIB\
@R@p@⋗NCNO܍EC@]gJB@
@䒍IqDXB@
select "@NĂї̑ɖ߂鎖ɂBiPQOցj",*elefrag120


;----------------------------------------
*elefrag116

gosub *r_tear
@@@PPU
br
@ډꢋIHCB@
uށC꣋hҐ^ꡁv@
@꣔ꢍÑH@COMCҋIӌ꣏PB\
@꣒hsZߌҍӁC֍iꢎȗv搇B@
uv֌nGBӈccv@
@ΕI֜R~B\

@cc@
@cc\

@꣉ӎCzߏNB@
@C꣝݉IKw\SxnݗOCʐrҕ꒣Fw`AGxB\
@sYꟁC꣐g㏊LIKsߘpvdxBi╼FψׂOj\

mov %100,0
gosub *tear_m

@嫑R꣑ΊቺIvŌCAҐr]OzCΕDesHIz讏lCߌoZsKIKB@
@LC@ʑΕߎݐFCVm꣌݉YB\
@A֔@C꣖ƊB@
select "@傫ߑāAĂѕi߂ĂɂBiPPWցj",*elefrag118


;----------------------------------------
*elefrag117

gosub *r_tear
@@@PPV
br
@꣈qߌoOחRC◹ΕIcB@
@CΕ֍꣖ʑOyynŗB\
uށC]Bsm׉ꌩꣁCASBߛCA搇Gv@
@꣑ꢓIb__CΕ֗ːB\
@꣊mFΕߌonV@B@
@ɊɏPIJC꣖JnyoB@
꣖琏VoCꑐB\

@꣐CΕIgeߌosB@
@בΕݔ闢zMC꣈D{Cʖv\DDxB@
@AIC꣛vLYB\

select "@@Ƃ肠͎ȂA֐iBiPPWցj",*elefrag118

;----------------------------------------
*elefrag118

savegame 99

gosub *r_tear
@@@PPW
br
@꣍ݔ׏a㑖iHCAiF^I|ٕωB@
@ݎR僐sIHC꣗zs\fINB@
@ݔʕsϓIoC꣑\~ȓIoOiB\
@vvC꘢^IOˑRf꣓IB@
@@ʐʓIlވlC@osΙCAΘݖOI쒖VCOAk픯B@
@OIڕWoߔ׏aIC@꣌pHOiCAL\꣏PB\
@꣉ȑIߘOCȑIَCㅘ嚟pOiB@
@VC꣌Occ
select "㩂iPQPցj",*elefrag121,"ĉI񂷂iPQQցj",*elefrag122

;----------------------------------------
*elefrag119

gosub *r_tear
@@@PPX
br
@꣍ĎVIHOiCʈߒy֓Il꣓bB@
@꣗en񉞗ΕIClIoSI_FC꣐\ەtB@
@D݉IҜk[Ct^^L]B\
@cΕCnډߐsC@ђŏdlVʓIxΌ䓹ӁB@
@ΒȐݏCAדߍ툟l̗C֐iS[@oB\
@ҐCݘSߓ꘢`CߗIqΏlIFvYR@
select "Mdȏ𓾂ƎvȂAɐiłiPQRցj",*elefrag123

;----------------------------------------
*elefrag120

savegame 99

gosub *r_tear
@@@PQO
br
@הcØVoRI瑁CHLD{ΖݓyB@
@s樉ȑzCߋ\LߌsIΊKB\
@vC@C쑁ߖvI`CLnr樐loLVB@
@sǔ@C꣊ҐInJΓCpOiB@
@Aݔcc꣍RݎъԔKB
select "ق𒲂ׂiPQSցj",*elefrag124,"}iPQTցj",*elefrag125

;----------------------------------------
*elefrag121

savegame 99

gosub *r_tear
@@@PQP
br
@꣑߁CzvߘOClˑR`IؗhgB@
@꣒≺rC]g]`ICohIːB\
@ڒC{אlpgCחЊd꣎oꑓIKB@
@ŗOY݉IB@
@꣑\IQZnCҐ^DlB\
@嫑RȑICAݔ׏aC꣉\H@
select "ȂiPQUցj",*elefrag126,"키ȂiPQVցj",*elefrag127

;----------------------------------------
*elefrag122

savegame 99

gosub *r_tear
@@@PQQ
br
@꣝َOCㅗ嚟CĎ񓞗׏aB@
@꣖OiXC꘢I̍R菓꣓IFߐ꘢`ٓI󕨁Cًْn\ݎB\
@꣒ˍ׊ŁCWCLI`CʌDGIHB@
@꣍đ߈Cߘ^̓I֊fAϓX𗹁B@
@ŗCߎ꘢IB\
@꣔]LImF߉ȘIlIB@
@ARnCIZSICً^댯IsׁB\
@꣑zCRꣁcc@
select "n`~c肵悤ƂĂiPQWցj",*elefrag128,"댯疳ĂiPQXցj",*elefrag129

;----------------------------------------
*elefrag123

savegame 99

gosub *r_tear
@@@PQR
br
@꣗^lʍ@pHCsm׉CVJnϓNsB@
@˓sҐى]IVC꣓IpˑRwDFIʎяU㫁B\
@A꣈ӎvJIuԁCJ_֘󒆓HHnCŎ꣘a͓IHB@
@RH{AsC@ʍQZHC댯sҌB\
@Aᐥҍ݌nsCIG]ÁCŞqJkACψ׌X~JB
select "̂܂܉J̒iłĂiPROցj",*elefrag130,"߂ŉJh悤Ɩ؂̉ɍsĂǂiPRPցj",*elefrag131,"邢͖؁X΂Ă鑤̕ւƕςĂǂiPRQցj",*elefrag132

;----------------------------------------
*elefrag124

if %122==1 goto *elefrag124a

savegame 99

gosub *r_tear
@@@PQS
br
@꣒K@Cߓ꘢svcIB@
@̐ݔKIB\
@Ȉ꒼חlCAlߌokvvߗB\vK^\꣔ʋvIKqB@
@嫑RosvcCAzNCmLk鈤ǊՎAylIB\
@CAZÁCzKs󓞏YdIꠁB@
select "̗͏㏸IԂȂiPRRցj",*elefrag133,"U͏㏸IԂȂiPRSցj",*elefrag134,"]ނȂiPRTցj",*elefrag135



*elefrag124a

savegame 99

gosub *r_tear
@@@PQS
br
@꣒K@Cߓ꘢svcIB@
@̐ݔKIB\
@Ȉ꒼חlCAlߌokvvߗB\vK^\꣔ʋvIKqB@
@嫑RosvcCAzNCmLk鈤ǊՎAylIB\
@CAZÁCzKs󓞏YdIꠁB@
select "̗͏㏸IԂȂiPRRցj",*elefrag133,"U͏㏸IԂȂiPRSցj",*elefrag134,"]ނȂiPRTցj",*elefrag135,"Kтɏj]ނȂiSSPցj",*elefrag441


;----------------------------------------
*elefrag125

if %123==1 goto *elefrag125a

gosub *r_tear
@@@PQT
br
@꣑ŎZَKpOiCn꣊O߁ByGGnꍪFIHсB@
@꣔cNC\ݎB@
@zIHՐPC꣈בɒvI펧ˁCs֔oꐺQBilFIHсj\

if %123==0 add %14,1
mov %123,1

@꣊lK^IHсChP_B@
select "Ȏ̍K^ɊтȂA܂n߂BiPRUցj",*elefrag136


*elefrag125a

gosub *r_tear
@@@PQT
br
@꣑ŎZَKpOiCn꣊O߁B꣜kRnǒߑpOsB\
@svCߑ֏ݗRIꓪB@
@꣈זv\Hю⊶CORoIŔB꣑߈ŁCʎʒwOC䢔~xB\
@꣐SON^C׉ݔnLIŔCAzC琥ߑїID^ꠁB@
@꣐So_@C֊oŊŎsB@
select "ȂƂȂÅŔɏ]ĉ֌Ă݂鎖ɂBiSQRցj",*elefrag423

;----------------------------------------
*elefrag126

gosub *r_tear
@@@PQU
br
@꣎אl쎞CrpꊊB@
@䘸דRBi̗͌Q_j@

sub %12,2
if %12<0 mov %12,1
gosub *tear_hpc

select "āAX[ꏊւƁBiPRVցj",*elefrag137

;----------------------------------------
*elefrag127

gosub *r_tear
@@@PQV
br
@DlFOאl

mov %20,32
gosub *battle_ste


select "iPRWցj",*elefrag138

;----------------------------------------
*elefrag128

gosub *r_tear
@@@PQW
br
@חlICŎZcIȉB@
@RCIʕsRnPB@
@QZCps_̋󗹁Bi̗͌Q_j@

sub %12,2
if %12<0 mov %12,1
gosub *tear_hpc

select "āAX[ꏊւƁBiPRXցj",*elefrag139

;----------------------------------------
*elefrag129

savegame 99

gosub *r_tear
@@@PQX
br
@pOCOIؑp싿B䍄DːC\A丗oC樉䏼B@
@RِڒCו֒ǒ\q丗oB@
select "ƂɃETMׂɏbƐĂiPSOցj",*elefrag140,"ăX[ĂiPSPցj",*elefrag141

;----------------------------------------
*elefrag130

gosub *r_tear
@@@PRO
br
@JAݔzzB@
@svCœOsLꓹJa݋C֏ߗB@
@rJzzCIϓ͌ЋNB@
select "œ]Ă܂iPSQցj",*elefrag142

;----------------------------------------
*elefrag131

gosub *r_tear
@@@PRP
br
@ŎZݕߝQn]JC؎}rהɖΓIB@
@狖D㗹CvߑvCJ։zzCϐX~JB@
@嫑RҐLJHdiCAݔvCkOsB@
@sSC\Aj̋B@
select "vȂA͉J~ނ̂҂BiPSRցj",*elefrag143

;----------------------------------------
*elefrag132

gosub *r_tear
@@@PRQ
br
@i𛩘HCIؑNCZspĒSS҉JB@
@䉈HpiCAԊҐsHB@
select "UƉJ̐͂ǂǂƑĂ悤BiPSSցj",*elefrag144

;----------------------------------------
*elefrag133

gosub *r_tear
@@@PRR
br
@I񏡑̗́C̗͏T_B@
@COI̗͖T_B@

add %11,5
add %12,5
if %12>=%11 mov %12,%11
gosub *tear_hpc

select "ӂ̌tqׂĐ֌iPRUցj",*elefrag136

;----------------------------------------
*elefrag134

gosub *r_tear
@@@PRS
br
@I񏡍ÚCU͉P_B@

add %13,1

select "ӂ̌tqׂĐ֌iPRUցj",*elefrag136

;----------------------------------------
*elefrag135

if %963==0 add %963,2
if %963==1 add %963,2
if %963==4 add %963,2
if %963==5 add %963,2

gosub *r_tear
@@@PRT
br
@@ʑzvKCOoꓹFI䊁CR@o΁B@
@̈וɔVI΁C{IbY\lsKB#00FF00iFɔVj#FFFFFF@
mov %114,1
select "ӂ̌tqׂĐ֌iPRUցj",*elefrag136

;----------------------------------------
*elefrag136

gosub *r_tear
@@@PRU
br
@䉈HpOiCsvCJJnƟllnB@
@QZ]VCJ]QϔZCS᳗CSLJvϑIaB@
select "ƂȂJ肷ׂɁAɂȂȂ}hɂĂ؂̉ւƑĂiPRPցj",*elefrag131

;----------------------------------------
*elefrag137

gosub *r_tear
@@@PRV
br
@狖䑖Xѐ[CoAA͓I󟃓sLRȁC㗹wΐFB@
@粊okC粌pOiCiЊJ舓InB@
select "Ńw̑xƌĂ΂ĂꏊւƑ𓥂ݓĂ܂̂iPSTցj",*elefrag145

;----------------------------------------
*elefrag138

gosub *r_tear
@@@PRW
br
@ΕtOʑRҐkh́CA䑍Zœ|אlC֑z粒ċzcxB@
select "ĈSr[ɁAȂbȂ萺グČN̕ւƐǂтĂIiPSUցj",*elefrag146

;----------------------------------------
*elefrag139

gosub *r_tear
@@@PRX
br
@粌yyɓIҁC粊œOsLЊJ舓InB@
@ݑߗIrC䊴󓞈svcIJÁC󟃖ُ퐴VB@
select "́w̑xƌĂ΂ĂAlɂƂĂ͊댯ȏꏊƒmȂ܂܂ɌN͓ݍłiPSTցj",*elefrag145

;----------------------------------------
*elefrag140

gosub *r_tear
@@@PSO
br
@חی\C꣝UoCa׏PB@
@꣓bsA_㗈ꌝCΕSvCA|B@
@꣘їICpΖ׋ǖґŁB@
@AݛNgdԐC꣖UIځCĎ|B\
@UߑtCASێCPʒnɉׁB@
@QZڎlC\ߌoB@
select "ƂȂǂCɂȂȂAƂ肠͐ɐiގɂiPSVցj",*elefrag147

;----------------------------------------
*elefrag141

gosub *r_tear
@@@PSP
br
@sIؑpWꉺCR@ÁB@
@ڒCߓי𚐓IB@
select "QĂẲ瓦悤ɁA}iPSWցj",*elefrag148

;----------------------------------------
*elefrag142_cg
bg "bg_01for.bmp",3

*elefrag142
gosub *ev_window

@@@PSQ\

bg "a003a.bmp",3
@ccwwɁCr㖠B\
@ߑђMxIƓɗ^CnȑŒI]܁C樉IӎӑB\
@Ysٖ@vlCpݎvl{gCLIvxz؁B\
uݞAݞIv\
@꣎粍NIKCΓߑCsדIB\
@A꣛vL|ꌾI\́C٘𛀘bꒆI܋`B\
@A꣉ȊmIC|ً^␳C󊎐ȓI~]iszB\
@vCp꣓IǵB\
u\ݚjjjccIꟁAꟁccPccIAꟁcccc`AZccAsvccāccccccjccv\
@꣔픗ӎȓIߔgɌICIXݝًx~npB\
@ʑΒꊴossIC꣓esIg̏sZnTVOCYsB\
i׏YCcc񓾁ccvcc󔇎ccccHj\
@f{Iړ`wɁC꣋n󓞎țߝٖ@nCҐ]RB\
@꣖\CAI͗ʍCȋyܓI꣝ٖ@s_Cs꣓I隤חAeB\
@ݔvCӊߘM꣓ÍCsfnXꣁB\
uݙAݙIIv\
@{Iɐlb̕ZsƂ̂ʐẢɘRꂸԂ̐sĂB\
@풍ItߌoBʐCApN|vLv≺IӎvB\
u݁ccꟁA݁cc\ABBccꟁccPAsAߌoccsvꟁccZAZcccc݁Iv\
@sfIߘICߌoD꣐Ivl\́B꣌ݖ]qzICL@˔\ꏒɋꒆC@˔\sEB\
u~AߌoAsccsꟁccjjAsccvccIZAꣁccZꟁccIDccDɁccIəccjccv\
@ΉCsߐaʐ|ًʓIsׁBAΏ󒅔ؓI꣎Cpꑾ߈ُIJB\
@I_AǁCgdό`CAn|ɒcCӗnAJB\
i䐳ݔNƁccv{CccccAvcc{ccccʖߌoccssccpҁccvLccccccj\
@ԔݚaݚanAJCtdIژANB꣔ٖ@ReKIńC\kJnXB\
@ʑΒ꣉}ICȋp\ҏCzC꣓I៣֎~sZnB\
uccIsccvccꟁccccIߌoccssA펖ccߕAߕccjꟁccccJccJccꣁcccc꣗ꟁccjꟁIߌoccGjccv\
@ԓIhɗ^fړIɁCtȐ]IdtBɊoINݓZㅁC\}oIKCʉِs[ℓIKË󓴁B\
@JŖvLsCAX[nsѐC꣐g̕sZneC푥T׈tIB\

bg "a003b.bmp",3
mov %903,1

uݙGGGGGGGGGGjjjIv\
@oꐺiOIKCِڒCI֍꣓IԕBߑߝُIXC݈uԕ֏꣘A[q{sUB\
@꣓INC従CtAoB\
uNccꟁccccIv\
@dCc󟃘꣌oC꣓IӎĎKÓۚB
uށccꟁAsccscccc~ccsvccꟁccccߌoccsvccv\
@RCҕsB\

if %99==1 goto *eles_0

goto *gameover

;----------------------------------------
*elefrag143

savegame 99

gosub *r_tear
@@@PSR
br
@䐳]JCꍿCALꐺʝ{BQZṕC嗋B@
@e׈śIԖC֑zNCݔВnHpIAׁwÎ嗋xIiB\
@ݏX׍HށCʏ\ϐHpBҗL⋭sIC\̗́CD]B@
select "̏ŃVW}cHׂĂǂiPSXցj",*elefrag149,"̂܂ܖɕĂiPTOցj",*elefrag150,"邢͋󂫕rĂȂAVW}cߊlĂiPTPցj",*elefrag151

;----------------------------------------
*elefrag144

gosub *r_tear
@@@PSS
br
@XCJҐvLvI瑏ہB^pݔ퍢ZCҕs@ƌpOiIDB@
select "߂āAJ悤ɑւƐiłiPQXցj",*elefrag129

;----------------------------------------
*elefrag145

gosub *r_tear
@@@PST
br
@ʘЊًԓI粉BL_掺InCl୒LꏈoB@
select "ɂ̏ꏊɂ͂߂ڂ͖悤iPTQցj",*elefrag152

;----------------------------------------
*elefrag146

savegame 99

gosub *r_tear
@@@PSU
br
@ʑΖҙtoIׁChCQZyqCOIאg̋pˑR񗹋NB@
@OIvC˔ߗCߘאl݉IOB@
@O|݋NIוnorCBHzvl~B\
@ACzvߑIאlߌoœ|Cs\A樛꒼ݍݔ󒆁B@
select "N͂Ƃǂ߂ĊlɓĂiPTRցj",*elefrag153,"ĂĂiPTSցj",*elefrag154

;----------------------------------------
*elefrag147

savegame 99

gosub *r_tear
@@@PSV
br
@OꏬiHCœ݈ЉȐؑpI֗x㌋ʎB@
@ŞqߌoSnCoKiIB@
select "N͂̉ʎ낤ƎL΂ĂǂiPTTցj",*elefrag155,"Đ}łiPSWցj",*elefrag148

;----------------------------------------
*elefrag148

savegame 99

gosub *r_tear
@@@PSW
br
@AݘHCRœXїԏB@
select "N͂̏֗ĂiPTUցj",*elefrag156,"ȂɂĐ֐iłiPTVցj",*elefrag157

;----------------------------------------
*elefrag149

gosub *r_tear
@@@PSX
br
@䏫Î嗋B@
@N厕dIGCAṕCAzےXeՒnfB\

@ݐgUJIoCsm׉CL_JIHhgB@
@ɊɒnZ㓪Cps樐lVC\ƓB@
@הӑzsIHWW{CSӑB\

@̗͏񏡗Q_C#FF0000iIv@ej#FFFFFF@
mov %192,1
add %11,2
add %12,2
if %12>=%11 mov %12,%11
gosub *tear_hpc

select "N͂܂ƌiPTWցj",*elefrag158

;----------------------------------------
*elefrag150

gosub *r_tear
@@@PTO
br
@䐳ycÎ嗋AOCLgqŌpCߗ{꘢smNI܁B@
@ŁCʑPO╼B@
@Szvh{嗋IꠁCR@C֕sqn╼B#00FF00iF╼POj#FFFFFF\

add %100,10
gosub *tear_m

@䍚RoCJQB@
select "΂炭҂Ă΁A~݂iPTWցj",*elefrag158

;----------------------------------------


;----------------------------------------
*elefrag151

savegame 99

gosub *r_tear
@@@PTP
br
@\orCߊlÎ嗋BvݓIlCY\DKBOC@ʔ\QÈӛZB_InC`ꉺsB\
@s߁CrRsB#00FF00iFÎ嗋j#FFFFFF@
;mov %173,1
mov %106,1
select "ĂƁAJ͏XɎキȂĂB΂炭΁AeՂɐiło邾낤iPTWցj",*elefrag158

;----------------------------------------
*elefrag152

gosub *r_tear
@@@PTQ
br
@OꏬiHC䖔ЊJ舒nB\œICsmN㋎IB@
@嫑Rs^ߘI܋`CAVCҐLLrDB@
@OCȔݎIĈגSCbLHʒʉaB\
select "Ɍ̂Ȃ΁iPSTցj",*elefrag145,"Ɍ̂Ȃ΁iPTXցj",*elefrag159

;----------------------------------------
*elefrag153

savegame 99

gosub *r_tear
@@@PTR
br
@嫑ROꝏאlICAҐYڎ󔇑כߌoOIꠁB@
@䋋׍ō@ꌂClIבfށB#00FF00iFj#FFFFFF\
add %104,1
select "@ŌɓȂȂbƃI[NBɘlтƊӂ̌tɂāAւƐiގɂiPQQցj",*elefrag122

;----------------------------------------
*elefrag154

gosub *r_tear
@@@PTS
br
@Is䎩ȎICאlIB@ʉc׌ȗLCAאlIB@
@zI樉SsCrB@

mov %966,1

@䘸OoIכvLӁCaip[B\
@嫑RvLlYICASpB@
select "y̖j@ċC悤ɂāAւƐiށiPQQցj",*elefrag122

;----------------------------------------
*elefrag155

savegame 99

gosub *r_tear
@@@PTT
br
@LEʎC\ݎ藢eג[ځBʎŋNȒڐHpCȓoʏ`irB@
select "󂫕rĂ̂ȂA`ċl߂Ă悢iPUOցj",*elefrag160,"󂫕rA邢͐HpƂ̂Ȃ΁iPUPցj",*elefrag161

;----------------------------------------
*elefrag156

savegame 99

gosub *r_tear
@@@PTU
br
@䏇HiԏCʏZ꘢lB@
u^HꟁCvzLlޏoݔBCz樉꣉HYꝁHv\
@lq{΁CݔocԕHXB@
select "N̕킪V[g\[hłȂ΁Ah[tɕ̉H肢ĂiPUQցj",*elefrag162,"܂ɉ܂oĂiPTVցj",*elefrag157

;----------------------------------------
*elefrag157

gosub *r_tear
@@@PTV
br
@oߏpOsCR`wKB@
@䔇zC֙ߓؚN楚N楓IܒfCLYHsI䔇粉ߗB\

@ʑΏIgIC䏜DlʝّII@
@CN}DꠁB@

@DlFXѓI\\

mov %20,31
gosub *battle_ste

select "iPURցj",*elefrag163

;----------------------------------------
*elefrag158

gosub *r_tear
@@@PTW
br
@JߌoS◹CĎgOsB@
@ĉOꏬiHC֗꘢RJBቺKKI؁C`АXсB݋JŎCvݎsIvߋCAOꠁB@
select "炽߂ĉJh肵ǂƎvȂA݂苴n肫iPUSցj",*elefrag164

;----------------------------------------
*elefrag159

gosub *r_tear
@@@PTX
br
@䗈ДVOXInCsLoI}mB\

@嫑RnskCAIҐLsCsֈ׍LbCxlB@
@rpoIyCnhIӗ́B@


gosub *choice_flag
select "cɃtO΁iPUTցj",*elefrag165,"tOȂiPUUցj",*elefrag166

;----------------------------------------
*elefrag160

gosub *r_tear
@@@PUO
br
@ʎI`tÓ[aCΎÊ`kLʁC[㐶ÍB#00FF00ilFʎ؁j#FFFFFF@
@嫑Rݖ`vYpCAҐrciܗB\

add %121,1

select "ČN͍ĂсA֐iłiPSWցj",*elefrag148

;----------------------------------------
*elefrag161

gosub *r_tear
@@@PUP
br
@\NʎCB@
ʏ`݌lCÓ[InÉߍABʎL򑐔ʎJIʁB\

@䏼CyynLWꉺǵB@
@o߉ʎIÓ[ŊgUlICs֖ʘI΁C󒅑̗͓IBí̗Fܓ_j

add %12,5
if %12>=%11 mov %12,%11

select "CoĐɐiށiPSWցj",*elefrag148

;----------------------------------------
*elefrag162

savegame 99

gosub *r_tear
@@@PUQ
br
@uvzdCvv@
@ߗlIbC䍢fnccB嫐CgvLђ݋VޓInߏjIB@
@䍐iȖvLߎ퓌@ClIo꘢IΗeCwIB@
uYꡁBsAݓߙXvHIAC꣔czov\
@l瑾DFꠁB@
select "N͂̌tɕ𗧂Ăď𗧂ĂǂiPTVցj",*elefrag157,"h[t̒ɉĂǂiPUVցj",*elefrag167

;----------------------------------------
*elefrag163

savegame 99

gosub *r_tear
@@@PUR
br
@ʑΉړAOIUCXѓI\ҔoʓIC]gBcbSI{ݗߓInCR@cgB@
@AZ]CAΕIgeߌoϓkCsĐA\ǏIB\
@zYsĉ񗈗CŌ{ݒnICߎꍪ@B@
select "N͂̏EĂiPUWցj",*elefrag168,"E킸ɐ֐iłiPUSցj",*elefrag164

;----------------------------------------
*elefrag164

gosub *r_tear
@@@PUS
br
@䏇HXCsv֗^HB@
@pOꏬiHCIlH}fIB@
@eŁCA\oo݋vVOAߔpPCSِlŗB\

select "Ƃ肠́AړInł钬ɂǂ蒅̂iQOPցj",*elefrag201a

;----------------------------------------
*elefrag165

savegame 99

gosub *r_tear
@@@PUT
br
@c_I򑐛ߌoECvYʒlœIB@
@Ȗ򑐏ݒnגSCLAEAOIHB@
select "N͏ɌȂiPTQցj",*elefrag152,"EɌȂiPUXցj",*elefrag169,"ɌȂiPVOցj",*elefrag170
;----------------------------------------
*elefrag166
	
savegame 99

gosub *r_tear
@@@PUU
br
@݂c_CDL򑐍ݔ쐶B@
mov %173,1
@vE曀#FF0000iIcIj#FFFFFFl򑐁i򑐁~Pj#FFFFFF@
add %101,1
select "@āiPUTցj",*elefrag165

;----------------------------------------
*elefrag167

savegame 99

gosub *r_tear
@@@PUV
br
@@嫑RkՁCAቺȊOʝّ@B䏫LZQ󏫑EClyynďoB@
u粓Iꈏ㍿C樉œX^v\
@ONґzsItCAvݔ{C骔AvAB嫕sÁCAҐꈏClʑOƊJoځCIopwJB\

gosub *ev_window
bg "a001a.bmp",3
mov %901,1

uGCF^YBWgFIɕis팩C\ѓDIꠁv\
@l\o꘢S~C։ʗp͊JnցB\
@֊coꓹɓIʐCŔz~CōݓS~㔯oƋIB\
uIccAāccccv\
@ȓINԔ푼lώ@C樉䊴zۓIՁCՐS樉Ig̕sonTNB֔@CUJnoI֖琨sCݖ~zωzB\
u^䎖FIꟁC@iI{NsꌩBϑ嗹ꟁv\
@l粓ӔcboC粑NʒnB\
@ݔԁCIAӈ__ށCoIAtI◹B\
uAccBArccBAsꠁHv\
@߉䔇ClyyޗތB\
uImCAʗL_XsꟁBv@dꟁv\
@ʑ΋EՐSIClΕΐoɓIbBA݉{SCzvsIClˑRGNꍪwB\
usߚvCv꣍m樉䝇CA꣈cpNSIBHv\
select "ɓ˂ꂽ̗vɁAN͓{ɔCĉ肩ĂǂiPVPցj",*elefrag171,"vۂő}ĂiPVQցj",*elefrag172,"܂AŏoĂ܂ȂiPVRցj",*elefrag173

;----------------------------------------
*elefrag168

savegame 99

gosub *r_tear
@@@PUW
br
@䝃Nߍ@CI[N_aIBߌ䊐NCŐVB扺IЁC݋󒆗hgB\
@podVZCҗގIIҔw߁CѐǵB@
@I\ʍwFVxCYAIꠁB\
select "N͂ꂩ炱̏gĐĂǂiPVSցj",*elefrag174,"܂Œʂ̕gĂiPVTցj",*elefrag175

;----------------------------------------
*elefrag169

savegame 99

gosub *r_tear
@@@PUX
br

gosub *choice_flag

select "@|CgdAdɋLȂ΁iPVUցj",*elefrag176,"LȂiPVVցj",*elefrag177

;----------------------------------------
*elefrag170

savegame 99

gosub *r_tear
@@@PVO
br
@g_CꏈvYʓInBI㖔撅꘢B@
select "ɍsȂiPTXցj",*elefrag159,"ɍsȂiPVWցj",*elefrag178,"EɍsȂiPVXցj",*elefrag179

;----------------------------------------
*elefrag171

bg "bg_01for.bmp",3
gosub *tear_w
gosub *tear_hpc
gosub *tear_m
setwindow 25,25,20,20,23,23,0,20,20,0,1,":a;text_window.bmp",0,0
mov %9,0

gosub *r_tear
@@@PVP
br
@@Ғn⋋NgCًوZClŗߋB@
u]́Iv@
@Œ粔oS粍ݒnşIqCX\gCpSgI͟ȁdCI_ꌝB\
@`dIGCAs䏊󓞓IJBחҝُISēxoCĎgNB@
uʁAʑŗBVvICL_ӖY`C꣏A`ꠁIADD꣒bIIv@
@lAP˓IwqC៣nBŗߎU_㏈򐨁CAϓʓIތ^B\
@䝾NNIClbB@
br
@cc@
@cc\
br
@ߗiԁClkAbDBiYCr樉Y퓁ghWW䊓IoB\
uCϓMMꠁBRCNxȑOXv@
@嫑RL_CAimߐlӁBRn̎^IHC󝾉BilFɎVj\

mov %15,5

uCv\ċ䐹CI꣒bv@
select "̌tɒdɌƂǉŎxAN͏oiPTVցj",*elefrag157

;----------------------------------------
*elefrag172_cg
gosub *ev_window
bg "a001a.bmp",3

*elefrag172

;gosub *r_tear
@@@PVQ

@vݔ⑼IvC߉䍄˔ETAIӋ`AsvB\
@@fV@Ccʉ_C粓lIbB\
uCꝐꝁBߛCA樘Vvꠁv\
@loDFIΗeC݉ʑOEQqCob`uNIBߋIݗ䍄˔AIDCnsiB\

bg "a001b.bmp",3
mov %901,2

u݁I@DccDɁCDꟁIIv\
@IuɁCȋyA틭sAJIuɁCIg̏PB\
@Iu樉󓞗O`ItCg̖sRnҒnB\
uٙBaC^ꟁv\
@loICAJn䏊ÓIB\
@dI_E̓C@ܔMISʁCѐIthIAǁB\
@䊴oȐg̗IY鼒nꐺCjIcЉ엹C͌ЗIB\
uꟁccIDccɁCDɁcc݁CccIv\
@IuɏPCsRn}ٗǵCzvvBAg̏A퓀ZCKdٖ@eB\
usꠁB꣛ߌo\ӁC_ABvVvґzpC꣐g̓IRASRVvTv\
@lI_okkIC__n[iB\
@N\gIACחڔ[ꏗ~]C鏈Icϓ_NB\
@AۈHCIOAAJCۖvߍǖ\NAcsߓIl_B\
iv{ccߗCߗvccϐl{bI`󗹁j\
@ݚaccΎccΎ\
uݚjIHvv\
@嫑Rg̓esCAIvL픍DB\
@lI_粕R粌pNCJAIcC꒼vB\
@픗SϒICXCSI樉s֗៣B\
uCVvI_SUIz@ꟁH꣔nJAǊ܏Z_IqC^樐lܐSxꟁv\
@䊴ogSs흔ʗC\lᒆRNIKF~]V΁B\
issCv{BvcclIߋccj\
@@AʕCAݝٖ@RIʑOCo@wwyB\
@smlێ@oISC粒𓮒C^NȁB\
uꟁCꟁCvI樘Vv狻NIv\
@lޖv哾I_AJIACg{樉YLȍˊҐIxB\
@C~~]gCꎟꎟnҗCҗIsAvI_EoB\
@허CcnCA틐_ˑRZJICvꍱԍ˔\dVB\
u܁BsSANߓꟁcccЁIv\
uݚjIv\
@EI_dVݗACsÓInAĎJnB\
@iߘMCIߗϐlIcc{bccϐl{bpIccBj\
@ؓs׎ߔӁC@C꣍˔SnIIB\
@AAZ꣌ݖCvLꔖ@j~~]xzIC꣓Ig̖\ڎ󌻎CCRXB\
@慎hICgsÓIC꣓Ig̖哮ڎC\ŏAח܏ZlI_ʁB\
@풊ꎟC꣓IAAϐl_I`CًْnZC\ΕB\
uuccGGC^uBvᆗCVvvuᆗBꟁC^zA鐏S~Cs\ÛYniʎꟁccv\
@lŔ~]Mt]ʚffCIb`B^ŕsIݓߗC_񓾈ȌpB\
@ݘAeꉺisRss򋖓IvC꣑\퓖lIߕΑҁB\
uꟁccjAjꟁccccꟌāccv\
@ეʓIɑ^CȋyNƓIJB\
@꣐g̓従IlƁC꣍@Il֏㗹wIA]B\
@꣛ߝُUgClߗ]B\
@BLS݉AOI従CnFȐXIB\
uIccꟁccv\
@sm`IQC퐥NoIꡁH\

bg black,3

@cc@
@cc\

@cc@
@cc\

bg "a001c.bmp",3

@ccsmsoԁC꣓Iӎ푩CSgsݓ[לIoVB\
uGꟁccAꟁAꟁccBꟁAꟁccv\
@꣉gIto\IgQCAIcߊSonO|C判ʒn咅lI_B\
@꣓IAڐߕψאlAJI`C꣓Ig̖Ŕٌ`IYցB\
ucccCisisBꎟCALVItoC[Iْv瘸ρB^ɕiꟁv\
@꣖smߗlIB\
@꣓ISg㉺sCIt́CA񒣐ȐlpIڐB\
@꣓ICs璅꘢s]IClIwqB\
uꟁCnAveo@HcCSꠁCmo꘢IXccߎCVvc꣘ꏗNuIv\
@lPʓIݏ񋿁C^C𓮓Ig꣍ĎoB\
uBꟁccAꟁAsccvccccAߌocc闹ccv\
@Aɓ[IgQCsmsoԁC꣐rYLȑ\ꖼ`ҁB\

@ݔÓIXѐ[C꣛s璅VIC풍菫݈rIyVxߗ]cc\

if %99==1 goto *eles_0
goto *gameover

;----------------------------------------
*elefrag173

bg "bg_01for.bmp",3
gosub *tear_w
gosub *tear_hpc
gosub *tear_m
setwindow 25,25,20,20,23,23,0,20,20,0,1,":a;text_window.bmp",0,0
mov %9,0

savegame 99

gosub *r_tear
@@@PVR
br
@@ʉݔsځCߔVODseՓIEϏAsBb嫔@Cݝٖ@eEiB@
@꣉sÓISCkOnUlC֑ŎZҒn]gJB@
uCV嫑RspbBAבցC꣉Ș粓IdCCIёv@
@꣒ˈŁCˎqr꘢FIa꘢FIrB\
uFIw偋CȑΎIsC樝DlϓXyBFIr악ؕCLIIʁv@
select "Ȑ𕷂AN͒w偋IłǂiPWOցj",*elefrag180,"ؕIłǂiPWPցj",*elefrag181,"܂I΂ɏ𗧂ĂǂiPWQցj",*elefrag182

;----------------------------------------
*elefrag174

savegame 99

gosub *r_tear
@@@PVS
br
mov %15,7

@啐ߕύXB@
@݋NC꣓IύXׁwFVxCQƓI]\y珫VρB@
@OCcIsB嫑RL\ΎIhjhCA؏jV́C{ȘΖB\

@@Oo_aIgBߕŐ݌אVlIꣁCvȌIB꣖ًوZ@Cȍ񉞛IvӁB@
select "ӂVɐւƐiގɂBiPVTցj",*elefrag175

;----------------------------------------
*elefrag175

gosub *r_tear
@@@PVT
br
@ȉvIXсCIsB@
@ĉOꏬiHCYA\oΎㅓIB@
select "͂AoȂ悤ȋC}悤ɂȂAN͂ƒnʂ𓥂݂߂ĐX̏oւƌiPUSցj",*elefrag164

;----------------------------------------
*elefrag176

gosub *r_tear
@@@PVU
br
@d_
@nUœ|II[B@
select "ĂтꂪoƂ͖iPWRցj",*elefrag183

;----------------------------------------
*elefrag177

gosub *r_tear
@@@PVV
br
@d_CoB@

@DlFz\

mov %20,9
gosub *battle_ste

@@iIdWLj@
mov %174,1

select "N͕܂iPWRցj",*elefrag183

;----------------------------------------
*elefrag178

savegame 99

gosub *r_tear
@@@PVW
br
@f_CL򐅁BᒆOoI\KC[Ŕ\lzI䊁B@
select "̐łĈłiPWSցj",*elefrag184,"܂ȂĂiPWTցj",*elefrag185

;----------------------------------------
*elefrag179

savegame 99

gosub *r_tear
@@@PVX
br
gosub *choice_flag
select "|CghAhtOɃ`FbNȂ΁iPWUցj",*elefrag186,"LȂiPWVցj",*elefrag187

;----------------------------------------
*elefrag180

gosub *r_tear
@@@PWO
br
@\Nw偋Ci܁B\

@voCA݋󒆔jCpSINߊlΎIǵCsBȌynΔ푩IΎ苋\ō@ꌂCߊlIΎݔVVsٖ@ώ͓EB@
@ARvymnΎCȖʑΕqIGlC\ٖ@aIʁB\
@嫑RmVsՓIMCA䑍o׍toILB@
@嫑Rݖ`\psCAƊҐяꠁilFw偋j@
add %115,1

select "N̓h[tɕʂAoiPTVցj",*elefrag157

;----------------------------------------
*elefrag181

gosub *r_tear
@@@PWP
br
@\NؕCi܁B\

@rLŁCڐGؕIC畆ࣕIB嫑R\叝QICAΓޓILBΖ@VޓIvLʁCprLB@
@OCRMdCݖ^nȍՁB\
@Aݖ`vQLgpICLB@
@Az׍toICoL_scZBilFؕj@
mov %116,1
select "GȋĈ܂܃h[tɕʂAoiPTVցj",*elefrag157

;----------------------------------------
*elefrag182

gosub *r_tear
@@@PWQ
br
@꣐铌sٖ@N꣓IC꣏yJClQZnzo꘢rqߗB@
umC꣏Aя㔇ꠁB\ݖ`hpIBdVC٘_Ys\Dv\
@rΈNMIBŒCAoFaLYIʁB@
@AҐsl׏Yv䔇B@
@c^oB\
uvꌏCAK{Ȗ^`BdIKv@
@ߊҕs@bcCAVҐsCsm樕B@
@{ȐdǉߗIC䝾dVB#00FF00ilFdVj#FFFFFF\
add %117,1
@\gpꎟC٘_󓞑IQCs\̗͉őlBOC@ʗpݏҐgCҔ\ҋ~MIB@
@Iʊmk_CA׍toIݗL_׏B\

select "N̓h[tɕʂAoiPTVցj",*elefrag157

;----------------------------------------
*elefrag183

savegame 99

gosub *r_tear
@@@PWR
br
@d_CLʉAEaIʓB@
select "ɐiނ̂Ȃ΁iPTXցj",*elefrag159,"Eɐiނ̂Ȃ΁iPWWցj",*elefrag188,"ɐiނ̂Ȃ΁iPVXցj",*elefrag179

;----------------------------------------
*elefrag184

gosub *r_tear
@@@PWS
br
@䊅򐅁Co_uCŐg̗ROsĉʁB@
@I򐅌{LŝʁC]UȒaœÍB\
@b嫔@CΘvLœI䗈Co򐅔Ó[B@

select "ꑧN͍ĂѐɐiގɂiPWTցj",*elefrag185

;----------------------------------------
*elefrag185

gosub *r_tear
@@@PWT
br
@f_CLʉE粘aIHB@
select "EɍŝȂ΁iPVOցj",*elefrag170,"ɍŝȂ΁iPWXցj",*elefrag189

;----------------------------------------
*elefrag186

gosub *r_tear
@@@PWU
br
@n_hCeœ|II[B@
select "ĂтꂪoƂ͖iPXOցj",*elefrag190

;----------------------------------------
*elefrag187

savegame 99
gosub *r_tear
@@@PWV
br
@n_hCoB\

@DlFT\

mov %20,1
gosub *battle_ste

@l@CiIhIWuj

select "āiPXOցj",*elefrag190

;----------------------------------------
*elefrag188
;@|CgeAœ䂩o肳B@
savegame 99

gosub *r_tear
@@@PWW
br
@ߓ`oRoRIUB@
@ok߁C䝫NCHщB񟠒FIoݓߗB\

@gђ{_IC꣔EsZyy|zB@

gosub *choice_flag

select "f̃tOĂ̂Ȃ΁iPXPցj",*elefrag191,"łȂȂ΁iPXQցj",*elefrag192

;----------------------------------------
*elefrag189
	
gosub *r_tear
@@@PWX
br
@䖾꒼݈꘢ΌIVnCߐ_p͓Iiω񗹓ߕБߊŊIXсB@
@粈הIobC粔OIŔB@
select "炽߂ĂōspēxmFĂA̕ւƐiłiPUSցj",*elefrag164

;----------------------------------------
*elefrag190

savegame 99

gosub *r_tear
@@@PXO
br
@n_hCLʉ粘aIHB@
select "ɍŝȂ΁iPVOցj",*elefrag170,"ɍŝȂ΁iPXRցj",*elefrag193

;----------------------------------------
*elefrag191

gosub *r_tear
@@@PXP
br
uߌovC樑ꠁv@
@bC֔@jʍݗъԐB\

@mCĉ񓞔nvLYӋ`B@
select "N͐X̒SւƌāA鎖ɂiPUXցj",*elefrag169

;----------------------------------------
*elefrag192

savegame 99

gosub *r_tear
@@@PXQ
br
un[ICVmfzfI썰B꣗LShAuC։񓚉IBٍӁCHԉ񑦉v@
@pLIoԘbB\

@NfzfC\{NO匰gI`ҒLIʁBiLٗ^ϔI^CAA꣖ߐߑI`̎B@
@ߐݗ^ʗdI@ֈޗCV@꒼KnCIQB\

@AsmC@LIlICRnݔXѓI[B@
@꣊bICSGY|Iz@CAcc@

select "ɒ킵ĂiSSVցj",*elefrag447,"fɈԂĂiPUXցj",*elefrag169


;----------------------------------------
*elefrag193

savegame 99

gosub *r_tear
@@@PXR
br

gosub *choice_flag

select "|CgjAjɋLȂ΁iPXTցj",*elefrag195,"LȂiPXUցj",*elefrag196

;----------------------------------------
*elefrag194

gosub *r_tear
@@@PXS
br
@䏫UoCAg\ʛߌo瑔BLoߗIΌCzKꠁBcߌoSٖ@וgpCr揫sXB#00FF00ilFIj#FFFFFF@
mov %122,1
select "ēCɈԂĂiPUXցj",*elefrag169

;----------------------------------------
*elefrag195

gosub *r_tear
@@@PXT
br
@j_Cneœ|II[B@
select "ĂтꂪoƂ͖iPXVցj",*elefrag197

;----------------------------------------
*elefrag196

gosub *r_tear
@@@PXU
br
@j_CoB\

@DlFT\

mov %20,1
gosub *battle_ste

@@iIjIWLj

mov %180,1

select "̍s߂悤ƁiPXVցj",*elefrag197

;----------------------------------------
*elefrag197

savegame 99

gosub *r_tear
@@@PXV
br
@j_CJnLaEHB@
select "ɐiނ̂Ȃ΁iPVXցj",*elefrag179,"ɐiނȂ΁iPXWցj",*elefrag198

;----------------------------------------
*elefrag198

gosub *r_tear
@@@PXW
br
@䍄og@Ip싿CIHAgZB@
@^Co݉IOB@
@ŗs{I\

@DlFiVׁHHj\

mov %20,6
gosub *battle_ste

select "iPXXցj",*elefrag199

;----------------------------------------
*elefrag199

if %963==0 add %963,4
if %963==1 add %963,4
if %963==2 add %963,4
if %963==3 add %963,4

gosub *r_tear
@@@PXX
br
@œ|@C䘸I[㓾svcIqCqUʓʕGI#00FF00ilFFj#FFFFFF@
add %118,1
select "ǂ炩Ȋɓ悤ɕĂiQOOցj",*elefrag200

;----------------------------------------
*elefrag200

savegame 99

gosub *r_tear
@@@QOO
br
@䓞BInC^IoB@
@b嫔@CoCȘRniB@
@Axfu^C񐳋KC琥ɑ댯IB\
select "̂܂ܐH璬ɐNĂiQOQցj",*elefrag202a,"܂ʂ̓TׂɎ͂ĂiQORցj",*elefrag203

;----------------------------------------

;----------------------------------------
*elefrag201a

csp -1
textoff
print 1

bg black,3

bg "catch02.bmp",3
bg "bg_02tow.bmp",3

gosub *migikuri

gosub *tear_w
gosub *tear_hpc
gosub *tear_m

mov $1,"m04_town.mp3"
mp3loop $1

*elefrag201


savegame 99

gosub *r_tear
@@@QOP
br
@s୊ㅁC׈꘢CݓKBTׁCߋ\_揊ݒnC琥_Iޏ싏ZInꠁB@
@חhOGIݎ{C@pی쑼씇lB\
@^Ӌ`㗈CL慎hB@
@IٕC⋒qImB@
@spzmCvp^i˔\iB\
@zএ͓I୐iCA୎ݑCvLঔ୕ǓIZpB@
@s߁CvㅒꚟCsA\YniB@
select "N͐ʂɋ߂ÂĂiQOSցj",*elefrag204,"̎͂ĕʂ̓TĂ݂ĂiQOTցj",*elefrag205

;----------------------------------------
*elefrag202a

csp -1
textoff
print 1

bg black,3

bg "catch02.bmp",3
bg "bg_03und.bmp",3

gosub *migikuri

gosub *tear_w
gosub *tear_hpc
gosub *tear_m

mov $1,"m05_under.mp3"
mp3loop $1

*elefrag202


savegame 99
gosub *r_tear
@@@QOQ
br
@䘸B@
@CYZnꠁB@
@󟃗ʓKxCҍݐ^B嫐vLSՁCACvߌoߐlbB\
@R@CݐI୕ǏC꘢VB@
@smw掵ʓҐ掵CA䖾m营ߋ𐅓IlcoIB@
@{gIxLOC粍גʓȍsInCx獷sB\
@ʘH{g嫑RLCAs樐ldŊInB@
select "N͂̂܂ܐHւƐiłiQOUցj",*elefrag206,"xԂĕʂ̓TĂiQPPցj",*elefrag211

;----------------------------------------
*elefrag203

savegame 99

gosub *r_tear
@@@QOR
br
@iCzsk댯ꠁB@
@R@CŗōDҐ୕ǝQQŗLvLB@
select "Oɂč̕OƕĂiQOVցj",*elefrag207,"E̕OƕĂiQOTցj",*elefrag205

;----------------------------------------
*elefrag204

savegame 99

gosub *r_tear
@@@QOS
br
@ꑖߑCߙ{qIƚARnB쒩ŗCђЊdIː߁B@
select "ʂė~ƌĂiQOWցj",*elefrag208,"ʍs`ĂiQOXցj",*elefrag209,"܂AⓚpŎ͓˔j𒧐킵ĂiQPOցj",*elefrag210

;----------------------------------------
*elefrag205

savegame 99

gosub *r_tear
@@@QOT
br
@䉈୑CzQQLvLiI@BRC嫐ِlZICA୛vLߛInobϓInB@
@vLQC\InCŏIoߜkI_B\
@VC꒼ҍݔsꔖ@B@
select "N͒̎͂̕ւƕĂĂiQPPցj",*elefrag211,"E֕̕ĂĂiQPQցj",*elefrag212

;----------------------------------------
*elefrag206

savegame 99

gosub *r_tear
@@@QOU
br
@掵ʓOB@
@䉈[BꏬiH@CAƕsiB䘸s\oΔcC_RB@
select "H̍L󋵂傫ς鎖͖A͂܂ƉւƑĂBȓH悤ɂȂAN͐HiށiQPRցj",*elefrag213

;----------------------------------------
*elefrag207

savegame 99

gosub *r_tear
@@@QOV
br
@䉈O୑CASQsୗLjInB@
@pOC؍GnZㅍ݈NCOiϓB|s@C̓㐥H𗹁B@
@嫑Rsp萄JؑOiss\CAIoiCVōDҐʔB\
@XdvICZㅍ݈NI؁C쐥gחW厩R瑎ޗI୕ǖ|s׉߁B@
select "N͂ԂĂiQPPցj",*elefrag211,"؁XGɂ܂Ă鏊ɓĂĂiQPSցj",*elefrag214

;----------------------------------------
*elefrag208

savegame 99

gosub *r_tear
@@@QOW
br
@^q@Cvܖ╼A樉ߋB@
select "ɉȂiQPTցj",*to_208,"A邢͒fĎ͓˔jȂiQPOցj",*elefrag210

;----------------------------------------
*elefrag209

savegame 99

gosub *r_tear
@@@QOX
br
@oʍs؍@CqpLsBv_DCꉓIꠁHCvO╼B@
select "ɉȂiQPTցj",*to_209,"A邢͒fĎ͓˔jȂiQPOցj",*elefrag210

;----------------------------------------
*elefrag210

gosub *r_tear
@@@QPO
br
@{zs˔jCAqʋoQB\{qcc͏ZCڒɉB@
select "N͂̂܂܈ӎācciQPUցj",*elefrag216

;----------------------------------------
*elefrag211

savegame 99

gosub *r_tear
@@@QPP
br
@䐳⋍ݐIB@
@CȌoRCȋQQŗLvL\iInB@
select "H璬ɐN̂Ȃ΁iQOQցj",*elefrag202,"ǂɉčւƕĂĂǂiQOVցj",*elefrag207,"ǂɉĉEɕĂĂǂiQOTցj",*elefrag205

;----------------------------------------
*elefrag212

savegame 99

gosub *r_tear
@@@QPQ
br
@䗈\ŌInB@
@m@n⋍ݓCŏ㋎΋΍nsȓIEӁB\
select "N͖ɋ߂ÂĂĂiQOSցj",*elefrag204,"ǂɉčւƕĂĂǂiQOTցj",*elefrag205,"ǂɉĉEɕĂĂǂiQPVցj",*elefrag217,"܂Av؂ăZNV[ȃ|[YŃAs[ĕm̑O璍ӂƂiĂiQPWցj",*elefrag218

;----------------------------------------
*elefrag213

savegame 99

gosub *r_tear
@@@QPR
br
@掵ʓ[@
@Ґ꒼OLC󟃒GꀋۘadIB@

gosub *choice_flag

select "ig̃tOɃ`FbNj΁iQPXցj",*elefrag219,"悤Ȃ΁iQQOցj",*elefrag220

;----------------------------------------
*elefrag214

gosub *r_tear
@@@QPS
br
@ݔՍߓIؓsfnOiB@
@嫐iF꒼vYωCAꑖiсCA{vL\HWIB@
@Lsn񓪖]CAAȝJ}ߓIHsŕsB\
@|zyCܒfg粓I{}BXCsvcICߍ}햔Ȓ񋎁CB\
@䒍ӓ_Cߌo蜓AޘHsQsIzB@
@ݔCٖ@WLCvʑΔĐAI}C{s\QCI@B\

@ٍIꣁC\꒼ҍݔΐFISUCHՐsA̗͕sxccB\

goto *gameover

;----------------------------------------
*to_208
sub %100,5
goto *elefrag215

*to_209
sub %100,3
goto *elefrag215

*elefrag215

savegame 99

gosub *r_tear
@@@QPT
br
@IvtKC@֔sCߑiB@
@g@IQnՈꐺ֏㗹B@
@ŗC䌻ݐʈӋ`I٘HޗB@
@꘢CLOHʒʉOaEB\
@LVOߐ߁CדkBCYA旹B@
u܁C꣍DBꎟqꝁHv@
@ΘˑRbIlCsR__B\
@ꓪCēIZCߒ́B嫐Ȗelk댯CAI͞pn꣊SB\
uֈC䋩zȁCݔIٛZBݐDoэwHށv@
@̔zȓIjlΗ΁C樉˗ᑼܗIHށB܎qDeeIHށCL䌩߁CLv߁B@
u꣐ꎟC꣈꘢BqbAсC{꣍ōDΒNIbs^BVԌݑcE琥Ə֔сCvIoj]AוʐlIՒ`BA꘢^댯חדIqv\
@zȐoԓߔVnlߕIb@CyynޗތB@
uMN꣓IRCs߉Ib꣍ōDʐMBb񗈁C꣗vҖvhсCsWًh_Hv\
@ߑCˑzNȊmLXvhCqҐ^L_B@
select "j̗UfȂ΁iQQXցj",*elefrag229,"j̗UɏȂ΁iQROցj",*elefrag230

;----------------------------------------
*elefrag216

gosub *r_tear
@@@QPU
br
@ߐ_C꣛ߌo튷㗹gsړIߕCҔ퍽YlB@
select "oȂ܂܂ɎԂ͉߂ĂiQQSցj",*elefrag224

;----------------------------------------
*elefrag217

savegame 99

gosub *r_tear
@@@QPV
br
@p୕ǑCpvLClӓIC\୓I͜pjB@
select "ŕǉɍɍsȂiQPQցj",*elefrag212,"łȂȂ΁iQQTցj",*elefrag225

;----------------------------------------
*elefrag218

savegame 99

gosub *r_tear
@@@QPW
br
@꣌yyn[zC樐ScÉB꣖vLYLݔ펞C_ʘa͔YsdvCٌC藹rSB\

gosub *ev_window
if %6==3 bg "a008a.bmp",3
if %6==0 bg "a008b.bmp",3
mov %908,1

@꣝NqCyyneZB\
@Պ꣓I_jL靁CAvsCΕ{sbB\
@꣕ȓICOImsmQvCJnpF鶓I_ŗʋN꣗B\
@œΕ@yՒnbC꣕s֋΁CJnvlY@umB\

bg "bg_02tow.bmp",3
gosub *tear_w
gosub *tear_hpc
gosub *tear_m
setwindow 25,25,20,20,23,23,0,20,20,0,1,":a;text_window.bmp",0,0
mov %9,0
texton
@vݔcmœ|CA\NB@
select "m@̂߂Ȃ΁iQQUցj",*elefrag226,"m̌ĖւƔэނȂiQQVցj",*elefrag227

;----------------------------------------
*elefrag219

savegame 99

gosub *r_tear
@@@QPX
br
@VOœ|II̛ߌosC`Vl験IB@
@ݔXCߓIؖ狖훀앪HꠁB\
@粋FCAÓߍVlsv䔇粉ߗB@
select "ÂH̉ւƌ̂Ȃ΁iQSRցj",*elefrag243,"ޕւƌȂiQQWցj",*elefrag228

;----------------------------------------
*elefrag220

gosub *r_tear
@@@QQO
br
@oAsC^ssICʕsyhB꣙{ӎnߌҊoeJʁCsRn@B@
@AݔCԘOd߁C꘢KeҒnHₗoB\

@DlFHIKe\

mov %20,10
gosub *battle_ste


select "iQQWցj",*elefrag228

;----------------------------------------
*elefrag221

savegame 99

gosub *r_tear
@@@QQP
br
@암XCB@
@ȕsOkaBOCȋ`KꉺߓIB@
select "kɌȂiQRPցj",*elefrag231,"ɌȂiQQXցj",*elefrag229,"߂ɂƂK˂̂Ȃ΁iQRQցj",*elefrag232

;----------------------------------------
*elefrag222

savegame 99

gosub *r_tear
@@@QQQ
br
@암XCXB@
@􎢗LlOOnH߁CAvl≺䓋bCzB\
@XȒʖkaB@
select "N͋߂ɂNɘbĂǂiQRRցj",*elefrag233,"k̕֐iނȂiQRPցj",*elefrag231,"̕֐iނȂiQQXցj",*elefrag229

;----------------------------------------
*elefrag223

savegame 99

gosub *r_tear
@@@QQR
br
@암XCB@
@o粓IsDC͓IƚŋNzzsPԗB@

gosub *choice_flag

select "ir̃tOjĂ悤Ȃ΁iQRTցj",*elefrag235,"łȂ̂Ȃ΁iQRUցj",*elefrag236

;----------------------------------------
*elefrag224

savegame 99

gosub *r_tear
@@@QQS
br
@LlΉ䉺ߏoC@֔яo[ԁB@
@o[ԁCO𒷒ILB퐥YnH\

@S[^CAAZݑOʓIlbC꘢ncc΁CSvLv񓚓IӎvB@
@Tu{gꠁC\ߌQlڏW݈N^B@
@ߐ@nʁC樉Ig̕sRwKdB\

uplCVԌݑώEInBACvL{I@OVnv@
@ߐ߁Bݖ^nCL樓z讌ݑlC樐l^אisrlI\B@
@䖜vzCRf펖B\

uvYC꣗vsBv꣐soNCc\IuMAsB{{{{Iv@
@߉ƚ앂oIΗeCs݌n꣐CAZAv֌nB@
@꣑΍{CSON٘_@svIrSB\

bg "bg_05bat.bmp",3
mov %8,%15

uCc꣊슽IꠁB꣖s\񗈗v@
@_k@I΁CڒCO핐흲ݗ꣓IʑOB\

EnFU͍CAΒn瑽B
EsNFގZCcȒP՗pIό^B
ELLFU͒CAQB\

@꣘II퐥cc@
select "U͂̍ŕiQRVցj",*elefrag237,"ϓIȕiQRWցj",*elefrag238,"xЗ͂ႢiQRXցj",*elefrag239

;----------------------------------------
*elefrag225

savegame 99

gosub *r_tear
@@@QQT
br
@䉈୕ǈ꒼OiCOoIHB@
@狖ߌopPꠁCSvLݗB嫑RȉCAUCđzএ㗈AB\
@vLr_CXviBsSk\󏝁B@

gosub *choice_flag

select "iṽtOjĂ̂Ȃ΁iQSOցj",*elefrag240,"N͂̐Hɔэł݂ĂiQSPցj",*elefrag241,"ԂĂiQPVցj",*elefrag217

;----------------------------------------
*elefrag226

gosub *r_tear
@@@QQU
br
@Aݎmϋ꣐g粎C꣝UoPB\

@DlFאlmQ\

mov %20,11
gosub *battle_ste

select "Ȃ΁iQSQցj",*elefrag242

;----------------------------------------
*elefrag227

savegame 99

gosub *r_tear
@@@QQV
br
@꣑zmstiClԐ߁BAmvL꣓痁Cw@꣖o|B@
select "l̕mĂсAN͑ܒ@ɂĈӎĂiQPUցj",*elefrag216

;----------------------------------------
*elefrag228

savegame 99

gosub *r_tear
@@@QQW
br
@˓ICYA\QoB@
@RCAZzߘOiCsmCoIHߌofBݎ͎lQQCŗSٖ@ΖʗB\
@smNICҐOCAŗߌos\JHB#FF0000iIgIWuj#FFFFFF@
mov %177,1
select "dȂH̉ւƌĂiQSRցj",*elefrag243

;----------------------------------------
*elefrag229

savegame 99

gosub *r_tear
@@@QQX
br
@ICOB@
@XleH`C]CvL\񋟗LpIlB@
@􎢘HߓIœ@Cs^IڌCAeDFIB\
@픇DÍCsCAVҐsNrDB@

select "̓ɍsȂ΁iQQPցj",*elefrag221,"ʂ̓ɍsȂ΁iQQQցj",*elefrag222,"E̓IԂȂiQQRցj",*elefrag223

;----------------------------------------
*elefrag230

savegame 99

gosub *r_tear
@@@QRO
br
@ݔzȓI籐C䗈撆IفB@
@ٓI㎔zۓIvoCʗLeeIl݊BݔI駏ꏊCzȏΗNB\
uVMksIfޚGIv@
@Β͓Il^C͊Iƚ牞a吺NB@
@AC݉ŗv튽ēIgQۖvCꠑ䎞CNˑRlSZB\
@݉|zyCِߌoLB@
@zȋCߘˊҋїnbIjlCpԓxN|ϒnGNdwB@
usAߗꝁCwōDAIbʐMxvv\
@N\zC꘢eobIlCRTꡁCݐ樐lȑzہB@
@sÎ^xqCAzȎߙߊbC_vLN|hB@
select "ĂԂɂɂjB̖͌N̐ĝ݁AācciQRSցj",*elefrag234

;----------------------------------------
*elefrag231

savegame 99

gosub *r_tear
@@@QRP
br
@OiH@C䗈꘢J舓InB@
@ሟl獬GlށC݋ꔏWsCʍDsM駁B@
select "sl̂̕ɍŝiQSSցj",*elefrag244,"ĖĐ}łiQSTցj",*elefrag245

;----------------------------------------
*elefrag232

savegame 99

gosub *r_tear
@@@QRQ
br
@z`KꉺߓI[qC⋓OȗȖBA@pSvLCB
select "s@ł͂邪JĒ`łiQSUցj",*elefrag246,"炾ƒ߂Ă̏𗧂Ă悢iQQQցj",*elefrag222

;----------------------------------------
*elefrag233

savegame 99

gosub *r_tear
@@@QRR
br
@䎎lbCAΕp^IڌŒCꌾsB@
select "݂`ďoĂiQSVցj",*elefrag247,"ɂɗĂiQQQցj",*elefrag222

;----------------------------------------
*elefrag234_cg
bg "bg_02tow.bmp",3

*elefrag234

gosub *r_tear
@@@QRS
br
@䐬ݎٗhZHIvYB@
@IvCA픗I}ڋqlCpgB\

gosub *ev_window
bg "a009a.bmp",3
mov %909,1


@Rꎟꎟn픗CgsIߌoٖ@Čp`B\
usvꟁccߌoccssccꊁccBꟁABAꟙccBށccGꟁccꟙv\
@񋿒ΓIC꘢p~IHB\
@zvICٍَsݙC󊎝٘_ΕאlAFzсCҐGCsK{Joڏۓ̓B\
@LߋߘMCL풍˖򕨁C픗AD{B\
@AvLIIC\n픗󔇈؁B\
uBBBBBBIBꟁIssAssꟁIv\
bg "a009b.bmp",3
@Ďo닩C݋qlʑO\IȔߎSI͞B\
@݉ᒆCߌoSŕsgז`Ҏߏ[]IPB\
uꟁccccꟚjccII@jݚjjcccjccccIccjꟁccꟁccꟁcccꟁccꟁccꟁ\ccBBBIv\
@YI튯MCߋ̕։nhWCWFVI{OCIoې~IߖB\
@ΗhWIOoVNItCtݚa싿A@yʓIFB\
@IߑtRjlICŌy푥ݓXړAOntVIsa~B\
@DړICٖ@ċ`CzK꣉꒼ߘMCהp폈{ꠁB\
@ݓߗCvL`󓞓ISOځCvLCxB\
@דߑsߐד֊Aא~lxߓIV뗹B\
uBBccꟁAꟁAAꟁAꟁccj݁I@ꟁI@ꟁccBccBccBABꟁccBꟚjAꟁccꟁIv\
@꣖ꎟoiOICϝݕItΎn˗oB\
@Θ艑I\CٗIl싻їnċNB\
bg "a009c.bmp",3
@cc@ʐҗLBꌏKCߏAspSShѓI藹B\

if %99==1 goto *eles_0

goto *gameover

;----------------------------------------
*elefrag235

savegame 99

gosub *r_tear
@@@QRT
br
@ݓlZIDlNpC͓Ils_OnŏāB@
@CŗāCΕkun񉞗B@
@ŗvW߈ꎟ́CAQkDIlB\
@yISdVڎlCڌݗ粓I󏬍JB@
select "̘HnւƌȂiQSWցj",*elefrag248,"ʂɂk֌ȂiQRPցj",*elefrag231,"ɌȂ΁iQQXցj",*elefrag229

;----------------------------------------
*elefrag236

savegame 99

gosub *r_tear
@@@QRU
br
@ݓߗClœ꣓IgeC֘l͗㗈B쎗U^댯IB@
select "̂܂ܑēĂiQSXցj",*elefrag249,"͂甗鑊ɗv𕷂ƂĂiQTOցj",*elefrag250

;----------------------------------------
*elefrag237

savegame 99

gosub *r_tear
@@@QRV
br
@IU͒Iwnx@C։㛀B\

mov %15,6

@I_\

@ڒCHIjlꣁCۗv\b͗ʓIwcbrxB@
select "ނ̂Ȃ΁iQTPցj",*elefrag251,"f̂Ȃ΁iQTQցj",*elefrag252

;----------------------------------------
*elefrag238

savegame 99

gosub *r_tear
@@@QRW
br
@I\ϓIwsNxC󑕔㛀B\

mov %15,4

@I_\

@ڒCHIjlꣁCۗv\b͗ʓIwcbrxB@
select "ނ̂Ȃ΁iQTPցj",*elefrag251,"f̂Ȃ΁iQTQցj",*elefrag252

;----------------------------------------
*elefrag239

savegame 99

gosub *r_tear
@@@QRX
br
@IxkIwLLxC󑕔㛀B

mov %15,2

@I_\

@ڒCHIjlꣁCۗv\b͗ʓIwcbrxB@
select "ނ̂Ȃ΁iQTPցj",*elefrag251,"f̂Ȃ΁iQTQցj",*elefrag252

;----------------------------------------
*elefrag240

gosub *r_tear
@@@QSO
br
@b񗈁C꣍D\ohߐÎ嗋B@
@Î嗋嫑Rx܉c{CAhIbAvfqB\ʋIꣁCRٖ@OB\
@ʑΘ`@MdʍIɗ^C꣍{ٗ͒RB@
@꣍QZnڎlCחsʕsʐlŌC}ZtߓIpB\

gosub *ev_window
bg "a006a.bmp",3
mov %906,1

@R@ccJ}^\

mov %6,3

bg "a006b.bmp",3

@w韕ߍ@C꣊ouCIɖ琏VB\

bg "bg_03und.bmp",3
gosub *tear_w
gosub *tear_hpc
gosub *tear_m
setwindow 25,25,20,20,23,23,0,20,20,0,1,":a;text_window.bmp",0,0
mov %9,0

@RCR꣍IˑߖҗC꣓IQbv@B@
@SzCVc߈әXECV@QĐꠁB@

mov %952,1

select "͖߂āA܂ʂ̏ꏊTĂ݂悤Ƃ鎖ɂiQPVցj",*elefrag217

;----------------------------------------
*elefrag241

gosub *r_tear
@@@QSP
br
@䑖HӁCzC֏̏d㋎B@
br
	sD
br
@]MߔOCIg̛ߌoJnėB\
@꣋rInʓˑRρCtIꣁCA钩HꕔċCnݗnB@
@@
@ꐺ㋿C꣓IˑRRȗNB@
@꣌ӎRoIߖCߋNُyCŕsȈʁB\
@꣓IpoIFCAIӉʁCQEgFB@
@Cߐ䎩ȗoItꝁH@
@ŗvm蔇^ʁC|sqn`wwݒɁB\
@z苎ZCAg̋pთCꓮsB@
@䖾ꉺC׏Yg̏AsꡁH\
@꣊Җv\CݒėCq珳󗹐g̓IdʁCv_ouԒfB꣊OIEC}nБNgۖvB@
br
@׏YH
@@׏YH
gosub *r_tear
@@@׏YH\
@꣍ō@zICALw^╗\ccB\

goto *gameover

;----------------------------------------
*elefrag242

gosub *r_tear
@@@QSQ
br
@꣑ŝ򗹗mCݑ̍ԁCcpiIoaܖ╼B#00FF00i╼Fܖj#FFFFFF@

add %100,5
gosub *tear_m

select "Ė̕mBӎ߂OɁAĒɓ鎖ɂiQQXցj",*elefrag229

;----------------------------------------
*elefrag243

savegame 99

gosub *r_tear
@@@QSR
br
@HOIAڏB@
@ُÁCYssB\
@HIʘHoHCDȑOWLOAZA܍aIʘHB@
select "OԒʘHɍŝȂ΁iQTRցj",*elefrag253,"ZԒʘHɌȂiQTSցj",*elefrag254,"ܔԒʘHɌ̂Ȃ΁iQTTցj",*elefrag255,"ԒʘHɌ̂Ȃ΁iQPRցj",*elefrag213

;----------------------------------------
*elefrag244

savegame 99

gosub *r_tear
@@@QSS
br
@CsalQ樔M駔}B@
@HÍCҗLqVޓIC䖞ځB@
@@ʗvLYʒlӓICߑTAȋhѓIʁA̔e폤iIGݕ܁Cȋy\qB\
@VOIʁCssIB@
select "HȂiQTUցj",*elefrag256,"G݂ȂiQTVցj",*elefrag257,"ETM[XȂiQTWցj",*elefrag258,"L𗣂̂ȂiQSTցj",*elefrag245

;----------------------------------------
*elefrag245

savegame 99

gosub *r_tear
@@@QST
br
@oCvLHCʉkakIkC𑥒ʉAAIB@
@VOC粊җLLÓI󏬘HLB@
select "kɌȂiQTXցj",*elefrag259,"kɌȂiQUOցj",*elefrag260,"쐼ɌȂiQQPցj",*elefrag221,"ɌȂiQQQցj",*elefrag222,"쓌ɌȂiQQRցj",*elefrag223,"ׂ̍HnɌȂiQUPցj",*elefrag261

;----------------------------------------
*elefrag246

savegame 99

gosub *r_tear
@@@QSU
br
@ŊJ剝ŁCne́B|zyŒߗ́CnLʌ瑁CNLCXIHo@B@
@בDō@WݑcEꝁHݕߓIꈎqCҕMMI΁B\
select "N͂̕΂q؂ĂǂiQUQցj",*elefrag262,"ȂɂẲƂoĂiQQQցj",*elefrag222,"邢͉Ƃ̒ɓAɉƒTĂiQURցj",*elefrag263

;----------------------------------------
*elefrag247

savegame 99

gosub *r_tear
@@@QSV
br
@䎎WW╼CAΕ{vYB@
@A䊴oCDLN^nB#FF0000iIhIj#FFFFFF@
mov %178,1
select "ȏ̉bɂ͓ƌN͒߁AƂ肠̏鎖ɂiQQQցj",*elefrag222

;----------------------------------------
*elefrag248

savegame 99

gosub *r_tear
@@@QSW
br
@sfn݋IJ[CYŔۓ֕ʓIoB@
@JA@AȐ܁CoslgpIʘHB\
select "Đi񂢂͏Ђ炯ꏊɂȂĂiQUSցj",*elefrag264

;----------------------------------------
*elefrag249

savegame 99

gosub *r_tear
@@@QSX
br
@K{ٙr꘢CDQZnJB@
select "k̕ɓȂ΁iQRPցj",*elefrag231,"̕ɓȂ΁iQQXցj",*elefrag229

;----------------------------------------
*elefrag250

gosub *r_tear
@@@QTO
br
@䐳zߌQls͔c͗CApF鶓I_㉺ŗʒBݔҕs˓ICʑRҐzC@ޗBA׎ߔӁCIg@ߌo⋗lCg̔lҒnꐄB@
@䐳z{C薔ˑR粐LߗCSZIMB\
select "ʂ葽ɖƂԂŁAN͒RNɂłȂ܂ܘAɕߔAӎĂccBiQPUցj",*elefrag216

;----------------------------------------

;----------------------------------------
*elefrag251

gosub *r_tear
@@@QTP
br
@wcbrx@C䊴og̓ŗOoҗ͗ʁB#FF0000iIiIj#FFFFFF@
mov %7,1
mov %179,1
@ݔIʎԁCΓGlIQQ_CȎ󓞓IQQ_B@
select "ȕsvcȗ͂ȂAL~͐킢ւƌBiQUTցj",*elefrag265


;----------------------------------------
*elefrag252

gosub *r_tear
@@@QTQ
br
@꣓Adn◹C\NIDI풩lZꑖBHlyynsꐺB@
@ANߎ펖Cvٖ@ݐډIDllC꣏Aٖ@p`B@
select "ĂюR߂邽߂ɂƁAC꒼iQUTցj",*elefrag265

;----------------------------------------
*elefrag253

savegame 99

gosub *r_tear
@@@QTR
br
@OʓO@

gosub *choice_flag

select "im̃tOɃ`FbNĂꍇj́iQUVցj",*elefrag267,"łȂꍇ́iQUUցj",*elefrag266

;----------------------------------------
*elefrag254

savegame 99

gosub *r_tear
@@@QTS
br
@ZʓO@
@OIKÒCˑRo{jlB@
@꣗DːCAߌQlpꕛSr_IqCp󓴓I]ꣁB@
uvzLlnccv\
@ߐffʒn`CsCGӈӁCݕWnqB@
select "ނɖ₢ĂiQUWցj",*elefrag268,"ĐɐiłiQUXցj",*elefrag269,"邢͈ԂĂ܂Ȃ낤iQSRցj",*elefrag243

;----------------------------------------
*elefrag255

savegame 99

gosub *r_tear
@@@QTT
br
@܍ʓO@
@RC樐lzIh@sI@qB@
@䒩ߘŋC୏ʒwI@KIjh@ǒVl@^gV򑊋xB\
@^񎍓I߁CҐʋ^lIꡁH@
@s߁Cߊˎʏ㋎IB\
@嫑RsRNkفCAAZݔٍϘꠁB@
select "̂܂ܒʘH̉֌ĂiQVOցj",*elefrag270,"ʘH̎OɌĂiQSRցj",*elefrag243

;----------------------------------------
*elefrag256

savegame 99

gosub *r_tear
@@@QTU
br
@ݔCm蓾h_YđB@
@꣊ŒeeIH粝CIȔ\hIB\
@UUlI}A`MICҗLFVNAlH~IʁCzዅIҐ^sB@
@DC䓾aȓIKʈꉺccB\
select "EĂiݎOjHׂȂiQVPցj",*elefrag271,"EX[viݓ񖇁jHׂȂiQVQցj",*elefrag272,"Et[ciݓ񖇁jHׂȂiQVRցj",*elefrag273,"͂Ĝ݂ȂiQTVցj",*elefrag257,"ETM[XɂȂiQTWցj",*elefrag258,"L𗣂̂ȂiQSTցj",*elefrag245

;----------------------------------------
*elefrag257

savegame 99

gosub *r_tear
@@@QTV
br
@IʁCʑRҐYŊŎGꠁB@
@꣈ˎEeʁC݈꘢֗IXO≺rB\
select "EI[N̒蕨ɎiQVSցj",*elefrag274,"E򑐁~RF݌ܖiQVTցj",*elefrag275,"EFݘZiQVUցj",*elefrag276,"EpiCtiQVVցj",*elefrag277,"͂ĤȂiQTUցj",*elefrag256,"ETM[XɂȂiQTWցj",*elefrag258,"L𗣂̂ȂiQSTցj",*elefrag245

;----------------------------------------
*elefrag258

savegame 99

gosub *r_tear
@@@QTW
br
@䑖Ι\nI߁B@
@ʑRCqk\樐lMCƓsvuuCyݑB\
@q╼CKȒPCAIȊ슽I\qB@
@@ʉI\qꖼCA\ܖ╼G񖼑O╼Gĉ@IbC╼IqAvB@
@ȌCȒPꉁB\

gosub *choice_flag

select "etOĂȂiQVWցj",*elefrag278,"łȂ̂Ȃ΁iQVXցj",*elefrag279,"͂ĤȂiQTUցj",*elefrag256,"Ĝ݂ȂiQTVցj",*elefrag257,"L𗣂̂ȂiQSTցj",*elefrag245

;----------------------------------------
*elefrag259

savegame 99

gosub *r_tear
@@@QTX
br
@kc@
@a粔NC䊴o粓IXivXKꍱBC琥ZcZIꝁH\
@嫑RΔ_LbCAHslIqŋNvLIʁB@
@ʒ٘amٓI}fIB@
@VOC`KꉺŋNʖI[qYsB\
select "N͎ɍsiQWOցj",*elefrag280,"肢قɍsiQWPցj",*elefrag281,"ƂK˂邩iQWQցj",*elefrag282,"邢͂炳ɐʂւ̓֍siQWRցj",*elefrag283,"ʂ̓siQUOցj",*elefrag260,"̍LɍsĂiQRPցj",*elefrag231

;----------------------------------------
*elefrag260

savegame 99

gosub *r_tear
@@@QUO
br
@kb@
@sm׉C䊴oȍDiqC^Ӌ`őIBr粎U麁CUwwLBҗLߐ|s͓IہCȋy͍slIB@
@ؓs樉䊴oވדB\

gosub *choice_flag

select "rɃtÔȂ΁iQWSցj",*elefrag284,"̂Ȃ΁iQWTցj",*elefrag285


;----------------------------------------
*elefrag261

savegame 99

gosub *r_tear
@@@QUP
br
@Oʓo@
@ϋߏO୓IꏈHB@
@狖גnpIꠁC䑍oI󟃜keՐځC\ӑB@
@AvLʎh@I麏LCT琥ה{AvYlIꠁB@
@snCҔ\ߓVlIB\
@ȘOnICȑOIB@
select "nɍ~̂Ȃ΁iQWUցj",*elefrag286,"̒ɌĂ̂Ȃ΁iQRPցj",*elefrag231

;----------------------------------------
*elefrag262

savegame 99

if %963==0 add %963,1
if %963==2 add %963,1
if %963==4 add %963,1
if %963==6 add %963,1

gosub *r_tear
@@@QUQ
br
@䏫ߖΝ#00FF00ilFF΁j#FFFFFF@
add %113,1
@嫑RsmΓIlCAvsQݓIlCY\DKꠁB@
@A|ً^CzݔQӒtB\
@SzLV\hpC菫Ei܁CR@yynďoB@
select "̂܂܉Ƒ{𑱂ĂiQURցj",*elefrag263,"̉ƂoĂĂiQQQցj",*elefrag222

;----------------------------------------
*elefrag263

savegame 99

gosub *r_tear
@@@QUR
br
@rݗL̓I[ԗprqB@
@̓ߗLNILt@oCAQQKÍCJnsēߛ݈ӗB\
@sCIkoߌoთsB@
@VCĔ閝IInrB@

gosub *choice_flag

select "k̃tOɃ`FbN̂Ȃ΁iQWVցj",*elefrag287,"łȂ̂Ȃ΁iQWWցj",*elefrag288

;----------------------------------------
*elefrag264

savegame 99

gosub *r_tear
@@@QUS
br
@粉܍ʓo@
@ȉnIB@
select "~Ȃ΁iQVOցj",*elefrag270,"̕ɖ߂̂Ȃ΁iQQRցj",*elefrag223

;----------------------------------------
*elefrag265

gosub *r_tear
@@@QUT
br
@䗈lZCڏWʓIlAlށCȋyIeFlBeŁClmyՒߗSB@
@hlIsIg̋ȐCVC樉䊴Ls݁B\
uIICVIΎ营IƖvBsSʗLꟁHv@
@⋍݉䐳OIΎ粔C粉ˋNB\
uvLFAC߉ƚ쐥cEIƚBp藢ICcI]ҕϐꎈGꟁv@
@HIjlpїIꟃC䍪{vIC{́BAXN񏟕sIrSB\
u꣏AsnL^xꠁIv\

@DlFlmv\

mov %20,12
gosub *battle_ste

select "iROPցj",*elefrag301

;----------------------------------------
*elefrag266

gosub *r_tear
@@@QUU
br
@OʓOCoGlB\

@DlFHՏC\

mov %20,13
gosub *battle_ste

select "iQWXցj",*elefrag289

;----------------------------------------
*elefrag267

savegame 99

gosub *r_tear
@@@QUV
br
@OʓO@
@ݔkÁC䊴osCُB@
@Ȍp[ʓCȌHԉB@
select "ɍŝȂ΁iQWUցj",*elefrag286,"Oɖ߂̂Ȃ΁iQSRցj",*elefrag243

;----------------------------------------
*elefrag268

savegame 99

gosub *r_tear
@@@QUW
br
@䎎ZʓOIl쓋bB@

gosub *choice_flag

select "t̃tOĂȂiQXOցj",*elefrag290,"łȂ̂Ȃ΁iQXPցj",*elefrag291

;----------------------------------------
*elefrag269

savegame 99

gosub *r_tear
@@@QUX
br
@Zʓ[@
@ʏY^^IBAzvCpnILC@ʕsAv@B\
@ACݔsƕsICΜk댯BMsD҉ɓÝCr\V{B@
@䐳zvLqADccr粎CRkIn{ꍪB\
select "̒ɓĒׂȂiQXQցj",*elefrag292,"_ĝȂiQXRցj",*elefrag293,"ʘHɉ֐iނȂiQXSցj",*elefrag294,"O̕ɌȂiQTSցj",*elefrag254

;----------------------------------------
*elefrag270

savegame 99

gosub *r_tear
@@@QVO
br
@܍ʓ[@
@ŗʓIHB\
@󊎁CҗL𑤓[LꏬiB@
@VOCҗLʉnʓIOB\
select "N͒nւƏオĂiQUSցj",*elefrag264,"̂܂܈ԂĂiQTTցj",*elefrag255,"邢͑`Ă悢iQXTցj",*elefrag295

;----------------------------------------
*elefrag271

gosub *r_tear
@@@QVP
br
@INkI}CtKi╼FOj@

sub %100,3
if %100<=-1 mov %970,1 : mov %100,0
gosub *tear_m

@嫑R{gL_؁CrLCAh@CoA樔ޓIg̗̉́Bi̗͉PO_j@

add %12,10
if %12>=%11 mov %12,%11
gosub *tear_hpc

select "wɂ\[Xv킸Rr߂ȂAS~ɂƋ̂ĂBiQTUցj",*elefrag256

;----------------------------------------
*elefrag272

gosub *r_tear
@@@QVQ
br
@MICؓӓI؉i╼Fj@

sub %100,2
if %100<=-1 mov %970,1 : mov %100,0
gosub *tear_m

@嫑RؘaوHhI告aCAHޓsϓ\OC_B@
@g̗ROngaNCoJ琏V𗹁i̗͉U_j@

add %12,6
if %12>=%11 mov %12,%11
gosub *tear_hpc

select "ɂȂS~Ɏ̂āAŌɌy@iQTUցj",*elefrag256
;----------------------------------------
*elefrag273

gosub *r_tear
@@@QVR
br
@Xƍ݉ʑOpؓ꘢FNIʈꕪדCR@cUIʎi╼Fj@

sub %100,2
if %100<=-1 mov %970,1 : mov %100,0
gosub *tear_m

@䍂ncEi{CRuԁccJICӑzsIA|ٓ[IB\
@ʑΔ̕sICsֈٌCAvcʐlӏғIHC瑾痹B@
@zݖ@nߖIʎB@
select "A܂ɖƂ͉ɃKbJC邵iQTUցj",*elefrag256

;----------------------------------------
*elefrag274

savegame 99

gosub *r_tear
@@@QVS
br
@\N꘢אl踑CXƑΉF䝲kvCA꒼soC^uBꖇ╼AsC꣝\ꠁB@
@ŏ㋎HsZCA踑C@ʕsΔʑL_IlCmvYӋ`B\
select "N݂͋𕥂Ă̒蕨ĂĂiQXUցj",*elefrag296,"A邢͗~ȂȂނŎނĂiQTVցj",*elefrag257

;----------------------------------------
*elefrag275

gosub *r_tear
@@@QVT
br
@t╼i╼Fܖj@

sub %100,5
if %100<=-1 mov %970,1 : mov %100,0
gosub *tear_m

@w#00FF00ilF򑐁~Rj#FFFFFF@
add %101,3
select "܂ɖ򑐂ꂽiQTVցj",*elefrag257

;----------------------------------------
*elefrag276

gosub *r_tear
@@@QVU
br
@t╼i╼FZj@

sub %100,6
if %100<=-1 mov %970,1 : mov %100,0
gosub *tear_m

@w#00FF00ilF~Pj#FFFFFF@
add %102,1
select "܂ɋꂽiQTVցj",*elefrag257

;----------------------------------------
*elefrag277

savegame 99

gosub *r_tear
@@@QVV
br
@\NpICXJB@
uuʎ{IC\樛򓾍XBsǍݑIwCs\MnoBsߚvC琳@CiL_Mccvܖ╼ˍsBvv\
@imL_MCA@ʛ^I\݋MsC߉AꇊQB@
select "N͂̓piCtwĂiSRSցj",*elefrag434,"A邢͗~ȂȂ甃ȂĂiQTVցj",*elefrag257

;----------------------------------------
*elefrag278

savegame 99

gosub *r_tear
@@@QVW
br
@VIΎߌoCXƘDsݏyB@
@ݔΒ՗KIlAAKIlCsݎ{n\e튴zCꑐZݔΓI]B@
@꒼ŒԌiہCAvLYsIB\
@꣙r藣JB@
select "ĤȂiQTUցj",*elefrag256,"Ĝ݂ȂiQTVցj",*elefrag257,"L𗣂̂ȂiQSTցj",*elefrag245

;----------------------------------------
*elefrag279

savegame 99

gosub *r_tear
@@@QVX
br
@\qDvJnCLl\q񖼎Q΁B\
select "EɂȊDF̃ETMɂȂiQXVցj",*elefrag297,"EȔтYȃETMɓqȂiQXWցj",*elefrag298,"Et]oȒF̃ETMɓqȂiQXXցj",*elefrag299,"ETOXĂETMɓqȂiROOցj",*elefrag300,"͂ĤȂiQTUցj",*elefrag256,"Ĝ݂ȂiQTVցj",*elefrag257,"L𗣂̂ȂiQSTցj",*elefrag245

;----------------------------------------
*elefrag280

savegame 99

gosub *r_tear
@@@QWO
br
@䐄CziفCApNsCŗ݊ҖvcƎԁB#FF0000iIjIj#FFFFFF@
mov %180,1
@AZ꒼n⋍ݔCٕIsȑŊJꠁB@
@꣙rPCʓIB\
select "肢قɍsiQWPցj",*elefrag281,"ƂK˂邩iQWQցj",*elefrag282,"邢͂炳ɐʂւ̓֍siQWRցj",*elefrag283,"ʂ̓siQUOցj",*elefrag260,"̍LɍsĂiQRPցj",*elefrag231

;----------------------------------------
*elefrag281

savegame 99

gosub *r_tear
@@@QWP
br
@ꑖimفCAœ꘢͌ГIleʕoB@
@嫑RuԁCA꣊ҐҔs˓IaZB@
@Ҏhɔ畆Io樉roC@ʌpҍݔCAYvICr\rB@
select "Ȋ댯N͍QĂĔяoĂiROQցj",*elefrag302,"g\ĂiRORցj",*elefrag303

;----------------------------------------
*elefrag282

savegame 99

gosub *r_tear
@@@QWQ
br
@⋍݈˖OCߒʉB`IB@
select "uɃ`FbNĂȂiROSցj",*elefrag304,"łȂ̂Ȃ΁iROTցj",*elefrag305

;----------------------------------------
*elefrag283

savegame 99

gosub *r_tear
@@@QWR
br
@kb@
@ѓIXi@nCAl|HB@
@zQlbCA͖vYlC􎢊œ{lesnzvJB\
@粎vl^l𗬐C粐֑Iːlqq^B@
@gAAΒI[qCȐ֒ԝ`KCȈԓssiC]ʓIHB\
select "Ԃ̉ƂK˂ȂiROUցj",*elefrag306,"̉ƂK˂ȂiROVցj",*elefrag307,"΂̉̉ƂK˂ȂiROWցj",*elefrag308,"炳ɖkɐLт铹sȂ΁iROXցj",*elefrag309,"ɌŝȂ΁iQTXցj",*elefrag259

;----------------------------------------
*elefrag284

savegame 99

gosub *r_tear
@@@QWS
br
@䐳zڏWNQUs˟IlC쒆I꘢ˑRbnoB@
usRꝁIv@
@ŗ쓖Llŉߓߏq΁CsmsoԁC͐lŉI_ߌoSϗB\
select "̏󋵂ɂƂ܂ǂȂAN͎͂ɏΊȂ瓌ɐiłiRRQցj",*elefrag332,"ɐiłCCiQTXցj",*elefrag259,"邢͓̍LɌĂiQRPցj",*elefrag231

;----------------------------------------
*elefrag285

savegame 99

gosub *r_tear
@@@QWT
br
uJn֎~ʍsCs߁C꣗vm\o_uDvCss\꣉ߋv@
@粐C粓gZIHC䗹OwB@
@T\vO╼IӎvꠁB@
@CAZznHԉCw@lgZCŗޝىޗB\
select "N͑fɂ̂𕥂ĂiRPOցj",*elefrag310,"AɐHĂĂiRPPցj",*elefrag311

;----------------------------------------
*elefrag286

savegame 99

gosub *r_tear
@@@QWU
br
@Oʓ[@
@ŗ\ʉnIoBsmꖗ`VlICߒoiOhB@
@AݔC䊴orIGLB\
select "Ŏ͂𒲂ׂĂiRPQցj",*elefrag312,"HiłiQTRցj",*elefrag253,"邢͒nɏoĂiQUPցj",*elefrag261

;----------------------------------------
*elefrag287

savegame 99

gosub *r_tear
@@@QWV
br
@AߌoclӓIsQ՗CĜQY甯sYB@
select "N͂ȏ̒T߁AƂo鎖ɂiQQQցj",*elefrag222

;----------------------------------------
*elefrag288

savegame 99

gosub *r_tear
@@@QWW
br
@s^쑴lICҐlNIBVCݝr[@CQPQ╼BlpsKB@
ĐCRsrCA\{AŎZ\B#FF0000ikIek`fŏj#FFFFFF꣏╼#00FF00i╼FPQj#FFFFFF\

add %100,12
gosub *tear_m

mov %181,1
select "̉ƂoĂĂiQQQցj",*elefrag222,"΂肵ĂȂ̂Ȃ΂ɓĂ܂ȂiQUQցj",*elefrag262

;----------------------------------------
*elefrag289

savegame 99

gosub *r_tear
@@@QWX
br
@œ|@CȈAtݓIC啝GB@
@꣉ȘȈlfށCA͓IVlokkIkًB@
@sCߍVl꣖WV쑦I꣏PB\
select "댯肻fނ肵悤ƂȂiRPRցj",*elefrag313,"ĒʘH̉֐iނ̂Ȃ΁iQWUցj",*elefrag286,"ʘH̎OɍŝȂ΁iQSRցj",*elefrag243

;----------------------------------------
*elefrag290

savegame 99

gosub *r_tear
@@@QXO
br
@Av\l䍄ˏIXI񗹁B@
select "̂܂ܒʘHɐiłiQUXցj",*elefrag269,"Oɖ߂ĂiQSRցj",*elefrag243

;----------------------------------------
*elefrag291

savegame 99

gosub *r_tear
@@@QXP
br
@꣈חřߓ_YCژA◹D{lB@
@꣖◹L֔qaډvIJVKICAv\YʗLpIB\
@ĎɊٖړInWLCZߓ꘢ÍʓI@B@
@TꉺߒibIv_CTAFwØIsCsGBҍCזCדŁCA򐫓]׌ŁxB@
@VCsIӎvB\
@ACØII樉zDhIB嫑RsmꐥYCAoIYw^퐅B@
@#FF0000i݂tIek`fŌj#FFFFFF\
mov %190,1
select "N͂̂܂ܒʘHɐiłiQUXցj",*elefrag269,"Oɖ߂ĂiQSRցj",*elefrag243,"邢͂łɏ𕷂Ƙb𑱂ĂiQXOցj",*elefrag290

;----------------------------------------
*elefrag292

gosub *r_tear
@@@QXQ
br
@꣈iCrAYSZB@
@꣍QZzvBECASZ꣋rIpṕCdB\
@꣑hCːnJ{CA鄒n{粖`oChhWWnʁB@
@^C꣓Ig̔꘢n苌X[IB٘_orBHCB\oILʍݕsfB\
@ΕꐥYC׏Yq㔇펖H@
@S^CCBAݖ{AÓInC{ٖ@yCOLЍX[ℓIKÁB\
@vߑvC{ō@牻쟃ACfoB@
@|ssjCAIv@ݐ@B@
@꣙{v\oCIRCAۓÓIcc\

goto *gameover

;----------------------------------------
*elefrag293

savegame 99

gosub *r_tear
@@@QXR
br
@䎎pFFߓCAvLYIBݔٖ@yInC\TIʑR琥LIꠁB
@PCcq݋r粁CyyďoCr]ꉺSB@
select "N͒ʘHɉ֐iނȂiQXSցj",*elefrag294,"O̕ɌȂiQTSցj",*elefrag254

;----------------------------------------
*elefrag294

savegame 99

gosub *r_tear
@@@QXS
br
@㕔ʓFnZ@
@䗈꘢r׊J舓InB@

gosub *choice_flag

select "ñtOɃ`FbNĂ̂ȂiRPSցj",*elefrag314,"r̃tOɃ`FbNĂȂiRPTցj",*elefrag315,"ǂł̂Ȃ΁iRPUցj",*elefrag316

;----------------------------------------
*elefrag295

savegame 99

gosub *r_tear
@@@QXT
br
@䑖ʓ[Csm`ccccIB@
@ߐߋNksgCōݓҒYB@
@`ICApݔ\L댯B\
select "N͂Ƃɂ̏ꏊ瓦ȂiRPVցj",*elefrag317,"̎𒲂ׂ悤Ƃ܂𓪏Ɍf̂Ȃ΁iRPWցj",*elefrag318

;----------------------------------------
*elefrag296

savegame 99

gosub *r_tear
@@@QXU
br
@╼Εi╼Fꖇj@

sub %100,1
if %100<=-1 mov %970,1 : mov %100,0
gosub *tear_m

@ΕΒޗތC^IsoCDꡁB#00FF00ilF踍ij#FFFFFF@
add %119,1
@@꣊җL]KCȍĔ_ʓICȏAJB\
select "E򑐁~RF݌ܖiQVTցj",*elefrag275,"EFݘZiQVUցj",*elefrag276,"EpiCtiQVVցj",*elefrag277,"͂ĤȂiQTUցj",*elefrag256,"ETM[XɂȂiQTWցj",*elefrag258,"L𗣂̂ȂiQSTցj",*elefrag245

;----------------------------------------
*elefrag297

savegame 99

gosub *r_tear
@@@QXV
br
@䑖ŏ㋎IDF\qʑOCnL]C풣{bŗB@
@樉䊴wIsCrJnoC䐥sYcqݕʓI\qgB@
mov %175,1
@RΝُnJnBꏕsCًZCҒΓIʁB#FF0000i݂eIek`fŌj#FFFFFF\

@cc@
@cc\

mov %953,1

@ʐꖼBŗߘCmnL]I\B꣊lܖ╼#00FF00i╼Fܖj#FFFFFF@

add %100,5
gosub *tear_m

select "āAꂩN͐HĂiQTUցj",*elefrag256,"G݂ĂiQTVցj",*elefrag257,"L𗣂̂ȂiQSTցj",*elefrag245

;----------------------------------------
*elefrag298

savegame 99

gosub *r_tear
@@@QXW
br
@䑖ŋN݈IYљ\qʑOC݌ەmʁCp@rgnBYꡁCߕUҕ䗓IqCL樝ӊώҖ犴SIB@
mov %175,1
@䖞ҒnJnI΁B#FF0000i݂eIek`fŌj#FFFFFF\

@cc@
@cc\

@ʐOBߎC\RRڎC╼Bi╼Fj@

sub %100,2
if %100<=-1 mov %970,1 : mov %100,0
gosub *tear_m

select "āAꂩN͐HĂiQTUցj",*elefrag256,"G݂ĂiQTVցj",*elefrag257,"L𗣂̂ȂiQSTցj",*elefrag245


;----------------------------------------
*elefrag299

savegame 99

gosub *r_tear
@@@QXX
br
@cqݗ\㉉t]DYIF\qgCrϊŔ΁BݛʑO{匃IbCF\q։nccBߕIq^L͗B@
@s蛀^I\㉉ꐸʓIt]DYB@
mov %175,1
@䛠Ð_n֒ΓIB#FF0000i݂eIek`fŌj#FFFFFF\

@cc@
@cc\

@ʐō@ꖼBAZICō@ꖼҐō@ꖼC╼Bi╼Fj@

sub %100,2
if %100<=-1 mov %970,1 : mov %100,0
gosub *tear_m

select "āAꂩN͐HĂiQTUցj",*elefrag256,"G݂ĂiQTVցj",*elefrag257,"L𗣂̂ȂiQSTցj",*elefrag245

;----------------------------------------
*elefrag300

savegame 99

gosub *r_tear
@@@ROO
br
@䑖ՒnI^\qʑOCΛ{匃IbBʓߑ\qꉗIbCNOrΉB@
mov %175,1
@oȊ҈ꉺB#FF0000i݂eIek`fŌj#FFFFFF\

@cc@
@cc\

@ʐ񖼁B@
@lO╼׏#00FF00i╼FOj#FFFFFFCߑ^I\qpݓ]ʁCrnNB@

add %100,3
gosub *tear_m

@ACϗK琥Bӛ̛̗IC\qDcŋN__B@
@IKcۗ_CSҕsB\
select "āAꂩN͐HĂiQTUցj",*elefrag256,"G݂ĂiQTVցj",*elefrag257,"L𗣂̂ȂiQSTցj",*elefrag245

;----------------------------------------

;----------------------------------------
*elefrag301

savegame 99

gosub *r_tear
@@@ROP

@œOIΎ|CmMțߌoC≺UBʑΎAeݒnCnUB
uEI@ːIKIv
@Ύˋ|s恒n咣B
select "N͂̑ɑ΂ăghhĂiRPXցj",*elefrag319,"܂łE܂łƂĂiRQOցj",*elefrag320

;----------------------------------------
*elefrag302

savegame 99

gosub *r_tear
@@@ROQ
br
@ooCQZ@JCAݔCLYVԔ{BuԓIfVCً^vBRsIʁB@
@[[hnInMࡒsI䊁CŖCr\foI_B@
usv@
@ꐺsCꓹKevk񗹐[B\
@A˓IvŁCݕsfRǏ㋎BLsmOʓLYB@
@COhnIn{ِnNBŗȔgpIOB@
@꣊w@wyCJmفB\
@ILkB@
select "N͎ɍsiQWOցj",*elefrag280,"ƂK˂邩iQWQցj",*elefrag282,"邢͂炳ɐʂւ̓֍siQWRցj",*elefrag283,"ʂ̓siQUOցj",*elefrag260,"̍LɍsĂiQRPցj",*elefrag231

;----------------------------------------
*elefrag303

gosub *r_tear
@@@ROR
br
@꣍QZٕCDːB@
@AsߐkJVB@
@uԁC꣙ߓĚ߁Cؕ֓sB\
@꣌Ro{CO͌ЏoIleBҖv꣗Ȑg㔯YCҌɏA꣓IaPB\
@חLYhꣁCaI畆CȔnIɊo䑴ʍXqsB@
@ِڒCxЍIɘPCߐg̔호ѐAꓯhIɋB\
@꣓I̔ѐC@JIՕiB@
@꣉ߋwKmC^{њIœIB꣘zߎ@C꣓IӎݔˑR͌ЗNB\
@s_LBHCҐrCѐǵABݒnI꣓sٔ\ח́B@
@N꣓I{poCҒndJC꣓IАԍgBݔЍgFIEC^q{΁C֐꣊œIō@ꖋcc\

goto *gameover

;----------------------------------------
*elefrag304

savegame 99

gosub *r_tear
@@@ROS
br
@AZė`K{Cŗso䍄ˍXI񗹁B@
@s͔@COԌ܎nKCm䓾ΕsB꣜kqnz_C≺vȖIB\
select "N͎ɍsiQWOցj",*elefrag280,"肢قɍsiQWPցj",*elefrag281,"邢͂炳ɐʂւ̓֍siQWRցj",*elefrag283,"ʂ̓siQUOցj",*elefrag260,"̍LɍsĂiQRPցj",*elefrag231

;----------------------------------------
*elefrag305

savegame 99

gosub *r_tear
@@@ROT
br
@kcF@
@꣑ŎZ`KːlƁCȗȖCAvl񉞁B\
select "N͂łxmbNJԂĂiRQPցj",*elefrag321,"JĒɓ낤ƂĂiRQQցj",*elefrag322,"܂AɍsiQWOցj",*elefrag280,"肢قɍsiQWPցj",*elefrag281,"邢͂炳ɐʂւ̓֍siQWRցj",*elefrag283,"ʂ̓siQUOցj",*elefrag260,"̍LɍsĂiQRPցj",*elefrag231

;----------------------------------------
*elefrag306

savegame 99

gosub *r_tear
@@@ROU
br
@⋍ݔgFI[qOC\Bߓ`הIA[IB@

gosub *choice_flag

select "p̃tOĂ̂Ȃ΁iRQRցj",*elefrag323,"łȂ̂Ȃ΁iRQSցj",*elefrag324


;----------------------------------------
*elefrag307

savegame 99

gosub *r_tear
@@@ROV
br
@FI[qЎCOʊSŕsoʐYvB@
@ߍ[qkفC꣔\n󓞛U^񓯐qIB@

gosub *choice_flag

select "l̃tOĂ̂Ȃ΁iRQTցj",*elefrag325,"łȂ̂Ȃ΁iRQUցj",*elefrag326

;----------------------------------------
*elefrag308

savegame 99

gosub *r_tear
@@@ROW
br
@ΐFI[qlIۑX艑CLqݎl঍sB@SِlŗCGpBŞqC@ߌoGٖ@Cz@ㅐi琥s\IB\
@roAZlSsB@
@꣝ȗȖCAʊSvLB\
select "N͔JĒɓ낤ƂĂiRQVցj",*elefrag327,"Ԃ̉ƂK˂ȂiROUցj",*elefrag306,"̉ƂK˂ȂiROVցj",*elefrag307,"炳ɖkɐLт铹sȂ΁iROXցj",*elefrag309,"ɌŝȂ΁iQTXցj",*elefrag259

;----------------------------------------
*elefrag309

savegame 99

gosub *r_tear
@@@ROX
br
@Ћ抴o꘢iOIpCҐCUғXÍB@
@XleH`CzQlřߏkCAݑCƝƊJIX܋z꣓IӁB\
@w_VE󓤓x@
@ƓXLIXʁCXA樐lҔI刳B\
select "N͂̓XɓĂǂiRQWցj",*elefrag328,"炳ɓ̋֐iނiRQXցj",*elefrag329,"̋֐iޓĂĂiQWRցj",*elefrag283

;----------------------------------------
*elefrag310

savegame 99

gosub *r_tear
@@@RPO
br
@嫑RSLsÁCAoݔdqdCzoO╼jlC֘Vn樊JHBi╼FOj\

sub %100,3
if %100<=-1 mov %970,1 : mov %100,0
gosub *tear_m

uvYCLIBAIv@
@꣍_AEo\\HI֎Cs@\IZBA꣊Ґcb񋎁CEsÁCpOB\
@JnCLʉAAOIHB\
select "YȈۂ鐼̋֌ȂiQTXցj",*elefrag259,"炵ɌȂiRRQցj",*elefrag332,"쑤̒sꂪɌȂiQRPցj",*elefrag231

;----------------------------------------
*elefrag311_cg
bg "bg_02tow.bmp",3

*elefrag311

gosub *r_tear
@@@RPP
br
@嫑R꣌ߌQlNDCAIǕsGOC꣓Ajl쐧B\
@I@ݑߛfnC꣏uԏADRB

gosub *ev_window
bg "a011a.bmp",3
mov %911,1

uBށccꟁAꟁAsvꟁccI݁AꟁAZccꟁAꗹccTTAꟁAꟁAꟁ\AꟁATccTTꟁccIccIv\
uȉsAꝁC꣘VcKoccꟁIv\
@ݑXC꣓Iߕe\nCBaғsS\IoB\
@꣔MlslIՖ͞@C푴꘢jlݗB\
@꣏A푼C̏dҒnW_\\JAJnB\
uTTccZccAccZꟁAߞAꟁAsvAߞccDADccATꟁAꟁABށccv\
@꣕nzv}ZߖCًْnZցB\
@A꣔_xIẃC{ٖ@Z푼e\IoIB\
@꣔ݒjl쒆ԁC\CRhWǵB\
@AߒnʓIɋtCkA}IB\

bg "a011b.bmp",3

uꟁccꟁccꟁccccꟁccv\
@䌀nbC󒅓ߒ̓It̏їISGC៣sTnDhoB\
iccZccj\
@嫑RIߕ흙jjࣁC҈ȊSsÓIڎ󗹝ICAΕZːB䊴oIiC֍݈SSgI͟B\
@ȐdC_[[nݍŐ[CI݊樉䊴ٔ䈫SB\
@ACznA\oCAoĔEψꉺҔ\B\
uDCډ֓䗹B_lꟁv\
uccVv\
@ˑRNIC䊮SvLaIbB\
@I]C[]䞗ꉺCwˑR퓁nZҗvsIɑ^ڊѐI_oB\
uxlccIꠁccHv\
uH@fqݐYꟁBŉIƚC\MꗼAꟁBcLlIsiC꣏ADDw͋ꠁv\
@ȒuMIb樉𗧓CItPC樉䊴oSEIԕœs~B\
@ڒCߌQlחߕs\IbtHC|snlCĎJn݊XΉ{\B\
uꟁccꟁccsvꟁAsvꟁIIv\

@cc@
@cc\

bg "a011c.bmp",3

uꟁccGꟁccGꟁ\AGGꟁ\\\v\
@ҖvLꔼIjlNƁCISpߌomՋɌB\
@ARI͟svLC]CM߈꘢OFȏAvݔwsꝁB\
@smCҒI{V@ݖ^X̔I^B\
@@CݔvCrAzۓߎ햢I͟sߑRB\

if %99==1 goto *eles_0

goto *gameover

;----------------------------------------
*elefrag312

savegame 99

gosub *r_tear
@@@RPQ
br
@ח͎୕ǁCœC@꘢[ԁBApvLJpIcB@
@ps͟AEړCApN|vLvŊJI瑏ہB\

gosub *choice_flag

select "łq̃tOȂ΁AiRROցj",*elefrag330,"邢͐HiłiQTRցj",*elefrag253,"n֏oĂiQUPցj",*elefrag261

;----------------------------------------
*elefrag313

savegame 99

gosub *r_tear
@@@RPR
br
@חg㔍fށC䏫nhiBI̕\zۓIҗvCƓIxB@
@L蓫soCv@DDnŒZB@
@ƍddCĐQԁBA݉䏈ICڏWIVlIZB\
@@ʌݗJҗyCAvČp҉C\AVlPB#FF0000iImIj#FFFFFF\
mov %183,1
select "߂ɑfނ肵悤ƂȂ΁iRRPցj",*elefrag331,"fނ͂鎖߂ĒʘH̉֐iނ̂Ȃ΁iQWUցj",*elefrag286,"ʘH̎OɍŝȂ΁iQSRցj",*elefrag243

;----------------------------------------
*elefrag314

savegame 99

gosub *r_tear
@@@RPS
br
@㕔ʓFnZ@
;xڈȍ~

@ҐaȑOC[GI󟃁B@
@䊴ovYʓIωCl쎝ߒKʐI댯ꏊB\
select "͂̐lԂɘbď𕷂ƂȂ΁iRRRցj",*elefrag333,"Ԃ̒ʘH֍ŝȂiRRSցj",*elefrag334,"Ԃ̒ʘH֍ŝȂiRRTցj",*elefrag335,"lԂ̒ʘH֍ŝȂiRRUցj",*elefrag336,"ZԂ̒ʘH֍ŝȂiQUXցj",*elefrag269

;----------------------------------------
*elefrag315

savegame 99

gosub *r_tear
@@@RPT
br
@㕔ʓFnZ@
;`v̏̍

@œIgeC͓IAϓLBŉߗݓlZIDlC䓊h^ۓIڌB@
@粊LsDӎvC粖onrLߛNKÍB\
select "͂̐lԂɘbď𕷂ƂȂ΁iRRVցj",*elefrag337,"Ԃ̒ʘH֍ŝȂiRRSցj",*elefrag334,"Ԃ̒ʘH֍ŝȂiRRTցj",*elefrag335,"lԂ̒ʘH֍ŝȂiRRUցj",*elefrag336,"ZԂ̒ʘH֍ŝȂiQUXցj",*elefrag269

;----------------------------------------
*elefrag316

savegame 99

gosub *r_tear
@@@RPU
br
@㕔ʓFnZ@
;

@IbCwIA펖ꠁBіnCVԔpSICzkRnƎːiBԊƁC\oLslݍB\
@ȒA꘢ccsCAZvLߛIḰCX|s׉߁B@
@חliInbIC꣏́B\
@OCȑOʒԁAԁAlԁAZԓIʓB@
@OC͓IlblCY琥sIIB@
@ݔcnIv@#FF0000iInIj#FFFFFF꣙r藹ډIsB\
mov %184,1
select "͂̐lԂɘbď𕷂ƂȂ΁iRRRցj",*elefrag333,"Ԃ̒ʘH֍ŝȂiRRSցj",*elefrag334,"Ԃ̒ʘH֍ŝȂiRRTցj",*elefrag335,"lԂ̒ʘH֍ŝȂiRRUցj",*elefrag336,"ZԂ̒ʘH֍ŝȂiQUXցj",*elefrag269

;----------------------------------------
*elefrag317

gosub *r_tear
@@@RPV
br
@樍@wyIs˗aPC꣗nCJnB@
@Ȓ瑔ʓICDJB@
@]JkdߗI^铌CQZ{ÍB\
@fICIt̕sRnNCϐPIiB@
@ߐYCݖ`wImݔ]ChB\

@l̓IwjGxCs`IB@
br
@ߑjG]y꣔IPCA݊隤V@C֌an\㗹୕ǁBR@AYsv߈C񓞗VԔIŒʒuB\
@ʑΔvCsgp@I꣖ٔ\ח́B@
select "߂ĂߑẮAԂɂiQTTցj",*elefrag255

;----------------------------------------
*elefrag318_cg
bg "bg_03und.bmp",3

*elefrag318
gosub *ev_window
bg "a007a.bmp",3
mov %907,1

@@@RPW\

@aCˑRXbB\
@ҔIdʈISgCߌҐ|ݒnB\
uꟁIHv\
@瞔oIߖ୕Ǌԉ񓠁CُhB\
@`wSIGCAYuЌГI᳏ZCo픬gDB\
uAccccv\
@]CImC樉䖾퐥YB\
@̈׎jGICÓى}Cۚ؁B\
@C훀ߊlI{ٖ@Ecc\
uށAsccsvCccCsvCZccZꟁIIv\
@䕱͍@ǵCBHzvZݐgIDʓIP󐶕B
@AʑΒwԗIjGC䍪{ٖ@oLIRB\
@kJnzvEZsxICASsICXIdʈ㗈B\
iĔ鉺Accޗccccj\
@ٓ\A{咅g̓IߕCsoӊԔnB\
@^CjG従IꕔCsRnI{pJnNB\
bg "a007b.bmp",3
uIIccT݁IIv\
@jGINUJnC։ȋlIșɎB\
@t̊SvLMÍCAO@EsiC󘸓sgB\
ivccʁcc{ccjjjIHj\
bg "a007c.bmp",3
@GI{pCZÍCARʁC|وanNIB\
@ʒVCW{BݗnB\
@֔@CccCȓ߈nNI։fB\
uI΁ccTݚjjjjjccccTICIcc݁ccv\
@jGNCOgZACuЌВnsiB\
@ןǔ튮SgZC꣓Ivl\͔풀QCRI͟__DB\
iccccCTCAccꟁCꟁCݚjccjꟁCꟁCꟁCꟁCꟁccꟁccccꟁccj\
@ݍō@CҐzݖ@nLoCō@ꎟRB\
@RkJnߎjGIGC꣊]B\
@A[鄈ꐺCߓIō@IB\
@IjGS᳗cc\

if %99==1 goto *eles_0

goto *gameover

;----------------------------------------
*elefrag319

gosub *r_tear
@@@RPX
br
if %967==0 mov %967,1
@ʑΒśߌoFIΎC꣒ΕI_CҒnIꌂB@
@ꑖIGეʒn`C꣔ˈӎCΑZB
u^Csv՗꘢lAӖY`v\
@oI񘢑Ύ꣓[IBߟ|sI꣕s֐g̈kCA꣊ҐsÎnU񋎁CˋNB@
@sǗLYRCUAccAӖSB\

@DlFDmELi`j\

mov %20,14
gosub *battle_ste

select "iRRWցj",*elefrag338

;----------------------------------------
*elefrag320

gosub *r_tear
@@@RQO
br
if %958==1 add %958,1
@ΘߌooIΎC꣖vLpDlIӎvB꣕IȎDCϏOȏp򗈗B@
@ߍsRnXbC꣍ݕsKvIn󓞗Qi̗͌Q_j@

sub %12,2
if %12<0 mov %12,1
gosub *tear_hpc

@{Ȉ׌XbIls~CAAݔC꘢Ύ蔺ꐺIKoꗹB\
@Iluԋt]C񖼑ΎIoꎧNB@
wEI@EI@EI@EIx@
@݊ϏOkVI^CΎ꣑B\
uk꣖vLE߉ƚBs߁CsŎZݔΒ艺v@
@IbkAϏO싿I^vCAΎIp_n䔇粁B@
@꣛N펞CΎ荂oCoIKB\
@Tݕ\vL艺IŎZꠁB@
@ӎv樉goŚCۑ҉IALSB@
@Iԓx`B_B\

@DlFDmELiaj\

mov %20,15
gosub *battle_ste

select "iRRWցj",*elefrag338

;----------------------------------------
*elefrag321

savegame 99

gosub *r_tear
@@@RQP
br
@kcF@
@䖔ȗꎟCAҐSvLB嫑RsmʗLvLlCAĔpȉsLYꠁB\
select "N͔JĒɓĂǂiRQQցj",*elefrag322,"fɒ߂ĎɍsiQWOցj",*elefrag280,"肢قɍsiQWPցj",*elefrag281,"邢͂炳ɐʂւ̓֍siQWRցj",*elefrag283,"ʂ̓siQUOցj",*elefrag260,"̍LɍsĂiQRPցj",*elefrag231

;----------------------------------------
*elefrag322

savegame 99

gosub *r_tear
@@@RQQ
br
@kcF@
@꣑ŊJ呖iCˑRL򗹉ߗB꣉ӎn_C`wdIGB@
@s֔oꐺIߖCAߋLˏPIЗ͑Cɑ^BjSBí̗F|Q_j\

sub %12,2
if %12<0 mov %12,1
gosub *tear_hpc

uI꣔IIvY\꣓IIIv@
@䎎ߘ^勩Ijl߁CAN]CEVIB@
@䔻fĔdډssICQZ]JBʑΕY㵐{CQVIEߗB\
uIIAZ꣑јlvpIs\tKIv@
@jlX[zꗢCō@ti~[\oCߓB@
u꘢Aƚ엹CĕsAcE꣓ISIv\

mov %191,1

@ݑMIn򗈔VOC꣍QZnto[qBi݂uIŌj\
select "ɍsiQWOցj",*elefrag280,"肢قɍsiQWPցj",*elefrag281,"邢͂炳ɐʂւ̓֍siQWRցj",*elefrag283,"ʂ̓siQUOցj",*elefrag260,"̍LɍsĂiQRPցj",*elefrag231

;----------------------------------------
*elefrag323

savegame 99

gosub *r_tear
@@@RQR
br
@ȗȖ[C˓߈ʕvlʑoB@
uYYꝁHv@
@vl_㕂oΗeCA꣛vLYLYCyyᗹBvlێߞIΗeC꣓_ӁB@
@zđҍݔvpC꣙rOnB\

select "̉ƂK˂ȂiROVցj",*elefrag307,"΂̉̉ƂK˂ȂiROWցj",*elefrag308,"炳ɖkɐLт铹sȂ΁iROXցj",*elefrag309,"ɌŝȂ΁iQTXցj",*elefrag259

;----------------------------------------
*elefrag324

savegame 99

gosub *r_tear
@@@RQS
br
@ŊJ@CoIʕ\aI瓪lvlBꢐēIєkYCӐgUƋǍDIB\
uށCDIƖccꟁC꣗Dv@
@vlanΒCfN꣓ICsc苐iB꣍{syRAѐi[ԁCҍDIˑR꣏PB#FF0000i݂pIŌj#FFFFFF\
mov %186,1
@粍D{ʘaꢑIvlCꈏ㑥eeIB@
u\꣑IꉺꝁH@AIŋNōDhIߓ؁v@
@ߘꢓIbCŌꈏIB\

E}Չ@
Eg쒖_@
EÎ嗋\

@OϏŁCՉڋh\樐l_C쒖D\樐lOo͗ʁBÎ嗋o\{g̐[B@
@A@ʉos݌CȋB@
@RCߞꗈCTAĖvLhڔїB\

select "N̓uX^CK[̃O^IłiRRXցj",*elefrag339,"CmVṼCσ}_LmRYIłiRSOցj",*elefrag340,"VW}c̃\e[IłiRSPցj",*elefrag341,"܂͎ނĂ܂ȂBiQWRցj",*elefrag283

;----------------------------------------
*elefrag325

savegame 99

gosub *r_tear
@@@RQT
br
@cc꣉YmICʋLYB@
@꣖mCʓIisCΏXߎSɁB@
@ȖvKvKCmFB@

@꣗JOCkRnygOʏB\

select "Ԃ̉ƂK˂ȂiROUցj",*elefrag306,"΂̉̉ƂK˂ȂiROWցj",*elefrag308,"炳ɖkɐLт铹sȂ΁iROXցj",*elefrag309,"ɌŝȂ΁iQTXցj",*elefrag259

;----------------------------------------
*elefrag326

savegame 99

gosub *r_tear
@@@RQU
br
@꣑ŊJMTIuԁCOnlIi꣕s֓|zyB@
u}cc}piXv@

mov %182,1

@jlpICNŌ粁B#FF0000ilIŌj#FFFFFF\

;CxgGPO
bg "a010a.bmp",3
mov %910,1
gosub *ev_window

ucc^lꟁv\
@A꣐IV@Cَ֝n^ꐺBŗ꣛s]IqlB\
@꣈粊ɊɒȉvCIċzC粏dVŗʖ[ԁBߗIC|ً^sߔcIsҁB\
uCꖘssCvꖇ╼GHv\
@嫑RjlCAhhCQZnJ[ԁB\
textoff

bg "bg_02tow.bmp",3
gosub *tear_w
gosub *tear_hpc
gosub *tear_m
setwindow 25,25,20,20,23,23,0,20,20,0,1,":a;text_window.bmp",0,0
mov %9,0

@䋭sSܖGIC@
@ח\sY{˓IiہC\IJB\
select "Ԃ̉ƂK˂ȂiROUցj",*elefrag306,"΂̉̉ƂK˂ȂiROWցj",*elefrag308,"炳ɖkɐLт铹sȂ΁iROXցj",*elefrag309,"ɌŝȂ΁iQTXցj",*elefrag259

;----------------------------------------
*elefrag327

savegame 99

gosub *r_tear
@@@RQV
br
@ŊJCi[ԗB@
@RCʋوꕨCLҕŏYࣗILݖ[ԗՐB{ݖ[ԗIHRꠁCݕszݔLvB@
@XZ@C粊ږ[ԁB䔯ʉICLҍXZIٖGB\
@騁cc騁cc@
@B`IB@
@NIDSC樉䊴sYŊJߐIB\
select "Jĉ𒲂ׂĂ悢iRSQցj",*elefrag342,"fɉƂočsĂ悢BiQWRցj",*elefrag283


;----------------------------------------
*elefrag328

savegame 99

gosub *r_tear
@@@RQW
br
u}ꟁ\\Iv@
@ꑖiXCXA_\nŏāB@
u}Ր_VBX{ApʓIBƖCLYvIꝁHv@
@CXn\o꒣PŁB\

Eє灁@
E@
EÎ嗋嗋@
@vYzIC֗JX܁COʏB\

select "є̂ȂiRSRցj",*elefrag343,"̂ȂiRSSցj",*elefrag344,"VW}ĉȂiRSTցj",*elefrag345,"炳ɓ̋֐iނiRQXցj",*elefrag329,"̋֐iޓĂĂiQWRցj",*elefrag283

;----------------------------------------
*elefrag329

savegame 99

gosub *r_tear
@@@RQX
br
@䗈cJ舓InCLOHCʒʉkAAOBsߘaʏsCkIHڒʉIoB@
@ĉOCHLؗїIXєVB@
@ACkIHYAʉ_IHB\
select "N͂̐_ւƌĂǂiRSUցj",*elefrag346,"̏ꏊ瓌ɌƁiRSVցj",*elefrag347,"֌ĂiROXցj",*elefrag309

;----------------------------------------
*elefrag330

savegame 99

gosub *r_tear
@@@RRO
br
@ˑRzNsmNߗߗIBwsfsInccAcNxB@
@嫑RM^CAEfsvpB䋭swǐi剺I׏DCǵB@
@ʁCzۓIve՝NC䐬iʓI[ԁB\

@ʐԏ[ԁCڈꚟ֔\ؐsB@
@Ir粕꘢rBpΔc߈ƁCrqʒwŖxB\hYpICCrcё#00FF00ilFŖj#FFFFFF\
add %108,1
@[ԗҗLʉX[IB@
@䐥ۙߐ߁C[^`I݁H@@ʉ\ߐ߁CߑzK疾p[ӖYꠁB@
@AZ΍|وہCoݍiOI@U댯B\
select "o債ĔJĉ֐iłǂiRSWցj",*elefrag348,"ňԂĕoĂ܂ȂiQWUցj",*elefrag286

;----------------------------------------
*elefrag331

gosub *r_tear
@@@RRP
br
@HxxvLiWC樉IzsmsooBŋ}ISpH쎞CLYˑR{I@zB@
@䍄oߐI_GCuԁCwɏPB@
@sR닩≺蒆I]HCvpc{ݍ@zI{CLYB\
@ߓĎїuɁCߍȈAړAOnCsfn䑢ɋB@
@Ėٖ@EC]gzvCA簏oIrpD̓Y_IBrꊊCg̏A|C{\ݎ藢IΔcEoB\
@ΌƗICِQIVlB@
@Vl엺oF֓I䲉CȉזڕWC@ʏPB쑈拰@nখISgCߓꖗAꖗnhB@
@ِsIhɑwwnPCi^وفBI畆ژA흙CN̕\ɊɟoBAVlIʝًِsCI厩RshꎟB\
@꣈ɓEC粔oS粍ݐIn|CAVIVlsfএ꣓IǵCꣁB@
@NI䲉ꎟꎟn꣏_I畆CcEn꣏ϓ_㌌FIϗeC隤꣊nB@
@ߏiCAňꖼ䲉IVC@X~JʏPCs_ዅҐACsٍʒnUB\
@꣓IߖQCsv@CAaF퍤fCg̐rٖ@eBAVlΔꏗvLN|艺C|sn꣓ISgCn𚐒B@
@svC꣓IACAߖsٖ@oB@
@䲉ho꣎Cg̝ٖ@eC甯soC܊A꘢ڈ꘢n흔ʁB@
@sv@C@q퍤{C㓪C꣓IؓsVlDꠁB\

@꣏\ICBLFʒɋ\sCꖜuԖDB\

goto *gameover

;----------------------------------------
*elefrag332

savegame 99

gosub *r_tear
@@@RRQ
br
@䑖艑IJCƊŏ㋎ٓIX܉fBsmےs݉cƁCX`ol쑊krIB@
@iIb\WꍱCAlInR町댯B\
select "N͎ɓĂiRSXցj",*elefrag349,"kɑsiRSVցj",*elefrag347,"ɑsiQUOցj",*elefrag260,"邢͓̕ւƑHn֌ĂCCiRTOցj",*elefrag350

;----------------------------------------
*elefrag333

savegame 99

gosub *r_tear
@@@RRR
br
@䎎řߗꉺCŊŗLvLYlӓICAvLȑzvIuB@
@嫑RLCAҐrpsB@
@DݔsHCOҗLِHCҗL\IorB\

select "Ԃ̒ʘH֍ŝȂiRRSցj",*elefrag334,"Ԃ̒ʘH֍ŝȂiRRTցj",*elefrag335,"lԂ̒ʘH֍ŝȂiRRUցj",*elefrag336,"ZԂ̒ʘH֍ŝȂiQUXցj",*elefrag269

;----------------------------------------
*elefrag334

savegame 99

gosub *r_tear
@@@RRS
br
@ꍆʓFlZIo@

gosub *choice_flag

select "rƂtOȂiRTPցj",*elefrag351,"łȂ̂ȂiRTQցj",*elefrag352

;----------------------------------------
*elefrag335

savegame 99

gosub *r_tear
@@@RRT
br
@񍆒ʓFIʓ@

@䑖ݒʓCꕝIiۍRf\\rIH酑RfJCo꘢歌B@
@䋓NΔcƗƁCrIHʎߌo蜁Cٖ@ČpOiBsCymCv蜓IҐ\ߋIB\
@AݔnCƖ瑾D͗B@
@r⋕sC歌ILCҐgB@
@AZH׉ߋCsmL[CfRmInk댯B\
@Ō୕ǁCRnʒwUAZxCNI쌀ꝁHL_MsꉔhIӎvB@
select "N͂ŖƒmȂWv鎖݂ĂiSQWցj",*elefrag428,"fɒ߂ĈԂĂiQXSj",*elefrag294

;----------------------------------------
*elefrag336

savegame 99

gosub *r_tear
@@@RRU
br
@lʓFnI@

@ʓvvCIiۍRρC䗈୏_ΓIB\
@œD{ƓX܁CALkœXʏA樐l]pBrLD{ƓXC׈ꖼCݐsB@
@ݔXC@ʐqVIbC䊴oȊҔ\iŊŁB@
@OCʓҍ݌pOLCȒʉߓߗIO㓞B\
select "N̓Mu̓XɓĂiRTRցj",*elefrag353,"قɓĂiRTSցj",*elefrag354,"ւƏオĂiRTOցj",*elefrag350,"nʘHĂiQXSցj",*elefrag294

;----------------------------------------
*elefrag337

savegame 99

gosub *r_tear
@@@RRV
br
@a{lb@C꘢IB@
@𐅘HʞPC嫑Rg`gCpiL혰lޔVIqdB\
uu݁Cߖ{sݓI]s҉ɁBAzCR꣐RC\樉I]suɁccvv@
@嫑RΕfsCAIbꈽnœꣁB@
@꣓ӁCr藣JB\
select "Ԃ̒ʘH֍ŝȂiRRSցj",*elefrag334,"Ԃ̒ʘH֍ŝȂiRRTցj",*elefrag335,"lԂ̒ʘH֍ŝȂiRRUցj",*elefrag336,"ZԂ̒ʘH֍ŝȂiQUXցj",*elefrag269

;----------------------------------------
*elefrag338

savegame 99

gosub *r_tear
@@@RRW
br
@񖼑Ύ꣖ʑO|@CϏOĎoEIEII^COUB@
@䋭n󓞈ҕK{EΎIB
select "N͂Ȋϋq̐ɉđΐ푊ɃghhĂiRTTցj",*elefrag355,"hȂĂiRTUցj",*elefrag356

;----------------------------------------
*elefrag339

savegame 99

if %969==0 add %969,1
if %969==2 add %969,1
if %969==4 add %969,1
if %969==6 add %969,1

gosub *r_tear
@@@RRX
br
@IڌՓI}B@

@hэ@CӁCr藣JB\

select "̉ƂK˂ȂiROVցj",*elefrag307,"΂̉̉ƂK˂ȂiROWցj",*elefrag308,"炳ɖkɐLт铹sȂ΁iROXցj",*elefrag309,"ɌŝȂ΁iQTXցj",*elefrag259

;----------------------------------------
*elefrag340

savegame 99

if %969==0 add %969,2
if %969==1 add %969,2
if %969==4 add %969,2
if %969==5 add %969,2

gosub *r_tear
@@@RSO
br
@Ig쒖_B@

@hэ@CӁCr藣JB\

select "̉ƂK˂ȂiROVցj",*elefrag307,"΂̉̉ƂK˂ȂiROWցj",*elefrag308,"炳ɖkɐLт铹sȂ΁iROXցj",*elefrag309,"ɌŝȂ΁iQTXցj",*elefrag259


;----------------------------------------
*elefrag341

savegame 99

if %969==0 add %969,4
if %969==1 add %969,4
if %969==2 add %969,4
if %969==3 add %969,4

gosub *r_tear
@@@RSP
br
@IÎ嗋B@

@hэ@CӁCr藣JB\

select "̉ƂK˂ȂiROVցj",*elefrag307,"΂̉̉ƂK˂ȂiROWցj",*elefrag308,"炳ɖkɐLт铹sȂ΁iROXցj",*elefrag309,"ɌŝȂ΁iQTXցj",*elefrag259

;----------------------------------------
*elefrag342

gosub *r_tear
@@@RSQ
br
@䐳vJiCuԁCˑRLYoߗB@
@ҕŗvh@oI󕅏LPCٖ@]JߘђdʈߗIB\
@ҖvM^YCAo|ݒnBߏdʘaL៣Cϓ͌ЁBݓߕRȓI쒆Cœ꘢_畅ࣁAjssIB@
@ߘƚ쒷ɑ|CҒnJ{CˑR厕hiIqB@
@Ig嫑RvࣗC厕pُ팘ŁC֝I畆CnHIB\
@ɔVCsRoSC\oNqߕOoB@
@QZzL苎gZCA݉gIȈdSDg̓IRBYsC߉chzI厕CzEX[B@
@ݛIԁCIǁAAA_o__nB\
@BHCLoCzSZYȓICAIv\Gyߍ~jB@
uޙށCȋIHIHvv@
@퐥NIꡁB\
@꣌ݓImCҕsȗߐYB󊎁C꣓IӎQNOCvl琏VB@
@SgI͟QCݔHg̓IC꣔\oȍݝٗ͒ցBR꣊ٖ@׍ՁCٗ͑j~؁B@
@AC꣟ˈחA^ʖړs٘mœIIaHccB\

goto *gameover

;----------------------------------------
*elefrag343

savegame 99

gosub *r_tear
@@@RSR
br
@꣒єCX֘C@oB@
@ՔzےXni꘢єjilFj@

sub %105,1 : add %102,1

@꣉ȌpCȗJXOʏB\

select "Ėє̂ȂiRSRցj",*elefrag343,"̂ȂiRSSցj",*elefrag344,"VW}ĉȂiRSTցj",*elefrag345,"炳ɓ̋֐iނiRQXցj",*elefrag329,"̋֐iޓĂĂiQWRցj",*elefrag283

;----------------------------------------
*elefrag344

savegame 99

gosub *r_tear
@@@RSS
br
@꣒㐶CX֘C@o򑐁B@
@ՔzےXni꘢jilF򑐁j@

sub %104,1 : add %101,1

@꣉ȌpCȗJXOʏB\

select "є̂ȂiRSRցj",*elefrag343,"Đ̂ȂiRSSցj",*elefrag344,"VW}ĉȂiRSTցj",*elefrag345,"炳ɓ̋֐iނiRQXցj",*elefrag329,"̋֐iޓĂĂiQWRցj",*elefrag283

;----------------------------------------
*elefrag345

savegame 99

gosub *r_tear
@@@RST
br
@꣒Î嗋CX֘C@o嗋B@
@ՔzےXniÎ嗋jilF嗋j@

sub %106,1 : add %107,1

@꣉ȌpCȗJXOʏB\

select "є̂ȂiRSRցj",*elefrag343,"̂ȂiRSSցj",*elefrag344,"ăVW}ĉȂiRSTցj",*elefrag345,"炳ɓ̋֐iނiRQXցj",*elefrag329,"̋֐iޓĂĂiQWRցj",*elefrag283

;----------------------------------------
*elefrag346

gosub *r_tear
@@@RSU
br
@_O@

unOC֐ߎI_B𐥔ۗLinCA樌ᗈlꠁv@
@bCOAo꘢nДʓÍB꘢leɊɕCQ`B\

@DlF\

mov %20,16
gosub *battle_ste

select "iRTVցj",*elefrag357

;----------------------------------------
*elefrag347

savegame 99

gosub *r_tear
@@@RSV
br
@OϐןhIىfIBsmIMZCҐ쉽pCO\ȔfB@
@⋒D{lCl픇[qވ׌IہB@
@Aّs˔VBŉL^S֌nIlsECr樉oA~]IېB\
select "̉Ƃɓ낤ƐĂ݂ĂiRTWցj",*elefrag358,"͐ɍsȂiRQXցj",*elefrag329,"ɍsȂiRRQցj",*elefrag332

;----------------------------------------
*elefrag348

savegame 99

gosub *r_tear
@@@RSW
br
@䉺rSƊJICrpˑRꊊB@
@꣓Ig̔d͋zCA鏇IB\

@ꕔsĐVOIHCΐFㅁC햟BRsI󟃁B@
@A꣓IOCǒ^IB\

@DlFd|\

mov %20,17
gosub *battle_ste

select "iRTXցj",*elefrag359

;----------------------------------------
*elefrag349

savegame 99

gosub *r_tear
@@@RSX
br
@ꑖiفCAʊҒM駓IB@
@嫑RLlQڏWLILCA\WIDXB\

@ȉcEρCXB@

select "JE^[ɂ}X^[ɘb𕷂ĂiRUOցj",*elefrag360,"e[uŊyɊkĂAɘb𕷂ɍsĂiRUPցj",*elefrag361,"邢͎̋ŋȂeĂVlɘb𕷂ĂiRUQցj",*elefrag362,"܂ɓXoĂ\ȂiRURցj",*elefrag363

;----------------------------------------
*elefrag350

savegame 99

gosub *r_tear
@@@RTO
br
@JIsLiOCORnʒw}lXxB@
@AZ꒼⋍ݔCŗsLYlB@
select "N͊KiĂĂiRRUցj",*elefrag336,"ɉтHniłĂ܂ȂiRRQցj",*elefrag332


;----------------------------------------


;----------------------------------------
*elefrag351

gosub *r_tear
@@@RTP
br
@꣌IjlbCjl֌꣐[[nfZB@
uCRBLYꝁHv@
@嫑R꣔픇CADlInClߌo{B\
@꣖zsoȗLYʓIvB@
select "N͗ƁAԂđfɒʘH߂鎖ɂiQXSցj",*elefrag294

;----------------------------------------
*elefrag352

savegame 99

gosub *r_tear
@@@RTQ
br
@Ijlœ꣍@C_㕂o^IΗeB@
uCꣁcczQplꝁHv@
@꣖NplICjlֈȋlIsnuNB\
@plꐥȎRECInCQҕK{ODS˔\lyJB@
@aZbsK{gp씇粏yDICחh~앾B@
usǐՎ񖼊ҐNCsȎRQBC꣗vQꝁHv@
@ʑΒjlI籐C꣎bNo]vlNB\
select "Q\ĂiRUSցj",*elefrag364,"ԂĂiQXSցj",*elefrag294

;----------------------------------------
*elefrag353

savegame 99

gosub *r_tear
@@@RTR
br
@꣈ꑖiqCAߓe`ߖaāBݔߊAcInC꣍DnڎlB@
u꣐vIHvߓICA֝QꈎqBvs߁CݓXWWkVIv@
@jlIbmkLB\
select "N͂̌tɏ]悤ɃMu׃e[uɂĂiRUTցj",*elefrag365,"tɏ]ēXočsĂiRRUցj",*elefrag336

;----------------------------------------
*elefrag354

savegame 99

gosub *r_tear
@@@RTS
br
@꣈ꑖiفCAoLIhꣁB꣑ΔvLsm[CꖼŕIٓ[gB@
uށCBLYꝁHv@
@嫑RꢔCAΘg׏I꣗C{㐥vYInB\
u꣗vzQHC߉|sӁB꣔ccs\׍glꡁv@
@˔@IbCȋyߗdZIB@
@s߁C]ݔAE׏WCAePȓIga؁CP`B\
select "N̗͂ǓtɏĂ݂Ă܂ȂiRUUցj",*elefrag366,"fĂXočsĂ܂ȂiRRUցj",*elefrag336

;----------------------------------------
*elefrag355

savegame 99

gosub *r_tear
@@@RTT
br

if %958==1 mov %958,0
if %967==1 mov %967,2
if %967>=3 mov %967,2

@Εō@ꌂI\

gosub *choice_flag

select "iɃ`FbNĂiRUVցj",*elefrag367,"łȂꍇ́iRUWցj",*elefrag368

;----------------------------------------
*elefrag356

savegame 99

gosub *r_tear
@@@RTU
br

if %958==1 mov %958,2
if %967==1 mov %967,0

@vLΕō@ꌂI\

gosub *choice_flag

select "iɃ`FbNĂiRUVցj",*elefrag367,"łȂꍇ́iRUWցj",*elefrag368

;----------------------------------------
*elefrag357

gosub *r_tear
@@@RTV
br
@RDҁCʉ_IHAŊJB@
@ݓIbҗy񓪁CJnCOĐUfArIB@
@֔@C꣊ҐvpOiꝁH@
@ʑΔC꣓__Cҕ֍꣖ʑOBOIؗJCo𓹘HB\
uډC꣏oOBvLӎuI͗ʏIˈ׏I\́CvL͗ʓIӎusߐٔ\IiB䏫v؁C꣐یҁv@
@ғIgeAݓߗɊɏZB\
uj꣍D^v@
@꣍݌n꘢[ċzC㗹OJ焏oIHB@
select "I܂ł͒܂Ŗ߂鎖͏oɂȂ낤iRVUցj",*elefrag376a

;----------------------------------------
*elefrag358_cg
bg "bg_02tow.bmp",3

*elefrag358

gosub *r_tear
@@@RTW
br
@꣈⋓ّOCjl֓ŗʉ^iʓIB꣑veJIʎ哮bCCꖼIjqђIΗeʌgB\
uVCꋜeoccv@
uvvCVSDkBvCLʔIO`KCR䔇le}ڍˍ琔vv@
@jl粔C粏}iفB\
@ڒCjl咡CrInˑR鼒nꐺJCg̐VėB@
uLC꣉\׉VIϏܕꟁv\
@ݒjlIΐCIg̒ė݈ЊxLeȈBΔsvcIGfCᓪŁC퐥Q従ItmCLrL]ߛeB\

gosub *ev_window
bg "a013a.bmp",3
mov %913,1

@rxAg̓IoC˔@Id樉QZLorBALoIvLGqCCkJn݋󒆊B\
@]Mߓv꒼{ꝓIOCsvIR֗O㗈B\
uYccIꟁIHv\
@sRn닩oC݋󒆊IrӗoCō݋F瑔B\
@AėkAB\
@Ig̗݈Њ_ȈC_nڏZCzėItB\
@gvL`uɁC䎩RRnB\
uBRȒPAbCҐ^忓I召ꟁBs߁cc樉HvvDC|lꡁv\
@َl͞IjlIيݒn`CsRΔeDIꊴ{B\
@AݛߌoOI݁Cs_䜃痋Cssߐ뗹B\
u΁ccΕs꣓IccIv\
@֔@CAZ䅓CҐىցCpRB\
@䒩ߓϓI_G`IŋCD{Itm従B\
@ߍ粑啝xn|C粊JnsCzvQQnSSZB\
@Q@퓊IaHIׁC꣊җsypAsNB\

bg "a013b.bmp",3

@꣓IlyՏAZZCCtm̕\IStu㗹꣓ISgB\
@ߎt̊ȒA@C咅꣐g̓IZbaߕnꊱāB\
uYccIYccꟁIHv\
@AZSgItmCRʖʝٕ\Aҕsn꣏PB\
@{tm퐶AvL\CA픇يIPCpїzۓI|B\
usccsvCZAZI펖ccsvCsvꟁIIv\
@꣕nhCRZZIǵCBEQtmB\
@AC݈꘢rsٖ@xA͓InC꣖ٔ\ח́B\
@tmIg̏`ICymٌnhAIB\
uBBBBBBBBBBBIIv\
@IꌂCّnX׎~ClGqߓInBZJٕI_VC樉N蛓IO[B\
@꣓I]CNwَhICSgҒnzꉺB꣐rvLӎCtmʓIỈtIʁB\
@AݔC꣓IӎfuԁCr͔ٗEl픇ڗIONIccB\

@cc@
@cc\

bg "a013c.bmp",3

uccccCqϓ嗹B^A^ꟁv\
@N蛒jlIQXbCAgߓC꣓Ig̖ߌosoCB\
@풋sߘMIg̑ߖՐś̗CNƓI̐rAuɓsosB\
@LStok싿IrVCח꣓Ig̓̎sftB\
@䝫N]CځCِsInCAIkJٌB\
@Zㅍ݉lIỈtCIؓsC樉\CRpߘMB\
uꟁccBꟁccccccjccꟁccccccBꟁccv\
@@\{粘RoICSgAOꕅࣗʎgśB\
@SItmˑRZㅍݑPۓ͓ٗȈB\
@쑍ߛÛYCŊAחNƈʁCIN|vL≺IӎvB\
uBꟁccꟁccBꟁAccGccꟚjccccAꟁccGccBBBccccjꟁccv\

bg "a013d.bmp",3

@@C{粈oIߖrߌozɋCL@ךTʓIKOlB\
i~cc~C`cc~~cccc~~ꟁccj\
@SgsZnGCӎQnRtmD従IQVB\
@An従QVIꣁCߒnĖٖ@p`ꠁccB\

if %99==1 goto *eles_0

goto *gameover

;----------------------------------------
*elefrag359

savegame 99

gosub *r_tear
@@@RTX
br
@꣑œ|_鐶@CߐA꣖ʑO@ʗnCOcZB@
@嫑Rsms˓ߘۉICAԌʁCUW뎧IPB\

@cZUZCvIZI˔\GlCAIꌂp\sIQB@
select "N͕ZɎւĂǂiSSTցj",*elefrag445,"̂܂܂̕gĂ\ȂiSSUցj",*elefrag446


;----------------------------------------
*elefrag360

savegame 99

gosub *r_tear
@@@RUO
br
@Vřߍ@C䓾mqInʓLŕsJIBҙߐCߐssfCv㝫N˔\ŊJB#FF0000iIqIj#FFFFFF@
mov %187,1
@ȑO݋P꘢zKIjlߗIB\

select "e[uŊyɊkĂAɘb𕷂ɍsĂiRUPցj",*elefrag361,"邢͎̋ŋȂeĂVlɘb𕷂ĂiRUQցj",*elefrag362,"܂ɓXoĂ\ȂiRRQցj",*elefrag332

;----------------------------------------
*elefrag361

savegame 99

gosub *r_tear
@@@RUP
br
@ꈎq֓NIQlCˑRNCJn݉B@
@ߗߑkbIeClXIqƕKIxǁB@
@A꘢jlxǔ{CAˑRN藈B\
@ה펖ߎi󌩊C͓IlAvLOj~C|݈ӋNCœÒ×LB@
@꣏ddnQCJߒꈎqB\

select "JE^[ɂ}X^[ɘb𕷂ĂiRUOցj",*elefrag360,"̋ŋȂeĂVlɘb𕷂ĂiRUQցj",*elefrag362,"܂ɓXoĂ\ȂiRRQցj",*elefrag332

;----------------------------------------
*elefrag362

savegame 99

gosub *r_tear
@@@RUQ
br
@꣎lbCApsS͏sm]ÍB@
@AZbCIkx݁CҐCߌoSꑐZݎȓIE\

@꣕Pcc@
select "JE^[ɂ}X^[ɘb𕷂ĂiRUOցj",*elefrag360,"e[uŊyɊkĂAɘb𕷂ɍsĂiRUPցj",*elefrag361,"܂ɓXoĂ\ȂiRRQցj",*elefrag332

;----------------------------------------
*elefrag363

gosub *r_tear
@@@RUR
br
@AݔC꘢w雒nꐺ㗈B@
u^^C✒`B꣘ۓۓI忉݁Iv@
@ߐ_C꣓I╼ߌȏi╼Fj@

sub %100,2
if %100<=-1 mov %100,0
gosub *tear_m

select "N͉vɏPȂAXoiRRQցj",*elefrag332

;----------------------------------------
*elefrag364

bg "bg_05bat.bmp",3

savegame 99

gosub *r_tear
@@@RUS
br
@QZIꣁCvLIaB@C݋ZIDlVOC꣓sٖ@gpȎLIaB@

mov %8,%15

gosub *ev_window
bg "a012.bmp",3
mov %912,1

@꣐㗹ꔕyICAgߕ\IxɍC꣊LQ㵁B\

bg "bg_03und.bmp",3
gosub *tear_w
gosub *tear_hpc
gosub *tear_m
setwindow 25,25,20,20,23,23,0,20,20,0,1,":a;text_window.bmp",0,0
mov %9,0

@ڒCΕ꣓WO핐B@

EnFU͍CA瑽B@
EsNFގZCcȒP՗pIό^B@
ELLFU͒CAQB\

@꣉Ș풆CIcȊ슽IB@
select "U͂̍ŕiQRVցj",*elefrag237,"ϓIȕiQRWցj",*elefrag238,"xЗ͂ႢiQRXցj",*elefrag239

;----------------------------------------
*elefrag365

savegame 99

gosub *r_tear
@@@RUT
br
@꣈חqCݓqꈑOB@
@ꈎq鍎qaICߖ@ȏoIhoI鍎q_B@

select "NƎvĂ̂ȂiRUXցj",*elefrag369,"ƎvĂ̂Ȃ΁iRVOցj",*elefrag370

;----------------------------------------
*elefrag366_cg
bg "bg_03und.bmp",3

*elefrag366

gosub *r_tear
@@@RUU
br
@꣐ڎ󗹏WI籐CrAʖ`ҐUB@
@A꣎Ȗs׏YoߞIIB@
@狖oPIDC狖oߞkLC꣑zŊő𓹘HI\ꠁB\

mov %957,1

@@CxzIlꣁB꣗pȓIg̍In؊lِ͎ҁCওݓIʒuB@
@嫑Rז`ғICA꣖ZlȓIKB@
@鈽DIB\

gosub *ev_window
bg "a018a.bmp",3
mov %918,1

@\\ƂȂĂ݂΁A`Ă͖̎̏o݂B\

@ÓI[ԗC[񓔏_agIPB\
@[ԗCQהʓIƚ쐳nuNCyߕߏ[ח~Iqt́B\
@R͙~CAߌQגZB\
uCҕssGccҕssCꡁv\
@ٗٚ{OCwCݖטIʑOgRsȓIB\
@ߋvogpI嫑R`󎗌LCAXrVC樐lzzדIAB\
uC^sꡁCccsGBA꣘ŊꠁccTccAāccv
@beCًوZoC͗ʟ󒍑B\
@IAT従C[fIACVI`ufnoAHB\
@ݓ߈toIuԁC󟃒Ď[VICטI~]iB\
@AݔCЈꐺCꕔAtҒnˎoB\
@ߋFIt̊coꓹeCݗꓪדIgB\
@͋N^ICŔsyҒnzŐډIԁCRRnOoCkZB\
uˋ}C^ꟁcc꣘씇艑sIׁBDꠁCccAR䗈꣘ꠁccv

bg "a018b.bmp",3

@CFIt̖ЈꐺĆB\
@ݒטIC珫ْێɌB꒼EϒrAIԒoIC樉I{ps֔gB\
@ꏉɑRnѓIC튮SoIFt̊ɊɒnlB\
@IMAG黐h@ICؓsNVIB\
@טܔMIsWݗᰓICܔMIŉ엹ٌ`IB\
uꟁCāccjjccꟙccIAcccckcc_ccꠁccHv\
@OoIt̗^[~IfD݈NCݔח~]oFIԗCg׏Iٗٚ{OB\

@LICvÈӁCA\VssIxCsȓI~B\
@ΔIq|ىӁCF׎ȓIIvLB\
@ŏdvICVs[hCm쒅ccȁcc\

if %99==1 goto *eles_0

goto *gameover

;----------------------------------------
*elefrag367_cg
bg "bg_05bat.bmp",3

*elefrag367
gosub *r_tear
@@@RUV
br
@A݉䊴oҒn꒵Cw@nkʓI῝PB@
@ݔҗߐlٖ@⋉ItCIoڔC꘢BCg̖ҒnXΉB\
@LozvAZv|IǵCƒړnCʕϐlnIpB@
@Iz`o⊾CwܔMC^C䊴oŗLYݑ̓\B\
uꣁccꝁccߘv@
@`IאlRIbꒆCђuIӖB@
@ōݐ䍪{szIΎʓ]ߐgCߔwekAݗ`I粁B\

gosub *ev_window
bg "a002a.bmp",3
mov %902,1

@䍄zoC従IֈחqQoC݉̓XnNB\
uꟁccjꟁccccYccccv\
@ҙtI^ʖځC꒼ȗssËFIB\
@אlRIb\CݐilZOI򏊈NIpB\
issCݔccnCTccvCRoccccj\
@ZIߕٓ\݉IԁCcꓮAC畆B\
@Aٖ@ݔċ~C׋IesB\
@ڒC͓IĐˑR蜓kٓIÁB\
@Őӓg̔IωCҒꍏIB\
u\ccIssccIݔnccvccoccccccccꟁIIv\

bg "a002b.bmp",3

@wa@wꠁ@΁@wO@wwwꠁI\
@̗^e݈NC݈ߕIoyJCOlB\
@ߓICzsoCŔjI@CAݏO牔V֗B\
wIGGGGGGGGGGGGIIx\
@qIaLYЍ͓IGCߌҖ\It͏uԉϗߕI`B\
@{\ӏoCW\`^\DIߕC핳ُ֝nAےNB\
iށCcclŒccccݘRoCݔlʑOCfQqꟁccj\
@yˋvL~CߕIەߌoӐlA\ŏorL𒣓IxB\
wꢁI@ꢁI@ꢁI@ꢁIx\
@͕NIC[~^DFB\
@͋͐IA@jHʎhɔCg̖瑜BZʓesB\
@B\mMICLȐى\o~gQIccB\

bg "a002c.bmp",3

@Ig̓OˈחߌQƚIߕCߌoϐILB\
@smNIwqCXI߉N蛒nό`B\
uꟁAAcAꟁAꟁccTABꟁv\
@dꕛoIqC{IsfÒtICߌos\Ď̐`җꠁB\
@毎~@C򕨐NIIg̖\݉IDsfdB\
uꟙccTAjꟁAꟁAjꟁccBv\
@وӎԔoIgbh͓I^lCߌQƚAˈʑ拰@nˏotB\
@ߌQƚ{A~CEiVIꣁCΑ었zKڔ`ꠁB\

@꣉푼슱钗C픗בsfwqB\

@vC꣒f׎~ccB\

if %99==1 goto *eles_0

goto *gameover

;----------------------------------------
*elefrag368

gosub *r_tear
@@@RUW
br
@Oloݗ꣓IʑOI\

@DlFR\

mov %20,18
gosub *battle_ste

select "iRVPցj",*elefrag371

;----------------------------------------
*elefrag369

savegame 99

gosub *r_tear
@@@RUX
br
@ݖғI꣓IʑOC鍎qoC_wxB@
@꣎דqI╼i╼Fj@

sub %100,2
if %100<=-1 mov %970,1 : mov %100,0
gosub *tear_m

@u^ꟁCҗvpꝁHv\
select "Iȑ̌tɏĂiRUTցj",*elefrag365,"̓CJT}ĂƋłiRVQցj",*elefrag372,"邢͒߂Ă̓XočsĂiRRUցj",*elefrag336

;----------------------------------------
*elefrag370

savegame 99

gosub *r_tear
@@@RVO
br
@ݖғI꣓IʑOC鍎qoC_wxB@
@꣎דqI╼i╼Fj@

sub %100,2
if %100<=-1 mov %970,1 : mov %100,0
gosub *tear_m

uS~^vCvsėcHv\
select "Iȑ̌tɏĂiRUTցj",*elefrag365,"̓CJT}ĂƋłiRVQցj",*elefrag372,"邢͒߂Ă̓XočsĂiRRUցj",*elefrag336

;----------------------------------------
*elefrag371

gosub *r_tear
@@@RVP
br

mov %954,1

if %15==6 mov %960,1
if %15==2 mov %964,1

@꣊lRI̍II\

mov %15,%8
mov %8,0

@׎~ٖ@gpIas񓞗I蒆CΎIR_uNnLo藈zv#FF0000iIr@ej#FFFFFF@
mov %188,1
mov %7,0
bg "bg_03und.bmp",3

select "ČN͏҂̃Q[gARVAo鎖ɂiRRSցj",*elefrag334

;----------------------------------------
*elefrag372

savegame 99

gosub *r_tear
@@@RVQ
br
@ˍ^C͏A`o{jlCИe樉svĔ\s_B@
@AI樉mMʍmLLVBs߁CݔvC٘_䜃\iCossLlFˁB@
select "łKɐHĂiRVRցj",*elefrag373,"߂ēXočsĂiRRUցj",*elefrag336

;----------------------------------------
*elefrag373

savegame 99

gosub *r_tear
@@@RVR
br
@ݓX^CoD{lCccc͏ZB@
@ْsRnNCAbߌooC@vLޏkIŎZB\
@̍쌘nU񋎁CחsAΕICccN锁CٗB@

gosub *choice_flag

select "utOɃ`FbN̂ȂiRVSցj",*elefrag374,"łȂ̂ȂiRVTցj",*elefrag375

;----------------------------------------
*elefrag374

gosub *r_tear
@@@RVS
br
@o꘢ŋNsDIVB@
uR񎟁CҐ^vvꟁCo씇񊼊ꝁcc꣘mv@
@jl{ttn粉ˏZCc䝫oB\
@nzvBECAݔsI͉C{ٖ@oIRB@
@sXCE꘢X܍@InB@
@䐳v{e\IsaC꘢A݉I엢vB\
@퉣œIoCȋy@IǵB@
@AsߐJnIMCuԁCwtP㗹IǵB@
@ŁArPA̓B@
@z]CpAbssoC\Pʒn󒅖\́B\
@\svꡁB@
@QȉAjl슈ŎB@
@ݔٌ`I|AeʑOC꣓ISgs旹B\
u忉݁C@ˊdACz`ꝁHv@
@ݒjl⍓IC꣕nzvYBA꣓IA瑘dnCߌoٖ@픯B@
@֓It́C꣓InUMʁB\
@RC͓IC[يI䊁Cō݊ňꓪҍɓIB@
uIA֏{ꠁv@
@ߓ⍓I߁CjlJnWRnsNB\
@꣓IrFؒf@Cڎ󗹎~󏫐g̎C@ēIÁB@
@ACݎrIR픍D@C꣔Sgԗn݈꘢qC^^h΁B@
@Q_ᆋIƚ莝nCesI꣒cc͏ZccB\

@{V@CcؓAߊŕso^ICl^oB@
@ߋ퐥NICݍAsҏqB\

goto *gameover

;----------------------------------------
*elefrag375

gosub *r_tear
@@@RVT
br
@ʑo꘢ŋNsDIVB@
@A߉ƚ쎗kӉ䋩IԓxC\╼B@
u꣔LIƚŋ߉B݋\x^xI֌nCxlIRs΁CAvהAEېCߑhkv@
@V粔C粏ߕB\
us߁CIʍĔƗCꝁv#FF0000iũtOɃ`FbNj#FFFFFF@
mov %192,1
@݉蒆I╼C݊eӋ`soꑙI#00FF00i╼F\j#FFFFFF@

add %100,10
gosub *tear_m

select "ČN͓Xo鎖ɂiRRUցj",*elefrag336

;----------------------------------------

;----------------------------------------
*elefrag376a

csp -1
textoff
print 1

bg black,3

bg "catch03.bmp",3
bg "bg_04san.bmp",3
gosub *migikuri

gosub *tear_w
gosub *tear_hpc
gosub *tear_m

mov $1,"m07_deep.mp3"
mp3loop $1

*elefrag376


savegame 99

gosub *r_tear
@@@RVU
br
@IʑOLʉkAAIHB@

select "ɍsȂiRVWցj",*elefrag378,"ɍsȂiRWOցj",*elefrag380,"kɍsȂiRVXցj",*elefrag379

;----------------------------------------
*elefrag377

csp -1
textoff
print 1

bg black,3

bg "catch03.bmp",3
bg "bg_04san.bmp",3

gosub *migikuri

gosub *tear_w
gosub *tear_hpc
gosub *tear_m

mov $1,"m07_deep.mp3"
mp3loop $1

savegame 99

gosub *r_tear
@@@RVV
br
@IʑOLʉaIHB@
select "ɍsȂiRVXցj",*elefrag379,"ɍsȂiRWOցj",*elefrag380

;----------------------------------------
*elefrag378

savegame 99

gosub *r_tear
@@@RVW
br

gosub *choice_flag

select "w̃tOɃ`FbN̂ȂiRXTցj",*elefrag395,"΁iRXUցj",*elefrag396

;----------------------------------------
*elefrag379

savegame 99

gosub *r_tear
@@@RVX
br
@LʉkaIHB@
@㍏wΏ́ErxߐlIB@
@VOCvLQlӓIB@
select "kȂiRWPցj",*elefrag381,"ȂiRVUցj",*elefrag376

;----------------------------------------
*elefrag380

savegame 99

gosub *r_tear
@@@RWO
br
@i[ԁCAœL꘢gFt̓I򐅁Cȋy꘢ΐFt̓I򐅁B@
@Ȋߍ򐅁Cȝَ엣JB@
@LHʉB\
select "ԂނȂiRXVցj",*elefrag397,"΂̐ނȂiRXWցj",*elefrag398,"ɍsȂiRVUցj",*elefrag376

;----------------------------------------
*elefrag381

savegame 99

gosub *r_tear
@@@RWP
br
@䗈꘢sHB

gosub *choice_flag

select "x̃tOɃ`FbN̂Ȃ΁iRXXցj",*elefrag399,"̂Ȃ΁iSOOցj",*elefrag400

;----------------------------------------
;n_`A\
*elefrag382

savegame 99

gosub *r_tear
@@@RWQ
br
wLIx\

@݉i[ԓIuԁC]CˑRLY݌ĊB@
umIV́CvmILB̎C䏫\꣏ǋLIIv@
@ߓԘbCNB\

@ډCIʑOB@
@LZeC񓚔V@IB@
@yD@CAȓ_B\

;lsp 30,"qw01.bmp",200,200 : print 1
;delay 100
lsp 30,"qw02.bmp",200,200 : print 1
delay 100
lsp 30,"qw03.bmp",200,200 : print 1
delay 100
lsp 30,"qw04.bmp",200,200 : print 1
delay 100
lsp 30,"qw05.bmp",200,200 : print 1
delay 100

csp 30
print 1

@ėꎟC䍄˕ꍱxB@
@yD@CAȓ_B\

;lsp 30,"qw01.bmp",200,200 : print 1
;delay 300
lsp 30,"qw02.bmp",200,200 : print 1
delay 300
lsp 30,"qw03.bmp",200,200 : print 1
delay 300
lsp 30,"qw04.bmp",200,200 : print 1
delay 300
lsp 30,"qw05.bmp",200,200 : print 1
delay 300

csp 30
print 1

@L嚒IC{H@

select "`Fꖇ",*elefrag402,"aF񖇖",*elefrag401,"bFO",*elefrag402,"cFl",*elefrag402

;----------------------------------------
*elefrag383

savegame 99

gosub *r_tear
@@@RWR
br
@HB\

@ߗLIF򐅁B@
@򐅝ӓIΔʒFwɐF͈ށC∐FJxB@
select "N͂̐򂩂畦łiSORցj",*elefrag403,"܂Ɍ̏ꏊɖ߂Ă܂ȂiRWPցj",*elefrag381

;----------------------------------------
*elefrag384

savegame 99

gosub *r_tear
@@@RWS
br
@ȉaB@
@ʉIH핕Cŗߌoٖ@񓪗B\

gosub *choice_flag

select "ỹtOɃ`FbN̂ȂiSOSցj",*elefrag404,"ĂȂ̂Ȃ΁iSOTցj",*elefrag405

;----------------------------------------
*elefrag385

savegame 99

gosub *r_tear
@@@RWT
br
@HB\

if %15==3 goto *elefrag385a

select "͓ɂɂȂiRWSցj",*elefrag384



*elefrag385a

@AAݔC蒆IˑRoꐺsIB@
@ה˔@Iό̊LbC݉䌴ȈאHInCVIHɊɒnŊJB@
@C׉䎝Lc펧IwꝁH\

select "N͊Jꂽkւ̓iłiRXRցj",*elefrag393,"ɖ߂ĂiRWSցj",*elefrag384

;----------------------------------------
*elefrag386

savegame 99

gosub *r_tear
@@@RWU
br

gosub *choice_flag

select "`̃tOĂ̂ȂiSOUցj",*elefrag406,"ĂȂ̂Ȃ΁iSOVցj",*elefrag407

;----------------------------------------
*elefrag387

savegame 99

gosub *r_tear
@@@RWV
br

gosub *choice_flag

select "ãtOĂ̂ȂiSOWցj",*elefrag408,"ĂȂ̂Ȃ΁iSOXցj",*elefrag409

;----------------------------------------
*elefrag388

savegame 99

gosub *r_tear
@@@RWW
br
@a

gosub *choice_flag

select "b̃tOĂ̂ȂiSPOցj",*elefrag410,"ĂȂ̂Ȃ΁iSPPցj",*elefrag411

;----------------------------------------
*elefrag389

savegame 99

gosub *r_tear
@@@RWX
br
@HB\

@䊴aCŗLXbB@
uiPVegVnC٘_C꣓ssǗʑꠁv@
@R@CLYeqCoݗIʑOB\

select "키̂Ȃ΁iSPQցj",*elefrag412,"̂Ȃ΁iRWWցj",*elefrag388

;----------------------------------------
*elefrag390

savegame 99

gosub *r_tear
@@@RXO
br
@[ԓICyIB@
@R@Cg@IHˑR֕Cŗߌoٖ@񓪗B\

@粊svcC粑ߑCL꘢I漍BB@
@ݑI͕lƔCʕ`GIāB@
@䐄CYvIƔCR@Ɠߘ漍BꠁB@
@s߁CāC䑍oDꖙX߁CDv߁ccH\

ꖇIŁAڂ݂ɂ͂߂݂܂
click
lsp 51,"mahoujin1.bmp",10,30
lsp 52,"mahoujin2.bmp",270,30
lsp 53,"mahoujin3.bmp",10,290
lsp 54,"mahoujin4.bmp",270,290

spbtn 51,1
spbtn 52,2
spbtn 53,3
spbtn 54,4

;RXP[g
*mahoujin
btnwait %0

if %0==-1 goto *mahoujin
if %0==0 goto *mahoujin
if %0=1 goto *elefrag414
if %0=2 goto *elefrag391
if %0=3 goto *elefrag413
if %0=4 goto *elefrag415


;----------------------------------------
*elefrag391

savegame 99

gosub *r_tear
textclear
@@@RXP
br
w^UIx\

@݉䓥[ԓIuԁCLYˑR݉I]CĊB@
u^IV́CvLIώ@́BCᏫ\꣏Ǌώ@͓IIv@
@ߓbC䝲DːB\

@ډC꣓IʑOB@
@IoB꘢sKÍB\

@OĂ̂Iׁ
click
lsp 51,"d7.bmp",10,30
lsp 52,"d4.bmp",270,30
lsp 53,"d6.bmp",10,290
lsp 54,"d3.bmp",270,290

spbtn 51,1
spbtn 52,2
spbtn 53,3
spbtn 54,4

*dice_riddle
btnwait %0

;RXQ[g

if %0==-1 goto *dice_riddle
if %0==0 goto *dice_riddle
if %0=1 goto *elefrag416
if %0=2 goto *elefrag416
if %0=3 goto *elefrag416
if %0=4 goto *elefrag392


;@Ō̓䂩@
;select "iRXQցj",*elefrag392,"siSPUցj",*elefrag416

;----------------------------------------
*elefrag392

gosub *r_tear
@@@RXQ
br
uDC꣐ʉߗv\

@Ib񋿒CꓹIˑR꣖ʑONB@
@׎~꒼Ȉ׋وꕨInCˑRҒnꉺRȁC樉YwoB@
@uԁC꣎͓Ii歑RρB\

uޏIrߒf⋖vBГyn[IV͖ߒ؁CsċL{IӋ`BAvCAK{樉䌩꣓I͗ʁBꠁC\N꣓Iv@
@꣙ߘIbCˋNC^ΎΛB\

@\\B
br
br
@Aō@IB\

@DlFhgV\

mov %20,19
gosub *battle_ste

select "iSQPցj",*elefrag421

;----------------------------------------
*elefrag393

savegame 99

gosub *r_tear
@@@RXR
br

gosub *choice_flag

select "s̃tOԂȂ΁iSPVցj",*elefrag417,"s̃tOȂ΁iSPWցj",*elefrag418,"ĂȂ̂Ȃ΁iSPXցj",*elefrag419

;----------------------------------------
*elefrag394

gosub *r_tear
@@@RXS
br
@BUaݒn\

@DlFόV\

mov %20,20
gosub *battle_ste

select "iSQOցj",*elefrag420

;----------------------------------------
*elefrag395

gosub *r_tear
@@@RXT
br
@IGlߌoœ|Cߌo藹B@
@vYʗvICvLYIB@

select "͍s~܂AɂiRVUցj",*elefrag376

;----------------------------------------
*elefrag396

gosub *r_tear
@@@RXU
br
@GlCoB\

@DlF[Ԏq\

mov %20,21
gosub *battle_ste

select "iSQXցj",*elefrag429

;----------------------------------------
*elefrag397

savegame 99

gosub *r_tear
@@@RXV
br
@䊅gFI򐅁B@
#FF0000i݂sIŏgFIj#FFFFFF@
mov %189,1
select "N͗΂̐𑱂ĈłǂiRXWցj",*elefrag398,"̏𗣂ĂǂiRVUցj",*elefrag376

;----------------------------------------
*elefrag398

savegame 99

gosub *r_tear
@@@RXW
br
@䊅ΐFI򐅁B@
#FF0000i݂sIŏ㗕FIj#FFFFFF@
mov %189,2
select "N͐Ԃ̐𑱂ĈłǂiRXVցj",*elefrag397,"̏𗣂ĂǂiRVUցj",*elefrag376

;----------------------------------------
*elefrag399

savegame 99

gosub *r_tear
@@@RXX
br
@IGlߌoœ|Cߌo藹B@
@vYʗvICvLYIB@

@ȉAAOB\
select "ɍsȂiRWQցj",*elefrag382,"ɍsȂiRWRցj",*elefrag383,"ɍsȂiRVXցj",*elefrag379

;----------------------------------------
*elefrag400

gosub *r_tear
@@@SOO

@GlCoB\

@DlF[Ԏq\

mov %20,22
gosub *battle_ste

select "iSROցj",*elefrag430


;----------------------------------------

;----------------------------------------
*elefrag401

savegame 99

gosub *r_tear
@@@SOP
br
ukDC꣓ΗBꠁCX[Oiꠁv\

@꣑Γߋb__C׎~ߓIHJnɊɕB@
@䉞YݑOiCpL호w@CQQN⋫IoB@
select "₪ɂ܂ْɁAN͂ɋC߂iRWSցj",*elefrag384

;----------------------------------------
*elefrag402_cg
bg "bg_04san.bmp",3

*elefrag402

gosub *r_tear
@@@SOQ
br
@꣍Ȉה͓ˑRNIؑpÍCrAoʓI쑐CLowwIB\

@꣍QZnzJCA꣔\ꊈI䗈͓ߔ퓡ܖB@
@꣉ӎnNzv΁CAВnꐺLCyՋnZZ꣓IlCD꣓IRB@
u\ccIv@
@iZٗIrCDg̓I哱B\

gosub *ev_window
bg "a014a.bmp",3
mov %914,1

@QICSIAog`CߞSԔݗIԁB\
@䍄ozՈٓ\݉I畆CAAJnxnNB\
uYAYꟁccBMAMsccIv\
@OSI^asvcIvDICAˑRϗIԁB\

bg "a014b2.bmp",3

@ΚaccIΎcc\
uBޙIHv\
@IԔѐC^t̘AoCҒnIAB\
@ʑΒMC[ۊISt́CwőSgეʓIٞ銴oPB\
uꟁccsvccccHv\
@ߕsvcIofݗoIߖB\

bg "a014b.bmp",3

@ђ]I^ቺCߞSԐݝCXIt̕sfI̓B\
@߉t̖nAnA嗹ICgSgIoB\
@ݔ풍L[ŖIt̓IvCg̒pȒRI͔픍DB\
uށccݚjABccꟁAꟁAsAssccATTjAjccIATꟁAꟁAsvꟁccTAccsvccv\
i׏Yo[VIccݔNƁccj\
@zvے蔇ݎȊŗ犮Ss헝IہCApslÁCINB\
@SzIvꝁCAݔ픍DR͓IvC߉t̔iI̓B\

bg "a014c.bmp",3

uvjccBꟁAjccTATAꟁAꟁAjꟁAꟁAꟁccTjAjccTAvAvفccUoccUoꟁccv\
@ݒʓIt̍@CAJ꣓IԁB\
@uIFt̝fNCAҒnꉺB\
ujꟁccꟁccv\
@꣈E͊᎞Cғ˔@IӐNPꣁC꣓Iӎ璀Qϓ͌ЕsB\
@svC꣓Ig̏蜓iPIꑖCߋg̑וcCsoVIAꠁB\
@꣏AAnccB\

if %99==1 goto *eles_0

goto *gameover

;----------------------------------------
*elefrag403

savegame 99

gosub *r_tear
@@@SOR
br
@꣔cLiC之N򐅊B@
@ݔԓ_Cs@eYgFAFCҖIOvVB\

gosub *choice_flag

select "s̃tOɓĂ̂Ԃ`FbNȂiSRTցj",*elefrag435,"s̃tOɓĂ̂`FbNȂiSRUցj",*elefrag436,"s̃tOɐȂēĂȂiSRVցj",*elefrag437

;----------------------------------------
*elefrag404

savegame 99

gosub *r_tear
@@@SOS
br
@IGlߔœ|CߓB@
@vLYʗvICvLYlӓIB@

@ȉaB@
select "ɍsȂiRWTցj",*elefrag385,"ɍsȂiRWUցj",*elefrag386

;----------------------------------------
*elefrag405

gosub *r_tear
@@@SOT
br
@oCGlB\

@DlF[Ԏq\

mov %20,23
gosub *battle_ste

select "iSRPցj",*elefrag431


;----------------------------------------
*elefrag406

savegame 99

gosub *r_tear
@@@SOU
br
@IGlߔœ|CߓB@
@vLYʗvICvLYlӓIB@

@ȉkAaB\
select "k֍sȂiRWVցj",*elefrag387,"ɍŝȂiRWSցj",*elefrag384,"ɍŝȂiRXOցj",*elefrag390

;----------------------------------------
*elefrag407

savegame 99

gosub *r_tear
@@@SOV
br
@厨SIoC䔇粁Cl騍싿C㉺hWǵC݈ЊdB@
@ʑΒsŎZ䑖IΎC\\N^VΛB@

@DlF厨SI\

mov %20,24
gosub *battle_ste

@DII@
@߉|@Cg̊nRȒC粊󉺋C粓|ݗn#FF0000iI`Iej#FFFFFF\
mov %170,1
;mov %196,1
select "ČN͌yA𐮂iSRWցj",*elefrag438



select "łȂ̂Ȃ΁iSRQցj",*elefrag432

;----------------------------------------
*elefrag408

savegame 99

gosub *r_tear
@@@SOW
br
@@IGlߔœ|CߓB@
@vLYʗvICvLYlӓIB@

@ȉka쑖B\
select "k֍sȂiRWWցj",*elefrag388,"ɍsȂiRWUցj",*elefrag386

;----------------------------------------
*elefrag409

gosub *r_tear
@@@SOX
br
@nʗNCnso꘢B\

@DlFۚ\

mov %20,29
gosub *battle_ste

mov %171,1

select "|iatOɃ`FbNāj",*elefrag433


;----------------------------------------
*elefrag410

savegame 99

gosub *r_tear
@@@SPO
br
@ߌoCݔYsvLB\

@ȉa쑖B@
select "́iRWXցj",*elefrag389,"́iRWVցj",*elefrag387

;----------------------------------------
*elefrag411

savegame 99

gosub *r_tear
@@@SPP
br
;@a\

wx\

@@i[ԓIuԁCI]CˑRLY݌ĊB@
umIV́CvLmI@BC䏫\꣏ǖ@IIv@
@ߓԘbC䝲DːB\

@ډC꣓IʑOB@
@Io@sI߈꘢B@
@꣏yDIbAȓ_B\


ꖇ[ƈႤ̂遄
click
lsp 51,"qw01.bmp",10,30
lsp 52,"qw02.bmp",230,30
lsp 53,"qw03.bmp",10,290
lsp 54,"qw04.bmp",230,290

spbtn 51,1
spbtn 52,2
spbtn 53,3
spbtn 54,4

*nagare
btnwait %0

;SSO[g

if %0==-1 goto *nagare
if %0==0 goto *nagare
if %0=1 goto *elefrag440
if %0=2 goto *elefrag439
if %0=3 goto *elefrag439
if %0=4 goto *elefrag439


;----------------------------------------
*elefrag412

gosub *r_tear
@@@SPQ

@DlFiVe\

mov %20,25
gosub *battle_ste

;@|ĂƂ̌olɓȂB@

select "͓ɂsȂiRWWցj",*elefrag388

;----------------------------------------
*elefrag413

gosub *r_tear
textclear
@@@SPR
br
@IP@

@䑖ݘHCshrLKB@
@sRJ|ݒnCRrí̗F_j@

sub %12,2
if %12<0 mov %12,1
gosub *tear_hpc

select "₪Ă̂܂ܓĂƍLɏoiRWWցj",*elefrag388

;----------------------------------------
*elefrag414

gosub *r_tear
textclear
@@@SPS
br
@IQ@

u߉smꡁv@
@粓`ICOIJnڐ`B@
@񓪑zŊŔ\ۓCAޘHߔgCŗs{B\

@DlFҔVe\

mov %20,26
gosub *battle_ste

;@|Ăol͔\

select "ē̐́cciRWVցj",*elefrag387

;----------------------------------------
*elefrag415

gosub *r_tear
textclear
@@@SPT
br
@ߊȒACIg̈ȋlICݐΓIinsB@
@vꖗꡁH\
@^⍄݉]CMߓIuԁCAŌOCIso꘢VIBݍڋ߁C\ŏoIO[IB@
@QZL苎AEI୕ǎ≺CA୕Ǖ\ʌ@C{ٖ@ؗ͒ZB\
@vlYCA{zso\݈uԕR]ǖʓI@B@
@V|s๘nC꣓߉Ig̋hB@
@꣓I|s๘nѐg̒SB\

goto *gameover

;----------------------------------------
*elefrag416_cg
bg "bg_04san.bmp",3

*elefrag416

gosub *r_tear
@@@SPU
br
@꣍ow@LYCߓ֍꣎@ooOC꣕ߊlB\

@ٔICȋyꕛ哾svcA\꣊SZÍB@
@꣔툳|IʈesCΕ\NߋʁCyՋn꣓Ig̋NB\
@꣓IύCْnJ舗NB@
@ݔsvcIvC꣓Ig̓ˑRYʁB@
@꣓|zyI߁Cߘh꣓IǵB\

gosub *ev_window
bg "a016a.bmp",3
mov %916,1

uꟁI@ɁABBBBBBBBBBBBBIv\
@h߁AߕCsRnٗNB\
@흇ߓIAsRngJC@ےzɌ흙IΚoC꣓I]C񋿁B\

bg "a016c.bmp",3

@ӎ݈uԔĒfCFIt̘ԈoB\
@^꣐ۊҗLӎيցC͋͐튯݈|I\͖ʑOuԋIؖB\
uccꟁccccꟁccv\
@꣊ᒆIʛߌoSC挻oߎʎIeB\
@RCCҕsB\

bg "a016b.bmp",3

@꣑fI؋ʌTCtIOoB\
@꣓I{OWCݐYCAߕsߐݝًx~nosIߖ뗹B\
@ݎsI`ҁCH@ߎSB\
@꣏IݐlIō@ꍏ𗹁Cى~IccB\

if %99==1 goto *eles_0

goto *gameover

;----------------------------------------
*elefrag417

gosub *r_tear
@@@SPV
br
@꣓Ig̓ˑRJn靁CϓȔEB@
@吏kNg̎CSgAΈʁCȋlIJnB@
@꣑zݖ@nEϒCA꘢Gloݗ꣓IʑOB@

@ʑΓGlC꣝ٔ\ח́CAcEnEQccB\

goto *gameover

;----------------------------------------
*elefrag418

savegame 99

gosub *r_tear
@@@SPW
br
@͖햟JI꣊LCsߎsWV啝xIsB@
@AݔI꣓IʑOCGloB@

@DlFqm\

mov %20,27
gosub *battle_ste

@V@C꣓IʑOoHB@
@ȉa쑖B@
select "́iRXSցj",*elefrag394,"́iRWTցj",*elefrag385

;----------------------------------------
*elefrag419

savegame 99

gosub *r_tear
@@@SPX
br
@͖햟JI^󟃗ߐlCg꣓IB@
@A꣓Ȏg͟ICGloB\

@DlFqm\

mov %20,28
gosub *battle_ste

@V@C꣓IʑOoHB@
@ȉa쑖B@
select "́iRXSցj",*elefrag394,"́iRWTցj",*elefrag385

;----------------------------------------
*elefrag420

gosub *r_tear
@@@SQO
br
mov %956,1

@蒆ICꎟꎟnaΕIǵB@
@݉dِaV@CߖGlI݉ʑO|B\

@Ύ蜟ِn݉ʑOC݉ʑOC{KFIcΐΓB@
@cN@C߉KFIΓA݉ʑO׏IqCGUB\

@b񗈁C꣊ҋLꝁH@
@̎JC꣖{ݔJVK\Iߘׁ̈w⎸xIB@
@Cˍ꣖ʑOI߉ΓCː^I⎸B\

@{[I쏊\IVC߈ʐ얈NꎟЖCאlїxB@
@ARޏsđO_CgI݈Ӌ`CŏIqB@
@hߖ䐸IC⎸B\

@AC٘_ꣁCҐICsِlmŁB@
@A@ݔ鉻엱qUʁC꘢ߏnYAI̎B\

@ؕō݈ʁCEJC`𓹘HB@
@CחqVI`CĎ簏orB@
@粍ݕsmsoڎ󗹈⎸cIAꏖzVIӎuC粌pOiB\

`mnsgdq@dmc\

textoff
goto *title

;----------------------------------------
*elefrag421

gosub *r_tear
@@@SQP
br
@Ύ啝NߊŎ]IʁCؒ|snꉺBꎟꎟn󒅔UCSrOo^Cȋ\۝DOˑR啨B@
@AC֔@꣘]Cꌂꌂddn@ἘB꣌ďoCpSgIdʁC׌|ΎB@
@꣑꘢nA✐ْndB\
wccAccYccccx@
@ߌoLs{UBA݉@ꌂIuԁCOIΎRoB\
@꣑Δ˔@IωLbCsRoːCOIΎߙˑIgJnɊɌX΁B꣈זƔɓӎ@ގCAfI؋ʓ|B@
u쑩nIYCIIgB_Tԏ㐔Cω񕁒ʓIXꠁv\
@C꘢g␉ΐF䊓IݏoݗIʑOB@
@s꣑ΓߌPbCA꣉B񖾔CAnIeB@

select "킢I𗝉AɂސĝE͂ȂN͕܂iSQQցj",*elefrag422

;----------------------------------------
*elefrag422

gosub *r_tear
@@@SQQ
br
uØVI_ݍ鍐ICݍSVI_ꠁv@
@ߐ_C@̔ʋn鍐B\
@IKߔsePCsĐlICח^lICSVI_B@
@꣓I`wyIɊCAk֕B꣓IBUo_aIΐF䊁CߌPɊɒnUB\
@ꍏNC꣐חVI_ҁC׈ꖼgC簏oΐVIB@
@ڒCߍn掺ʋԓI؁CꕔJnɊɗJCJ焏o𓹘HB@
u_ꟁCgΐVPVlꟁB䏫JЕIECᵖCw꣘OSVIv\
@َCS֛ߗ̉B@
@^꣔VԒ_C꣈ȖIF͎C։؋꣗͗ꠁB@
@꣏ߑ]ܗ͗ʓIp͋وꎟC󒅍꣑̓HI쟃BҕsvcIoœ`՗SgB\
@g̕ϓLymC簏oIΐV狭ĹB@
@꣍ݐIC㗹OJ焏oIHB@
@їIؕōݏjꏛΐVI_C}CDD싿Cto_aIFBߗRِ،`IiC꣍ŏIB_a䊓IoB\

gosub *ev_window
bg "a020a.bmp",3
mov %920,1

@OܓWJIsiFC[cŔVB\
@ݖ^ID]VCV挻o∎FCDatIgBwwI]SɋȒCԏoߐlzgQʓIFʁB\
@ቺ꣎ߓI^XсC琳ߕŗvEIgFPƗB\opȓIor߁Coٔ䅐hIrC]Cp[PB\
@SɊɖIGC񐥊ꌏ@YIAꝁH\
@smI_C_nc_jB꣊oLyCpߎRRnNCCGB\
@꣏ЕܖIiFC[[nA[[nݐSB\
@ꟁC꣈sYLꍏIB\

@svV@CЍݐERVIuԏWIiFC珫IeB\
@꣖珫RCSVI`rꠁB\

@A݁C揫ߓIiC[[nA[[n󘰐S\\\

	dmc\

textoff

;̍F_
mov %951,1

goto *title


;----------------------------------------


;----------------------------------------
*elefrag423

savegame 99

gosub *r_tear
@@@SQR
br
@꣏HvIwCkynAB\

u}ՁCv@
@ߗLposIȂԋɈJILC꣓bB@
@꣑ΔiۊLbCyyȗȉ򕍋ߓIŔC꣐B\

wpF╼Ox@
@^Ce|XڗRCsߊmȌB@
uꋈӉ@ꡁCHv\

@L@⓹B@
@꣐SzCvAiCY\̗́CmLꠁB@

select "ȂiSQSցj",*elefrag424,"ȂȂiSQTցj",*elefrag425

;----------------------------------------
*elefrag424

gosub *r_tear
@@@SQS
br

mov %965,1

@꣏pLi╼FOjCriB\

sub %100,3
if %100<=-1 mov %970,1 : mov %100,0
gosub *tear_m

gosub *ev_window
mov %6,1
bg "a017a.bmp",3
mov %917,1
click
bg "a017b.bmp",3


@꣍ݍXߎEߕADZbCR@Ԑg̒niB\
@嫑RoLyCASgZM@CҒgӊɊɟCg̖QQKNB\
@Igg̍Ő[CA튴oꠁB\

uC{XIҁv\
@ߐ_CL꣒[tޗtIB꣓ӁCtsB\
@їIKC㍱𐸓IpC꣓ISɓ_B\

@ݔԎIyVC꣊oSgIJs|󗹁í̗F\_j\

add %12,10
if %12>=%11 mov %12,%11

mov %6,0
@ݑSgsgaN@C꣍Ď㗹ߕ^ZbB\


select "LɕʂA`𑱂iSQUցj",*elefrag426

;----------------------------------------
*elefrag425

gosub *r_tear
@@@SQT
br
@꣍iLC꣊ҐrsA򗹁B\

uꝁC߉^⊶BLIbėꠁv@
@ߓC꣉񓚓藈B@

select "ČN͖`֖߂iSQUցj",*elefrag426

;----------------------------------------
*elefrag426
bg "bg_01for.bmp",3
gosub *tear_w
gosub *tear_hpc
gosub *tear_m
setwindow 25,25,20,20,23,23,0,20,20,0,1,":a;text_window.bmp",0,0
mov %9,0
texton
gosub *r_tear
@@@SQU
br
@ŗ꣔VO㗹𛩘HCAƗՕʎLi꣓IHC꣜kynA񓞗{IoRB\

@꣍ĎΓߑLSB@

select "Ă܂ւƁBiPRUցj",*elefrag136

;----------------------------------------
*elefrag427

gosub *r_tear
@@@SQV
br
@ՐCiT瘸pFߒڏji╼F\j꣓ӁB@

add %100,10
gosub *tear_m

select"ďlɎUēiގɂiQOցj",*elefrag020

;----------------------------------------
*elefrag428

gosub *r_tear
@@@SQW
br
@꣑ŎZߋC@ޗ{CoIB@
@꣈粗SrLD^InʁC粖ҒnOoC粉ΖʒߋB@
@꣓IxDCŗI瑫ꗹB\

@A꣓Ig̊ceō_C啟|ِnoݗ꣓IOB@
@ݔ󒆁CђtI꣍{ٖ@JCg̓ڎtCēVB@
@אݒnC꣊ŕsLYCg̏A@zKÈꑗB\

@꣐LoCnzvএoB@
@A꣐LoIwqVIdC{QsȝSZInB@
@I}D꣓ỈC_VL꣓IzB@
@^蓐MˁCs@g̈⎧QesB\

@꣕nċ~CAn{sLlEB@
@꣊g̒QϗCSg疝sߎgB@
@ߗiԍ@CӎI꣓IǵC։}YݐI^ꠁccB\

goto *gameover

;----------------------------------------
*elefrag429

savegame 99

gosub *r_tear
@@@SQX
br
@D[ԎqI#FF0000iIwWLj#FFFFFF@
mov %193,1
select "͍s~܂AɂiRVUցj",*elefrag376

;----------------------------------------
*elefrag430

savegame 99

gosub *r_tear
@@@SRO
br
@D[ԎqI#FF0000iIxWLj#FFFFFF@
mov %194,1
@ȌAa쑖B\
select "ɍsȂiRWQցj",*elefrag382,"ɍsȂiRWRցj",*elefrag383,"ɍsȂiRVXցj",*elefrag379

;----------------------------------------
*elefrag431

savegame 99

gosub *r_tear
@@@SRP
br
@D[ԎqI#FF0000iIyWLj#FFFFFF@
mov %195,1
@ȌaB@
select "ɍsȂiRWTցj",*elefrag385,"ɍsȂiRWUցj",*elefrag386

;----------------------------------------
*elefrag432

;gosub *r_tear
@@@SRQ
;br


;iSRRցj

;----------------------------------------
*elefrag433

savegame 99

gosub *r_tear
@@@SRR
br
@œ|nIB@

select "k֍sȂiRWWցj",*elefrag388,"ɍsȂiRWUցj",*elefrag386

;----------------------------------------
*elefrag434

gosub *r_tear
@@@SRS
br
@꣍wpCXIo꘢{IΗei╼F|Tj@
sub %100,5
if %100<=-1 mov %970,1 : mov %100,0
gosub *tear_m
uӜځC꣔Dꟁv\
@A꣔V@ˉmCcpvLYꖂ@CcيI򓁎߁B@
@ΘZpIlCmꌏ֗ICA꣎CsߐꌏJA\sIB@
@CAZc꣓IiCݖ`TsLgpIꠁB\
@ccvC@꣖ߗC\ΗꠁB@

select "𑱂悤iQTVցj",*elefrag257

;----------------------------------------
*elefrag435

gosub *r_tear
@@@SRT
br
@̗͉i̗͉T_CsWLIIj\

mov %189,0

add %12,5
if %12>=%11 mov %12,%11
gosub *tear_hpc

select "ǂ܂Ȃ̂ňԂɂiRWPցj",*elefrag381

;----------------------------------------
*elefrag436_cg
bg "bg_04san.bmp",3

*elefrag436

gosub *r_tear
@@@SRU
br
@sm׉C꣓Ig̖ოٖ@eC|B@
@꣍ĎӎClߌoGZZB\

gosub *ev_window
bg "a019a.bmp",3
mov %919,1

@꣓Iߕ흙jCg̊Sٖ@eCʑΔʈӋ`ߊlIԁC꣋b|zyB\
uccYccccv\
@RI^╂ݔ]CEoCAvLl\ꣁB\
@Lb󓴒n񋿒CΘesIvC꣐rNB\
uJC꣔ƚccJꟁIv\
@݈ߕϓjjࣁA튯S\IIԉC嫑RTsCAҐrB\
@Aߍ_xnٓ\畆IGCŊSs꣓IReʁCp꣓IlB\
@݊ҕsYIvC꣓ˑRoLG\ߗ꣓Ia{pB\
@꣊CːnkNgqCAxI쓖Rٖ@jVGIsB\
@yՋnCN꣓IǵB\

bg "a019b.bmp",3

uꟁccsccsvꟁccccI@ꟁccBAꟁccDADɁccAʁccqccDꟁIv\
@sJnNIGCђҕŗvj꣐g̓ICѐ꣓IA[B\
@@ʉsIꌂCŗv{AǈʒnhCe\nIGCٕI𒣒nAJB\
@ʑΒҕŔ\樌yJItC꣏oߖAɋBHVOCYsB\
iv{ccI鉺ccߚIccIj\
@꣎lIC\ʌIGGѐICΓIGB\
@ߍѐAِΓIGCȒAחNƛߚڈIg̎ݓIB\
@ߍʕsI΁CړICAǁC݈חe\ng従B\
@svCߍ従IGCˑRsRnבݑIt̎˗oB\

bg "a019c.bmp",3

uIΚGIHv
@݌C݉ACIt̙{퓯ˏoB\
@߉t̗^jB풆ˏoItɈבCuIŗvZㅏZ꣓I]ʌ꣏PB\
@˓꣑̓It́Cߍ~IGChM꣓Io^AǁB\
iYccccꟁC펖ccccsvA}ccssvccccꟁj\
@g꣍ݔ]nےCZㅒlIGˋPʒnX꣓IǵB\
@꣊Sٖ@EC\iَ~nG莝ߘMB\

bg "a019d.bmp",3

@oߗiԍ@C꣛ߌoAvlssB\
@ӐgIt́CNC꣑\׈SҕsIԁCinݔꠁB\
@ߐ꘢ߘSIǁB\

if %99==1 goto *eles_0

goto *gameover

;----------------------------------------
*elefrag437

gosub *r_tear
@@@SRV
br
@YsvLC^ɁI\

select "ǂ܂Ȃ̂ňԂɂiRWPցj",*elefrag381

;----------------------------------------
*elefrag438

savegame 99

gosub *r_tear
@@@SRW
br
@ȉkAAOB\
select "k֍sȂiRWVցj",*elefrag387,"ɍŝȂiRWSցj",*elefrag384,"ɍŝȂiRXOցj",*elefrag390

;----------------------------------------
*elefrag439_cg
bg "bg_04san.bmp",3

*elefrag439

gosub *r_tear
@@@SRX
br
@h꣊OI؁CwJB@
@꣈׎ȓIĊSCy簕OiCYˑR꣖oߗ\

@ߓˑRIό́C꣖Ғn퐄|ݒnCߘAݗ꣓IgB@
@꣕RC엧gzcΕJCAߘpsvcnٓ\꣓IǵCs×JB@
@`]騚]験I吺꣊C꣎WǵCzvcΕߊJB\

gosub *ev_window
bg "a015a.bmp",3
mov %915,1

uݚjIv\
@ߊԏPIɁC꣕s֔oC󔽎ːnpSZΕIǵB\
@A꣔ߗC߉b튯IYߌoѐ꣓ÍC`wɁB\
@ђܔMIɊɏOCtΚanJn풍AB\
uꟁcc]]]BBBBBBBBAZccccIv

bg "a015b.bmp",3

@ٕNg̔VCkLYʓIviC꣊ٞ銴B\
@嫑Rs^v흇iIYCABƔ\ߓ|񓯐qB\
@sC^Cs@꣓I{\݈׍B\
usviꟁAsvߗAsvccߗꟁIIv\
@꣊oߓ݊ɊɕN߁CCߊŎ튯VIN琳݈ړB\
@t̔핬AICAҒnݕRꐺAJB\

bg "a015c.bmp",3

uccAꟁccccIIv\
@ݓߓIuԁC꣓I@z瓯`wɁB\
@꣑o]@ŗLYyJCOu蜓KÁB\

@ΕI܎qؒf꣓I_oC݈ӎҐIvC꣓Ig̐Q蜓SgჁB\
@꣓Ig̉AێPuCŏIˈהY݉IIaHB\
@AݔۚVOClდIꣁCAAێqsꠁB\
@ߎccA͍ߗB\

if %99==1 goto *eles_0

goto *gameover

;----------------------------------------
*elefrag440

savegame 99

gosub *r_tear
@@@SSO
br
@C꣓IOoꓹFIPBR꣖ʑO瞗C꣊oȕŌ׉zYB#FF0000ibIŏj#FFFFFF\
mov %172,1
@ȑO粘a粁B@
select "́iRWXցj",*elefrag389,"́iRWVցj",*elefrag387


;----------------------------------------
*elefrag441

savegame 99

gosub *r_tear
@@@SSP
br

mov %961,1

@꣎蒆ICRԒ]o䊁B\

@꣋bnᓪŌ蒆C{IgJnhN䊁CԖ꣊O򑬓|B@
@SЕДCc@刔ʑNNIoݗ꣓IʑOB@
@ʑΔ@NIʁC꣑\sRoꐺ^QB\

mov %122,0

select "N͂̌𑕔ĂǂiSSQցj",*elefrag442,"قɕ[ĂǂiSSRցj",*elefrag443


;----------------------------------------
*elefrag442

savegame 99

gosub *r_tear
@@@SSQ

mov %15,3
br
@꣏dVc투ݎ蒆C֊ccŐIl݋ӊʓIoB@
@oCA꣑oBilFj\

add %13,1

select "ӂ̌tqׂĐ֌iPRUցj",*elefrag136


;----------------------------------------
*elefrag443

savegame 99

gosub *r_tear
@@@SSR

br
@ה{AsꣁC꣙r菫ݔKB\

@aIPC@蜓ꑐʋAꑎB@
@䒍ԌiەЍC@rp`B@
@ה\eϒI瑁CB@

add %13,1

select "̌tR炵āA߂Đ֌iPRUցj",*elefrag136



;----------------------------------------
*elefrag444

savegame 99

gosub *r_tear
@@@SSS

@IߌoCvLYʓIB
@ȉa쑖B@
select "́iRWXցj",*elefrag389,"́iRWVցj",*elefrag387

;----------------------------------------
*elefrag445

gosub *r_tear
@@@SST
br
@ʒDړIgCŒAŗvZʁBA^C[ƎIB@
@ًوZcZCyyȊmF芴B\

@핍@VޓI͗ʁCyyCZ֎U__MIuB@
@czےX̎Co^svcB#00FF00iFWZj#FFFFFF@

mov %15,8

select "N͎͂߂ČnBiSSUցj",*elefrag446


;----------------------------------------
*elefrag446

gosub *r_tear
@@@SSU
br
@Д捏xzIynCU㫍ݐ_I͒C͓IXѐr@ޗHYiʁB\
uHu\NĎLlC{ȈאޏIccŗ@v@
@A݉bVCORoЖCB񌰌o꘢leʓI֊fB\
uT_ccl̔JVKBC琥\V͓InBSL]C֎\꣎BA߉SIGv@
@ߗΕIbC嫛ЍCAҐiCߗLoCÈӐڎ󎎗B@
u䏫\꣎OC꣒ʉߔVC։\꣐V́v\
select "le͂̂܂܏ĂiRVVցj",*elefrag377

;----------------------------------------
*elefrag447

savegame 99
gosub *r_tear
@@@SSV
br
@`BȜÈӒDIrS@C֖oNCݗOI}B@
u꘢֘^ʗlCroI̎v@
@ACJno藹B\

@߈ʗlLvꕪB@
@lIʑOCoILB@
uwLS\lLxCIlΗlB@
@ߛClvԑ˔\LꡁH@
select "`FS\l",*elefrag449,"aF܏\",*elefrag449, "bF܏\",*elefrag449,"cF[",*elefrag448

;----------------------------------------
*elefrag448

savegame 99
gosub *r_tear
@@@SSW
br
@݉oč@COIؕŒnꕔB@
uvCגIlߌoiėBAC{vLIKvv\
@ܒnꐺWJNB@
ufzfk슽CȑOouIwq߁v@
@CkfzfꝁH@
@fzf슽ޓIʁC݌̎a``ߐߓICs֗LbB\

uߛCߋꠁB]꣔\pIuv@
@񏡍xCݗєVB@
@䓥㗹OJ焏oIHCŔ푴ʌOB@
@ߗLIacB#FF0000iIfIj#FFFFFF\
mov %176,1
wL꘢ICz`LnI`ҁB]꣔\ёcAI썰C]Ll\p䔇isITS^`_xB@
select "mʐl̈⌾𕷂ČĂȂ΁iPXSցj",*elefrag194,"ĖȂ΁iPUXցj",*elefrag169


;----------------------------------------
*elefrag449

gosub *r_tear
@@@SSX
br
@䏫Đo@C粓IؕŒnB@
@ߗoLIHB\

uꠁv@
@ȒZnC֒JN򑖗B#FF0000iIfIj#FFFFFF\

@䘰HCsXAЊJ舒nB@
@䊴oL픜InCSٞCAZ񓪖]CˑߓIߏHߌosB@

select "ǂN͓ԈႦĂ炵iPUXցj",*elefrag169

;----------------------------------------

	
savegame 99
gosub *r_tear
@@@STO

;----------------------------------------


;eBÃXe[^XǗeBA\

;----------------------------------------
;ŏAeBÃXe[^X@݂܂B
*start_tear_ste

;eBA̍őgo
mov %11,30
;eBǍ݂go
mov %12,30
;eBA̍U
mov %13,1
;eBA̋Zp
mov %14,1
;eBA̕
if %15==0 mov %15,1

;Ă鐔
mov %100,10

;򑐂
mov %101,2

;bIɃeBA̕\═`Aɕʕ@ŋLqׂ
mov $11,"face01.bmp"

mov $14,"t_ata.bmp"
mov $15,"t_def.bmp"
;gosub *tear_hp
mov $17,"maxhp.bmp"

return

;----------------------------------------
;ẼeBAAgoA\
*r_tear

csp -1

gosub *tear_w
gosub *tear_hpc
gosub *tear_m

gosub *migikuri

return

;----------------------------------------
;ẼeBA\
*tear_w

lsp 5,"tati01.bmp",615,20
lsp 4,"tear_w.bmp",600,0
lsp 20,"tear_m.bmp",600,455
print 1

return
;----------------------------------------
;go\
*tear_hpc

gosub *tear_hpc_c

lsp 6,$17,680,525
lsp 7,$16,730,525
if %2==0 csp 6
print 1

return
;----------------------------------------
;\
*tear_m

if %100>=100 mov %100,99
gosub *tear_m_c

lsp 8,$21,615,460
lsp 9,$20,665,460
if %4==0 csp 8
print 1

return

;----------------------------------------
;eBǍ݂go\pϐɕϊ
*tear_hpc_c

mov %1,%12 : mov %2,%12
mod %1,10 : div %2,10

if %1<=0 mov $16,"cw0.bmp"
if %1==1 mov $16,"cw1.bmp"
if %1==2 mov $16,"cw2.bmp"
if %1==3 mov $16,"cw3.bmp"
if %1==4 mov $16,"cw4.bmp"
if %1==5 mov $16,"cw5.bmp"
if %1==6 mov $16,"cw6.bmp"
if %1==7 mov $16,"cw7.bmp"
if %1==8 mov $16,"cw8.bmp"
if %1==9 mov $16,"cw9.bmp"

if %2<=0 mov $17,"cw0.bmp"
if %2==1 mov $17,"cw1.bmp"
if %2==2 mov $17,"cw2.bmp"
if %2==3 mov $17,"cw3.bmp"
if %2==4 mov $17,"cw4.bmp"
if %2==5 mov $17,"cw5.bmp"
if %2==6 mov $17,"cw6.bmp"
if %2==7 mov $17,"cw7.bmp"
if %2==8 mov $17,"cw8.bmp"
if %2==9 mov $17,"cw9.bmp"

return

;----------------------------------------
;eBA̎\pϐɕϊ
*tear_m_c

mov %3,%100 : mov %4,%100
mod %3,10 : div %4,10

if %3<=0 mov $20,"cw0.bmp"
if %3==1 mov $20,"cw1.bmp"
if %3==2 mov $20,"cw2.bmp"
if %3==3 mov $20,"cw3.bmp"
if %3==4 mov $20,"cw4.bmp"
if %3==5 mov $20,"cw5.bmp"
if %3==6 mov $20,"cw6.bmp"
if %3==7 mov $20,"cw7.bmp"
if %3==8 mov $20,"cw8.bmp"
if %3==9 mov $20,"cw9.bmp"

if %4<=0 mov $21,"cw0.bmp"
if %4==1 mov $21,"cw1.bmp"
if %4==2 mov $21,"cw2.bmp"
if %4==3 mov $21,"cw3.bmp"
if %4==4 mov $21,"cw4.bmp"
if %4==5 mov $21,"cw5.bmp"
if %4==6 mov $21,"cw6.bmp"
if %4==7 mov $21,"cw7.bmp"
if %4==8 mov $21,"cw8.bmp"
if %4==9 mov $21,"cw9.bmp"

return

;----------------------------------------
;eBA̍őƌ݂goXe[^X\pϐɕϊ
*tear_hpc_cs

mov %1,%12 : mov %2,%12
mod %1,10 : div %2,10

if %1<=0 mov $16,"r00.bmp"
if %1==1 mov $16,"r01.bmp"
if %1==2 mov $16,"r02.bmp"
if %1==3 mov $16,"r03.bmp"
if %1==4 mov $16,"r04.bmp"
if %1==5 mov $16,"r05.bmp"
if %1==6 mov $16,"r06.bmp"
if %1==7 mov $16,"r07.bmp"
if %1==8 mov $16,"r08.bmp"
if %1==9 mov $16,"r09.bmp"

if %2<=0 mov $17,"r00.bmp"
if %2==1 mov $17,"r01.bmp"
if %2==2 mov $17,"r02.bmp"
if %2==3 mov $17,"r03.bmp"
if %2==4 mov $17,"r04.bmp"
if %2==5 mov $17,"r05.bmp"
if %2==6 mov $17,"r06.bmp"
if %2==7 mov $17,"r07.bmp"
if %2==8 mov $17,"r08.bmp"
if %2==9 mov $17,"r09.bmp"

mov %1,%11 : mov %2,%11
mod %1,10 : div %2,10

if %1<=0 mov $18,"r00.bmp"
if %1==1 mov $18,"r01.bmp"
if %1==2 mov $18,"r02.bmp"
if %1==3 mov $18,"r03.bmp"
if %1==4 mov $18,"r04.bmp"
if %1==5 mov $18,"r05.bmp"
if %1==6 mov $18,"r06.bmp"
if %1==7 mov $18,"r07.bmp"
if %1==8 mov $18,"r08.bmp"
if %1==9 mov $18,"r09.bmp"

if %2<=0 mov $19,"r00.bmp"
if %2==1 mov $19,"r01.bmp"
if %2==2 mov $19,"r02.bmp"
if %2==3 mov $19,"r03.bmp"
if %2==4 mov $19,"r04.bmp"
if %2==5 mov $19,"r05.bmp"
if %2==6 mov $19,"r06.bmp"
if %2==7 mov $19,"r07.bmp"
if %2==8 mov $19,"r08.bmp"
if %2==9 mov $19,"r09.bmp"

return

;----------------------------------------
;eBA̍U͂ƋZp͂Xe[^X\pϐɕϊ
*tear_ad

if %13<=0 mov $14,"r00.bmp"
if %13==1 mov $14,"r01.bmp"
if %13==2 mov $14,"r02.bmp"
if %13==3 mov $14,"r03.bmp"
if %13==4 mov $14,"r04.bmp"
if %13==5 mov $14,"r05.bmp"

if %14<=0 mov $15,"r00.bmp"
if %14==1 mov $15,"r01.bmp"
if %14==2 mov $15,"r02.bmp"
if %14==3 mov $15,"r03.bmp"
if %14==4 mov $15,"r04.bmp"
if %14==5 mov $15,"r05.bmp"

return
;----------------------------------------
;eBA̕Xe[^X\pϐɕϊ
*tear_weapon

if %15==1 mov $12,"weapon01.bmp"
if %15==2 mov $12,"weapon07.bmp"
if %15==3 mov $12,"weapon04.bmp"
if %15==4 mov $12,"weapon05.bmp"
if %15==5 mov $12,"weapon02.bmp"
if %15==6 mov $12,"weapon06.bmp"
if %15==7 mov $12,"weapon09.bmp"
if %15==8 mov $12,"weapon03.bmp"


return
;----------------------------------------
;eBA̕[eBO\pϐɕϊ
*tear_w_rate

if %15==1 mov $13,"rateb.bmp"
if %15==2 mov $13,"ratea.bmp"
if %15==3 mov $13,"ratee.bmp"
if %15==4 mov $13,"rateb.bmp"
if %15==5 mov $13,"ratec.bmp"
if %15==6 mov $13,"rateg.bmp"
if %15==7 mov $13,"rated.bmp"
if %15==8 mov $13,"ratef.bmp"

return
;----------------------------------------
;eBȀXe[^X\pϐɕϊ
*tear_silver
mov %3,%100 : mov %4,%100
mod %3,10 : div %4,10

if %3<=0 mov $20,"r00.bmp"
if %3==1 mov $20,"r01.bmp"
if %3==2 mov $20,"r02.bmp"
if %3==3 mov $20,"r03.bmp"
if %3==4 mov $20,"r04.bmp"
if %3==5 mov $20,"r05.bmp"
if %3==6 mov $20,"r06.bmp"
if %3==7 mov $20,"r07.bmp"
if %3==8 mov $20,"r08.bmp"
if %3==9 mov $20,"r09.bmp"

if %4<=0 mov $21,"r00.bmp"
if %4==1 mov $21,"r01.bmp"
if %4==2 mov $21,"r02.bmp"
if %4==3 mov $21,"r03.bmp"
if %4==4 mov $21,"r04.bmp"
if %4==5 mov $21,"r05.bmp"
if %4==6 mov $21,"r06.bmp"
if %4==7 mov $21,"r07.bmp"
if %4==8 mov $21,"r08.bmp"
if %4==9 mov $21,"r09.bmp"

return

;----------------------------------------
;eBȀ̍Xe[^X\ɂ
*tear_shougou

gosub *koushoku

if %951==1 lsp 21,"sh01.bmp",79,369
if %952==1 lsp 22,"sh02.bmp",79,389
if %953==1 lsp 23,"sh03.bmp",79,409
if %954==1 lsp 24,"sh04.bmp",79,429
if %955==1 lsp 25,"sh05.bmp",79,449
if %956==1 lsp 26,"sh06.bmp",79,469
if %957==1 lsp 27,"sh07.bmp",79,489
if %958==2 lsp 28,"sh08.bmp",79,509
if %959==10 lsp 29,"sh09.bmp",79,529
if %960==1 lsp 30,"sh10.bmp",79,549
if %961==1 lsp 31,"sh11.bmp",241,369
if %962==1 lsp 32,"sh12.bmp",241,389
if %963==7 lsp 33,"sh13.bmp",241,409
if %964==1 lsp 34,"sh14.bmp",241,429
if %965==1 lsp 35,"sh15.bmp",241,449
if %966==1 lsp 36,"sh16.bmp",241,469
if %967==2 lsp 37,"sh17.bmp",241,489
if %968==1 lsp 38,"sh18.bmp",241,509
if %969==7 lsp 39,"sh19.bmp",241,529
if %970==1 lsp 40,"sh20.bmp",241,549

return

;----------------------------------------
;DF`FbN
*koushoku

if %901==0 goto *no_koushoku
if %902==0 goto *no_koushoku
if %903==0 goto *no_koushoku
if %904==0 goto *no_koushoku
if %905==0 goto *no_koushoku
if %906==0 goto *no_koushoku
if %907==0 goto *no_koushoku
if %908==0 goto *no_koushoku
if %909==0 goto *no_koushoku
if %910==0 goto *no_koushoku
if %911==0 goto *no_koushoku
if %912==0 goto *no_koushoku
if %913==0 goto *no_koushoku
if %914==0 goto *no_koushoku
if %915==0 goto *no_koushoku
if %916==0 goto *no_koushoku
if %917==0 goto *no_koushoku
if %918==0 goto *no_koushoku
if %919==0 goto *no_koushoku
if %920==0 goto *no_koushoku

mov %962,1

*no_koushoku
return

;eBÃXe[^XAACei[ꏊ


*battle_tear

if %13==1 mov $14,"t_ata1.bmp"
if %13==2 mov $14,"t_ata2.bmp"
if %13==3 mov $14,"t_ata3.bmp"
if %13==4 mov $14,"t_ata4.bmp"
if %13==5 mov $14,"t_ata5.bmp"

if %14==1 mov $15,"t_def1.bmp"
if %14==2 mov $15,"t_def2.bmp"
if %14==3 mov $15,"t_def3.bmp"
if %14==4 mov $15,"t_def4.bmp"
if %14==5 mov $15,"t_def5.bmp"

return


;----------------------------------------
;eBÂgoύXɂϐ؂ւ
*tear_mhp

mov %1,%11 : mov %2,%11
mod %1,10 : div %2,10

if %1<=0 mov $18,"cg0.bmp"
if %1==1 mov $18,"cg1.bmp"
if %1==2 mov $18,"cg2.bmp"
if %1==3 mov $18,"cg3.bmp"
if %1==4 mov $18,"cg4.bmp"
if %1==5 mov $18,"cg5.bmp"
if %1==6 mov $18,"cg6.bmp"
if %1==7 mov $18,"cg7.bmp"
if %1==8 mov $18,"cg8.bmp"
if %1==9 mov $18,"cg9.bmp"

if %2<=0 mov $19,"cg0.bmp"
if %2==1 mov $19,"cg1.bmp"
if %2==2 mov $19,"cg2.bmp"
if %2==3 mov $19,"cg3.bmp"
if %2==4 mov $19,"cg4.bmp"
if %2==5 mov $19,"cg5.bmp"
if %2==6 mov $19,"cg6.bmp"
if %2==7 mov $19,"cg7.bmp"
if %2==8 mov $19,"cg8.bmp"
if %2==9 mov $19,"cg9.bmp"

return

;----------------------------------------



;----------------------------------------
;_CX\I
*dice_tumble

;Z[u[hItɂāA_CX𑬂߂Ă݂
saveoff

;ҋ@ԁA__CX\

;_ɐ擾
rnd2 %299,1,6
;擾A߂̃_CXɓ
if %299==1 : mov $101,"d1.bmp"
if %299==2 : mov $101,"d2.bmp"
if %299==3 : mov $101,"d3.bmp"
if %299==4 : mov $101,"d4.bmp"
if %299==5 : mov $101,"d5.bmp"
if %299==6 : mov $101,"d6.bmp"

;_ɐ擾
rnd2 %299,1,6
;擾A߂̃_CXɓ
if %299==1 : mov $102,"d1.bmp"
if %299==2 : mov $102,"d2.bmp"
if %299==3 : mov $102,"d3.bmp"
if %299==4 : mov $102,"d4.bmp"
if %299==5 : mov $102,"d5.bmp"
if %299==6 : mov $102,"d6.bmp"

;_CX\
lsp 8,$101,280,225
lsp 9,$102,420,225
print 1


;NbN҂{^Wv
btntime 100
btnwait %0
if %0==-2 goto *dice_tumble
if %0==-1 goto *dice_tumble
if %0==0 goto *dice_decision


;_CXe\
*dice_decision

;_ɐ擾
rnd2 %299,1,6
;擾A߂̃_CXɓ
if %299==1 : mov $101,"d1.bmp" : mov %31,1
if %299==2 : mov $101,"d2.bmp" : mov %31,2
if %299==3 : mov $101,"d3.bmp" : mov %31,3
if %299==4 : mov $101,"d4.bmp" : mov %31,4
if %299==5 : mov $101,"d5.bmp" : mov %31,5
if %299==6 : mov $101,"d6.bmp" : mov %31,6

;_ɐ擾
rnd2 %299,1,6
;擾A߂̃_CXɓ
if %299==1 : mov $102,"d1.bmp" : mov %32,1
if %299==2 : mov $102,"d2.bmp" : mov %32,2
if %299==3 : mov $102,"d3.bmp" : mov %32,3
if %299==4 : mov $102,"d4.bmp" : mov %32,4
if %299==5 : mov $102,"d5.bmp" : mov %32,5
if %299==6 : mov $102,"d6.bmp" : mov %32,6

;_CX̍vlZo
mov %33,%31 : add %33,%32

;v_CX̒lApl\
if %33==2 : mov $94,"ex02.bmp"
if %33==3 : mov $94,"ex03.bmp"
if %33==4 : mov $94,"ex04.bmp"
if %33==5 : mov $94,"ex05.bmp"
if %33==6 : mov $94,"ex06.bmp"
if %33==7 : mov $94,"ex07.bmp"
if %33==8 : mov $94,"ex08.bmp"
if %33==9 : mov $94,"ex09.bmp"
if %33==10 : mov $94,"ex10.bmp"
if %33==11 : mov $94,"ex11.bmp"
if %33==12 : mov $94,"ex12.bmp"

;_CX\
lsp 8,$101,280,225
lsp 9,$102,420,225
print 1

wait 1000

csp 48 : csp 49

print 1

;Z[u[hIɂāAʂɁB
saveon

return


;----------------------------------------
;_[Wpl͏
*damepane
if %17==0 : mov $95,"ex00.bmp"
if %17==1 : mov $95,"ex01.bmp"
if %17==2 : mov $95,"ex02.bmp"
if %17==3 : mov $95,"ex03.bmp"
if %17==4 : mov $95,"ex04.bmp"
if %17==5 : mov $95,"ex05.bmp"
if %17==6 : mov $95,"ex06.bmp"
if %17==7 : mov $95,"ex07.bmp"
if %17==8 : mov $95,"ex08.bmp"
if %17==9 : mov $95,"ex09.bmp"
if %17==10 : mov $95,"ex10.bmp"
if %17==11 : mov $95,"ex11.bmp"
if %17==12 : mov $95,"ex12.bmp"


return

;----------------------------------------
;[eBO
*dice_damage

if %19==0 goto *tear_rate
goto *enemy_rate

*tear_rate
if %15==1 goto *short
if %15==2 goto *neko
if %15==3 goto *crystal
if %15==4 goto *edge
if %15==5 goto *ilu
if %15==6 goto *blade
if %15==7 goto *rod
if %15==8 goto *snow

return

*enemy_rate
if %24==11 goto *w11
if %24==12 goto *w12
if %24==13 goto *w13
if %24==14 goto *w14
if %24==15 goto *w15
if %24==16 goto *w16
if %24==17 goto *w17
if %24==18 goto *w18
if %24==19 goto *w19
if %24==20 goto *w20
if %24==21 goto *w21
if %24==22 goto *w22
if %24==23 goto *w23
if %24==24 goto *w24
if %24==25 goto *w25
if %24==26 goto *w26
if %24==27 goto *w27
if %24==28 goto *w28
if %24==29 goto *w29
if %24==30 goto *w30
if %24==31 goto *w31
if %24==32 goto *w32
if %24==33 goto *w33
if %24==34 goto *w34
if %24==35 goto *w35
if %24==36 goto *w36
if %24==37 goto *w37
if %24==38 goto *w38
if %24==39 goto *w39
if %24==40 goto *w40
if %24==41 goto *w41
if %24==99 goto *test
return

;----------------------------------------
;FV[g\[h
*short
if %33==2 mov %17,0
if %33==3 mov %17,1
if %33==4 mov %17,1
if %33==5 mov %17,1
if %33==6 mov %17,2
if %33==7 mov %17,2
if %33==8 mov %17,2
if %33==9 mov %17,3
if %33==10 mov %17,3
if %33==11 mov %17,3
if %33==12 mov %17,4

return
;----------------------------------------
;F˂ς
*neko
if %33==2 mov %17,0
if %33==3 mov %17,2
if %33==4 mov %17,2
if %33==5 mov %17,2
if %33==6 mov %17,2
if %33==7 mov %17,2
if %33==8 mov %17,2
if %33==9 mov %17,2
if %33==10 mov %17,2
if %33==11 mov %17,2
if %33==12 mov %17,3

return
;----------------------------------------
;F
*crystal
if %33==2 mov %17,0
if %33==3 mov %17,3
if %33==4 mov %17,3
if %33==5 mov %17,4
if %33==6 mov %17,4
if %33==7 mov %17,5
if %33==8 mov %17,6
if %33==9 mov %17,6
if %33==10 mov %17,7
if %33==11 mov %17,7
if %33==12 mov %17,8

return
;----------------------------------------
;FGbW
*edge
if %33==2 mov %17,0
if %33==3 mov %17,1
if %33==4 mov %17,1
if %33==5 mov %17,1
if %33==6 mov %17,2
if %33==7 mov %17,2
if %33==8 mov %17,2
if %33==9 mov %17,3
if %33==10 mov %17,3
if %33==11 mov %17,3
if %33==12 mov %17,4

return
;----------------------------------------
;FC\[h
*ilu
if %33==2 mov %17,0
if %33==3 mov %17,1
if %33==4 mov %17,1
if %33==5 mov %17,2
if %33==6 mov %17,2
if %33==7 mov %17,3
if %33==8 mov %17,3
if %33==9 mov %17,4
if %33==10 mov %17,4
if %33==11 mov %17,5
if %33==12 mov %17,6

return
;----------------------------------------
;FuCh
*blade
if %33==2 mov %17,0
if %33==3 mov %17,7
if %33==4 mov %17,0
if %33==5 mov %17,7
if %33==6 mov %17,0
if %33==7 mov %17,7
if %33==8 mov %17,0
if %33==9 mov %17,7
if %33==10 mov %17,0
if %33==11 mov %17,7
if %33==12 mov %17,0

return
;----------------------------------------
;FF̏
*rod
if %33==2 mov %17,1
if %33==3 mov %17,2
if %33==4 mov %17,2
if %33==5 mov %17,3
if %33==6 mov %17,3
if %33==7 mov %17,4
if %33==8 mov %17,4
if %33==9 mov %17,5
if %33==10 mov %17,5
if %33==11 mov %17,6
if %33==12 mov %17,7

return
;----------------------------------------
;FW̒Z
*snow
if %33==2 mov %17,6
if %33==3 mov %17,5
if %33==4 mov %17,4
if %33==5 mov %17,3
if %33==6 mov %17,0
if %33==7 mov %17,0
if %33==8 mov %17,0
if %33==9 mov %17,3
if %33==10 mov %17,4
if %33==11 mov %17,5
if %33==12 mov %17,6

return
;----------------------------------------
;F11ԁij
*w11
if %33==2 mov %17,0
if %33==3 mov %17,2
if %33==4 mov %17,1
if %33==5 mov %17,2
if %33==6 mov %17,1
if %33==7 mov %17,1
if %33==8 mov %17,1
if %33==9 mov %17,3
if %33==10 mov %17,2
if %33==11 mov %17,1
if %33==12 mov %17,3

return

;----------------------------------------
;F12ԁi˂j
*w12
if %33==2 mov %17,0
if %33==3 mov %17,2
if %33==4 mov %17,1
if %33==5 mov %17,2
if %33==6 mov %17,1
if %33==7 mov %17,2
if %33==8 mov %17,1
if %33==9 mov %17,1
if %33==10 mov %17,3
if %33==11 mov %17,2
if %33==12 mov %17,2

return

;----------------------------------------
;F13ԁij
*w13
if %33==2 mov %17,0
if %33==3 mov %17,1
if %33==4 mov %17,1
if %33==5 mov %17,1
if %33==6 mov %17,1
if %33==7 mov %17,1
if %33==8 mov %17,1
if %33==9 mov %17,1
if %33==10 mov %17,3
if %33==11 mov %17,4
if %33==12 mov %17,9

return

;----------------------------------------
;F14ԁiqj
*w14
if %33==2 mov %17,0
if %33==3 mov %17,1
if %33==4 mov %17,1
if %33==5 mov %17,1
if %33==6 mov %17,1
if %33==7 mov %17,1
if %33==8 mov %17,2
if %33==9 mov %17,1
if %33==10 mov %17,2
if %33==11 mov %17,1
if %33==12 mov %17,3

return

;----------------------------------------
;F15ԁi܁j
*w15
if %33==2 mov %17,0
if %33==3 mov %17,3
if %33==4 mov %17,5
if %33==5 mov %17,1
if %33==6 mov %17,1
if %33==7 mov %17,3
if %33==8 mov %17,3
if %33==9 mov %17,2
if %33==10 mov %17,3
if %33==11 mov %17,2
if %33==12 mov %17,1

return

;----------------------------------------
;F16ԁiqj
*w16
if %33==2 mov %17,0
if %33==3 mov %17,3
if %33==4 mov %17,4
if %33==5 mov %17,4
if %33==6 mov %17,7
if %33==7 mov %17,7
if %33==8 mov %17,5
if %33==9 mov %17,5
if %33==10 mov %17,4
if %33==11 mov %17,4
if %33==12 mov %17,3

return

;----------------------------------------
;F17ԁiASj
*w17
if %33==2 mov %17,0
if %33==3 mov %17,2
if %33==4 mov %17,2
if %33==5 mov %17,2
if %33==6 mov %17,3
if %33==7 mov %17,1
if %33==8 mov %17,1
if %33==9 mov %17,1
if %33==10 mov %17,2
if %33==11 mov %17,1
if %33==12 mov %17,5

return

;----------------------------------------
;F18ԁirj
*w18
if %33==2 mov %17,0
if %33==3 mov %17,7
if %33==4 mov %17,5
if %33==5 mov %17,3
if %33==6 mov %17,4
if %33==7 mov %17,3
if %33==8 mov %17,4
if %33==9 mov %17,3
if %33==10 mov %17,7
if %33==11 mov %17,3
if %33==12 mov %17,6

return

;----------------------------------------
;F19ԁi˂j
*w19
if %33==2 mov %17,0
if %33==3 mov %17,3
if %33==4 mov %17,4
if %33==5 mov %17,4
if %33==6 mov %17,2
if %33==7 mov %17,2
if %33==8 mov %17,2
if %33==9 mov %17,2
if %33==10 mov %17,2
if %33==11 mov %17,3
if %33==12 mov %17,4

return

;----------------------------------------
;F20ԁiJM܁j
*w20
if %33==2 mov %17,0
if %33==3 mov %17,3
if %33==4 mov %17,1
if %33==5 mov %17,1
if %33==6 mov %17,1
if %33==7 mov %17,1
if %33==8 mov %17,2
if %33==9 mov %17,1
if %33==10 mov %17,1
if %33==11 mov %17,3
if %33==12 mov %17,3

return

;----------------------------------------
;F21ԁij
*w21
if %33==2 mov %17,0
if %33==3 mov %17,1
if %33==4 mov %17,2
if %33==5 mov %17,2
if %33==6 mov %17,1
if %33==7 mov %17,2
if %33==8 mov %17,1
if %33==9 mov %17,1
if %33==10 mov %17,2
if %33==11 mov %17,2
if %33==12 mov %17,2

return

;----------------------------------------
;F22ԁij
*w22
if %33==2 mov %17,0
if %33==3 mov %17,1
if %33==4 mov %17,3
if %33==5 mov %17,1
if %33==6 mov %17,2
if %33==7 mov %17,1
if %33==8 mov %17,2
if %33==9 mov %17,2
if %33==10 mov %17,4
if %33==11 mov %17,3
if %33==12 mov %17,5

return

;----------------------------------------
;F23ԁisj
*w23
if %33==2 mov %17,0
if %33==3 mov %17,3
if %33==4 mov %17,2
if %33==5 mov %17,1
if %33==6 mov %17,1
if %33==7 mov %17,2
if %33==8 mov %17,1
if %33==9 mov %17,1
if %33==10 mov %17,4
if %33==11 mov %17,2
if %33==12 mov %17,3

return

;----------------------------------------
;F24ԁi܁j
*w24
if %33==2 mov %17,0
if %33==3 mov %17,1
if %33==4 mov %17,2
if %33==5 mov %17,1
if %33==6 mov %17,1
if %33==7 mov %17,3
if %33==8 mov %17,3
if %33==9 mov %17,4
if %33==10 mov %17,4
if %33==11 mov %17,1
if %33==12 mov %17,4

return

;----------------------------------------
;F25ԁi܁j
*w25
if %33==2 mov %17,0
if %33==3 mov %17,2
if %33==4 mov %17,2
if %33==5 mov %17,2
if %33==6 mov %17,2
if %33==7 mov %17,2
if %33==8 mov %17,2
if %33==9 mov %17,2
if %33==10 mov %17,6
if %33==11 mov %17,6
if %33==12 mov %17,6

return

;----------------------------------------
;F26ԁij
*w26
if %33==2 mov %17,0
if %33==3 mov %17,2
if %33==4 mov %17,2
if %33==5 mov %17,3
if %33==6 mov %17,2
if %33==7 mov %17,2
if %33==8 mov %17,9
if %33==9 mov %17,2
if %33==10 mov %17,2
if %33==11 mov %17,1
if %33==12 mov %17,3

return

;----------------------------------------
;F27ԁir[j
*w27
if %33==2 mov %17,0
if %33==3 mov %17,2
if %33==4 mov %17,5
if %33==5 mov %17,3
if %33==6 mov %17,3
if %33==7 mov %17,1
if %33==8 mov %17,4
if %33==9 mov %17,5
if %33==10 mov %17,1
if %33==11 mov %17,4
if %33==12 mov %17,1

return

;----------------------------------------
;F28ԁi҂̌j
*w28
if %33==2 mov %17,0
if %33==3 mov %17,1
if %33==4 mov %17,6
if %33==5 mov %17,1
if %33==6 mov %17,6
if %33==7 mov %17,1
if %33==8 mov %17,6
if %33==9 mov %17,1
if %33==10 mov %17,6
if %33==11 mov %17,1
if %33==12 mov %17,6

return

;----------------------------------------
;F29ԁi̒܁j
*w29
if %33==2 mov %17,0
if %33==3 mov %17,2
if %33==4 mov %17,2
if %33==5 mov %17,3
if %33==6 mov %17,2
if %33==7 mov %17,2
if %33==8 mov %17,9
if %33==9 mov %17,2
if %33==10 mov %17,2
if %33==11 mov %17,1
if %33==12 mov %17,3

return

;----------------------------------------
;F30ԁi̒܁j
*w30
if %33==2 mov %17,0
if %33==3 mov %17,4
if %33==4 mov %17,3
if %33==5 mov %17,3
if %33==6 mov %17,4
if %33==7 mov %17,8
if %33==8 mov %17,4
if %33==9 mov %17,6
if %33==10 mov %17,5
if %33==11 mov %17,9
if %33==12 mov %17,6

return

;----------------------------------------
;F31ԁipj
*w31
if %33==2 mov %17,0
if %33==3 mov %17,3
if %33==4 mov %17,1
if %33==5 mov %17,1
if %33==6 mov %17,3
if %33==7 mov %17,3
if %33==8 mov %17,3
if %33==9 mov %17,1
if %33==10 mov %17,3
if %33==11 mov %17,4
if %33==12 mov %17,4

return

;----------------------------------------
;F32ԁipj
*w32
if %33==2 mov %17,0
if %33==3 mov %17,4
if %33==4 mov %17,2
if %33==5 mov %17,5
if %33==6 mov %17,2
if %33==7 mov %17,5
if %33==8 mov %17,2
if %33==9 mov %17,4
if %33==10 mov %17,2
if %33==11 mov %17,5
if %33==12 mov %17,1

return

;----------------------------------------
;F33ԁipj
*w33
if %33==2 mov %17,0
if %33==3 mov %17,4
if %33==4 mov %17,1
if %33==5 mov %17,3
if %33==6 mov %17,1
if %33==7 mov %17,2
if %33==8 mov %17,4
if %33==9 mov %17,2
if %33==10 mov %17,1
if %33==11 mov %17,2
if %33==12 mov %17,4

return

;----------------------------------------
;F34ԁi܁j
*w34
if %33==2 mov %17,0
if %33==3 mov %17,1
if %33==4 mov %17,1
if %33==5 mov %17,2
if %33==6 mov %17,1
if %33==7 mov %17,1
if %33==8 mov %17,1
if %33==9 mov %17,1
if %33==10 mov %17,2
if %33==11 mov %17,1
if %33==12 mov %17,2

return

;----------------------------------------
;F35ԁij
*w35
if %33==2 mov %17,0
if %33==3 mov %17,2
if %33==4 mov %17,3
if %33==5 mov %17,2
if %33==6 mov %17,2
if %33==7 mov %17,2
if %33==8 mov %17,2
if %33==9 mov %17,3
if %33==10 mov %17,3
if %33==11 mov %17,3
if %33==12 mov %17,9

return

;----------------------------------------
;F36ԁijj
*w36
if %33==2 mov %17,0
if %33==3 mov %17,1
if %33==4 mov %17,1
if %33==5 mov %17,1
if %33==6 mov %17,1
if %33==7 mov %17,7
if %33==8 mov %17,8
if %33==9 mov %17,1
if %33==10 mov %17,1
if %33==11 mov %17,1
if %33==12 mov %17,1

return

;----------------------------------------
;F37ԁiŃASj
*w37
if %33==2 mov %17,0
if %33==3 mov %17,5
if %33==4 mov %17,1
if %33==5 mov %17,2
if %33==6 mov %17,5
if %33==7 mov %17,3
if %33==8 mov %17,2
if %33==9 mov %17,3
if %33==10 mov %17,2
if %33==11 mov %17,2
if %33==12 mov %17,4

return

;----------------------------------------
;F38ԁiŃASj
*w38
if %33==2 mov %17,0
if %33==3 mov %17,4
if %33==4 mov %17,1
if %33==5 mov %17,1
if %33==6 mov %17,4
if %33==7 mov %17,2
if %33==8 mov %17,1
if %33==9 mov %17,2
if %33==10 mov %17,1
if %33==11 mov %17,1
if %33==12 mov %17,3

return

;----------------------------------------
;F39ԁiASj
*w39
if %33==2 mov %17,0
if %33==3 mov %17,9
if %33==4 mov %17,1
if %33==5 mov %17,1
if %33==6 mov %17,1
if %33==7 mov %17,1
if %33==8 mov %17,1
if %33==9 mov %17,1
if %33==10 mov %17,1
if %33==11 mov %17,1
if %33==12 mov %17,9

return

;----------------------------------------
;F40ԁi܁j
*w40
if %33==2 mov %17,0
if %33==3 mov %17,
if %33==4 mov %17,
if %33==5 mov %17,
if %33==6 mov %17,
if %33==7 mov %17,
if %33==8 mov %17,
if %33==9 mov %17,
if %33==10 mov %17,
if %33==11 mov %17,
if %33==12 mov %17,

return

;----------------------------------------
;F41ԁi\ꓪ˂j
*w41
if %33==2 mov %17,0
if %33==3 mov %17,4
if %33==4 mov %17,2
if %33==5 mov %17,5
if %33==6 mov %17,2
if %33==7 mov %17,5
if %33==8 mov %17,2
if %33==9 mov %17,4
if %33==10 mov %17,2
if %33==11 mov %17,5
if %33==12 mov %17,1

return

;----------------------------------------
;FeXg
*test
if %33==2 mov %17,0
if %33==3 mov %17,2
if %33==4 mov %17,2
if %33==5 mov %17,2
if %33==6 mov %17,3
if %33==7 mov %17,3
if %33==8 mov %17,3
if %33==9 mov %17,4
if %33==10 mov %17,4
if %33==11 mov %17,4
if %33==12 mov %17,5

return

;----------------------------------------
*nyuryoku

;{ϐ̃JEg𐮂܂
mov %101,0 : mov %102,0 : mov %103,0
mov %104,0 : mov %105,0 : mov %106,0

*nyuryoku_panel

;ʂɓ͑u\

lsp 10,":a/2,0,3;pn0.bmp",440,360
lsp 11,":a/2,0,3;pn1.bmp",350,150
lsp 12,":a/2,0,3;pn2.bmp",440,150
lsp 13,":a/2,0,3;pn3.bmp",530,150
lsp 14,":a/2,0,3;pn4.bmp",350,220
lsp 15,":a/2,0,3;pn5.bmp",440,220
lsp 16,":a/2,0,3;pn6.bmp",530,220
lsp 17,":a/2,0,3;pn7.bmp",350,290
lsp 18,":a/2,0,3;pn8.bmp",440,290
lsp 19,":a/2,0,3;pn9.bmp",530,290
lsp 20,":a/2,0,3;pnc.bmp",350,360
lsp 21,":a/2,0,3;pno.bmp",530,360
print 1

;ʂɕ\摜A{^ƂĒ`
spbtn 10,1
spbtn 11,2
spbtn 12,3
spbtn 13,4
spbtn 14,5
spbtn 15,6
spbtn 16,7
spbtn 17,8
spbtn 18,9
spbtn 19,10
spbtn 20,11
spbtn 21,12

;{^͂҂A͂ꂽ琔l܂
*panel_loop

btnwait %0

if %0 == 0 goto *panel_loop
if %0 == -1 goto *panel_loop
if %0 == 1 mov $104,"pi0.bmp" : mov %105,0
if %0 == 2 mov $104,"pi1.bmp" : mov %105,1
if %0 == 3 mov $104,"pi2.bmp" : mov %105,2
if %0 == 4 mov $104,"pi3.bmp" : mov %105,3
if %0 == 5 mov $104,"pi4.bmp" : mov %105,4
if %0 == 6 mov $104,"pi5.bmp" : mov %105,5
if %0 == 7 mov $104,"pi6.bmp" : mov %105,6
if %0 == 8 mov $104,"pi7.bmp" : mov %105,7
if %0 == 9 mov $104,"pi8.bmp" : mov %105,8
if %0 == 10 mov $104,"pi9.bmp" : mov %105,9
if %0 == 11 goto *panel_clear
if %0 == 12 goto *go_pal

if %104==0 : goto *panel_one
if %104==1 : goto *panel_two
if %104==2 : goto *panel_three


;ꂽϐɂA͂ʂɔf

*panel_one
mov $101,$104 : mov %101,%105
lsp 23,$101,530,20
print 1
mov %104,1
goto *nyuryoku_panel


*panel_two
mov $102,$104 : mov %102,%105
lsp 23,$102,530,20
lsp 24,$101,440,20
print 1
mov %104,2
goto *nyuryoku_panel


*panel_three
mov $103,$104 : mov %103,%105
lsp 23,$103,530,20
lsp 24,$102,440,20
lsp 25,$101,350,20
print 1
mov %104,3
goto *nyuryoku_panel


*panel_clear
mov %104,0
csp 23 : csp 24 : csp 25
print 1
goto *nyuryoku_panel


*go_pal

if %104==0 goto *nyuryoku_panel

if %104==1 mov %106,%101

if %104==2 mul %101,10 : mov %106,%101 : add %106,%102

if %104==3 mul %101,100 : mul %102,10 : mov %106,%101 : add %106,%102 : add %106,%103

csp -1
print 1

;----------------------------------------
;֋XĂ邨܂ȂłBׂ
lsph 0,":a;rmenu.bmp",0,0
lsph 1,":l/3,200,2;cursor0.bmp",0,0
lsph 2,":l/3,200,2;cursor1.bmp",0,0
;----------------------------------------

꣗AIlPOUB@
\\@
_ޏoGB\

textoff
goto *title



;퓬VXe

;----------------------------------------
;퓬O
*battle_ste

gosub *heal_phase

;퓬Õf[^AI[gZ[uB
savegame 100

;eBÃXe[^X擾
gosub *battle_tear
gosub *tear_weapon
gosub *tear_w_rate
gosub *tear_mhp

;G̃Xe[^X擾
gosub *battle_enemy

;ʏ̃eBAXe[^XS
csp -1
print 1
textoff

;----------------------------------------
;܂Ȃ
lsph 0,":a;rmenu.bmp",0,0
lsph 1,":l/3,200,2;cursor0.bmp",0,0
lsph 2,":l/3,200,2;cursor1.bmp",0,0
;----------------------------------------

;ogɓʂɕύX
bg "battle_in.bmp",4

;ogp̉y炷
;mp3loop "m03_battle1.mp3"
mp3loop $22

;퓬󋵁iǂ炪搧UHj擾

;wif[^̕\ēx蒼
bg $20,3

;G\
ld C,$25,0
;G̃[g\
lsp 41,$23,410,0

;̃p[^[\
if %7==1 lsp 24,"t_add2.bmp",540,555
if %7==1 lsp 25,"t_add2.bmp",730,555
if %7==2 lsp 25,"t_add1.bmp",730,555

lsp 31,$11,10,455
lsp 32,$12,410,455
lsp 33,$13,410,490
lsp 34,$14,410,555
lsp 35,$15,600,555
lsp 36,$17,160,460
lsp 37,$16,210,460
lsp 38,$19,260,520
lsp 39,$18,310,520
lsp 40,"window_bt.bmp",0,450

;----------------------------------------
;퓬
*battle_flow
;퓬󋵂ŔfB
if %16==1 goto *attack_tear

;----------------------------------------
;eBÃ^[I
*attack_tear
mov %19,0

;_CX
gosub *dice_tumble

;_CX_[WZo
gosub *dice_damage
if %17==0 sub %17,30

;eBA̍U͂Z
add %17,%13
if %7==1 add %17,2

;̋Zp͂Z
sub %17,%27
if %17<=0 mov %17,0

;̗̑͂
sub %21,%17

gosub *damepane

csp 8 : csp 9
print 1

;_[W\
lsp 30,"exwin1.bmp",0,0
lsp 26,$101,220,160
lsp 27,$102,350,160
lsp 28,$94,480,160
lsp 29,$95,550,280
print 1
click
;ɏꂽ_[Wpl܂
csp 26 : csp 27 : csp 28 : csp 29 : csp 30

;G
if %21<=0 goto *win

goto *attack_enemy

;----------------------------------------
;G̃^[I
*attack_enemy

;U񐔂ɉZ
add %19,1

;_CX
gosub *dice_tumble

;_CX_[WZo
gosub *dice_damage
if %17==0 sub %17,30

;G̊bU͂Z
add %17,%26

;eBA̋Zp͂Z
sub %17,%14
if %7==1 sub %17,2
if %7==2 sub %17,1
if %17<=0 mov %17,0

;eBȂ̗͂
sub %12,%17
if %12<=0 mov %12,0

gosub *damepane

csp 8 : csp 9
print 1

;_[W\
lsp 30,"exwin2.bmp",0,0
lsp 26,$101,220,160
lsp 27,$102,350,160
lsp 28,$94,480,160
lsp 29,$95,550,280
print 1
click
;ɏꂽ_[Wpl܂
csp 26 : csp 27 : csp 28 : csp 29 : csp 30

;eBAgo\ύX\
gosub *tear_hpc_c
lsp 36,$17,150,455
lsp 37,$16,200,455
print 1

;eBA
if %12<=0 goto *lose

;Gc
if %19==%18 goto *attack_tear

goto *attack_enemy


*lose
;eBA񂾎AĐ킷邩mFB
select "Ē킷",*onemore,"߂",*gameover

*onemore
loadgame 100

*gameover

textoff
csp -1
print 1

bg "gameover.bmp",3

click

add %959,1

if %959==1 mov %968,1
if %959>=11 mov %959,10

reset

;----------------------------------------
;
*win
mp3 "fanfare2.mp3"

csp -1

bg "win.bmp",3

;GϐׂăNAɂ

delay 2000

;퓬ÕtOɖ߂A_ł͎bIɃ^Cgɖ߂ĂB
if %7==2 mov %7,0

;----------------------------------------

gosub *migikuri

bg $20,3
;ẼeBAAgoA\
gosub *tear_w
gosub *tear_hpc
gosub *tear_m
;----------------------------------------
;yɖ߂
mp3loop $1

return


;----------------------------------------

;GLf[^
;----------------------------------------
*battle_enemy
;G擾܂
if %20==0 gosub *test_enemy
if %20==1 gosub *enemy01
if %20==2 gosub *enemy02
if %20==3 gosub *enemy03
if %20==4 gosub *enemy04
if %20==5 gosub *enemy05
if %20==6 gosub *enemy06
if %20==7 gosub *enemy07
if %20==8 gosub *enemy08
if %20==9 gosub *enemy09
if %20==10 gosub *enemy10
if %20==11 gosub *enemy11
if %20==12 gosub *enemy12
if %20==13 gosub *enemy13
if %20==14 gosub *enemy14
if %20==15 gosub *enemy15
if %20==16 gosub *enemy16
if %20==17 gosub *enemy17
if %20==18 gosub *enemy18
if %20==19 gosub *enemy19
if %20==20 gosub *enemy20
if %20==21 gosub *enemy21
if %20==22 gosub *enemy22
if %20==23 gosub *enemy23
if %20==24 gosub *enemy24
if %20==25 gosub *enemy25
if %20==26 gosub *enemy26
if %20==27 gosub *enemy27
if %20==28 gosub *enemy28
if %20==29 gosub *enemy29
if %20==30 gosub *enemy30
if %20==31 gosub *enemy31
if %20==32 gosub *enemy32
if %20==33 gosub *enemy33

return
;----------------------------------------
;eXgpɍGLł
*test_enemy
;Ĝgo20ł
mov %21,20
;G̕^Cv99ԁieXgjł
mov %24,99
;G̍U͂1ł
mov %26,1
;G̋Zp͂1ł
mov %27,1
;eBA̐搧Ułi{̓pOtڂł̎擾j
mov %16,1
;G͈̐lł
mov %18,1

;wi͐Xł
mov $20,"bg_01for.bmp"
;G
mov $25,"mon18.bmp"
return
;----------------------------------------
;ڂ̐퓬FIIJ~
*enemy01
;Ĝgo8ł
mov %21,8
;G̕^Cv11ԁijł
mov %24,11
;G̍U͂1ł
mov %26,1
;G̋Zp͂1ł
mov %27,1
;eBA̐搧Ułi{̓pOtڂł̎擾j
mov %16,1
;G͈̐lł
mov %18,1

;wi͐Xł
mov $20,"bg_01for.bmp"
;G̃[eBO\
mov $23,"rate01.bmp"
;G̋
mov $22,"m03_battle1.mp3"
;G
mov $25,"mon11a.bmp"
return
;----------------------------------------
;ڂ̐퓬Fb
*enemy02
;Ĝgo10ł
mov %21,10
;G̕^Cv12ԁi˂jł
mov %24,12
;G̍U͂1ł
mov %26,1
;G̋Zp͂0ł
mov %27,0
;eBA̐搧Ułi{̓pOtڂł̎擾j
mov %16,1
;G͈̐lł
mov %18,1

;wi͐Xł
mov $20,"bg_01for.bmp"
;G̃[eBO\
mov $23,"rate02.bmp"
;G̋
mov $22,"m03_battle1.mp3"
;G
mov $25,"mon03a.bmp"
return
;----------------------------------------
;Oڂ̐퓬F㍘̃I[N
*enemy03
;Ĝgo12ł
mov %21,12
;G̕^Cv13ԁijł
mov %24,13
;G̍U͂1ł
mov %26,1
;G̋Zp͂0ł
mov %27,0
;eBA̐搧Ułi{̓pOtڂł̎擾j
mov %16,1
;G͈̐lł
mov %18,1

;wi͐Xł
mov $20,"bg_01for.bmp"
;G̃[eBO\
mov $23,"rate03.bmp"
;G̋
mov $22,"m03_battle1.mp3"
;G
mov $25,"mon18a.bmp"
return
;----------------------------------------
;lڂ̐퓬F؂̏̃Pm
*enemy04
;Ĝgo9ł
mov %21,9
;G̕^Cv14ԁiqjł
mov %24,14
;G̍U͂1ł
mov %26,1
;G̋Zp͂1ł
mov %27,0
;eBA̐搧Ułi{̓pOtڂł̎擾j
mov %16,1
;G͈̐lł
mov %18,1

;wi͐Xł
mov $20,"bg_01for.bmp"
;G̃[eBO\
mov $23,"rate04.bmp"
;G̋
mov $22,"m03_battle1.mp3"
;G
mov $25,"mon02a.bmp"
return
;----------------------------------------
;܉ڂ̐퓬FXуN}iIIJ~j
*enemy05
;Ĝgo8ł
mov %21,8
;G̕^Cv15ԁi܁jł
mov %24,15
;G̍U͂0ł
mov %26,0
;G̋Zp͂1ł
mov %27,1
;eBA̐搧Ułi{̓pOtڂł̎擾j
mov %16,1
;G͈̐lł
mov %18,1

;wi͐Xł
mov $20,"bg_01for.bmp"
;G̃[eBO\
mov $23,"rate05.bmp"
;G̋
mov $22,"m03_battle1.mp3"
;G
mov $25,"mon11b.bmp"
return
;----------------------------------------
;Zڂ̐퓬FXуjî́HHj
*enemy06
;Ĝgo5ł
mov %21,5
;G̕^Cv16ԁiqjł
mov %24,16
;G̍U͂0ł
mov %26,0
;G̋Zp͂0ł
mov %27,0
;eBA̐搧Ułi{̓pOtڂł̎擾j
mov %16,1
;G͈̐lł
mov %18,1

;wi͐Xł
mov $20,"bg_01for.bmp"
;G̃[eBO\
mov $23,"rate06.bmp"
;G̋
mov $22,"m03_battle1.mp3"
;G
mov $25,"mon02b.bmp"
return
;----------------------------------------
;ڂ̐퓬Fnʂ̉iJfj
*enemy07
;Ĝgo6ł
mov %21,6
;G̕^Cv17ԁiASjł
mov %24,17
;G̍U͂1ł
mov %26,1
;G̋Zp͂1ł
mov %27,1
;eBA̐搧Ułi{̓pOtڂł̎擾j
mov %16,1
;G͈̐lł
mov %18,1

;wi͐Xł
mov $20,"bg_01for.bmp"
;G̃[eBO\
mov $23,"rate07.bmp"
;G̋
mov $22,"m03_battle1.mp3"
;G
mov $25,"mon13a.bmp"
return
;----------------------------------------
;ڂ̐퓬FXт̎
*enemy08
;Ĝgo38ł
mov %21,38
;G̕^Cv18ԁirjł
mov %24,18
;G̍U͂2ł
mov %26,2
;G̋Zp͂1ł
mov %27,1
;eBA̐搧Ułi{̓pOtڂł̎擾j
mov %16,1
;G͈̐lł
mov %18,1

;wi͐Xł
mov $20,"bg_01for.bmp"
;G̃[eBO\
mov $23,"rate08.bmp"
;G̋
mov $22,"m08_boss_battle.mp3"
;G
mov $25,"mon01a.bmp"
return
;----------------------------------------
;ڂ̐퓬FX^[
*enemy09
;Ĝgo10ł
mov %21,10
;G̕^Cv19ԁi˂jł
mov %24,19
;G̍U͂0ł
mov %26,0
;G̋Zp͂0ł
mov %27,0
;eBA̐搧Ułi{̓pOtڂł̎擾j
mov %16,1
;G͈̐lł
mov %18,1

;wi͐Xł
mov $20,"bg_01for.bmp"
;G̃[eBO\
mov $23,"rate09.bmp"
;G̋
mov $22,"m03_battle1.mp3"
;G
mov $25,"mon03c.bmp"
return
;----------------------------------------
;\ڂ̐퓬FH̍e
*enemy10
;Ĝgo10ł
mov %21,10
;G̕^Cv20ԁiJM܁jł
mov %24,20
;G̍U͂1ł
mov %26,1
;G̋Zp͂0ł
mov %27,0
;eBA̐搧Ułi{̓pOtڂł̎擾j
mov %16,1
;G͈̐lł
mov %18,1

;wi͐Xł
mov $20,"bg_03und.bmp"
;G̃[eBO\
mov $23,"rate10.bmp"
;G̋
mov $22,"m03_battle1.mp3"
;G
mov $25,"mon10a.bmp"
return
;----------------------------------------
;\ڂ̐퓬Fm
*enemy11
;Ĝgo12ł
mov %21,12
;G̕^Cv21ԁijł
mov %24,21
;G̍U͂1ł
mov %26,1
;G̋Zp͂0ł
mov %27,0
;eBA̐搧Ułi{̓pOtڂł̎擾j
mov %16,1
;G͈̐lł
mov %18,1

;wi͐Xł
mov $20,"bg_02tow.bmp"
;G̃[eBO\
mov $23,"rate11.bmp"
;G̋
mov $22,"m03_battle1.mp3"
;G
mov $25,"mon18c.bmp"
return
;----------------------------------------
;\ڂ̐퓬FZŏ̑
*enemy12
;Ĝgo12ł
mov %21,12
;G̕^Cv22ԁijł
mov %24,22
;G̍U͂1ł
mov %26,1
;G̋Zp͂0ł
mov %27,0
;eBA̐搧Ułi{̓pOtڂł̎擾j
mov %16,1
;G͈̐lł
mov %18,1

;wi͓Zł
mov $20,"bg_05bat.bmp"
;G̃[eBO\
mov $23,"rate12.bmp"
;G̋
mov $22,"m03_battle1.mp3"
;G
mov $25,"mon15a.bmp"
return
;----------------------------------------
;\Oڂ̐퓬F
*enemy13
;Ĝgo8ł
mov %21,8
;G̕^Cv23ԁisjł
mov %24,23
;G̍U͂1ł
mov %26,1
;G̋Zp͂0ł
mov %27,0
;eBA̐搧Ułi{̓pOtڂł̎擾j
mov %16,1
;G͈̐lł
mov %18,1

;wi͐Xł
mov $20,"bg_02tow.bmp"
;G̃[eBO\
mov $23,"rate13.bmp"
;G̋
mov $22,"m03_battle1.mp3"
;G
mov $25,"mon14a.bmp"
return
;----------------------------------------
;\lڂ̐퓬Flڂ̑`
*enemy14
;Ĝgo8ł
mov %21,8
;G̕^Cv24ԁi܁jł
mov %24,24
;G̍U͂1ł
mov %26,1
;G̋Zp͂1ł
mov %27,0
;eBA̐搧Ułi{̓pOtڂł̎擾j
mov %16,1
;G͈̐lł
mov %18,1

;wi͓Zł
mov $20,"bg_05bat.bmp"
;G̃[eBO\
mov $23,"rate14.bmp"
;G̋
mov $22,"m03_battle1.mp3"
;G
mov $25,"mon15b.bmp"
return
;----------------------------------------
;\܉ڂ̐퓬Flڂ̑a
*enemy15
;Ĝgo10ł
mov %21,10
;G̕^Cv25ԁi܁jł
mov %24,25
;G̍U͂1ł
mov %26,1
;G̋Zp͂1ł
mov %27,0
;eBA̐搧Ułi{̓pOtڂł̎擾j
mov %16,1
;G͈̐lł
mov %18,1

;wi͓Zł
mov $20,"bg_05bat.bmp"
;G̃[eBO\
mov $23,"rate15.bmp"
;G̋
mov $22,"m03_battle1.mp3"
;G
mov $25,"mon15b.bmp"
return
;----------------------------------------
;\Zڂ̐퓬F
*enemy16
;Ĝgo10ł
mov %21,10
;G̕^Cv26ԁijł
mov %24,26
;G̍U͂0ł
mov %26,0
;G̋Zp͂0ł
mov %27,0
;eBA̐搧Ułi{̓pOtڂł̎擾j
mov %16,1
;G͈̐lł
mov %18,1

;wi͐Xł
mov $20,"bg_02tow.bmp"
;G̃[eBO\
mov $23,"rate16.bmp"
;G̋
mov $22,"m06_battle2.mp3"
;G
mov $25,"mon08a.bmp"
return
;----------------------------------------
;\ڂ̐퓬F䐶
*enemy17
;Ĝgo2ł
mov %21,2
;G̕^Cv27ԁir[jł
mov %24,27
;G̍U͂0ł
mov %26,0
;G̋Zp͂3ł
mov %27,3
;eBA̐搧Ułi{̓pOtڂł̎擾j
mov %16,1
;G͈̐lł
mov %18,1

;wi͐Xł
mov $20,"bg_03und.bmp"
;G̃[eBO\
mov $23,"rate17.bmp"
;G̋
mov $22,"m06_battle2.mp3"
;G
mov $25,"mon17b.bmp"
return
;----------------------------------------
;\ڂ̐퓬F`v
*enemy18
;Ĝgo10ł
mov %21,10
;G̕^Cv28ԁi҂̌jł
mov %24,28
;G̍U͂2ł
mov %26,2
;G̋Zp͂0ł
mov %27,0
;eBA̐搧Ułi{̓pOtڂł̎擾j
mov %16,1
;G͈̐lł
mov %18,1

;wi͓ZXł
mov $20,"bg_05bat.bmp"
;G̃[eBO\
mov $23,"rate18.bmp"
;G̋
mov $22,"m06_battle2.mp3"
;G
mov $25,"mon18b.bmp"
return
;----------------------------------------
;\ڂ̐퓬FX{X
*enemy19
;Ĝgo15ł
mov %21,15
;G̕^Cv29ԁi̒܁jł
mov %24,29
;G̍U͂1ł
mov %26,1
;G̋Zp͂1ł
mov %27,1
;eBA̐搧Ułi{̓pOtڂł̎擾j
mov %16,1
;G͈̐lł
mov %18,1

;wi͐Xł
mov $20,"bg_04san.bmp"
;G̃[eBO\
mov $23,"rate19.bmp"
;G̋
mov $22,"m08_boss_battle.mp3"
;G
mov $25,"mon07a.bmp"
return
;----------------------------------------
;\ڂ̐퓬FB{X
*enemy20
;Ĝgo38ł
mov %21,38
;G̕^Cv30ԁi̒܁jł
mov %24,30
;G̍U͂4ł
mov %26,4
;G̋Zp͂0ł
mov %27,0
;eBA̐搧Ułi{̓pOtڂł̎擾j
mov %16,1
;G͈̐lł
mov %18,1

;wi͐Xł
mov $20,"bg_04san.bmp"
;G̃[eBO\
mov $23,"rate20.bmp"
;G̋
mov $22,"m08_boss_battle.mp3"
;G
mov $25,"mon07b.bmp"
return
;----------------------------------------
;\ڂ̐퓬F[K[_[
*enemy21
;Ĝgo15ł
mov %21,15
;G̕^Cv31ԁipjł
mov %24,31
;G̍U͂0ł
mov %26,0
;G̋Zp͂1ł
mov %27,1
;eBA̐搧Ułi{̓pOtڂł̎擾j
mov %16,1
;G͈̐lł
mov %18,1

;wi͐Xł
mov $20,"bg_04san.bmp"
;G̃[eBO\
mov $23,"rate21.bmp"
;G̋
mov $22,"m03_battle1.mp3"
;G
mov $25,"mon16a.bmp"
return
;----------------------------------------
;\ڂ̐퓬F[K[^[a
*enemy22
;Ĝgo8ł
mov %21,8
;G̕^Cv32ԁipjł
mov %24,32
;G̍U͂1ł
mov %26,1
;G̋Zp͂0ł
mov %27,0
;eBA̐搧Ułi{̓pOtڂł̎擾j
mov %16,1
;G͈̐lł
mov %18,1

;wi͐Xł
mov $20,"bg_04san.bmp"
;G̃[eBO\
mov $23,"rate22.bmp"
;G̋
mov $22,"m03_battle1.mp3"
;G
mov $25,"mon16b.bmp"
return
;----------------------------------------
;\Oڂ̐퓬F[K[_[b
*enemy23
;Ĝgo20ł
mov %21,20
;G̕^Cv33ԁipjł
mov %24,33
;G̍U͂0ł
mov %26,0
;G̋Zp͂0ł
mov %27,0
;eBA̐搧Ułi{̓pOtڂł̎擾j
mov %16,1
;G͈̐lł
mov %18,1

;wi͐Xł
mov $20,"bg_04san.bmp"
;G̃[eBO\
mov $23,"rate23.bmp"
;G̋
mov $22,"m03_battle1.mp3"
;G
mov $25,"mon16b.bmp"
return
;----------------------------------------
;\lڂ̐퓬F厨̉
*enemy24
;Ĝgo12ł
mov %21,12
;G̕^Cv34ԁi܁jł
mov %24,34
;G̍U͂2ł
mov %26,2
;G̋Zp͂0ł
mov %27,0
;eBA̐搧Ułi{̓pOtڂł̎擾j
mov %16,1
;G͈̐lł
mov %18,1

;wi͐Xł
mov $20,"bg_04san.bmp"
;G̃[eBO\
mov $23,"rate24.bmp"
;G̋
mov $22,"m03_battle1.mp3"
;G
mov $25,"mon12a.bmp"
return
;----------------------------------------
;\܉ڂ̐퓬Fỉe
*enemy25
;Ĝgo9ł
mov %21,9
;G̕^Cv35ԁijł
mov %24,35
;G̍U͂0ł
mov %26,0
;G̋Zp͂2ł
mov %27,2
;eBA̐搧Ułi{̓pOtڂł̎擾j
mov %16,1
;G͈̐lł
mov %18,1

;wi͐Xł
mov $20,"bg_04san.bmp"
;G̃[eBO\
mov $23,"rate25.bmp"
;G̋
mov $22,"m03_battle1.mp3"
;G
mov $25,"mon08b.bmp"
return
;----------------------------------------
;\Zڂ̐퓬F҂̉e
*enemy26
;Ĝgo10ł
mov %21,10
;G̕^Cv36ԁijjł
mov %24,36
;G̍U͂1ł
mov %26,1
;G̋Zp͂0ł
mov %27,0
;eBA̐搧Ułi{̓pOtڂł̎擾j
mov %16,1
;G͈̐lł
mov %18,1

;wi͐Xł
mov $20,"bg_04san.bmp"
;G̃[eBO\
mov $23,"rate26.bmp"
;G̋
mov $22,"m03_battle1.mp3"
;G
mov $25,"mon08c.bmp"
return
;----------------------------------------
;\ڂ̐퓬FSCXG`
*enemy27
;Ĝgo12ł
mov %21,12
;G̕^Cv37ԁiŃASjł
mov %24,37
;G̍U͂1ł
mov %26,1
;G̋Zp͂0ł
mov %27,0
;eBA̐搧Ułi{̓pOtڂł̎擾j
mov %16,1
;G͈̐lł
mov %18,1

;wi͐Xł
mov $20,"bg_04san.bmp"
;G̃[eBO\
mov $23,"rate27.bmp"
;G̋
mov $22,"m03_battle1.mp3"
;G
mov $25,"mon13b.bmp"
return
;----------------------------------------
;\ڂ̐퓬FSCXGa
*enemy28
;Ĝgo5ł
mov %21,5
;G̕^Cv38ԁiŃASjł
mov %24,38
;G̍U͂0ł
mov %26,0
;G̋Zp͂0ł
mov %27,0
;eBA̐搧Ułi{̓pOtڂł̎擾j
mov %16,1
;G͈̐lł
mov %18,1

;wi͐Xł
mov $20,"bg_04san.bmp"
;G̃[eBO\
mov $23,"rate28.bmp"
;G̋
mov $22,"m03_battle1.mp3"
;G
mov $25,"mon13b.bmp"
return
;----------------------------------------
;\ڂ̐퓬F
*enemy29
;Ĝgo7ł
mov %21,7
;G̕^Cv39ԁiASjł
mov %24,39
;G̍U͂0ł
mov %26,0
;G̋Zp͂0ł
mov %27,0
;eBA̐搧Ułi{̓pOtڂł̎擾j
mov %16,1
;G͈̐lł
mov %18,1

;wi͐Xł
mov $20,"bg_04san.bmp"
;G̃[eBO\
mov $23,"rate29.bmp"
;G̋
mov $22,"m03_battle1.mp3"
;G
mov $25,"mon13a.bmp"
return
;----------------------------------------
;O\ڂ̐퓬
*enemy30
;Ĝgo20ł
mov %21,20
;G̕^Cv40ԁi܁jł
mov %24,13
;G̍U͂1ł
mov %26,1
;G̋Zp͂1ł
mov %27,1
;eBA̐搧Ułi{̓pOtڂł̎擾j
mov %16,1
;G͈̐lł
mov %18,1

;wi͐Xł
mov $20,"bg_01for.bmp"
;G̃[eBO\
mov $23,"rate13.bmp"
;G̋
mov $22,"m03_battle1.mp3"
;G
mov $25,"mon01b.bmp"
return
;----------------------------------------
;O\ڂ̐퓬FX̖\V
*enemy31
;Ĝgo5ł
mov %21,5
;G̕^Cv41ԁi\ꓪ˂jł
mov %24,41
;G̍U͂1ł
mov %26,1
;G̋Zp͂1ł
mov %27,1
;eBA̐搧Ułi{̓pOtڂł̎擾j
mov %16,1
;G͈̐lł
mov %18,1

;wi͐Xł
mov $20,"bg_01for.bmp"
;G̃[eBO\
mov $23,"rate22.bmp"
;G̋
mov $22,"m06_battle2.mp3"
;G
mov $25,"mon03b.bmp"
return
;----------------------------------------
;O\ڂ̐퓬FOC̃I[N
*enemy32
;Ĝgo6ł
mov %21,6
;G̕^Cv18ԁirjł
mov %24,18
;G̍U͂0ł
mov %26,0
;G̋Zp͂0ł
mov %27,0
;eBA̐搧Ułi{̓pOtڂł̎擾j
mov %16,1
;G͈̐lł
mov %18,1

;wi͐Xł
mov $20,"bg_01for.bmp"
;G̃[eBO\
mov $23,"rate08.bmp"
;G̋
mov $22,"m03_battle1.mp3"
;G
mov $25,"mon18e.bmp"
return
;----------------------------------------
;O\Oڂ̐퓬F_uI[N
*enemy33
;Ĝgo6ł
mov %21,6
;G̕^Cv41ԁi\ꓪ˂jł
mov %24,41
;G̍U͂0ł
mov %26,0
;G̋Zp͂0ł
mov %27,0
;eBA̐搧Ułi{̓pOtڂł̎擾j
mov %16,1
;G͈̐lł
mov %18,1

;wi͐Xł
mov $20,"bg_01for.bmp"
;G̃[eBO\
mov $23,"rate22.bmp"
;G̋
mov $22,"m03_battle1.mp3"
;G
mov $25,"mon18d.bmp"
return

;CxgpEBhE
*ev_window
textoff
mov %9,1
csp -1
print 1
gosub *migikuri

setwindow 25,465,30,4,23,23,0,10,15,0,1,":a;text_window2.bmp",0,450


return

;----------------------------------------
;܂Ȃ
*migikuri

lsph 0,":a;rmenu.bmp",0,0
lsph 1,":l/3,200,2;cursor0.bmp",0,0
lsph 2,":l/3,200,2;cursor1.bmp",0,0

return

;----------------------------------------
;퓬OA򑐏
*heal_phase

if %101==0 & %102==0 & %117==0 goto *modori
if %7==1 goto *modori
if %8>=1 goto *modori

if %101>=10 mov %101,9
if %102>=10 mov %102,9

gp܂H
br
@@@F@@%101
@@F@@%102
d̕@F@@%117

select "򑐂gpB",*yakusou,"gpB",*kongou,"d̕gpB",*yousei,"퓬ɓ܂",*modori

*yakusou
if %101==0 goto *no_have
sub %101,1
wave "power17.wav"
add %12,5
if %12>=%11 mov %12,%11
@gp򑐁C̗͉T_B\

gosub *tear_hpc
goto *heal_phase

*kongou
if %102==0 goto *no_have
sub %102,1
mov %7,2
wave "power07.wav"
@gpCZp_CP_B\
goto *heal_phase

*yousei
if %117==0 goto *no_have
sub %117,1
wave "power20.wav"
mov %12,%11
@gpdVC̗͊SB\
gosub *tear_hpc
goto *heal_phase

*no_have
@k⊶C꣎vLߘB@
@ҐPꠁB\
goto *heal_phase

*modori
return

;----------------------------------------
;`[gA
*chu

bg "tut1.bmp",2
click
bg "tut2.bmp",2
click
bg "tut3.bmp",2
click
bg "tut4.bmp",2
click
bg "tut5.bmp",2
click

goto *title

;----------------------------------------
;IʗpAtO\
*choice_flag

csp -1

lsp 40,"status3.bmp",600,0

if %170==1 lsp 10,"check1.bmp",660,70
if %171==1 lsp 11,"check1.bmp",660,100
if %172==1 lsp 12,"check1.bmp",660,130
if %173==1 lsp 13,"check1.bmp",660,160
if %174==1 lsp 14,"check1.bmp",660,190
if %175==1 lsp 15,"check1.bmp",660,220
if %176==1 lsp 16,"check1.bmp",660,250
if %177==1 lsp 17,"check1.bmp",660,280
if %178==1 lsp 18,"check1.bmp",660,310
if %179==1 lsp 19,"check1.bmp",660,340
if %180==1 lsp 20,"check1.bmp",660,370
if %181==1 lsp 21,"check1.bmp",660,400
if %182==1 lsp 22,"check1.bmp",660,430
if %183==1 lsp 23,"check1.bmp",660,460
if %184==1 lsp 24,"check1.bmp",660,490
if %185==1 lsp 25,"check1.bmp",750,120
if %186==1 lsp 26,"check1.bmp",750,150
if %187==1 lsp 27,"check1.bmp",750,180
if %188==1 lsp 28,"check1.bmp",750,210
if %189==1 lsp 29,"check1.bmp",750,240
if %189==2 lsp 29,"check2.bmp",750,240
if %190==1 lsp 30,"check1.bmp",750,270
if %191==1 lsp 31,"check1.bmp",750,300
if %192==1 lsp 32,"check1.bmp",750,330
if %193==1 lsp 33,"check1.bmp",750,360
if %194==1 lsp 34,"check1.bmp",750,390
if %195==1 lsp 35,"check1.bmp",750,420
if %196==1 lsp 36,"check1.bmp",750,450
if %197==1 lsp 37,"check1.bmp",750,480
if %198==1 lsp 38,"check1.bmp",750,510
if %199==1 lsp 39,"check1.bmp",750,540
print 1

gosub *migikuri

return

