Scripting module with syntax highlight. DOWNLOAD.

[GMX]

http://www.sharemania.ru/0251250

Скриптовый модуль с подсветкой синтаксиса. Предлагаю потестить.
Дальше будем работать над авторасстановкой отступов.

27.12.2010 г.: добавил кнопку "Sweep code", автоматически расставляющую отступы.

[Mirage]

замечание удалил так как исправлено.

А за что тебе искренний РЕСПЕКТ так это за то что теперь когда в строку чтото ВСТАВЛЯЕШЬ (CTRL+V) строка НЕ УДАЛЯЕТСЯ как раньше!! Вот это мегогеморную штуку пофиксил!

Вот теперь ваще красиво. Позаимствовал в о все свои инжекты.

Отдельное спасибо за расставление отступов прямо в редакторе. + стопицот!

[GMX]

Ишь ты шайтан... +1
Зря убрал фишку когда показывались в запуске только скрипты начинающиеся с sub. Sub не показывались и в них вводили процедуры.
В твоей редакции видно все и путаешься где нужное а где вспомогательное.

Вернуть без проблем. Надо будет - вернем. В моем варианте берет список функций из самого парсера.

Пару раз запустил функцию loot (свою). Скрипт запускается и ДОЛЖЕН БЫ закончив поиск завершится но он зависает в запущенных скриптах - приходится рубить руками.
На 5 раз запуска вылезла ошибка.

В парсер я вообще не лез - это к вопросу об ошибках. Что зависает? У тебя есть функция terminate в скрипте? Ее я еще не сделал пока. Она есть у Йоко, но нет исходников.

[Blood Slayer]

Code: Select all

sub antimacro() 

   var x, y 
    
   while  not uo.Dead() 
      if (uo.LastGump('replyed') == 0) and (uo.LastGump('text', 0)  == 'Please choose this number:') then 
         x = uo.LastGump('x') 
         y = uo.LastGump('y') 
         uo.LClick(x+120, y+185+what()*35) 
         wait(1000) 
      end if 
      wait(100) 
   wend 

end sub 
       
sub what() 

   var i, score, index, temp, st 
   dim x[11], y[11] 
   dim nm[3] 
    
   for i = 3 to 12 
      st = uo.LastGump('command', i) 
      x[i-2] = val(mid(st, 8, 3)) 
      y[i-2] = val(mid(st, 12, 3)) 
   next 
   for i = 0 to 2 
      nm[i] = val(uo.LastGump('text', i+1)) 
   next 
   score = 10000 
   index = 0 
   for i = 0 to 2 
      temp = numberscore(nm[i], x, y) 
      if score > temp then 
         score = temp 
         index = i 
      endif 
   next 
   return index 

end sub 

sub numberscore(num, x, y) 

   dim Sings[10] 
   var cheking = 1 
   var n, i, total = 0 
   dim xv[2], yv[2], point[3] 
    
   Sings[2] = "080910080506" 
   Sings[3] = "040706060708" 
   Sings[5] = "040506060708" 
   Sings[6] = "070910050608" 
   Sings[8] = "030506060709" 
   Sings[9] = "040607050807" 
    
   for n = 0 to 1 
      for i = 0 to 2 
         point[i] = val(mid(Sings[num], n*6+i*2, 2)) 
      next 
      for i = 0 to 1 
         xv[i] = x[point[i]]-x[point[i+1]] 
         yv[i] = y[point[i]]-y[point[i+1]] 
      next 
      total = total+anglscore(xv, yv) 
   next 
   return total 

endsub 
       
sub anglscore(x, y) 

   var xy1 = x[0]*y[0] 
   var xy2 = x[1]*y[1] 
   var t = xy1+xy2 
    
   x[0] = x[0]+y[0] 
   x[1] = x[1]+y[1] 
   return 100*t*t/((x[0]*x[0]-2*xy1)*(x[1]*x[1]-2*xy2)) 

end sub 

Вот нашол антимакро абисовское

[Mirage]

Вот нашол антимакро абисовское

Чето ты не в попад...
Он переписал и рекламирует СКРИПТОВЫЙ МОДУЛЬ, а не скрипт просит
Апгрейд инжекта так скать.

GMX красавчег. Всем качать.

[Blood Slayer]

Вообщем попользовался. Свеепкод просто круть. Подсветка тож отлично.
Но.
1. Номер строчки и колонки, отображается только когда там ченить пишеш/стираеш.
2. Почему ставить таб перед началом скрипта? Ну перед sub.

И еще свеепаю = пишет что у меня чет в скрипте не правильно, но в каком? у меня там на 2000 строк скрипты. Можно както подсветить?

[Андрюха из Одессы]

Гранд респект за труды

[GMX]

1. Номер строчки и колонки, отображается только когда там ченить пишеш/стираеш.

Принято. Займемся.

2. Почему ставить таб перед началом скрипта? Ну перед sub.

Не понял. Можно пояснее?

И еще свеепаю = пишет что у меня чет в скрипте не правильно, но в каком? у меня там на 2000 строк скрипты. Можно както подсветить?

Может относится к предыдущему вопросу? Кривость скрипта, приводит к кривости свипинга.
А вообще подумаем.

[Mirage]

гигантские скрипты аля мининг по n рунам часто бывают с опечатками в какойнибудь левоненужной процедуре которая используется раз в полгода. Но все что ниже этой опечатки будет криво проотступленно.

Старая версия скриптоотступалки не понимала endif и endsub когда писались слитно.

[Makarov]

Ух ты, мегаполезная вещь, GMX спасибо.

[Mirage]

Небольшое замечание, не очень мешающее жизни но всетаки...
Когда загружаешь скрипт команды в окошке запуска не всегда обновляются.

[GMX]

В ближайшее время обновления вряд ли появятся. В офисе ремонт продлится еще недели две-три. Как въеду обратно - засяду за модуль.

[666||TORCHKI]

Ух-ты огромное спасибо

[Alex82]

С АSM не совместим. Очень жаль

[Андрюха из Одессы]

У кого-то осталась данная вкусняшка? Поделитесь пожалуйста