Серый форум — AHK:Замена символов в строке

Re: AHK:Замена символов в строке

2019-05-15T07:34:10Z

Касательно причины переносов строк — http://forum.script-coding.com/viewtopic.php?id=10138.

По поводу исправления текста, набранного в неверной раскладке, тут много сочинений и несколько тем на форуме. Как и всякий порядочный форумчанин я пользуюсь собственным велосипедом — http://forum.script-coding.com/viewtopi … 78#p113978.

a154802 пишет:

строr

Re: AHK:Замена символов в строке

2019-05-15T06:06:27Z

a154802, мне непонятен такой метод, свою проблему (превращение кириллицы в текст, который можно передать в url) я решал вот так:

translit(repstr)
{
	StringReplace, repstr, repstr, а , [[a]] , All
	StringReplace, repstr, repstr, б , [[b]] , All
	StringReplace, repstr, repstr, в , [[v]] , All
	StringReplace, repstr, repstr, г , [[g]] , All
	StringReplace, repstr, repstr, д , [[d]] , All
	StringReplace, repstr, repstr, е , [[e]] , All
	StringReplace, repstr, repstr, ё , [[yo]] , All
	StringReplace, repstr, repstr, ж , [[zh]] , All
	StringReplace, repstr, repstr, з , [[z]] , All
	StringReplace, repstr, repstr, и , [[i]] , All
	StringReplace, repstr, repstr, й , [[j]] , All
	StringReplace, repstr, repstr, к , [[k]] , All
	StringReplace, repstr, repstr, л , [[l]] , All
	StringReplace, repstr, repstr, м , [[m]] , All
	StringReplace, repstr, repstr, н , [[n]] , All
	StringReplace, repstr, repstr, о , [[o]] , All
	StringReplace, repstr, repstr, п , [[p]] , All
	StringReplace, repstr, repstr, р , [[r]] , All
	StringReplace, repstr, repstr, с , [[s]] , All
	StringReplace, repstr, repstr, т , [[t]] , All
	StringReplace, repstr, repstr, у , [[u]] , All
	StringReplace, repstr, repstr, ф , [[f]] , All
	StringReplace, repstr, repstr, х , [[x]] , All
	StringReplace, repstr, repstr, ц , [[cz]] , All
	StringReplace, repstr, repstr, ч , [[ch]] , All
	StringReplace, repstr, repstr, ш , [[sh]] , All
	StringReplace, repstr, repstr, щ , [[shh]] , All
	StringReplace, repstr, repstr, ъ , [[````]] , All
	StringReplace, repstr, repstr, ы , [[y']] , All
	StringReplace, repstr, repstr, ь , [[``]] , All
	StringReplace, repstr, repstr, э , [[e``]] , All
	StringReplace, repstr, repstr, ю , [[yu]] , All
	StringReplace, repstr, repstr, я , [[ya]] , All

	StringReplace, repstr, repstr, А , [[A]] , All
	StringReplace, repstr, repstr, Б , [[b]] , All
	StringReplace, repstr, repstr, В , [[V]] , All
	StringReplace, repstr, repstr, Г , [[G]] , All
	StringReplace, repstr, repstr, Д , [[D]] , All
	StringReplace, repstr, repstr, Е , [[E]] , All
	StringReplace, repstr, repstr, Ё , [[YO]] , All
	StringReplace, repstr, repstr, Ж , [[ZH]] , All
	StringReplace, repstr, repstr, З , [[Z]] , All
	StringReplace, repstr, repstr, И , [[i]] , All
	StringReplace, repstr, repstr, Й , [[J]] , All
	StringReplace, repstr, repstr, К , [[K]] , All
	StringReplace, repstr, repstr, Л , [[L]] , All
	StringReplace, repstr, repstr, М , [[M]] , All
	StringReplace, repstr, repstr, Н , [[N]] , All
	StringReplace, repstr, repstr, О , [[O]] , All
	StringReplace, repstr, repstr, П , [[P]] , All
	StringReplace, repstr, repstr, Р , [[R]] , All
	StringReplace, repstr, repstr, С , [[S]] , All
	StringReplace, repstr, repstr, Т , [[T]] , All
	StringReplace, repstr, repstr, У , [[u]] , All
	StringReplace, repstr, repstr, Ф , [[F]] , All
	StringReplace, repstr, repstr, Х , [[X]] , All
	StringReplace, repstr, repstr, Ц , [[CZ]] , All
	StringReplace, repstr, repstr, Ч , [[CH]] , All
	StringReplace, repstr, repstr, Ш , [[SH]] , All
	StringReplace, repstr, repstr, Щ , [[SHH]] , All
	StringReplace, repstr, repstr, Ъ , [[````]] , All
	StringReplace, repstr, repstr, Ы , [[Y']] , All
	StringReplace, repstr, repstr, Ь , [[``]] , All
	StringReplace, repstr, repstr, Э , [[E``]] , All
	StringReplace, repstr, repstr, Ю , [[YU]] , All
	StringReplace, repstr, repstr, Я , [[YA]] , All
	
	return repstr
}

Работает шикарно.

Re: AHK:Замена символов в строке

2019-05-15T05:37:20Z

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


	string1 := "qwertyuiop[]asdfghjkl;'zxcvbnm,./"
	string2 := "йцукенгшщзхъфывапролджэячсмитьбю."

	If Clip1 contains q,w,e,r,t,y,u,i,o,p,a,s,d,f,g,h,j,k,l,z,x,c,v,b,n,m
		{
		;MsgBox, The string was found.
		TrayTip, CapsLockV5, В русский, 1, 16
		loop Parse, string1
		StringReplace Clip1, Clip1, % A_LoopField, % SubStr(string2, A_Index, 1), All		
		}
	Else
		{
		;MsgBox, The string was not found.
		TrayTip, CapsLockV5, В английский, 1, 16
		loop Parse, string2
		StringReplace Clip1, Clip1, % A_LoopField, % SubStr(string1, A_Index, 1), All			
		}
Send %Clip1%

модифицировал пример под свои нужды, пока сделал автоматическое определение раскладки и перевода, в последующем думаю все таки остановлюсь на принудительном выборе.
Обнаружил у этого примера одну особенность/баг/фичу, если менять раскладку у примера с разрывом строк и переводом каретки, то вставляется 2 перевода строк и каретки.
Думал проблема в отсутствии указателя разделения строr в функции "loop Parse, string1", использовал "loop Parse, string1, `r, `n", проблема осталась. Попробовал удалить 2ные разделители принудительно "StringReplace, Clip1, Clip1, `r`n`r`n, `r`n, All", не помогло.
Как запустить дебаггер не знаю(( по этому не могу понять откуда такой эффект.

Re: AHK:Замена символов в строке

2013-05-26T14:46:38Z

creature.ws пишет:

В альфа версии autohotkey 2 отсутствие : уже считается ошибкой.

Усё ясно. Спасибо за разъяснения.

Re: AHK:Замена символов в строке

2013-05-26T14:42:35Z

Я и не хотел использовать тернарный оператор

Но вы же его используете, вдобавок не указав третий операнд.

Так и вопрос, почему это ошибка?

Потому, что нет оператора ?, есть оператор ? :
В альфа версии autohotkey 2 отсутствие : уже считается ошибкой.

Re: AHK:Замена символов в строке

2013-05-26T14:36:59Z

предполагаю, что предпосылка к этому — желание сократить код, написать его в одну строку

Нет. Я же ответил:

Я и не хотел использовать тернарный оператор во избежании вызова лишней операции присваивания переменной.

предложил краткий вариант записи с эквивалентной функциональностью, но не содержащий ошибок.

Так и вопрос, почему это ошибка? Где упоминание про "&&"? Если использовать тернарное выражение, то в нём условие можно не заключать в скобки. Без "или", условие в скобках обязательно. И дело в том что это я выявил случайно. То есть я в справке не видел примера записи что "если" это, тогда "то" - в одно строку.
Потому не пойму где указано что правильно по другому. Но и не нашёл где пишется так, как я пишу
Или вы имеете в виду что это баг, который могут поправить, и код станет не рабочим? (вопрос риторический)

Вообщем суть я уловил. Так писать неправильно.

ТС. Поправьте код на:

loop Parse, text 
    res .= (p := InStr(string1, A_LoopField, 1)) ?  SubStr(string2, p, 1) : ""
MsgBox  % res

Re: AHK:Замена символов в строке

2013-05-26T14:16:02Z

Кажется, этот диалог никогда не закончится.

Наверное вы имели ввиду:

Да какая разница.

Можно пруфлинк на рекомндуемое использование "&&"

В коде сообщения #16 вы зачем-то использовали

(p := InStr(string1, A_LoopField, 1)) ? res .= SubStr(string2, p, 1)

предполагая, что предпосылка к этому — желание сократить код, написать его в одну строку, помимо уточнения сути тернарного оператора, в сообщении #18 предложил краткий вариант записи с эквивалентной функциональностью, но не содержащий ошибок.

В справке вы можете найти статью if (expression), если слова без пруфлинка мало значат — используйте «официальную» конструкцию

if (p := InStr(string1, A_LoopField, 1))
    res .= SubStr(string2, p, 1)

или приведите пруфлинк, по которому рекомендуется использование

(p := InStr(string1, A_LoopField, 1)) ? res .= SubStr(string2, p, 1)

Re: AHK:Замена символов в строке

2013-05-26T14:02:00Z

допускается конструкция (сondition)? ifBranch без : elseBranch

Наверное вы имели ввиду:

(if exp) ? then exp : else exp

(if exp) ? then exp

Можно пруфлинк на рекомендуемое использование "&&" в данном случае? Я что-то в справке не найду.

Re: AHK:Замена символов в строке

2013-05-26T07:02:51Z

В чём большой смысл замены

Смысле не в замене ? на &&, а в правильном использовании тернарного оператора. То, что в версии 1.1 допускается конструкция (сondition)? ifBranch без : elseBranch — стандартная для Autohotkey синтаксическая поблажка.

Re: AHK:Замена символов в строке

2013-05-26T03:11:39Z

Тернарный оператор подразумевает наличие трёх логических фрагментов.

Не понимаю я вашей принципиальности по этому вопросу. В чём большой смысл замены "?" на "&&". Я и не хотел использовать тернарный оператор во избежании вызова лишней операции присваивания переменной. Пусть будет:

     (p := InStr(string1, A_LoopField, 1))  Тогда такой  res .= SubStr(string2, p, 1)

Что это меняет?

Re: AHK:Замена символов в строке

2013-05-25T19:23:25Z

(p := InStr(string1, A_LoopField, 1)) ? res .= SubStr(string2, p, 1)

Тернарный оператор подразумевает наличие трёх логических фрагментов.
Уместно его применять если присутствует «или»

res .= (p := InStr(string1, A_LoopField, 1)) ?  SubStr(string2, p, 1) : "другая строка"

Однострочный аналог if (condition) action это (condition) and action

Re: AHK:Замена символов в строке

2013-05-25T17:35:47Z

serzh82saratov, Заменить ничего неизменив?

Иначе переменная была пуста, без пробела. Спасибо за код

Re: AHK:Замена символов в строке

2013-05-25T17:15:13Z

пришлось заменить

Заменить ничего неизменив?

А если так:


text := "aC &"
string1 := "aBC- &"
string2 := "12 567"

loop Parse, text 
    (p := InStr(string1, A_LoopField, 1)) ? res .= SubStr(string2, p, 1)
MsgBox  % res

но все равно 1667, видно что то у меня, буду разбираться.

Тот код так и должен работать, там должно быть "1667".

Re: AHK:Замена символов в строке

2013-05-25T16:55:04Z

Не надо конделябры

Я просто еще в своем скрипте думал что пробелы будут учитываться, но пришлось заменить:

destChar = %A_LoopField%
dest = %dest%%destChar%

на

destChar:= A_LoopField
dest:= dest destChar

Скачал последнюю версию, но все равно 1667, видно что то у меня, буду разбираться.

Re: AHK:Замена символов в строке

2013-05-25T16:36:57Z

capacity
Разве речь может идти о мощности в данном контексте? «Синонимы» в таком случае искать нужно. «Вместимость» подходит лучше всего.