Show Posts
1
Общие вопросы / Re: Подскажите пожалуйста
« on: December 26, 2015, 09:57:16 PM »7 пятниц на неделе...[/spoiler]
Пустых строк в файле "1.txt" быть не должно
[spoiler]Code: (clickermann) [Select]WHILE(TFCOUNT("1.txt") > 0)
FOR($a=1,$a<7) // обработка 6 строк
$str = STRREPLACE(TFREAD("1.txt", $a), " ", " ")
STRSEPARATE($str, " ", $arr)
FOR($b=0,$b<ARRSIZE($arr))
SWITCH($arr[$b])
CASE(1)
LCLICK(465,365)
CASE(2)
LCLICK(515,365)
CASE(3)
LCLICK(569,365)
CASE(4)
LCLICK(621,365)
CASE(5)
LCLICK(673,365)
CASE(6)
LCLICK(725,365)
CASE(7)
LCLICK(465,400)
CASE(8)
LCLICK(515,400)
CASE(9)
LCLICK(569,400)
CASE(10)
LCLICK(621,400)
CASE(11)
LCLICK(673,400)
CASE(12)
LCLICK(725,400)
CASE(13)
LCLICK(465,435)
CASE(14)
LCLICK(515,435)
CASE(15)
LCLICK(569,435)
CASE(16)
LCLICK(621,435)
CASE(17)
LCLICK(673,435)
CASE(18)
LCLICK(725,435)
CASE(19)
LCLICK(465,470)
CASE(20)
LCLICK(515,470)
CASE(21)
LCLICK(569,470)
CASE(22)
LCLICK(621,470)
CASE(23)
LCLICK(673,470)
CASE(24)
LCLICK(725,470)
CASE(25)
LCLICK(465,505)
CASE(26)
LCLICK(515,505)
CASE(27)
LCLICK(569,505)
CASE(28)
LCLICK(621,505)
CASE(29)
LCLICK(673,505)
CASE(30)
LCLICK(725,505)
CASE(31)
LCLICK(465,542)
CASE(32)
LCLICK(515,542)
CASE(33)
LCLICK(569,542)
CASE(34)
LCLICK(621,542)
CASE(35)
LCLICK(673,542)
CASE(36)
LCLICK(725,542)
DEFAULT
END_SWITCH
WAITMS(100)
END_CYC
UNDEFINE($arr)
END_CYC
waitms(500)
lDown(422,60)
waitms(103)
lUp(422,60)
waitms(70)
lDown(422,60)
waitms(149)
lUp(422,60)
waitms(967)
lDown(560,19)
waitms(120)
lUp(560,19)
waitms(44)
lDown(560,19)
waitms(149)
lUp(561,19)
waitms(2358)
lDown(299,450)
waitms(144)
lUp(299,450)
waitms(4029)
lDown(296,449)
waitms(253)
lUp(296,449)
waitms(66)
lDown(296,449)
waitms(135)
lUp(297,449)
waitms(1722)
lDown(1360,589)
waitms(1085)
lUp(826,558)
waitms(471)
keyDown(162)
waitms(0)
keyDown(17)
waitms(329)
keyDown(67)
waitms(159)
keyUp(162)
waitms(0)
keyUp(17)
waitms(32)
keyUp(67)
waitms(2035)
rDown(1014,579)
waitms(123)
rUp(1014,579)
waitms(1107)
lDown(1054,638)
waitms(154)
lUp(1054,638)
waitms(2408)
lDown(1408,522)
waitms(146)
lUp(1408,522)
waitms(2141)
lDown(771,57)
waitms(89)
lUp(771,57)
waitms(4091)
keyDown(17)
waitms(0)
keyDown(162)
waitms(189)
keyDown(83)
waitms(117)
keyUp(83)
waitms(18)
keyUp(17)
waitms(0)
keyUp(162)
waitms(1480)
lDown(947,175)
waitms(79)
lUp(947,175)
WAITMS(500)
WHEELDOWN
WAITMS(100)
KEYDOWN(#DOWN)
WAITMS(100)
KEYUP(#DOWN)
WAITMS(100)
KEYDOWN(#DOWN)
WAITMS(100)
KEYUP(#DOWN)
WAITMS(100)
KEYDOWN(#DOWN)
WAITMS(100)
KEYUP(#DOWN)
WAITMS(100)
FOR($с=0,$с<6) // удаляем первые 6 строк из файла
TFDELETE("1.txt", 1)
END_CYC
END_CYC
HALT
Большое спасибо еще раз!
Теперь все работает идеально.
Вы вообще неутруждаете себя обдумыванием технического задания, а программисты приучены кодить так, как логически интерпритирует написанное, трезвый и психически здоровый человек. Неужели трудно, всего один раз вместо вежливых слов, быть вежливым по сути и немного подумать, как поймёт описание ваших хотелок другой человек? Ненужно бесконечно эксплуатировать отзывчивость модераторов, она ведь может пригодиться тем достойным людям, что нуждаются в помощи больше вас.Вы конечно правы в чем-то, но не в том, что я не утруждаю себя, это не так. Просто я не программист и без всякого обмана мне это очень сложно дается, перед тем как писать новое сообщении я по долгу сидел и пробовал сам и перечитал много инфы на форуме. Люди разные кому то это легко дается, а кому то нет.
Зато я могу с закрытыми глазами разобрать и собрать двигатель Т90. А кухарка приготовит такой вкусный борщ, который вы не когда в жизни не сможете сделать. И тут не в трезвости и психическом здоровье дело, а просто в умении что-то делать лучше чем другие ну и складе ума.
Хочу еще раз поблагодарить за помощь и пожелать приятно и весело провести всем новогодние праздники!!!
Удачи ребята с НОВЫМ ГОДОМ
тему закрываю