こんにちは、HSP初心者のものです。
現在、ある画面で2種類以上の音を鳴らしたいと考えており、
下記のようなプログラムを組んでみました。
;タイトル画面
screen 0,640,480
;画像の読み込み
buffer 1 ; 背景画像の読み込み
picload "img/タイトル.png"
gsel 0 ; 画面「0」に描画先指定
pos 0,0 ; 背景画像の貼り付け位置指定
gcopy 1,0,0,640,480 ; 背景画像の貼り付け
;音楽ファイル読み込み
mci "open \"se/カーソル移動.mp3\" alias f0"
mci "open \"bgm/menu.wav\" alias f1"
mci "play f1"
;カーソル初期位置
cursor_x = 260
cursor_y = 340
*カーソル上下
redraw 0;チラツキ防止その1
gsel 0 ; 画面「0」に描画先指定
pos 0,0 ; 背景画像の貼り付け位置指定
gcopy 1,0,0,640,480 ; 背景画像の貼り付け
;メニュー一覧
pos 280,340
color 255,255,255
;フォントの設定
font "MS ゴシック", 20
mes "スタート"
mes"オプション"
mes"リプレイ"
mes"終了"
;カーソルを表示
pos cursor_x,cursor_y
color 255,255,255
mes"▼"
stick key
if(key=2){;上入力
cursor_y = cursor_y - 20
mci "play f0"
}
if(key=8){;下入力
cursor_y = cursor_y + 20
mci "play f0"
}
;移動の行き止まりと場所入れ替え
if(cursor_y>400){
cursor_y = 340
mci "play f0"
}
if(cursor_y<340){
cursor_y = 400
mci "play f0"
}
;メニューに応じたところでZキーを押したときの反応
redraw 1 ;チラツキ防止その2
await 16
goto *カーソル上下
ところが、問題が発生しました。
カーソルを動かしたときの小さい音が一回しか鳴らないのです。
カーソルを入力する度繰り返し音を鳴らせたいのですが、
どうすればよいのでしょうか…?
分からなくて途方にくれています。