Registration/Login/Disconnect Basic Script
Posted by Anthony
Saturday, March 22, 2008
Description: All commands are executed via Pm ( /query ). Put this script in a bot or something else to host it, then type /msg BotName help.
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;;;;By Anthony Dupont;;;;;;;;;;
;;;;;;;;;#Anthony;;;;;;;;;;;;;;;;
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
on *:TEXT:reg *:?:{
write C: $+ $2 $+ .txt $2 $3
msg $nick User created! Login name: $2 - Password: $3
msg $nick Type /msg $me auth <Login> <Password> to log!
set % $+ $2 Disconnect
}
on *:TEXT:auth *:?:{
if ($$2- == $read(C: $+ $2 $+ .txt)) {
msg $nick Succefully logged.
set % $+ $2 Logged
}
}
on *:TEXT:disconnect *:?:{
if ($$2- == $read(C: $+ $2 $+ .txt)) {
set % $+ $2 Disconnect
msg $nick You has been disconnected from account.
}
}
on *:TEXT:help:?:{
msg $nick To register; /msg $me reg <Account> <Password>
msg $nick To auth; /msg $me auth <Account> <Password>
msg $nick To disconnect; /msg $me disconnect <Account> <Password>
}
If you have any question, feel free to pm me at #anthony or just ask here =]
Oh also, the .txt of account is located in c: folder.
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;;;;By Anthony Dupont;;;;;;;;;;
;;;;;;;;;#Anthony;;;;;;;;;;;;;;;;
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
on *:TEXT:reg *:?:{
write C: $+ $2 $+ .txt $2 $3
msg $nick User created! Login name: $2 - Password: $3
msg $nick Type /msg $me auth <Login> <Password> to log!
set % $+ $2 Disconnect
}
on *:TEXT:auth *:?:{
if ($$2- == $read(C: $+ $2 $+ .txt)) {
msg $nick Succefully logged.
set % $+ $2 Logged
}
}
on *:TEXT:disconnect *:?:{
if ($$2- == $read(C: $+ $2 $+ .txt)) {
set % $+ $2 Disconnect
msg $nick You has been disconnected from account.
}
}
on *:TEXT:help:?:{
msg $nick To register; /msg $me reg <Account> <Password>
msg $nick To auth; /msg $me auth <Account> <Password>
msg $nick To disconnect; /msg $me disconnect <Account> <Password>
}
If you have any question, feel free to pm me at #anthony or just ask here =]
Oh also, the .txt of account is located in c: folder.