1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
|
pcw.script - By BenSax
.Users
..OWNER
...Add owner:auser MASTER $?="Enter owners address (*!*@)" | writeini pcw.script owners $?="Enter owners nickname" $?="Enter owners password"
...Delete owner:ruser MASTER $?="Enter owners address (*!*@) | remini pcw.script owners $?="Enter owners nickname"
..ADMIN
...Add a admin:auser ADMIN $?="Enter owners address (*!*@)" | writeini pcw.script admins $?="Enter admins nickname" $?="Enter admins password"
...Delete a admin:ruser ADMIN $?="Enter admins address(*!*@)" | remini pcw.script admins $?="Enter admins nickname"
..USER
...Add a user:auser USER $?="Enter users address (*!*@) | writeini pcw.script users $?="Enter users nickname" $?="Enter users password"
...Delete a user:ruser USER $?="Enter users address(*!*@) | remini pcw.script users $?="Enter users nickname" $?="Enter users password"
.Auth
..My Auth:writeini pcw.script auth name $?="Enter the authname." | writeini pcw.script auth password $?*="Enter the password"
..Auth now:{
if ($readini(pcw.script, auth, name) != $null) && ($readini(pcw.script, auth, password) != $null) {
msg Q@CServe.quakenet.org AUTH $readini(pcw.script, auth, name) $readini(pcw.script, auth, password)
}
}
else { echo -ag YOU HAVE TO SET UP MY AUTHNAME AND PASSWORD } |