[解決済] ○○を押し続けていると××が起こる、ということをするためには（質問掲示板）
投稿: 
池ちゃん(翡翠ヶ池)
投稿：2012/11/23 10:50:23（最新：2012/11/23 13:17:23）
池ちゃん(翡翠ヶ池)
投稿：2012/11/23 10:50:23（最新：2012/11/23 13:17:23）
○○を押し続けていると××が起こる、ということをするためにはどうしたらいいのでしょうか？
これだとだめみたいですが・・・
ツイート
startInput() #キー操作ココから
key=true
keyy=true
while key
while hasInput()
takeInput()
if isKeyUp("ENTER")
key=false
elsif isKeyDown("UP")
#最初の動作
speak("a")
while keyy
#押し続けている時の動作
if isKeyUp("UP")
keyy=false
speak("b")
end
end
end
end #hasInput終
waitTime(10)
end #keyループ終
endInput() #キー操作ココまで
これだとだめみたいですが・・・
コメントする
コメントするには、ログインする必要があります。
押したときにフラグを立てて
離したときにフラグをおろすだけで
OKですよ。
あと、動き続けるタイプのスクリプトは
途中でループが一時停止するような
speakとかを使うと
ちゃんと動かないことが多いです。
startInput() #キー操作ココから key=true U=false text = createText(200, 200, 700, 300) a = 0 t = "上キーを押し続けてください" while key setText(text, a,"\n",t) while hasInput() takeInput() if isKeyDown("ENTER") key=false elsif isKeyDown("UP") U = true t = "キーを離すと、止まります。" elsif isKeyUp("UP") U = false t = "上キーを押し続けてください" end end #hasInput終 if U #押し続けている時の動作 a= a + 1 end waitTime(10) end #keyループ終 endInput() #キー操作ココまで適当に書き換えてみました。
とりあえず、これをコピーして
試してみてください（＾＾）
なにすればいいかは、
実行すると自動的に表示されます。