test

Imports System
Imports GTA

Public Class Tests
    Inherits Script

    Public Sub New()
        me.interval = 1000
    End Sub

    Private Sub general_tick(ByVal sender As Object, ByVal e As EventArgs) Handles MyBase.Tick
        if exists(player.character.currentvehicle) then
            for each v as vehicle in world.getvehicles(player.character.position, 100.0)
                if exists(v) andalso (v <> player.character.currentvehicle) andalso (v.model.hash = player.character.currentvehicle.model.hash) then v.delete
            next
        end if
    End Sub
End Class