StringCaseSense, Locale

serzh82saratov пишет:

Таким же образом есть ли обозначение в AHK гласных \ согласных букв?

Нет. Создайте свой массив.

Можно без массива, лишь проверить "строку гласных" на наличие в ней нужной буквы с помощью InStr()

Word = Фразеологизм
Loop, parse, word
  msg .= A_LoopField . " - " . IsVocal(A_LoopField) . "`n"
MsgBox % msg

IsVocal(a)
{
   Return (InStr("АОУЫЭЯЁЮИЕаоуыэяёюие", a) != 0)
}

Только так ъ и ь не отличить от согласных.

Таким же образом есть ли обозначение в AHK гласных \ согласных букв?

Нет. Создайте свой массив.

Можно без массива, лишь проверить "строку гласных" на наличие в ней нужной буквы с помощью InStr()

Word = Фразеологизм
Loop, parse, word
  msg .= A_LoopField . " - " . IsVocal(A_LoopField) . "`n"
MsgBox % msg

IsVocal(a)
{
   Return (InStr("АОУЫЭЯЁЮИЕаоуыэяёюие", a) != 0)
}

Знания конечно поражают!

Таких по пальцам. Только им, за все халявно полученные знания и жизнь этого форума, ещё раз скажу, большое спасибо!

Вам тоже благодарность! Работу и помощь большую выполняете!

Знания конечно поражают!

Таких по пальцам. Только им, за все халявно полученные знания и жизнь этого форума, ещё раз скажу, большое спасибо!

SetFormat, integer, H      ; просто для проверки
MsgBox, % ToBin(0xABCD)
MsgBox, % FromBin("1010101111001101")   ; обязательно в кавычках

ToBin(Number)
{
   While Number
      bin := (Number&1 ? 1 : 0) . bin, Number >>= 1
   Return bin
}

FromBin(bin)
{
   Loop, parse, bin
      Num := (Num ? Num << 1 : 0)|A_LoopField
   Return Num
}

В двоичной системе у нечётных первый бит всегда 1, у чётных 0. Выражением & 1 (& — логическое "и") отсекаем первый бит.

А есть ли такой же короткий код для перевода систем исчисления? Из двоичной в десятичную например

serzh82saratov пишет:

Mod(Dividend, Divisor)

Имхо, излишне.

Num1 := 8, Num2 := 7
MsgBox, % Num1 & 1 "`n" Num2 & 1

Тоесть если число нечетное возвращает 1, если четное 0, верно?

Интересно... Строчки было бы хорошо объяснить

Mod(Dividend, Divisor)

Имхо, излишне.

Num1 := 8, Num2 := 7
MsgBox, % Num1 & 1 "`n" Num2 & 1

Но у меня ведь не мало чисел, а если делить их то получится уйма результатов.

Не бывает всё и сразу. Надо перебирать.