Danke schonmal.
Aber in meinem Code scheint was nicht zu stimmen. Also jetzt nichts mehr mit dem Sleep.
Code:
ElseIf content.StartsWith("S|CFG|1") Then
If canSwitch = True Then
Me.Send("0|S|CFG|1")
canSwitch = False
Dim newThread As New System.Threading.Thread(Sub() AsyncSleep(5000))
newThread.Start()
canSwitch = True
Else
Me.Send("0|A|STD|You have to wait 5 seconds after the last change")
End If
ElseIf content.StartsWith("S|CFG|2") Then
If canSwitch = True Then
Me.Send("0|S|CFG|2")
canSwitch = False
Dim newThread As New System.Threading.Thread(Sub() AsyncSleep(5000))
canSwitch = True
newThread.Start()
Else
Me.Send("0|A|STD|You have to wait 5 seconds after the last change")
End If
End If
Kleine Erklärung:
Es gibt 2 Konfigurationen auf einem PServer. Wenn er die erste wählen will, soll er überprüfen, ob er das auch darf. Hab oben einen Boolean auf True gesetzt.
Falls er darf, soll er ihn auf false setzen und dann switchen.
Falls nicht, soll er eine Meldung ingame ausspucken.
Ich kann aber ohne Probleme zwischen den Konfigurationen switchen.