HSPポータル
サイトマップ お問い合わせ


HSPTV!掲示板


未解決 解決 停止 削除要請

2008
0723
佐々野派マウスが・・・6解決


佐々野派

リンク

2008/7/23(Wed) 17:30:35|NO.17575

次のスプリクトで問題が起きます。
repeat
redraw 0
color 255,255,255
boxf
color 255,0,0
line 0,0,mousex,mousey
stick key,0
if key&16 : m=m+1 : if m>1 : m=0
if m=0 : mouse
if m=1 : mouse -1
wait 1
redraw 1
loop
スペースを押すとマウスカーソルがついたり消えたりするのですが
1回消してもう一度スペースを押したときに数秒たってから
マウスカーソルが現れるのですけどそれはなぜですか



この記事に返信する


SYAM

リンク

2008/7/23(Wed) 17:46:52|NO.17576

ヘルプには、mouse -1 を実行した回数だけ mouse を実行しないと再び表示されないと書いてあります。
mouse命令を、キーを押した時に一回だけ実行するようにしてみてはどうでしょう。今のままでは常に実行し続けていますね。



佐々野派

リンク

2008/7/23(Wed) 17:55:56|NO.17577

いっていることはわかったのですが
それはどのようにやったらいいのでしょうか。



高頻度通りすがり

リンク

2008/7/23(Wed) 18:32:17|NO.17579


repeat redraw 0 color 255,255,255 boxf color 255,0,0 line 0,0,mousex,mousey stick key,0 if key&16 : m=1-m : if m=1 : mouse -1 : else : mouse wait 1 redraw 1 loop

if文の部分が少しややこしくなりますけど、こんなのでいいんじゃないでしょうか。



inovia

リンク

2008/7/23(Wed) 18:37:25|NO.17580

mの変数を0や1以外にするとか・・・


repeat redraw 0 color 255,255,255 boxf color 255,0,0 line 0,0,mousex,mousey stick key,0 if key&16 : m=m+1 : if m>1 : m=0 if m=0 :mouse if m=1 :mouse -1:m=2 wait 1 redraw 1 loop



佐々野派

リンク

2008/7/23(Wed) 18:40:20|NO.17581

解決しました!ありがとうございました。



SYAM

リンク

2008/7/23(Wed) 18:59:25|NO.17582

あ 終わっちゃってましたね

m=1 *START stick s if (s&256){ if (m=1){ mouse -1 m=0 }else{ mouse m=1 } } wait 1 goto *START



ONION software Copyright 1997-2021(c) All rights reserved.