HSPTV!掲示板

HSP今日初めて使い始めたんですが思った通りの動作ができません。何が原因か教えていただけませんか？；；

動作：左クリック中にタイトルにマウスの座標を表示する


#define WM_LBUTTONDOWN 0x0201
#define WM_LBUTTONUP　　　　0x0202

oncmd gosub *jump_oncmd, WM_LBUTTONDOWN

while(i=1)
title ""+ginfo(0)+" x "+ginfo(1)
wait 10
oncmd gosub *jump_oncmd2, WM_LBUTTONUP
wend

stop

*jump_oncmd2
i = 0
return

*jump_oncmd
i = 1
return


このように書いたのですが、クリックしても何も動きません。
ド素人ですいませんがお願いします。

while は指定された条件が成り立たなくなった時点でwendの次の行に飛びます。
そのプログラムではスタート時iの値は0なので結局while〜wendの間は一度も実行されません。
たぶんやりたかったことはこんな感じでできます。

#define WM_LBUTTONDOWN 0x0201
#define WM_LBUTTONUP 0x0202

oncmd gosub *jump_oncmd, WM_LBUTTONDOWN
oncmd gosub *jump_oncmd2, WM_LBUTTONUP

while(1)
if i=1:title ""+ginfo(0)+" x "+ginfo(1)
wait 10
wend

stop

*jump_oncmd2
i = 0
return

*jump_oncmd
i = 1
return

他にもこんな方法も

repeat
	getkey k,1
	if k:title ""+ginfo(0)+" x "+ginfo(1)
	wait 10
loop

あーー！なるほど！
ずっとwhileでループさせとけばいいのか！ありがとうございます！！