هل يمكن التحايل لتسريع عملية توليد كلمات عشوائيا

الأخ الكريم ماذا تقصد بعملية التسريع لتوليد كلمات عشوائية !!!

هل مثلاً ستعرض للمستخدم مليون كلمة عشوائية مثلاً ( كيف هذا ) !!!

علي كلٍ نفرض أن لديك ملف به 10000 سجل ، كل سجل يمثل شيء معين ، ترغب بعرض 1000 سجل منهم عشوائي !!!

إذا أحببت أن تعرض مجموعة كبيرة من الكلمات عشوائياً وتدرجهم بمصفوفة أو List Box يمكن مثلاً إدراج كائن Progress Bar ومن ثم أثناء إجراء Loop علي مجموعة الكلمات قم بإدراج جملة DoEvents حتي تمنح النافذة من إجراء مهام أخري كما يلي :

For X = 1 To 1000
	List1.AddItem strName
	DoEvents
Next

شكراً

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

n=a*(r^i-1)/(r-1)

فبهذا القانون يمكن ان نستنتج جميع الاحتمالات

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

أ , ب

فان الناتج للاحتمالات سيكون كالتالي

ا

اا

اب

ب

بب

با

ويصبح لدينا عدد الاحتمالات 6 وذلك بتطبيق القانون اعلاه كالتالي

n=2*(2^2-1)/(2-1)

وسيتضح لنا ان

n= 6

وهذه العملية اذا قمنا بتوليد الكلمات من الحرفين أ. ب فانها لاتستغرق اجزاء من الثانية ولكن

لك ان تتخيل ان قمنا بتوليد كلمات من 26 حرف فكم من الوقت سيستغرق توليدها وبنفس القانون اعلاه تصبح كالتالي

n=26*(26^26-1)/(26-1)

فكم من الوقت سيستغرق البرنامج لتوليد هذا الكم الهائل من الكلمات وهو السؤال المطلوب

هل هناك طريقة او حيلة ما لتوليد هذا الكم الهائل في اجزاء من الثانية ام ان الامر سيبقى بالساعات

وشكرا

الأخ الفاضل يرجى توضيح النقاط التالية حتى يمكن مساعدتك :

- كيف ستستخدم الكلمات الناتجة .. اى ما الهدف من توليد هذا الكم الهائل من الكلمات .

- هل ستسخدم الكلمات العشوائية الناتجة اثناء توليدها - كمحاولة ايجاد كلمة سر مثلا - ام ستقوم بتخزينها اولا والرجوع اليها لاحقا .

علما بأن سرعة توليد هذه الكلمات يتوقف على عوامل عديده مثل سعة الزاكرة الخاصة بجهازك وسرعة المعالج وكذلك الكود الخاص بتوليد هذه الكلمات

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

اقتباس

اريد ان اقوم فيما بعد بتوليد نصوص وذلك من الكلمات الناتجة بنفس الطريقة التي قمت بتوليد الكلمات منها

معذرة يرجى التوضيح اكثر ..

اغلب الكلمات الناتجة ليس لها معنى ولا تمثل شئ ومن ثم الجمل ايضا فكيف ستستخدمها ؟؟؟!!!!

اذا لم يكن لديك تحفظ على توضيح ماتنوى عمله بالتفصيل فيجب توضيحة حتى يمكن مساعدتك للوصول الى ماتريد .

انا معاك ان اغلب الكلمات الناتجة لن يكون لها معنى ولكني اريد البرنامج ان امكنك ذلك

نعم يوجد, اكتب ملف DLL يقوم بهذا الأمر بلغة مثل C أو أفضل, أسمبلي, وقم فقط باستخدام الفيجوال بيسك في استدعائه.

عدى عن هذا, أعطيك مثال, كان لدي ذاكرة 512 على معالج 3200 AMD, قمت بكتابة شفرة صغيرة جدا بالفيجوال بيسك لتأخذ حروف ملف حجمه 30 كيلو تقريبا, يعني حوالي 30,000 حرف مجازاً وتقوم بعملية XOR بين الحروف وحرف ثابت واضافة 2 الى الناتج..

البرنامج بعد تنفيذه انتهى بـ crash, عفواً.. لم ينتهي أصلاً! طبعا استخدمت FOR .. NEXT العادية ولم اراعي موضوع تحسين الشفرة بطرق أخرى.. لكن لا اتصور في حالتك سيختلف الأداة كثيراً.

السلام عليكم

علما بأن سرعة توليد هذه الكلمات يتوقف على عوامل عديده مثل سعة الزاكرة الخاصة بجهازك وسرعة المعالج وكذلك الكود الخاص بتوليد هذه الكلمات

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

الاستاذ Xacker افهم من كلامك انني لن استطيع تنفيذ هذا البرنامج الا بواسطة لغة سي او لغة اسمبلي وماهو ملف dll الذي تقصد اريد شرح وافي لان حدود فهمي بالبرمجة بسيطة جدا

عموما هناك طريقة ثانية لعملية توليد الكلمات بس بتعديل بسيط في القانون(المعادله) التي ذكرتها سابقا وهذه الطريقة تستطيع بها ان تقوم بتوليد كلمات مكونه من حرف واحد وحتى 15 حرف هذا اذا اخذنا في الاعتبار ان حدود كل كلمة بين 1 - 15 حرف

الطريقة ساحاول وضعها في مشاركة قادمة

شكرا للجميع

DLL ملفات الربط الديناميكية, مشروحة لو وضعت المؤشر على الكلمة, هي عبارة عن ملفات تحوي على شفرة تنفيذية لكن لا يتم طلبها مباشرة من قبل المستخدم وانما تكون كالإجرائيات المخزنة في برنامجك والتي تطلبها عند الحاجة, تفيد في عملية نقل اجرائيات كثيرة بين ما ترغب من البرمجيات دون الحاجة الى اعادة كتابتها وتسهل في تلك الحالة عملية التطوير للبرنامج والتحديث لو احتاج الأمر التعديل على تلك المكتبات.

لنفرض لديك الذاكرة والمعالج اللازم للأمر, توليد كل الاحتمالات الممكنة وفق أي معادلة رياضية محترمة تستخدمها سيأخذ منك من الوقت الكثير, إن كنت تريد التسريع في هذه العملية فنعم, ++C أو ASM ويفضل الأخيرة.

الأخ المشرف ( Xacker ) ، تحية طيبة وبعد ،

المشكلة أخي أن عملية الـ Loop تحتاج الي وقت من أساسة ، ما بالك لو أن ناتج الـ Loop هو ( 6.40236436341544E+36 ) ، رقم كبير جداً !!!

وأعتقد أن الأسمبلي والسي يحتاجون أيضاً الي وقت كبير !!!

أنظر الكود التالي :

Private Sub Command1_Click()
	Dim N As Double
	Dim A As Double
	Dim R As Double
	Dim I As Double
	Dim X As Double

	A = 26
	R = 26
	I = 26
	N = A * (R ^ I - 1) / (R - 1)

	Me.Caption = N

	For X = 1 To N
		Text1.Text = X
		DoEvents
	Next
End Sub

هذا الكود عندما نفذتة قام بإجراء Loop علي المتغير N لعدد ( 245933 ) بعد دقيقة تقريباً ( 60 ثانية ) !!!

وبعد حذف جملة DoEvents تم المرور علي نفس الرقم بعد 17 ثانية تقريباً !!!

ما بالك بالرقم المطلوب !!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!

صحيح لغة التجميع من مميزاتها السرعة لأنها تتعامل مع المعالج الدقيق Processor و ذاكرة الحاسب Memory خصوصاً الـ Ram مباشرتاً ، ولكن أعتقد أنه سيأخذ فترة طويلة لرد العل .

وكما تعلم أخي هناك فرق بين الفعل ورد الفعل ، ولكن إذا طال رد الفعل يكون النتيجة غير جيدة مثل فشل البرنامج أو حدوث أي مشاكل أخري !!!

لو كان الفرق عشرة دقائق أو 15 دقيقة أو حتي نصف ساعة يمكنني إدراج لافتة للمستخدم ، لكن أخي عملية الترقيم بما يطالبة الأخ الكريم ليس صعب وليس مستحيل ولكنه في نفس الوقت يحتاج الي مدة زمنية طويلة لرد الفعل ، وأعتقد أن لغة التجميع أيضاً يحتاج الي زمن رد الفعل مثل أي لغة برمجة ، ولكن بسرعة أعلي لكن أيضاً الرقم كبير جداً ويحتاج وقت أكبر !!!

شكراً

الأخ تكلم عن تسريع العملية و تسريع العملية ممكن في C أو في الأسمبلي ببساطة, فشل البرنامج في النهاية سيكون من جراء عدم توفر الذاكرة الكافية ونعم, سيأخذ وقت ربما يكون بالطويل, لكن هل سيكون بطول برنامج مكتوب بالفيجوال؟ لا أتصور, إن لم يكن من الممكن أن يكتب البرنامج بنجاح أفتح عينيه على الواقع على الأقل ;)

لا نريد تحويل الموضوع إلى مقارنة بين وبين.. أنا أتكلم من نظرة موضوعية لو كان هناك لغة أفضل من الأسمبلي للقيام بهذا لنصحته بها.

ثم هذا 6.40236436341544E+36 رقم فلكي وليس فقط كبير جداً :lol:

حتى ناسا لو فكرت بالحصول على دقة عالية بهذه النسبة لاستخدمت الأسمبلي أو لعدلت عن الفكرة :D

السلام عليكم

اقتباس

الأخ تكلم عن تسريع العملية و تسريع العملية ممكن في C أو في الأسمبلي ببساطة, فشل البرنامج في النهاية سيكون من جراء عدم توفر الذاكرة الكافية ونعم, سيأخذ وقت ربما يكون بالطويل, لكن هل سيكون بطول برنامج مكتوب بالفيجوال؟ لا أتصور, إن لم يكن من الممكن أن يكتب البرنامج بنجاح أفتح عينيه على الواقع على الأقل

العفو أخي ، انا لم أقصد شيء ، فأنت أستاذنا ، ولم أقصد المقارنة ،

ولكن أقصد الفعل ورد الفعل ،

صحيح الأسمبلي أسرع ، ولكن رد الفعل سيكون بعيد ، وكما ذكرت حذرتك ، الرقم ليس رقم عادي بل رقم فكي ، كبير جداً بطريقة غير عادية !!!

المشكلة أخي لو الأخ الكريم يحتاج الي الرقم التالي للترقيم التلقائي كان الأمر أسهل بكثير !!

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

علي العموم ياريت أخي تكون فهمت ما أقصدة ، حيث أقصد الفعل ورد الفعل !!!

شكراً

MMA_EG_Cairo كتب:

العفو أخي ، انا لم أقصد شيء ، فأنت أستاذنا ، ولم أقصد المقارنة ،

لا تقل هذا ولا تعتذر كلنا نتعلم ولا فرق بيني وبينك إلا كما قال الرسول الكريم بالتقوى والعمل الصالح.

اقتباس

المشكلة أخي لو الأخ الكريم يحتاج الي الرقم التالي للترقيم التلقائي كان الأمر أسهل بكثير !!

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

هذه النقطة لم أفهمها بشكل جيد أرجو التوضيح، ذهني مشغول ببعض الأمور التي أقوم بها حالياً

اقتباس

هذه النقطة لم أفهمها بشكل جيد أرجو التوضيح، ذهني مشغول ببعض الأمور التي أقوم بها حالياً

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

بمعني أدق ، أنت ترغب في إجراء ترقيم تلقائي بحقل في جدول معين ، والترقيم هو إيجاد أكبر قيمة ومن ثم زيادتها بقيمة واحدة . ولكن ما يحتاجة دفعة واحدة تقريباً كما هو موضحة بالكود التالي :

For X = 1 To 100000000
	<Code>
Next

ولو أن المأة مليون أبسط بكثير من الرقم المعطي .

يعني أخي لو كان يرغب في تنسيق معين بحقل لكان الأمر أبسط بكثير ، حيث يمكننا معرفة آخر قيمة ومن ثم الإنتقال الي القيمة التالية .

شكراً

آه نعم طبعا, والأخ ذكر في إحدى مشاركاته جملة "اجزاء من الثانية ام ان الامر سيبقى بالساعات"

تقصد بالأسابيع وربما الأشهر وربما أكثر :happy:

ويبقى الجزء الداخلي الذي سيقوم بإيجاد الاحتمالات نفسها.. وهذا سيأخذ وقتاً أطول فأطول فأطول...

الاساتذة جميعا اللي تفضلو بالرد

هل تعتقدون معي بان الحل سيكون صعب ولكن

مارايكم في حل طالما ان المساله صعبت وهو تنفيذ البرنامج حتى يكتمل وحتى لو ظل الكمبيوتر يعمل لمدة يومين لكي ينتهي من توليد الكلمات وعندما ينتهي اقوم بربطه بقاعدة بيانات من نوع اوراكل ولكن هل انا لمن اربط البرنامج بالاوراكل هل سيظل الكمبيوتر نفس المدة (يومين) حتى استعلم منه او ابحث مثلا مثلا عن كلمات تبدا بحرف الالف هذا سؤال ؟؟

اما السؤال الثاني فهل يوجد معالجات على شبكة الانترنت لغرض عمل البرنامج ويتم الاتصال بها (الربط معها)

السؤال الثالث هل الاوراكل يستطيع تخزين هذا الكم الهائل من الكلمات واذا كان الجواب بنعم فأين يتم تخزينها هل سيكون على سيرفرات موقع اوراكل ام على جهازي فإذا كان الموضوع سيكون على سيرفرات أوراكل فهذا امر بسيط نتعلم دورة اوراكل

شكرا من الاعماق لكم على التواصل

الأخ الكريم ، ليس مطالب من حضرتك كل هذا !!!

لكن أخي يمكنك إيجاد أكبر قيمة وزيادتها بواحد !!!

بإختصار شديد ، سأشرح لك الفكرة بمثال عملي :

قم بإدراج جدول يدعي مثلاً ( Serials ) ، هذا الجدول يحتوي علي حقلين ، الأول رقمي ، اما الثاني نصي !!!

بحيث أن الحقل الأول يتم تخزين به قيمة رقمية مسلسلة ( 1، 2، 3، 4، .... الي آخرة )

أما الثاني فيتم تخزين بها التنسيق الذي ترغب فية .

وأثناء إدراج سجل بأي جدول آخر قم أولاً بفتح هذا الجدول وأبحث عن الترقيم فقط لا غير ، مثلاً :

Select * From Serials Where Serials_ID = 5;

والرقم ( 5 ) حسب الترقيم المدرج بالجدول الآخر ( غير الـ Serials ) ، ففي حالة وجود الرقم ( 5 ) ضمن مجموعة سجلات جدول ( Serials ) يتم إيجادة بالجدول الآخر ، اما في حالة عدم وجودة يتم إدراجة بالجدول Serials حسب التنسيق الجديد ، ومن ثم أخذ هذه القيمة من جديد بجدول آخر !!!

المقصود من هذه الفكرة أن هناك جدول يحتوي علي 15 سجل ، فالطبيعي أن السجل الجديد هو الرقم 16 ، أما جدول آخر يحتوي علي 7 سجلات ، فمن الطبيعي أن السجل الجديد يكون 8 !!!

ولكن أخي يمكن إستبعاد فكرة الترقيم بهذه الطريقة بحيث أن يتم تسجيل الترقيمات في جدول خاص ، حيث أنها طريقة غير عملية وغير جيدة بالمرة ، ولكن من المفضل إيجاد آخر قيمة ومن ثم زيادتها بقيمة مثل فكرة الترقيم التقائي تماماً !!!

وهنا تكون العملية خطوة خطوة ، سجل سجل ، قيمة قيمة ( مش آلاف من القيم ودفعة واحدة )

لكن علي فكرة ، فكرتك ممتازة جداً وتستاهل الإنشغال

شكراً أخي وبالتوفيق الدائم ،

مصيلحي كتب:

الاساتذة جميعا اللي تفضلو بالرد

هل تعتقدون معي بان الحل سيكون صعب

تقريبا مستحيل اللهم الا لو قمت باستثمار بضع مئات من المعالجات... ربما أكثر

اقتباس

وحتى لو ظل الكمبيوتر يعمل لمدة يومين

زودهم حبتين :D

اقتباس

اما السؤال الثاني فهل يوجد معالجات على شبكة الانترنت لغرض عمل البرنامج ويتم الاتصال بها (الربط معها)

ان وجد لا اتصور انها مخصصة للاستعمال البشري

اقصد, متوفرة لنا نحن الغلابة.

بقية الأسئلة أتركها لأهل العلم في قواعد البيانات وأوراكل -- بالمناسبة هناك قسم خاص بأوراكل يفضل أن تطرح أسئلتك عليهم.

اقتباس

زودهم حبتين

6.40236436341544E+36 / 245933 = 2.60329616741773E+31

xE+y

يعني الرقم x مضروب بـ 1y حيث y عدد الأصفار

اقتباس

xE+y

يعني الرقم x مضروب بـ 1y حيث y عدد الأصفار

الأخوة الكرام ،

( E ) هو يمثل الرقم 10

( + ) هو عدد أرقام ( 0 ) علي يمين الرقم الرئيسي ، مثال :

2E+5 = 200000

( - ) هو عدد أرقام ( 0 ) بعد الرقم العشري -1 ، مثال :

2E-5 = 0.00002

وإذا أحببت أن تجلب القيمة حسابياً إليك مثال :

Simble1 :
-------------
N = 2E+5 = 2 * (10 ^ 5) = 200000

Simble2 :
-------------
N = 1.2E+2 = 1.2 * (10 ^ 2) = 120

Simble3 :
-------------
N = 2E-5 = 2 * ( 10 ^ -5) = 0.00002

وهكذا

شكراً

الاساتذة اللي تفضلوا بالرد اقول لهم شكرا نورتوني

ولي طلب بسيط ارجوا ان تعملون كود بنفس القانون ولكنه يعمل على تكوين الكلمات من الحروف التالية

ا

ب

ت

ث

ج

وذلك لكي ارى الكود مطبق للقانون بصراحة انا حاولت وعجزت

وشكرا

الأخ الكريم ، رغم أنني لا أرشح لك هذا الأسلوب ، ولكن أنظر الي المرفق !!!

حيث يحتوي علي مثال يتكون من الحروف ( A,B,C,D ) ، ولكن أخي أنتبه ، هذا لا يقبل أكثر من ( 3125 ) في حقل قاعدة البيانات Unique ، لذلك أقل لك أن الترقيم أفضل بكثير من هذه الطريقة

لكن أخي ، يجلب قيمة قيمة Step By Step أو خطوة خطوة حسب البيانات المسجلة بقاعدة البيانات ، وليس دفعة واحدة

يارب يعجبك

شكراً

Simble.rar

استاذي الفاضل فيه موضوع في هذا المنتدى بعنوان توليد الحروف اليا ارجوا ان تبحث عنه وعندما تجده حاول ان تضيف له القانون التالي الذي سبق وان شرحته لك وهو

N = A * (R ^ I - 1) / (R - 1)

واريد فقط تطبيق وادخال هذا القانون في العملية التي قام بها الاخ في موضوع توليد الحروف اليا

واريد تطبيقه فقط على اربعة احرف

ا

ب

ت

ث

لانني لم ارى القانون في المثال الذي وضعته ويتضح لي انك قمت بربطه بقاعدة بيانات وانا لااريد ان اربط البرنامج بقاعدة بيانات

اريد فقط لست بوكس يقوم باظهار عملية توليد الكلمات من الحروف الاربعه ولككككككككككن بالقانون الذي سبق ذكره فقط

وشكرا على رحابة الصدر