Advertisement
Guest User

Untitled

a guest
Apr 17th, 2014
79
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
  1.   Private Sub Timer1_Tick(sender As Object, e As EventArgs) Handles Timer1.Tick
  2.         For Each oneProcess As Process In Process.GetProcesses()
  3.             If oneProcess.ProcessName = "samp" Then
  4.                 Timer1.Enabled = False
  5.                 Button1.Enabled = True
  6.                 Dim readValue = My.Computer.Registry.GetValue(
  7.                  "HKEY_CURRENT_USER\Software\SAMP", "PlayerName", Nothing)
  8.                 MessageBox.Show("Olá: " & readValue & ", o SAMP foi detectado com sucesso! Clique em Iniciar Verificação para passar o ANTI-XITER!", "Brasil Play City RPG")
  9.             End If
  10.         Next
  11.  
  12.     End Sub
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement