No
Client~SideCrie um CheckBox no frmMirage de name attC e Caption Atacar!.
Crie um Timer, de Name qualquer, e mantenha o Interval dele como desejar. Será a frequência de um ataque por quantos milesegundos marcar. Aqui no meu eu deixei em 2000, ele atacará uma vez a cada 2000 milesegundos (2 segundos). Pode mudar à sua escolha... Dê duplo clique nele e adicione:
- Código:
-
If attC.Value = 1 Then
ControlDown = True
End If
Vá até o modGameLogic e procure por:
- Código:
-
If KeyCode = vbKeyControl Then
ControlDown = True
End If
Mude Para:
- Código:
-
If KeyCode = vbKeyControl Or frmMirage.attC.Value = 1 Then
ControlDown = True
End If
Procure por:
- Código:
-
If GetAsyncKeyState(VK_CONTROL) >= 0 And ControlDown = True Then ControlDown = False
Mude Para:
- Código:
-
If GetAsyncKeyState(VK_CONTROL) >= 0 And ControlDown = True And frmMirage.attC.Value = 0 Then ControlDown = False
Procure Por:
- Código:
-
Else
ControlDown = False
End If
Mude Para:
- Código:
-
ElseIf frmMirage.attC.Value = 0 Then
ControlDown = False
End If
Procure por:
- Código:
-
If KeyCode = vbKeyControl Then ControlDown = False
Mude Para:
- Código:
-
If KeyCode = vbKeyControl And frmMirage.attC.Value = 0 Then ControlDown = False
Agora e so vc compilar e ser feliz !!! ^^
Obs.: Caso queiram manter restrição por Access, PK ou Level, basta utilizarem o seguinte esquema:
- Código:
-
If GetPlayerAccess(MyIndex) = 0 Or GetPlayerPK(MyIndex) <> 0 Or GetPlayerLevel(MyIndex) > 20 Then
MsgBox "Você não pode usar esta função!"
attC.Value = 0
Exit Sub
End If
Mude o valor do Acces para o permitido/não-permitido, do PK e do Level também. Use dos operadores >, = e <, podendo combiná-los. Se quiser que qualquer access/PK/Level possa utilizar mude para "< 0".
Crédito: Drumond por fazer o tutorial
Crédito: Thalesbliss por postar.