Форум
Написать нам
  • Страница 1 из 1
  • 1
Модератор форума: as-master  
Тестируем правильный скрипт
MangozДата: Вторник, 03 Февраля 2009, 20:06 | Сообщение # 1
Ветеран форума
Группа: Проверенные
Сообщений: 215
Репутация: 1
Награды: 2
Статус: Offline
Тестируем прогу по поиску косяков в наших скриптах.
Скачать: http://depositfiles.com/files/681e85ldm

Всё сюда... happy


MMB. Найдём всё!
 
DEMBELДата: Вторник, 03 Февраля 2009, 20:37 | Сообщение # 2
Наш дизайнер
Группа: Модераторы
Сообщений: 2266
Репутация: 135
Награды: 32
Статус: Offline
Исправь косяк с кодировкой (где слова красным), в тексте неверного сообщения выскакивает системное предупреждение Multimedia Player - а лучше бы собственное. Тестировать опять же нечего, только ффтыкать надпись чтоли? Будет возможность свой код вставлять, тогда и появится обьект тестирования, собственно...

Добавлено (03 Февраль 2009, 20:37)
---------------------------------------------
правильно - checker




Win7x64 SP1 Neobook v5.70 (Trial)
WinXP SP3 Neobook v5.62
 
MangozДата: Вторник, 03 Февраля 2009, 20:41 | Сообщение # 3
Ветеран форума
Группа: Проверенные
Сообщений: 215
Репутация: 1
Награды: 2
Статус: Offline
Quote (DEMBEL)
Будет возможность свой код вставлять, тогда и появится обьект тестирования, собственно...

Что значит будет возможность - копируй и вставляй!
Кокраз где надпись корявая красная. там написано - вставте текст в форму!


MMB. Найдём всё!


Сообщение отредактировал Mangoz - Вторник, 03 Февраля 2009, 20:42
 
DEMBELДата: Вторник, 03 Февраля 2009, 20:55 | Сообщение # 4
Наш дизайнер
Группа: Модераторы
Сообщений: 2266
Репутация: 135
Награды: 32
Статус: Offline
ну дык я не умею кракозябры читать! сейчас проверим...



Win7x64 SP1 Neobook v5.70 (Trial)
WinXP SP3 Neobook v5.62
 
MangozДата: Вторник, 03 Февраля 2009, 20:56 | Сообщение # 5
Ветеран форума
Группа: Проверенные
Сообщений: 215
Репутация: 1
Награды: 2
Статус: Offline
К примеру:
Это правильный скрипт!
Code
If (ObjectX(Circle4)<x+50&ObjectX(Circle4)+30>x) Then
    If (ObjectY(Circle4)<y+75&ObjectY(Circle4)+30>y) Then
      WavePlay("aphex hi 2 long","")
      bn=bn-5
      benz=bn-BNT
      DisplayValue("Text2","benz")
      MoveObject("Rectangle2","ObjectX(Rectangle2),ObjectY(Rect angle2),benz,4")
      RunScript("Script2")
      MoveObject("Circle4","RND(50)*10+500,RND(37)*10")
    End
End
If (ObjectX(Circle3)<x+50&ObjectX(Circle3)+30>x) Then
    If (ObjectY(Circle3)<y+75&ObjectY(Circle3)+30>y) Then
      WavePlay("aphex hi 2 long","")
      **
      **
      ** бег.строка
      MoveObject("Text4","0,100,150")
      bn=bn+5
      benz=bn-BNT
      If (benz>100) Then
        benz=100
      End
      DisplayValue("Text2","benz")
      MoveObject("Rectangle2","ObjectX(Rectangle2),ObjectY(Rectangle2),be nz,4")
      RunScript("Script2")
      MoveObject("Circle3","RND(50)*10+500,RND(37)*10")
    End
End

А это неправильный скрипт:

Code
If (ObjectX(Circle4)<x+50&ObjectX(Circle4)+30>x) Then
If (ObjectY(Circle4)<y+75&ObjectY(Circle4)+30>y) Then
WavePlay("aphex hi 2 long","")
bn=bn-5
benz=bn-BNT
DisplayValue("Text2","benz")
MoveObject("Rectangle2","ObjectX(Rectangle2),ObjectY(Rectangle2),benz,4")
Ru nScript("Script2")
MoveObject("Circle4","RND(50)*10+500,RND(37)*10")
End
End
If (ObjecttX(Circle3)<x+50&ObjectX(Circle3)+30>x) Then
If (ObjectY(Circle3)<y+75&ObjectY(Circle3)+30>y) Then
WavePlay("aphex hi 2 long","")
**
**
** бег.строка
MoveObject("Text4","0,100,150")
bn=bn+5
benz=bn-BNT
If (benz>100) Then
benz=100
End
DisplayValue("Text2","benz")
MoveObject("Rectangle2","ObjectX(Rectangle2),ObjectY(Rectangle2),benz,4")
RunScript("Scr ipt2")
MoveObject("Circle3","RND(50)*10+500,RND(37)*10")
End
End

Попробуй найти косяк без программы? smile Если скрипт громадный!


MMB. Найдём всё!
 
DEMBELДата: Вторник, 03 Февраля 2009, 21:01 | Сообщение # 6
Наш дизайнер
Группа: Модераторы
Сообщений: 2266
Репутация: 135
Награды: 32
Статус: Offline
ну вот - вставил скрипт из проекта в форму, запустил, и полезли сообщения что невозможно найти прикрепленный файл (у меня в проекте файлы есть прикрепленные). На этом процесс зациклился. Ты как форму слепил, из вспомогательного mbd-проекта?



Win7x64 SP1 Neobook v5.70 (Trial)
WinXP SP3 Neobook v5.62
 
MangozДата: Вторник, 03 Февраля 2009, 21:13 | Сообщение # 7
Ветеран форума
Группа: Проверенные
Сообщений: 215
Репутация: 1
Награды: 2
Статус: Offline
Quote (Mangoz)
Ты как форму слепил, из вспомогательного mbd-проекта?
Нееее. Ну ка кинь код

Срабатывает на Open команды и Message сообщения если стоят в начале или в конце скрипта. Но это же не ошибки, просто плагин походу исполняет некоторые команды.

Добавлено (03 Февраль 2009, 21:11)
---------------------------------------------
Опа - внатуре! Когда в скрипте есть обращение к вложеным фалам, пишет что не может найти эти файлы и окно сжимается как-то странно в угол sad
Хммм. синхрофазатрон какой-то получается!

Добавлено (03 Февраль 2009, 21:13)
---------------------------------------------
Пока это первый серъёзный косяк!


MMB. Найдём всё!


Сообщение отредактировал Mangoz - Вторник, 03 Февраля 2009, 21:06
 
DEMBELДата: Вторник, 03 Февраля 2009, 21:30 | Сообщение # 8
Наш дизайнер
Группа: Модераторы
Сообщений: 2266
Репутация: 135
Награды: 32
Статус: Offline
вот из-за чего ошибка - твоя прога пытается обработать строки вида
Code
Run("<Embedded>\Regf.vbs","run$")

пытается их запустить, в результате ошибка. Ну соответственно будут ошибки и на другие подобные строчки, и наверное не только на "Run"...

Добавлено (03 Февраль 2009, 21:30)
---------------------------------------------
вижу и сам догадался...




Win7x64 SP1 Neobook v5.70 (Trial)
WinXP SP3 Neobook v5.62
 
toizyДата: Вторник, 03 Февраля 2009, 23:29 | Сообщение # 9
Студийная субстанция
Группа: Администраторы
Сообщений: 2309
Репутация: 29
Награды: 12
Статус: Offline
Называется, программа для тех, кто не умеет без программы... Ну, заценим ща...

Кстати, неужели обязательно выкладывать на депозит? у меня до сих пор счётчик висит на 8 минут, готов убить кого угодно.

А насчёт имеи, имхо, если руки из того места, то никакая программа не нужна

Добавлено (03 Февраль 2009, 23:27)
---------------------------------------------

Quote (DEMBEL)
выскакивает системное предупреждение Multimedia Player - а лучше бы собственное.

Я так понимаю, используется штатная функция запуска сценариев из ММВ. А посему своего сделать не получится...

Quote (DEMBEL)
полезли сообщения что невозможно найти прикрепленный файл

Исходя из первого, неисправимая ошибка

Вообще, посмотрел прогу, и да, для спортивного интереса пойдёт, а для реального использования... Ну не возникало у меня никогда необходимости использовать что-то для проверки, кроме рук и редактора ММВ. Даже если проверить скрипт на ошибки, то никакой подсветки неверных строк ждать не приходится. если бы она была, то это было бы лучше, чем **Error в редакторе сценария, которое оттуда приходится удалять в бешенстве и исступлении. Но её нет.

А за идею - +1 smile

Добавлено (03 Февраль 2009, 23:29)
---------------------------------------------

Quote (toizy)
Исходя из первого, неисправимая ошибка

Хотя нет, поторопился. Можно извлекать из кода все пути <Embedded> и создавать пустые текстовые файлы по этим путям... Сделаешь - респект smile


Жизнь оказалась не такой уж и забавной, как поначалу...
 
Alex3AДата: Среда, 04 Февраля 2009, 01:52 | Сообщение # 10
Друг клуба ММВ
Группа: Проверенные
Сообщений: 2646
Репутация: 39
Награды: 11
Статус: Offline
Quote (toizy)
Называется, программа для тех, кто не умеет без программы...

Ошибки бывают синтаксические и логические. Против первых конечно можно прогу сделать, для начинающих даже полезно.
Но основные ошибки - логические, это когда все работает, но не так как ты задумывал, ту уж кроме собственной мозги
ничего не поможет.
Quote (toizy)
чем **Error в редакторе сценария

Очень вредна штука, чихнуть не дает, требует что бы последовательно, и сразу все, правильно вводили.
 
  • Страница 1 из 1
  • 1
Поиск: