$ibent+1

$rnd=#
!str $rnd+$ibent
!godown $rnd


#0
#1
!picarea 120,0,0,32,48
!picarea 250,96,0,32,240
!freturn2
#2

!freturn2
#3

!freturn2
#4

!freturn2
#5
!picarea 120,32,0,32,48
!picarea 250,128,0,32,240
!freturn2
#6

!freturn2
#7

!freturn2
#8

!freturn2
#9

!rnd $rnd,2
!if $rnd=0
!wav 41,0
!endif
!if $rnd=1
!wav 42,0
!endif

!picarea 250,160,0,32,240
!freturn2
#10

!freturn2
#11


!freturn2
#12

!freturn2
#13


!freturn2
#14

!freturn2
#15
!picarea 120,,0,32,48
!picarea 250,128,0,32,240
!freturn2

#16

!freturn2
#17

!freturn2
#18

!freturn2
#19
!picarea 120,32,0,32,48
!picarea 250,96,0,32,240

!freturn2
#20

!freturn2
#21

!freturn2
#22

!freturn2
#23

!freturn2
#24
!picarea 250,192,0,32,240
!freturn2

;---------------------覗き込みe
#25
#26
#27
!rnd $rnd,2
!if $rnd=0
!wav 41,0
!endif
!if $rnd=1
!wav 42,0
!endif
!picarea 250,224,0,32,240
!freturn2
#28
#29
#30
#31
#32
#33
!picarea 250,192,0,32,240
!freturn2
#34
#35
#36
#37
#38
$ibent=0
!freturn2
#39
#40
#41
!picarea 125,0,0,32,48
!freturn2
#42
!picarea 125,32,0,32,48
!freturn2
#43
!picarea 125,64,0,32,48
!freturn2
#44
!picarea 125,96,0,32,48
!freturn2
#45
!picarea 125,0,0,1,1
!freturn2
#46
!picarea 125,0,0,1,1
!freturn2
#47
!picarea 125,0,0,1,1
!freturn2
#48
!picarea 125,0,0,1,1
$ibent=40
!freturn2
#49
#50


!freturn2
;----------------------------------------------イベント
#kaishi
!wavset 2,hora3b.wav
!wav 2,1
$8x=264
$8y=44
$120x=$8x
$120y=$8y
$122x=$8x
$122y=$8y
$125x=$8x
$125y=$8y
$127x=$8x
$127y=$8y
$130x=$8x
$130y=$8y
$132x=$8x
$132y=$8y

$120x+130
$120y+170
!picarea 120,32,0,1,1
$132x+122
$132y-35
!picarea 250,64,0,32,240
!picon 250
!picpos 120,$120x,$120y
!picpos 122,$122x,$122y
!picpos 125,$125x,$125y
!picpos 127,$127x,$127y
!picpos 130,$130x,$130y
!picpos 132,$132x,$132y

!picpos 250,$132x,$132y

!picset 8,sindan1new1d.bmp
!picon 8
!picoff 300



!picpos 2,$8x,$8y
!picpos 8,$8x,$8y
!picpos 198,$8x,$8y
*
!pause 5
!picset 251,sindanscr1.bmp
!picoff 251
!picarea 251,0,0,640,480
!picpos 251,0,0

$plhoukou=96
$plbukihoukou=288
!picarea 1,0,1440,640,480
!picbl 300,1
!picpos 5,$5x,$5y
!picarea 100,$plmanime,$plhoukou,32,48
!picarea 150,$plmanime,$plhoukou,32,48
*
!pause 5
!picarea 250,32,0,32,240
*
!pause 5
!picarea 250,0,0,32,240
*

!wavset 41,key0.wav
!wavset 42,pipi.wav
!wavset 43,noizu1.wav
!wavset 44,noizu2.wav


!picpos 352,220,30
!picpos 355,160,300
!picpos 356,160,300
!picset 352,serihu1u1dr.bmp
!picset 355,serihu1d1dr.bmp
!fgosub2 kaiwamode.asdf

;
!picset 352,serihu1u2dr.bmp
!picset 355,serihu1d2dr.bmp
!fgosub2 kaiwamode.asdf

;
!picset 352,serihu1u3dr.bmp
!picset 355,serihu1d3dr.bmp
!fgosub2 kaiwamode.asdf

!wav 43,0
!picon 251
*
!pause 20
!picoff 251
*
!picset 352,serihu1u4dr.bmp
!picset 355,serihu1d4dr.bmp
!fgosub2 kaiwamode.asdf

!picset 352,serihu1u5dr.bmp
!picset 355,serihu1d5dr.bmp
!fgosub2 kaiwamode.asdf

!wav 43,0
!picon 251
*
!pause 20
!picoff 251
*

!picset 352,serihu1u6dr.bmp
!picset 355,serihu1d6dr.bmp
!fgosub2 kaiwamode.asdf

!wav 43,0
!picon 251
*
!pause 20
!picoff 251
*

!picset 352,serihu1u7dr.bmp
!picset 355,serihu1d7dr.bmp
!fgosub2 kaiwamode.asdf

!wav 43,0
!picon 251
*
!pause 20
!picoff 251
*

!picset 352,serihu1u8dr.bmp
!picset 355,serihu1d8dr.bmp
!fgosub2 kaiwamode.asdf

!wav 44,0
!picon 251
*
!pause 70
!picset 251,kuro.bmp
!picon 251
*
$132x=$8x
$132y=$8y
$132x+130
$132y-70

$120x=$8x
$120y=$8y
$120x+130
$120y+170
!picarea 120,32,0,32,48
!picoff 251
$ibent6=1

!picon 300
!pause 70
!wavset 2,geiger.wav
!wav 2,1
!file mapsindan1.asdf
!stop





















































