Password Identifier

Please Register to submit score.

Average Score	1.0
Scores Submitted	1
Date Added	Aug 15, 2007
Last Updated	Oct 05, 2007
Tags	ident identifier identify login pass password

Introduction

This is a login system I made. When you login it gives you voice. I suggest making the channel mode +m.

I made this for someone on the forum who needed a login system, so i decided to share it with everyone else too.

Hope you like it.

All comments appreciated.

Commands:

/msg <you> register <pass u want>
/msg <you> login <pass>
/msg <you> changepass <old pass> <new pass>

Grab the Code

on *:load: echo -a Login System created by mountaindew
on *:text:*:?:{
  if ($1 == register) {
    if ($2 && $readini(login.ini,$nick,pass) == $null) {
      writeini login.ini $nick pass $2
      msg $nick Registration Complete. Type /msg $me login $2
    if (!$2) msg $nick Usage: /msg $me register <pass>
    if ($readini(login.ini,$nick,pass) != $null) msg $nick Sorry $nick $+ , you're already registered!
  }
  if ($1 == login) {
    if ($readini(login.ini,$nick,login) == yes) msg $nick You are already logged in.
    if ($readini(login.ini,$nick,login) != yes && $2 == $readini(login.ini,$nick,pass)) {
      msg $nick Password Accepted. You are now logged in.
      writeini login.ini $nick login yes
      var %x = 1
      while (%x <= $chan(0)) {
        mode $chan(%x) +v $nick
        inc %x
      }
    }
    else msg $nick Access Denied. Wrong password.
  }
  if ($1 == changepass) {
    if ($2 == $readini(login.ini,$nick,pass) && $3) {
      writeini login.ini $nick pass $3
      msg $nick Your new pass is $3
    }
    if (!$3) msg $nick Usage: /msg $me changepass <old> <new>
    if ($2 != $readini(login.ini,$nick,pass)) msg $nick $2 isn't your current password.
  }
  if ($1 == help) {
    msg $nick Commands:
    msg $nick /msg $me register <pass>
    msg $nick /msg $me login <pass>
    msg $nick /msg $me changepass <old> <new>
  }
}
on *:quit: writeini login.ini $nick login no
on @*:join:#:{
  if ($readini(login.ini,$nick,login) == yes) mode $chan +v $nick
  if ($readini(login.ini,$nick,pass) == $null) msg $nick You haven't registered yet. Type /msg $me register <pass>
  if ($readini(login.ini,$nick,login) == no) msg $nick To login, type /msg $me login <pass>
}
on *:nick:{
  if ($readini(login.ini,$nick,pass) != $null) {
    writeini login.ini $nick login no
    mode $chan -v $newnick
    msg $newnick Since you changed nicks, you must login again.
    msg $newnick If you aren't registered with $nick $+ , type /msg $me register <pass>
  }
}

Comments

(10) RSS

Go to Bottom

BigBen

Comments: 15

mIRC Snippet: Password Identifier
Posted on Aug 15, 2007 7:36 pm

Its good, but one thing. When I start to register it says: Usage: register <pass>

PowerDragon

Comments: 32

mIRC Snippet: Password Identifier
Posted on Aug 15, 2007 8:56 pm

I didnt like it. why would you use this anyway?

mountaindew

Comments: 1,366

mIRC Snippet: Password Identifier
Posted on Aug 15, 2007 8:57 pm

i dont use it, someone wanted me to make one for them, dont ask me

Anti

Comments: 288

mIRC Snippet: Password Identifier
Posted on Aug 15, 2007 9:42 pm

Don't complain if you're not going to use it.

mountaindew

Comments: 1,366

mIRC Snippet: Password Identifier
Posted on Aug 16, 2007 9:32 am

*UPDATED*

Now you dont have to /hop to get voice, it voices you in every channel the bot is on.

mountaindew

Comments: 1,366

mIRC Snippet: Password Identifier
Posted on Aug 31, 2007 9:51 pm

i also coded it better

M[n]M

Comments: 95

mIRC Snippet: Password Identifier
Posted on Sep 9, 2007 7:06 pm

btw its for bots?

mountaindew

Comments: 1,366

mIRC Snippet: Password Identifier
Posted on Sep 10, 2007 2:22 pm

uh...yea, what else would it be?

M[n]M

Comments: 95

mIRC Snippet: Password Identifier
Posted on Sep 22, 2007 10:18 am

lol

mountaindew

Comments: 1,366

mIRC Snippet: Password Identifier
Posted on Oct 5, 2007 5:13 pm

no more global variables, everything is now in an .ini file

Password Identifier

Introduction

Grab the Code

Comments

mountaindew

My Snippet Tags

Contact

Friends (41)

Sponsors

		United States
Last seen: Jul 04, 2008 Profile \| Website Friends (41) Snippets (28) Images (15) Products (8) Reviews (12) Comments Received (672) Comments Submitted (1366) Forum Posts (789)