Войти
NeoBooker.ru
Добро пожаловать к нам в гости!
Наш сайт посвящён программе NeoBook, с помощью которой вы легко сможете создавать собственные мультимедиа-приложения без необходимости изучать сложные языки программирования! Зарегистрируйтесь, чтобы стать членом нашего сообщества.
  • Страница 2 из 5
  • «
  • 1
  • 2
  • 3
  • 4
  • 5
  • »
Модератор форума: Peter, DEMBEL  
Форум NeoBook » Всё о программе NeoBook » Проекты NeoBook » RetroX
RetroX
PeterДата: Пт, 29 Мая 2015, 03:00 | Сообщение # 31
Админ NeoBook
Цитата kop9000 ()
Но в текстовый файл ничего не сохраняет пока что

Разверни окно отладчика, запусти скрипт ПОШАГОВО, и проверяй выполнение команд и содержимое переменных.
Тогда найдешь ошибку.


- А вам какую операционку поставить - экспи, семерку или висту?
- Это ты сейчас о чем?
- Олег Георгиевич, вам какой компьютер хотелось бы - молодежный или надежный?
- Ну, конечно, надежный!
- Вот, значит - экспи, без вопросов! Сейчас сделаем...

(Улицы разбитых фонарей, сезон 10, серия 17)

Единственная инновация Windows 8 это - Metro, чтобы дебилы по иконкам не промахивались!


При модном втюхе модоподдающимся начинает нравиться
 
Сообщение
Цитата kop9000 ()
Но в текстовый файл ничего не сохраняет пока что

Разверни окно отладчика, запусти скрипт ПОШАГОВО, и проверяй выполнение команд и содержимое переменных.
Тогда найдешь ошибку.

Автор - Peter
Дата добавления - 29 Мая 2015 в 03:00
kop9000Дата: Пт, 29 Мая 2015, 03:30 | Сообщение # 32
Ветеран форума


Я даже не знаю что он от меня хочет.


Сообщение отредактировано
kop9000 - Пт, 29 Мая 2015, 03:35
 
Сообщение


Я даже не знаю что он от меня хочет.

Автор - kop9000
Дата добавления - 29 Мая 2015 в 03:30
PeterДата: Пт, 29 Мая 2015, 05:06 | Сообщение # 33
Админ NeoBook
Цитата kop9000 ()
Я даже не знаю что он от меня хочет.

Можно подумать я знаю чего ты там нагородил.
:)




- А вам какую операционку поставить - экспи, семерку или висту?
- Это ты сейчас о чем?
- Олег Георгиевич, вам какой компьютер хотелось бы - молодежный или надежный?
- Ну, конечно, надежный!
- Вот, значит - экспи, без вопросов! Сейчас сделаем...

(Улицы разбитых фонарей, сезон 10, серия 17)

Единственная инновация Windows 8 это - Metro, чтобы дебилы по иконкам не промахивались!


При модном втюхе модоподдающимся начинает нравиться
 
Сообщение
Цитата kop9000 ()
Я даже не знаю что он от меня хочет.

Можно подумать я знаю чего ты там нагородил.
:)



Автор - Peter
Дата добавления - 29 Мая 2015 в 05:06
kop9000Дата: Пт, 29 Мая 2015, 11:31 | Сообщение # 34
Ветеран форума
Цитата
Не в лог-файл смотри, а в ОТЛАДЧИК!


я и смотрю в ОТЛАДЧИК там три раздела команды переменные и история
 
Сообщение
Цитата
Не в лог-файл смотри, а в ОТЛАДЧИК!


я и смотрю в ОТЛАДЧИК там три раздела команды переменные и история

Автор - kop9000
Дата добавления - 29 Мая 2015 в 11:31
kop9000Дата: Пт, 29 Мая 2015, 12:33 | Сообщение # 35
Ветеран форума
Вот обновлённый проект

Я хочу ещё кое что объяснить.

у меня там два текстовых файла. первый system.txt отвечает за полное название приставки второй system_lite.txt за короткое название приставки. Так вот в настройках когда я выбираю нужные файлы то эти файлы тоже должны изменится так же. то есть например если я выбрал скажем

GoodGG
GoodNes

то в файле system_lite.txt должно быть так

GoodGG
GoodNes

а в файле system.txt должно быть так

Sega Game Gear
Nintendo Entertainment System/Famicom

то есть те строки которые я выбрал в настройках без пустых строк. а если надо будет чтобы все приставки генерировались то эти два файла будут сделаны со всеми приставками

Можно сделать так. Создать временные текстовые файлы с названиями tm_system.txt и tm_system_lite.txt и туда скинуть все названия приставок а затем от туда смотря какие я буду делать настройки эти названия будут копироваться уже в system.txt и system_lite.txt будь это все названия приставок или выбранные

Что для этого нужно сделать?
Прикрепления: 9914974.zip (47.9 Kb)


Сообщение отредактировано
kop9000 - Пт, 29 Мая 2015, 12:38
 
СообщениеВот обновлённый проект

Я хочу ещё кое что объяснить.

у меня там два текстовых файла. первый system.txt отвечает за полное название приставки второй system_lite.txt за короткое название приставки. Так вот в настройках когда я выбираю нужные файлы то эти файлы тоже должны изменится так же. то есть например если я выбрал скажем

GoodGG
GoodNes

то в файле system_lite.txt должно быть так

GoodGG
GoodNes

а в файле system.txt должно быть так

Sega Game Gear
Nintendo Entertainment System/Famicom

то есть те строки которые я выбрал в настройках без пустых строк. а если надо будет чтобы все приставки генерировались то эти два файла будут сделаны со всеми приставками

Можно сделать так. Создать временные текстовые файлы с названиями tm_system.txt и tm_system_lite.txt и туда скинуть все названия приставок а затем от туда смотря какие я буду делать настройки эти названия будут копироваться уже в system.txt и system_lite.txt будь это все названия приставок или выбранные

Что для этого нужно сделать?

Автор - kop9000
Дата добавления - 29 Мая 2015 в 12:33
PeterДата: Пт, 29 Мая 2015, 17:59 | Сообщение # 36
Админ NeoBook
Цитата kop9000 ()
Что для этого нужно сделать?

Ну, с учетом всех своих скромных познаний в программировании, осмелюсь предположить, что для этого нужно написАть соответствующий код.
Впрочем, может я и ошибаюсь, и сегодня можно все сделать "усилием мысли", ведь "прогресс"... гм...
:)


- А вам какую операционку поставить - экспи, семерку или висту?
- Это ты сейчас о чем?
- Олег Георгиевич, вам какой компьютер хотелось бы - молодежный или надежный?
- Ну, конечно, надежный!
- Вот, значит - экспи, без вопросов! Сейчас сделаем...

(Улицы разбитых фонарей, сезон 10, серия 17)

Единственная инновация Windows 8 это - Metro, чтобы дебилы по иконкам не промахивались!


При модном втюхе модоподдающимся начинает нравиться
 
Сообщение
Цитата kop9000 ()
Что для этого нужно сделать?

Ну, с учетом всех своих скромных познаний в программировании, осмелюсь предположить, что для этого нужно написАть соответствующий код.
Впрочем, может я и ошибаюсь, и сегодня можно все сделать "усилием мысли", ведь "прогресс"... гм...
:)

Автор - Peter
Дата добавления - 29 Мая 2015 в 17:59
kop9000Дата: Пт, 29 Мая 2015, 19:23 | Сообщение # 37
Ветеран форума
Цитата Peter ()
Ну, с учетом всех своих скромных познаний в программировании, осмелюсь предположить, что для этого нужно написАть соответствующий код.
Впрочем, может я и ошибаюсь, и сегодня можно все сделать "усилием мысли", ведь "прогресс"... гм...
:)

Я сейчас пишу код. Вариантов много. Напиши свой вариант кода чтобы я мог посмотреть как правильно вообще делается
 
Сообщение
Цитата Peter ()
Ну, с учетом всех своих скромных познаний в программировании, осмелюсь предположить, что для этого нужно написАть соответствующий код.
Впрочем, может я и ошибаюсь, и сегодня можно все сделать "усилием мысли", ведь "прогресс"... гм...
:)

Я сейчас пишу код. Вариантов много. Напиши свой вариант кода чтобы я мог посмотреть как правильно вообще делается

Автор - kop9000
Дата добавления - 29 Мая 2015 в 19:23
PeterДата: Сб, 30 Мая 2015, 03:47 | Сообщение # 38
Админ NeoBook
Цитата kop9000 ()
Я сейчас пишу код.

Похвально!

Цитата kop9000 ()
Напиши свой вариант кода

Какой такой "мой вариант кода"?
Сколько "вариантов" требуется?
А может всю программу целиком нашлепать?
Боюсь, что моей квалификации недостаточно для того, чтобы строчить наугад "правильный вариант кода", на идею, покрытую туманом.

Цитата kop9000 ()
Вариантов много.

Ну вот, значит есть где разгуляться и по-упражняться!
Ты - автор, тебе и фл... карты в руки.
Ну, а мы подправим, в случае чего.



- А вам какую операционку поставить - экспи, семерку или висту?
- Это ты сейчас о чем?
- Олег Георгиевич, вам какой компьютер хотелось бы - молодежный или надежный?
- Ну, конечно, надежный!
- Вот, значит - экспи, без вопросов! Сейчас сделаем...

(Улицы разбитых фонарей, сезон 10, серия 17)

Единственная инновация Windows 8 это - Metro, чтобы дебилы по иконкам не промахивались!


При модном втюхе модоподдающимся начинает нравиться
 
Сообщение
Цитата kop9000 ()
Я сейчас пишу код.

Похвально!

Цитата kop9000 ()
Напиши свой вариант кода

Какой такой "мой вариант кода"?
Сколько "вариантов" требуется?
А может всю программу целиком нашлепать?
Боюсь, что моей квалификации недостаточно для того, чтобы строчить наугад "правильный вариант кода", на идею, покрытую туманом.

Цитата kop9000 ()
Вариантов много.

Ну вот, значит есть где разгуляться и по-упражняться!
Ты - автор, тебе и фл... карты в руки.
Ну, а мы подправим, в случае чего.


Автор - Peter
Дата добавления - 30 Мая 2015 в 03:47
kop9000Дата: Сб, 30 Мая 2015, 12:57 | Сообщение # 39
Ветеран форума
Ну как то так получилось

Код
SetVar "[mes]" "0"

FileCopy "!C:\Users\TBOIR\Desktop\RetroX\File\tm\system.txt" "!C:\Users\TBOIR\Desktop\RetroX\File\system.txt"
FileCopy "!C:\Users\TBOIR\Desktop\RetroX\File\tm\system_lite.txt" "!C:\Users\TBOIR\Desktop\RetroX\File\system_lite.txt"
FileCopy "!C:\Users\TBOIR\Desktop\RetroX\File\tm\tools.txt" "!C:\Users\TBOIR\Desktop\RetroX\File\tools.txt"

If "[list_roms]" "=" "Выбранные"
If "[CheckBox6]" "=" "Checked"
SetVar "[rad]" "1"
FileRead "![PubDir]/file/tm/tm_system_lite.txt" "[rad]" "[lite_system]"
FileRead "![PubDir]/file/tm/tm_system.txt" "[rad]" "[system]"
FileRead "![PubDir]/file/tm/tm_tools.txt" "[rad]" "[tools]"
Math "[mes]+1" "0" "[mes]"
FileWrite "!C:\Users\TBOIR\Desktop\RetroX\File\system.txt" "[mes]" "[system]"
FileWrite "!C:\Users\TBOIR\Desktop\RetroX\File\system_lite.txt" "[mes]" "[lite_system]"
FileWrite "!C:\Users\TBOIR\Desktop\RetroX\File\Tools.txt" "[mes]" "[tools]"
EndIf

If "[CheckBox7]" "=" "Checked"
SetVar "[rad]" "2"
FileRead "![PubDir]/file/tm/tm_system_lite.txt" "[rad]" "[lite_system]"
FileRead "![PubDir]/file/tm/tm_system.txt" "[rad]" "[system]"
FileRead "![PubDir]/file/tm/tm_tools.txt" "[rad]" "[tools]"
Math "[mes]+1" "0" "[mes]"
FileWrite "!C:\Users\TBOIR\Desktop\RetroX\File\system.txt" "[mes]" "[system]"
FileWrite "!C:\Users\TBOIR\Desktop\RetroX\File\system_lite.txt" "[mes]" "[lite_system]"
FileWrite "!C:\Users\TBOIR\Desktop\RetroX\File\Tools.txt" "[mes]" "[tools]"
EndIf

If "[CheckBox8]" "=" "Checked"
SetVar "[rad]" "3"
FileRead "![PubDir]/file/tm/tm_system_lite.txt" "[rad]" "[lite_system]"
FileRead "![PubDir]/file/tm/tm_system.txt" "[rad]" "[system]"
FileRead "![PubDir]/file/tm/tm_tools.txt" "[rad]" "[tools]"
Math "[mes]+1" "0" "[mes]"
FileWrite "!C:\Users\TBOIR\Desktop\RetroX\File\system.txt" "[mes]" "[system]"
FileWrite "!C:\Users\TBOIR\Desktop\RetroX\File\system_lite.txt" "[mes]" "[lite_system]"
FileWrite "!C:\Users\TBOIR\Desktop\RetroX\File\Tools.txt" "[mes]" "[tools]"
EndIf

If "[CheckBox9]" "=" "Checked"
SetVar "[rad]" "4"
FileRead "![PubDir]/file/tm/tm_system_lite.txt" "[rad]" "[lite_system]"
FileRead "![PubDir]/file/tm/tm_system.txt" "[rad]" "[system]"
FileRead "![PubDir]/file/tm/tm_tools.txt" "[rad]" "[tools]"
Math "[mes]+1" "0" "[mes]"
FileWrite "!C:\Users\TBOIR\Desktop\RetroX\File\system.txt" "[mes]" "[system]"
FileWrite "!C:\Users\TBOIR\Desktop\RetroX\File\system_lite.txt" "[mes]" "[lite_system]"
FileWrite "!C:\Users\TBOIR\Desktop\RetroX\File\Tools.txt" "[mes]" "[tools]"
EndIf

If "[CheckBox10]" "=" "Checked"
SetVar "[rad]" "5"
FileRead "![PubDir]/file/tm/tm_system_lite.txt" "[rad]" "[lite_system]"
FileRead "![PubDir]/file/tm/tm_system.txt" "[rad]" "[system]"
FileRead "![PubDir]/file/tm/tm_tools.txt" "[rad]" "[tools]"
Math "[mes]+1" "0" "[mes]"
FileWrite "!C:\Users\TBOIR\Desktop\RetroX\File\system.txt" "[mes]" "[system]"
FileWrite "!C:\Users\TBOIR\Desktop\RetroX\File\system_lite.txt" "[mes]" "[lite_system]"
FileWrite "!C:\Users\TBOIR\Desktop\RetroX\File\Tools.txt" "[mes]" "[tools]"
EndIf

If "[CheckBox11]" "=" "Checked"
SetVar "[rad]" "6"
FileRead "![PubDir]/file/tm/tm_system_lite.txt" "[rad]" "[lite_system]"
FileRead "![PubDir]/file/tm/tm_system.txt" "[rad]" "[system]"
FileRead "![PubDir]/file/tm/tm_tools.txt" "[rad]" "[tools]"
Math "[mes]+1" "0" "[mes]"
FileWrite "!C:\Users\TBOIR\Desktop\RetroX\File\system.txt" "[mes]" "[system]"
FileWrite "!C:\Users\TBOIR\Desktop\RetroX\File\system_lite.txt" "[mes]" "[lite_system]"
FileWrite "!C:\Users\TBOIR\Desktop\RetroX\File\Tools.txt" "[mes]" "[tools]"
EndIf

If "[CheckBox12]" "=" "Checked"
SetVar "[rad]" "7"
FileRead "![PubDir]/file/tm/tm_system_lite.txt" "[rad]" "[lite_system]"
FileRead "![PubDir]/file/tm/tm_system.txt" "[rad]" "[system]"
FileRead "![PubDir]/file/tm/tm_tools.txt" "[rad]" "[tools]"
Math "[mes]+1" "0" "[mes]"
FileWrite "!C:\Users\TBOIR\Desktop\RetroX\File\system.txt" "[mes]" "[system]"
FileWrite "!C:\Users\TBOIR\Desktop\RetroX\File\system_lite.txt" "[mes]" "[lite_system]"
FileWrite "!C:\Users\TBOIR\Desktop\RetroX\File\Tools.txt" "[mes]" "[tools]"
EndIf

....


полный код в прикреплённом файле

первые строчки где написана команда копировть это копирование пустых текстовых файлов
Прикрепления: code.zip (18.8 Kb)


Сообщение отредактировано
kop9000 - Сб, 30 Мая 2015, 13:02
 
СообщениеНу как то так получилось

Код
SetVar "[mes]" "0"

FileCopy "!C:\Users\TBOIR\Desktop\RetroX\File\tm\system.txt" "!C:\Users\TBOIR\Desktop\RetroX\File\system.txt"
FileCopy "!C:\Users\TBOIR\Desktop\RetroX\File\tm\system_lite.txt" "!C:\Users\TBOIR\Desktop\RetroX\File\system_lite.txt"
FileCopy "!C:\Users\TBOIR\Desktop\RetroX\File\tm\tools.txt" "!C:\Users\TBOIR\Desktop\RetroX\File\tools.txt"

If "[list_roms]" "=" "Выбранные"
If "[CheckBox6]" "=" "Checked"
SetVar "[rad]" "1"
FileRead "![PubDir]/file/tm/tm_system_lite.txt" "[rad]" "[lite_system]"
FileRead "![PubDir]/file/tm/tm_system.txt" "[rad]" "[system]"
FileRead "![PubDir]/file/tm/tm_tools.txt" "[rad]" "[tools]"
Math "[mes]+1" "0" "[mes]"
FileWrite "!C:\Users\TBOIR\Desktop\RetroX\File\system.txt" "[mes]" "[system]"
FileWrite "!C:\Users\TBOIR\Desktop\RetroX\File\system_lite.txt" "[mes]" "[lite_system]"
FileWrite "!C:\Users\TBOIR\Desktop\RetroX\File\Tools.txt" "[mes]" "[tools]"
EndIf

If "[CheckBox7]" "=" "Checked"
SetVar "[rad]" "2"
FileRead "![PubDir]/file/tm/tm_system_lite.txt" "[rad]" "[lite_system]"
FileRead "![PubDir]/file/tm/tm_system.txt" "[rad]" "[system]"
FileRead "![PubDir]/file/tm/tm_tools.txt" "[rad]" "[tools]"
Math "[mes]+1" "0" "[mes]"
FileWrite "!C:\Users\TBOIR\Desktop\RetroX\File\system.txt" "[mes]" "[system]"
FileWrite "!C:\Users\TBOIR\Desktop\RetroX\File\system_lite.txt" "[mes]" "[lite_system]"
FileWrite "!C:\Users\TBOIR\Desktop\RetroX\File\Tools.txt" "[mes]" "[tools]"
EndIf

If "[CheckBox8]" "=" "Checked"
SetVar "[rad]" "3"
FileRead "![PubDir]/file/tm/tm_system_lite.txt" "[rad]" "[lite_system]"
FileRead "![PubDir]/file/tm/tm_system.txt" "[rad]" "[system]"
FileRead "![PubDir]/file/tm/tm_tools.txt" "[rad]" "[tools]"
Math "[mes]+1" "0" "[mes]"
FileWrite "!C:\Users\TBOIR\Desktop\RetroX\File\system.txt" "[mes]" "[system]"
FileWrite "!C:\Users\TBOIR\Desktop\RetroX\File\system_lite.txt" "[mes]" "[lite_system]"
FileWrite "!C:\Users\TBOIR\Desktop\RetroX\File\Tools.txt" "[mes]" "[tools]"
EndIf

If "[CheckBox9]" "=" "Checked"
SetVar "[rad]" "4"
FileRead "![PubDir]/file/tm/tm_system_lite.txt" "[rad]" "[lite_system]"
FileRead "![PubDir]/file/tm/tm_system.txt" "[rad]" "[system]"
FileRead "![PubDir]/file/tm/tm_tools.txt" "[rad]" "[tools]"
Math "[mes]+1" "0" "[mes]"
FileWrite "!C:\Users\TBOIR\Desktop\RetroX\File\system.txt" "[mes]" "[system]"
FileWrite "!C:\Users\TBOIR\Desktop\RetroX\File\system_lite.txt" "[mes]" "[lite_system]"
FileWrite "!C:\Users\TBOIR\Desktop\RetroX\File\Tools.txt" "[mes]" "[tools]"
EndIf

If "[CheckBox10]" "=" "Checked"
SetVar "[rad]" "5"
FileRead "![PubDir]/file/tm/tm_system_lite.txt" "[rad]" "[lite_system]"
FileRead "![PubDir]/file/tm/tm_system.txt" "[rad]" "[system]"
FileRead "![PubDir]/file/tm/tm_tools.txt" "[rad]" "[tools]"
Math "[mes]+1" "0" "[mes]"
FileWrite "!C:\Users\TBOIR\Desktop\RetroX\File\system.txt" "[mes]" "[system]"
FileWrite "!C:\Users\TBOIR\Desktop\RetroX\File\system_lite.txt" "[mes]" "[lite_system]"
FileWrite "!C:\Users\TBOIR\Desktop\RetroX\File\Tools.txt" "[mes]" "[tools]"
EndIf

If "[CheckBox11]" "=" "Checked"
SetVar "[rad]" "6"
FileRead "![PubDir]/file/tm/tm_system_lite.txt" "[rad]" "[lite_system]"
FileRead "![PubDir]/file/tm/tm_system.txt" "[rad]" "[system]"
FileRead "![PubDir]/file/tm/tm_tools.txt" "[rad]" "[tools]"
Math "[mes]+1" "0" "[mes]"
FileWrite "!C:\Users\TBOIR\Desktop\RetroX\File\system.txt" "[mes]" "[system]"
FileWrite "!C:\Users\TBOIR\Desktop\RetroX\File\system_lite.txt" "[mes]" "[lite_system]"
FileWrite "!C:\Users\TBOIR\Desktop\RetroX\File\Tools.txt" "[mes]" "[tools]"
EndIf

If "[CheckBox12]" "=" "Checked"
SetVar "[rad]" "7"
FileRead "![PubDir]/file/tm/tm_system_lite.txt" "[rad]" "[lite_system]"
FileRead "![PubDir]/file/tm/tm_system.txt" "[rad]" "[system]"
FileRead "![PubDir]/file/tm/tm_tools.txt" "[rad]" "[tools]"
Math "[mes]+1" "0" "[mes]"
FileWrite "!C:\Users\TBOIR\Desktop\RetroX\File\system.txt" "[mes]" "[system]"
FileWrite "!C:\Users\TBOIR\Desktop\RetroX\File\system_lite.txt" "[mes]" "[lite_system]"
FileWrite "!C:\Users\TBOIR\Desktop\RetroX\File\Tools.txt" "[mes]" "[tools]"
EndIf

....


полный код в прикреплённом файле

первые строчки где написана команда копировть это копирование пустых текстовых файлов

Автор - kop9000
Дата добавления - 30 Мая 2015 в 12:57
kop9000Дата: Сб, 30 Мая 2015, 13:02 | Сообщение # 40
Ветеран форума
вот обновлённый проект
Прикрепления: 4986341.zip (74.2 Kb)
 
Сообщениевот обновлённый проект

Автор - kop9000
Дата добавления - 30 Мая 2015 в 13:02
PeterДата: Сб, 30 Мая 2015, 14:15 | Сообщение # 41
Админ NeoBook
Цитата kop9000 ()
Ну как то так получилось

Если работает, то и ладно.
Только одинаковые куски кода, если они повторяются более одного раза, лучше оформлять в виде подпрограмм, а потом использовать GoSub, т.е. что-то типа (в секции подпрограмм):
Код
:PodprogrammaXXXX
FileRead "![PubDir]/file/tm/tm_system_lite.txt" "[rad]" "[lite_system]"
FileRead "![PubDir]/file/tm/tm_system.txt" "[rad]" "[system]"
FileRead "![PubDir]/file/tm/tm_tools.txt" "[rad]" "[tools]"
Math "[mes]+1" "0" "[mes]"
FileWrite "!C:\Users\TBOIR\Desktop\RetroX\File\system.txt" "[mes]" "[system]"
FileWrite "!C:\Users\TBOIR\Desktop\RetroX\File\system_lite.txt" "[mes]" "[lite_system]"
FileWrite "!C:\Users\TBOIR\Desktop\RetroX\File\Tools.txt" "[mes]" "[tools]"
Return

а дальше так:

Код
If "[list_roms]" "=" "Выбранные"
If "[CheckBox6]" "=" "Checked"
SetVar "[rad]" "1"
       GoSub "PodprogrammaXXXX"
EndIf


и т.д.


- А вам какую операционку поставить - экспи, семерку или висту?
- Это ты сейчас о чем?
- Олег Георгиевич, вам какой компьютер хотелось бы - молодежный или надежный?
- Ну, конечно, надежный!
- Вот, значит - экспи, без вопросов! Сейчас сделаем...

(Улицы разбитых фонарей, сезон 10, серия 17)

Единственная инновация Windows 8 это - Metro, чтобы дебилы по иконкам не промахивались!


При модном втюхе модоподдающимся начинает нравиться
 
Сообщение
Цитата kop9000 ()
Ну как то так получилось

Если работает, то и ладно.
Только одинаковые куски кода, если они повторяются более одного раза, лучше оформлять в виде подпрограмм, а потом использовать GoSub, т.е. что-то типа (в секции подпрограмм):
Код
:PodprogrammaXXXX
FileRead "![PubDir]/file/tm/tm_system_lite.txt" "[rad]" "[lite_system]"
FileRead "![PubDir]/file/tm/tm_system.txt" "[rad]" "[system]"
FileRead "![PubDir]/file/tm/tm_tools.txt" "[rad]" "[tools]"
Math "[mes]+1" "0" "[mes]"
FileWrite "!C:\Users\TBOIR\Desktop\RetroX\File\system.txt" "[mes]" "[system]"
FileWrite "!C:\Users\TBOIR\Desktop\RetroX\File\system_lite.txt" "[mes]" "[lite_system]"
FileWrite "!C:\Users\TBOIR\Desktop\RetroX\File\Tools.txt" "[mes]" "[tools]"
Return

а дальше так:

Код
If "[list_roms]" "=" "Выбранные"
If "[CheckBox6]" "=" "Checked"
SetVar "[rad]" "1"
       GoSub "PodprogrammaXXXX"
EndIf


и т.д.

Автор - Peter
Дата добавления - 30 Мая 2015 в 14:15
kop9000Дата: Сб, 30 Мая 2015, 14:29 | Сообщение # 42
Ветеран форума
я просто не понял твоего кода

Код
Loop "1" "[Количество строк]" "[n]"
           SetVar "[Список строк]" "[Список строк][Добавляемая строка[n]][#13][#10]"
EndLoop
FileWrite "Имя файла" "All" "[Список строк]"


Код
If "[list_roms]" "=" "Выбранные"
Loop "6" "40" "[n]"
          SetVar "[ros]" "[ros][CheckBox[n]][#13][#10]"
EndLoop
FileWrite "C:\Users\TBOIR\Desktop\tm.txt" "All" "[ros]"
EndIf


Код
SetVar "[ros]" "[ros][ros[n]][#13][#10]


он то сохраняет но он сохряняет не название приставки а что галочка поставлена.


Сообщение отредактировано
kop9000 - Сб, 30 Мая 2015, 14:30
 
Сообщениея просто не понял твоего кода

Код
Loop "1" "[Количество строк]" "[n]"
           SetVar "[Список строк]" "[Список строк][Добавляемая строка[n]][#13][#10]"
EndLoop
FileWrite "Имя файла" "All" "[Список строк]"


Код
If "[list_roms]" "=" "Выбранные"
Loop "6" "40" "[n]"
          SetVar "[ros]" "[ros][CheckBox[n]][#13][#10]"
EndLoop
FileWrite "C:\Users\TBOIR\Desktop\tm.txt" "All" "[ros]"
EndIf


Код
SetVar "[ros]" "[ros][ros[n]][#13][#10]


он то сохраняет но он сохряняет не название приставки а что галочка поставлена.

Автор - kop9000
Дата добавления - 30 Мая 2015 в 14:29
PeterДата: Сб, 30 Мая 2015, 18:47 | Сообщение # 43
Админ NeoBook
Цитата kop9000 ()
он то сохраняет но он сохряняет не название приставки а что галочка поставлена.

То, что ты сам указал ему сохранять, то он и сохраняет.
Цитата kop9000 ()
SetVar "[ros]" "[ros][CheckBox[n]][#13][#10]"


А мой код тупо копипастить не надо, а надо думать над ним.
К тому же, я написАл все с учетом твоего же кода, и твоих же непоняток что надо сохранять.

Могу только повторить:
Цитата Peter ()
Разверни окно отладчика, запусти скрипт ПОШАГОВО, и проверяй выполнение команд и содержимое переменных.
Тогда найдешь ошибку.


И больше повторять не буду!


- А вам какую операционку поставить - экспи, семерку или висту?
- Это ты сейчас о чем?
- Олег Георгиевич, вам какой компьютер хотелось бы - молодежный или надежный?
- Ну, конечно, надежный!
- Вот, значит - экспи, без вопросов! Сейчас сделаем...

(Улицы разбитых фонарей, сезон 10, серия 17)

Единственная инновация Windows 8 это - Metro, чтобы дебилы по иконкам не промахивались!


При модном втюхе модоподдающимся начинает нравиться
 
Сообщение
Цитата kop9000 ()
он то сохраняет но он сохряняет не название приставки а что галочка поставлена.

То, что ты сам указал ему сохранять, то он и сохраняет.
Цитата kop9000 ()
SetVar "[ros]" "[ros][CheckBox[n]][#13][#10]"


А мой код тупо копипастить не надо, а надо думать над ним.
К тому же, я написАл все с учетом твоего же кода, и твоих же непоняток что надо сохранять.

Могу только повторить:
Цитата Peter ()
Разверни окно отладчика, запусти скрипт ПОШАГОВО, и проверяй выполнение команд и содержимое переменных.
Тогда найдешь ошибку.


И больше повторять не буду!

Автор - Peter
Дата добавления - 30 Мая 2015 в 18:47
kop9000Дата: Сб, 30 Мая 2015, 19:30 | Сообщение # 44
Ветеран форума
Цитата Peter ()
Разверни окно отладчика, запусти скрипт ПОШАГОВО, и проверяй выполнение команд и содержимое переменных.
Тогда найдешь ошибку.

как пошагово? я запускаю тест проекта. открывается два окошка. сам проект и окоечко с тримя разделами. команды переменные и история. на что нужно смотреть?
 
Сообщение
Цитата Peter ()
Разверни окно отладчика, запусти скрипт ПОШАГОВО, и проверяй выполнение команд и содержимое переменных.
Тогда найдешь ошибку.

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

Автор - kop9000
Дата добавления - 30 Мая 2015 в 19:30
markДата: Сб, 30 Мая 2015, 21:50 | Сообщение # 45
Любопытный
Цитата
как пошагово?

В отладчике жмешь на паузу.....
 
Сообщение
Цитата
как пошагово?

В отладчике жмешь на паузу.....

Автор - mark
Дата добавления - 30 Мая 2015 в 21:50
PeterДата: Вс, 31 Мая 2015, 15:40 | Сообщение # 46
Админ NeoBook
Цитата mark ()
как пошагово?

Цитата mark ()
В отладчике жмешь на паузу.....




Сначала жмешь паузу (кнопка под черной стрелкой), а затем "шагаешь" вручную кнопкой под красной стрелкой (одно нажатие - одна команда), чтобы вернуться в обычный режим "отжимаешь" паузу.
Слайдером можно вообще регулировать скорость выполнения скриптов.
Прикрепления: 1823777.png (5.7 Kb)


- А вам какую операционку поставить - экспи, семерку или висту?
- Это ты сейчас о чем?
- Олег Георгиевич, вам какой компьютер хотелось бы - молодежный или надежный?
- Ну, конечно, надежный!
- Вот, значит - экспи, без вопросов! Сейчас сделаем...

(Улицы разбитых фонарей, сезон 10, серия 17)

Единственная инновация Windows 8 это - Metro, чтобы дебилы по иконкам не промахивались!


При модном втюхе модоподдающимся начинает нравиться
 
Сообщение
Цитата mark ()
как пошагово?

Цитата mark ()
В отладчике жмешь на паузу.....




Сначала жмешь паузу (кнопка под черной стрелкой), а затем "шагаешь" вручную кнопкой под красной стрелкой (одно нажатие - одна команда), чтобы вернуться в обычный режим "отжимаешь" паузу.
Слайдером можно вообще регулировать скорость выполнения скриптов.

Автор - Peter
Дата добавления - 31 Мая 2015 в 15:40
kop9000Дата: Вс, 31 Мая 2015, 15:56 | Сообщение # 47
Ветеран форума
Так. вот мои действия. всё делаю пошагово

1) нажимаю настройки

Код
PushButton15 > Left Click
+ GotoPage "Opt"


2) нажимаю длиную кнопку с настройками списков ромов

Код
PushButton29 > Left Click
+ CustomWindow "" "-1" "-1" "Container11" "DialogBox+Exclusive"


3) жму на точку выбранные

Код
  RadioButton2 > Left Click
       + EnableObject "CheckBox6"
       + EnableObject "CheckBox7"
       + EnableObject "CheckBox8"
       + EnableObject "CheckBox9"
       + EnableObject "CheckBox10"
       + EnableObject "CheckBox11"
       + EnableObject "CheckBox12"
       + EnableObject "CheckBox13"
       + EnableObject "CheckBox14"
       + EnableObject "CheckBox15"
       + EnableObject "CheckBox16"
       + EnableObject "CheckBox13"
       + EnableObject "CheckBox14"
       + EnableObject "CheckBox15"
       + EnableObject "CheckBox20"
       + EnableObject "CheckBox17"
       + EnableObject "CheckBox18"
       + EnableObject "CheckBox19"
       + EnableObject "CheckBox24"
       + EnableObject "CheckBox21"
       + EnableObject "CheckBox26"
       + EnableObject "CheckBox23"
       + EnableObject "CheckBox24"
       + EnableObject "CheckBox25"
       + EnableObject "CheckBox26"
       + EnableObject "CheckBox27"
       + EnableObject "CheckBox22"
       + EnableObject "CheckBox28"
       + EnableObject "CheckBox29"
       + EnableObject "CheckBox30"
       + EnableObject "CheckBox31"
       + EnableObject "CheckBox32"
       + EnableObject "CheckBox33"
       + EnableObject "CheckBox34"
       + EnableObject "CheckBox35"
       + EnableObject "CheckBox36"
       + EnableObject "CheckBox37"
       + EnableObject "CheckBox38"
       + EnableObject "CheckBox39"
       + EnableObject "CheckBox40"


4) выбераю нужные ромы и жму ок

Код
  PushButton30 > Left Click
    + If "[list_roms]" "=" "Выбранные"
    + Loop "6" "40" "[n]"
    + SetVar "[ros]" "[ros][ros[n]][#13][#10]"
    + EndLoop
    + Loop "6" "40" "[n]"
    + SetVar "[ros]" "[ros][ros[n]][#13][#10]"
    + EndLoop
    + Loop "6" "40" "[n]"
    + SetVar "[ros]" "[ros][ros[n]][#13][#10]"
    + EndLoop
    + Loop "6" "40" "[n]"
    + SetVar "[ros]" "[ros][ros[n]][#13][#10]"
    + EndLoop
    + Loop "6" "40" "[n]"
    + SetVar "[ros]" "[ros][ros[n]][#13][#10]"
    + EndLoop
    + Loop "6" "40" "[n]"
    + SetVar "[ros]" "[ros][ros[n]][#13][#10]"
    + EndLoop
    + Loop "6" "40" "[n]"
    + SetVar "[ros]" "[ros][ros[n]][#13][#10]"
    + EndLoop
    + Loop "6" "40" "[n]"
    + SetVar "[ros]" "[ros][ros[n]][#13][#10]"
    + EndLoop
    + Loop "6" "40" "[n]"
    + SetVar "[ros]" "[ros][ros[n]][#13][#10]"
    + EndLoop
    + Loop "6" "40" "[n]"
    + SetVar "[ros]" "[ros][ros[n]][#13][#10]"
    + EndLoop
    + Loop "6" "40" "[n]"
    + SetVar "[ros]" "[ros][ros[n]][#13][#10]"
    + EndLoop
    + Loop "6" "40" "[n]"
    + SetVar "[ros]" "[ros][ros[n]][#13][#10]"
    + EndLoop
    + Loop "6" "40" "[n]"
    + SetVar "[ros]" "[ros][ros[n]][#13][#10]"
    + EndLoop
    + Loop "6" "40" "[n]"
    + SetVar "[ros]" "[ros][ros[n]][#13][#10]"
    + EndLoop
    + Loop "6" "40" "[n]"
    + SetVar "[ros]" "[ros][ros[n]][#13][#10]"
    + EndLoop
    + Loop "6" "40" "[n]"
    + SetVar "[ros]" "[ros][ros[n]][#13][#10]"
    + EndLoop
    + Loop "6" "40" "[n]"
    + SetVar "[ros]" "[ros][ros[n]][#13][#10]"
    + EndLoop
    + Loop "6" "40" "[n]"
    + SetVar "[ros]" "[ros][ros[n]][#13][#10]"
    + EndLoop
    + Loop "6" "40" "[n]"
    + SetVar "[ros]" "[ros][ros[n]][#13][#10]"
    + EndLoop
    + Loop "6" "40" "[n]"
    + SetVar "[ros]" "[ros][ros[n]][#13][#10]"
    + EndLoop
    + Loop "6" "40" "[n]"
    + SetVar "[ros]" "[ros][ros[n]][#13][#10]"
    + EndLoop
    + Loop "6" "40" "[n]"
    + SetVar "[ros]" "[ros][ros[n]][#13][#10]"
    + EndLoop
    + Loop "6" "40" "[n]"
    + SetVar "[ros]" "[ros][ros[n]][#13][#10]"
    + EndLoop
    + Loop "6" "40" "[n]"
    + SetVar "[ros]" "[ros][ros[n]][#13][#10]"
    + EndLoop
    + Loop "6" "40" "[n]"
    + SetVar "[ros]" "[ros][ros[n]][#13][#10]"
    + EndLoop
    + Loop "6" "40" "[n]"
    + SetVar "[ros]" "[ros][ros[n]][#13][#10]"
    + EndLoop
    + Loop "6" "40" "[n]"
    + SetVar "[ros]" "[ros][ros[n]][#13][#10]"
    + EndLoop
    + Loop "6" "40" "[n]"
    + SetVar "[ros]" "[ros][ros[n]][#13][#10]"
    + EndLoop
    + Loop "6" "40" "[n]"
    + SetVar "[ros]" "[ros][ros[n]][#13][#10]"
    + EndLoop
    + Loop "6" "40" "[n]"
    + SetVar "[ros]" "[ros][ros[n]][#13][#10]"
    + EndLoop
    + Loop "6" "40" "[n]"
    + SetVar "[ros]" "[ros][ros[n]][#13][#10]"
    + EndLoop
    + Loop "6" "40" "[n]"
    + SetVar "[ros]" "[ros][ros[n]][#13][#10]"
    + EndLoop
    + Loop "6" "40" "[n]"
    + SetVar "[ros]" "[ros][ros[n]][#13][#10]"
    + EndLoop
    + Loop "6" "40" "[n]"
    + SetVar "[ros]" "[ros][ros[n]][#13][#10]"
    + EndLoop
    + Loop "6" "40" "[n]"
    + SetVar "[ros]" "[ros][ros[n]][#13][#10]"
    + EndLoop
    + Loop "6" "40" "[n]"
    - SetVar "[ros]" "[ros][ros[n]][#13][#10]"
    + EndLoop
    + FileWrite "C:\Users\TBOIR\Desktop\tm.txt" "All" "[ros]"
    + EndIf


И я всёравно не понимаю в чём ошибка. разве что в конце кода а именно

Код
   - SetVar "[ros]" "[ros][ros[n]][#13][#10]"


стоит минус. но там скорее просто у меня в коде не дописана одна буква. но это совершенно другая ошибка


Сообщение отредактировано
kop9000 - Вс, 31 Мая 2015, 16:05
 
СообщениеТак. вот мои действия. всё делаю пошагово

1) нажимаю настройки

Код
PushButton15 > Left Click
+ GotoPage "Opt"


2) нажимаю длиную кнопку с настройками списков ромов

Код
PushButton29 > Left Click
+ CustomWindow "" "-1" "-1" "Container11" "DialogBox+Exclusive"


3) жму на точку выбранные

Код
  RadioButton2 > Left Click
       + EnableObject "CheckBox6"
       + EnableObject "CheckBox7"
       + EnableObject "CheckBox8"
       + EnableObject "CheckBox9"
       + EnableObject "CheckBox10"
       + EnableObject "CheckBox11"
       + EnableObject "CheckBox12"
       + EnableObject "CheckBox13"
       + EnableObject "CheckBox14"
       + EnableObject "CheckBox15"
       + EnableObject "CheckBox16"
       + EnableObject "CheckBox13"
       + EnableObject "CheckBox14"
       + EnableObject "CheckBox15"
       + EnableObject "CheckBox20"
       + EnableObject "CheckBox17"
       + EnableObject "CheckBox18"
       + EnableObject "CheckBox19"
       + EnableObject "CheckBox24"
       + EnableObject "CheckBox21"
       + EnableObject "CheckBox26"
       + EnableObject "CheckBox23"
       + EnableObject "CheckBox24"
       + EnableObject "CheckBox25"
       + EnableObject "CheckBox26"
       + EnableObject "CheckBox27"
       + EnableObject "CheckBox22"
       + EnableObject "CheckBox28"
       + EnableObject "CheckBox29"
       + EnableObject "CheckBox30"
       + EnableObject "CheckBox31"
       + EnableObject "CheckBox32"
       + EnableObject "CheckBox33"
       + EnableObject "CheckBox34"
       + EnableObject "CheckBox35"
       + EnableObject "CheckBox36"
       + EnableObject "CheckBox37"
       + EnableObject "CheckBox38"
       + EnableObject "CheckBox39"
       + EnableObject "CheckBox40"


4) выбераю нужные ромы и жму ок

Код
  PushButton30 > Left Click
    + If "[list_roms]" "=" "Выбранные"
    + Loop "6" "40" "[n]"
    + SetVar "[ros]" "[ros][ros[n]][#13][#10]"
    + EndLoop
    + Loop "6" "40" "[n]"
    + SetVar "[ros]" "[ros][ros[n]][#13][#10]"
    + EndLoop
    + Loop "6" "40" "[n]"
    + SetVar "[ros]" "[ros][ros[n]][#13][#10]"
    + EndLoop
    + Loop "6" "40" "[n]"
    + SetVar "[ros]" "[ros][ros[n]][#13][#10]"
    + EndLoop
    + Loop "6" "40" "[n]"
    + SetVar "[ros]" "[ros][ros[n]][#13][#10]"
    + EndLoop
    + Loop "6" "40" "[n]"
    + SetVar "[ros]" "[ros][ros[n]][#13][#10]"
    + EndLoop
    + Loop "6" "40" "[n]"
    + SetVar "[ros]" "[ros][ros[n]][#13][#10]"
    + EndLoop
    + Loop "6" "40" "[n]"
    + SetVar "[ros]" "[ros][ros[n]][#13][#10]"
    + EndLoop
    + Loop "6" "40" "[n]"
    + SetVar "[ros]" "[ros][ros[n]][#13][#10]"
    + EndLoop
    + Loop "6" "40" "[n]"
    + SetVar "[ros]" "[ros][ros[n]][#13][#10]"
    + EndLoop
    + Loop "6" "40" "[n]"
    + SetVar "[ros]" "[ros][ros[n]][#13][#10]"
    + EndLoop
    + Loop "6" "40" "[n]"
    + SetVar "[ros]" "[ros][ros[n]][#13][#10]"
    + EndLoop
    + Loop "6" "40" "[n]"
    + SetVar "[ros]" "[ros][ros[n]][#13][#10]"
    + EndLoop
    + Loop "6" "40" "[n]"
    + SetVar "[ros]" "[ros][ros[n]][#13][#10]"
    + EndLoop
    + Loop "6" "40" "[n]"
    + SetVar "[ros]" "[ros][ros[n]][#13][#10]"
    + EndLoop
    + Loop "6" "40" "[n]"
    + SetVar "[ros]" "[ros][ros[n]][#13][#10]"
    + EndLoop
    + Loop "6" "40" "[n]"
    + SetVar "[ros]" "[ros][ros[n]][#13][#10]"
    + EndLoop
    + Loop "6" "40" "[n]"
    + SetVar "[ros]" "[ros][ros[n]][#13][#10]"
    + EndLoop
    + Loop "6" "40" "[n]"
    + SetVar "[ros]" "[ros][ros[n]][#13][#10]"
    + EndLoop
    + Loop "6" "40" "[n]"
    + SetVar "[ros]" "[ros][ros[n]][#13][#10]"
    + EndLoop
    + Loop "6" "40" "[n]"
    + SetVar "[ros]" "[ros][ros[n]][#13][#10]"
    + EndLoop
    + Loop "6" "40" "[n]"
    + SetVar "[ros]" "[ros][ros[n]][#13][#10]"
    + EndLoop
    + Loop "6" "40" "[n]"
    + SetVar "[ros]" "[ros][ros[n]][#13][#10]"
    + EndLoop
    + Loop "6" "40" "[n]"
    + SetVar "[ros]" "[ros][ros[n]][#13][#10]"
    + EndLoop
    + Loop "6" "40" "[n]"
    + SetVar "[ros]" "[ros][ros[n]][#13][#10]"
    + EndLoop
    + Loop "6" "40" "[n]"
    + SetVar "[ros]" "[ros][ros[n]][#13][#10]"
    + EndLoop
    + Loop "6" "40" "[n]"
    + SetVar "[ros]" "[ros][ros[n]][#13][#10]"
    + EndLoop
    + Loop "6" "40" "[n]"
    + SetVar "[ros]" "[ros][ros[n]][#13][#10]"
    + EndLoop
    + Loop "6" "40" "[n]"
    + SetVar "[ros]" "[ros][ros[n]][#13][#10]"
    + EndLoop
    + Loop "6" "40" "[n]"
    + SetVar "[ros]" "[ros][ros[n]][#13][#10]"
    + EndLoop
    + Loop "6" "40" "[n]"
    + SetVar "[ros]" "[ros][ros[n]][#13][#10]"
    + EndLoop
    + Loop "6" "40" "[n]"
    + SetVar "[ros]" "[ros][ros[n]][#13][#10]"
    + EndLoop
    + Loop "6" "40" "[n]"
    + SetVar "[ros]" "[ros][ros[n]][#13][#10]"
    + EndLoop
    + Loop "6" "40" "[n]"
    + SetVar "[ros]" "[ros][ros[n]][#13][#10]"
    + EndLoop
    + Loop "6" "40" "[n]"
    + SetVar "[ros]" "[ros][ros[n]][#13][#10]"
    + EndLoop
    + Loop "6" "40" "[n]"
    - SetVar "[ros]" "[ros][ros[n]][#13][#10]"
    + EndLoop
    + FileWrite "C:\Users\TBOIR\Desktop\tm.txt" "All" "[ros]"
    + EndIf


И я всёравно не понимаю в чём ошибка. разве что в конце кода а именно

Код
   - SetVar "[ros]" "[ros][ros[n]][#13][#10]"


стоит минус. но там скорее просто у меня в коде не дописана одна буква. но это совершенно другая ошибка

Автор - kop9000
Дата добавления - 31 Мая 2015 в 15:56
PeterДата: Вс, 31 Мая 2015, 19:42 | Сообщение # 48
Админ NeoBook
Цитата kop9000 ()
И я всёравно не понимаю в чём ошибка.

Подобные ошибки возникают по причине полного непонимания того, как работает или ЧТО делает код.
Что такое массив [ros]?
Что такое у тебя [n]?
При чем тут вообще CheckBox-ы?

Тебе нужно определить (придумать) какую-нибудь переменную (НЕ СВЯЗАННУЮ с [ros]), куда и будут записываться значения из элементов массива [ros], а не в сам массив!
Примерно так:
SetVar "[Переменная]" "[Переменная][ros[n]][#13][#10]"

Когда цикл завершиться, то:
FileWrite "C:\Users\TBOIR\Desktop\tm.txt" "All" "[Переменная]"


- А вам какую операционку поставить - экспи, семерку или висту?
- Это ты сейчас о чем?
- Олег Георгиевич, вам какой компьютер хотелось бы - молодежный или надежный?
- Ну, конечно, надежный!
- Вот, значит - экспи, без вопросов! Сейчас сделаем...

(Улицы разбитых фонарей, сезон 10, серия 17)

Единственная инновация Windows 8 это - Metro, чтобы дебилы по иконкам не промахивались!


При модном втюхе модоподдающимся начинает нравиться
 
Сообщение
Цитата kop9000 ()
И я всёравно не понимаю в чём ошибка.

Подобные ошибки возникают по причине полного непонимания того, как работает или ЧТО делает код.
Что такое массив [ros]?
Что такое у тебя [n]?
При чем тут вообще CheckBox-ы?

Тебе нужно определить (придумать) какую-нибудь переменную (НЕ СВЯЗАННУЮ с [ros]), куда и будут записываться значения из элементов массива [ros], а не в сам массив!
Примерно так:
SetVar "[Переменная]" "[Переменная][ros[n]][#13][#10]"

Когда цикл завершиться, то:
FileWrite "C:\Users\TBOIR\Desktop\tm.txt" "All" "[Переменная]"

Автор - Peter
Дата добавления - 31 Мая 2015 в 19:42
kop9000Дата: Вс, 31 Мая 2015, 20:12 | Сообщение # 49
Ветеран форума
Цитата Peter ()
Подобные ошибки возникают по причине полного непонимания того, как работает или ЧТО делает код.
Что такое массив [ros]?
Что такое у тебя [n]?
При чем тут вообще CheckBox-ы?

Тебе нужно определить (придумать) какую-нибудь переменную (НЕ СВЯЗАННУЮ с [ros]), куда и будут записываться значения из элементов массива [ros], а не в сам массив!
Примерно так:
SetVar "[Переменная]" "[Переменная][ros[n]][#13][#10]"

Когда цикл завершиться, то:
FileWrite "C:\Users\TBOIR\Desktop\tm.txt" "All" "[Переменная]"


[n] ты сам мне в примере скинул

так правильно?

Код
If "[list_roms]" "=" "Выбранные"
Loop "6" "40" "[n]"
          SetVar "[lol]" "[lol][ros[n]][#13][#10]"
EndLoop
FileWrite "!C:\Users\TBOIR\Desktop\tm.txt" "All" "[lol]"
EndIf
 
Сообщение
Цитата Peter ()
Подобные ошибки возникают по причине полного непонимания того, как работает или ЧТО делает код.
Что такое массив [ros]?
Что такое у тебя [n]?
При чем тут вообще CheckBox-ы?

Тебе нужно определить (придумать) какую-нибудь переменную (НЕ СВЯЗАННУЮ с [ros]), куда и будут записываться значения из элементов массива [ros], а не в сам массив!
Примерно так:
SetVar "[Переменная]" "[Переменная][ros[n]][#13][#10]"

Когда цикл завершиться, то:
FileWrite "C:\Users\TBOIR\Desktop\tm.txt" "All" "[Переменная]"


[n] ты сам мне в примере скинул

так правильно?

Код
If "[list_roms]" "=" "Выбранные"
Loop "6" "40" "[n]"
          SetVar "[lol]" "[lol][ros[n]][#13][#10]"
EndLoop
FileWrite "!C:\Users\TBOIR\Desktop\tm.txt" "All" "[lol]"
EndIf

Автор - kop9000
Дата добавления - 31 Мая 2015 в 20:12
PeterДата: Вс, 31 Мая 2015, 21:06 | Сообщение # 50
Админ NeoBook
Цитата kop9000 ()
[n] ты сам мне в примере скинул

mda
Я тебе скинул ИДЕЮ, а не готовый к употреблению код, и тебе надо было подправить его под свои нужды.

Цитата kop9000 ()
так правильно?

Синтаксически правильно, но пока не разберешьсяь, что именно делает этот код, почему 6 и 40 (а не 1 и 35), что такое [n], что такое [ros[n]], работать, если и будет, то чисто случайно.
Но, это весьма маловероятно.


- А вам какую операционку поставить - экспи, семерку или висту?
- Это ты сейчас о чем?
- Олег Георгиевич, вам какой компьютер хотелось бы - молодежный или надежный?
- Ну, конечно, надежный!
- Вот, значит - экспи, без вопросов! Сейчас сделаем...

(Улицы разбитых фонарей, сезон 10, серия 17)

Единственная инновация Windows 8 это - Metro, чтобы дебилы по иконкам не промахивались!


При модном втюхе модоподдающимся начинает нравиться
 
Сообщение
Цитата kop9000 ()
[n] ты сам мне в примере скинул

mda
Я тебе скинул ИДЕЮ, а не готовый к употреблению код, и тебе надо было подправить его под свои нужды.

Цитата kop9000 ()
так правильно?

Синтаксически правильно, но пока не разберешьсяь, что именно делает этот код, почему 6 и 40 (а не 1 и 35), что такое [n], что такое [ros[n]], работать, если и будет, то чисто случайно.
Но, это весьма маловероятно.

Автор - Peter
Дата добавления - 31 Мая 2015 в 21:06
kop9000Дата: Вс, 31 Мая 2015, 21:30 | Сообщение # 51
Ветеран форума
Цитата Peter ()
Синтаксически правильно, но пока не разберешьсяь, что именно делает этот код, почему 6 и 40 (а не 1 и 35), что такое [n], что такое [ros[n]], работать, если и будет, то чисто случайно.
Но, это весьма маловероятно.


[ros] это название кнопки тоесть CheckBox
[n] это число

[ros][n] - CheckBox6 или CheckBox7 и так далее
 
Сообщение
Цитата Peter ()
Синтаксически правильно, но пока не разберешьсяь, что именно делает этот код, почему 6 и 40 (а не 1 и 35), что такое [n], что такое [ros[n]], работать, если и будет, то чисто случайно.
Но, это весьма маловероятно.


[ros] это название кнопки тоесть CheckBox
[n] это число

[ros][n] - CheckBox6 или CheckBox7 и так далее

Автор - kop9000
Дата добавления - 31 Мая 2015 в 21:30
PeterДата: Вс, 31 Мая 2015, 21:43 | Сообщение # 52
Админ NeoBook
Цитата kop9000 ()
[n] это число

:)
Это я понял, но главное чтобы ты понял для чего оно нужно и как все работает.

Цитата kop9000 ()
[ros][n] - CheckBox6 или CheckBox7 и так далее


[ros][n] и [ros[n]] - НЕ ОДНО И ТО ЖЕ, и указанный выше код работать не будет.

Ты решил записывать в яайл названия кнопок.
%)
Кстати, CheckBox это НЕ кнопка, а переключатель.
Если ты хочешь, чтобы тебя понимали, то и пиши понятно!


- А вам какую операционку поставить - экспи, семерку или висту?
- Это ты сейчас о чем?
- Олег Георгиевич, вам какой компьютер хотелось бы - молодежный или надежный?
- Ну, конечно, надежный!
- Вот, значит - экспи, без вопросов! Сейчас сделаем...

(Улицы разбитых фонарей, сезон 10, серия 17)

Единственная инновация Windows 8 это - Metro, чтобы дебилы по иконкам не промахивались!


При модном втюхе модоподдающимся начинает нравиться
 
Сообщение
Цитата kop9000 ()
[n] это число

:)
Это я понял, но главное чтобы ты понял для чего оно нужно и как все работает.

Цитата kop9000 ()
[ros][n] - CheckBox6 или CheckBox7 и так далее


[ros][n] и [ros[n]] - НЕ ОДНО И ТО ЖЕ, и указанный выше код работать не будет.

Ты решил записывать в яайл названия кнопок.
%)
Кстати, CheckBox это НЕ кнопка, а переключатель.
Если ты хочешь, чтобы тебя понимали, то и пиши понятно!

Автор - Peter
Дата добавления - 31 Мая 2015 в 21:43
kop9000Дата: Вс, 31 Мая 2015, 21:46 | Сообщение # 53
Ветеран форума
Цитата Peter ()
Цитата kop9000 ()
[n] это число

:)
Цитата kop9000 ()
[ros][n] - CheckBox6 или CheckBox7 и так далее

[ros][n] и [ros[n]] - НЕ ОДНО И ТО ЖЕ, и указанный выше код работать не будет.

Ты решил записывать в яайл названия кнопок.
%)
Кстати, CheckBox это НЕ кнопка, а переключатель.
Если ты хочешь, чтобы тебя понимали, то и пиши понятно!


при нажатия кнопки я хочу чтобы сохранялись в одном текстовом документе полное название приставки а во втором короткое название приставки.
 
Сообщение
Цитата Peter ()
Цитата kop9000 ()
[n] это число

:)
Цитата kop9000 ()
[ros][n] - CheckBox6 или CheckBox7 и так далее

[ros][n] и [ros[n]] - НЕ ОДНО И ТО ЖЕ, и указанный выше код работать не будет.

Ты решил записывать в яайл названия кнопок.
%)
Кстати, CheckBox это НЕ кнопка, а переключатель.
Если ты хочешь, чтобы тебя понимали, то и пиши понятно!


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

Автор - kop9000
Дата добавления - 31 Мая 2015 в 21:46
PeterДата: Вс, 31 Мая 2015, 21:50 | Сообщение # 54
Админ NeoBook
Цитата kop9000 ()
при нажатия кнопки я хочу чтобы сохранялись в одном текстовом документе полное название приставки а во втором короткое название приставки

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

Много ты понял из этого моего текста?
:D


- А вам какую операционку поставить - экспи, семерку или висту?
- Это ты сейчас о чем?
- Олег Георгиевич, вам какой компьютер хотелось бы - молодежный или надежный?
- Ну, конечно, надежный!
- Вот, значит - экспи, без вопросов! Сейчас сделаем...

(Улицы разбитых фонарей, сезон 10, серия 17)

Единственная инновация Windows 8 это - Metro, чтобы дебилы по иконкам не промахивались!


При модном втюхе модоподдающимся начинает нравиться
 
Сообщение
Цитата kop9000 ()
при нажатия кнопки я хочу чтобы сохранялись в одном текстовом документе полное название приставки а во втором короткое название приставки

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

Много ты понял из этого моего текста?
:D

Автор - Peter
Дата добавления - 31 Мая 2015 в 21:50
kop9000Дата: Вс, 31 Мая 2015, 22:00 | Сообщение # 55
Ветеран форума
Цитата Peter ()
При нажатии пимпочки я хочу чтобы сохранялись в одном текстовом документе полное название загогулины а во втором короткое название загогулины.

Много ты понял из этого моего текста?


смотри. вот на галочке например которую я ставлю написано короткое название приставки например atari2600 так вот те галки которые я поставил должны сохранятся эти самые короткие названия в текстовый документ по строчкам. а вместе с ним полное название которое я не написал на кнопке но напишу потом в коде этих самих галок
 
Сообщение
Цитата Peter ()
При нажатии пимпочки я хочу чтобы сохранялись в одном текстовом документе полное название загогулины а во втором короткое название загогулины.

Много ты понял из этого моего текста?


смотри. вот на галочке например которую я ставлю написано короткое название приставки например atari2600 так вот те галки которые я поставил должны сохранятся эти самые короткие названия в текстовый документ по строчкам. а вместе с ним полное название которое я не написал на кнопке но напишу потом в коде этих самих галок

Автор - kop9000
Дата добавления - 31 Мая 2015 в 22:00
PeterДата: Пн, 01 Июня 2015, 01:46 | Сообщение # 56
Админ NeoBook
Цитата kop9000 ()
те галки которые я поставил должны сохранятся эти самые короткие названия в текстовый документ по строчкам.

Ох-хо-хо...
В прикреплении возьми рабочий пример.
Только это - ПРИМЕР!
Изучи его, и переделай для себя.

А это:
Цитата kop9000 ()
а вместе с ним полное название которое я не написал на кнопке но напишу потом в коде этих самих галок

сам додумывай.
Тебе лучше знать чего надо сохранять какие там "кнопки", "галочки".
Людочки, мариночки, олечки и проч.
Все!
Прикрепления: 222.rar (1.8 Kb)


- А вам какую операционку поставить - экспи, семерку или висту?
- Это ты сейчас о чем?
- Олег Георгиевич, вам какой компьютер хотелось бы - молодежный или надежный?
- Ну, конечно, надежный!
- Вот, значит - экспи, без вопросов! Сейчас сделаем...

(Улицы разбитых фонарей, сезон 10, серия 17)

Единственная инновация Windows 8 это - Metro, чтобы дебилы по иконкам не промахивались!


При модном втюхе модоподдающимся начинает нравиться
 
Сообщение
Цитата kop9000 ()
те галки которые я поставил должны сохранятся эти самые короткие названия в текстовый документ по строчкам.

Ох-хо-хо...
В прикреплении возьми рабочий пример.
Только это - ПРИМЕР!
Изучи его, и переделай для себя.

А это:
Цитата kop9000 ()
а вместе с ним полное название которое я не написал на кнопке но напишу потом в коде этих самих галок

сам додумывай.
Тебе лучше знать чего надо сохранять какие там "кнопки", "галочки".
Людочки, мариночки, олечки и проч.
Все!

Автор - Peter
Дата добавления - 01 Июня 2015 в 01:46
kop9000Дата: Пн, 01 Июня 2015, 12:15 | Сообщение # 57
Ветеран форума
Почему ты с первого раза не понял меня? я вроде всё нормально написал

Сообщение отредактировано
kop9000 - Пн, 01 Июня 2015, 12:15
 
СообщениеПочему ты с первого раза не понял меня? я вроде всё нормально написал

Автор - kop9000
Дата добавления - 01 Июня 2015 в 12:15
kop9000Дата: Пн, 01 Июня 2015, 12:55 | Сообщение # 58
Ветеран форума
Ну вот теперь вроде всё правельно

Код
If "[list_roms]" "=" "Âûáðàííûå"
SetVar "[List]" ""
Loop "6" "40" "[n]"
   If "[CheckBox[n]]" "=" "Checked"
     GetObjectInfo "CheckBox[n]" "Caption" "[Caption]"
     SetVar "[List]" "[List][Caption][#13][#10]"
   EndIf
EndLoop
FileWrite "!C:\Users\TBOIR\Desktop\tm.txt" "All" "[List]"
SetVar "[Caption]" ""
EndIf


но есть одна небольшая проблема. когда например вот он сохранил две приставки в текстовый файл. а вот в следующий раз я хочу чтобы приставка была одна ну я и опять захожу в настройки выбираю только одну приставку ну и нажимаю ок он сохраняет в текстовый файл но когда я открываю текстовый файл и последняя строчка пустая. а мне её не надо. как сделать чтобы пустые строки удалялись?
Прикрепления: RetroX_tm.zip (42.6 Kb)
 
СообщениеНу вот теперь вроде всё правельно

Код
If "[list_roms]" "=" "Âûáðàííûå"
SetVar "[List]" ""
Loop "6" "40" "[n]"
   If "[CheckBox[n]]" "=" "Checked"
     GetObjectInfo "CheckBox[n]" "Caption" "[Caption]"
     SetVar "[List]" "[List][Caption][#13][#10]"
   EndIf
EndLoop
FileWrite "!C:\Users\TBOIR\Desktop\tm.txt" "All" "[List]"
SetVar "[Caption]" ""
EndIf


но есть одна небольшая проблема. когда например вот он сохранил две приставки в текстовый файл. а вот в следующий раз я хочу чтобы приставка была одна ну я и опять захожу в настройки выбираю только одну приставку ну и нажимаю ок он сохраняет в текстовый файл но когда я открываю текстовый файл и последняя строчка пустая. а мне её не надо. как сделать чтобы пустые строки удалялись?

Автор - kop9000
Дата добавления - 01 Июня 2015 в 12:55
PeterДата: Пн, 01 Июня 2015, 17:36 | Сообщение # 59
Админ NeoBook
Цитата kop9000 ()
я вроде всё нормально написал

Это ты так думаешь, а я думаю иначе.
Цитата kop9000 ()
последняя строчка пустая. а мне её не надо. как сделать чтобы пустые строки удалялись?

Я тебе четко сказал:
Цитата Peter ()
Изучи его,


Если бы ты это сделал, а не просто скопипастил мой код, то сам бы прекрасно понял что надо сделать, чтобы последняя строчка (пустая) не записывалась.
Кстати, в указанном мною примере последняя пустая строчка всегда будет записываться независимо от того, сколько там твоих "приставок" (количество строк) записывается.

Могу только дать подсказку: при записи последней НЕпустой строки надо убрать в конце этой строки символы [#13][#10].


- А вам какую операционку поставить - экспи, семерку или висту?
- Это ты сейчас о чем?
- Олег Георгиевич, вам какой компьютер хотелось бы - молодежный или надежный?
- Ну, конечно, надежный!
- Вот, значит - экспи, без вопросов! Сейчас сделаем...

(Улицы разбитых фонарей, сезон 10, серия 17)

Единственная инновация Windows 8 это - Metro, чтобы дебилы по иконкам не промахивались!


При модном втюхе модоподдающимся начинает нравиться
 
Сообщение
Цитата kop9000 ()
я вроде всё нормально написал

Это ты так думаешь, а я думаю иначе.
Цитата kop9000 ()
последняя строчка пустая. а мне её не надо. как сделать чтобы пустые строки удалялись?

Я тебе четко сказал:
Цитата Peter ()
Изучи его,


Если бы ты это сделал, а не просто скопипастил мой код, то сам бы прекрасно понял что надо сделать, чтобы последняя строчка (пустая) не записывалась.
Кстати, в указанном мною примере последняя пустая строчка всегда будет записываться независимо от того, сколько там твоих "приставок" (количество строк) записывается.

Могу только дать подсказку: при записи последней НЕпустой строки надо убрать в конце этой строки символы [#13][#10].

Автор - Peter
Дата добавления - 01 Июня 2015 в 17:36
kop9000Дата: Пн, 01 Июня 2015, 18:21 | Сообщение # 60
Ветеран форума
Код
If "[list_roms]" "=" "Âûáðàííûå"
SetVar "[List]" ""
Loop "6" "40" "[n]"
     If "[CheckBox[n]]" "=" "Checked"
       GetObjectInfo "CheckBox[n]" "Caption" "[Caption]"
       SetVar "[List]" "[List][Caption][#13][#10]"
     EndIf
        
     If "[n]" "=" "40"
     GetObjectInfo "CheckBox[n]" "Caption" "[Caption]"
     SetVar "[List]" "[List][Caption]"
     EndIf
        
EndLoop
FileWrite "!C:\Users\TBOIR\Desktop\tm.txt" "All" "[List]"
SetVar "[Caption]" ""
EndIf


это было легко. пустых строк теперь нет. я ведь всё ведь правильно сделал или я не угадал после твоей подсказки?


Сообщение отредактировано
kop9000 - Пн, 01 Июня 2015, 18:29
 
Сообщение
Код
If "[list_roms]" "=" "Âûáðàííûå"
SetVar "[List]" ""
Loop "6" "40" "[n]"
     If "[CheckBox[n]]" "=" "Checked"
       GetObjectInfo "CheckBox[n]" "Caption" "[Caption]"
       SetVar "[List]" "[List][Caption][#13][#10]"
     EndIf
        
     If "[n]" "=" "40"
     GetObjectInfo "CheckBox[n]" "Caption" "[Caption]"
     SetVar "[List]" "[List][Caption]"
     EndIf
        
EndLoop
FileWrite "!C:\Users\TBOIR\Desktop\tm.txt" "All" "[List]"
SetVar "[Caption]" ""
EndIf


это было легко. пустых строк теперь нет. я ведь всё ведь правильно сделал или я не угадал после твоей подсказки?

Автор - kop9000
Дата добавления - 01 Июня 2015 в 18:21
Форум NeoBook » Всё о программе NeoBook » Проекты NeoBook » RetroX
  • Страница 2 из 5
  • «
  • 1
  • 2
  • 3
  • 4
  • 5
  • »
Поиск: