[Coder] Application

**K2 WarHacker** · 01-28-2008

Hey Im WarHacker i code hacks for warrock and i would like to be Coder for [MPGH] here is my resume

Name : Bryce Kreutzer

Age : 13

Nickname : WarHacker

experiance : Cheat Engine 100% , Visual Basic 6 100% , C++ 30%

Hacks you have done in the past : PinkPanther V1 , HTG v1-v6 , Hidden - Ownage v0.1-v0.3 , Wr-source public hack

Address's you can scan :
Fog near
Fog Far
player Pointer
Trigger Bot
No Recoil
No Spread
Scope
Stamina
Boxes
Walk under water
no water
no bounds
instant respawn
vehicle gps
VGPS + Boxes
crosshairs
Super jump
NFD
weapons
swim
name esp
5 slot
no kick
anti flash
anti m14
Full Bright Red , Blue , Green
Health
Famas
speed hack
Sniper Ventage Point
Shoot Thru Walls
Walk through walls
X coorindinate
Y coorindinate
Z coorindinate

Other Comments : i hope u hire me i will not let you down.

Thanks
Warhacker~~

**Dokuda2** · 01-28-2008

well, just to inform, MPGH does more d3d hacks, Instead of Memory hacking..

But dave is the one to ask, Or arunforce D:

**cothen12** · 01-28-2008

You know 100% of vb6? Ok, answer me, i ask few questions..

What does this mean?

Code:

Declare Function MultiByteToWideChar Lib "kernel32" (ByVal CodePage As Long, ByVal dwFlags As Long, ByVal lpMultiByteStr As Long, ByVal cchMultiByte As Long, ByVal lpWideCharStr As Long, ByVal cchWideChar As Long) As Long

Declare Function WideCharToMultiByte Lib "kernel32" (ByVal CodePage As Long, ByVal dwFlags As Long, ByVal lpWideCharStr As Long, ByVal cchWideChar As Long, ByVal lpMultiByteStr As Long, ByVal cchMultiByte As Long, ByVal lpDefaultChar As Long, lpUsedDefaultChar As Long) As Long

Code:

Function UTF8decode(ByRef Text As String) As String
    Dim bytText() As Byte, bytOut() As Byte, lngOut As Long
    ' 
    bytText = StrConv(Text, vbFromUnicode)
    ' comments off ;D
    lngOut = LenB(Text) * 2
    ReDim bytOut(lngOut - 1)
    ' suoritetaan muunnos
    lngOut = MultiByteToWideChar(65001&, 0&, ByVal VarPtr(bytText(0)), Len(Text), ByVal VarPtr(bytOut(0)), lngOut)
    ' ..
    If lngOut > 0 Then
        ReDim Preserve bytOut(lngOut * 2 - 1)
        UTF8decode = bytOut
    End If
End Function

Well, and same without API's..

Code:

Private Sub Command1_Click()

Dim tiedosto As String, pituus As Long, tavut() As Byte, teksti As String
file = Environ$("userprofile") & "\desktop\test.txt"
pituus = FileLen(file)

ReDim tavut(1 To pituus)
Open file For Binary Access Read As #1
Get #1, 4, tavut: Close #1

  For i = 1 To UBound(tavut)

   Select Case Val(Format$(tavut(i)))

    Case 32 To 127

     qq = qq + Chr(Val(Format$(tavut(i))))

    'Ã¤Ã¶
    Case 132

     teksti = teksti + "Ã„"

    Case 133

     qq = qq + "Ã–"

    Case 150

     qq = qq + "Ã…"

    Case 164

     qq = q + "Ã¤"

    Case 165

     qq = teksti + "Ã¥"

    Case 182

     qq = qq + "Ã¶"

    End Select

  Next i

  MsgBox asd

End Sub

And paste here how to use OpenGL with Vb6..

And can you make vb6 hack within .dll's?

And about C++..30%?

If u know 30% of C++ i ask simple question..

how to make a XOR swap?

**Dokuda2** · 01-28-2008

You made my head hurt, im telling mommie !!!

I know shit bout coding, all i do is memory and being an arse

**tednugent** · 01-28-2008

FYI, all applications to become an MPGH coder must be submitted to Dave via private messages, and this is the wrong section anyway.

*Requesting thread to be closed.*

**NetNavi** · 01-28-2008

Originally Posted by tednugent

FYI, all applications to become an MPGH coder must be submitted to Dave via private messages, and this is the wrong section anyway.

*Requesting thread to be closed.*

Request denied

Mainly because my powahs won't work in this section

**Gourav2122** · 01-28-2008

one of the requirements is that you are actually a active member of mpgh
not some random guy who just joined today ..

**K2 WarHacker** · 01-28-2008

Lmao if u check for a member named WarHack thats me i wasnt able to make posts or active my account not sure why but thats why i made a new acc

**radnomguywfq3** · 01-28-2008

Oh, congrats cothen12, you know Visual Basic. Quit gloating about it.

Now if this guy makes it into the hacking team, and I don't. I'm going to kill a lot of children...but...I'm to busy to be in the hacking team to be honest.

**~claw~** · 01-28-2008

Originally Posted by cothen12

You know 100% of vb6? Ok, answer me, i ask few questions..

What does this mean?

Code:

Declare Function MultiByteToWideChar Lib "kernel32" (ByVal CodePage As Long, ByVal dwFlags As Long, ByVal lpMultiByteStr As Long, ByVal cchMultiByte As Long, ByVal lpWideCharStr As Long, ByVal cchWideChar As Long) As Long

Declare Function WideCharToMultiByte Lib "kernel32" (ByVal CodePage As Long, ByVal dwFlags As Long, ByVal lpWideCharStr As Long, ByVal cchWideChar As Long, ByVal lpMultiByteStr As Long, ByVal cchMultiByte As Long, ByVal lpDefaultChar As Long, lpUsedDefaultChar As Long) As Long

Code:

Function UTF8decode(ByRef Text As String) As String
    Dim bytText() As Byte, bytOut() As Byte, lngOut As Long
    ' 
    bytText = StrConv(Text, vbFromUnicode)
    ' comments off ;D
    lngOut = LenB(Text) * 2
    ReDim bytOut(lngOut - 1)
    ' suoritetaan muunnos
    lngOut = MultiByteToWideChar(65001&, 0&, ByVal VarPtr(bytText(0)), Len(Text), ByVal VarPtr(bytOut(0)), lngOut)
    ' ..
    If lngOut > 0 Then
        ReDim Preserve bytOut(lngOut * 2 - 1)
        UTF8decode = bytOut
    End If
End Function

Well, and same without API's..

Code:

Private Sub Command1_Click()

Dim tiedosto As String, pituus As Long, tavut() As Byte, teksti As String
file = Environ$("userprofile") & "\desktop\test.txt"
pituus = FileLen(file)

ReDim tavut(1 To pituus)
Open file For Binary Access Read As #1
Get #1, 4, tavut: Close #1

  For i = 1 To UBound(tavut)

   Select Case Val(Format$(tavut(i)))

    Case 32 To 127

     qq = qq + Chr(Val(Format$(tavut(i))))

    'Ã¤Ã¶
    Case 132

     teksti = teksti + "Ã„"

    Case 133

     qq = qq + "Ã–"

    Case 150

     qq = qq + "Ã…"

    Case 164

     qq = q + "Ã¤"

    Case 165

     qq = teksti + "Ã¥"

    Case 182

     qq = qq + "Ã¶"

    End Select

  Next i

  MsgBox asd

End Sub

And paste here how to use OpenGL with Vb6..

And can you make vb6 hack within .dll's?

And about C++..30%?

If u know 30% of C++ i ask simple question..

how to make a XOR swap?

you sure you dint copy that off a website?