סיסמא למירק...(נגד אחים קטנים)

yweiss

New member
סיסמא למירק...(נגד אחים קטנים)../images/Emo66.gif

הנה משהו קטן שבניתי שאחי הקטן עצבן אותי וניסה לראות את הלוגים שלי במירק מומלץ בחום נגד אחים מעצבנים
לשים ברימוט וזה הכל
on 1:start: { set %protect on password } alias password { if (%is == $null) goto new if (%is != $null) && (%protect == off) goto change if (%is != $null) && (%protect == on) goto check :new set %pass $?*="הכנס סיסמא חדשה" | if (%pass == $null) { echo -s Cannot leave PassWord blank... | unset %pass* | goto new } set %pass1 $?*="הכנס סיסמא חדשה שוב" if (%pass != %pass1) { echo -s הסיסמא אינה תואמת נסה שוב | unset %pass* | goto new } if (%pass == %pass1) { echo -s הסיסמא התקבלה| set %is %pass | unset %pass* | set %protect on | halt } :change set %pass $?*="מה הסיסמא" if (%pass != %is) { echo -a סיסמא שגויה | unset %pass | goto change } if (%pass == %is) { unset %pass* unset %is :wrongg set %pass $?*="הכנס את הסיסמא החדשה" | if (%pass == $null) { echo -a Cannot leave PassWord blank... | unset %pass* | goto change } set %pass1 $?*="הכנס את הסיסמא החדשה שוב" if (%pass != %pass1) { echo -a הסיסמא לא תואמת נסה שוב | unset %pass* | goto wrongg | halt } if (%pass == %pass1) { echo -a הסיסמא נשמרה | set %is %pass | unset %pass* | set %protect on | halt } halt } :check set %wrong 0 :wrong set %pass $?*="מה הסיסמא" if (%pass == %is) { echo -s סיסמא נכונה אתה רשאי להשתמש במירק | set %wrong 0 | unset %pass* | halt } if (%pass != %is) { echo -s סיסמא שגויה | inc %wrong | if (%wrong == 3) { exit } | if (%wrong != 3) { goto wrong } } } menu status { לשנות את הסיסמא למירק: set %protect off | password }​
 

havlaz

New member
קצת חבל על העבודה ../images/Emo13.gif

קודם כל לראות לוגים לא יהיה בעיה כניסה לספריית המירק דרך הסייר לנעול תמירק, יש אפשרות כזאת במירק Alt + o General -> Lock אפשר גם לנעול חד פעמית, על ידי לחיצה על Ctrl והקטנת חלון המירק. ואז כדי לפתוח תצטרך להקליד את הסיסמא
 

yweiss

New member
נכון אבל...

באמת אשר לנעול את המירק אבל זה יותר נחמד לדעת שאתה בנית את האפשרות הזאת וסתם היה לי משעמם אז בנית
 

havlaz

New member
זה באמת כיף ../images/Emo13.gif

דרך אגב, שני הקודים שלך הוספו לטגליינס.
 

yweiss

New member
תודה

תודה על הכבוד
וכמו תמיד שמחתי לעזור ועוד דבר קטן ממש כדאי לעשות מאמר על DLL אני עכשיו עובד על זה אם בא לך ואתה מבין טוב תעשה כי אםשר לעשות אם זה ממש מלא דברים מגניבים
 

yweiss

New member
זה באמת מסובך

זה קשה אני עכשיו מתחיל אבל זה ממש מעניין
 

Sandro

New member
סקריפט אדיר - חד פעמי:)

להלן משהו שאף אחד לא חשב לעשות אותו בסקריפט, סיסמא מתחלפת, רמז: אם אתם עושים סקריפטינג, תשתמשו ברעיון גם לשים כסיסמא לניקסרב, כאשר אחים קטנים שלא מבינים, יתקשו לגלות את הסיסמא: (זה עובד על מספרים.. תשנו גם לאותיות עם $chr) דוגמאות לניקסרב: on 1:Connect:{ if (%NPassWord == on && %exit == on) { if (%NickPass != $null) { /echo 2 מבצע הזדהות אוטמטית... /set %ad $replace(%ad,#,1,%,2,^,3,/,4,+,5,*,6,@,7,!,8,?,9,;,0) /nickserv identify %ad /set %ad $replace(%ad,1,#,2,%,3,^,4,/,5,+,6,*,7,@,8,!,9,?,0,;) halt } } elseif (%NPassWord != on) { halt } elseif (%NickPass == $null) { halt } } on *:NICK:{ if ($nick == $me && $newnick == Sandro) { /set %ad $replace(%ad,#,1,%,2,^,3,/,4,+,5,*,6,@,7,!,8,?,9,;,0) /nickserv identify %ad /set %ad $replace(%ad,1,#,2,%,3,^,4,/,5,+,6,*,7,@,8,!,9,?,0,;) } } לכניסה: on *:Start:{ /set %pass $?*="Enter Password" /set %ad $replace(%ad,#,1,%,2,^,3,/,4,+,5,*,6,@,7,!,8,?,9,;,0) if (%pass != %ad) { /set %pass $?*="Enter Password" | set %pl 1 } if (%pass != %ad && %pl == 1) { /set %pass $?*="Enter Password" | set %pl 2 } if (%pass != %ad && %pl == 2) { /set %pass $?*="Enter Password" | set %pl 3 } if (%pass != %ad && %pl == 3) { /set %pass $?*="Enter Password" | set %pl 0 | /exit } elseif (%pass == %ad) { set %pl 0 set %exit on unset %pass /timer1 1 1 /server %server /set %ad $replace(%ad,1,#,2,%,3,^,4,/,5,+,6,*,7,@,8,!,9,?,0,;) halt } } on *:EXIT:{ set %exit off unset %pass /set %ad $replace(%ad,1,#,2,%,3,^,4,/,5,+,6,*,7,@,8,!,9,?,0,;) } אני דורש חוות דעת, לא על הסקריפט.. על הרעיון!
 

ofril

New member
לוגים....

אפשר לבדוק לוגים גם בתקיה של המירק תגיד לאח שלך ככה שתתחיל להגן גם על התקיה של המירק כי הלוגים שלך לא מוגנים.... בהצלחה :) עפרי
 
למעלה