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

Пустых-то может и нет, а вот, так-сказать, "дубликат" одной строки есть.
Догадайся - какой?
;)

Цитата kop9000 ()
или я не угадал

Тут не гадать надо, а понять ЧТО И КАК РАБОТАЕТ.
В программировании одна неверная "запятая", и - приплыли.
Это как в "Казнить нельзя помиловать".
А без четкого понимания того, что делаешь (пишешь) правильно расставить запятые никогда не получится.
;)


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

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

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


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

Пустых-то может и нет, а вот, так-сказать, "дубликат" одной строки есть.
Догадайся - какой?
;)

Цитата kop9000 ()
или я не угадал

Тут не гадать надо, а понять ЧТО И КАК РАБОТАЕТ.
В программировании одна неверная "запятая", и - приплыли.
Это как в "Казнить нельзя помиловать".
А без четкого понимания того, что делаешь (пишешь) правильно расставить запятые никогда не получится.
;)

Автор - Peter
Дата добавления - 01 Июня 2015 в 21:36
kop9000Дата: Пн, 01 Июня 2015, 22:44 | Сообщение # 62
Ветеран форума
Цитата Peter ()
Пустых-то может и нет, а вот, так-сказать, "дубликат" одной строки есть.
Догадайся - какой?

это когда я ставлю все галки. возможно надо сделать вот так

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


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


Сообщение отредактировано
kop9000 - Пн, 01 Июня 2015, 22:53
 
Сообщение
Цитата Peter ()
Пустых-то может и нет, а вот, так-сказать, "дубликат" одной строки есть.
Догадайся - какой?

это когда я ставлю все галки. возможно надо сделать вот так

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


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

Автор - kop9000
Дата добавления - 01 Июня 2015 в 22:44
PeterДата: Пн, 01 Июня 2015, 22:59 | Сообщение # 63
Админ NeoBook
Цитата kop9000 ()
это когда я ставлю все галки. возможно надо сделать вот так

Даже если ни одной галки не поставишь, последняя строка там будет всегда.
Догадайся - почему?

Цитата kop9000 ()
возможно надо сделать вот так

Возможно... возможно... возможно...
В программировании не бывает "возможно", там либо ДА либо НЕТ!
Твой код выдаст ошибку, т.к. объекта с именем CheckBox41 у тебя нет.

Цитата kop9000 ()
и тогда он будет её использовать для очистки пустых строк

kop9000, мой тебе совет - завязывай с этим делом!


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

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

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


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

Даже если ни одной галки не поставишь, последняя строка там будет всегда.
Догадайся - почему?

Цитата kop9000 ()
возможно надо сделать вот так

Возможно... возможно... возможно...
В программировании не бывает "возможно", там либо ДА либо НЕТ!
Твой код выдаст ошибку, т.к. объекта с именем CheckBox41 у тебя нет.

Цитата kop9000 ()
и тогда он будет её использовать для очистки пустых строк

kop9000, мой тебе совет - завязывай с этим делом!

Автор - Peter
Дата добавления - 01 Июня 2015 в 22:59
kop9000Дата: Пн, 01 Июня 2015, 23:05 | Сообщение # 64
Ветеран форума
ой нет нет нет. не так. а вот так

Код
If "[list_roms]" "=" "Âûáðàííûå"
SetVar "[list]" ""
Loop "6" "40" "[n]"

If "[n]" "=" "40"
GetObjectInfo "CheckBox[n]" "Caption" "[Caption]"
SetVar "[list]" "[list][Caption]"
ExitLoop
EndIf

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


просто условие где [n] 40 поставить выше и в условие в конце поставить команду выйти из цыкла

Добавлено (01 Июня 2015, 23:05)
---------------------------------------------
да блин всёравно что то не так

Сообщение отредактировано
kop9000 - Пн, 01 Июня 2015, 23:03
 
Сообщениеой нет нет нет. не так. а вот так

Код
If "[list_roms]" "=" "Âûáðàííûå"
SetVar "[list]" ""
Loop "6" "40" "[n]"

If "[n]" "=" "40"
GetObjectInfo "CheckBox[n]" "Caption" "[Caption]"
SetVar "[list]" "[list][Caption]"
ExitLoop
EndIf

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


просто условие где [n] 40 поставить выше и в условие в конце поставить команду выйти из цыкла

Добавлено (01 Июня 2015, 23:05)
---------------------------------------------
да блин всёравно что то не так


Автор - kop9000
Дата добавления - 01 Июня 2015 в 23:05
PeterДата: Пн, 01 Июня 2015, 23:30 | Сообщение # 65
Админ NeoBook
Цитата kop9000 ()
да блин всёравно что то не так

mda
Короче, вот тебе, напоследок, рабочий код:
Код
Loop "6" "40" "[n]"
   If "[CheckBox[n]]" "=" "Checked"
     GetObjectInfo "CheckBox[n]" "Caption" "[Caption]"
     If "[List]" "<>" ""
       SetVar "[List]" "[List][#13][#10][Caption]"
      Else
       SetVar "[List]" "[Caption]"
     EndIf
   EndIf
EndLoop


И все-равно завязывай!


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

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

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


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

mda
Короче, вот тебе, напоследок, рабочий код:
Код
Loop "6" "40" "[n]"
   If "[CheckBox[n]]" "=" "Checked"
     GetObjectInfo "CheckBox[n]" "Caption" "[Caption]"
     If "[List]" "<>" ""
       SetVar "[List]" "[List][#13][#10][Caption]"
      Else
       SetVar "[List]" "[Caption]"
     EndIf
   EndIf
EndLoop


И все-равно завязывай!

Автор - Peter
Дата добавления - 01 Июня 2015 в 23:30
kop9000Дата: Вт, 02 Июня 2015, 00:04 | Сообщение # 66
Ветеран форума
Цитата Peter ()
Короче, вот тебе, напоследок, рабочий код:


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

ты поставил цыкл с условиями сначала если галка поставлена то он должен взять название этой галки и поместить его в переменную тоесть в [Caption] далее ты зачем-то поставил условие если переменная

Код
[list]


то он должен в эту пустую добавить название галки которая я поставил. потом идёт [#13][#10] тоесть он начинает новую пустую и 40 раз так делает

причём тут

Код
Else
SetVar "[List]" "[Caption]"


ведь если

Код
[list]


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


Сообщение отредактировано
kop9000 - Вт, 02 Июня 2015, 00:09
 
Сообщение
Цитата Peter ()
Короче, вот тебе, напоследок, рабочий код:


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

ты поставил цыкл с условиями сначала если галка поставлена то он должен взять название этой галки и поместить его в переменную тоесть в [Caption] далее ты зачем-то поставил условие если переменная

Код
[list]


то он должен в эту пустую добавить название галки которая я поставил. потом идёт [#13][#10] тоесть он начинает новую пустую и 40 раз так делает

причём тут

Код
Else
SetVar "[List]" "[Caption]"


ведь если

Код
[list]


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

Автор - kop9000
Дата добавления - 02 Июня 2015 в 00:04
PeterДата: Вт, 02 Июня 2015, 00:13 | Сообщение # 67
Админ NeoBook
Цитата kop9000 ()
причём тут

При том, что заполнение списка всегда начинается с первой строки, поэтому перед ней перенос строк не нужен.
Можно было написАть и так:
Код
If "[List]" "=" ""
    SetVar "[List]" "[Caption]"
   Else
    SetVar "[List]" "[List][#13][#10][Caption]"  
EndIf

С точки зрения логики это одно и то же, что я показал ранее.

Цитата kop9000 ()
хотя я когда его поставил у меня всё рвботает и таких строчек в текстовом документе нет странным образом

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


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

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

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


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

При том, что заполнение списка всегда начинается с первой строки, поэтому перед ней перенос строк не нужен.
Можно было написАть и так:
Код
If "[List]" "=" ""
    SetVar "[List]" "[Caption]"
   Else
    SetVar "[List]" "[List][#13][#10][Caption]"  
EndIf

С точки зрения логики это одно и то же, что я показал ранее.

Цитата kop9000 ()
хотя я когда его поставил у меня всё рвботает и таких строчек в текстовом документе нет странным образом

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

Автор - Peter
Дата добавления - 02 Июня 2015 в 00:13
mishemДата: Вт, 02 Июня 2015, 00:14 | Сообщение # 68
Эксперт форума
Цитата Peter ()
мой тебе совет - завязывай с этим делом!

Я вообще поражаюсь как у тебя терпения хватает. %)
Ему давно этот совет был дан.


Не хочешь читать хелп?

Если хелп и форум не помогли, тогда все ответы здесь



Если вы думаете, что сможете — вы сможете, если думаете, что нет — вы правы.
 
Сообщение
Цитата Peter ()
мой тебе совет - завязывай с этим делом!

Я вообще поражаюсь как у тебя терпения хватает. %)
Ему давно этот совет был дан.

Автор - mishem
Дата добавления - 02 Июня 2015 в 00:14
PeterДата: Вт, 02 Июня 2015, 00:36 | Сообщение # 69
Админ NeoBook


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

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

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


При модном втюхе модоподдающимся начинает нравиться
 
Сообщение

Автор - Peter
Дата добавления - 02 Июня 2015 в 00:36
kop9000Дата: Вт, 02 Июня 2015, 01:00 | Сообщение # 70
Ветеран форума
Цитата Peter ()
Так и должно быть.
А почему сам разбирайся.


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

Код
SetVar "[l6]" "atari2600"
SetVar "[l7]" "atari5200"
SetVar "[l8]" "atari7800"


а затем в кнопке ок пропишу следующее

Код
Loop "6" "40" "[n]"
If "[CheckBox[n]]" "=" "Checked"
If "[list]" "<>" ""
SetVar "[List2]" "[List2][#13][#10][l[n]]"
Else
SetVar "[List2]" "[l[n]]"
EndIf
EndIf
EndLoop


Сообщение отредактировано
kop9000 - Вт, 02 Июня 2015, 01:01
 
Сообщение
Цитата Peter ()
Так и должно быть.
А почему сам разбирайся.


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

Код
SetVar "[l6]" "atari2600"
SetVar "[l7]" "atari5200"
SetVar "[l8]" "atari7800"


а затем в кнопке ок пропишу следующее

Код
Loop "6" "40" "[n]"
If "[CheckBox[n]]" "=" "Checked"
If "[list]" "<>" ""
SetVar "[List2]" "[List2][#13][#10][l[n]]"
Else
SetVar "[List2]" "[l[n]]"
EndIf
EndIf
EndLoop

Автор - kop9000
Дата добавления - 02 Июня 2015 в 01:00
kop9000Дата: Ср, 03 Июня 2015, 15:56 | Сообщение # 71
Ветеран форума
даю обновлённый проект на проверку
Прикрепления: 5520410.zip(73Kb)
 
Сообщениедаю обновлённый проект на проверку

Автор - kop9000
Дата добавления - 03 Июня 2015 в 15:56
kop9000Дата: Ср, 03 Июня 2015, 22:04 | Сообщение # 72
Ветеран форума
Так я сейчас работаю над одной очень интересной функции но есть небольшая проблемма

Код
SearchStr "[!]" "[games]" "[sear]" ""

If "[sear]" "=" "0"
else
SetVar "[text1]" "nf buhf bvvtn njxye. rjgb. jhbubyfkmyjuj rfnhbl;f"
EndIf


есть например ром в котром есть например знак [!] я поставил условие что если он найдёт в этом роме а именно в имене файла этот знак то он должен в переменной [text1] показать сообщение что этот ром точная копия оригинального катриджа. но почему-то он показывает просто 0. я пробовал ставить [#34][#34] а именно так

Код
[code]SearchStr "[#34][!][#34]" "[games]" "[sear]" ""


но увы ничего не поменялось. он просто показывает 0 и всё. а вот например с словом "Hack" всё нормально. как можно это исправить?
Прикрепления: 0325992.zip(69Kb)


Сообщение отредактировано
kop9000 - Ср, 03 Июня 2015, 22:10
 
СообщениеТак я сейчас работаю над одной очень интересной функции но есть небольшая проблемма

Код
SearchStr "[!]" "[games]" "[sear]" ""

If "[sear]" "=" "0"
else
SetVar "[text1]" "nf buhf bvvtn njxye. rjgb. jhbubyfkmyjuj rfnhbl;f"
EndIf


есть например ром в котром есть например знак [!] я поставил условие что если он найдёт в этом роме а именно в имене файла этот знак то он должен в переменной [text1] показать сообщение что этот ром точная копия оригинального катриджа. но почему-то он показывает просто 0. я пробовал ставить [#34][#34] а именно так

Код
[code]SearchStr "[#34][!][#34]" "[games]" "[sear]" ""


но увы ничего не поменялось. он просто показывает 0 и всё. а вот например с словом "Hack" всё нормально. как можно это исправить?

Автор - kop9000
Дата добавления - 03 Июня 2015 в 22:04
PeterДата: Чт, 04 Июня 2015, 00:32 | Сообщение # 73
Админ NeoBook
Цитата kop9000 ()
как можно это исправить?

НаписАть правильный код.
kop9000, когда сможешь сам себе объяснить что означает КАЖДЫЙ СИМВОЛ в параметрах команды, тогда и найдешь ошибку.
Я бесконечно править твои ошибки не намерен.
Нужно четко понимать ЧТО и ДЛЯ ЧЕГО ты пишешь, уж много раз говорено.


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

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

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


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

НаписАть правильный код.
kop9000, когда сможешь сам себе объяснить что означает КАЖДЫЙ СИМВОЛ в параметрах команды, тогда и найдешь ошибку.
Я бесконечно править твои ошибки не намерен.
Нужно четко понимать ЧТО и ДЛЯ ЧЕГО ты пишешь, уж много раз говорено.

Автор - Peter
Дата добавления - 04 Июня 2015 в 00:32
kop9000Дата: Чт, 04 Июня 2015, 01:18 | Сообщение # 74
Ветеран форума
Цитата Peter ()
НаписАть правильный код.
kop9000, когда сможешь сам себе объяснить что означает КАЖДЫЙ СИМВОЛ в параметрах команды, тогда и найдешь ошибку.
Я бесконечно править твои ошибки не намерен.
Нужно четко понимать ЧТО и ДЛЯ ЧЕГО ты пишешь, уж много раз говорено

я всё прекрасно понимаю что я делаю. но он [!] принимает как переменную. но мне это ненадо мне нужно чтобы он искал эту [!] но я незнаю как это сделать
 
Сообщение
Цитата Peter ()
НаписАть правильный код.
kop9000, когда сможешь сам себе объяснить что означает КАЖДЫЙ СИМВОЛ в параметрах команды, тогда и найдешь ошибку.
Я бесконечно править твои ошибки не намерен.
Нужно четко понимать ЧТО и ДЛЯ ЧЕГО ты пишешь, уж много раз говорено

я всё прекрасно понимаю что я делаю. но он [!] принимает как переменную. но мне это ненадо мне нужно чтобы он искал эту [!] но я незнаю как это сделать

Автор - kop9000
Дата добавления - 04 Июня 2015 в 01:18
kop9000Дата: Чт, 04 Июня 2015, 01:31 | Сообщение # 75
Ветеран форума
:D позорище



И что меня останавливало?

Код
SearchStr "[#91]![#93]" "[games]" "[sear]" ""

If "[sear]" "=" "0"
else
SetVar "[text1]" "nf buhf bvvtn njxye. rjgb. jhbubyfkmyjuj rfnhbl;f"
EndIf


:D

То ли справка не хочет меня видеть то ли её вовсе нет. я ведь всю справку читал

вот обновлённый проект
Прикрепления: 2335537.zip(71Kb)


Сообщение отредактировано
kop9000 - Чт, 04 Июня 2015, 01:42
 
Сообщение:D позорище



И что меня останавливало?

Код
SearchStr "[#91]![#93]" "[games]" "[sear]" ""

If "[sear]" "=" "0"
else
SetVar "[text1]" "nf buhf bvvtn njxye. rjgb. jhbubyfkmyjuj rfnhbl;f"
EndIf


:D

То ли справка не хочет меня видеть то ли её вовсе нет. я ведь всю справку читал

вот обновлённый проект

Автор - kop9000
Дата добавления - 04 Июня 2015 в 01:31
PeterДата: Чт, 04 Июня 2015, 01:47 | Сообщение # 76
Админ NeoBook
Цитата kop9000 ()
[#91]![#93]

Вот это уже лучше.
:)

Цитата kop9000 ()
И что меня останавливало?

Привычка работать по-шаблону, не задумываясь на тем что пишешь.

А в справку всегда надо заглядывать в первую очередь, когда возникают непонятки.


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

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

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


При модном втюхе модоподдающимся начинает нравиться
 
Сообщение
Цитата kop9000 ()
[#91]![#93]

Вот это уже лучше.
:)

Цитата kop9000 ()
И что меня останавливало?

Привычка работать по-шаблону, не задумываясь на тем что пишешь.

А в справку всегда надо заглядывать в первую очередь, когда возникают непонятки.

Автор - Peter
Дата добавления - 04 Июня 2015 в 01:47
mishemДата: Чт, 04 Июня 2015, 01:57 | Сообщение # 77
Эксперт форума
Вообще то с восклицательным знаком при поиске по моему есть проблемы, или с точкой, не помню уже...

Не хочешь читать хелп?

Если хелп и форум не помогли, тогда все ответы здесь



Если вы думаете, что сможете — вы сможете, если думаете, что нет — вы правы.
 
СообщениеВообще то с восклицательным знаком при поиске по моему есть проблемы, или с точкой, не помню уже...

Автор - mishem
Дата добавления - 04 Июня 2015 в 01:57
kop9000Дата: Чт, 04 Июня 2015, 02:45 | Сообщение # 78
Ветеран форума
Цитата Peter ()
Привычка работать по-шаблону, не задумываясь на тем что пишешь.

А в справку всегда надо заглядывать в первую очередь, когда возникают непонятки


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

Код
Carriage Return
[#13]

Line Feed
[#10]

Tab
[#9]


хоть бы примеры в справке писали. все примеры есть а к этим переменным нету


Сообщение отредактировано
kop9000 - Чт, 04 Июня 2015, 02:46
 
Сообщение
Цитата Peter ()
Привычка работать по-шаблону, не задумываясь на тем что пишешь.

А в справку всегда надо заглядывать в первую очередь, когда возникают непонятки


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

Код
Carriage Return
[#13]

Line Feed
[#10]

Tab
[#9]


хоть бы примеры в справке писали. все примеры есть а к этим переменным нету

Автор - kop9000
Дата добавления - 04 Июня 2015 в 02:45
PeterДата: Чт, 04 Июня 2015, 16:53 | Сообщение # 79
Админ NeoBook
Цитата kop9000 ()
а к этим переменным нету

Эти переменные - управляющие символы, и в справке для них есть даже маленькая страничка.
Если отсутствует перевод и непонятно, то лучше залезть в интернет, где можно отыскать толкование этих символов на русском языке. Подобной информации достаточно.
Ещё лучше скачать себе на комп всю таблицу ASCII-кодов, и держать ее "под рукой", поскольку всего не упомнишь, конечно же.


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

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

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


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

Эти переменные - управляющие символы, и в справке для них есть даже маленькая страничка.
Если отсутствует перевод и непонятно, то лучше залезть в интернет, где можно отыскать толкование этих символов на русском языке. Подобной информации достаточно.
Ещё лучше скачать себе на комп всю таблицу ASCII-кодов, и держать ее "под рукой", поскольку всего не упомнишь, конечно же.

Автор - Peter
Дата добавления - 04 Июня 2015 в 16:53
kop9000Дата: Чт, 04 Июня 2015, 17:12 | Сообщение # 80
Ветеран форума
Цитата Peter ()
Эти переменные - управляющие символы, и в справке для них есть даже маленькая страничка.
Если отсутствует перевод и непонятно, то лучше залезть в интернет, где можно отыскать толкование этих символов на русском языке. Подобной информации достаточно.
Ещё лучше скачать себе на комп всю таблицу ASCII-кодов, и держать ее "под рукой", поскольку всего не упомнишь, конечно же.


тоесть в этой справки ASCII-коды не все написаны?
 
Сообщение
Цитата Peter ()
Эти переменные - управляющие символы, и в справке для них есть даже маленькая страничка.
Если отсутствует перевод и непонятно, то лучше залезть в интернет, где можно отыскать толкование этих символов на русском языке. Подобной информации достаточно.
Ещё лучше скачать себе на комп всю таблицу ASCII-кодов, и держать ее "под рукой", поскольку всего не упомнишь, конечно же.


тоесть в этой справки ASCII-коды не все написаны?

Автор - kop9000
Дата добавления - 04 Июня 2015 в 17:12
PeterДата: Чт, 04 Июня 2015, 17:30 | Сообщение # 81
Админ NeoBook
Цитата kop9000 ()
тоесть в этой справки ASCII-коды не все написаны?

Только самые ходовые.
А в сети лениво посмотреть?


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

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

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


При модном втюхе модоподдающимся начинает нравиться
 
Сообщение
Цитата kop9000 ()
тоесть в этой справки ASCII-коды не все написаны?

Только самые ходовые.
А в сети лениво посмотреть?

Автор - Peter
Дата добавления - 04 Июня 2015 в 17:30
kop9000Дата: Чт, 04 Июня 2015, 18:03 | Сообщение # 82
Ветеран форума
Цитата Peter ()
Только самые ходовые.
А в сети лениво посмотреть?


я и смотрю. я прорсто спросил все ли ASCII-коды написаны в NB или нет
 
Сообщение
Цитата Peter ()
Только самые ходовые.
А в сети лениво посмотреть?


я и смотрю. я прорсто спросил все ли ASCII-коды написаны в NB или нет

Автор - kop9000
Дата добавления - 04 Июня 2015 в 18:03
kop9000Дата: Сб, 06 Июня 2015, 01:29 | Сообщение # 83
Ветеран форума
есть ещё одна проблемма. есть ListBox1 есть пункты. когда выбераю пункт то этот пункт должен удалится. в справке не могу найти как это сделать.

вот обновлённый проект
Прикрепления: 5796014.zip(77Kb)


Сообщение отредактировано
kop9000 - Сб, 06 Июня 2015, 01:30
 
Сообщениеесть ещё одна проблемма. есть ListBox1 есть пункты. когда выбераю пункт то этот пункт должен удалится. в справке не могу найти как это сделать.

вот обновлённый проект

Автор - kop9000
Дата добавления - 06 Июня 2015 в 01:29
kop9000Дата: Сб, 06 Июня 2015, 01:54 | Сообщение # 84
Ветеран форума
всё вроде придумал как

Код
If "[list_games]" "=" "1"
ListBoxDeleteItem "ListBox1" "1"
EndIf

If "[list_games]" "=" "2"
ListBoxDeleteItem "ListBox1" "2"
EndIf

If "[list_games]" "=" "3"
ListBoxDeleteItem "ListBox1" "3"
EndIf

If "[list_games]" "=" "4"
ListBoxDeleteItem "ListBox1" "4"
EndIf

If "[list_games]" "=" "5"
ListBoxDeleteItem "ListBox1" "5"
EndIf


но может есть более правильный вариант?

вот обновлённый проект
Прикрепления: 9747136.zip(77Kb)
 
Сообщениевсё вроде придумал как

Код
If "[list_games]" "=" "1"
ListBoxDeleteItem "ListBox1" "1"
EndIf

If "[list_games]" "=" "2"
ListBoxDeleteItem "ListBox1" "2"
EndIf

If "[list_games]" "=" "3"
ListBoxDeleteItem "ListBox1" "3"
EndIf

If "[list_games]" "=" "4"
ListBoxDeleteItem "ListBox1" "4"
EndIf

If "[list_games]" "=" "5"
ListBoxDeleteItem "ListBox1" "5"
EndIf


но может есть более правильный вариант?

вот обновлённый проект

Автор - kop9000
Дата добавления - 06 Июня 2015 в 01:54
CallistoДата: Сб, 06 Июня 2015, 02:18 | Сообщение # 85
Участник
А может быть ListBoxDeleteItem "ListBox1" "[list_games]"?

Пожалуйста, не надо ко мне на "Вы", а то чувствую себя бабулькой)
 
СообщениеА может быть ListBoxDeleteItem "ListBox1" "[list_games]"?

Автор - Callisto
Дата добавления - 06 Июня 2015 в 02:18
kop9000Дата: Сб, 06 Июня 2015, 14:27 | Сообщение # 86
Ветеран форума
Цитата Callisto ()
А может быть ListBoxDeleteItem "ListBox1" "[list_games]"?


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


Сообщение отредактировано
kop9000 - Сб, 06 Июня 2015, 14:28
 
Сообщение
Цитата Callisto ()
А может быть ListBoxDeleteItem "ListBox1" "[list_games]"?


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

Автор - kop9000
Дата добавления - 06 Июня 2015 в 14:27
kop9000Дата: Вс, 07 Июня 2015, 16:20 | Сообщение # 87
Ветеран форума
так я сейчас в тупике. вроде со списком я всё сделал всё правильно а вот при нажатия на пункт он работает как-то странно.

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

вот обновлённый проект
Прикрепления: 9832898.zip(78Kb)


Сообщение отредактировано
kop9000 - Вс, 07 Июня 2015, 16:27
 
Сообщениетак я сейчас в тупике. вроде со списком я всё сделал всё правильно а вот при нажатия на пункт он работает как-то странно.

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

вот обновлённый проект

Автор - kop9000
Дата добавления - 07 Июня 2015 в 16:20
kop9000Дата: Пн, 08 Июня 2015, 03:17 | Сообщение # 88
Ветеран форума
хорошо. для тех кто не хочет качать обновлённый проект я объясню проблему подробнее

проблема в этом окне



когда когда я нажимаю нав кнопку генерировать приставку и игру то работает вот такой код и выводится список

Код
SetVar "[ing]" ""
SetVar "[lite_system]" ""
SetVar "[system]" ""
SetVar "[games]" ""
SetVar "[list_games]" ""
SetVar "[list_system]" ""

FileLen "!C:\Users\TBOIR\Desktop\RetroX\File\system_lite.txt" "[random]"

Loop "1" "5" "[lol]"
Random "[random]" "[rad]"

If "[rad]" "=" "0"
Math "[rad]+1" "0" "[rad]"
EndIf

If "[rad]" "<>" "[rad2]"
If "[id]" "<>" ""
CloseApp "[id]" "ForceClose"
EndIf
EndIf

SetVar "[rad2]" "[rad]"

While "[rad]" "=" "0"
Random "5" "[rad]"
EndWhile

FileRead "[PubDir]/file/system_lite.txt" "[rad]" "[lite_system]"
FileRead "[PubDir]/file/system.txt" "[rad]" "[system]"
FileRead "[PubDir]/file/tools.txt" "[rad]" "[tools]"

FileLen "!E:\GoodTools\GoodTools\[lite_system]\random.txt" "[random1]"

Random "[random1]" "[randoms]"

FileRead "!E:\GoodTools\GoodTools\[lite_system]\random.txt" "[randoms]" "[st]"

SearchStr ".zip" "[st]" "[st2]" ""
StrDel "[st]" "[st2]" "4" "[games]"

If "[List_games]" "<>" ""
SetVar "[List_system]" "[List_system][#13][#10][lite_system]"
SetVar "[List_games]" "[List_games][#13][#10][games]"
Else
SetVar "[List_system]" "[lite_system]"
SetVar "[List_games]" "[games]"
EndIf
EndLoop

SetVar "[system]" ""
SetVar "[lite_system]" ""
SetVar "[games]" ""





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

Код
.SetVar "[games]" ""
.SetVar "[lite_system]" ""

ListBoxGetItem "ListBox1" "[list_games1]" "[games]"
ListBoxGetItem "ListBox2" "[list_games1]" "[lite_system]"

AlertBox "" "[games]|[lite_system]"

TimerStart "Timer1" "1000"


в AlertBox "" "[games]|[lite_system]" он вроде как показывает всё верно но затем он запускает не то что нужно а именно пятый пункт эмулятора причём всегда какой бы я пункт не выбрал

дело в том что мне не нужно выбирать пункт слева так когда я выбираю пункт справа он должен выбрать такой же пункт слева. я не знаю в чём проблемам.
Прикрепления: 8756697.jpg(63Kb) · 4233585.jpg(90Kb) · 4398735.jpg(39Kb)


Сообщение отредактировано
kop9000 - Пн, 08 Июня 2015, 15:47
 
Сообщениехорошо. для тех кто не хочет качать обновлённый проект я объясню проблему подробнее

проблема в этом окне



когда когда я нажимаю нав кнопку генерировать приставку и игру то работает вот такой код и выводится список

Код
SetVar "[ing]" ""
SetVar "[lite_system]" ""
SetVar "[system]" ""
SetVar "[games]" ""
SetVar "[list_games]" ""
SetVar "[list_system]" ""

FileLen "!C:\Users\TBOIR\Desktop\RetroX\File\system_lite.txt" "[random]"

Loop "1" "5" "[lol]"
Random "[random]" "[rad]"

If "[rad]" "=" "0"
Math "[rad]+1" "0" "[rad]"
EndIf

If "[rad]" "<>" "[rad2]"
If "[id]" "<>" ""
CloseApp "[id]" "ForceClose"
EndIf
EndIf

SetVar "[rad2]" "[rad]"

While "[rad]" "=" "0"
Random "5" "[rad]"
EndWhile

FileRead "[PubDir]/file/system_lite.txt" "[rad]" "[lite_system]"
FileRead "[PubDir]/file/system.txt" "[rad]" "[system]"
FileRead "[PubDir]/file/tools.txt" "[rad]" "[tools]"

FileLen "!E:\GoodTools\GoodTools\[lite_system]\random.txt" "[random1]"

Random "[random1]" "[randoms]"

FileRead "!E:\GoodTools\GoodTools\[lite_system]\random.txt" "[randoms]" "[st]"

SearchStr ".zip" "[st]" "[st2]" ""
StrDel "[st]" "[st2]" "4" "[games]"

If "[List_games]" "<>" ""
SetVar "[List_system]" "[List_system][#13][#10][lite_system]"
SetVar "[List_games]" "[List_games][#13][#10][games]"
Else
SetVar "[List_system]" "[lite_system]"
SetVar "[List_games]" "[games]"
EndIf
EndLoop

SetVar "[system]" ""
SetVar "[lite_system]" ""
SetVar "[games]" ""





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

Код
.SetVar "[games]" ""
.SetVar "[lite_system]" ""

ListBoxGetItem "ListBox1" "[list_games1]" "[games]"
ListBoxGetItem "ListBox2" "[list_games1]" "[lite_system]"

AlertBox "" "[games]|[lite_system]"

TimerStart "Timer1" "1000"


в AlertBox "" "[games]|[lite_system]" он вроде как показывает всё верно но затем он запускает не то что нужно а именно пятый пункт эмулятора причём всегда какой бы я пункт не выбрал

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

Автор - kop9000
Дата добавления - 08 Июня 2015 в 03:17
kop9000Дата: Ср, 10 Июня 2015, 01:06 | Сообщение # 89
Ветеран форума
Блин у меня ничего не получается в справке не могу найти как эту проблему исправить а вы мне не помогаете. где справедливость?

Не читайте зачёркнутый текст который я написал выше. После того как я выложил версию 1.2.0 то позже мне удалось всё исправить. Не знаю почему я раньше так не смог сделать. Позже выложу версию 1.2.1 и объясню в чём была моя ошибка.

Я много чего сделал. Например я наконец-то все пути засунул в несколько коротких переменных. Также я заменил все пути проекта в [PubDir]. Также я поработал с настройками. Я много могу сделать но когда у меня что-то не получается и я ничего не могу найти в справке то я пишу на форуме. Я сейчас так просто не делаю как раньше сначала спросив а потом подумав.

Версия 1.2.0 https://yadi.sk/d/G-J9AcKthBAWy

- Много новых настроек
- Теперь генератор показывает полное название приставки, короткое название приставки и название игры
- Новые звуки
- Исправлены некоторые ошибки

Дальше мне надо добавить в настройках настройки путей. Сделать так чтобы мой проект в папке искал ромы которые там лежат и все названия ромов сохранял в текстовый файл. Это всё будет легко сделать.
Прикрепления: 9409172.zip(75Kb)


Сообщение отредактировано
kop9000 - Ср, 10 Июня 2015, 03:59
 
СообщениеБлин у меня ничего не получается в справке не могу найти как эту проблему исправить а вы мне не помогаете. где справедливость?

Не читайте зачёркнутый текст который я написал выше. После того как я выложил версию 1.2.0 то позже мне удалось всё исправить. Не знаю почему я раньше так не смог сделать. Позже выложу версию 1.2.1 и объясню в чём была моя ошибка.

Я много чего сделал. Например я наконец-то все пути засунул в несколько коротких переменных. Также я заменил все пути проекта в [PubDir]. Также я поработал с настройками. Я много могу сделать но когда у меня что-то не получается и я ничего не могу найти в справке то я пишу на форуме. Я сейчас так просто не делаю как раньше сначала спросив а потом подумав.

Версия 1.2.0 https://yadi.sk/d/G-J9AcKthBAWy

- Много новых настроек
- Теперь генератор показывает полное название приставки, короткое название приставки и название игры
- Новые звуки
- Исправлены некоторые ошибки

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

Автор - kop9000
Дата добавления - 10 Июня 2015 в 01:06
kop9000Дата: Чт, 11 Июня 2015, 20:14 | Сообщение # 90
Ветеран форума
Я продолжаю работать над проектом. Сегодня четверг и последний рабочий день. Завтра праздник. Так что сегодня я выкладываю первую альфу версии 1.2.1 которая выйдет на следующей неделе. На выходных я возможно буду работать над проектом так что возможно я ещё буду выкладывать новые альфы версии 1.2.1

Ещё не всё сделано и не все ошибки исправлены. Так что возможно первая альфа версия 1.2.1 будет выдавать ошибки.
Прикрепления: RetroX__1.2.1_a.zip(685Kb)
 
СообщениеЯ продолжаю работать над проектом. Сегодня четверг и последний рабочий день. Завтра праздник. Так что сегодня я выкладываю первую альфу версии 1.2.1 которая выйдет на следующей неделе. На выходных я возможно буду работать над проектом так что возможно я ещё буду выкладывать новые альфы версии 1.2.1

Ещё не всё сделано и не все ошибки исправлены. Так что возможно первая альфа версия 1.2.1 будет выдавать ошибки.

Автор - kop9000
Дата добавления - 11 Июня 2015 в 20:14
Форум NeoBook » Всё о программе NeoBook » Проекты NeoBook » RetroX
Страница 3 из 5«12345»
Поиск: