ビームのY座標移動判定の60行目、BY=BY2、となっていますが、BY2=BYにしてBY2で判定すればOKかと思います。 とても丁寧なリストですね^^♪