mIRCStorm V2.0.0 — File Browser
mIRCStormV2.0.0v2.0.0 / mIRCStormV2.0.0v2.0.0 / mIRCStormV2.0.0 / Scripts / alias.mrc
alias.mrc — 24.02 KB — Download this file
/botsclose {
/echo 8Closing Open Botnet Required All Ports...
.sockclose *
var %bot.botnet.ip $readini database\mircstorm.ini Botnet IP
var %bot.botnet.port $readini database\mircstorm.ini Botnet Port
if ((%bot.botnet.ip == $null) || (%bot.botnet.port == $null)) { halt }
/echo 8Opening mIRCStorm Botnet Ports On %bot.botnet.ip %bot.botnet.port
/socklisten -d %bot.botnet.ip Connection %bot.botnet.port
/echo 8Now Listening For mIRCStorm Botnet Connections.
}
/backup.check {
if ($readini Database\mIRCStorm.ini Variables BackupSchedule == hourly) {
if ($readini Database\mIRCStorm.ini Variables BackupTodaysDate == $null) { .writeini Database\mIRCStorm.ini Variables BackupTodaysDate $calc($asctime(HH)-1) }
if ($readini Database\mIRCStorm.ini Variables BackupDoneHourlyBefore != 1) {
writeini Database\mIRCStorm.ini Variables BackupDoneHourlyBefore 1
.remini Database\mIRCStorm.ini Variables BackupDoneDailyBefore | .remini Database\mIRCStorm.ini Variables BackupDoneWeeklyBefore
writeini Database\mIRCStorm.ini Variables BackupTodaysDate $calc($asctime(HH)-1)
}
;Comparing $readini Database\mIRCStorm.ini Variables BackupTodaysDate and $asctime(HH)
if ($readini Database\mIRCStorm.ini Variables BackupTodaysDate < $asctime(HH)) { writeini Database\mIRCStorm.ini Variables BackupTodaysDate $asctime(HH) | /backup 1 }
else { set %bot.dcc.command Current Backup Is Up To Date | set %bot.dcc.command.nick $me | unset %bot.dcc.command.chan | /dcctalk }
}
if ($readini Database\mIRCStorm.ini Variables BackupSchedule == daily) {
if ($readini Database\mIRCStorm.ini Variables BackupTodaysDate == $null) { writeini Database\mIRCStorm.ini Variables BackupTodaysDate $calc($asctime(dd)-1) }
if ($readini Database\mIRCStorm.ini Variables BackupDoneDailyBefore != 1) {
writeini Database\mIRCStorm.ini Variables BackupDoneDailyBefore 1
.remini Database\mIRCStorm.ini Variables BackupDoneHourlyBefore | .remini Database\mIRCStorm.ini Variables BackupDoneWeeklyBefore
writeini Database\mIRCStorm.ini Variables BackupTodaysDate $calc($asctime(dd)-1)
}
if ($readini Database\mIRCStorm.ini Variables BackupTodaysDate < $asctime(dd)) { writeini Database\mIRCStorm.ini Variables BackupTodaysDate $asctime(dd) | /backup 1 }
else { set %bot.dcc.command Current Backup Is Up To Date | set %bot.dcc.command.nick $me | unset %bot.dcc.command.chan | /dcctalk }
}
if ($readini Database\mIRCStorm.ini Variables BackupSchedule == weekly) {
if ($readini Database\mIRCStorm.ini Variables BackupDoneweeklyBefore != 1) {
writeini Database\mIRCStorm.ini Variables BackupDoneweeklyBefore 1
.remini Database\mIRCStorm.ini Variables BackupDoneHourlyBefore | .remini Database\mIRCStorm.ini Variables BackupDoneDailyBefore
writeini Database\mIRCStorm.ini Variables BackupTodaysDate $day
}
if ($readini Database\mIRCStorm.ini Variables BackupTodaysDate == $null) { writeini Database\mIRCStorm.ini Variables BackupTodaysDate $day }
if ($readini Database\mIRCStorm.ini Variables BackupTodaysDate == $day) { writeini Database\mIRCStorm.ini Variables BackupTodaysDate $day | /backup 1 }
else { set %bot.dcc.command Current Backup Is Up To Date | set %bot.dcc.command.nick $me | unset %bot.dcc.command.chan | /dcctalk }
}
}
/autoop2 {
if (($readini database\mircstorm.chan $2 $1 > 5) && ($readini database\mircstorm.user users $1 == $address($1,3))) { /mode $2 +o $1 }
}
/autovoice2 {
if (($readini database\mircstorm.chan $2 $1 = 5) && ($readini database\mircstorm.user users $1 == $address($1,3))) { /mode $2 +v $1 }
}
/set.channel.modes {
if ($left($1,1) != $chr(35)) { halt }
if (!$readini database\mircstorm.ini DefualtModes Peak) { unset %bot.peak. [ $+ [ $1 ] ] }
else { set %bot.peak. [ $+ [ $1 ] ] 1 }
if (!$readini database\mircstorm.ini DefualtModes AutoOp) { unset %bot.autoop. [ $+ [ $1 ] ] }
else { set %bot.autoop. [ $+ [ $1 ] ] 1 }
if ($readini database\mircstorm.ini DefualtModes Log) { /log on $1 | set %bot.log. [ $+ [ $1 ] ] 1 }
else { /log off $chan | unset %bot.log. [ $+ [ $1 ] ] }
if (!$readini database\mircstorm.ini DefualtModes AutoVoice) { unset %bot.autovoice. [ $+ [ $1 ] ] }
else { set %bot.autovoice. [ $+ [ $1 ] ] 1 }
if (!$readini database\mircstorm.ini DefualtModes VoiceAll) { unset %bot.voiceall. [ $+ [ $1 ] ] }
else { set %bot.voiceall. [ $+ [ $1 ] ] 1 }
if (!$readini database\mircstorm.ini DefualtModes NoColour) { unset %bot.nocolour. [ $+ [ $1 ] ] }
else { set %bot.nocolour. [ $+ [ $1 ] ] 1 }
if (!$readini database\mircstorm.ini DefualtModes SwearKick) { unset %bot.swearkick. [ $+ [ $1 ] ] }
else { set %bot.swearkick. [ $+ [ $1 ] ] 1 }
if (!$readini database\mircstorm.ini DefualtModes PunishOps) { unset %bot.PunishOps. [ $+ [ $1 ] ] }
else { set %bot.PunishOps. [ $+ [ $1 ] ] 1 }
if ($readini database\mircstorm.ini DefualtModes Logon) { set %bot.displaylogin 1 }
else { unset %bot.displaylogin }
set %bot.protect.flood.secs. [ $+ [ $1 ] ] $readini database\mircstorm.ini DefualtModes FloodLines
set %bot.protect.flood.lines. [ $+ [ $1 ] ] $readini database\mircstorm.ini DefualtModes FloodSecs
set %bot.protect.notice.secs. [ $+ [ $1 ] ] $readini database\mircstorm.ini DefualtModes FloodNoticeLines
set %bot.protect.notice.lines. [ $+ [ $1 ] ] $readini database\mircstorm.ini DefualtModes FloodNoticeSecs
}
/update {
set %bot.update.while 1
while ($read -l [ $+ [ %bot.update.while ] ] Database\mircstorm.updates != $null) {
;/echo reading: $read -l [ $+ [ %bot.update.while ] ] Database\mircstorm.updates
;/echo got: $gettok($read -l [ $+ [ %bot.update.while ] ] Database\mircstorm.updates,1,58)
if ($gettok($read -l [ $+ [ %bot.update.while ] ] Database\mircstorm.updates,1,58) == bot) {
/echo got the bot: $gettok($read -l [ $+ [ %bot.update.while ] ] Database\mircstorm.updates,2,58) Comapre to: $readini database\mircstorm.ini Version Version
if ($gettok($read -l [ $+ [ %bot.update.while ] ] Database\mircstorm.updates,2,58) > $readini database\mircstorm.ini Version Version ) {
write Database\list.updates $read -l [ $+ [ %bot.update.while ] ] Database\mircstorm.updates
set %bot.update.found 1 | did -h updates 7 | did -v updates 10 | did -v updates 18 | break
}
}
if ($gettok($read -l [ $+ [ %bot.update.while ] ] Database\mircstorm.updates,1,58) == subversion) {
/echo got the subversion! $gettok($read -l [ $+ [ %bot.update.while ] ] Database\mircstorm.updates,2,58) Comapre to: $readini database\mircstorm.ini Version SubVersion
if ($gettok($read -l [ $+ [ %bot.update.while ] ] Database\mircstorm.updates,2,58) > $readini database\mircstorm.ini Version SubVersion ) {
write Database\list.updates $read -l [ $+ [ %bot.update.while ] ] Database\mircstorm.updates
set %bot.update.found 1 | did -h updates 7 | did -v updates 11 | did -v updates 16 | did -v updates 17 | break
}
}
if ($gettok($read -l [ $+ [ %bot.update.while ] ] Database\mircstorm.updates,1,58) == beta) {
/echo got the beta! $gettok($read -l [ $+ [ %bot.update.while ] ] Database\mircstorm.updates,2,58) Comapre to: $readini database\mircstorm.ini Version Beta
if ($gettok($read -l [ $+ [ %bot.update.while ] ] Database\mircstorm.updates,2,58) > $readini database\mircstorm.ini Version Beta ) {
write Database\list.updates $read -l [ $+ [ %bot.update.while ] ] Database\mircstorm.updates
set %bot.update.found 1 | did -h updates 7 | did -v updates 11 | did -v updates 16 | did -v updates 17 | break
}
}
inc %bot.update.while 1
}
if (!%bot.update.found) { did -h updates 7 | did -v updates 9 | did -v updates 1 }
unset %bot.update.while | unset %bot.update.found
if ($exists(Database\mircstorm.updates)) { .remove Database\mircstorm.updates }
if ($exists(Database\list.updates)) { .remove Database\list.updates }
set %bot.update.connection UpdateWorked!
halt
}
/logout2 {
if ($1 ison %bot.home) { set %bot.dcc.command AUTO-LOGOUT Stopped, User Found Still In Home Channel. | set %bot.dcc.command.nick $1 | unset %bot.dcc.command.chan | /dcctalk | halt }
set %bot.logout.count [ %bot.chan.count + 10 ]
set %bot.opbots.loop1 1
while (%bot.opbots.loop1 < %bot.logout.count ) {
if ($1 ison %bot.channel. [ $+ [ %bot.opbots.loop1 ] ] ) { set %bot.dcc.command AUTO-LOGOUT Stopped, User Found Still In %bot.channel. [ $+ [ %bot.opbots.loop1 ] ] $+ . | set %bot.dcc.command.nick $1 | unset %bot.dcc.command.chan | /dcctalk | halt }
inc %bot.opbots.loop1
}
/remini database\mircStorm.GID login $2
set %bot.dcc.command AUTO-LOGOUT | set %bot.dcc.command.nick $1 | unset %bot.dcc.command.chan | /dcctalk
}
/noops {
if ( $me !isop $1 ) { /msg $1 Status: No Op's (@) }
else { return 0 }
}
/opbots.2 {
set %bot.opbots.loop.home 1
while ( $nick(%bot.home,%bot.opbots.loop.home) != $null ) {
if (( $readini database\mircstorm.chan %bot.home $nick(%bot.home,%bot.opbots.loop.home) == 4 ) || ( $readini database\mircstorm.chan %bot.home $nick(%bot.home,%bot.opbots.loop.home) == 3 )) {
set %bot.autoop.host $address($nick(%bot.home,%bot.opbots.loop.home),3)
if ( $readini database\mircstorm.user Users $nick(%bot.home,%bot.opbots.loop.home) == %bot.autoop.host ) {
if ($readini database\mircstorm.chan %bot.home $nick(%bot.home,%bot.opbots.loop.home) == 3) { /mode %bot.home +v $nick(%bot.home,%bot.opbots.loop.home) }
if ($readini database\mircstorm.chan %bot.home $nick(%bot.home,%bot.opbots.loop.home) == 4) { /mode %bot.home +o $nick(%bot.home,%bot.opbots.loop.home) }
}
}
inc %bot.opbots.loop.home
}
set %bot.chan.count.opbots [ %bot.chan.count + 10 ]
set %bot.opbots.loop1 1
while (%bot.opbots.loop1 < %bot.chan.count.opbots ) {
set %bot.opbote.chan %bot.channel. [ $+ [ %bot.opbots.loop1 ] ]
set %bot.opbots.loop2 1
while ( $nick(%bot.opbote.chan,%bot.opbots.loop2) != $null ) {
if (( $readini database\mircstorm.chan %bot.opbote.chan $nick(%bot.opbote.chan,%bot.opbots.loop2) == 3 ) || ( $readini database\mircstorm.chan %bot.opbote.chan $nick(%bot.opbote.chan,%bot.opbots.loop2) == 4 )) {
set %bot.autoop.host $address($nick(%bot.opbote.chan,%bot.opbots.loop2),3
if ( $readini database\mircstorm.user Users $nick(%bot.opbote.chan,%bot.opbots.loop2) == %bot.autoop.host ) {
if ($readini database\mircstorm.chan %bot.opbote.chan $nick(%bot.opbote.chan,%bot.opbots.loop2) == 3) { /mode %bot.opbote.chan +v $nick(%bot.opbote.chan,%bot.opbots.loop2) }
if ($readini database\mircstorm.chan %bot.opbote.chan $nick(%bot.opbote.chan,%bot.opbots.loop2) == 4) { /mode %bot.opbote.chan +o $nick(%bot.opbote.chan,%bot.opbots.loop2) }
}
}
inc %bot.opbots.loop2
}
inc %bot.opbots.loop1
}
}
/bantypes {
/notice %bot.bantype.nick Ban Types | /notice %bot.bantype.nick | /notice %bot.bantype.nick B1 : 1 Hour | /notice %bot.bantype.nick B2 : 6 Hours
/notice %bot.bantype.nick B3 : 24 Hours | /notice %bot.bantype.nick B4 : 3 Days | /notice %bot.bantype.nick B5 : 7 Days | /notice %bot.bantype.nick Perm : Perm Ban
}
/dcctalk {
/write modes.log $chr(91) $+ $date $time $+ $chr(93) ! $+ %bot.dcc.command.nick $+ %bot.dcc.command.chan $+ ! %bot.dcc.command
if ( %bot.dcc.count > 0 ) {
set %bot.dcc.temp.0 1
while (%bot.dcc.temp.0 <= $calc(%bot.dcc.count + 20) ) {
if ( %bot.dcc.nick. [ $+ [ %bot.dcc.temp.0 ] ] == $null ) { inc %bot.dcc.temp.0 | /continue }
/msg = $+ %bot.dcc.nick. [ $+ [ %bot.dcc.temp.0 ] ] ! $+ %bot.dcc.command.nick $+ %bot.dcc.command.chan $+ ! %bot.dcc.command
inc %bot.dcc.temp.0
}
unset %bot.dcc.command | unset %bot.dcc.command.nick | unset %bot.dcc.command.chan
}
}
/accesslevelrequest {
.notice %bot.temp.levels.access.request Global Access Levels:
.notice %bot.temp.levels.access.request
.notice %bot.temp.levels.access.request Full: Full Access User
.notice %bot.temp.levels.access.request Owner: Global Owner
.notice %bot.temp.levels.access.request Master: Global Master
.notice %bot.temp.levels.access.request Op: Global Op
.notice %bot.temp.levels.access.request
.notice %bot.temp.levels.access.request Channel Access Levels:
.notice %bot.temp.levels.access.request
.notice %bot.temp.levels.access.request ChanOwner: Channel Owner
.notice %bot.temp.levels.access.request ChanMaster: Channel Master
.notice %bot.temp.levels.access.request ChanOp: Channel Op
.notice %bot.temp.levels.access.request ChanVoice: Channel Voice
.notice %bot.temp.levels.access.request OpBot: Channel Bot (Auto-Op)
.notice %bot.temp.levels.access.request VoiceBot: Channel Bot (Auto-Voice)
.notice %bot.temp.levels.access.request
.notice %bot.temp.levels.access.request -End
unset %bot.temp.levels.access.request
}
/commonrooms {
set %bot.common
set %bot.commom.while 1
while ( $comchan(%bot.common.room,%bot.commom.while) != $null) {
if (%commom.while == 1 ) { set %bot.common $comchan(%bot.common.room,%bot.commom.while) $+ , }
else { set %bot.common [ %bot.common $comchan(%bot.common.room,%bot.commom.while) ] }
inc %bot.commom.while
}
timer 1 4 unset %bot.commo*
}
/getloopy2 {
set %bot.loop.1.users 1
set %bot.loop.count.users 0
while ( $nick(%bot.temp.chan,%bot.loop.1.users) != $null ) {
inc %bot.loop.count.users
inc %bot.loop.1.users
}
unset %bot.temp.chan
}
/getloopy {
set %bot.loop.1 1
set %bot.loop.count 0
while ( $nick(%bot.temp.chan,%bot.loop.1) isop %bot.temp.chan ) {
inc %bot.loop.count
inc %bot.loop.1
}
unset %bot.temp.chan
}
/reverseaccessfind {
if ($1 == voicebot) { return 3 }
if ($1 == opbot) { return 4 }
if ($1 == chanvoice) { return 5 }
if ($1 == chanop) { return 6 }
if ($1 == chanmaster) { return 7 }
if ($1 == chanowner) { return 8 }
if ($1 == op) { return 9 }
if ($1 == master) { return 10 }
if ($1 == owner) { return 11 }
if ($1 == full) { return 100 }
else { return 0 }
}
/accessfindchannel {
unset %bot.access.level.chan
if ( $1 == 3 ) { set %bot.access.level.chan ChanBot (Auto-Voice) } | if ( $1 == 4 ) { set %bot.access.level.chan ChanBot (Auto-Op) }
if ( $1 == 5 ) { set %bot.access.level.chan Channel Voice } | if ( $1 == 6 ) { set %bot.access.level.chan Channel Op }
if ( $1 == 7 ) { set %bot.access.level.chan Channel Maser } | if ( $1 == 8 ) { set %bot.access.level.chan Channel Owner }
}
/accessfindglobal {
unset %bot.access.level
if ( $1 == 9 ) { set %bot.access.level Global Op (Member Of %bot.home Group) | return }
if ( $1 == 10 ) { set %bot.access.level Global Master (Member Of %bot.home Group) | return } | if ( $1 == 11 ) { set %bot.access.level Global Owner (Member Of %bot.home Group) | return }
if ( $1 == 100 ) { set %bot.access.level Full Access User ( Bot Onwer ) | return }
}
/reset {
if ($?!="Are You Sure You Want To Reset Your BOT. ALL Data Will Be Lost, Channels, Users All Will Have To Be ReAdded. ") {
/remove database\ [ $+ [ %bot.home ] ] $+ .onjoin
set %bot.reset.temp 1
while (%bot.reset.temp <= %bot.max.chan) {
/remove database\ [ $+ [ %bot.channel. [ $+ [ %bot.reset.temp ] ] ] ] $+ .onjoin
/remove database\ [ $+ [ %bot.channel. [ $+ [ %bot.reset.temp ] ] ] ] $+ .userlist
inc %bot.reset.temp
}
unset %bot.reset.temp
.remove database\userlist. [ $+ [ %bot.home ] ]
.remove database\mircstorm.chan | .remove database\mircstorm.user | .remove database\userlist.global
.remove database\mircstorm.GID | .remove modes.log | .remove database\data.seen | .remove database\mircStorm.botnet
.remove database\mircstorm.ini
unset %bot*
.writeini -n database\mircstorm.chan mIRCStorm ChannelFile By Evil_Dave
.writeini -n database\mircstorm.user mIRCStorm UsersFile By Evil_Dave
.writeini -n database\mircstorm.GID mIRCStorm MaskFile By Evil_Dave
.remove remote.ini
/echo $active $readini database\mircstorm.ini Variables Logo2 8Bot Reset.
.restart
}
}
/rehash {
.raw on
set %bot.shortcut.1eft $left(%bot.nick,1)
set %bot.shortcut.right $right(%bot.nick,1)
set %bot.shortcut.1 [ %bot.shortcut.1eft ] $+ [ %bot.shortcut.right ]
unset %bot.shortcut.1eft | unset %bot.shortcut.right
set %bot.shortcut.1eft $left(%bot.nick.2,1)
set %bot.shortcut.right $right(%bot.nick.2,1)
set %bot.shortcut.2 [ %bot.shortcut.1eft ] $+ [ %bot.shortcut.right ]
unset %bot.shortcut.1eft | unset %bot.shortcut.right
set %bot.shortcut.3 %bot.nick
set %bot.shortcut.4 ***
writeini database\mircstorm.ini Variables BlankLogo *mIRCStorm V2.0.0*
.strip -burc | .ial on
/system.check
if ( $result == 1 ) {
/echo $active 8Reloading files.... Please Wait ....
.reload -rv remote.ini | .reload -rs scripts/main2.mrc | .reload -rs scripts/popups.mrc | .reload -rs scripts/login.mrc | .reload -rs scripts/dcc.mrc | .reload -rs scripts/protections.mrc
.reload -rs scripts/CommandSource.mrc | .reload -rs scripts/botnet.mrc | .reload -rs scripts/CommandTriggers.mrc
/echo $active 8Files Reloaded.
/echo $active $readini database\mircstorm.ini Variables Logo2 8Bot Reponsding To:10 %bot.shortcut.1 $+ , %bot.shortcut.2 And %bot.shortcut.3
.nick %bot.nick
/echo $active $readini database\mircstorm.ini Variables Logo2 8Bot ReHashed.
if ($readini Database\mircstorm.ini Variables BotCount == 1) { /echo $readini database\mircstorm.ini Variables Logo2 8Bot Restarting To Take In New Affects. Bot Should Connect. | timer 1 12 /restart | halt }
.msg %bot.home $readini database\mircstorm.ini Variables Logo2 1Bot Was Successfully Rehashed.
.join %bot.home
/bot.chan
.remini database\mircStorm.GID login
}
else { /echo $active $readini database\mircstorm.ini Variables Logo2 10ERROR IN REHASH. RESTARTING BOT IN ATTEMPT TO REPAIR. | timer 1 10 /restart | /amsg $readini database\mircstorm.ini Variables Logo2 10ERROR DETECTED... RESTARTING BOT.... | halt }
}
/removechannel {
:remchannels
if (%bot.channel. [ $+ [ %bot.chan.temp ] ] == %bot.c.temp) { /unset %bot.channel. [ $+ [ %bot.chan.temp ] ] | halt }
if (%bot.chan.temp > 21) { halt }
inc %bot.chan.temp 1
goto remchannels
}
/setchannel {
set %bot.chan.temp 1
:channels
if (%bot.channel. [ $+ [ %bot.chan.temp ] ] == $null) { /set %bot.channel. [ $+ [ %bot.chan.temp ] ] %bot.c.temp | halt }
inc %bot.chan.temp 1
goto channels
}
/set.network set %bot.connect.temp $network
/retry {
if ($?!="There Is An Error With SetUp. Ensure Everything Is Filled In And Correctly. NOTE: You MUST Have TWO Servers Listed Would You Like To Retry?") {
/dialog -x setup setup Setup | /dialog -rm setup setup Setup | halt
}
else { /dialog -x setup setup Setup | /echo $active $readini database\mircstorm.ini Variables Logo2 8BOT CLOSING.... MAIN SETUP MUST BE FILLED OUT CORRECTLY TO START BOT. $readini database\mircstorm.ini Variables Logo | /unset %bot* | timer 1 4 /exit }
}
/bot.chan {
var %bot.9 1
while (%bot.9 <= 20) {
if (%bot.channel. [ $+ [ %bot.9 ] ] != $null) { /join %bot.channel. [ $+ [ %bot.9 ] ] | set %bot.dcc.command Joining Channel | set %bot.dcc.command.nick %bot.channel. [ $+ [ %bot.9 ] ] | /dcctalk }
inc %bot.9 1
}
timer 1 15 /Bot.PerformAfter
}
/Bot.PerformAfter {
var %bot.chan.after 1
while (%bot.chan.after <= 20) {
if ($readini database\mircstorm.ini PerformAfter %bot.chan.after != $null) { [ / $+ [ $readini database\mircstorm.ini PerformAfter %bot.chan.after ] ] }
inc %bot.chan.after 1
}
}
Bot.PerformBefore {
var %bot.chan.before 1
while (%bot.chan.before <= 20) {
if ($readini database\mircstorm.ini PerformBefore %bot.chan.before != $null) { [ / $+ [ $readini database\mircstorm.ini PerformBefore %bot.chan.before ] ] }
inc %bot.chan.before 1
}
}
/connect.check {
/clear $active
inc %bot.hour.check 1
/echo $active $readini database\mircstorm.ini Variables Logo2 7Carrying Out Hourly Online Check...... ( $+ %bot.hour.check $+ )
/close -mi
if ($status != connected) { /getconnected }
else { /echo $active $readini database\mircstorm.ini Variables Logo2 7Bot Connected to $network $+ . $readini database\mircstorm.ini Variables Logo }
}
/botreponse {
if ( $readini Database\mircstorm.ini Variables BotCount == 2 ) { timer 1 4 /msg %bot.home Bot Reponding To %bot.shortcut.1 $+ , %bot.shortcut.2 And %bot.shortcut.3 }
/mode $me +xBi
}
/setup /dialog -m setup setup Setup
/getconnected {
if ($status != connected) {
if ($readini database\mircstorm.ini Variables Port == $null) { writeini database\mircstorm.ini Variables Port 6667 }
if (%bot.server.number == $null) { set %bot.server.number 1 }
while ($readini database\mircstorm.ini Variables Server [ $+ [ %bot.server.number ] ] == $null) {
if (%bot.server.number == 14) { /echo 8all servers attempted | set %bot.server.number 0 }
inc %bot.server.number 1
}
/server $readini database\mircstorm.ini Variables Server [ $+ [ %bot.server.number ] ] $readini database\mircstorm.ini Variables Port
.timer -o 1 %bot.timeout /getconnected2
set %bot.get.timeout $calc(%bot.timeout / 60)
.echo $active 8Could Not Connect... Trying Next... | .echo $active 8Server: $readini database\mircstorm.ini Variables Server [ $+ [ %bot.server.number ] ] ( $+ $readini database\mircstorm.ini Variables Port $+ ) ... Time Out At %bot.get.timeout Min(s)
}
}
/getconnected2 {
inc %bot.connected.count 1
inc %bot.server.number 1
/getconnected
}
/restart {
unset %bot.dcc.nick.*
/echo $readini database\mircstorm.ini Variables Logo2 14Bot Restarting.... Please Wait... $readini database\mircstorm.ini Variables Logo
/remini database\mircStorm.GID login | set %last.com Restart
unset %bot.dcc.nick.*
set %bot.dcc.count 0
/remini database\mircStorm.GID DCC | .remove mIRCStorm.pid
set %bot.lastcom Restart | /saveini | .timer0 1 1 /run $nopath($mircexe) | .timer1 1 1 /exit
}
/dieing {
/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 -o 1 14 /exit
}
/rehash.die {
set %bot.shortcut.1eft $left(%bot.nick,1)
set %bot.shortcut.right $right(%bot.nick,1)
set %bot.shortcut.1 [ %bot.shortcut.1eft ] $+ [ %bot.shortcut.right ]
unset %bot.shortcut.1eft | unset %bot.shortcut.right
set %bot.shortcut.1eft $left(%bot.nick.2,1)
set %bot.shortcut.right $right(%bot.nick.2,1)
set %bot.shortcut.2 [ %bot.shortcut.1eft ] $+ [ %bot.shortcut.right ]
unset %bot.shortcut.1eft | unset %bot.shortcut.right
set %bot.shortcut.3 %bot.nick
set %bot.shortcut.4 ***
/system.check
if ( $result == 1 ) {
/echo $active 14Reloading files.... Please Wait ....
.reload -rs scripts/popups.mrc | .reload -rs scripts/login.mrc
.reload -rs scripts/CommandTriggers.mrc | .reload -rv remote.ini
.reload -rs scripts/CommandSource.mrc
.reload -rs scripts/dcc.mrc
.reload -rs scripts/protections.mrc
.reload -rs scripts/botnet.mrc
/remini database\mircStorm.GID login
/echo $active 14Files Reloaded.
}
else {
.timer 1 4 dialog -x startup startup startup
if ($result == 2) { set %bot.setup.error Message From System Check: Bots Nickname Or Backup Nickname Not Fouund Or Incorrect. Please Run Main Setup And Check Settings. | /dialog -rmo Setup.Error Setup.Error Error | halt }
if ($result == 3) { set %bot.setup.error Message From System Check: Could Not Find IRC Servers Or Incorrect Servers, Please Check Main Setup. If Servers Are In Order Please Restart The Bot To Attempt Fix. | /dialog -rmo Setup.Error Setup.Error Error | halt }
if ($result == 4) { set %bot.setup.error Message From System Check: The File %bot.system.check.file Cannot Be Found. Please ReInstall mIRCStorm Or Download A New Copy From www.mIRCStorm.co.uk. | /dialog -rmo Setup.Error Setup.Error Error | halt }
halt
}
}