uwsc ペイント おえかき 斜め線 |
|
| ACW(GETID("無題 - ペイント","MSPaintApp"),248,2,464,766,0)
dim px = 330, py = 200, r = 300, s = r / 2
for 回数 = 1 to 20
BTN(LEFT,DOWN,px,py,1)
MMV(px+300,py-100,1) if GETKEYSTATE(VK_SPACE) then exit // SPACEキーで終了 if GETKEYSTATE(VK_SPACE) then exit // SPACEキーで終了 MMV(px,py,1) BTN(LEFT,UP,px+300,py-100,10)
BTN(LEFT,DOWN,px+300,py-100,10) px=330 py=py+20 next
sleep(1)
GETTIME() TIME = G_TIME_HH2 + "時" + G_TIME_NN2 + "分" + G_TIME_SS2 + "秒" + G_TIME_ZZ2 + "ミリ秒" Print TIME
| |
|
2015年6月7日(日)19:15 | トラックバック(0) | コメント(0) | フリーソフト | 管理
|