HSPTV!掲示板

タイトル画面にて一定時間ごとに文字をフリッカし、ENTERキーを押したら
次の処理に移るというのをさせたいのですがどうしても
うまくいきません。どのようにすれば良いのでしょうか？

buffer 1:picload "title.jpg"
screen 0,512,384
gcopy 1,0,0,512,384 
repeat
stick ky:if ky=32 :break
count=count+1
timer=count\5
pos 120,250
gcopy 1,120,250,290,200
If timer=0{
font "MS ゴシック",40,1
pos 120,250:color 255,255,255:mes"push enter key"
wait 60
}
wait 40
loop

キーで次に移るっていうのはとりあえずおいといて、
たとえば
count に １を足す
もしcountが100なら0にする
countが50なら点滅させる文字を書く
countが99なら文字を消す
だけでもいいですよね。
countが0〜49のときは文字がなくて
50の時に書かれた文字は99の時に消されるまで残っているはずです。
あとは キーで抜ける操作を入れればokです

改造してみました。

buffer 1:picload dir_exe+"\\sample\\demo\\sky_bg.jpg"

screen 0,512,384
gcopy 1,0,0,512,384 
stick ky
font "MS ゴシック",40,1
color 255,255,255
count=0
pos 0,0

repeat
redraw 0
gcopy 1,0,0,512,384
if (cnt\60)<=30:pos 120,250:mes"push enter key":pos 0,0
stick ky,0:if (ky&32)|(ky&256):break
redraw 1
wait 1
loop

cls 2

　waitが60,40と指定されていたので、タイミング良く押すかずっと押すかしておかなければ
反応しなかったようです。なのでwaitを1にしました。
　あと、例として書くときには、画像はboxfで代理にするかhspのsampleフォルダにあるものを
使用すると、他の人でも再現できるのでおススメです。

↑
細かいですが、 redraw 0 の状態で抜けてるのでそのことに注意してないとハマります。
※以前ちょいハマったorz

>SYAMさん
返信ありがとうございました！あっredrawも抜けてました(^^;
恥ずかしいスクリプトで申し訳ありません。(汗）

>coinさん
とても分かりやすく改造して頂いてありがとうございます(^^
repeatですもの、cntが使えるんですよね・・・(恥ずかしい(汗））
waitの方も、仰る通り、タイミング良く押すかずっと押すかしておかなければ
反応しませんでした。waitのせいだったんですね(^^;;;;
画像の件もお手数おかけしてすみません。なるほど・・・サンプルの所にある
画像を使う手があったんですね・・・・今度からは使用します。。。