on *:text:!register &:?: { write users.txt $nick $2 } on *:text:!login &:?: { if ($read(users.txt,s,$nick) == $2) { commands to mark user as logged in (variable maybe) } }