HSP - Hot Soup Processor [6]

前スレでシューティングのキャラの動かし方について質問した者ですが、今度は弾
を発射するとこで躓いています。
サンプルなどから丸ごとコピーして使えばできるんですが、自分なりにプログラム
を作ってみるとうまく作動しません。サンプルと比較したり、何度も見直したりし
て、間違ってないはずなんですがエラーがでるわけではなく解決できません。
プログラムの順番や、例えばrepeat～loopの間にはawaitを入れる、など、なにか
注意することとかあるんでしょうか。
最近始めたばかりなんですが、皆さんが始めたときってうまくいきましたか？
いろんな本やサイトで探してもその辺のことはなかなか書いてないのでよかったら
聞かせてください。

>>10
うまく作動しません、と言われてもわかりません。
何がどう上手く動かないのか説明してくださいな。

動かないソースをうｐするのも良し。

>8
>9
ﾏｼﾞｳｹﾀ。

screen 0,960,640,4,20,20
buffer 2 : picload "jiki1.bmp"
jx=480 : jy=580
tamakazu=10
dim tamaon,tamakazu
dim tamax,tamakazu
dim tamay,tamakazu
gsel 0
*main
repeat
redraw 0
color 0,0,0 : boxf
gosub *jiki
gosub *tama
redraw 1
await 15
loop
*jiki
gosub *jikimove
pos jx,jy
gcopy 2,0,0,64,64
return

*jikimove
stick key,31
if key=1 : jx=jx-3
if key=2 : jy=jy-3
if key=4 : jx=jx+3
if key=8 : jy=jy+3
if key=3 : jx=jx-3 : jy=jy-3
if key=6 : jx=jx+3 : jy=jy-3
if key=9 : jx=jx-3 : jy=jy+3
if key=12 : jx=jx+3 : jy=jy+3
if jx<0 : jx=0
if jx>896 : jx=896
if jy<0 : jy=0
if jy>574 : jy=574
if key=16 : gosub *shots
return
*shots
repeat tamakazu
if tamaon.cnt=1 : continue
tamaon.cnt=1
tamax.cnt=jx
tamay.cnt=jy
break
loop
return

*tama
repeat tamakazu
if tamaon.cnt=0 : continue
tamay.cnt=tamay.cnt-10
pos tamax.cnt,tamay.cnt
mes "o"
if tamay.cnt<=0 : tamaon.cnt=0
loop
return

なんか修正ばかりしてもらって悪いなぁと思って。。質問ばかりなのでたいして
変わらないけど。
キャラが動くところまでは出来て、弾発射が出来ていません。まだ命令自体いまぐらい
が限界ですがよろしくお願いします

弾の色が背景の色と同じだなんて、俺にはとても言えないぜ。

すみません。ありがとうございます。
サンプルのヤツそのままコピーして、見てませんでした。
失礼いたしました。