منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب
[كود] RandomizeArray [الكود الاسطورة وفق رأيي المتواضع] - نسخة قابلة للطباعة

+- منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب (http://vb4arb.com/vb)
+-- قسم : قسم لغة الفيجوال بيسك VB.NET (http://vb4arb.com/vb/forumdisplay.php?fid=182)
+--- قسم : قسم مكتبة اكواد VB.NET (http://vb4arb.com/vb/forumdisplay.php?fid=185)
+--- الموضوع : [كود] RandomizeArray [الكود الاسطورة وفق رأيي المتواضع] (/showthread.php?tid=37270)



RandomizeArray [الكود الاسطورة وفق رأيي المتواضع] - سعود - 24-12-20

بسم الله الرحمن الرحيم
السلام عليكم و ر حمة الله  و بركاته
العديد من الشراح باليوتيوب تطرقوا لموضوع التشفير التقليدي  وركزو ا على موضوع المفتاح المسؤول عن الازاحة ولم اتمكن من الحصول على شرح طريقة في بالي لا اعرف كيف اشرحها اصلا.
الى ان وجدت بالانترنت دالة تعمل على تغيير بنية المصفوفة اي تجعل لكل حرف مكان عشوائي مما يجعلك تضطر ان تحفظ كل ترتيب عشوائي جديد 
وهو ما قمت بعمله في مشروعي الاخير
هذه الدالة اشكر من ابتكرها فرغم بساطتها لم و لن اتمكن من الوصول اليها بشكلها النهائي، فمهما حاولت الاستغناء عن اي خطوة فيها لا ينجح العمل.
المهم اطلت عليكم ولست بخيركم
الكود:
PHP كود :
Private Sub RandomizeArray(ByRef arr() As String)
 
       Dim iAs Integer
        Dim temp 
As String
        Randomize
()
 
       For i 0 To UBound(arr) - 1
            j 
Int(((UBound(arr) - 1) - 1) * Rnd() + i)
 
           temp arr(i)
 
           arr(i) = arr(j)
 
           arr(j) = temp
        Next
    End Sub 
و الآن أسأل الله لي و لكم التوفيق والسداد والستر في الدنيا وفي الأخرة



RE: RandomizeArray [الكود الاسطورة وفق رأيي المتواضع] - ابو روضة - 24-12-20

والله يا سعود أنت الأسطورة ليس الكود...



RE: RandomizeArray [الكود الاسطورة وفق رأيي المتواضع] - سعود - 24-12-20

(24-12-20, 03:59 PM)ابو روضة كتب :
والله يا سعود أنت الأسطورة ليس الكود...

بوجودكم اخي الكريم و كل من يشجع على الاستمرار.
[غذيذطمك سلج سخمشجك ذ مخ كح جريق قخى سخساهكشسش.]
فكرة التشفير البسيطة هذي جعلت من البرمجة شيئا ممتعا بالنسبة لي.

ابتثجحخدذرزسشصضطظعغفقكلمنهوي
او
ابجدهوزحطيكلمنسعفصقرشتثخذضغظ
او ترتيب عكسي لكليهما 
او
وهو الافضل
لكل نقرة زر مفتاح
من منكم لم يستوعب المشروع!
اتمنى الكل يكون فاهم اهميته لان الموجود بالانترنت يمكن معرفة سرها مثلا:
مفتاح معين اذا تم كشفه سيتم فك تشفير كل النصوص اللتي تم تشفيرها بواسطته اما الفكرة هذه مهما عرفت المفتاح او المعادلة فيصعب تخمين ترتيب المصفوفة كيف تكون.
انظر للصورة اعلاه كل نقرة  زر لابد من حفظ منتوجها(فكرة جيدة لمحبي السرية و التشفير) حيث لااستطيع كشف اي سر منها .
ولو لم احفظ الترتيب لن اتمكن من فك التشفير واعادة النص لاصله.
اعتذر عن التاخير.
------------------------
ممكن عمل برنامج تخمين قد ياخذ وقتا طويلا جدا لفك تشفير هذه الجملة التالية:
[منزلب لااد  ع نزسهد منزلب لااد لاورتس.]
و ذلك بوضع جملة متوقع وجودها مثل كلمة الحمدلله او الله فاذا تم كشفها تضاف للجدول والاستمرار حتى ينتهي التخمين واللذي يحتاج تكرار 28 * 28 على ما اظن ليتم المرور على كل الحروف.

شكر الله لكم و بارك فيكم ووفقنا واياكم لكل خير.



RE: RandomizeArray [الكود الاسطورة وفق رأيي المتواضع] - Lathe1 - 13-02-21

(24-12-20, 12:50 AM)سعود كتب :
بسم الله الرحمن الرحيم
السلام عليكم و ر حمة الله  و بركاته
العديد من الشراح باليوتيوب تطرقوا لموضوع التشفير التقليدي  وركزو ا على موضوع المفتاح المسؤول عن الازاحة ولم اتمكن من الحصول على شرح طريقة في بالي لا اعرف كيف اشرحها اصلا.
الى ان وجدت بالانترنت دالة تعمل على تغيير بنية المصفوفة اي تجعل لكل حرف مكان عشوائي مما يجعلك تضطر ان تحفظ كل ترتيب عشوائي جديد 
وهو ما قمت بعمله في مشروعي الاخير
هذه الدالة اشكر من ابتكرها فرغم بساطتها لم و لن اتمكن من الوصول اليها بشكلها النهائي، فمهما حاولت الاستغناء عن اي خطوة فيها لا ينجح العمل.
المهم اطلت عليكم ولست بخيركم
الكود:
PHP كود :
Private Sub RandomizeArray(ByRef arr() As String)
 
       Dim iAs Integer
        Dim temp 
As String
        Randomize
()
 
       For i 0 To UBound(arr) - 1
            j 
Int(((UBound(arr) - 1) - 1) * Rnd() + i)
 
           temp arr(i)
 
           arr(i) = arr(j)
 
           arr(j) = temp
        Next
    End Sub 
و الآن أسأل الله لي و لكم التوفيق والسداد والستر في الدنيا وفي الأخرة
ممكن برنامج بالفيجول بيسك ٢٠١٠ فيه مثال يوضح الكود


RE: RandomizeArray [الكود الاسطورة وفق رأيي المتواضع] - alfaiz678 - 14-02-21

(24-12-20, 03:59 PM)ابو روضة كتب :
والله يا سعود أنت الأسطورة ليس الكود...

صح


RE: RandomizeArray [الكود الاسطورة وفق رأيي المتواضع] - سعود - 14-02-21

(13-02-21, 05:34 PM)Lathe1 كتب : ممكن برنامج بالفيجول بيسك ٢٠١٠ فيه مثال يوضح الكود

#16
هذا مثال يوضح الكود و اكثر و تستطيع تشغيله باكثر من طريقة .