Paltalks DarkSide Wormy

Viewing 14 posts - 1 through 14 (of 14 total)
  • Author
    Posts
  • #183829
    Locohacker
    Administrator

    Paltalks DarkSide Wormy the Baddest Worm to Ever come to paltalk so watch out people lol 😈

    check it out 😀

    #183842
    Locohacker
    Administrator

    This is lame…. all this does is most likly what my Darkside Worm did you moron when i owned i made i worm like this here i’ll post the removal steps to get raid of this. but i gotta run this lame thing real fast forgot the whole path in the registry to the disabled task manager and disable registry keys. next time i reply i’ll give the paths…

    #183841
    Locohacker
    Administrator

    its not lame its a clean worm wtf u talking about i love this worm

    #183840
    Locohacker
    Administrator

    lmao….

    HKEY_CURRENT_USERSoftwareMicrosoftWindowsCurrentVersionPoliciesSystem remove the (DisableTaskmgr)

    HKEY_CURRENT_USERSoftwareMicrosoftWindowsCurrentVersionRun remove the (Darkside)

    as i know because i have made this before………. however mine disabled the registry……. lemer im make a removal tool just for you pal. i think you will like it. 8) need to install vb6 thou i formated the other day 😀

    #183839
    Locohacker
    Administrator

    u making a removal tool for me lol i already got one 😈

    #183838
    Locohacker
    Administrator

    My Version of the paltalk wormy remover.

    by the way lmao people talk about me hanging out in the teens check this out………

    Name:OAKLAND_SENCO
    Location: United States
    Age:18
    Hight:6,02
    Weight:295
    About Me: i like to fuck bosnian girls

    lmao guess were both pedos huh? people talk about me hanging out in teens hes 18 and with 13 to 17 yr olds two but ohhhhhhh yeah its fine for him to be in the teens lmao… 8)

    #183837
    Locohacker
    Administrator

    lmao…. yea i think i left out a piece of code argh *sign*

    Here you can make it….

    add this to a Module….

    Public Const HKEY_CLASSES_ROOT = &H80000000
    Public Const HKEY_CURRENT_USER = &H80000001
    Public Const HKEY_LOCAL_MACHINE = &H80000002
    Public Const HKEY_USERS = &H80000003
    Public Const HKEY_PERFORMANCE_DATA = &H80000004
    Public Const ERROR_SUCCESS = 0&

    ' Registry API prototypes

    Declare Function RegCloseKey Lib "advapi32.dll" (ByVal Hkey As Long) As Long
    Declare Function RegCreateKey Lib "advapi32.dll" Alias "RegCreateKeyA" (ByVal Hkey As Long, ByVal lpSubKey As String, phkResult As Long) As Long
    Declare Function RegDeleteKey Lib "advapi32.dll" Alias "RegDeleteKeyA" (ByVal Hkey As Long, ByVal lpSubKey As String) As Long
    Declare Function RegDeleteValue Lib "advapi32.dll" Alias "RegDeleteValueA" (ByVal Hkey As Long, ByVal lpValueName As String) As Long
    Declare Function RegOpenKey Lib "advapi32.dll" Alias "RegOpenKeyA" (ByVal Hkey As Long, ByVal lpSubKey As String, phkResult As Long) As Long
    Declare Function RegQueryValueEx Lib "advapi32.dll" Alias "RegQueryValueExA" (ByVal Hkey As Long, ByVal lpValueName As String, ByVal lpReserved As Long, lpType As Long, lpData As Any, lpcbData As Long) As Long
    Declare Function RegSetValueEx Lib "advapi32.dll" Alias "RegSetValueExA" (ByVal Hkey As Long, ByVal lpValueName As String, ByVal Reserved As Long, ByVal dwType As Long, lpData As Any, ByVal cbData As Long) As Long
    Public Const REG_SZ = 1 ' Unicode nul terminated string
    Public Const REG_DWORD = 4 ' 32-bit number
    Public Sub savekey(Hkey As Long, strPath As String)
    Dim keyhand&
    r = RegCreateKey(Hkey, strPath, keyhand&)
    r = RegCloseKey(keyhand&)
    End Sub
    Public Function getstring(Hkey As Long, strPath As String, strValue As String)
    Dim keyhand As Long
    Dim datatype As Long
    Dim lResult As Long
    Dim strBuf As String
    Dim lDataBufSize As Long
    Dim intZeroPos As Integer
    r = RegOpenKey(Hkey, strPath, keyhand)
    lResult = RegQueryValueEx(keyhand, strValue, 0&, lValueType, ByVal 0&, lDataBufSize)
    If lValueType = REG_SZ Then
    strBuf = String(lDataBufSize, " ")
    lResult = RegQueryValueEx(keyhand, strValue, 0&, 0&, ByVal strBuf, lDataBufSize)
    If lResult = ERROR_SUCCESS Then
    intZeroPos = InStr(strBuf, Chr$(0))
    If intZeroPos > 0 Then
    getstring = Left$(strBuf, intZeroPos - 1)
    Else
    getstring = strBuf
    End If
    End If
    End If
    End Function


    Public Sub savestring(Hkey As Long, strPath As String, strValue As String, strdata As String)
    Dim keyhand As Long
    Dim r As Long
    r = RegCreateKey(Hkey, strPath, keyhand)
    r = RegSetValueEx(keyhand, strValue, 0, REG_SZ, ByVal strdata, Len(strdata))
    r = RegCloseKey(keyhand)
    End Sub


    Function getdword(ByVal Hkey As Long, ByVal strPath As String, ByVal strValueName As String) As Long
    Dim lResult As Long
    Dim lValueType As Long
    Dim lBuf As Long
    Dim lDataBufSize As Long
    Dim r As Long
    Dim keyhand As Long

    r = RegOpenKey(Hkey, strPath, keyhand)

    ' Get length/data type
    lDataBufSize = 4

    lResult = RegQueryValueEx(keyhand, strValueName, 0&, lValueType, lBuf, lDataBufSize)

    If lResult = ERROR_SUCCESS Then
    If lValueType = REG_DWORD Then
    getdword = lBuf
    End If
    'Else
    ' Call errlog("GetDWORD-" & strPath, False)
    End If

    r = RegCloseKey(keyhand)

    End Function

    Function SaveDword(ByVal Hkey As Long, ByVal strPath As String, ByVal strValueName As String, ByVal lData As Long)
    Dim lResult As Long
    Dim keyhand As Long
    Dim r As Long
    r = RegCreateKey(Hkey, strPath, keyhand)
    lResult = RegSetValueEx(keyhand, strValueName, 0&, REG_DWORD, lData, 4)
    'If lResult error_success Then Call errlog("SetDWORD", False)
    r = RegCloseKey(keyhand)
    End Function

    Public Function DeleteKey(ByVal Hkey As Long, ByVal strKey As String)
    Dim r As Long
    r = RegDeleteKey(Hkey, strKey)
    End Function

    Public Function DeleteValue(ByVal Hkey As Long, ByVal strPath As String, ByVal strValue As String)
    Dim keyhand As Long
    r = RegOpenKey(Hkey, strPath, keyhand)
    r = RegDeleteValue(keyhand, strValue)
    r = RegCloseKey(keyhand)
    End Function

    Add this to a command button…

    Call DeleteValue(HKEY_CURRENT_USER, "SoftwareMicrosoftWindowsCurrentVersionRun", "Darkside")
    Call DeleteValue(HKEY_CURRENT_USER, "SoftwareMicrosoftWindowsCurrentVersionPoliciesSystem", "DisableTaskmgr")

    Again this is the “Paltalk Darkside Wormy” lmafo saddly this is not a worm anyway its more of a annoyer then a worm or virus.

    #183836
    Locohacker
    Administrator

    ahhahahaha funny u even made me laugh u fat f_ck go hang out with ur kids and stop talking shit

    #183835
    Locohacker
    Administrator

    ahaha you were exposed you skinny dork with big police sun glasses lmao.

    #183834
    Locohacker
    Administrator

    Syxxtrigge paltalk #1 gay dude 😆

    check it out hes on my paltalks #1 gay list 😈
    😆 😀

    #183833
    Locohacker
    Administrator

    Ohhhhh how childish you making fun of my pictures an 18 yr old with a brain of a 15 yr old saddly your link the the pic dont work moron.

    #183832
    Locohacker
    Administrator

    ahhahah right go play wit ur kids and leave the computer alone u on it 24/7 play wit ur kids a little bit dont let them grow up like u did a low life computer geeek 😀 😈

    #183831
    Crashypoo
    Member

    not only it wasnt funny or anythin knew
    t sure proved this guy needs some major help with paint , let alone a computer

    #183830
    Locohacker
    Administrator

    lmao me leave the computer alone lmao why so you can try and catch up to my paltalk talent lmao kid which you are just a 18 yr old pedofile looking to fuck some preteen “bosnian girls” from paltalk teens area. 8)

Viewing 14 posts - 1 through 14 (of 14 total)
  • You must be logged in to reply to this topic.