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)