;;Clanbot Version 1.0 ;;Created By Technique aka Tech^_^ alias addowner { if (!$1) { echo -a Syntax: /addowner name halt } else { writeini database2.ini Admins $address($1,2) Owner echo -a Success: $1 has been added. } } alias loggedin { if ($readini(database2.ini,Loggedin,$address($nick,2))) { return $true } else { return $false } } alias admins { if ($readini(database2.ini,Admins,$address($nick,2))) { return $true } else { return $false } } alias deleteskeet { if ($readini(database.ini,Loggedin,%temp) == $true) { remini database.ini Loggedin %temp unset %temp msg $nick Success: %x has been deleted from the userlist. unset %x } else { unset %temp msg $nick Success: %x has been deleted from the userlist. unset %x halt } } alias startup { if (!$hget(Settings,Trigger)) { hadd -m Settings Trigger - echo -a Trigger database created. timertrig 0 2200 hsave Settings Trigger -o } if (!$hget(Commands)) { hmake Commands 10 echo -a Command database created. timercmds 0 1200 hsave Commands -o } } on *:START:{ echo -a Clanbot Version 1.0 Created By Technique echo -a Type /startup to create the database's. } on *:QUIT:{ hsave -o Settings Trigger hsave -o Commands } on *:TEXT:*:#sparx:{ if ($left($1,1) == $hget(Settings,Trigger)) { %com = $right($1,-1) if ($hget(Commands,%com)) { notice $nick $hget(Commands,%com) halt } if (!$hget(Commands,%com)) && (%com != addcmd) && (%com != delcmd) && (%com != editcmd) && (%com != settrigger) { notice $nick Error: Invalid Command. halt } if (%com == addcmd) { if ($nick isop $chan) { if ($admins($address($nick,2)) == $true) && ($loggedin($address($nick,2)) == $true) { if (!$3) { notice $nick Syntax: $1 [COMMAND] [VALUE] halt } if ($hget(Commands,$2)) || ($2 == addcmd) || ($2 == delcmd) || ($2 == editcmd) || ($2 == settrigger) { notice $nick Error: That command already exists. halt } else { hadd Commands $2- notice $nick Command successfully added. } halt } else { notice $nick Error: You are not an admin or you are not loggedin. halt } } else { notice $nick Error: You are not opped in $chan $+ . halt } } if (%com == delcmd) { if ($nick isop $chan) { if ($admins($address($nick,2)) == $true) && ($loggedin($address($nick,2)) == $true) { if (!$2) { notice $nick Syntax: $1 [COMMAND] halt } if (!$hget(Commands,$2)) { notice $nick Error: That command doesn't exist. halt } else { hdel Commands $2 notice $nick Command successfully deleted. } halt } else { notice $nick Error: You are not an admin or you are not loggedin. halt } } else { notice $nick Error: You are not opped in $chan $+ . halt } } if (%com == editcmd) { if ($nick isop $chan) { if ($admins($address($nick,2)) == $true) && ($loggedin($address($nick,2)) == $true) { if (!$3) { notice $nick Syntax: $1 [COMMAND] [VALUE] halt } if ($2 == addcmd) || ($2 == delcmd) || ($2 == editcmd) || ($2 == settrigger) { notice $nick Error: That command can't be edited. halt } if (!$hget(Commands,$2)) { notice $nick Error: That command doesn't exist. halt } else { hadd -m Commands $2- notice $nick Command successfully edited. } halt } else { notice $nick Error: You are not an admin or you are not loggedin. halt } } else { notice $nick Error: You are not opped in $chan $+ . halt } } if (%com == settrigger) { if ($nick isop $chan) { if ($admins($address($nick,2)) == $true) && ($loggedin($address($nick,2)) == $true) { if (!$2) { notice $nick Syntax: $1 [NEW TRIGGER] halt } if ($len($2) > 1) { notice $nick Error: The trigger can only be one character. halt } else { hadd -m Settings Trigger $2 notice $nick Success: Trigger successfully changed. } halt } else { notice $nick Error: You are not an admin or you are not loggedin. halt } } else { notice $nick Error: You are not opped in $chan $+ . halt } } } } on *:TEXT:*:?:{ if ($nick isop #sparx) { if ($1 == login) { if (!$readini(database2.ini,Admins,$address($nick,2))) { msg $nick Error: You are not on the userlist. halt } if ($readini(database2.ini,Loggedin,$address($nick,2)) == $true) { msg $nick Error: You are already loggedin. halt } else { writeini database2.ini Loggedin $address($nick,2) $true msg $nick Success: You have been loggedin. } } if ($1 == logout) { if (!$readini(database2.ini,Admins,$address($nick,2))) { msg $nick Error: You are not on the userlist. halt } if (!$readini(database2.ini,Loggedin,$address($nick,2))) { msg $nick Error: You are not loggedin. halt } else { remini database2.ini Loggedin $address($nick,2) msg $nick Success: You have been logged out. } } if ($1 == addadmin) { if ($admins($address($nick,2)) == $true) && ($loggedin($address($nick,2)) == $true) { if (!$2) { msg $nick Syntax: $1 [NAME] halt } if ($readini(database2.ini,Admins,$address($2,2))) { msg $nick Error: $2 is already on the userlist. halt } if ($2 !ison #chan) { msg $nick Error: $2 is not in #chan. msg $nick You can add $2 manualy by going to your mIRC Directory and opening the database2.ini file and add $2 $+ 's Hostmask under [Admins] halt } else { writeini database2.ini Admins $address($2,2) Admin msg $nick Success: $2 has been added to the userlist. } } else { msg $nick Error: You are not an admin or you are not loggedin. halt } } if ($1 == deladmin) { if ($admins($address($nick,2)) == $true) && ($loggedin($address($nick,2)) == $true) { if (!$2) { msg $nick Syntax: $1 [NAME] halt } if ($readini(database2.ini,Admins,$address($2,2)) == Owner) { msg $nick Error: $2 is an owner. halt } if (!$readini(database2.ini,Admins,$address($2,2))) { msg $nick Error: $2 is not on the userlist. halt } if ($2 !ison #chan) { msg $nick Error: $2 is not in #chan msg $nick You can add $2 manualy by going to your mIRC Directory and opening the database2.ini file and add $2 $+ 's Hostmask under [Admins] halt } else { remini database2.ini Admins $address($2,2) set %temp $address($2,2) set %x $2 deleteskeet } } else { msg $nick Error: You are not an admin or you are not loggedin. halt } } if ($1 == mystatus) { if ($admins($address($nick,2)) == $true) { if ($loggedin($address($nick,2)) == $true) { msg $nick Status: Loggedin. halt } else { msg $nick Status: Logged out. halt } else { msg $nick You are not an admin. } } } }