Серый форум — AHK: Четные \ Нечетные . Гласные \ Согласные

Re: AHK: Четные \ Нечетные . Гласные \ Согласные

null@example.com (serzh82saratov) — Tue, 09 Apr 2019 20:33:04 +0000

StringCaseSense, Locale

Re: AHK: Четные \ Нечетные . Гласные \ Согласные

null@example.com (ypppu) — Tue, 09 Apr 2019 20:29:13 +0000

Irbis пишет:

serzh82saratov пишет:
Таким же образом есть ли обозначение в AHK гласных \ согласных букв?
Нет. Создайте свой массив.

Можно без массива, лишь проверить "строку гласных" на наличие в ней нужной буквы с помощью InStr()
Word = Фразеологизм
Loop, parse, word
  msg .= A_LoopField . " - " . IsVocal(A_LoopField) . "`n"
MsgBox % msg

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

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

Re: AHK: Четные \ Нечетные . Гласные \ Согласные

null@example.com (Irbis) — Wed, 15 Jan 2014 17:41:04 +0000

Ок

Re: AHK: Четные \ Нечетные . Гласные \ Согласные

null@example.com (serzh82saratov) — Wed, 15 Jan 2014 15:40:41 +0000

Грубо говоря, я это и имел ввиду.

Re: AHK: Четные \ Нечетные . Гласные \ Согласные

null@example.com (Irbis) — Wed, 15 Jan 2014 13:36:43 +0000

serzh82saratov пишет:

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

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

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

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

Re: AHK: Четные \ Нечетные . Гласные \ Согласные

null@example.com (Qweasd123) — Mon, 13 Jan 2014 21:19:41 +0000

serzh82saratov пишет:

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

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

Re: AHK: Четные \ Нечетные . Гласные \ Согласные

null@example.com (serzh82saratov) — Mon, 13 Jan 2014 21:14:00 +0000

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

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

Re: AHK: Четные \ Нечетные . Гласные \ Согласные

null@example.com (Qweasd123) — Mon, 13 Jan 2014 20:53:23 +0000

Знания конечно поражают! Спасибо , помог!

Re: AHK: Четные \ Нечетные . Гласные \ Согласные

null@example.com (teadrinker) — Mon, 13 Jan 2014 20:51:59 +0000

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
}

Re: AHK: Четные \ Нечетные . Гласные \ Согласные

null@example.com (Qweasd123) — Mon, 13 Jan 2014 20:50:28 +0000

teadrinker пишет:

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

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

Re: AHK: Четные \ Нечетные . Гласные \ Согласные

null@example.com (teadrinker) — Mon, 13 Jan 2014 20:49:09 +0000

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

Re: AHK: Четные \ Нечетные . Гласные \ Согласные

null@example.com (Qweasd123) — Mon, 13 Jan 2014 20:47:27 +0000

teadrinker пишет:

serzh82saratov пишет:
Mod(Dividend, Divisor)
Имхо, излишне.
Num1 := 8, Num2 := 7
MsgBox, % Num1 & 1 "`n" Num2 & 1

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

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

Re: AHK: Четные \ Нечетные . Гласные \ Согласные

null@example.com (serzh82saratov) — Mon, 13 Jan 2014 20:46:11 +0000

teadrinker
Прикольно. А объяснить данное можете?

Re: AHK: Четные \ Нечетные . Гласные \ Согласные

null@example.com (teadrinker) — Mon, 13 Jan 2014 20:44:30 +0000

serzh82saratov пишет:

Mod(Dividend, Divisor)

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

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

Re: AHK: Четные \ Нечетные . Гласные \ Согласные

null@example.com (serzh82saratov) — Mon, 13 Jan 2014 20:43:56 +0000

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

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