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


HSPTV!掲示板


未解決 解決 停止 削除要請

2013
1016
可憐波を描くようにマウスを動かす方法4未解決


可憐

リンク

2013/10/16(Wed) 02:44:13|NO.57623

画面ま端から端までに波を描くようにマウスを自動で動かしたいです。
波の上下の高さなども調整できるようなソースの書き方が思い浮かびません。
サンプル等頂けたらと思います。
よろしくお願いします。

仕事の都合で返事が遅れるかもしれませんがどうかよろしくお願いします



この記事に返信する


fortunehill

リンク

2013/10/16(Wed) 04:04:28|NO.57624

/*ご参考(修正)*/

#uselib "user32.dll" #func global ClientToScreen "ClientToScreen" sptr,sptr pp = 20,50 ;振幅(X,Y) aa = 30 ;角度 repeat 640/pp nn = cnt*pp,int(sin(deg2rad(cnt*aa))*pp(1))+240 ; nn = int(cos(deg2rad(cnt*aa))*pp)+320,int(sin(deg2rad(cnt*aa))*pp(1))+240 pos nn,nn(1) mes "●" ClientToScreen hwnd,varptr(nn) mouse nn,nn(1) await 100 loop



可憐

リンク

2013/10/17(Thu) 18:49:37|NO.57651

迅速な返信大変ありがとうございます
書いて頂いたソースなんですが
記事を作る際に書き込み忘れてしまいまして
実はmouse_event関数でやりたいんです。
どなたか知恵を分けて頂けたら大変嬉しいです。

もちろんfortunehillさんが書いてくださったソースも大切に使わしてもらいますねー!



test

リンク

2013/10/17(Thu) 19:13:32|NO.57652

fortunehillさんのスクリプトで、実際にマウス位置を変更しているのがどこかはお分かりかと思います(だからこそこのソースではmouse_eventが使われていないと分かったわけですね)。
mouse_event関数の存在をご存知だということはmouse_eventの使い方を調べることもできると思います。mouse_eventは使い方がそんなに難しい関数ではないので、Windows APIを使っていきたいならば練習としてご自分でfortunehillさんのスクリプトを書き換えてみてはどうでしょうか。



fortunehill

リンク

2013/10/17(Thu) 23:06:41|NO.57654

/*ご参考(SendInputからmouse_eventへのヒント)*/

#uselib "user32.dll" #func global ClientToScreen "ClientToScreen" sptr,sptr #func global mouse_event "mouse_event" sptr,sptr,sptr,sptr,sptr #func global SendInput "SendInput" sptr,sptr,sptr pp = 20,50 ;振幅(X,Y) aa = 30 ;角度 repeat 640/pp nn = cnt*pp,int(sin(deg2rad(cnt*aa))*pp(1))+240 ; nn = int(cos(deg2rad(cnt*aa))*pp)+320,int(sin(deg2rad(cnt*aa))*pp(1))+240 pos nn,nn(1) mes "●" ClientToScreen hwnd,varptr(nn) ii = 0,nn*(65535/ginfo_dispx),nn(1)*(65535/ginfo_dispy),0,$8001,0,0 SendInput 1,varptr(ii),28 ;mouse nn,nn(1) await 100 loop



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