07/06/10 21:07:48
ACW(GETID("777タウン.net"))
MOUSEORG(GETID("777タウン.net"))
REPEAT
BTN(LEFT,CLICK,683,562,10)
UNTIL ((PEEKCOLOR(627,605) And $FF00) / $100) > 150
REPEAT
BTN(LEFT,CLICK,630,611,10)
UNTIL STATUS(GETID(GET_ACTIVE_WIN),ST_TITLE ) = "ミニメール"
ACW(GETID("ミニメール"))
MOUSEORG(GETID("ミニメール"))
REPEAT
BTN(LEFT,CLICK,29,43,10)
UNTIL STATUS(GETID(GET_ACTIVE_WIN),ST_TITLE ) = "メール作成"
SendStr(GETID("メール作成"),"永井ジーコ",1)
SendStr(GETID("メール作成"),"てんてー",2)
SendStr(GETID("メール作成"),"タマタマ見せてー(*´д`*)",3)
ClkItem(GETID("メール作成"),"送信")
REPEAT
SLEEP(0.1)
UNTIL STATUS(GETID(GET_ACTIVE_WIN),ST_TITLE ) = "ミニメール送信"
ClkItem(GETID("ミニメール送信"),"閉じる")
CTRLWIN(GETID("ミニメール"),CLOSE)