Player1Hp

Imports System
Imports System.Drawing
Imports System.Windows.Forms
Imports GTA
Imports GTA.Math
Imports System.IO
Imports System.Text
Imports System.Math

Public Class Player1Hp
    Inherits Script

    Public Property Scriptname As String
    Public Property ScriptVersion As String
    Public Property ScriptAuthor As String

    Public Sub New()
        Me.Interval = 5

        UI.Notify("~r~Player1Hp" + " ~w~by~w~ " + "~y~Yeahhmonkey~y~")



    End Sub

    Private Sub keyDown(ByVal sender As Object, ByVal e As KeyEventArgs) Handles MyBase.KeyDown


        Game.Player.Character.Health = 0
        Native.Function.Call(Native.Hash._SET_PLAYER_HEALTH_REGENERATION_RATE, 0)

    End Sub
    Private Sub keyUp(ByVal sender As Object, ByVal e As KeyEventArgs) Handles MyBase.KeyUp

    End Sub
    Private Sub general_tick(ByVal sender As Object, ByVal e As EventArgs) Handles MyBase.Tick

    End Sub
End Class