1 Тема от kdn14062000

  • kdn14062000
  • Участник
  • Неактивен

Тема: AHK: Счетчик выпадения чисел для казино

Нужен счетчик выпадения чисел ,я примерно понимаю как это сделать но не совсем.Как я понял ,нужно задать в моем случае 9 переменных и через if прогонять каждое число ,и прибавлять по 1 к нужным переменным .
Число мы вводим в сроку Gyi edit.
А вот как связать кнопку и поле Edit и И всю остальную логику - запутался .
Это Gui

; Generated by AutoGUI 2.5.9
#SingleInstance Force
#NoEnv
SetWorkingDir %A_ScriptDir%
SetBatchLines -1

Gui Add, Text, x20 y17 w54 h23 +0x200, Красный
Gui Add, Text, x89 y18 w54 h23 +0x200, 1
Gui Add, Text, x21 y51 w54 h23 +0x200, Черный
Gui Add, Text, x91 y52 w54 h23 +0x200, 2
Gui Add, Text, x21 y85 w54 h23 +0x200, Четный
Gui Add, Text, x91 y86 w54 h23 +0x200, 3
Gui Add, Text, x21 y120 w54 h23 +0x200, Не четный
Gui Add, Text, x91 y119 w54 h23 +0x200, 4
Gui Add, Text, x20 y152 w54 h23 +0x200, 1-18
Gui Add, Text, x92 y152 w54 h23 +0x200, 5
Gui Add, Text, x21 y187 w54 h23 +0x200, 19-36
Gui Add, Text, x92 y186 w54 h23 +0x200, 6
Gui Add, Text, x21 y221 w54 h23 +0x200, 12
Gui Add, Text, x21 y255 w54 h23 +0x200, 24
Gui Add, Text, x19 y288 w54 h23 +0x200, 36
Gui Add, Text, x94 y221 w54 h23 +0x200, 7
Gui Add, Text, x92 y256 w54 h23 +0x200, 8
Gui Add, Text, x93 y291 w54 h23 +0x200, 9
Gui Add, Edit, x266 y25 w120 h21
Gui Add, Button, x402 y24 w91 h27, &OK

Gui Show, w620 h420, Window
Return

GuiEscape:
GuiClose:
    ExitApp

2 Ответ от qqlexa

  • qqlexa
  • Участник
  • Неактивен

Re: AHK: Счетчик выпадения чисел для казино

Расскажите какие комбинации возможны, только тогда можно будет комбинировать (лучшее решение), а не нажимать на каждое поле отдельно (плохое решение).
Если числа могут быть 1-36, тогда почему отдельно считаете 12, 24, 36?
Красных цветов 36, так же и Черных?
Зелёного цвета, и номера 0 нет?
Парность проверяете по номеру: получаете остачу от номера (number % 2). Если нет остачи (0) - парное; если есть остача (1) - непарное.

https://github.com/qqlexa

3 Ответ от kdn14062000

  • kdn14062000
  • Участник
  • Неактивен

Re: AHK: Счетчик выпадения чисел для казино

12,24,36 - это 1 до 12 ,от 13 до 24,25-36
Комбинации как в обычном казино .
Красных если я не ошибаюсь 18 ,черных 18 , и два 0

4 Ответ от kdn14062000 (изменено: kdn14062000, 2020-10-29 01:32:08)

  • kdn14062000
  • Участник
  • Неактивен

Re: AHK: Счетчик выпадения чисел для казино

qqlexa
Интерфейс примерно такой ,мб больше вариантов
12345678- это количество выпавших раз

Post's attachments

Screenshot_1.png 8.47 kb, file has never been downloaded. 

You don't have the permssions to download the attachments of this post.

5 Ответ от serzh82saratov (изменено: serzh82saratov, 2020-10-29 15:03:56)

  • serzh82saratov
  • Разработчик
  • Неактивен

Re: AHK: Счетчик выпадения чисел для казино


Blacks = 2,4,6,8,10,11,13,15,17,20,22,24,26,28,29,31,33,35

Gui Add, Text, x20 y17 w54 h23 +0x200, Красный
Gui Add, Text, x89 y18 w54 h23 +0x200 vRed, 0
Gui Add, Text, x21 y51 w54 h23 +0x200, Черный
Gui Add, Text, x91 y52 w54 h23 +0x200 vBlack, 0
Gui Add, Text, x21 y85 w54 h23 +0x200, Четный
Gui Add, Text, x91 y86 w54 h23 +0x200 vEven, 0
Gui Add, Text, x21 y120 w54 h23 +0x200, Не четный
Gui Add, Text, x91 y119 w54 h23 +0x200 vNotEven, 0
Gui Add, Text, x20 y152 w54 h23 +0x200, 1-18
Gui Add, Text, x92 y152 w54 h23 +0x200 vOnePart, 0
Gui Add, Text, x21 y187 w54 h23 +0x200, 19-36
Gui Add, Text, x92 y186 w54 h23 +0x200 vTwoPart, 0
Gui Add, Text, x21 y221 w54 h23 +0x200, 12
Gui Add, Text, x21 y255 w54 h23 +0x200, 24
Gui Add, Text, x19 y288 w54 h23 +0x200, 36
Gui Add, Text, x94 y221 w54 h23 +0x200 vPart1, 0
Gui Add, Text, x92 y256 w54 h23 +0x200 vPart2, 0
Gui Add, Text, x93 y291 w54 h23 +0x200 vPart3, 0
Gui Add, Edit, x266 y25 w120 h21 Number vNumber
Gui Add, Button, x402 y24 w91 h27 gCalc, &OK

Gui Show, w620 h420, Window  
Return

Calc:
	GuiControlGet, Number 
	If (!Number || Number + 0 = "" || Number < 1 || Number > 36)
		Return
	InStr("," Blacks ",", "," Number ",") ? Add("Black") : Add("Red")
	Mod(Number, 2) ? Add("NotEven") : Add("Even")
	Number <= 18 ? Add("OnePart") : Add("TwoPart")
	Number <= 12 ? Add("Part1") : Number <= 24 ? Add("Part2") : Add("Part3")
	Return
	
Add(Name) {
	GuiControlGet, v, , %Name% 
	GuiControl, , %Name%, % ++v
}
По вопросам возмездной помощи пишите на E-Mail: serzh82saratov@mail.ru Telegram: https://t.me/sergiol982
Win10x64 AhkSpy, Hotkey, ClockGui

6 Ответ от kdn14062000

  • kdn14062000
  • Участник
  • Неактивен

Re: AHK: Счетчик выпадения чисел для казино

serzh82saratov
Спасибо)

7 Ответ от kdn14062000

  • kdn14062000
  • Участник
  • Неактивен

Re: AHK: Счетчик выпадения чисел для казино

serzh82saratov
А есть еще вариант добавить ряды типо
1 4 7 10 13 16 19 22 25 28 31 34
2 5 8 11 14 17 20 23 26 29 32 35
3 6 9 12 15 18 21 24 27 30 33 36
?

8 Ответ от ypppu

  • ypppu
  • Разработчик
  • Неактивен

Re: AHK: Счетчик выпадения чисел для казино

kdn14062000, слова должны разделаться пробелами, не лепите их в одну кучу. Предложения должны начинаться с заглавной буквы и заканчиваться знаками препинания. Ссылки следует оформить тегом "URL". Код должен быть оформлен тегом "code".

http://forum.script-coding.com/viewtopi … 08#p142808
http://forum.script-coding.com/viewtopi … 16#p142816
http://forum.script-coding.com/viewtopi … 20#p142820
http://forum.script-coding.com/viewtopi … 29#p142829
http://forum.script-coding.com/viewtopi … 32#p142832
http://forum.script-coding.com/viewtopi … 60#p142960
http://forum.script-coding.com/viewtopi … 62#p142962
http://forum.script-coding.com/viewtopi … 85#p142985
http://forum.script-coding.com/viewtopi … 17#p142717
http://forum.script-coding.com/viewtopi … 19#p142719
http://forum.script-coding.com/viewtopi … 23#p142723
http://forum.script-coding.com/viewtopi … 27#p142727
http://forum.script-coding.com/viewtopi … 31#p142731
http://forum.script-coding.com/viewtopi … 84#p142784
http://forum.script-coding.com/viewtopi … 86#p142786
http://forum.script-coding.com/viewtopi … 94#p142794
http://forum.script-coding.com/viewtopi … 00#p142800
http://forum.script-coding.com/viewtopi … 01#p142801
http://forum.script-coding.com/viewtopi … 03#p142803

Исправьте!

Правила  Поиск  Русский язык  Слова-паразиты
AHK: [ENG] [RUS]