mIRCStorm V2.0.0 — File Browser
mIRCStormV2.0.0v2.0.0 / mIRCStormV2.0.0v2.0.0 / mIRCStormV2.0.0 / Scripts / dcc.mrc
dcc.mrc — 14.3 KB — Download this file
;mIRCStorm V2.0.0 - DCC.mrc
;
;Website: http://www.mIRCStorm.co.uk
;Author: Evil_Dave (Evil_Dave@mIRCStorm.co.uk)
;
;This script contains all the DCC Chat (Partyline)
;Commands and Code.
;========================================================
;=======================DCC.mrc==========================
;========================================================
on 1:SNOTICE:*:{
set %bot.dcc.server 1
while (%bot.dcc.server <= $calc(%bot.dcc.count + 20) ) {
if ( %bot.dcc.nick. [ $+ [ %bot.dcc.server ] ] == $null ) { inc %bot.dcc.server | /continue }
/msg = $+ %bot.dcc.nick. [ $+ [ %bot.dcc.server ] ] <<Server Notice>> $1-
inc %bot.dcc.server
}
unset %bot.dcc.server
}
on 1:CLOSE:=:{
/remini database\mircStorm.GID DCC $nick
if (%bot.dcc.count == 0) { halt }
set %bot.dcc.count [ %bot.dcc.count - 1 ]
set %bot.dcc.b 1
while (%bot.dcc.nick. [ $+ [ %bot.dcc.b ] ] != $nick ) {
inc %bot.dcc.b
}
unset %bot.dcc.nick. [ $+ [ %bot.dcc.b ] ]
if ( %bot.dcc.count > 0 ) {
set %bot.dcc.temp.3 1
while (%bot.dcc.temp.3 <= $calc(%bot.dcc.count + 20) ) {
if ( %bot.dcc.nick. [ $+ [ %bot.dcc.temp.3 ] ] == $null ) { inc %bot.dcc.temp.3 | /continue }
/msg = $+ %bot.dcc.nick. [ $+ [ %bot.dcc.temp.3 ] ] **** $nick Has Parted From The PartyLine.
inc %bot.dcc.temp.3
}
}
set %what *** $nick Has Parted From The PartyLine
/close -c $nick
halt
}
on 1:OPEN:=:{
if ($nick == $me) { /close -c $nick | /msg %bot.home Erm For Some Reason I Just DCC Chat With My Self | halt }
if ( %bot.dcc.count == 0 ) { unset %bot.dcc.nick.* }
set %bot.dcc.isin 1
while ( %bot.dcc.isin < 20 ) {
if ($nick == %bot.dcc.nick. [ $+ [ %bot.dcc.isin ] ] ) { /msg = $+ %bot.dcc.nick. [ $+ [ %bot.dcc.isin ] ] There is already a user in the botnet with your nickname. | /close -c2 $nick }
inc %bot.dcc.isin
}
unset %bot.dcc.isin
if ( %bot.dcc.count == 19 ) { /msg =$nick DCC Chat FULL. Max Number Of Users Connected | /close -c $nick }
/msg =$nick $me $+ : $readini database\mircstorm.ini Variables BlankLogo By Evil_Dave
/msg =$nick
/msg =$nick Enter Your Password $nick $+ :
.timerdcctimeout 1 40 /dcctimeout $nick
}
alias /dcctimeout {
if ($readini database\mircStorm.GID DCC $1 != Passed ) { /msg = $+ $1 TimeOut. DCC Session Closing.... | /close -c $1 | halt }
}
on 1:CHAT:*:{
if ($readini database\mircStorm.GID DCC $nick == Passed ) {
if ( $left($1,1) != . ) {
set %what $1-
/remote.botnettalk $nick $1-
if (%bot.dcc.echo == on) { /msg =$nick < $+ $nick $+ @ $+ $me $= > $1- }
set %bot.dcc.temp 1
while (%bot.dcc.temp <= $calc(%bot.dcc.count + 20) ) {
if ( %bot.dcc.nick. [ $+ [ %bot.dcc.temp ] ] == $null ) { inc %bot.dcc.temp | /continue }
if (%bot.dcc.nick. [ $+ [ %bot.dcc.temp ] ] == $nick) { inc %bot.dcc.temp | /continue }
/msg = $+ %bot.dcc.nick. [ $+ [ %bot.dcc.temp ] ] < $+ $nick $+ @ $+ $me $+ > $1-
inc %bot.dcc.temp
}
}
if ( $left($1,1) == . ) {
if ($1 == .version) { /msg =$nick $readini database\mircstorm.ini Variables BlankLogo By Evil_Dave, http://www.mIRCStorm.co.uk | set %bot.dcc.command .Version | set %bot.dcc.command.nick $nick | set %bot.dcc.command.chan DCC | /dcctalk | halt }
if ($1 == .whom) {
set %bot.dcc.command .Whom | set %bot.dcc.command.nick $nick | set %bot.dcc.command.chan DCC | /dcctalk
/msg =$nick Nick Bot Host
/msg =$nick ---------------------------------------------------------
set %bot.dcc.temp.4 1
while (%bot.dcc.temp.4 <= $calc(%bot.dcc.count + 20) ) {
set %bot.dcc.hostname.whom [ $address(%bot.dcc.nick. [ $+ [ %bot.dcc.temp.4 ] ] $+ ,3) ]
if ( %bot.dcc.nick. [ $+ [ %bot.dcc.temp.4 ] ] == $null ) { inc %bot.dcc.temp.4 | /continue }
/msg =$nick %bot.dcc.nick. [ $+ [ %bot.dcc.temp.4 ] ] $me %bot.dcc.hostname.whom
inc %bot.dcc.temp.4
}
/sockwrite linked* .REQUESTEDWHOM
halt
}
if ($1 == .+bot) {
if ($2 == $null) { /msg =$nick Add Who? Usage: .+bot <bot> <ip:port> | /msg =$nick E.G. .+bot Krond 127.0.0.1:4454 | halt }
if ($3 == $null) { /msg =$nick Add Where? Usage: .+bot <bot> <ip:port> | /msg =$nick E.G. .+bot Krond 127.0.0.1:4454 | halt }
/writeini database\mircStorm.botnet mircStorm $2 $3
/msg =$nick Added $2 With Address $3. Don't Forget About The .+autolink Command.
set %bot.dcc.command +Bot | set %bot.dcc.command.nick $nick | set %bot.dcc.command.chan DCC | /dcctalk
halt
}
if ($1 == .-bot) {
if ($2 == $null) { /msg =$nick Remove Who? Usage: .-bot <bot> | /msg =$nick E.G. .-bot Krond | halt }
/remini database\mircStorm.botnet mircStorm $2
/msg =$nick Removed $2 $+ .
halt
}
if ($1 == .unlink) {
if ($2 == $null) { /msg =$nick Unlink Who? Usage: .unlink <bot> | halt }
/msg =$nick This Will Be Working On Future Versions $readini database\mircstorm.ini Variables BlankLogo
halt
}
if ($1 == .link) {
if ($2 == $null) { /msg =$nick Link To Who? Usage: .link <bot> | halt }
set %bot.dcc.command Link $2 | set %bot.dcc.command.nick $nick | set %bot.dcc.command.chan DCC | /dcctalk
set %bot.botnet.link.nick $2
set %bot.botnet.nick $nick
/link
halt
}
if ($1 == .bottree) {
/msg =$nick This Will Be Working On Future Versions $readini database\mircstorm.ini Variables BlankLogo
}
if ($1 == .me) {
if ($2 == $null) { /msg =$nick Usage: .me <action> | halt }
set %bot.dcc.temp.me 1
while (%bot.dcc.temp.me <= $calc(%bot.dcc.count + 20) ) {
if ( %bot.dcc.nick. [ $+ [ %bot.dcc.temp.me ] ] == $null ) { inc %bot.dcc.temp.me | /continue }
/msg = $+ %bot.dcc.nick. [ $+ [ %bot.dcc.temp.me ] ] * $nick $2-
inc %bot.dcc.temp.me
}
halt
}
if ($1 == .quit) {
if ($2 == $null) { /msg =$nick Usage: .quit <message> | halt }
set %bot.dcc.temp.quit 1
while (%bot.dcc.temp.quit <= $calc(%bot.dcc.count + 20) ) {
if ( %bot.dcc.nick. [ $+ [ %bot.dcc.temp.quit ] ] == $null ) { inc %bot.dcc.temp.quit | /continue }
/msg = $+ %bot.dcc.nick. [ $+ [ %bot.dcc.temp.quit ] ] * $nick ( $2- )
inc %bot.dcc.temp.quit
set %bot.dcc.i 1
while (%bot.dcc.nick. [ $+ [ %bot.dcc.i ] ] != $nick ) {
inc %bot.dcc.i
}
unset %bot.dcc.nick. [ $+ [ %bot.dcc.i ] ]
if ( %bot.dcc.count > 0 ) {
set %bot.dcc.temp.7 1
while (%bot.dcc.temp.7 <= $calc(%bot.dcc.count + 20) ) {
if ( %bot.dcc.nick. [ $+ [ %bot.dcc.temp.7 ] ] == $null ) { inc %bot.dcc.temp.7 | /continue }
/msg = $+ %bot.dcc.nick. [ $+ [ %bot.dcc.temp.7 ] ] **** $nick Has Parted From The PartyLine.
inc %bot.dcc.temp.7
}
/remini database\mircStorm.GID DCC $nick
set %bot.dcc.count [ %bot.dcc.count - 1 ]
/close -c $nick
}
}
/remote.botnettalk *** $nick Has Parted The PartyLine
}
if ($1 == .rehash) {
if ($readini database\mircStorm.chan global $nick > 9) {
/msg =$nick Rehashing Bot.... | /msg =$nick | /saveini | /msg =$nick Reloading $mircdir $+ scripts\main.mrc | /msg =$nick Reloading $mircdir $+ scripts\popups.mrc
/msg =$nick Reloading $mircdir $+ scripts\login.mrc | /msg =$nick Reloading $mircdir $+ scripts\dcc.mrc | /msg =$nick Reloading $mircdir $+ scripts\commands.mrc | /msg =$nick Calculating Shortcuts And Dynamic Variables..
/msg =$nick | /msg =$nick ***REHASH COMPLETE***
set %bot.dcc.command Rehash | set %bot.dcc.command.nick $nick | set %bot.dcc.command.chan DCC | /dcctalk
/rehash
}
else { /msg =$nick Not Enough Access For .rehash }
halt
}
if ($1 == .restart ) {
if ($readini database\mircStorm.chan global $nick > 9) {
set %bot.dcc.command Restart | set %bot.dcc.command.nick $nick | set %bot.dcc.command.chan DCC | /dcctalk
/msg =$nick Bot Restarting.
set %bot.dcc.command Restart ( I Will Be Closing Down For Moment ) | set %bot.dcc.command.nick $nick | set %bot.dcc.command.chan DCC | /dcctalk
set %bot.temp.userhost.4 [ $address($nick,3) ]
/amsg Bot RESTARTING... Please Op Your Self. ( $nick ( %bot.temp.userhost.4 ) )
unset %bot.temp.userhost.4
.timer 1 10 /restart
halt
}
else { /msg =$nick Not Enough Access To .restart | halt }
}
if ($1 == .die ) {
if ($readini database\mircStorm.chan global $nick > 10) {
set %bot.dcc.command DIE | set %bot.dcc.command.nick $nick | set %bot.dcc.command.chan DCC | /dcctalk
/rehash.die
set %bot.lastcom Die | /saveini
/remini database\mircStorm.GID login
unset %bot.dcc.nick.*
set %bot.dcc.count 0
/remini database\mircStorm.GID DCC
.timer1 1 14 /exit
halt
}
else { /msg =$nick No Enough Access To .die | halt }
}
if ($1 == .echo ) {
if ($2 == $null) { /msg =$nick Invaild Command. Usage: .echo <on/off> | halt }
if ($2 == on) { set %bot.dcc.echo on | /msg =$nick DCC Chat Echo Is Now On. | halt }
if ($2 == off ) { unset %bot.dcc.echo | /msg =$nick DCC Chat Echo Is Now Off | halt }
else { /msg =$nick Invaild Command. Useage: .echo <on/off> | halt }
}
if ($1 == .backup ) {
if ($readini database\mircStorm.chan global $nick > 8) {
set %bot.dcc.command Backup | set %bot.dcc.command.nick $nick | set %bot.dcc.command.chan $chan | /dcctalk
/copy -o aliases.ini Backup\aliases.backup
/copy -o database\mircstorm.chan Backup\chan.backup
/copy -o database\mircstorm.user Backup\user.backup
/copy -o database\mircstorm.GID Backup\GID.backup
/copy -o remote.ini Backup\vars.backup
/msg =$nick Backing Up Files To /Backup/<file>.backup
/msg %bot.home Backing Up Files To /Backup/<file>.backup ( $nick )
set %last.com Backup By $nick
halt
}
else { /msg =$nick Not Enough Access To .backup | halt }
}
if ($1 == .jump ) {
if ($readini database\mircStorm.chan global $nick > 8) {
if ($2 == $null) { /msg =$nick Jump To Where? Usage: .jump <server> (port) | halt }
if ($3 == $null) { /msg =$nick Jumping Servers ( $+ $2 $+ ) | quit Changing Servers | /server $2 %bot.port | .timer -o 1 80 /connect.check | halt }
else { /msg =$nick Jumping Servers ( $+ $2 $3 $+ ) | quit Changing Servers | /server $2 $3 | .timer 1 80 /connect.check | set %bot.dcc.command Jump | set %bot.dcc.command.nick $nick | set %bot.dcc.command.chan DCC | /dcctalk | halt }
}
}
if ( $1 == .motd ) {
if ($exists($mircdir/motd.txt)) { /play =$nick motd.txt 0 | set %bot.dcc.command MOTD | set %bot.dcc.command.nick $nick | set %bot.dcc.command.chan DCC | /dcctalk }
else { /msg =$nick The MOTD File Is Missing, Place a MOTD.txt In The Main Dir To Create One }
halt
}
if ( $1 == .whois ) {
if ($2 == $null) { /msg =$nick Invaild Command. Usage: .whois <nick> | halt }
set %bot.dcc.command Whois $2 | set %bot.dcc.command.nick $nick | set %bot.dcc.command.chan DCC | /dcctalk
if ( [ $read -w* [ $+ [ $2 ] ] $+ * database/mircStorm.chan ] == $null ) { /msg =$nick $2 Is NOT Added To Me. | halt }
set %bot.temp.access $readini database\mircStorm.chan global $2 | /accessfind
if (%bot.access.level == $null) { set %bot.access.level NONE }
/msg =$nick $2 Has A GLOBAL Access Level Of: %bot.access.level
set %bot.dcc.temp.whois 1
while (%bot.dcc.temp.whois <= %bot.max.chan) {
if (%bot.channel. [ $+ [ %bot.dcc.temp.whois ] ] == $null) { inc %bot.dcc.temp.whois 1 | /continue }
if ($readini database\mircStorm.chan %bot.channel. [ $+ [ %bot.dcc.temp.whois ] ] $2 != $null) {
/msg =$nick $2 Has Access on %bot.channel. [ $+ [ %bot.dcc.temp.whois ] ] of $readini database\mircStorm.chan %bot.channel. [ $+ [ %bot.dcc.temp.whois ] ] $2
}
inc %bot.dcc.temp.whois 1
}
halt
}
;here for new stuff :P
if ($1 == .help ) {
if ($2 == $null ) { /dcchelp $nick }
else { set %bot.dcc.help.nick $nick | set %bot.dcc.help.what $2 | /bot.dcc.help.subject }
halt
}
if (($1 == .autoop) || ($1 == .autovoice )) { halt }
/msg = $+ $nick What? You Need .help ?
}
}
else {
set %bot.dcc.uerhost $address($nick,3)
set %bot.dcc.encode $md5($1,0)
if ( $readini database\mircStorm.GID mircstorm %bot.dcc.uerhost == %bot.dcc.encode ) {
/msg =$nick **** Password Correct.
/clearall
if ($exists($mircdir/motd.txt)) { set %bot.dcc.join.play 1 | /play =$nick motd.txt 0 }
if ( %bot.dcc.count == 0 ) {
/remote.botnettalk *** $nick Has Joined The PartyLine
/msg =$nick *** You Have Joined The Party Line. You Are The Only User On This Bot ***
}
/writeini -n database\mircStorm.GID DCC $nick Passed
unset %bot.dcc.encode
unset %bot.dcc.uerhost
set %bot.dcc.count [ %bot.dcc.count + 1 ]
set %bot.dcc.a 1
while (%bot.dcc.nick. [ $+ [ %bot.dcc.a ] ] != $null) {
inc %bot.dcc.a
}
if ( %bot.dcc.nick. [ $+ [ %bot.dcc.a ] ] == $null ) { set %bot.dcc.nick. [ $+ [ %bot.dcc.a ] ] $nick }
if ( %bot.dcc.count > 1 ) {
set %bot.dcc.temp.2 1
/remote.botnettalk *** $nick Has Joined The PartyLine
while (%bot.dcc.temp.2 <= $calc(%bot.dcc.count + 20)) {
/msg = $+ %bot.dcc.nick. [ $+ [ %bot.dcc.temp.2 ] ] *** $nick Has Joined The Partyline. ***
inc %bot.dcc.temp.2
}
}
}
else { /msg =$nick Password Wrong ... Closing.. | /msg %bot.home $nick Entered A Incorrect Password For DCC Chat. | .timer 1 2 /close -c $nick }
}
} // end on chat