Автор Тема: Проверка счастливый IP адрес  (Прочитано 1896 раз)

0 Пользователей и 1 Гость просматривают эту тему.

Оффлайн alex33 [?]

  • AutoIt Гуру
  • *****
  • Сообщений: 1372
  • Репутация: 171
  • Пол: Мужской
    • alekssamos ВКонтакте
    • Награды
  • Версия AutoIt: 3.3.12.0
Проверка счастливый IP адрес
« Создано: Сентябрь 10, 2016, 14:43:29 »
AutoIt: 3.3.12.0
Версия: 1.0

Категория: Вспомогательные функции, Строки, Данные, Интернет, Математика, Приколы, Сеть, Разное

Описание: Возможно это уже было, не знаю. Просто от того, что меня здесь давно уже не было я решил от нечего делать зайти и написать такую функцию.
Сегодня я зашёл на сайт 2ip.ru и увидел, что мой IP сейчас счастливый, вот мне и пришла такая идея, чтобы сделать такую функцию...
Счастливый IP
Судя по всему, сегодня ваш день!!! Поздравляем!!!
Почему, спросите вы? Да потому что сегодня вы вышли в интернет со счастливым IP.
Все очень просто, сумма цифр, составляющих первую часть вашего IP адреса равна сумме цифр составляющих вторую часть вашего IP адреса. Это случается достаточно редко, но как видите, все таки случается. И как раз сегодня это случилось с вами! Наверное, как раз сегодня у вас счастливый день, поэтому дерзайте. Играйте в спортлото и казино, спорьте на большие деньги или выскажите наконец шефу все, что вы о нем думаете. Ведь сегодня ваш день и есть шанс, что все это закончится в вашу пользу :)

Код/Пример:
(нажмите для показа/скрытия)

Файл: UDF_function_IPIsHappy_v1.0.au3

Снимок:
нет

История версий:
(нажмите для показа/скрытия)

Источник: autoit-script.ru
Автор(ы): Alex33
« Последнее редактирование: Сентябрь 10, 2016, 14:53:45 от alex33 »

Русское сообщество AutoIt

Проверка счастливый IP адрес
« Отправлен: Сентябрь 10, 2016, 14:43:29 »

Оффлайн firex [?]

  • AutoIt Гуру
  • *****
  • Сообщений: 940
  • Репутация: 202
  • Пол: Мужской
    • Награды
  • Версия AutoIt: 3.3.x.x
Re: Проверка счастливый IP адрес
« Ответ #1, Отправлен: Сентябрь 10, 2016, 18:46:46 »
alex33
Многовато у вас лишних вызовов.

Минималистичный вариант:
Код: AutoIt [Выделить]
Func _IPIsHappy($s)
    Local $o, $v
    For $d In StringSplit($s, '', 2)
        If $d == '.' Then $o += 1
        $v += $d * (($o > 1) ? -1 : 1)
    Next
    Return $v == 0
EndFunc


С проверкой входного IP увеличится на 1 строку.

Оффлайн alex33 [?]

  • AutoIt Гуру
  • *****
  • Сообщений: 1372

  • Автор темы
  • Репутация: 171
  • Пол: Мужской
    • alekssamos ВКонтакте
    • Награды
  • Версия AutoIt: 3.3.12.0
Re: Проверка счастливый IP адрес
« Ответ #2, Отправлен: Сентябрь 10, 2016, 19:09:03 »
alex33
Многовато у вас лишних вызовов.

Минималистичный вариант:
Зато у Вас с циклом, у меня без цикла :)

Русское сообщество AutoIt

Re: Проверка счастливый IP адрес
« Ответ #2 Отправлен: Сентябрь 10, 2016, 19:09:03 »

 

Похожие темы

  Тема / Автор Ответов Последний ответ
3 Ответов
5173 Просмотров
Последний ответ Июль 04, 2011, 12:23:00
от madmasles
5 Ответов
2829 Просмотров
Последний ответ Сентябрь 28, 2013, 21:48:01
от nowost
4 Ответов
2590 Просмотров
Последний ответ Октябрь 26, 2013, 21:41:03
от SHoCK13666
2 Ответов
1327 Просмотров
Последний ответ Ноябрь 27, 2013, 15:55:04
от GUIMish
10 Ответов
4061 Просмотров
Последний ответ Декабрь 25, 2013, 23:38:57
от Yashied
6 Ответов
2287 Просмотров
Последний ответ Февраль 21, 2014, 17:50:36
от Dimmak
5 Ответов
2232 Просмотров
Последний ответ Июль 18, 2014, 21:08:35
от madmasles
5 Ответов
3141 Просмотров
Последний ответ Июль 20, 2015, 07:12:01
от pvnn
6 Ответов
3282 Просмотров
Последний ответ Апрель 20, 2016, 07:44:07
от Garrett
5 Ответов
1539 Просмотров
Последний ответ Июнь 09, 2016, 07:41:19
от Sαuron