У меня появилась такая проблема . Я делаю программу для игры и мне нужно отправлять туда по 2 пакета . С помощью функции while я сделал 1 пакет.
Но если я пишу еще 1 пакет через while
то перестают работать оба . А по отдельности работают на ура в чем проблема?
Код:
While 1
While $buying = 1
sendPacket (GUICTrlRead($Input2),(GUICTrlRead($Input5)) , $choosed_char)
Sleep(GUICTrlRead($Input1))
Wend
WEnd
Func start()
$buying = 1
GUICtrlSetData ($Button2,'Стоп')
GUICtrlSetOnEvent($Button2, "Stop")
Sleep(GUICTrlRead($Input1))
EndFunc
Func stop()
GUICtrlSetData ($Button2,'Старт 1 пакета')
GUICtrlSetOnEvent($Button2, "Start")
$buying = 0
endfunc
Но если я пишу еще 1 пакет через while
Код:
While 2
While $buying1 = 1
sendPacket (GUICTrlRead($Input4),(GUICTrlRead($Input3)) , $choosed_char)
Sleep(GUICTrlRead($Input1))
Wend
WEnd
Func start1()
$buying1 = 1
GUICtrlSetData ($Button6,'Стоп')
GUICtrlSetOnEvent($Button6, "Stop")
Sleep(GUICTrlRead($Input1))
EndFunc
Func stop1()
GUICtrlSetData ($Button6,'Старт 2 пакета')
GUICtrlSetOnEvent($Button6, "Start")
$buying1 = 0
endfunc
то перестают работать оба . А по отдельности работают на ура в чем проблема?