تشفيرة تشفيرة قوية للعمالقة بتاريخ اليوم 31-8 // Try To Catch Me V.3

[mohamed gouch]

ماشاء الله فاتتني هذه التشفيرة لم أكن حاضر للأسف نشتاق الى هذه التشفيرات لكن قليل ما توضع مشاركة في المنتدى خاصة بالتشفيرة
لأن أغلبية المشاركات عبارة عن عينة أو روابط لكن نكتفي بتجارب الاخوة لأنني لدي وهمي لكن غير مثبت عليه الانتيفروس سيتطلب مني
وقت كثير لتحديثه نظرا لسرعة الانترنت

 

[MagicianMiDo32]

[hide]

[/hide]

مخدش بالي أن أسم المشوع هيظهر ف الـTextbox

 

[black007]

لا علييك اخى الغالى على

الموضوع فعلا فى بعض الاوقات يحتاج الى تركيز وقوه ملاحظه وانتبها

لكن عندما تتعود سجد سرعان انه تم الفك سريعا

وتذكر كلامى لك جيدا

بصراحة التشفيرة مختلفة لكنها بنفس الطريق وهو التشفير بخوارزميات والتلاعب بالسورس
على العموم انت رائع جدا
بالبداية ابتعدت عن الدامب لان كل تركيزي هو فك التشفيرة
شكرا للاخ ميدو هو من ارشدني من دوختي هههه
حاليا اجرب افك ZNIpbcPEPST+zpOXkDHbTA==
لكنها لحد الان لم تضبط معي
​

هذه هى اخى

وكما قال لك اخى عمرو فقط ببعض التتبع ستفهم الفكره

لكن ساقولها مره اخرى

هناك تلاعب بشكل زكى جدا فى البورت والهوست فى التفسيم

لن اقول اى شى

وساترككم تحاولون

بالتوفيق للفك

 

[White Man]

[hide]
مشاهدة المرفق 96559

[/hide]

مخدش بالي أن أسم المشوع هيظهر ف الـTextbox

ههههههههه ،، في حتة غلط

 

[black007]

ماشاء الله فاتتني هذه التشفيرة لم أكن حاضر للأسف نشتاق الى هذه التشفيرات لكن قليل ما توضع مشاركة في المنتدى خاصة بالتشفيرة
لأن أغلبية المشاركات عبارة عن عينة أو روابط لكن نكتفي بتجارب الاخوة لأنني لدي وهمي لكن غير مثبت عليه الانتيفروس سيتطلب مني
وقت كثير لتحديثه نظرا لسرعة الانترنت

مبروك الاشراف اخى محمد

سبب قله التشفيرات لان كل منى او عمرو له مشاغله الخاصه

فنعتزر عن عدم وجودها بكثره

وان شاء الله معوضه فى المختبر

 

[MagicianMiDo32]

ههههههههه ،، في حتة غلط

أزاي
واكل حتة ولا كله على بعضه غلط

 

[black007]

[hide]
مشاهدة المرفق 96559

[/hide]

مخدش بالي أن أسم المشوع هيظهر ف الـTextbox

حلو بس وقعت فى الفخ

اقرا الاستدعئات مره اخرى جيدا ميدو

فقد وصلت

ميه ميه يابرنس اصلى

 

[White Man]

أزاي
واكل حتة ولا كله على بعضه غلط

حتتين غلط

 

[MagicianMiDo32]

[hide]
Public Shared Function smethod_0(ByVal input As String, ByVal pass As String) As String
Dim str2 As String
Dim provider2 As New TripleDESCryptoServiceProvider
Dim provider As New MD5CryptoServiceProvider
Try
Dim destinationArray As Byte() = New Byte(&H18 - 1) {}
Dim sourceArray As Byte() = provider.ComputeHash(Encoding.ASCII.GetBytes(pass))
Array.Copy(sourceArray, 0, destinationArray, 0, &H10)
Array.Copy(sourceArray, 0, destinationArray, 15, 8)
provider2.Key = destinationArray
provider2.Mode = CipherMode.ECB
Dim transform As ICryptoTransform = provider2.CreateDecryptor
Dim inputBuffer As Byte() = Convert.FromBase64String(input)
str2 = Encoding.ASCII.GetString(transform.TransformFinalBlock(inputBuffer, 0, inputBuffer.Length))
Catch exception1 As Exception
ProjectData.SetProjectError(exception1)
ProjectData.ClearProjectError
End Try
Return str2
End Function


[/hide]​

 

[MagicianMiDo32]

حتتين غلط

طايرين يعني

 

[black007]

حتتين غلط

اسهله ولا اسكت ياعمرو

 

[prooonet]

لو أردت إعادة التجربة فلا مانع​

ولكن عند فتح الشات سيُظهر لك تنبيه ​

مايحتاج انه مصدق بس كنت امزح لكن سؤال اخير
هل يوجد تنبيه لسلوكيات الاخرى غير شاشة الشات

 

[mohamed gouch]

مبروك الاشراف اخى محمد

سبب قله التشفيرات لان كل منى او عمرو له مشاغله الخاصه

فنعتزر عن عدم وجودها بكثره

وان شاء الله معوضه فى المختبر

ربنا يبارك فيك أخي مصطفى بالتوفيق لكما

 

[xpiraqi]

serveftp
هذا ما ظهر لي ؟؟؟​

 

[black007]

serveftp
هذا ما ظهر لي ؟؟؟​

اكمل فانت فى الطريق الصحيح

 

[black007]

لا تعليق

دى الى اسمها قمه فى الرخامه

https://www.virustotal.com/en/file/...ff4a29f62ff5b9f3b9d23329269b2d9009b/analysis/

لا والابجح من كده مرفوع مرتين

 

[White Man]

طايرين يعني

اسهله ولا اسكت ياعمرو

براحتك انت بقى

مايحتاج انه مصدق بس كنت امزح لكن سؤال اخير
هل يوجد تنبيه لسلوكيات الاخرى غير شاشة الشات

.. لو قمت بمحاولة فتح الشات ، أو تسجيل الشاشة .. إلخ سيظهر لك تنبيه من الكاسبر ان كان ع اليدوي فقط

serveftp
هذا ما ظهر لي ؟؟؟​

انت الان على الطريق الصحيح
هذا الجزء قبل الأخير من الهوست

 

[xpiraqi]

والله من هاي التشفيرة تعلمت الكثير الكثير
رائع يا غالي
التقسيم خرافي امام عيني ولم اره هههههه
وغفلت عن هذه​

 Public Shared яяо As Object = "77"

        Public Shared яяорПяяорянПП As String = Strings.Replace(Conversions.ToString(яяояяояяо.яяо), "8", "7", 1, -1, CompareMethod.Binary)

        Public Shared яяоянПП As String = "Whitf-Man"

        Public Shared яяоряняяорянПП As String = Strings.Replace(яяояяояяо.яяорянПП, "f", "e", 1, -1, CompareMethod.Binary)

        Public Shared яяорянПП As String = "mbcro"

        Public Shared яяорянППяяорянПП As String = Strings.Replace(яяояяояяо.яяорянПП, "b", "i", 1, -1, CompareMethod.Binary)

انحني لك احتراما يا غالي
نشوف الجايات يا ذهب​

 

[White Man]

لا تعليق

دى الى اسمها قمه فى الرخامه

https://www.virustotal.com/en/file/...ff4a29f62ff5b9f3b9d23329269b2d9009b/analysis/

لا والابجح من كده مرفوع مرتين

7 ميجا ورفعه
يلا هما هيروحوا من ربنا فين

 

[White Man]

[hide]
Public Shared Function smethod_0(ByVal input As String, ByVal pass As String) As String
Dim str2 As String
Dim provider2 As New TripleDESCryptoServiceProvider
Dim provider As New MD5CryptoServiceProvider
Try
Dim destinationArray As Byte() = New Byte(&H18 - 1) {}
Dim sourceArray As Byte() = provider.ComputeHash(Encoding.ASCII.GetBytes(pass))
Array.Copy(sourceArray, 0, destinationArray, 0, &H10)
Array.Copy(sourceArray, 0, destinationArray, 15, 8)
provider2.Key = destinationArray
provider2.Mode = CipherMode.ECB
Dim transform As ICryptoTransform = provider2.CreateDecryptor
Dim inputBuffer As Byte() = Convert.FromBase64String(input)
str2 = Encoding.ASCII.GetString(transform.TransformFinalBlock(inputBuffer, 0, inputBuffer.Length))
Catch exception1 As Exception
ProjectData.SetProjectError(exception1)
ProjectData.ClearProjectError
End Try
Return str2
End Function


[/hide]​

نسيت اقولك ،،
هتلاقي حبة فنكشنات ملهاش أي لازمة ،، بس حاططها غلاسة
خليك مع الإستدعاءات ع متوهش