DouKaku?beta

Comment detail

2次元ランダムウォーク (Nested Flatten) 
uwsc はマウスとキーボード入力を記録して再生するソフトですが
スクリプト言語を備えています。
これを使ってランダムウォークをやってみました。出力にはwindows 付属の
paint を使いましたが、マウスのドラッグで線が描けるソフトならなんでも
いいと思います。
paint などでマウスのドラッグで線が描ける状態にして、uwsc を起動して
このスクリプトを読み込みます。マウスを開始したい位置に移動して
ALT+F1 で再生、ALT+F2で停止します。

see: uwsc 

 1
 2
 3
 4
 5
 6
 7
 8
 9
10
11
12
13
14
dim dx[4]=-1,1,0,0
dim dy[4]=0,0,-1,1
t=input("歩数(dot)=",500)
w=input("歩幅(dot)=",5)
x=G_MOUSE_X
y=G_MOUSE_Y
btn(left,down,x,y)
for i=1 to t
  r=random(4)
  x=x+w*dx[r]
  y=y+w*dy[r]
  mmv(x,y,10)
next
btn(left,up)

動作には直接影響しませんが、いくつか訂正します。
パラメータ入力の文字列の部分が変でした。

t=input("歩数(dot)=",500)

歩数の単位は歩幅なので (dot) は間違いでした。
パラメータの入力の順番は歩幅を先にした方が良いのかな。
配列に初期値を設定する場合は、要素数は省略可能でした。
 1
 2
 3
 4
 5
 6
 7
 8
 9
10
11
12
13
14
dim dx[]=-1,1,0,0
dim dy[]=0,0,-1,1
w=input("歩幅(dot)",5)
t=input("歩数",500)
x=G_MOUSE_X
y=G_MOUSE_Y
btn(left,down,x,y)
for i=1 to t
  r=random(4)
  x=x+w*dx[r]
  y=y+w*dy[r]
  mmv(x,y,10)
next
btn(left,up)

Index

Feed

Other

Link

Pathtraq

loading...
Creative Commons License このサイトの内容は、 クリエイティブ・コモンズ・ライセンスの下でライセンスされています。 [詳細]