＞時間がかかる上に、面白くないですね…。
いや、あきまさは確実に上達しているぞ！
で、漏れからのアドバイス。
とにかく、コメントを大量に入れる事。
変数、サブルーチンなど全てにだ。
あきまさの部屋で君と顔付き合わせて相談している訳じゃ無いのだから。
具体的な指摘のレスが来ないのはこの為だよ。

例えば、変数なんかは、

'自機のＸ座標(0〜639まで)
'小数を加える場合もあるのでSingleにしている。
Dim px As Single

こんな風にコメント入れてくれていれば、解かりやすいだろ？
自分だけ解かれば良いとか、自分が解かるから他人も解かるだろうと
言うのはﾀﾞﾒﾀﾞﾒだね。