#TITLE ふぁみこんむかし話 新・鬼ヶ島 / 第三章 ～とりでのなか～
#ARTIST Koji Kondo (Nintendo)
#CODING Mayu Hiraizumi (dic.nicovideo.jp/u/11448931)
#COMMENT 2014/1/18 rev.0


$LOOP = 128; /* 好きなだけリピート */


#WAV13 2,80 F0 F0 EE EE EC EC EA EA E9 E9 E7 E7 E5 E5 E4 E3 E2 E2 E1 E0 DF DE DD DD DC DB DA DA D9 D8 D7 D7 D6 D5 D5 D4 D3 D2 D2 D1 D0 D0 CF CE CE CD CC CC CB CB CA C9 C9 C8 C8 C7 C6 C6 C5 C4 C4 C3 C3 C2 C2 C1 C1 C0 C0 BF BF BD BE BC BD BB BD BA BC B9 BB B8 BA AA 18 10 12 11 14 13 16 15 18 17 19 19 1B 1B 1C 1C 1E 1E 20 20 21 21 23 23 24 25 26 26 27 28 29 29 2A 2B 2B 2C 2D 2D 2E 2F 30 30 31 32 32 33 33 34 35 35 36 37 37 38 38 39 3A 3A 3B 3B 3C 3D 3D 3E 3E 3F 3F 40 40 41 41 42 42 43 43 44 44 45 45 46 46 48 47 49 /* FC_Sqr(1:1) */


/* =-=-=- SQR -=-=-= */

$ExB5 = @E1, 0, 36, 0, 0; /* |＼ */
$LxB3 = @L3, 36, -3, 5, 99, 0;

t150 @13-2 @V40 o5 l12 @Q1 $ExB5 $LxB3
/:$LOOP
q14 ar <q16 ee4> q14 gr <q16 ee4> q14 ar <q16e> q14 gr <q16e> a2
q14 er  q16 bb4  q14 dr  q16 bb4  q14 er  q16b  q14 dr  q16b  e2
:/
;


/* =-=-=- SQR -=-=-= */

t150 @13-2 @V40 o6 l12 q16 @Q1 $ExB5
/:$LOOP
rrdd4 rrdd4 rrdrrd r2 >
rraa4 rraa4 rrarra r2 <
:/