5
« on: September 28, 2014, 01:05:22 PM »
ух, полтора часа просидел, разбираясь в твоем примере посложнее) вот что получилось, переработанное под мои потребности
SUB(лог,$str)
$th = $_time_h
$tm = $_time_m
$ts = $_time_s
IF(STRLEN($th)<2)
$th = STRCONCAT ("0", $th)
END_IF
IF(STRLEN($tm)<2)
$tm = STRCONCAT ("0", $tm)
END_IF
IF(STRLEN($ts)<2)
$ts = STRCONCAT ("0", $ts)
END_IF
LOGWRITE ($th,":",$tm,":",$ts, " ",$str)
TFWRITE("Log.txt", STRCONCAT($th,":",$tm,":",$ts, " ",$str))
END_SUB
LCLICK(1089,78) // центр деры
WAITMS(RND(3000,5000))
GETSCREEN
IF_PICTURE_IN (1266, 284, 1288, 409, 1.bmp)
лог("время обнаружения напа")
HINTPOPUP("идет нап", "ПИСТЕЕЦЦ")
EXECUTE ("C:\Users\Ил\Desktop\Clickermann v4.10\data\sound\1.wav")
WAITMS(2000)
end_if // конец условия
HALT
хотя сейчас вот понимаю, что ето же самое сделать еще простче, ведь мне не нужно фиксировать альтернативно-отрицательные условия. если да - то записывает, а нет - так и ладно. получится вот так, верно?
LCLICK(1089,78) // центр деры
WAITMS(RND(3000,5000))
GETSCREEN
IF_PICTURE_IN (1266, 284, 1288, 409, 1.bmp)
$th = $_time_h
$tm = $_time_m
$ts = $_time_s
IF(STRLEN($th)<2)
$th = STRCONCAT ("0", $th)
END_IF
IF(STRLEN($tm)<2)
$tm = STRCONCAT ("0", $tm)
END_IF
IF(STRLEN($ts)<2)
$ts = STRCONCAT ("0", $ts)
END_IF
TFWRITE("Log.txt", STRCONCAT("Время обнаружения" $th,":",$tm,":",$ts, " "))
HINTPOPUP("идет нап", "ПИСТЕЕЦЦ")
EXECUTE ("C:\Users\Ил\Desktop\Clickermann v4.10\data\sound\1.wav")
WAITMS(2000)
end_if // конец условия
HALT
остались такие вопросы: как видишь, у меня стоит execute на аудио сигнал, то есть он открывается обычным проигрывателем, потому что обычным SOUND("1.wav") не играет звук. почему?