إعـــــــلان

**azizsoft azizsoft** · 24-01-2015, 05:29 PM

بسم الله الرحمن الرحيم

نتابع معك ان شاء الله

**ثامر أبو بلقيس ثامر أبو بلقيس** · 24-01-2015, 05:46 PM

مرور عطر أستاذ عزيز و حتى نعطي للطلب مسارا بحثي
و قتلا للرتابة

---- يسمح للمحترفين القادمين إن شاء الله ---
باستعمال دوال الاوتوبلاي للحصول على الجواب بكل سهولة
و تسهيلا لا يوجد سطر يحمل القيمة المعدومة أي 0

و لتنويع الحلول :

---- بالنسبة للمحترفين غير مسموح بإستعمال دوال البرنامج
ماعدا ديالوج اظهار النتائج أو ما تعلق بتعليمات التكرار اذ لزم الامر
----------------------------------------------------------------
نلتقي بود

**فرح صالحي فرح صالحي** · 24-01-2015, 06:12 PM

السلام عليكم ورحمة الله وبركاته
مساهمة من نوع (ذكر فإن الدكرى تنفع المؤمنين)

كود:

-- Recherche la position de "an" et "ou"                
  print(string.find("banane", "an"))    --> 2 3
    
  print(string.find("banane", "ou"))    --> nil
    
local s = "une petite phrase"    
-- Recherche un mot commencent par…
print(FindPattern(s, "p…"))    --> petite
    
  print(FindPattern(s, "p…", 6)) --> phrase    
    
-- Recherche une lettre    
  print(FindPattern(s, "%a")) --> u

-- Recherche tout ce qui est lettre    
  print(FindPattern(s, "%a+")) --> une
    
local s = "nous sommes en 2012"    
-- Recherche un chiffre    
  print(FindPattern(s, "%d")) --> 2

-- Recherche tout ce qui est chiffre    
  print(FindPattern(s, "%d+")) --> 2012

-- Recherche une lettre CAPITALE    
  print(FindPattern("mAjuscUle", "%u")) --> A

-- Recherche une lettre minuscule    
  print(FindPattern("MInUScUle", "%l")) --> n

-- Recherche une minuscule suivie d'une capitale    
  print(FindPattern("MInUScUle", "%l%u")) --> nU

ما تضحكش علي راني بوجادي

**ثامر أبو بلقيس ثامر أبو بلقيس** · 24-01-2015, 06:23 PM

أخي صالحي لست " بوجادي "

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

**ثامر أبو بلقيس ثامر أبو بلقيس** · 24-01-2015, 06:37 PM

سأشرح لك الأكواد التي كتبتها و كيف تستعملها
في الاوتوبلاي

**ثامر أبو بلقيس ثامر أبو بلقيس** · 24-01-2015, 06:44 PM

لاحظ آخر سطر كتب هكذا

كود:

  print(FindPattern("MInUScUle", "%l%u")) --> nU

هذا السطر يأتي لك بالحرف ذو القطع الصغير و الحرف الذي بجانبه ذو قطع كبير

لاحظ : الكلمة مصدر البحث : MInUScUle أين موقع أول حرف صغير وورائه آخر أكبر
سيكون nU ثم cU

نطبق في الاوتوبلاي الموافق لهذا :

كود PHP:


for w in string.gmatch ("MInUScUle", "%l%u") do

 Dialog.Message("Notice",w);

end

جرب ستحصل على النتائج

بنفس الطريقة جرب باقي التعليمات لتحصل على كل
النتائج ما عدا المعادليتن الاولى و الثانية تحسبا بطريقة أخرى

فهمتني

**ثامر أبو بلقيس ثامر أبو بلقيس** · 24-01-2015, 07:20 PM

نرجع لبداية كود الاخ صالحي
نمسك هذا الجزء

كود PHP:


local s = "une petite phrase"    

-- Recherche un mot commencent par…

print(FindPattern(s, "p…"))    --> petite

    

  print(FindPattern(s, "p…", 6)) --> phrase

ما دوره التحكم في الاعلان عن الكلمة الاولى أو الثانية

البديل:

كود PHP:


my_table = {};

x=1

 s = "une petite phrase"    

for w in string.gmatch (s, "%w+")do

Table.Insert(my_table, x, w);

x=x+1

end    

 Dialog.Message("Notice",my_table[3]);

هنا ساستدعي الكلمة الاخيرة phrase لذلك كتبت 3 في المساج
لو أردنا المفردة الاولى نكتب 1 الثانية نكتب2 و هكذا

**ثامر أبو بلقيس ثامر أبو بلقيس** · 24-01-2015, 07:26 PM

نمسك الجزء هذا

كود PHP:


-- Recherche une lettre    

  print(FindPattern(s, "%a")) --> u



-- Recherche tout ce qui est lettre    

  print(FindPattern(s, "%a+")) --> une

الاعلان %a سيعلن عن كل مفردات الجملة حرفا حرفا

كود PHP:


 s = "une petite phrase"    

for w in string.gmatch (s, "%a")do

 Dialog.Message("Notice",w);  

end

اذا أضفنا العلامة + سنعلن عن المفردات كلمة كلمة

كود PHP:


 s = "une petite phrase"    

for w in string.gmatch (s, "%a+")do

 Dialog.Message("Notice",w);  

end

ستظهر ثلاث مفردات بالتتابع في مثالنا

**ثامر أبو بلقيس ثامر أبو بلقيس** · 24-01-2015, 07:31 PM

بنفس الطريقة الكتابة %d ستستخلص الارقام رقما رقما
اذا اضفنا + سيتم استخلاص العدد كاملا مثلا 2012 ليمر للعدد الثاني ان وجد
موفق

**فرح صالحي فرح صالحي** · 24-01-2015, 09:06 PM

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

. لك مني أجمل تحية .

**azizsoft azizsoft** · 24-01-2015, 09:56 PM

بسم الله الرحمن الرحيم

الله يبارك فيك استاذ ثامر

**ثامر أبو بلقيس ثامر أبو بلقيس** · 25-01-2015, 08:40 AM

شكرا أستاذ عزيز على المرور الطيب

**ياسرهتهت ياسرهتهت** · 25-01-2015, 10:57 AM

بسم الله الرحمن الرحيم
السلام عليكم ورحمة الله وبركاته

شـكــ وبارك الله فيك ـــرا لك ... لك مني أجمل تحية .

**ثامر أبو بلقيس ثامر أبو بلقيس** · 26-01-2015, 10:14 PM

شكرا أخي ياسر على المرور الطيب

إعـــــــلان

كيف أستخرج الأسطر " الرقمية " من ملف

كيف أستخرج الأسطر " الرقمية " من ملف

تعليق

تعليق

تعليق

تعليق

تعليق

تعليق

تعليق

تعليق

تعليق

تعليق

تعليق

تعليق

تعليق

تعليق

مواضيع تهمك