Author Topic: 2 ошибки на функции которых нет в коде скрипта  (Read 2336 times)

0 Members and 1 Guest are viewing this topic.

tekton

  • Освоившийся
  • **
  • Posts: 29
    • View Profile
Вылетает ошибка, ссылается на какую то функцию, но самое интересное, что её нет в скрипте вообще.
Вот видео https://youtu.be/O269catYlNg
Версия кликера 4.12
Вот код:
[spoiler]
Code: (clickermann) [Select]

IF((ISKEYDOWN(#V) = 1) & (ISKEYDOWN(#ALT) = 1))

Print("Íàáðàíû Ðóêîïàøíèêè")

LCLICK(1181,154)  // êëèê íà "Âîåííûå"
LCLICK(1239,260)  // 6854805

FOR($a, $a < 3)
//LCLICK(462,565)  // íà þíèòå
LCLICK(547,572)  // íà þíèòå
WAITMS(500)
LCLICK(659,513)  // íàáðàòü ïî îäíîìó
WAITMS(500)
LCLICK(753,548)  // Îê
WAITMS(1000)
LCLICK(788,458)  // ïîìîùü àëà
WAITMS(500)
END_CYC
LCLICK(951,271)  // çàêðûâàåì
mysub()

    END_IF
//================================   

IF((ISKEYDOWN(#C) = 1) & (ISKEYDOWN(#ALT) = 1))

Print("Íàáðàíû ñòðåëêè")

LCLICK(1181,154)  // êëèê íà "Âîåííûå"
LCLICK(1239,260)  // 6854805

FOR($a, $a < 3)

LCLICK(551,565)  // íà þíèòå
WAITMS(500)
LCLICK(659,513)  // íàáðàòü ïî îäíîìó
WAITMS(500)
LCLICK(753,548)  // Îê
WAITMS(1000)
LCLICK(788,458)  // ïîìîùü àëà
WAITMS(500)
END_CYC
LCLICK(951,271)  // çàêðûâàåì
mysub()

END_IF

//=============================================
SUB(mysub)
LCLICK(56,259)  // Ïîìî÷ü àëó
WAITMS(300)
LCLICK(658,368)  // Ïîñìî÷ü âñåì
WAITMS(300)
LCLICK(916,234)  // çàêðûòü
WAITMS(500)
END_SUB
[/spoiler]

З.Ы.   При копировании кода из редактора, русские коментарии постоянно превращаются в крокозяблы.
В настройках выбран язык  "RU"
« Last Edit: June 08, 2016, 06:35:01 PM by tekton »

i0

  • Оплот сообщества
  • ****
  • Posts: 353
  • CMann 4.13.014 final, ie, presto, win7 x86, x64
    • View Profile
Quote from: help
Подпрограмму можно описать в любом месте сценария. Однако, описание подпрограммы должно быть раньше (выше) любого из ее вызовов.
поэтому возникает ошибка.

tekton

  • Освоившийся
  • **
  • Posts: 29
    • View Profile
Точно.
Спасиб :)

Oraven

  • Супермодератор
  • Герой форума
  • *
  • Posts: 3685
  • Котэ
    • View Profile
Еще у цикла FOR нет параметра начального значения, такой цикл отработает лишь раз а потом будет некому сбросиьт переменную в 0.
Также в конце нужно добавить маленькую задержку в 20 мс для разгрузки процессора. Уровень нагрузки лучше проконтралировать в диспетчере задач виндовс, так можно подобрать оптимальную задержку.

Code: (clickermann) [Select]
SUB(mysub)
   LCLICK(56,259)  // Помочь алу
   WAITMS(300)
   LCLICK(658,368)  // Посмочь всем
   WAITMS(300)
   LCLICK(916,234)  // закрыть
   WAITMS(500)
END_SUB

IF((ISKEYDOWN(#V) = 1) & (ISKEYDOWN(#ALT) = 1))
   
   Print("Набраны Рукопашники")
   
   LCLICK(1181,154)  // клик на "Военные"
   LCLICK(1239,260)  // 6854805
   
   FOR($a=0, $a < 3)
      //LCLICK(462,565)  // на юните
      LCLICK(547,572)  // на юните
      WAITMS(500)
      LCLICK(659,513)  // набрать по одному
      WAITMS(500)
      LCLICK(753,548)  // Ок
      WAITMS(1000)
      LCLICK(788,458)  // помощь ала
      WAITMS(500)
   END_CYC
   LCLICK(951,271)  // закрываем
   mysub()
   
END_IF

//================================

IF((ISKEYDOWN(#C) = 1) & (ISKEYDOWN(#ALT) = 1))
   
   Print("Набраны стрелки")
   
   LCLICK(1181,154)  // клик на "Военные"
   LCLICK(1239,260)  // 6854805
   
   FOR($a=0, $a < 3)
     
      LCLICK(551,565)  // на юните
      WAITMS(500)
      LCLICK(659,513)  // набрать по одному
      WAITMS(500)
      LCLICK(753,548)  // Ок
      WAITMS(1000)
      LCLICK(788,458)  // помощь ала
      WAITMS(500)
   END_CYC
   LCLICK(951,271)  // закрываем
   mysub()
   
END_IF

WAITMS(20)