ちなみに教科書には、弾を上に発射する方法が書かれていまして・・・
もし、tfが０なら弾を発射して、画面上まで行って消えたらまた発射できるというものです。
if tf=0 { if ky&16 :tx=px+8 :ty=py-16 :tf=1 ; 自機弾の発射ｾｯﾄ
} ;
else { ty-=16 :if ty<0 :tf=0 ; 自機弾を進める
} ;

コレに、自機の方向をif文で追加して４つ貼ったら上手くいかなかったという・・・レベルの低いお話です。