الفريق العربي للبرمجةأرشيف المنتديات · 2000 – 2023
نسخة أرشيفية للقراءة فقط — التسجيل والمشاركة مغلقان، والمحتوى محفوظ كما كان.

سؤال بخصوص برنامج clips

بدأه easy_3a3 في 14 أكتوبر 2011 · 16 رد · 2,508 مشاهدة · في الذكاء الاصطناعي وتطبيقاته
مشاركة: واتساب X فيسبوك تيليجرام
#1 صاحب الموضوع

السلام عليكم

(defrule get-name =>

(printout t “what is your name? “)

(bind ?response (read)) (assert (user_name ?response)) )

اخواني هذا البرنامج لما اعمل انتر بعدين اكتب run

بيعطيني

what is your name ?

وبعدها انا باكتب اسمي

طيب انا بدي بدل ما يكتبلي جملة what is your name ?

يفتحلي فورم exe انا عاملته كيف هاي بتصير ؟

#2

او يفتحلي صفحة

html

يعني القصد انه يفتحلي فورم براني

لاني الخطوة التانية بدي اخليه يقرأ ملف txt

#3

حقيقه لا أعرف ... لكن يمكنك البحث في التوثيق الخاص ب Clips ..

http://clipsrules.sourceforge.net/OnlineDocs.html

#4
__Unknown كتب:

حقيقه لا أعرف ... لكن يمكنك البحث في التوثيق الخاص ب Clips ..

http://clipsrules.sourceforge.net/OnlineDocs.html

شكرا ً اخي

ارجوا المساعدة

ما لقيت حل

#5

CLIPS> (open "data.txt" mydata "w")

TRUE

CLIPS> (printout mydata "red green")

CLIPS> (close)

TRUE

CLIPS> (open "data.txt" mydata)

TRUE

CLIPS> (read mydata)

red

CLIPS> (read mydata)

green

CLIPS> (read mydata)

EOF

CLIPS> (close)

TRUE

CLIPS>

هذا المثال اريد تعديل عليه بحيث انه الملف يكون فيه بيانات اصلا مو انا ادخل red green

زي المثال

المشكلة لما انشىء الملف انا واكون حاطه فيه داتا الداتا بتنمحا كلها وبضل بس red و green اللي بالبرنامج

#6

السلام عليكم ..

أنا لست خبيرا بالــ CLips

اقتباس
اريد تعديل عليه بحيث انه الملف يكون فيه بيانات اصلا مو انا ادخل red green

أول ثلاث تعليمات هي التي تفتح الملف للكتابة (تمحي محتوياته) ثم تكتب فيه العبارة المذكورة ثم تغلق الملف ... إذا لا داعي لها ..

 (open "data.txt" mydata "w")
  (printout mydata "red green")
  (close)

ملاحظة :

حيث شكل التعليمة :

  (open <file-name> <logical-name> [<mode>])

و لدينا قيم الــ mode (اختياري لأنه بين قوسين []) هي:

"r" هي للـ read access only

"w" هي للـ write access only

"r+" هي للـ read and write access

"a" هي للــ append access only

"wb" هي للـ binary write access

تم تعديل هذه المشاركة بواسطة houssam11350_11350 في 15 أكتوبر 2011 في 11:13

لا إله إلا الله ... محمد رسول الله

لو كانت مشاركتي مفيدة و تريد تشجيعي على المزيد من العطاء , فضلا قم بتقييم المشاركة

المعرًف القديم : houssam11350_11350

من مواضيعي : ArabGenCode : مولد كود و إجراءات مخزنة و واجهات لجداول سيكوال سيرفر

#7
houssam11350_11350 كتب:

السلام عليكم ..

أنا لست خبيرا بالــ CLips

أول ثلاث تعليمات هي التي تفتح الملف للكتابة (تمحي محتوياته) ثم تكتب فيه العبارة المذكورة ثم تغلق الملف ... إذا لا داعي لها ..

 (open "data.txt" mydata "w")
  (printout mydata "red green")
  (close)

ملاحظة :

حيث شكل التعليمة :

  (open <file-name> <logical-name> [<mode>])

و لدينا قيم الــ mode (اختياري لأنه بين قوسين []) هي:

"r" هي للـ read access only

"w" هي للـ write access only

"r+" هي للـ read and write access

"a" هي للــ append access only

"wb" هي للـ binary write access

اخي اذا لغينا اللي بتفتتح الملف طيب كيف بدي اجيب الداتا منه لعاد

#8

السلام عليكم ..

اقتباس
اخي اذا لغينا اللي بتفتتح الملف طيب كيف بدي اجيب الداتا منه لعاد

أخي أول ثلاث تعليمات هي فتح الملف للكتابة (مسح محتوياته) .

التعليمات الباقية هي فتح الملف للقراءة ... و هي ما تحتاجه ..

 (open "data.txt" mydata)
  (read mydata)
  (read mydata)
  (read mydata)
  (close)

لا إله إلا الله ... محمد رسول الله

لو كانت مشاركتي مفيدة و تريد تشجيعي على المزيد من العطاء , فضلا قم بتقييم المشاركة

المعرًف القديم : houssam11350_11350

من مواضيعي : ArabGenCode : مولد كود و إجراءات مخزنة و واجهات لجداول سيكوال سيرفر

#9
houssam11350_11350 كتب:

السلام عليكم ..

أخي أول ثلاث تعليمات هي فتح الملف للكتابة (مسح محتوياته) .

التعليمات الباقية هي فتح الملف للقراءة ... و هي ما تحتاجه ..

 (open "data.txt" mydata)
  (read mydata)
  (read mydata)
  (read mydata)
  (close)

شكرا اخي الكريم

اشكرك جزيل الشكر

طيب هلا كيف بدي افتح exe هل هناك امر لفتحexe

#10
اقتباس
طيب هلا كيف بدي افتح exe هل هناك امر لفتحexe

لا معلومات عندي عن ذلك , و كما قال الأخ في مشاركة سابقة , بأنه عليك مراجعة التوثيق :

http://clipsrules.sourceforge.net/OnlineDocs.html

لا إله إلا الله ... محمد رسول الله

لو كانت مشاركتي مفيدة و تريد تشجيعي على المزيد من العطاء , فضلا قم بتقييم المشاركة

المعرًف القديم : houssam11350_11350

من مواضيعي : ArabGenCode : مولد كود و إجراءات مخزنة و واجهات لجداول سيكوال سيرفر

#11

السلام عليكم

اخي شكرا لك

راجعت الرابط ولم اجد هذا الشيء الا وهو

انظر اخي الى هذا المثال

CLIPS>

(deffunction sign (?num)

(if (> ?num 0) then

(return 1))

(if (< ?num 0) then

(return -1))

0)

CLIPS> (sign 5)

1

CLIPS> (sign -10)

-1

CLIPS> (sign 0)

0

CLIPS>

هذا المثال يعمل للارقام اذا الرقم كذا يعطيني كذا

طيب لو بدي المثال يكون عن ال string

يعني نصوص اذا النص المدخل كذا يعطيني كذا

ارجو المساعدة

شكراً

#12

السلام عليكم ..

(deffunction sign (?text)
(if (= (str-compare ?text "hello") 0) then
(return "you"))
(if (= (str-compare ?text "world") 0) then
(return "are"))
"")

المرجع :

http://www.comp.rgu.ac.uk/staff/smc/teaching/clips/vol1/vol1-12.3.html

لا إله إلا الله ... محمد رسول الله

لو كانت مشاركتي مفيدة و تريد تشجيعي على المزيد من العطاء , فضلا قم بتقييم المشاركة

المعرًف القديم : houssam11350_11350

من مواضيعي : ArabGenCode : مولد كود و إجراءات مخزنة و واجهات لجداول سيكوال سيرفر

#13

شكراً اخي الفاضل

جزاك الله كل الخير

#14

السلام عليكم

اخي الكريم

كيف بدي اعمل and على هاي الجملة

(if (= (str-compare ?text "hello") 0)

وكيف ممكن هون اضيف تعريف لرقم

deffunction sign (?text)

يعني عشان اعمل جملة if ل رقم وحرف

انا جربت اعمل هيك وما زبط

PS> (deffunction sign (?text)

ss (?

شكراً واسفة على الازعاج

#15

للتذكير

#16

السلام عليكم ..

(deffunction sign (?text ?num)
(if (and (= (str-compare ?text "hello") 0)  (= ?num 0)) then
(return "you"))
(if (= (str-compare ?text "world") 0) then
(return "are"))
"")

لا إله إلا الله ... محمد رسول الله

لو كانت مشاركتي مفيدة و تريد تشجيعي على المزيد من العطاء , فضلا قم بتقييم المشاركة

المعرًف القديم : houssam11350_11350

من مواضيعي : ArabGenCode : مولد كود و إجراءات مخزنة و واجهات لجداول سيكوال سيرفر

#17

وعليكم السلام

جزاك الله كل الخير واسفة على الازعاج

تم تعديل هذه المشاركة بواسطة easy_3a3 في 17 أكتوبر 2011 في 12:35

مواضيع مشابهة