Cool[Coder] Application

Posts 1–13 of 13 · Page 1 of 1
[Coder] Application
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~~
well, just to inform, MPGH does more d3d hacks, Instead of Memory hacking..

But dave is the one to ask, Or arunforce D:
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 made my head hurt, im telling mommie !!!


I know shit bout coding, all i do is memory and being an arse
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.*
Quote Originally Posted by tednugent View Post
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
one of the requirements is that you are actually a active member of mpgh
not some random guy who just joined today ..
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
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.
Quote Originally Posted by cothen12 View Post
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?
Quote Originally Posted by Hispiforce View Post
request phail
Request approved

Thread fails
Everyone quiet now.
Posts 1–13 of 13 · Page 1 of 1
This thread is closed for replies.

Similar Threads

Tags for this Thread

None

Talk with us