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


HSPTV!掲示板


未解決 解決 停止 削除要請

2010
0217
トッポ卍下の追加です><10未解決


トッポ卍

リンク

2010/2/17(Wed) 23:56:34|NO.30693

先ほど質問しわすれてしまったのですいません。
このスクリプトはどこをどのようにすれば思ったようにうごかせるんですか?
(ぜんぜんわからなくて・・・)
    
;=================================================================================
; ;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



この記事に返信する


Taddi

リンク

2010/2/18(Thu) 00:13:03|NO.30694

質問への回答ではありませんが、
長くこの掲示板で回答されている方々は、
名前を変えても、
同じ人物が投稿していること判別する方法を知っています。
マナーを守って、利用された方が良いかと思います。



z

リンク

2010/2/18(Thu) 00:16:53|NO.30695

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



トッポ卍

リンク

2010/2/18(Thu) 00:26:10|NO.30698

すいません。
でも、オレンジは兄が勝手にやってしまいました。僕は反省してます。
教えてくれないでしょうか?
このスクリプトはどこをどのようにすれば思ったようにうごかせるんですか?
(ぜんぜんわからなくて・・・)
お願いします。    

<pre>;=================================================================================
;
;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




トッポ卍

リンク

2010/2/18(Thu) 00:26:50|NO.30699

上すいませんミスです。



荒河軒持

リンク

2010/2/18(Thu) 12:10:30|NO.30702

>>オレンジ
>(ぜんぜんわからなくて・・・)
プログラミング・マニュアル等の公式の資料はちゃんと読んでるかな?
そのプログラムは難しい物ではないからF1キーで命令の意味を調べていけば分かるはず。
それでも分からないならプログラミングマニュアルをよ〜く読むと良いよ。



トッポ卍

リンク

2010/2/18(Thu) 18:38:02|NO.30715

もう少し詳しく教えてください。



check

リンク

2010/2/18(Thu) 18:51:37|NO.30716

まず、HSPのエディタを開きます。
次に、キーボードの左上のほうにあるF1とかかれたボタンを押します。
すると、ヘルプが起動します。
なので、右上にある検索ボックスに調べたいワードを入れて検索ボタンを押しましょう。
そうすればヘルプを見ることができます。



hatter

リンク

2010/2/18(Thu) 19:08:36|NO.30717

まあ、ヘルプなんて見なくても命令の意味は想像つくと思います。
ようはmouse_eventでマウスを指定された分動かしてます。
そしたら、あとはそれで動かすだけ。

下記に提示するスクリプトを応用すればどのような風にも動かせます。
ユーザーが動かした通りにも....三角形にも円形にも.....
もし、できないようでしたらあなたの力量不足です(HSPの経験を積みましょう)。

;================================================================================= ; ; 正方形にマウスを動かす ; ;================================================================================= #include "llmod3/llmod3.hsp" #include "llmod3/input.hsp" repeat switch (cnt/100)\4 case 0:mouse_event $1+a, 5,0:swbreak case 1:mouse_event $1+a, 0,5:swbreak case 2:mouse_event $1+a, -5,0:swbreak case 3:mouse_event $1+a, 0,-5:swbreak swend await 1 loop



しきり2

リンク

2010/2/18(Thu) 20:22:48|NO.30720

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

ん?僕は、トッポ卍何だけどな?
オレンジは、僕の弟です今、2人で何かしらのプログラムを作ろうって事になってます。

みたいな言い訳するのと変わらんな。



晩御飯

リンク

2010/2/19(Fri) 01:20:35|NO.30730

「ぜんぜんわからない」ことを書く場所じゃないんだよ。
「ここがわからない」ことを書く場所なんだよ。



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