人力検索はてな
モバイル版を表示しています。PC版はこちら
i-mobile

UWSCでランダム処理

UWSCで下記のような処理をしたいのですがコードをご教授頂いてもよろしいでしょうか?

・『a』というキーをランダムで『1回』または『2回』または『6回』押す

$a=1;
$b=2;
$c=6;
という風にして、ランダムにa?cを選び、

for文の$iをこれにして『a』を繰り返し押せばいいのだと思いますが、

UWSCというものに詳しくないため非常に困っております。

●質問者: ty2016
●カテゴリ:コンピュータ
○ 状態 :終了
└ 回答数 : 3/3件

▽最新の回答へ

1 ● gong1971
●50ポイント

この質問でUWSCを知りました。便利そうですね。
ご要望の内容ですが、3通り均等の確率でよければ下記の通りとなります。


I = RANDOM(3)
IF I < 1 THEN
J = 1
ELSEIF I < 2 THEN
J = 2
ELSE
J = 6
ENDIF

FOR I = 1 TO J
KBD(VK_A)
NEXT


ty2016さんのコメント
この度はご回答ありがとう御座います。 実行してみたのですが、THEN: SyntaxError 2行目:IF < 1 THEN というエラーになってしまったようです。 (ですが、既にこの質問は解決したのでご心配なく)

gong1971さんのコメント
SyntaxErrorとの事なのでスペルミスかと思うのですが、 こちらでは正常に動作しています。コピー、ペーストされたでしょうか? 解決済みとの事なので参考までに。

2 ● Silvanus
●100ポイント ベストアンサー

Windowsアクセサリの"メモ帳"を起動した状態で
下記のUWSスクリプトを実行してみて下さい。

CTRLWIN(GETID("メモ帳"), ACTIVATE)
DIM nClick[] = 1, 2, 6
 FOR count = 1 TO nClick[INT(RANDOM(3))]
 KBD(VK_A)
 NEXT
KBD(VK_RETURN)

実行する度に、メモ帳の行に
"a"が1文字か2文字か6文字記入されると思います。
スクリプトの意味が解らなければその旨仰って下さい。
解説いたします。


Silvanusさんのコメント
ありゃ、リロードし忘れていて 回答かぶっちゃいましたね…済みません…orz。

ty2016さんのコメント
この度はご回答ありがとう御座います。 希望通りの動作をしてくれましたので、ベストアンサーにさせていただきます。 本当に素晴らしいです。

3 ● a-kuma3
●50ポイント

こんな感じで、どうでしょうね。

// 送るキー(文字列)を定義
DIM str[] = "a", "aa", "aaaaaa"

// キーを送るウィンドウのIDを取得
id = GETID(...)

// ランダムに選ぶ
i = RANDOM(Length(str))

// 文字列を送信する
SENDSTR(id, str[i])


以下のページを見ながら、想像で書いてます m(_ _)m
http://papuu.jp/wiki/index.php?%A5%BD%A5%D5%A5%C8%2FUWSC
http://www.uwsc.info/sample.html


ty2016さんのコメント
この度はご回答ありがとう御座います。 文字列を送信するやり方もあるのですね。参考にさせて頂きます。
関連質問

●質問をもっと探す●



0.人力検索はてなトップ
8.このページを友達に紹介
9.このページの先頭へ
対応機種一覧
お問い合わせ
ヘルプ/お知らせ
ログイン
無料ユーザー登録
はてなトップ