שאלה לי אליכם:
אז ככה, בניתי ספר טלפונים בדיאלוג ובלה בלה.... עכשיו הכל עובד חלק, חוץ מהחיפוש שבניתי הבעיה בחיפוש היא שאם נגיד יש 3 מספריי טלפון בסך הכל נגיד תומר,אברהם, ויצחק, ואני מחפש תומר, אז זה יופיע לי שלוש פעמים (כמס' מספריי הטלפון). העקרון של השיטה הוא שכל שם מוכנס במס' שורה קבוע מראש וככה הכנסתי בקובץ טקסט אחד שמות בשני טלפונים ובשלישי פלאפונים וככה הוא מתאם בן השם למספרים, הקוד של החיפוש הולך ככה:
אז ככה, בניתי ספר טלפונים בדיאלוג ובלה בלה.... עכשיו הכל עובד חלק, חוץ מהחיפוש שבניתי הבעיה בחיפוש היא שאם נגיד יש 3 מספריי טלפון בסך הכל נגיד תומר,אברהם, ויצחק, ואני מחפש תומר, אז זה יופיע לי שלוש פעמים (כמס' מספריי הטלפון). העקרון של השיטה הוא שכל שם מוכנס במס' שורה קבוע מראש וככה הכנסתי בקובץ טקסט אחד שמות בשני טלפונים ובשלישי פלאפונים וככה הוא מתאם בן השם למספרים, הקוד של החיפוש הולך ככה:
on *:dialog
b:sclick:12:{ did -r pb 1 did -r pb 5 did -r pb 6 %x = 0 :loop inc %x if ($read(phonebooknames.txt, w, * $+ $did(pb,11) $+ *,%x) != $null) { did -a pb 1 $read(phonebooknames.txt, w, * $+ $did(pb,11) $+ *,%x) did -a pb 5 $read(phonebookPhones.txt, $readn) did -a pb 6 $read(phonebookPelephones.txt, $readn) goto loop } if ($read(phonebooknames.txt, w, * $+ $did(pb,12) $+ *,%x) != $null) { unset %x } }
מקווה שתעזרו....b:sclick:12:{ did -r pb 1 did -r pb 5 did -r pb 6 %x = 0 :loop inc %x if ($read(phonebooknames.txt, w, * $+ $did(pb,11) $+ *,%x) != $null) { did -a pb 1 $read(phonebooknames.txt, w, * $+ $did(pb,11) $+ *,%x) did -a pb 5 $read(phonebookPhones.txt, $readn) did -a pb 6 $read(phonebookPelephones.txt, $readn) goto loop } if ($read(phonebooknames.txt, w, * $+ $did(pb,12) $+ *,%x) != $null) { unset %x } }