GETSCREEN
IF_PICTURE_IN (0,0, $_xmax,$_ymax, "1.bmp")
LCLICK($_return1, $_return2)
wait(1)
WHEELDOWN (300)
wait(1)
END_IF
GETSCREEN
IF_PICTURE_IN (0,0, $_xmax,$_ymax, "2.bmp", -1, 100)
LCLICK($_return1, $_return2)
WAITMS(100)
END_IF
WAIT(1)
GETSCREEN
IF_PICTURE_IN (0,0, $_xmax,$_ymax, "9.bmp", -1, 100)
LCLICK($_return1+150, $_return2)
LCLICK($_return1+150, $_return2)
KEYDOWN (#CTRL)
WAITMS (50)
KEYPRESS (#C)
KEYUP (#CTRL)
LCLICK(85,629)
WHEELDOWN (300)
END_IF
WAIT(1)
$data = FROMCLIP()
UNDEFINE($arr)
STRSEPARATE($data, ".", $arr)
GETSCREEN
IF_PICTURE_IN (0,0, $_xmax,$_ymax, "6.bmp", -1, 100)
LCLICK($_return1+50, $_return2+10)
WAITMS(20)
LCLICK($_return1+50, $_return2+10)
WAIT(1)
END_IF
KEYSTRING(INT($arr[0]), 50)
GETSCREEN
IF_PICTURE_IN (0,0, $_xmax,$_ymax, "7.bmp", -1, 100)
LCLICK($_return1+100, $_return2+10)
END_IF
waiTMS(500)
GETSCREEN
IF_PICTURE_IN (0,0, $_xmax,$_ymax, "10.bmp", -1, 100)
LCLICK($_return1, $_return2)
WAITMS(300)
END_IF
//Печать месяца
$countdown = 12 - INT($arr[1])
FOR($i=0, $i < $countdown)
KEYPRESS(#UP)
WAITMS(60)
END_CYC
GETSCREEN
IF_PICTURE_IN (0,0, $_xmax,$_ymax, "8.bmp", -1, 100)
LCLICK($_return1, $_return2)
LCLICK($_return1, $_return2)
WAIT(1)
END_IF
KEYSTRING(INT($arr[2]), 50)
GETSCREEN
IF_PICTURE_IN (0,0, $_xmax,$_ymax, "3.bmp", -1, 100)
LCLICK($_return1, $_return2)
WAITMS(100)
END_IF
WAIT(1)
GETSCREEN
IF_PICTURE_IN (0,0, $_xmax,$_ymax, "4.bmp", -1, 100)
LCLICK($_return1, $_return2)
WAIT(1)
END_IF
WAIT(10)
GETSCREEN
IF_PICTURE_IN (0,0, $_xmax,$_ymax, "5.bmp", -1, 100)
LCLICK($_return1, $_return2)
WAIT(1)
END_IF
Ура, закончил со своим первым скриптом. поправьте, если я где то не прав, если можно, то с пометками