//キーボードイベントとマウスイベントを一定時間ごとに自動で発生させるプログラム．
//自動で発生させるかは変数flagで管理されている．
//キーボードのAを押すとフラグを立てたり折ったりする．
//mouse_event命令はhttp://lhsp.s206.xrea.com/hsp_mouse.html，
//keybd_event命令はhttp://lhsp.s206.xrea.com/hsp_keyboard.html
//を参照してください．
//user32.as をインクルードする必要があります．
//ちなみにこれはチャットワークを自動で遡るために作りました．
#include "user32.as"
onkey gosub *ChangeFlag
flag = 1
repeat
if flag = 1{
mouse_event $00000002,0,0,0,0;マウス左ボタンダウン
await 1
mouse_event $00000004,0,0,0,0;マウス左ボタンアップ
await 1
keybd_event 36,0,0,0;HOMEボタンダウン
await 1
keybd_event 36,0,2,0;HOMEボタンアップ
}
title "flag = " + flag
wait 200
loop
*ChangeFlag
if(wparam == 65){;キーボードのAで，自動送出をする/しないを切り替える
flag = 1 - flag
}
return