Combat Arms Tool

Hello,
Here is a ca tool i made in vb
it isnt that big but i hope its a bit usefull

Screen:

CA Tools.rarattachment deleted · 37 downloads before removal

Need another scan from VirScan.org and you're done. And most of it is leeched. At least improve it if you're gonna leech.

Originally Posted by Samueldo

Need another scan from VirScan.org and you're done. And most of it is leeched. At least improve it if you're gonna leech.

Exactly what he said. You need 1 from VirScan.

you only need to scan the .rar file you have attached.. scanning the .exe isn't necessary.

VirSCAN.org - Free Multi-Engine Online Virus Scanner v1.02, Supports 37 AntiVirus Engines!

if you'd upload your .rar file to that site and post us the link of the results we would be able to test and approve this file

ITs all leeched stuff from the VB section
You didnt even add anything to it

:\

Wont approve adversing there

Originally Posted by Almog

Wont approve adversing there

there is no advertising u noob.
Pixiecoding is MPGH's VB Help Website.

>.<

Sorry guys for leeching the codes but im not good enough to code it by myself
btw i just uploaded another virusscan

Originally Posted by jetse123

Sorry guys for leeching the codes but im not good enough to code it by myself
btw i just uploaded another virusscan

Then at least figure out how to edit it and improve it or it's no good. Even without coding experience it's easy (as shown by me in the cleaner injector etc on my tool)

Well you have to keep practising it's not the hardest programming language to learn .. I thought it was easier then HTML which is easy as.

i can code for this program but:
For me its hard to make a code from nothing
and i know how to edit but the tutorial (gui's?) are mostly nice XD
But i will think about it to change it
BTw got tutorial for Crosshair?
i found one than i got a DOT
but i whant an kinda +
Please help :P
This is code i use:

Code:

        Dim MiddleX As Integer = (Me.Width / 2) - 4
        Dim MiddleY As Integer = (Me.Height / 2) - 4
        Dim TheKillDot As Graphics = Me.CreateGraphics
        Dim MyPen As Pen = New Pen(Color.Red)
        Dim MyBrush As SolidBrush = New SolidBrush(Color.Red)
        TheKillDot.SmoothingMode = SmoothingMode.HighQuality
        If Activated = True Then
            TheKillDot.FillEllipse(MyBrush, MiddleX, MiddleY, 8, 8)
        ElseIf Activated = False Then
            Me.Refresh()
        End If

thanks for fixing your post and sorry it took so long for approval but here it is.

/approved

Im sorry for double post but does anyone know how to make a CROSSHAIR?
i now use: (a dot)

Code:

        Dim MiddleX As Integer = (Me.Width / 2) - 4
        Dim MiddleY As Integer = (Me.Height / 2) - 4
        Dim TheKillDot As Graphics = Me.CreateGraphics
        Dim MyPen As Pen = New Pen(Color.Red)
        Dim MyBrush As SolidBrush = New SolidBrush(Color.Red)
        TheKillDot.SmoothingMode = SmoothingMode.HighQuality
        If Activated = True Then
            TheKillDot.FillEllipse(MyBrush, MiddleX, MiddleY, 8, 8)
        ElseIf Activated = False Then
            Me.Refresh()
        End If

Originally Posted by jetse123

Im sorry for double post but does anyone know how to make a CROSSHAIR?
i now use: (a dot)

Code:

        Dim MiddleX As Integer = (Me.Width / 2) - 4
        Dim MiddleY As Integer = (Me.Height / 2) - 4
        Dim TheKillDot As Graphics = Me.CreateGraphics
        Dim MyPen As Pen = New Pen(Color.Red)
        Dim MyBrush As SolidBrush = New SolidBrush(Color.Red)
        TheKillDot.SmoothingMode = SmoothingMode.HighQuality
        If Activated = True Then
            TheKillDot.FillEllipse(MyBrush, MiddleX, MiddleY, 8, 8)
        ElseIf Activated = False Then
            Me.Refresh()
        End If

THat wont go over CA.
You cant make a crosshair in VB without d3d hooking it into the game >.<

Thats C++ shit

Combat Arms Tool

Post a Reply

Similar Threads

Tags for this Thread