מה שאתה קורא לו "פונקציות" זו רק צורה אחת מצומצמת.
ב-QBASIC יש פונקציות שגם עושות פעולות וגם מחזירות ערך.
הן דומות מאוד לסברוטינות, אבל הן נקראות function והן מחזירות ערך.
הנה דוגמה לפונקציה אמתית שגם עושה פעולה, וגם מחזירה ערך:
קוד:
DECLARE FUNCTION ADDNUMBERS! ()
SUM% = ADDNUMBERS
PRINT "Function returned:"; SUM%
FUNCTION ADDNUMBERS
INPUT "Write two numbers to add", A%, B%
PRINT "This function will add"; A%; "and"; B%
ADDNUMBERS = A% + B%
END FUNCTION
פונקציה כזו יכולה לעשות כל פעולה שהתוכנה הראשית יכולה, כולל לקרוא לפונקציות אחרות וסברוטינות.
כדי להדגים לך, כתבתי פונקציה שמבקשת קלט מהמשתמש, מדפיסה מה היא עומדת לעשות, ואז עושה פעולה מתמטית ומחזירה את הערך לתוכנה הראשית.
התוכנה הרשית רק מדפיסה את מה שהפונקציה החזירה, כדי להראות שאכן חזר הערך הנכון.
לגבי המחשב שלך:
הוא לא שונה!
שום מחשב לא ימחק את כל הקבצים במערכת רק בגלל שאתה מנסה לשמור משהו כקובץ טקסט.
או שאתה מנסה לעבוד עלי או שאתה טועה.
כבר הראיתי לך מספר שיטות להעביר קוד, אבל אחזור עליהן שוב, כי קבצי וורד ממך אין לכוונה לפתוח יותר:
1. תדביק את הקוד פה כמו שאני עושה.
כל מה שצריך, זה לשים את המילה האנגלית code באותיות קטנות בתוך סוגריים מרובעים לפני קטע קוד.
ואז לשים את אותה המילה אבל עם סלאש לפני, גם בסוגריים מרובעות, שורה אחרי.
ככה זה יראה כשאתה כותב הודעה:
'['code']'
PRINT "Hello BASIC!"
'['/code']'
רק בלי סימני ' כמובן.
2. תעתיק ותדביק את הקוד לאתר כמו pastebin.com ותצרף פה קישור.
Pastebin.com is the number one paste tool since 2002. Pastebin is a website where you can store text online for a set period of time.
pastebin.com
3. תפתח Notepad, תדביק לשם את הקוד.
מן הסתם, כשאתה מכניס את הקוד שלך ל-WORD אתה עושה העתק -> הדבק, אז אני בטוח שאת זה אתה יודע.
בהצלחה!