alias password {
if (%password == on) { goto login }
if (%password == off) { halt }
:login
.showmirc -t
/set %times 1
/set %passwordtry1 $?*="Password:"
if (%passwordtry1 == %yourpass) { goto success }
if (%passwordtry1 != $1) { goto login2 }
:login2
/set %times 2
/set %passswordtry2 $?*="Password:"
if (%passwordtry2 == %yourpass) { goto success }
if (%passwordtry2 != $1) { goto login3 }
:login3
/set %times 3
/set %passwordtry3 $?*="Password:"
if (%passwordtry3 == %yourpass) { goto success }
if (%passwordtry3 != $1) { goto sorry }
:sorry
if (%times == 3) { /exit }
:success
.showmirc -s
/unset %passwordtry1
/unset %passwordtry2
/unset %passwordtry3
/unset %times
}
menu status,menubar {
Password System ( $+ %password $+ )
.On:/set %password on | /techo Password is now ON
.-
.Off:/set %password off | /techo Password is now OFF
.-
.Change Password:/newpass
}
alias techo {
if (%scriptstamp == 1) { echo -at %s $1- }
else { echo -a %s $1- }
}
alias newpass {
/set %newpasstry $?*="Old password:"
if (%newpasstry == %yourpass) { goto change }
if (%newpasstry != $1) { goto sorry }
:change
/set %yourpass $?*="New password:" | halt
/unset %newpasstry
:sorry
/techo Wrong password
/unset %newpasstry
========================
I used
/set %passwordtry1 = $input($read($mircdirscript/insquotes.txt),p,©º°¨¨°º© WELCOME HENDON ©º°¨¨°º©)
instead of
/set %passwordtry1 $?*="Password:"
and it couldn't work, didn't get the passwords to match..
