mIRCStorm V2.0.0 — File Browser

mIRCStormV2.0.0v2.0.0 / mIRCStormV2.0.0v2.0.0 / mIRCStormV2.0.0 / Scripts / FileProcessing.mrc

FileProcessing.mrc — 15.52 KB — Download this file

;mIRCStorm V2.0.0 - FileProcessing.mrc
;
;Website: http://www.mIRCStorm.co.uk
;Author: Evil_Dave (Evil_Dave@mIRCStorm.co.uk)
;
;This script checks personality files loaded are complete
;========================================================
;==================FileProcessing.mrc====================
;========================================================
alias /Restore {
  var %restore.filename $1
  if ($exists(Backup\ $+ %restore.filename)) {
    var %Restore.Process.time $uptime(mirc)
    var %restore.linenumber 1
    while ($lines(Backup\ $+ %restore.filename) >= %restore.linenumber) {
      if ($read(Backup\ $+ %restore.filename, %restore.linenumber) == !!Begin.Chan) { var %restore.what mIRCStorm.chan  } 
      if ($read(Backup\ $+ %restore.filename, %restore.linenumber) == !!Begin.User) { var %restore.what mIRCStorm.user   } 
      if ($read(Backup\ $+ %restore.filename, %restore.linenumber) == !!Begin.ini) { var %restore.what mIRCStorm.ini   } 
      if ($read(Backup\ $+ %restore.filename, %restore.linenumber) == !!Begin.botnet) { var %restore.what mIRCStorm.botnet   } 
      if ($read(Backup\ $+ %restore.filename, %restore.linenumber) == !!Begin.GID) { var %restore.what mIRCStorm.GID } 
      if ($read(Backup\ $+ %restore.filename, %restore.linenumber) == !!Begin.seen) { var %restore.what data.seen } 
      if ($read(Backup\ $+ %restore.filename, %restore.linenumber) == !!Begin.Variables) { var %restore.what remote.ini  } 
      if ($read(Backup\ $+ %restore.filename, %restore.linenumber) == !!End) { /break } 
      if (%restore.what == mIRCStorm.chan) {
        if (($exists(Database\mIRCStorm.chan)) && (!%restore.removed.chan)) { .remove Database\mIRCStorm.chan | var %restore.removed.chan 1 }
        .write Database\mIRCStorm.chan $read(Backup\ $+ %restore.filename, %restore.linenumber)
      } 
      if (%restore.what == mIRCStorm.user) {
        if (($exists(Database\mIRCStorm.user)) && (!%restore.removed.user)) { .remove Database\mIRCStorm.user | var %restore.removed.user 1  }
        .write Database\mIRCStorm.user $read(Backup\ $+ %restore.filename, %restore.linenumber) 
      }
      if (%restore.what == mIRCStorm.ini) {
        if (($exists(Database\mIRCStorm.ini)) && (!%restore.removed.ini)) { .remove Database\mIRCStorm.ini | var %restore.removed.ini 1 }
        .write Database\mIRCStorm.ini $read(Backup\ $+ %restore.filename, %restore.linenumber)
      } 
      if (%restore.what == mIRCStorm.botnet) {
        if (($exists(Database\mIRCStorm.botnet)) && (!%restore.removed.botnet)) { .remove Database\mIRCStorm.botnet | var %restore.removed.botnet 1  }
        .write Database\mIRCStorm.botnet $read(Backup\ $+ %restore.filename, %restore.linenumber)
      }
      if (%restore.what == mIRCStorm.GID) {
        if (($exists(Database\mIRCStorm.GID)) && (!%restore.removed.GID)) { .remove Database\mIRCStorm.GID | var %restore.removed.GID 1  }
        .write Database\mIRCStorm.GID $read(Backup\ $+ %restore.filename, %restore.linenumber)
      } 
      if (%restore.what == data.seen) {
        if (($exists(Database\data.seen)) && (!%restore.removed.data)) { .remove Database\data.seen | var %restore.removed.data 1 }
        .write Database\data.seen $read(Backup\ $+ %restore.filename, %restore.linenumber) 
      }
      if (%restore.what == remote.ini) {
        if (($exists(remote.ini)) && (!%restore.removed.vars)) { .remove remote.ini | var %restore.removed.vars 1  }
        .write remote.ini $read(Backup\ $+ %restore.filename, %restore.linenumber) 
      }
      inc %restore.linenumber 1
    }
  }
  if ($lines(Database\mIRCStorm.chan) == 1) { .remove Database\mIRCStorm.chan }
  if ($lines(Database\mIRCStorm.user) == 1) { .remove Database\mIRCStorm.user }
  if ($lines(Database\mIRCStorm.ini) == 1) { .remove Database\mIRCStorm.ini }
  if ($lines(Database\mIRCStorm.botnet) == 1) { .remove Database\mIRCStorm.botnet }
  if ($lines(Database\mIRCStorm.GID) == 1) { .remove Database\mIRCStorm.GID }
  if ($lines(Database\seen.seen) == 1) { .remove Database\data.seen }
  if ($lines(remote.ini) == 1) { .remove remote.ini }
  did -o Restore 4 1 Restoring Files...done.
  did -a restore 4 Restore Complete. 
  did -v restore 1 
  .reload -rv remote.ini
}
alias /Backup {
  .saveini
  var %backup.filename.do $asctime(HH) $+ . $+ $asctime(nn) $+ $chr(64) $+ $asctime(dd) $+ . $+ $asctime(mmm) $+ . $+ $asctime(yyyy) $+ .Backup
  var %backup.filename [ %backup.filename.do ]
  if ($exists(Backup\ $+  %backup.filename)) { .remove Backup\ $+  %backup.filename }
  var %Backup.Process.time $uptime(mirc)
  write Backup\ $+ %backup.filename !!Begin.Chan
  if ($exists(Database\mIRCStorm.chan)) {
    var %backup.linenumber 1
    while ($lines(Database\mircstorm.chan) >= %backup.linenumber) {
      write Backup\ $+ %backup.filename $read(Database\mIRCStorm.chan, %backup.linenumber)
      inc %backup.linenumber 1
    }
  }
  write Backup\ $+ %backup.filename !!Begin.user
  if ($exists(Database\mIRCStorm.user)) {
    var %backup.linenumber 1
    while ($lines(Database\mircstorm.user) >= %backup.linenumber) {
      write Backup\ $+ %backup.filename $read(Database\mIRCStorm.user, %backup.linenumber)
      inc %backup.linenumber 1
    }
  }
  write Backup\ $+ %backup.filename !!Begin.ini
  if ($exists(Database\mIRCStorm.ini)) {
    var %backup.linenumber 1
    while ($lines(Database\mircstorm.ini) >= %backup.linenumber) {
      write Backup\ $+ %backup.filename $read(Database\mIRCStorm.ini, %backup.linenumber)
      inc %backup.linenumber 1
    }
  }
  write Backup\ $+ %backup.filename !!Begin.botnet
  if ($exists(Database\mIRCStorm.botnet)) {
    var %backup.linenumber 1
    while ($lines(Database\mIRCStorm.botnet) >= %backup.linenumber) {
      write Backup\ $+ %backup.filename $read(Database\mIRCStorm.botnet, %backup.linenumber)
      inc %backup.linenumber 1
    }
  }
  write Backup\ $+ %backup.filename !!Begin.GID
  if ($exists(Database\mIRCStorm.GID)) {
    var %backup.linenumber 1
    while ($lines(Database\mIRCStorm.GID) >= %backup.linenumber) {
      write Backup\ $+ %backup.filename $read(Database\mIRCStorm.GID, %backup.linenumber)
      inc %backup.linenumber 1
    }
  }
  write Backup\ $+ %backup.filename !!Begin.seen
  if ($exists(Database\data.seen)) {
    var %backup.linenumber 1
    while ($lines(Database\data.seen) >= %backup.linenumber) {
      write Backup\ $+ %backup.filename $read(Database\data.seen, %backup.linenumber)
      inc %backup.linenumber 1
    }
  }
  write Backup\ $+ %backup.filename !!Begin.Variables
  if ($exists(remote.ini)) {
    var %backup.linenumber 1
    while ($lines(remote.ini) >= %backup.linenumber) {
      write Backup\ $+ %backup.filename $read(remote.ini, %backup.linenumber)
      inc %backup.linenumber 1
    }
  }
  write Backup\ $+ %backup.filename !!End
  if (!$1) {
    did -o Backup 4 1 Writing Backup File...done.
    did -a Backup 4 Backup Job Complete In $calc($calc($uptime(mirc) - %Backup.Process.time)/1000) Seconds. 
    did -v Backup 1
  } 
  else {  
    .notice $1 Backup Complete.
    .msg $2 Backup Job Complete In $calc($calc($uptime(mirc) - %Backup.Process.time)/1000) Seconds. ( $+ $1 $+ )
    set %bot.dcc.command New Backup File Created ( $+ %backup.filename $+ ) | set %bot.dcc.command.nick $me | unset %bot.dcc.command.chan  | /dcctalk
  }
}
alias /PersonalityProcess {

  var %Personality.Process.time $uptime(mirc)
  var %bot.peronality.temp 1
  while (%bot.peronality.temp <= 60) {
    /PersonalityItems %bot.peronality.temp
    var %Personality.Item $calc($ini($1-,$gettok($result,1,58),0) + 1)
    var %bot.peronality.temp.2 2
    while (%bot.peronality.temp.2 <= %Personality.Item) {
      did -a Personality 4 Processing: $gettok($result,1,58) $+ , $gettok($result,%bot.peronality.temp.2,58) $+ .
      did -c Personality 4 $did(Personality,4).lines
      if ($readini $1- $gettok($result,1,58) $gettok($result,%bot.peronality.temp.2,58) == $null) { did -a Personality 5 ERROR! Topic: $gettok($result,1,58) Item: $gettok($result,%bot.peronality.temp.2,58) $+ . |  did -v Personality 1 | return $false }
      inc %bot.peronality.temp.2 1
    }
    inc %bot.peronality.temp 1
  }
  did -a Personality 4 Processing Complete. |  did -c Personality 4 $did(Personality,4).lines | did -a Personality 5 Proccessed Sucessfully. $calc($calc($uptime(mirc) - %Personality.Process.time)/1000) Seconds.
  did -v Personality 1  
  set %bot.Personality.file $did(setup,55).seltext
  did -ra setup 65 %bot.Personality.file
}

alias /PersonalityItems {
  if ($1 == 1) { return mIRCStorm:Author:AuthorWebsite:Description }
  if ($1 == 2) { return Swearkick:DoWhat:ThereAreNoBannedWords:NoSuchWordInList:WordRemoved:WhatWordToAdd:NoStarsPlease:WordAdded:BannedWordKick }
  if ($1 == 3) { return Login:loginOk:MSGHomeOnloginOk:LoginFailed:TryIdent:MSGHomeOnFail:WrongWayToLogin }
  if ($1 == 4) { return Hello:HelloLine1:HelloLine2:HelloLine3:HelloLine4:CannotGetUsersHost:HelloLineHome:MustBeInHomeToHello:HaveAOwnerAlreadyLine1:HaveAOwnerAlreadyLine2 }
  if ($1 == 5) { return Pass:YouGaveMeNoPasswordToSet:CouldNotFindMask:PassBeenSet:YouHaveNoAccess:MSGHomeYouHaveNoAccess:ChangePass:WrongOldPass:OwnerChangesAUserPassError:OwnerChangesPassOK }
  if ($1 == 6) { return Ident:IdentCannotFindYourNick:ErrorWithIdent:MSGHomeErrorWithIdent:AddedHost:IdentFailed }
  if ($1 == 7) { return Floodkick:MSGKickForFlooding:MSGWarningForFlooding }
  if ($1 == 8) { return Floodnotice:DontNoticeFloodMe1:DontNoticeFloodMe2:MSGHomeOnNoticeFlood:MSGWarningForFlooding }
  if ($1 == 9) { return Silentmode:TurnedOff:MSGHomeTurnedOff:MSGHomeTurnedOffInChan:TurnedOffInChan:TurnedOnButNoOps:KickMSG }
  if ($1 == 10) { return Lastcommand:LastCom }
  if ($1 == 11) { return DCC:LowAccessDCCYourelf }
  if ($1 == 12) { return Command:NotEnoughAccess:UnknownCommand:YouMustLogin:MSGUnknownCommand }
  if ($1 == 13) { return Peak:MSGChaOnNewPeak }
  if ($1 == 14) { return Remuser:YouDidntGiveANick:RemoveINFOForGlobal1:RemoveINFOForGlobal2:CannotRemFullAccess:UserNotInGlobalList:MSGHomeRemovedGlobalUser:GlobalUserRemovedMayHaveChannel:HigherGlobalAccessNeededToRemoveUser:UserNotInChannelListMayBeGlobal:MSGHomeRemovedUserFromChannel:UserHasBeenRemovedFromChannel:HigherChannelAccessNeededToRemoveUser }
  if ($1 == 15) { return Moduser:YouDidntGiveANick:YouDidntGiveALevel:UserHasBeenModifiedInChannel:MSGChanUserHasBeenModifiedInChannel:GlobalUserModifiedMayHaveChannel:MSGHomeGlobalUserModifiedMayHaveChannel }
  if ($1 == 16 ) { 
    return Adduser:UnknownLevel:HasAccessAlready:HaveBeenAddedGlobal1:HaveBeenAddedGlobal2:HaveBeenAddedGlobal3:HaveBeenAddedGlobal4:IHaveAddedGlobal1:IHaveAddedGlobalMSGToChannel1:BotBeenAddedMSGToBot:BotBeenAddedMSGToChannel:HaveBeenAdded1:HaveBeenAdded2:HaveBeenAdded3:HaveBeenAdded4:IHaveAddedMSGToChannel1:IHaveAddedGlobalIfUserKnownBefore1$&
      :HaveBeenAddedGlobalIfUserKnownBefore1:HaveBeenAddedGlobalIfUserKnownBefore2:IHaveAddedGlobalMSGToChannelIfUserKnownBefore1:IHaveAddedIfUserKnownBefore1:HaveBeenAddedIfUserKnownBefore1:HaveBeenAddedIfUserKnownBefore2:IHaveAddedMSGToChannelIfUserKnownBefore1:AccessNotEnoughToAddThatUser
  }
  if ($1 == 17 ) { return Deop:DeopMyself:NoOpsToDeop:MSGHomeNoOpsToDeop:CannotDeopChanOwner:NotEnoughAccessUserIsGlobal }
  if ($1 == 18 ) { return Who:NoChannelGiven:NotOnThatChan }
  if ($1 == 19 ) { return Op:NoOpsToOp:MSGHomeNoOpsToOp:YouAlreadyHaveOps:UserAlreadyHaveOps }
  if ($1 == 20 ) { return Rehash:Rehasing:MSGHomeBotRehashed }
  if ($1 == 21 ) { return Restart:BotRestarting:MSGAllChannelsAboutRestart }
  if ($1 == 22 ) { return Die:BotDieing:MSGAllChannelsDie }
  if ($1 == 23 ) { return Join:TooManyChannels:YouDidntGiveAChan:AlreadyInChan:Joining:MSGHomeJoining:MSGJoinedChanJoining }
  if ($1 == 24 ) { return Reset:MSGChanCantBeDoneLikeThat:CantBeDoneLikeThat }
  if ($1 == 25 ) { return Part:NoChannelGiven:NotOnThatChan:PartingChan:MSGHomePartingChan }
  if ($1 == 26 ) { return Google:SearchForWhat:Contacting:FoundNoSites }
  if ($1 == 27) { return Badchan:need }
  if ($1 == 28 ) { return Voice:NoOpsToVoice:MSGHomeNoOpsToVoice:HaveVoiceAlready:UserHasVoiceAlready }
  if ($1 == 29 ) { return Devoice:NoOpsToDeVoice:MSGHomeNoOpsToDeVoice:NotDevoiceMyself:CannotDevoiceOwner:HaveDeVoiceAlready:UserHasDeVoiceAlready:NotEnoughAccessCosUserGlobal }
  if ($1 == 30 ) { return Kick:NotKickMyself:NoOpsToKick:KickWho:CannotKickTheChannelOwner:NotEnoughAccessCosUserGlobal }
  if ($1 == 31) { return Ban:IWillNotBanMyself:BanWho:OnWhatBanType:YouCannotBanTheChannelOwner:NotEnoughAccessToBanUser:IAmNotOnThatChannelCannotBan:NickNotOnChannel:ManualUnbanAllowed:ManualBanAllowed:BanListCommandBusy }
  if ($1 == 32) { return Unban:UnbanWho:NotInBanList:UserBanned  } 
  if ($1 == 33) { return Topic:ChangeTopicToWhat:TopicHasBeenLockedCannotChange:TopicHasBeenLockedCannotChange2 }
  if ($1 == 34) { return MSG:WhoDoIMessage:WhatDoISay:MessageSent }
  if ($1 == 35) { return Topiclock:LockTheTopicToWhat:TopicIsAlreadyLocked:TopicLockEnabled }
  if ($1 == 36) { return Topicunlock:TopicIsNotLocked:TopicLockDisabled }
  if ($1 == 37) { return Wall:ToWhatChannel:WhatMessage:MessageSent }
  if ($1 == 38) { return Mode:SetWhatMode:ModeLockHasBeenEnabledSoCannnotChangeMode:ModeChanged }
  if ($1 == 39) { return Invite:InviteWho:CannotInviteYourself:CannotInviteMyself:NickAlreadyOnChan:HaveInvited:MessageToChan:MessageToHome }
  if ($1 == 40) { return Cycle:MessageToChanWhenCycling:SuccessfullyCycled }
  if ($1 == 41) { return Greet:WhatGreet:GreetRemoved:GreetErrorGettingMask:GreetingSet }
  if ($1 == 42) { return Notes:WhoDoISendToo:WhatDoISend:CannotSendNoteToMySelf:CannotSendNoteToYourSelf:DoNotKnowWhoThatIs:NoteWaiting:NoteSent:NotesErased:NoteErased:YouHaveNoNotes:NoteWaiting:TooManyNotes }
  if ($1 == 43) { return Banner:WhatAmISaying }
  if ($1 == 44) { return Onjoin:WhatMode:NoOnjoinSet:OnjoinCleared:EditWhatLine1:EditWhatLine2 }
  if ($1 == 45) { return Say:SayWhat:ISaid }
  if ($1 == 46) { return Act:DontLikeActing }
  if ($1 == 47) { return Lock:LockingChan }
  if ($1 == 48) { return Unlock:UnLockingChan }
  if ($1 == 49) { return Channels:CurrentlyInTheFollowingChannels:IShouldBeOnTheFollowing }
  if ($1 == 50) { return Save:SavingFiles:SavingComplete }
  if ($1 == 51) { return Notice:NoticeWho:NoticeWhat:IHaveNoticed }
  if ($1 == 52) { return Modelock:TurnedOff:MSGChanTurnedOff:TurnedOn:MSGChanTurnedOn:InvaildOption:UseThisCommandInstead }
  if ($1 == 53) {
    return Chanset:WhatMode:ChanWillNowBeLogged:ChanWillNowNotBeLogged:HomeChanNowNotifyedOfEveryUserWhoLogsIn:NeedsAGlobalUser:HomeChanNowNotNotifyedOfEveryUserWhoLogsIn:AutoOpEnabled:AutoOpDisabled:AutoVoiceEnabled:AutoVoiceDisabled:VoiceEveryoneEnabled:VoiceEveryoneDisabled:PeakDisplayEnabled:PeakDisplayDisabled:FloodChanWhatArgs$&
      :FloodChanWhatArgs2:FloodChanSet:FloodNoticeSet:NoColourEnabled:NoColourDisabled:PunishOpsEnabled:PunishOpsDisabled:SwearkickEnabled:SwearkickDisabled:UnknownChanMode
  }
  if ($1 == 54) { return Raw:DoWhat:StartingCommand:EndCommand }
  if ($1 == 55) { return Chhandle:DoWhat:CouldNotFindUser:HandleChanged }
  if ($1 == 56) { return Seen:NoNick:ThatsMe:ThatsYou:ThatUserIsHere:NotSeen: }
  if ($1 == 57) { return Misc:Time:Date:BeenOnline:ChannelPeakIs:ChannelPeakIs2 }
  if ($1 == 58) { return Whois:DoWhat:NotAKnowUser }
  if ($1 == 59) { return MakeCMD:DoWhat:WhatCmd:WhatCmd2:MaxedOut:CMDMade1:CMDMade2:MaxedOut:WhatCmdDel }
  if ($1 == 60) { return NoColour:UsingColourKick }
  else { return Error }
}
alias /AddonProcess {
  if ($1 == load) {
    .load -rs addons\ $+ $2
    return 1
  }
  if ($1 == unload) {
    .unload -rs $2
    return 1
  }
  else { return 0 }
}