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


HSPTV!掲示板


未解決 解決 停止 削除要請

2010
0217
トッポ卍下の方と似ていますが・・・3解決


トッポ卍

リンク

2010/2/17(Wed) 23:13:17|NO.30688

このツールのマウスの早さは変えれないでしょか?(もう少し早くしたいです。)
あとカーソルの動きを操作できないのでしょうか?
よろしくお願いします。

;================================================================================= ; ;llmod3を使った各moduleの使用例 ; ;================================================================================= #include "llmod3/llmod3.hsp" #include "llmod3/input.hsp" cls button "終了",*x15 mes "方向キーでマウスカーソルを移動できます" mes "SHIFTボタンを押すとマウスの左ボタンを押したことになります" *@ movx=0 : movy=0 getkey a,37 : if a : movx- ;←キー getkey a,38 : if a : movy- ;↑キー getkey a,39 : if a : movx+ ;→キー getkey a,40 : if a : movy+ ;↓キー ;SHIFTが押されたら左ボタンを押す getkey kSHIFT,16 if kSHIFT : a=$2 : else : a=0 mouse_event $1+a, movx, movy ;SHIFTを押すとマウスの左ボタンを押したことになりkが1になる getkey k,1 : if k : pset mousex,mousey ;SHIFTが押されてたら左ボタンを放す if kSHIFT : mouse_event $4 await 1 goto *@b *x15 end



この記事に返信する


hatter

リンク

2010/2/17(Wed) 23:30:04|NO.30689


;================================================================================= ; ;llmod3を使った各moduleの使用例 ; ;================================================================================= #include "llmod3/llmod3.hsp" #include "llmod3/input.hsp" cls button "自動",*x15 mes "方向キーでマウスカーソルを移動できます" mes "SHIFTボタンを押すとマウスの左ボタンを押したことになります" *@ movx=0 : movy=0 getkey a,37 : if a : movx-=3 ;←キー getkey a,38 : if a : movy-=3 ;↑キー getkey a,39 : if a : movx+=3 ;→キー getkey a,40 : if a : movy+=3 ;↓キー ;SHIFTが押されたら左ボタンを押す getkey kSHIFT,16 if kSHIFT : a=$2 : else : a=0 mouse_event $1+a, movx, movy ;SHIFTを押すとマウスの左ボタンを押したことになりkが1になる getkey k,1 : if k : pset mousex,mousey ;SHIFTが押されてたら左ボタンを放す if kSHIFT : mouse_event $4 await 1 goto *@b *x15 repeat movx-=5 mouse_event $1+a, movx, movy wait 10 loop end
どうでしょう?

ちなみに、下の方の誰とも似てるようには思わないですよ。

最後に蛇足というか、少し関係ないことですが....
HOMEの欄に適当な文字打つのをやめましょう。(打たなくても投稿できますよ....)



トッポ卍

リンク

2010/2/17(Wed) 23:43:14|NO.30692

ありがとうございます。
そうなんですか初めて知りました^^;



z

リンク

2010/2/18(Thu) 00:17:02|NO.30696

オレンジ = 大霊風 = トッポ卍 = 岐阜県に住んでる KY な人



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