napalm.napnet.hu/2015-02-12.napalm.napnet.hu.tar/napalm.napnet.hu/programok/kommunikacio/mpp700.exe/mpp.mrc

Text File | 2004-04-27 | 230KB | 5,913 lines

;mIRC Power Pack 7.0 - http://www.sodpit.com/mpp
;by SoD|Sgt-D - [e-mail]

;--------------------------------------------

alias mppbuild { set %mpp.builddate May 3, 2004 }

alias builddate {
  mppbuild
  echo 14 -a MPP Build Date set to:0,1 %mpp.builddate
}

alias utsound {
  if ($1 == off) { set %utsound34 0 }
  if ($1 == on) { set %utsound34 1 }
  if ($1 == 0) {
    if $isalias(ut_srshot) {
      .unload -rs $+(",$mircdirsystem\utsounds34\utsounds34-mpp.mrc,")
    }
  }
  elseif ($1 == 1) || ($1 == $null) {
    if (%utsound34 == $null) || (%utsound34 == 1) {
      if ($isalias(ut_srshot) == $false) {
        if $exists($mircdirsystem\utsounds34\utsounds34-mpp.mrc) {
          .load -rs $+(",$mircdirsystem\utsounds34\utsounds34-mpp.mrc,")
        }
      }
    }
  }
}

alias relnotes { set %showvar 1 }

alias sec {
  if ($1 == $null) { /mcc /sec }
  if ($1 == 1) || ($1 == high) { mppsec1 }
  if ($1 == 2) || ($1 == med) || ($1 == medium) { mppsec2 }
  if ($1 == 3) || ($1 == low) { mppsec3 }
}

alias sec1 mppsec1
alias sec2 mppsec2
alias sec3 mppsec3

alias mppsec1 {
  set %mppsec1 1
  set %mppsec2 0
  set %mppsec3 0
  .dccserver off
  .dcc trust on
  .dcc ignore accept
  .sreq ignore
  ;.identd off
  if (%ddevuln == $null) || (%ddevuln == 1) { .ddeserver off }
  if ($1 == $null) {
    echo -a 0,1MPP Security Level:  9,1High Security
    echo -a DCC Server: Off.  DCC Trust: Accept Files ONLY From Trusted Users.  DCC Accept: Accept ONLY Safe File Types.  DCC Receive Mode: Auto Ignore.  DDE Server: Off.
  }
  writeini %mpp mpp security 1
  writeini %mpp2 mpp security 1
  writeini %mpp mpp ddeserver 0
  writeini %mpp2 mpp ddeserver 0
}

alias mppsec2 {
  set %mppsec1 0
  set %mppsec2 1
  set %mppsec3 0
  .dccserver on
  .dcc trust on
  .dcc ignore accept
  .sreq ask
  ;.identd on
  if (%ddevuln == $null) || (%ddevuln == 1) { .ddeserver on }
  if ($1 == $null) {
    echo -a 0,1MPP Security Level:  8,1Medium Security
    echo -a DCC Server: On.  DCC Trust: Accept Files ONLY From Trusted Users.  DCC Accept: Accept ONLY Safe File Types.  DCC Receive Mode: Ask First.  DDE Server: On.
  }
  writeini %mpp mpp security 2
  writeini %mpp2 mpp security 2
  writeini %mpp mpp ddeserver 1
  writeini %mpp2 mpp ddeserver 1
}

alias mppsec3 {
  set %mppsec1 0
  set %mppsec2 0
  set %mppsec3 1
  .dccserver on
  .dcc trust off
  .dcc ignore off
  .sreq auto
  ;.identd on
  if (%ddevuln == $null) || (%ddevuln == 1) { .ddeserver on }
  if ($1 == $null) {
    echo -a 0,1MPP Security Level:  4,1Low Security
    echo -a DCC Server: On.  DCC Trust: Accept Files From Anyone.  DCC Accept: Accept ALL File Types.  DCC Receive Mode: Auto Accept.  DDE Server: On.
  }
  writeini %mpp mpp security 3
  writeini %mpp2 mpp security 3
  writeini %mpp mpp ddeserver 1
  writeini %mpp2 mpp ddeserver 1
}

alias mbx {
  echo 0 -a Reloading Multi Browser...
  .load -rs27 $+(",$mircdirsystem\multibrowser\multi.mrc,")
  .load -rs28 $+(",$mircdirsystem\multibrowser\multi1.mrc,")
  .load -rs29 $+(",$mircdirsystem\multibrowser\multi2.mrc,")
  msb.updateserverfiles
}

alias gs { if ($1 != $null) { run http://www.google.com/search?q= $+ $1- } | else { run http://www.google.com } }
alias google { if ($1 != $null) { run http://www.google.com/search?q= $+ $1- } | else { run http://www.google.com } }

alias gi { if ($1 != $null) { run http://images.google.com/images?q= $+ $1- } | else { run http://images.google.com } }
alias gimages { if ($1 != $null) { run http://images.google.com/images?q= $+ $1- } | else { run http://images.google.com } }

alias gg { if ($1 != $null) { run http://groups.google.com/groups?q= $+ $1- } | else { run http://groups.google.com } }
alias ggroups { if ($1 != $null) { run http://groups.google.com/groups?q= $+ $1- } | else { run http://groups.google.com } }

alias gn { if ($1 != $null) { run http://news.google.com/news?q= $+ $1- } | else { run http://news.google.com } }
alias gnews { if ($1 != $null) { run http://news.google.com/news?q= $+ $1- } | else { run http://news.google.com } }

alias gf { if ($1 != $null) { run http://froogle.google.com/froogle?q= $+ $1- } | else { run http://froogle.google.com } }
alias gfroogle { if ($1 != $null) { run http://froogle.google.com/froogle?q= $+ $1- } | else { run http://froogle.google.com } }

alias top { echo $chan 1,1. | echo -a $chan($chan).topic | echo $chan 1,1. }
alias topb { echo $chan 1,1. | echo 0 $chan $chan topic: $chan($chan).topic | echo $chan 1,1. }

alias top1 { echo -a 1,1. | set %i 1 | :loop | if ( %i > $chan(0) ) { goto done } | else { echo 0 -a $chan(%i) topic: $chan(%i).topic | echo 1,1. | inc %i 1 | goto loop } | :done | unset %i }

alias top2 { set %i 1 | :loop | if ( %i > $chan(0) ) { goto done } | else { echo $chan(%i) 1,1. | echo $chan(%i) $chan(%i).topic | echo $chan(%i) 1,1. | inc %i 1 | goto loop } | :done | unset %i }
alias top2b { set %i 1 | :loop | if ( %i > $chan(0) ) { goto done } | else { echo $chan(%i) 1,1. | echo 0 $chan(%i) $chan(%i) topic: $chan(%i).topic | echo $chan(%i) 1,1. | inc %i 1 | goto loop } | :done | unset %i }

alias wicked { sound kill.wav | /q3 wicked }
alias sod3w { sound kill.wav | /q3 sod3w }
alias sodra3 { sound kill.wav | /q3 sodra3 }
alias sparky { sound kill.wav | /q3 sparky }

alias whatsnew run $+(",$mircdirwhatsnew.txt,")
alias top20 run $+(",$mircdirtop20.txt,")

alias ssl {
  if $sslready { echo 0 -a mIRC $version is using SSL. }
  else { echo 4 -a mIRC $version is not using SSL. }
  if ($server == $null) { echo 4 -a Unable to check server's SSL capability because you are not connected. }
  else {
    if $ssl { echo 9 -a $server supports SSL. }
    else { echo 4 -a $server does not support SSL. }
  }
}

; since you are reading here, google toolbar pop-up blocker must be
; disabled in order to use q3plug in internet explorer.  you can
; still use it for other sites, just not on q3plug sites.

; the "q3plug" alias can be used to launch a local q3plug htm file,
; or you can use a web site url.  here are some examples:

; using these q3plug aliases will not report your launch in mirc!

alias x1 q3plug "http://www.sodpit.com/servers"
alias x3 q3plug "c:\games\Capture Strike Servers.htm"
alias x2 q3plug "your_web_page_here.htm"

alias servers { q3plug %mpp.sodpit $+ /servers }

; or you can use these aliases, pre-defined q3plug web pages:

; these aren't functional, they are for example only...

alias kquery { run $+(",c:\program files\coldstorage\kquery4\kquery4.exe,") }
alias kontrol { run $+(",c:\program files\coldstorage\kontrol\kontrol.exe,") }

;alias cs1 { q3plug %mpp.sodpit $+ /sgt-d/cfg/ctfs1.htm }
;alias cs2 { q3plug %mpp.sodpit $+ /sgt-d/cfg/ctfs2.htm }
;alias cs3 { q3plug %mpp.sodpit $+ /sgt-d/cfg/ctfs3.htm }
;alias ra1 { q3plug %mpp.sodpit $+ /sgt-d/cfg/ra31.htm }
;alias ra2 { q3plug %mpp.sodpit $+ /sgt-d/cfg/ra32.htm }

; do not modify anything below ! :p~

alias q3plug { killemall | run $1 }

alias readme run %mpp.website $+ /docs/mpp700.htm

alias ssu { if $exists(%mpp.ssu) { run -p %mpp.ssu } | else run -p http://www.sodpit.com/ssu }

alias gt { if $exists(%mpp.gt) { run -p %mpp.gt } | else run -p http://www.sodpit.com/gt }

alias mppetgcs { if (%mppetgcs = 1) {set %mppetgcs 0} | else {set %mppetgcs 0} }

alias channel { if ($network == enterthegame) && (%mppetgcs == 1) { etgcs } | else { channel } }

alias uwho { if (%mppuwho == 1) { uwho $1 } | else { whois $1 } }

alias bitlbee /server -m localhost:6667

alias pcon {
  ;iovpy = ignore, op, voice, protect, notify list
  .cnick -i * %mppignore *
  .cnick -o * %mppaop *
  .cnick -v * %mppavoice *
  .cnick -p * %mppprotect *
  .cnick -y * %mppnotice *
  echo -a Personal Colors ON
}

alias ucon {
  ;colors for user levels 100 thru 900
  .cnick * %mpp100 * 100
  .cnick * %mpp300 * 300
  .cnick * %mpp500 * 500
  .cnick * %mpp700 * 700
  .cnick * %mpp900 * 900
  echo -a User Level Colors ON
}

alias ccon {
  ;colors for chan modes, @+%
  .cnick * %mppop @
  .cnick * %mppvoice +
  .cnick * %mpphalfop %
  echo -a Channel Op/Half/Voice Colors ON
}

alias pcoff {
  .cnick -ri * 4 *
  .cnick -ro * 3 *
  .cnick -rv * 5 *
  .cnick -rp * 6 *
  .cnick -ry * 7 *
  echo -a Personal Colors OFF
}

alias ucoff {
  .cnick -r * 4 * 100
  .cnick -r * 7 * 300
  .cnick -r * 8 * 300
  .cnick -r * 3 * 700
  .cnick -r * 9 * 900
  echo -a User Level Colors OFF
}

alias ccoff {
  .cnick -r * 11 @
  .cnick -r * 12 +
  .cnick -r * 2 %
  echo -a Channel Op/Half/Voice Colors OFF
}

alias ppoff { if $isalias(ppdir) { .unload -rs $+(",$mircdirsystem\ppro\pp305.mrc,") } }
alias ppon { reload -rs47 $+(",$mircdirsystem\ppro\pp305.mrc,") }

alias scorebot {
  if !$dialog(msbscorebot) { dialog $msb.window msbscorebot msbscorebot }
  else {
    dialog -o msbscorebot
    dialog -n msbscorebot
  }
}

alias deloldmppup {
  if $exists($mircdirsystem\mpp\mppupdate.exe) { .remove $+(",$mircdirsystem\mpp\mppupdate.exe,") }
  if $exists($mircdirsystem\mpp\mpp.dat) { .remove $+(",$mircdirsystem\mpp\mpp.dat,") }
  if $exists($mircdirsystem\mpp\patch.dat) { .remove $+(",$mircdirsystem\mpp\patch.dat,") }
  if $exists($mircdirsystem\mpp\patch.z) { .remove $+(",$mircdirsystem\mpp\patch.z,") }
  if $exists($mircdirsystem\mpp\patch.exe) { .remove $+(",$mircdirsystem\mpp\patch.exe,") }
}

alias mfd { run -p $+(",$mircdirsystem\mpp\mfd.exe,") $1- }

alias mppupdate1 {
  var %a = $readini($mircdirsystem\mpp\mpp.ini,mpp,verurl)
  var %b = $readini($mircdirsystem\mpp\mpp.ini,mpp,verini)
  mfd %a $+ %b %b /min
  set %tempp2 0
  .timer 1 1 mpp.update
}

alias mppupdate {
  var %a = $readini($mircdirsystem\mpp\mpp.ini,mpp,verurl)
  var %b = $readini($mircdirsystem\mpp\mpp.ini,mpp,verini)
  mfd %a $+ %b %b /min
  set %tempp2 1
  .timer 1 1 mpp.update
}

alias mpp.update {
  var %x = $readini($mircdirsystem\mpp\mfd.ini,mppupdate,check)
  if (%x == checking) { .timer 1 1 mpp.update }
  elseif (%x == done) {
    var %a = $+(",$mircdirsystem\mpp\mpp.ini,")
    var %b = $+(",$mircdirsystem\mpp\ver.ini,")
    var %c = $readini(%a,mpp,buildid)
    var %d = $readini(%b,mpp,buildid)
    var %e = $readini(%b,mpp,path)
    var %f = $readini(%b,mpp,file)
    var %x = $readini(%a,mpp,version)
    var %y = $readini(%b,mpp,version)
    var %n = $readini(%a,mpp,buildxp)
    var %m = $readini(%b,mpp,buildxp)

    if (%d > %c) {
      ;echo 
      ;echo 9 -a MPP Update found, attempting to download...
      ;echo 
      if $exists($mircdirsystem\mpp\ $+ %f) {
        if (%f != $null)  {
          var %k = $input(Click YES to download %f again $+ $chr(44) overwrite the existing file and continue the upgrade $+ $chr(44) click NO to keep the existing file and and continue the upgrade $+ $chr(44) or click CANCEL to stop the upgrade (you can run MPP Update again later).,nvq,File Already Exists ( $+ %f $+ ))
          if (%k == $yes) { mfd %e $+ %f %f }
          elseif (%k == $cancel) { .remove $+(",$mircdirsystem\mpp\ver.ini,") | halt }
          else { }
        }
      }
      else {
        if ($input(MPP Update found! Version: %y $chr(91) $+ Build: %m $+ $chr(93) $+ .  Click YES to download the MPP Update ( $+ %f $+ ).  Click NO to avoid downloading this update.  You will be able to download this file again the next time you check for MPP Updates.,yi,MPP Update Download) == $true) {
          mfd %e $+ %f %f
        }
        else { .remove $+(",$mircdirsystem\mpp\ver.ini,") | halt }
      }
      set %tempp $+(",$mircdirsystem\mpp\ $+ %f,")
      set %temppa %a
      set %temppd %d
      set %temppf %f
      .timermpptmp -o 1 2 mpp.update2
    }
    else {
      if (%tempp2 == 0) { echo -a 9,1Current MPP Version: %x $chr(91) $+ Build: %n $+ $chr(93) $+ .  Update MPP Version: %y $chr(91) $+ Build: %m $+ $chr(93) $+ .  There are no MPP Updates at this time. | echo  }
      else { if ($input(Current MPP Version: %x $chr(91) $+ Build: %n $+ $chr(93) $+ .  Update MPP Version: %y $chr(91) $+ Build: %m $+ $chr(93) $+ .  There are no MPP Updates at this time.,oh,MPP Update) == $true) { } }
    }
  }
}

alias mpp.update2 {
  var %n = $readini($mircdirsystem\mpp\mfd.ini,mppupdate,check)
  var %m = $readini($mircdirsystem\mpp\mfd.ini,dloadsize,%temppf)
  if (%n == checking) { .timer 1 1 mpp.update2 }
  elseif (%n == done) && $exists(%tempp) && (%tempp != $+(",$mircdirsystem\mpp\,")) {
    var %g = 0
    var %g = $read(text.5,w,*gl hf lol k*)
    var %g = $read(%tempp,w,*HTTP 404 - File not found*)
    var %g = $readn
    if (%g == 0) {
      var %g = $read(%tempp,w,*process cannot access the file because it is being used by another process*)
      var %g = $readn
    }
    if (%g == 0) {
      var %g = $read(%tempp,w,*Error - File Not Found*)
      var %g = $readn
    }
    if (%g == 0) {
      var %g = $read(%tempp,w,*Error 404 - File Not Found*)
      var %g = $readn
    }
    if (%g != 0) { .remove %tempp }
    if (%n == done) && $exists(%tempp) {
      if ($input(Click YES to shutdown mIRC and update your MPP to the newest version.  You will not lose any settings.  After the update has completed $+ $chr(44) mIRC Power Pack will restart automatically.  Click NO to cancel this update.,yw,MPP Update) == $true) {
        ;echo -a %tempp
        set %shownotes %showvar
        run %tempp
        exit
      }
      else { .remove $+(",$mircdirsystem\mpp\ver.ini,") | halt }
    }
    else { echo 4 -a Failed to download file: %temppf | echo  }
  }
}

alias fakeup {
  set %restartmpp $readini($mircdirsystem\mpp\mpp.ini,mpp,restart)
  ;echo -a %restartmpp
  set %reloadmpp 1
  reloadmpp
}

alias about mppabout

alias mppabout {
  set %mppabout.version mIRC Power Pack %mpp.version
  set %mppabout.website %mpp.website
  set %mppabout.forums %mpp.forums
  set %mppabout.sodpit %mpp.sodpit
  set %mppabout.email %mpp.email
  ;$chr(91) $+ Build: %mpp.build $+ $chr(93)
  dialog -m mppabout mppabout
}

dialog mppabout {
  title "About mIRC Power Pack"
  size -1 -1 135 158
  option dbu
  icon 20, 0 0 250 32, $shortfn($mircdirsystem\mpp\about.jpg),noborder top left
  text MPP Version:, 1, 8 25 40 8
  text %mppabout.version, 2, 48 25 100 8

  text Build:, 21, 8 35 40 8
  text %mpp.build, 22, 48 35 100 8

  text Build Date:, 12, 8 45 40 8
  text %mpp.builddate, 13, 48 45 100 8
  text Created by:, 16, 8 55 40 8
  text sod/sgt-d, 17, 48 55 100 8
  text Email Sgt-D:, 9, 8 65 40 8
  link %mppabout.email, 10, 48 65 100 8
  text MPP Website:, 3, 8 75 40 8
  link %mppabout.website, 4, 48 75 100 8
  text MPP Forums:, 5, 8 85 40 8
  link %mppabout.forums, 6, 48 85 100 8
  text SoDPiT Web:, 7, 8 95 40 8
  link %mppabout.sodpit, 8, 48 95 100 8
  text IRC Support 1:, 14, 8 105 40 8
  link irc://irc.enterthegame.com/mpp, 15, 48 105 100 8
  text IRC Support 2:, 18, 8 115 40 8
  link irc://irc.gamesurge.net/mpp, 19, 48 115 100 8

  text Credits:, 23, 8 125 40 8
  link sodpit.com/mpp/credits.htm, 24, 48 125 100 8

  button "Close", 11, 47 140 37 12, ok
}

on *:dialog:mppabout:sclick:*: {
  if ($did == 4) { run %mppabout.website }
  if ($did == 6) { run %mppabout.forums }
  if ($did == 8) { run %mppabout.sodpit }
  if ($did == 10) { run mailto: $+ %mppabout.email $+ ?subject=mIRC Power Pack %mpp.version }
  if ($did == 15) { run irc://irc.enterthegame.com/mpp }
  if ($did == 19) { run irc://irc.gamesurge.net/mpp }
  if ($did == 24) { run http://www.sodpit.com/mpp/docs/credits.htm }
}

alias x {
  set %temp110 $readini($mircdirsystem\mpp\mpp.ini,mpp,notes)
  if (%temp110 != $null) {
    run %temp110
  }
}

alias repair reloadmpp

alias reloadmpp {
  echo -a 4,1Reloading scripts for mIRC Power Pack.  Please wait...
  echo -a 
  setrc6
  mppreload
  echo -a 
  echo -a 4,1mIRC Power Pack Scripts Loaded. Restart mIRC now for changes to take effect.
  echo -a 
  shutdownmpp
}

alias mppreload {

  ;[afiles]
  .reload -a $+(",$mircdirsystem\mpp\aliases.mrc,")
  .reload -a $+(",$mircdirsystem\mpp\aliasmpp.mrc,")
  .reload -a $+(",$mircdirsystem\mpp\quake.mrc,")

  ;[rfiles]
  ;.reload -ru $+(",$mircdirsystem\mpp\users.mrc,")
  ;.reload -rv $+(",$mircdirsystem\mpp\variables.mrc,")
  .reload -rs1 $+(",$mircdirsystem\mpp\connect.mrc,")
  .reload -rs3 $+(",$mircdirsystem\mpp\mppcfg.mrc,")
  .reload -rs4 $+(",$mircdirsystem\wa2mirc\WinAmp2mIRC.mrc,")
  .reload -rs5 $+(",$mircdirsystem\wa3mirc\WinAmp3mIRC.mrc,")
  .reload -rs6 $+(",$mircdirsystem\mpp\x-plorer.mrc,")
  .reload -rs7 $+(",$mircdirsystem\systeminfo\SystemInfo.mrc,")
  .reload -rs8 $+(",$mircdirsystem\logview\logview.mrc,")
  .reload -rs9 $+(",$mircdirsystem\arenascout\arenascout.mrc,")
  .reload -rs10 $+(",$mircdirsystem\smarticq\dat\gui.smarticq,")
  .reload -rs11 $+(",$mircdirsystem\smarticq\dat\core.smarticq,")
  .reload -rs12 $+(",$mircdirsystem\smarticq\dat\comm.smarticq,")
  .reload -rs13 $+(",$mircdirsystem\smarticq\dat\dlg01.smarticq,")
  .reload -rs14 $+(",$mircdirsystem\smarticq\dat\dlg02.smarticq,")
  .reload -rs15 $+(",$mircdirsystem\qtool\qtool.mrc,")
  .reload -rs16 $+(",$mircdirsystem\multigate\mg.mrc,")
  .reload -rs17 $+(",$mircdirsystem\mqa\mqa.mrc,")
  .reload -rs18 $+(",$mircdirsystem\cpanel\cpanel.mrc,")
  .reload -rs19 $+(",$mircdirsystem\mpp\cs-etg.mrc,")
  .reload -rs20 $+(",$mircdirsystem\mpp\cs-pgp.mrc,")
  .reload -rs21 $+(",$mircdirsystem\switchbar\switchbar.mrc,")
  .reload -rs22 $+(",$mircdirsystem\ngzipn\nGZIPn.mrc,")
  .reload -rs23 $+(",$mircdirsystem\h303\mrf_ht.mrc,")
  .reload -rs24 $+(",$mircdirsystem\msn\Tmsn.mrc,")
  .reload -rs25 $+(",$mircdirsystem\aim4mirc\aim4mirc.mrc,")
  .reload -rs26 $+(",$mircdirsystem\msn\md5.mrc,")
  .load -rs27 $+(",$mircdirsystem\multibrowser\multi.mrc,")
  .load -rs28 $+(",$mircdirsystem\multibrowser\multi1.mrc,")
  .load -rs29 $+(",$mircdirsystem\multibrowser\multi2.mrc,")
  msb.updateserverfiles
  .reload -rs30 $+(",$mircdirsystem\rkmp3\rkmp3.mrc,")
  .reload -rs31 $+(",$mircdirsystem\mpp\pinfo.mrc,")
  .reload -rs32 $+(",$mircdirsystem\mppacros\acros.mrc,")
  .reload -rs33 $+(",$mircdirsystem\style\style.mrc,")
  .reload -rs34 $+(",$mircdirsystem\mpp\votecast.mrc,")
  .reload -rs35 $+(",$mircdirsystem\mpp\RussianRouletteAddon.mrc,")
  .reload -rs36 $+(",$mircdirsystem\mpp\PowerAddon.mrc,")
  .reload -rs37 $+(",$mircdirsystem\mircscout\mircscout.mrc,")
  .reload -rs38 $+(",$mircdirsystem\mpp\gamespy.mrc,")
  .reload -rs39 $+(",$mircdirsystem\mpp\ejfc.mrc,")
  .reload -rs40 $+(",$mircdirsystem\mpp\etg-cs.mrc,")
  .reload -rs41 $+(",$mircdirsystem\mppaway\mppaway.mrc,")
  .reload -rs42 $+(",$mircdirsystem\xserv\xserv.mrc,")
  .reload -rs43 $+(",$mircdirsystem\funstuff\funstuff.mrc,")
  .reload -rs44 $+(",$mircdirsystem\ogx\ogx.mrc,")
  .reload -rs45 $+(",$mircdirsystem\mpp\q3msger.mrc,")
  .reload -rs46 $+(",$mircdirsystem\mpp\mpp2.mrc,")
  .reload -rs47 $+(",$mircdirsystem\mpp\mqp.mrc,")
  .reload -rs48 $+(",$mircdirsystem\voice\voice.mrc,")
  .reload -rs49 $+(",$mircdirsystem\ppro\pp305.mrc,")
  .reload -rs50 $+(",$mircdirsystem\mpp\mutu37.ini,")
  .reload -rs51 $+(",$mircdirsystem\atma\atma.sa,")
  .reload -rs52 $+(",$mircdirsystem\atma\formatStr\formatStr.sa,")
  .reload -rs53 $+(",$mircdirsystem\gtsdll\gtsdll.ini,")
  .reload -rs54 $+(",$mircdirsystem\mpp\urlv.mrc,")
  .reload -rs55 $+(",$mircdirsystem\dccinfo\dccinfo.mrc,")
  ;mppverset

}

alias loadnew {
  load -rs $+(",$mircdirsystem\mpp\votecast.mrc,")
  load -rs $+(",$mircdirsystem\mpp\urlv.mrc,")
  load -rs $+(",$mircdirsystem\dccinfo\dccinfo.mrc,")
}

#mpp.awaytoolbar on
alias awaytoolbar {
  if ($away == $true) && (%mpp.toolbarb != $null) && (%mpp.toolbar3 != 1) && ($exists(%mpp.toolbarb)) { background -le %mpp.toolbarb | set %mpp.toolbar2 0 | set %mpp.toolbar3 1 }
  if ($away == $false) && (%mpp.toolbar != $null) && (%mpp.toolbar2 != 1) && ($exists(%mpp.toolbar)) { background -le %mpp.toolbar | set %mpp.toolbar3 0 | set %mpp.toolbar2 1 }
}
alias awaytoolbar2 {
  if (%mpp.toolbarb != $null) && (%mpp.toolbar3 != 1) && ($exists(%mpp.toolbarb)) { background -le %mpp.toolbarb | set %mpp.toolbar2 0 | set %mpp.toolbar3 1 }
}

#mpp.awaytoolbar end

alias mppdoc run %mpp.website $+ /docs/mpp700.htm

alias ts1 /mcc /ts1
alias ts2 /mcc /ts2
alias ts3 /mcc /ts3
alias ts4 /mcc /ts4
alias ts5 /mcc /ts5

alias etg { server irc.enterthegame.com }
alias pgp { server -m irc.enterthegame.com }
alias jion { join #jion }

alias mppts1 {
  set %mpptss1 $readini($mircdirsystem\mpp\mcc.ini,mcc,mpptss1)
  set %mpptsc1 $readini($mircdirsystem\mpp\mcc.ini,mcc,mpptsc1)
  run -p %mpp_ts2_clientexe %mpptss1 $+ ?nickname= $+ $me $+ ?channel= $+ %mpptsc1
}

alias mppvs1 {
  run ventrilo://66.150.188.101:5840/servername=mIRC%20Power%20Pack&serverpassword=&channelname=mIRC%20Power%20Pack&channelpassword=
}

alias query {
  query $1
  whois2 $1
}

alias mawayset mpp.awayset

alias mpp.msb.back {
  if ($msb.read(change,from) != $null) { msb.changenick }
  if ($msb.read(did,rpt) != $null) { msb.returnmsg }
  if ($dialog(msb.return) != $null) { dialog -x msb.return }
  if (($msb.read(marked,away) == yes) && ($away == $true)) {
    if ($isalias(away) == $true) { .timer -m 1 1 away }
    else { scid -at1 away }
    msb.del marked away
  }
  if (($1 == $chr(33) $+ autoping) && (%msb.pause != 1)) {
    set %msb.pause 1
    .timer 1 3 unset %msb.pause
    set %msb.chan $chan
    msb.pinger $2
  }
  msb.unset
}

alias connect { server $1- }

alias 0 {
  set %mqinput 0
  /q0
  /away
  set %mqinput 1
  timers on2
  set %killemall 0
  mpp.msb.back
}

alias rk open_rkmp3
alias rkmp3 rk

alias fkey fkeys
alias fkeys run $+(",$mircdirsystem\mpp\fkeys.ini,")

alias etgcs { set %mppchan $chan | dialog -m mppeditor mppeditor }

alias vhost {
  /msg chanserv vhost $1 $2
}

on *:input:*: {
  if (%blowmode == 1) { if $left( $1, 1) != $chr(47) { %setbm $1- | halt } }
  set %temp $remove($1,$chr(40),$chr(41))
  if ($chr(40) isin $1) && ($chr(41) isin $1) {
    if $exists($mircdirsounds\wav\ $+ %temp $+ .wav) { sound %temp $+ .wav }
  }
}

alias new1 {
  hadd -sm keys $network $+ $chan $chan($chan).key
  hsave -soi keys $+(",$mircdirsystem\mpp\keys.txt,") keys
}

alias new3 {
  echo -a $hget(keys,$network $+ $1)
}

alias j0in_old {
  set %tmp50 $1
  echo -a 0attempting to join # $+ $1 with key = $2-
  join $1 $2-
  ;  .timerrx -o 0 10 /rx
}

alias keys {
  /run $+(",$mircdirsystem\mpp\keys.txt,")
}

alias keyz {
  set %keyrpt 1
  rx6
  set %keyrpt 0
}

alias c3p0 {

  set %temp $readini($mircdirsystem\mpp\mpp.ini,mpp,version)

  set %mpp.version %temp
  set %mpp.version2 %mpp.version
  set %mpp.version3 %temp

  set %temp $readini($mircdirsystem\mpp\mpp.ini,mpp,buildxp)
  set %mpp.build %temp

  set %mpp.website $readini($mircdirsystem\mpp\mcc.ini,mcc,mppsite)
  set %mpp.forums $readini($mircdirsystem\mpp\mcc.ini,mcc,mppforum)
  set %mpp.sodpit $readini($mircdirsystem\mpp\mcc.ini,mcc,sodpit)
  set %mpp.email $readini($mircdirsystem\mpp\mcc.ini,mcc,email)
  set %mpp.webmail $readini($mircdirsystem\mpp\mcc.ini,mcc,webmail)

}

alias rx6 {

  if (%mpp.persistent == 1) { regfix2 }

  c3p0

  if (%keyrpt == 1) { echo 0 -a Current Networks/Channels/Keys: }

  %scount = $scid(0)
  set %i1 1

  :next1
  set %i2 1

  scon %i1
  set %ccount $chan(0)

  :next2

  if (%keyrpt == 1) { echo 15 -a $network $chan(%i2) $chan(%i2).key }

  hadd -m keys $network $+ $chan(%i2) $chan(%i2).key
  inc %i2 1
  if (%i2 > %ccount) goto done2
  goto next2
  :done2

  inc %i1 1
  if (%i1 > %scount) goto done1
  goto next1
  :done1

  hsave -oi keys $+(",$mircdirsystem\mpp\keys.txt,") keys

  if (%keyrpt == 1) { echo 9 -a All channel keys saved to keys.txt }
  if (%keyrpt == 1) { echo 4 -a (Do not modify this file while mIRC is running!) }
  set %keyrpt 0
}

alias join {

  ;echo -a WTF

  ;1=blocked, 2=new, 3=old

  if (%joinnames == 1) { .enable #blocknames1 | .disable #blocknames2 }
  elseif (%joinnames == 2) { .enable #blocknames2 | .disable #blocknames1 }
  elseif (%joinnames == 3) { .disable #blocknames1 | .disable #blocknames2 }

  if ($hget(keys,$network $+ $1) == $null) {
    ;no key, so manually join & save
    join $1 $2
    hadd -m keys $network $+ $1 $2
    hsave -oi keys $+(",$mircdirsystem\mpp\keys.txt,") keys
  }
  else {
    ;join with supplied key $2, if it fails use stored key
    join $1 $2
    join $1 $hget(keys,$network $+ $1)
  }
  .timerrx8 -o 0 5 rx8
}

alias rx8 {

  ;if (%blocknames == 1) { .enable #blocknames1 | .disable #blocknames2 }
  ;elseif (%blocknames == 2) { .enable #blocknames2 | .disable #blocknames1 }
  ;elseif (%blockames == 3) { .disable #blocknames1 | .disable #blocknames2 }
}

alias rx5 {
  .timerrx5 off
  ;echo -a channel: %rx5
  ;echo 8 -a $chan(%rx5).key
  ;echo -a 8chan/key: $chan(%rx5).key
  hadd -m keys $network $+ %rx5 $chan(%rx5).key
  hsave -oi keys $+(",$mircdirsystem\mpp\keys.txt,") keys
}

dialog ascvalue {
  title "ASC and CHR values"
  option dbu
  size -1 -1 80 40
  text "ASC Value", 1, 7 5 25 7
  edit "", 2, 13 12 15 11
  text "CHR Symbol", 3, 40 5 30 7
  edit "", 4, 48 12 15 11
  button "Close", 999, 25 26 25 11, cancel
}
on *:dialog:ascvalue:edit:* {
  if ($did == 2) {
    var %a = $did(2)
    if (%a isnum 1-255) { did -o ascvalue 4 1 $chr(%a) }
    else { did -r ascvalue 4 }
  }
  elseif ($did == 4) {
    var %a = $did(4)
    if ($asc(%a) isnum 1-255) { did -o ascvalue 2 1 $asc(%a) }
    else { did -r ascvalue 2 }
  }
}
alias asc { dialog -m ascvalue ascvalue }
alias chr asc

on *:join:#:{

  if ( $nick == $me ) && ( %mpp.who == 1 ) who $chan

  if (%_myss == 1) && ($cid == %xcid1) && ($chan == %xchn1) && ($nick == $me) {
    .timerdelaysound -o 0 10 delaysound
  }

  if (%killemall != 1) {
    if ($nick != $me) {
      if (%onlinetest != 1) {
        set %onlinetest 1
        .timeronlinetest -o 0 10 onlinetest
        set %x $query(0)
        set %i 0
        set %onlinenick $read($+(",$mircdirsystem\mpp\online.txt,"),w,$nick)
        if ( %onlinenick == $null) {
          :next
          if (%i == 1) { if ( $query(1) == $nick ) { echo $nick 0 $+ $nick is now 9[0Online9] | set %ontst 1 | goto done } }
          if (%i == 2) { if ( $query(2) == $nick ) { echo $nick 0 $+ $nick is now 9[0Online9] | set %ontst 1 | goto done } }
          if (%i == 3) { if ( $query(3) == $nick ) { echo $nick 0 $+ $nick is now 9[0Online9] | set %ontst 1 | goto done } }
          if (%i == 4) { if ( $query(4) == $nick ) { echo $nick 0 $+ $nick is now 9[0Online9] | set %ontst 1 | goto done } }
          if (%i == 5) { if ( $query(5) == $nick ) { echo $nick 0 $+ $nick is now 9[0Online9] | set %ontst 1 | goto done } }
          if (%i == 6) { if ( $query(6) == $nick ) { echo $nick 0 $+ $nick is now 9[0Online9] | set %ontst 1 | goto done } }
          if (%i == 7) { if ( $query(7) == $nick ) { echo $nick 0 $+ $nick is now 9[0Online9] | set %ontst 1 | goto done } }
          if (%i == 8) { if ( $query(8) == $nick ) { echo $nick 0 $+ $nick is now 9[0Online9] | set %ontst 1 | goto done } }
          if (%i == 9) { if ( $query(9) == $nick ) { echo $nick 0 $+ $nick is now 9[0Online9] | set %ontst 1 | goto done } }
          if (%i == 10) { if ( $query(10) == $nick ) { echo $nick 0 $+ $nick is now 9[0Online9] | set %ontst 1 | goto done } }
          if (%i == 11) { if ( $query(11) == $nick ) { echo $nick 0 $+ $nick is now 9[0Online9] | set %ontst 1 | goto done } }
          if (%i == 12) { if ( $query(12) == $nick ) { echo $nick 0 $+ $nick is now 9[0Online9] | set %ontst 1 | goto done } }
          if (%i == 13) { if ( $query(13) == $nick ) { echo $nick 0 $+ $nick is now 9[0Online9] | set %ontst 1 | goto done } }
          if (%i == 14) { if ( $query(14) == $nick ) { echo $nick 0 $+ $nick is now 9[0Online9] | set %ontst 1 | goto done } }
          if (%i == 15) { if ( $query(15) == $nick ) { echo $nick 0 $+ $nick is now 9[0Online9] | set %ontst 1 | goto done } }
          if (%i == 16) { if ( $query(16) == $nick ) { echo $nick 0 $+ $nick is now 9[0Online9] | set %ontst 1 | goto done } }
          if (%i == 17) { if ( $query(17) == $nick ) { echo $nick 0 $+ $nick is now 9[0Online9] | set %ontst 1 | goto done } }
          if (%i == 18) { if ( $query(18) == $nick ) { echo $nick 0 $+ $nick is now 9[0Online9] | set %ontst 1 | goto done } }
          if (%i == 19) { if ( $query(19) == $nick ) { echo $nick 0 $+ $nick is now 9[0Online9] | set %ontst 1 | goto done } }
          if (%i == 20) { if ( $query(20) == $nick ) { echo $nick 0 $+ $nick is now 9[0Online9] | set %ontst 1 | goto done } }
          inc %i 1
          if ( %i == 21 ) { goto done }
          goto next
        }
        :done
        if (%ontst == 1) {
          set %gettest $read($+(",$mircdirsystem\mpp\online.txt,"), w, $nick)
          if (%gettest == $null) {
            write $+(",$mircdirsystem\mpp\online.txt,") $nick
          }
        }
        set %ontst 0
        unset %onlinenick
      }
    }
  }
  ;i think this was causing "%EnterTheGame+l 5" crap
  ;if ( $nick == $me ) set % $+ $network $+ %tmp $chan(%tmp).key
}


alias defb { if ($1 == on) || ($1 == 1) { enable #defb } | else { disable #defb } }

//here
on ^*:hotlink:*[Transfers]*:* { }
on *:hotlink:*[Transfers]*:* { dccmgr | window -a @transfers }

#defb off
on ^*:hotlink:*//*.*:*: { }
on *:hotlink:*//*.*:*: { run $remove($1,',",>,<,$chr(91),$chr(93),$chr(40),$chr(41)) }
on ^*:hotlink:*www.*:*: { }
on *:hotlink:*www.*:*: { run $remove($1,',",>,<,$chr(91),$chr(93),$chr(40),$chr(41)) }
#defb end

alias roster run %mpp.sodpit $+ /members

alias mpp.fix mppfix

alias mppfix {
  .timestamp off
  .timestamp -f %mpp.timestamp
  .timestamp on
  font -asgd -10 lucida console
  imgfix
  ;colfix
}

alias imgfix {
  if $exists(%mpp.buttons) { background -ue %mpp.buttons } | else { background -ux }
  if $exists(%mpp.toolbar) { background -le %mpp.toolbar } | else { background -lx }
  if $exists(%mpp.background) { background -mef %mpp.background } | else { background -mx }
  if $exists(%mpp.status) { background -sep %mpp.status } | else { background -sx }
  if $exists(%mpp.switchbar) { background -he %mpp.switchbar } | else { background -hx }
  if $exists(%mpp.transfers) { background -p @transfers %mpp.transfers } | else { background -px }
}

alias irc run $+(",$mircdirircintro.hlp,")
alias hlp run $+(",$mircdirmirc.hlp,")
alias faq run $+(",$mircdirmircfaq.hlp,")
alias faq2 run $+(",$mircdirmircfaq.txt,")
alias ini run $+(",$mircdirmircini.chm,")

;on *:op:#: {
;  if ($opnick == $me) && ($nick != $me) && ($nick != ChanServ) && (%mpp.optks == 1) {
;    msg $chan 9,1<<14,1 Thanks0,1 $nick 14,1for the 0,1 $chr(91) @ $chr(94)  $+ ! 9,1 $chr(94) $+ >
;  }
;}

on *:voice:#: {
  if ($vnick == $me) && ($nick != $me) && ($nick != ChanServ) && (%mpp.vtks == 1) {
    ;msg $chan 9<< Thanks for the 0+V $nick $+ ! 9>>
    msg $chan 9,1o((14,1 Thanks0,1 $nick 14,1for the0,1 $chr(91) $+ + $+ $chr(93) 9,1))o
  }
}

alias smicqx {
  .timersmicqx off
  smarticq
}

on *:notice:*dcc send*:*:{
  set %dccnick $nick
}

on *:notice:*added to my DCC Allow*:*:{
  if (%dccnick2 != $null) {
    .timerdccallow2 -o 0 1 dccallow2
  }
}

alias dccallow2 {
  .timerdccallow2 off
  dcc send -c %dccnick2 %dccfile2
  unset %dccnick2 %dccfile2
}

on *:snotice:*blocked*:{
  if ($network == enterthegame) {
    if (%dotnet != %dccnick) {
      dccallow + $+ %dccnick
      notice %dccnick 0You have been added to my DCC Allow list for 2 minutes.  If you are not using MPP, please resend your file.
      set %dotnet %dccnick
    }
    .timergodwtf -o 0 120 godwtf
  }
}

alias godwtf {
  .timergodwtf off
  dccallow - $+ %dccnick
  unset %dotnet
}

alias clearall clearall -snqmtg

alias c {}
alias cc clear
alias cl clear
alias clr clear
alias ca clearall
alias cx { clearall | top2 }

alias extreme {
  if ($1 == on) { extreme2on | extreme1on }
  elseif ($1 == off) { extreme2off | extreme1off }
  else {Syntax: /extreme {on|off}
}

alias extreme2on {
  .load -rs $+(",$mircdirsystem\cnicklist\nicklust.mrc,")
}

alias extreme2off {
  if $isalias(nicklust) { .unload -rs $+(",$mircdirsystem\cnicklist\nicklust.mrc,") }
}


alias cycle { set %cycle $chan | set %cyclek $chan(#).key | part %cycle | .timercycle -o 0 1 cycle2 }
alias cycle2 { .timercycle off | join %cycle %cyclek }

alias nolimit { if ($1 == 1) { set %csneg 1 | echo -a 0No Limit (Block ChanServ +l) 9[ON] }
  else if ($1 == 0) { set %csneg 0 | echo -a 0No Limit (Block ChanServ +l) 4[OFF] }
  else echo -a 0Usage: 13/nolimit {0|1} (0=off, 1=on)
}

alias nolimit2 { if ($1 == 1) { set %csneg 1 }
  else if ($1 == 0) { set %csneg 0 }
  else echo -a 0Usage: 13/nolimit {0|1} (0=off, 1=on)
}

alias dccmanager { if ($1 == 1) { .timertransferdetect 0 1 detect_transfers | .enable #dccmanager | echo -a 0DCC Manager 9[ON] }
  else if ($1 == 0) { .timertransferdetect off | .disable #dccmanager | echo -a 0DCC Manager 4[OFF] }
  else echo -a 0Usage: 13/dccmanager {0|1} (0=off, 1=on)
}





alias omessages { if ($1 == 1) { .enable #onlinemsgs | echo -a 0Online/Offline Messages 9[ON] }
  else if ($1 == 0) { .disable #onlinemsgs | echo -a 0Online/Offline Messages 4[OFF] }
  else echo -a 0Usage: 9/omessages {0|1} (0=off, 1=on)
}

alias blockmotd { if ($1 == 1) { .enable #blockmotd | echo -a 0MOTD Block 9[ON] }
  else if ($1 == 0) { .disable #blockmotd | echo -a 0MOTD Block 4[OFF] }
  else echo -a 0Usage: 9/blockmotd {0|1} (0=off, 1=on)
}

alias blocklusers { if ($1 == 1) { .enable #blocklusers | echo -a 0Lusers Block 9[ON] }
  else if ($1 == 0) { .disable #blocklusers | echo -a 0Lusers Block 4[OFF] }
  else echo -a 0Usage: 13/blocklusers {0|1} (0=off, 1=on)
}

alias blockwho { if ($1 == 1) { .enable #blockwho | echo -a 0Who Block 9[ON] }
  else if ($1 == 0) { .disable #blockwho | echo -a 0Who Block 4[OFF] }
  else echo -a 0Usage: 11/blockwho {0|1} (0=off, 1=on)
}

alias blockwelcome { if ($1 == 1) { .enable #blockwelcome | echo -a 0Welcome Block 9[ON] }
  else if ($1 == 0) { .disable #blockwelcome | echo -a 0Welcome Block 4[OFF] }
  else echo -a 0Usage: 12/blockwelcome {0|1} (0=off, 1=on)
}

alias blocknames { if ($1 == 1) { set %blocknames 1 | .enable #blocknames1 | .disable #blocknames2 | echo -a 0Names Block 9,1[ON] }
  elseif ($1 == 2) { set %blocknames 2 | .enable #blocknames2 | .disable #blocknames1 | echo -a 0Color Name Report 9,1[ON] }
  elseif ($1 == 3) { set %blocknames 3 | .disable #blocknames2 | .disable #blocknames1 | echo -a 0Color Name Report 4,1[OFF] }
  else echo -a 0Usage: 8/blocknames {1} (1=blocked, 2=no block (new), 3=no block (old) )
}

alias joinnames { if ($1 == 1) { set %joinnames 1 | echo -a 0Names On Join 4,1[OFF] }
  elseif ($1 == 2) { set %joinnames 2 | echo -a 0Names On Join 9,1[ON] }
  elseif ($1 == 3) { set %joinnames 3 | echo -a 0Names On Join 4,1[Old] }
  else echo -a 0Usage: 8/joinnames {1} (1=blocked, 2=new, 3=old )
}

alias namesreport { if ($1 == 1) { set %namesreport 1 | echo -a 0Names Report (New Style) }
  elseif ($1 == 0) { set %namesreport 0 | echo -a 0Names Report (Old Style) }
  else echo -a 0Usage: 8/namesreport {0|1} (0=old style, 1=new style)
}

alias whoreport { if ($1 == 1) { set %namesreport 1 }
  elseif ($1 == 0) { set %namesreport 0 }
  else { echo -a 0Usage: 8/whoreport {0|1} (0=boring, 1=colorful) }
}

alias blockuserhost { if ($1 == 1) { .disable #userhost | .disable #userhost2 | echo -a 0Userhost (Old Style) 9[ON] }
  else if ($1 == 2) { .enable #userhost2 | .disable #userhost | echo -a 0Userhost (New Style) 9[ON] }
  else if ($1 == 3) { .disable #userhost2 | .enable #userhost | echo -a 0userhost Block 9[ON] }
  else echo -a 0Usage: 8/blockuserhost {1|2|3} (1=old style, 2=new style, 3=blocked)
}







alias omessages2 { if ($1 == 1) { .enable #onlinemsgs }
  else if ($1 == 0) { .disable #onlinemsgs }
  else echo -a 0Usage: 9/omessages {0|1} (0=off, 1=on)
}

alias blockmotd2 { if ($1 == 1) { .enable #blockmotd }
  else if ($1 == 0) { .disable #blockmotd }
  else echo -a 0Usage: 9/blockmotd {0|1} (0=off, 1=on)
}

alias blocklusers2 { if ($1 == 1) { .enable #blocklusers }
  else if ($1 == 0) { .disable #blocklusers }
  else echo -a 0Usage: 13/blocklusers {0|1} (0=off, 1=on)
}

alias blockwho2 { if ($1 == 1) { .enable #blockwho }
  else if ($1 == 0) { .disable #blockwho }
  else echo -a 0Usage: 11/blockwho {0|1} (0=off, 1=on)
}

alias blockwelcome2 { if ($1 == 1) { .enable #blockwelcome }
  else if ($1 == 0) { .disable #blockwelcome }
  else echo -a 0Usage: 12/blockwelcome {0|1} (0=off, 1=on)
}

alias blocknames2 { if ($1 == 1) { set %blocknames 1 | .enable #blocknames1 | .disable #blocknames2 }
  elseif ($1 == 2) { set %blocknames 2 | .enable #blocknames2 | .disable #blocknames1 }
  elseif ($1 == 3) { set %blocknames 3 | .disable #blocknames2 | .disable #blocknames1 }
  else echo -a 0Usage: 8/blocknames {1} (1=blocked, 2=no block (new), 3=no block (old) )
}

alias joinnames2 { if ($1 == 1) { set %joinnames 1 }
  elseif ($1 == 2) { set %joinnames 2 }
  elseif ($1 == 3) { set %joinnames 3 }
  elseif ($1 == 0) { set %joinnames 3 }
  else echo -a 0Usage: 8/joinnames {1} (1=blocked, 2=new, 3=old )
}

alias namesreport2 { if ($1 == 1) { set %namesreport 1 }
  elseif ($1 == 0) { set %namesreport 0 }
  else echo -a 0Usage: 8/namesreport {0|1} (0=old style, 1=new style)
}

alias whoreport2 { if ($1 == 1) { set %namesreport 1 }
  elseif ($1 == 0) { set %namesreport 0 }
  else { echo -a 0Usage: 8/whoreport {0|1} (0=boring, 1=colorful) }
}

alias blockuserhost2 { if ($1 == 1) { .disable #userhost | .disable #userhost2 }
  else if ($1 == 2) { .enable #userhost2 | .disable #userhost }
  else if ($1 == 3) { .disable #userhost2 | .enable #userhost }
  else echo -a 0Usage: 8/blockuserhost {1|2|3} (1=old style, 2=new style, 3=blocked)
}









;;here


alias rx1 { .timerrx -o 0 3 /rx }

alias rx {
  .timerrx off
  echo -a 9Setting % $+ $network $+ %tmp50 = $chan(%tmp50).key
  set % $+ $network $+ $chan $chan.key
  unset %tmp50
}

;automatic key memorization, chanserv +l blocking
on *:mode:# {
  set %mppmode $1-
  set %tmp $left(%mppmode,2)
  if (%tmp == +k) {

    ;notice $me # $nick sets mode $1-
    set %tmp1 $len(%mppmode)
    set %tmp2 3
    %tmp3 = %tmp1 - %tmp2
    set %mppmodef $right(%mppmode,%tmp3)
    ;set % $+ $network $+ # %mppmodef

    hadd -m keys $network $+ # %mppmodef
    hsave -oi keys $+(",$mircdirsystem\mpp\keys.txt,") keys

  }
  ;echo -a %tmp -- $nick
  if (%tmp == +l) && ($me isop #) && ($nick == ChanServ) {
    if (%csneg == 1) { mode # %vlock }
  }
  if (%tmp == -l) && ($me isop #) && ($nick == $me) {
    if (%csmsg == 1) { msg # $read($+(",$mircdirsystem\mpp\csmsgs.txt,")) }
  }
  unset tmp tmp1 tmp2 mppmode mppmodef
}

alias delaysound {
  scid %xcid1 sound %xchn1 $nopath(%mysound)
  .timerdelaysound off
}

;this is the original set of mpp scripts...

alias version { echo -a 13,1m0,1IRC 4,1P0,1ower 8,1P0,1ack 00,01 $+ %mpp.version3 0,1(12,1 $+ %mpp.website $+ 0) by 14,1sod4,1/0,1sgt-d 0,1(12,1 $+ %mpp.email $+ 0,1) }
alias version2 { /say ~version | /notice $me 13m0IRC 4P0ower 8P0ack 00 $+ %mpp.version3 0(12 $+ %mpp.website $+ 0) by 14,1sod4,1/0,1sgt-d 0(12 $+ %mpp.email $+ 0) }

alias killtimers {
  timeronlinetest2 off
  timerogx off
  timeruptime off
  timergspy off
}

alias uid {
  /identd off
  /identd on $1
}

alias ndll2 return $+(",$mircdirsystem\mpp\nhtmln.dll,")

alias ptest {
  window -p @test
  echo -a $dll($+(",$mircdirsystem\mpp\nhtmln.dll,"),attach,$window(@test).hwnd)
  echo -a $dll($+(",$mircdirsystem\mpp\nhtmln.dll,"),navigate,www.mirc.com)
}

alias copter { run http://www.sodpit.com/swf/copter.swf }
alias kerpal { run http://www.sodpit.com/swf/kerpal.swf }
alias idiot { run http://www.sodpit.com/swf/idiot.swf }

alias cherubs { run http://www.sodpit.com/swf/cherubs.swf }
alias whatswrong { run http://www.sodpit.com/swf/whatswrong.swf }
alias kikia { run http://www.sodpit.com/swf/kikia.swf }

alias burgerking { run http://www.sodpit.com/swf/burgerking.swf }
alias starwars starwarz
alias starwarz { run http://www.sodpit.com/swf/starwarz.swf }
alias sodmovie { run http://www.sodpit.com/swf/sodmovie.swf }
alias gollum { run http://www.sodpit.com/swf/gollum.swf }

alias mppmovie mppmovie2
alias mppmovie1 { run http://www.sodpit.com/swf/mppmovie1.swf }
alias mppmovie2 { run http://www.sodpit.com/swf/mppmovie2.swf }
alias oldmpp { run http://www.sodpit.com/swf/oldmpp.swf }

alias allyourbase ayb

alias ayb {
  run http://www.sodpit.com/swf/ayb.swf
  ;  window -pk0 @AllYourBase -1 -1
  ;  dll $+(",$mircdirsystem\mpp\nhtmln.dll,") attach $window(@AllYourBase).hwnd
  ;  dll $+(",$mircdirsystem\mpp\nhtmln.dll,") navigate $+(",http://www.sodpit.com/swf/ayb.swf,")
}

alias ayb2 {
  if $exists($+(",$mircdirsystem\mpp\ayb.swf,")) {

    ;window -adwfk0 +beft @ayb -1 1 500 300
    ;window -adk0 @ayb -1 1 500 300

    ;window -ad @ayb -1 1 100 200

    ;dll " $+ $mircdirsystem\mpp\nhtmln.dll" attach $window(@ayb).hwnd
    ;dll " $+ $mircdirsystem\mpp\nhtmln.dll" navigate " $+ $mircdirsystem\mpp\ayb.swf"

    ;echo -s dll " $+ $mircdirsystem\mpp\nhtmln.dll" attach $window(@ayb).hwnd
    ;echo -s dll " $+ $mircdirsystem\mpp\nhtmln.dll" navigate " $+ $mircdirsystem\mpp\ayb.swf"
    ;    echo -a $dll(" $+ $mircdirsystem\mpp\nhtmln.dll",navigate,c:\mpp\system\mpp\ayb.swf)

    window -pk0 @AllYourBase -1 -1
    dll $+(",$mircdirsystem\mpp\nhtmln.dll,") attach $window(@AllYourBase).hwnd
    dll $+(",$mircdirsystem\mpp\nhtmln.dll,") navigate $+(",$mircdirsystem\mpp\ayb.swf,")

  }
  else {
    echo -a Downloading Media...  you will need to run /ayb again  :)
    run -p $+(",$mircdirsystem\mpp\ayb.exe,")
  }
}

;;fix

alias mpp.color {
  echo 4 -a $readini($+(",$mircini,"),text,theme)
  echo 4 -a $readini($+(",$mircini,"),colors,n0)
  echo 4 -a $readini($+(",$mircini,"),palettes,n0)
}

alias mpp.rgb mpp.color

on 1:text:~color:*: {
  set -u %rndcol1 $rand(7,13)
  set %temp $readini($+(",$mircini,"),colors,n0)
  set %temp2 $readini($+(",$mircini,"),palettes,n0)
  ;  notice $nick  $+ %rndcol1 $+ pong!
  notice $nick Colors: $+ %rndcol1 [colors] n0= $+ %temp
  notice $nick Palettes: $+ %rndcol1 [palettes] n0= $+ %temp2
  unset %temp
}

on 1:text:~rgb:*: {
  set -u %rndcol1 $rand(7,13)
  set %n0 $readini($+(",$mircini,"),rgb,n0)
  set %n1 $readini($+(",$mircini,"),rgb,n1)
  set %n2 $readini($+(",$mircini,"),rgb,n2)
  set %n3 $readini($+(",$mircini,"),rgb,n3)
  set %n4 $readini($+(",$mircini,"),rgb,n4)
  set %n5 $readini($+(",$mircini,"),rgb,n5)
  set %n6 $readini($+(",$mircini,"),rgb,n6)
  set %n7 $readini($+(",$mircini,"),rgb,n7)
  set %n8 $readini($+(",$mircini,"),rgb,n8)
  set %n9 $readini($+(",$mircini,"),rgb,n9)
  set %n10 $readini($+(",$mircini,"),rgb,n10)
  set %n11 $readini($+(",$mircini,"),rgb,n11)
  set %n12 $readini($+(",$mircini,"),rgb,n12)
  set %n13 $readini($+(",$mircini,"),rgb,n13)
  set %n14 $readini($+(",$mircini,"),rgb,n14)
  set %n15 $readini($+(",$mircini,"),rgb,n15)

  notice $nick Current RGB: $+ %rndcol1 [rgb] n0= $+ %n0 n1= $+ %n1 n2= $+ %n2 n3= $+ %n3 n4= $+ %n4 n5= $+ %n5 n6= $+ %n6 n7= $+ %n7 n8= $+ %n8 n9= $+ %n9 n10= $+ %n10 n11= $+ %n11 n12= $+ %n12 n13= $+ %n13 n14= $+ %n14 n15= $+ %n15
  unset %n1 %n2 %n3 %n4 %n5 %n6 %n7 %n8 %n9 %n10 %n11 %n12 %n13 %n14 %n15
}

;protection against dcc exploit affecting 6.12
;http://www.irchelp.org/irchelp/mirc/exploit.html
;thanks NaK|Tr4um4

ctcp *:dcc send:*: if ($len($nopath($filename)) >= 225) { echo 4 -s $nick tried to crash you with an illegal dcc send of $nopath($filename) | halt }

ctcp *:version*:* { .ctcpreply $nick VERSION 13,1m0,1IRC 4,1P0,1ower 8,1P0,1ack 00,01 $+ %mpp.version3 0,1(12,1 $+ %mpp.website $+ 0,1) by 14,1sod4,1/0,1sgt-d 0,1(12,1 $+ %mpp.email $+ 0,1) | /halt }

;a better ping? pong! test...
;type ping! in a channel, newer mpp users will reply via notice and
;also run a ctcp ping on you for the actual ping time in seconds
;oh, and no more channel flooding!

on 1:text:ping!:#: {
  set -u %rndcol1 $rand(7,13)
  /notice $nick  $+ %rndcol1 $+ pong!
}

on 1:notice:*pong!:*: {
  set -u %rndcol1 $rand(7,13)
  ctcp $nick ping
}

on 1:notice:tagalong*:*: {
  if (%sm == OFF) { /notice $nick followme %q3nik %serverip %serverprm }
}

on *:notice:followme*:*: {
  ;/echo -a $2
  ;/echo -a $3
  set %bleh2 $right($2, $length($2) -1 )
  ;/echo -a %bleh2
  if ($3 == $null) { halt }
  %bleh2 $3 $4-
}

;if you are deopped in a channel that you have auto-ops in, this will make chanserv re-op you!

#superman off
on *:devoice:#: {
  if ($vnick == $me) {
    set %chn1 #
    set %nik1 $nick
    msg chanserv unbanme #
    msg chanserv inviteme #
    msg chanserv opme #
    mode %chn1 -o-v %nik1
    mode %chn1 +m
  }
}
on *:deop:#: {
  if ($opnick == $me) {
    set %chn1 #
    set %nik1 $nick
    .enable #super
    msg chanserv unbanme #
    msg chanserv inviteme #
    msg chanserv opme #
  }
}
on *:kick:#: {
  if ($knick == $me) {
    set %chn1 #
    set %nik1 $nick
    .enable #super
    msg chanserv unbanme #
    msg chanserv inviteme #
    msg chanserv opme #
  }
}
on *:ban:#: {
  if ($banmask iswm $address($me,%mpp.masklevel)) {
    set %chn1 #
    set %nik1 $nick
    .enable #super
    msg chanserv unbanme #
    msg chanserv inviteme #
    msg chanserv opme #
  }
}
#superman end

#super on
on *:op:# {
  if ($opnick == $me) && ($nick != $me) && ($nick != ChanServ) && (%mpp.optks == 1) {
    msg $chan 9,1o((14,1 Thanks0,1 $nick 14,1for the0,1 $chr(91) $+ @ $+ $chr(93) 9,1))o
  }
  if (%nik1 != $null) && (%chn1 != $null) {
    ;echo -s WTF!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
    if ($opnick == $me) {
      who %nik1
      mode %chn1 -o+b %nik1 $address(%nik1,%mpp.masklevel)
      kick %chn1 %nik1 better luck next time...
      unset %chn1 %nik1
      ;.disable #super
    }
  }
}
#super end

#detection on
on *:ban:#: {
  if ($banmask iswm $address($me,%mpp.masklevel)) {
    echo 8 -s # - Banned by: $nick - $address($nick,%mpp.masklevel) | /dns $nick
  }
}

on *:kick:#: {
  if ($knick == $me) {
    echo 4 -s # - Kicked by: $nick - $address($nick,%mpp.masklevel) | /dns $nick
  }
}
#detection end

;manual ialscan
alias ialtest ialscan
alias ialscan { set -u %rndcol1 $rand(7,13) | if ($1 == $null) { echo # 0IAL Scan: $+ %rndcol1 # | set %i 1 | :next | set %nick $nick( # ,%i) | if %nick == $null goto done | userhost %nick | inc %i | goto next | :done | }
else { echo $1 0IAL Scan: $+ %rndcol1 $1 | set %i 1 | :next | set %nick $nick( $1 ,%i) | if %nick == $null goto done | userhost %nick | inc %i | goto next | :done } }

;mcc ialscan
alias ialscan1 { scid 1 | set -u %rndcol1 $rand(7,13) | echo $1 0IAL Scan: $+ %rndcol1 $1 | set %i 1 | :next | set %nick $nick( $1 ,%i) | if %nick == $null goto done | userhost %nick | inc %i | goto next | :done }
alias ialscan2 { scid 2 | set -u %rndcol1 $rand(7,13) | echo $1 0IAL Scan: $+ %rndcol1 $1 | set %i 1 | :next | set %nick $nick( $1 ,%i) | if %nick == $null goto done | userhost %nick | inc %i | goto next | :done }
alias ialscan3 { scid 3 | set -u %rndcol1 $rand(7,13) | echo $1 0IAL Scan: $+ %rndcol1 $1 | set %i 1 | :next | set %nick $nick( $1 ,%i) | if %nick == $null goto done | userhost %nick | inc %i | goto next | :done }
alias ialscan4 { scid 4 | set -u %rndcol1 $rand(7,13) | echo $1 0IAL Scan: $+ %rndcol1 $1 | set %i 1 | :next | set %nick $nick( $1 ,%i) | if %nick == $null goto done | userhost %nick | inc %i | goto next | :done }
alias ialscan5 { scid 5 | set -u %rndcol1 $rand(7,13) | echo $1 0IAL Scan: $+ %rndcol1 $1 | set %i 1 | :next | set %nick $nick( $1 ,%i) | if %nick == $null goto done | userhost %nick | inc %i | goto next | :done }
alias ialscan6 { scid 6 | set -u %rndcol1 $rand(7,13) | echo $1 0IAL Scan: $+ %rndcol1 $1 | set %i 1 | :next | set %nick $nick( $1 ,%i) | if %nick == $null goto done | userhost %nick | inc %i | goto next | :done }
alias ialscan7 { scid 7 | set -u %rndcol1 $rand(7,13) | echo $1 0IAL Scan: $+ %rndcol1 $1 | set %i 1 | :next | set %nick $nick( $1 ,%i) | if %nick == $null goto done | userhost %nick | inc %i | goto next | :done }
alias ialscan8 { scid 8 | set -u %rndcol1 $rand(7,13) | echo $1 0IAL Scan: $+ %rndcol1 $1 | set %i 1 | :next | set %nick $nick( $1 ,%i) | if %nick == $null goto done | userhost %nick | inc %i | goto next | :done }
alias ialscan9 { scid 9 | set -u %rndcol1 $rand(7,13) | echo $1 0IAL Scan: $+ %rndcol1 $1 | set %i 1 | :next | set %nick $nick( $1 ,%i) | if %nick == $null goto done | userhost %nick | inc %i | goto next | :done }
alias ialscan10 { scid 10 | set -u %rndcol1 $rand(7,13) | echo $1 0IAL Scan: $+ %rndcol1 $1 | set %i 1 | :next | set %nick $nick( $1 ,%i) | if %nick == $null goto done | userhost %nick | inc %i | goto next | :done }

;these first scripts detect your os

alias mpp9x {
  set %mppcmd command.com
  ;.writeini system\mpp\os.txt os os %mppos
  ; echo 4 -a win9x
  ;echo -a .
  ;echo 8Windows $os detected... setting command interpreter to: 13COMMAND.COM
}

alias mppnt {
  set %mppcmd cmd.exe
  ;echo 9 -a winnt
  ;echo 8Windows $os detected... setting command interpreter to: 13CMD.EXE
}

alias syncini {
  if ($1 == 1) { .enable #syncini }
  elseif ($1 == 0) { .disable #syncini }
  else {
    echo -a 13Syntax: /syncini {0|1} (Default: 0)
    echo -a 0Description: mirc.ini is only used when you click on irc:// links on websites.  this will cause mpp to load with all scripts except the connection script.  this means that mpp will load exactly on the irc server and channel specified in the irc:// link, without loading all of the normal mpp servers and channels.
    echo -a 0If you turn this option on (1) (on by default), the next time you start normal mpp, mirc.ini will be copied over with info from mpp.ini to keep the two files in sync.  this option assumes that mpp.ini (used more often than mirc.ini) will normally have the most up to date settings.
    echo -a 0If you want to be able to keep these two ini's independent of each other, so that you can make mpp look different for web page irc:// links than it does for normal mpp, then you should set this option to 0.
  }
}

#syncini on
alias syncini2 {
  if ($nopath($mircini) == mpp.ini) {
    ;echo -a 0INI File:8 $nopath($mircini)
    ;echo -a not using mpp.ini
    .copy -o $+(",$mircdirmpp.ini,") $+(",$mircdirmirc.ini,")
    ;[rfiles]
    ;n2=system\mpp\connect.mrc
    writeini $+(",$mircdirmirc.ini,") rfiles n2 system\mpp\c0nn3ct.n0t
  }
}
#syncini end

alias cnicklist {
  if ($1 == 1) {
    .load -rs $+(",$mircdirsystem\cnicklist\nicklust.mrc,")
    set %cnicklist 1
  }
  else {
    if $isalias(nicklust) { .unload -rs $+(",$mircdirsystem\cnicklist\nicklust.mrc,") }
    set %cnicklist 0
  }
}

alias mtsthemes {
  if ($1 == 1) {
    .load -rs $+(",$mircdirsystem\kte\kte.mrc,")
    set %mtsthemes 1
  }
  else {
    if $isalias(kte.unload) { .unload -rs $+(",$mircdirsystem\kte\kte.mrc,") }
    if $isalias(kte_void) { .unload -rs $+(",$mircdirsystem\kte\kte-dyn.mrc,") }
    set %mtsthemes 0
  }
}

alias tvswitchbar {
  if ($1 == 1) {
    ;load -rs $+(",$mircdirsystem\switchbar\switchbar.mrc,")

    extreme1on
    set %afswitchbar on
    set %tvswitchbar 1
  }
  elseif ($1 == 0) {
    ;  dialog switchbar switchbar -x
    ;    unload -rs switchbar.mrc
    extreme1off
    set %afswitchbar off
    set %tvswitchbar 0
  }
  else echo -a 0 Description: Enables (1) or disables (0) Treeview Switchbar
  else echo -a 0 Syntax: /tvswitchbar {0|1}
}

alias ktefix_bad {

  ;ignore this section :p

  set %mircdir $+(",$mircdir,")

  set %ktedata %mircdir $+ system\kte\kte-data.dat

  echo -a %ktedata

  hload -sb Kte_Data %ktedata

  echo -a $hget(Kte_Data,ThmDir)
  echo -a $hget(Kte_Data,GZipDir)
  echo -a $hget(Kte_Data,mUnzipDir)

  hadd -s Kte_Data ThmDir $mircdir $+ system\kte\themes\
  hadd -s Kte_Data GZipDir $mircdir $+ system\ngzipn\
  hadd -s Kte_Data mUnzipDir $mircdir $+ system\munzip\

  echo -a $hget(Kte_Data,ThmDir)
  echo -a $hget(Kte_Data,GZipDir)
  echo -a $hget(Kte_Data,mUnzipDir)

  hsave -osb Kte_Data $mircdirsystem\kte\kte-data.dat

  hfree -s Kte_Data

}

alias regfix { ircregfix | .timerrfix -o 0 5 chatregfix }

alias regfix2 { ircregfix -q | .timerrfix -o 0 5 chatregfix -q }

alias fixmulti {
  set %temp1 $readini($mircdirsystem\profiles\profiles.ini,profiles,current)
  remini $+(",$mircdirsystem\profiles\ $+ %temp1 $+ \msb\settings.ini,") server timecheck
  remini $+(",$mircdirsystem\profiles\default\msb\settings.ini,") server timecheck
  remini $+(",$mircdirsystem\profiles\default\backup\msb\settings.ini,") server timecheck
  remini $+(",$mircdirsystem\profiles\MPP Sample\backup\msb\settings.ini,") server timecheck
  remini $+(",$mircdirsystem\multibrowser\settings.ini,") server timecheck
}

alias setrc6 {

  set %temp113 $readini($mircdirsystem\mpp\mpp.ini,mpp,version)
  set %temp119 $readini($mircdirsystem\mpp\mpp.ini,mpp,service)

  set %mpp.version %temp113
  set %mpp.v %temp113

  set %mppetgcs 1
  set %mppetgcsdesc Double Click = ChanServ Control Panel

  set %mppuwho 1
  set %mppuwhodesc Double Click = mIRC Address Book (/uwho)

  set %temp $readini($mircdirprofiles\profiles.ini,profiles,current)

  ;if (%mpp != $null) { writeini %mpp mcc service %temp119 }
  ;if (%mpp != $null) { writeini %mpp mpp service %temp119 }

  ;if (%mpp2 != $null) { writeini %mpp2 mcc service %temp119 }
  ;if (%mpp2 != $null) { writeini %mpp2 mpp service %temp119 }

  ;fixmulti
  rc6title
  rc6quit
}

alias rc6title { titlebar Power Pack %mpp.version }

alias rc6quit {

  set %mpp.colquitmsg 13,1m0,1IRC 4,1P0,1ower 8,1P0,1ack 00,01 $+ %mpp.version 0,1(12,1www.sodpit.com/mpp0) by 14,1sod4,1/0,1sgt-d 0,1(12,[e-mail]0,1)
  set %mpp.nocolquitmsg mIRC Power Pack %mpp.version ( $+ %mpp.website $+ ) by sod/sgt-d ( $+ %mpp.email $+ )
  set %mpp.quitmsg %mpp.colquitmsg

  ;echo -a %mpp.colquitmsg

  ;writeini %mpp mpp colquitmsg %mpp.colquitmsg

  ;writeini %mpp mpp colquitmsg 13m0IRC 4P0ower 8P0ack 007.0 RC6-2 0(12 $+ %mpp.website $+ 0) by 14,1sod4,1/0,1sgt-d 0(12 $+ %mpp.email $+ 0)
  ;writeini %mpp mpp colquitmsg 13m0IRC $chr(3) $+ 4P $+ $chr(3) $+ 0ower $chr(3) $+ 8P $+ $chr(3) $+ 0ack $chr(3) $+ 007.0 RC6-2 $chr(3) $+ 0( $+ $chr(3) $+ 12 $+ %mpp.website $+ $chr(3) $+ 0) by $chr(3) $+ 9[ $+ $chr(3) $+ 0SoD $+ $chr(3) $+ 9] $+ $chr(3) $+ 0Sgt- $+ $chr(3) $+ 9D $chr(3) $+ 0( $+ $chr(3) $+ 12 $+ %mpp.email $+ $chr(3) $+ 0) $+ $chr(3)

  ;writeini %mpp2 mpp colquitmsg 13m0IRC 4P0ower 8P0ack 007.0 RC6-2 0(12 $+ %mpp.website $+ 0) by 14,1sod4,1/0,1sgt-d 0(12 $+ %mpp.email $+ 0)

  ;writeini %mpp mpp nocolquitmsg mIRC Power Pack 7.0 RC6-2 ( $+ %mpp.website $+ ) by [SoD]Sgt-D ( $+ %mpp.email $+ )
  ;writeini %mpp2 mpp nocolquitmsg mIRC Power Pack 7.0 RC6-2 ( $+ %mpp.website $+ ) by [SoD]Sgt-D ( $+ %mpp.email $+ )
}

alias proman1 {
  set %mpp.profile $readini($mircdirprofiles\profiles.ini,profiles,current)
  if $exists($mircdirprofiles\ $+ %mpp.profile $+ \users.mrc) { .copy -o $+(",$mircdirprofiles\ $+ %mpp.profile $+ \users.mrc,") $+(",$mircdirsystem\mpp\users.mrc,") }
  if $exists($mircdirsystem\mpp\users.mrc) { .reload -ru $+(",$mircdirsystem\mpp\users.mrc,") }
  ;if $exists($mircdirprofiles\ $+ %mpp.profile $+ \msb) {
  ;  .copy -o $+(",$mircdirprofiles\ $+ %mpp.profile $+ \msb\*.txt,") $+(",$mircdirsystem\multibrowser\,")
  ;  .copy -o $+(",$mircdirprofiles\ $+ %mpp.profile $+ \msb\*.ini,") $+(",$mircdirsystem\multibrowser\,")
  ;}
}

alias proman2 {
  saveini
  set %mpp.profile $readini($mircdirprofiles\profiles.ini,profiles,current)
  if $exists($mircdircontrol.ini) { .copy -o $+(",$mircdircontrol.ini,") $+(",$mircdirprofiles\ $+ %mpp.profile $+ \control.ini,") }
  if $exists($mircdirsystem\mpp\mutu37.ini) { .copy -o $+(",$mircdirsystem\mpp\mutu37.ini,") $+(",$mircdirprofiles\ $+ %mpp.profile $+ \mutu37.ini,") }
  if $exists($mircdirsystem\ppro\pp.ini) { .copy -o $+(",$mircdirsystem\ppro\pp.ini,") $+(",$mircdirprofiles\ $+ %mpp.profile $+ \pp.ini,") }
  if $exists($mircdirsystem\ppro\pp-user.ini) { .copy -o $+(",$mircdirsystem\ppro\pp-user.ini,") $+(",$mircdirprofiles\ $+ %mpp.profile $+ \pp-user.ini,") }
  if $exists($mircdirsystem\atma\sylver.ini) { .copy -o $+(",$mircdirsystem\atma\sylver.ini,") $+(",$mircdirprofiles\ $+ %mpp.profile $+ \sylver.ini,") }
  if $exists($mircdirsystem\atma\atma.dat) { .copy -o $+(",$mircdirsystem\atma\atma.dat,") $+(",$mircdirprofiles\ $+ %mpp.profile $+ \atma.dat,") }
  if $exists($mircdirsystem\atma\atma.stp) { .copy -o $+(",$mircdirsystem\atma\atma.stp,") $+(",$mircdirprofiles\ $+ %mpp.profile $+ \atma.stp,") }
  if $exists($mircdirsystem\atma\fscache.dat) { .copy -o $+(",$mircdirsystem\atma\fscache.dat,") $+(",$mircdirprofiles\ $+ %mpp.profile $+ \fscache.dat,") }
  if $exists($mircdirsystem\rkmp3\rkmp3_last.rpl) { .copy -o $+(",$mircdirsystem\rkmp3\rkmp3_last.rpl,") $+(",$mircdirprofiles\ $+ %mpp.profile $+ \rkmp3_last.rpl,") }
  if !$exists($mircdirprofiles\ $+ %mpp.profile $+ \msb) {
    mkdir $+(",$mircdirprofiles\ $+ %mpp.profile $+ \msb,")
  }
  if $exists($mircdirmpp.ini) { .copy -o $+(",$mircdirmpp.ini,") $+(",$mircdirprofiles\ $+ %mpp.profile $+ \mpp.ini,") }
  if $exists($mircdirsystem\mpp\users.mrc) { .copy -o $+(",$mircdirsystem\mpp\users.mrc,") $+(",$mircdirprofiles\ $+ %mpp.profile $+ \users.mrc,") }

  if $exists($mircdirprofiles\ $+ %mpp.profile $+ \msb) {
    .copy -o $+(",$mircdirsystem\multibrowser\*.txt,") $+(",$mircdirprofiles\ $+ %mpp.profile $+ \msb\,")
    .copy -o $+(",$mircdirsystem\multibrowser\*.ini,") $+(",$mircdirprofiles\ $+ %mpp.profile $+ \msb\,")
  }

  writeini $+(",$mircdirprofiles\ $+ %mpp.profile $+ \mpp.ini,") mpp version %mpp.v
  writeini $+(",$mircdirprofiles\ $+ %mpp.profile $+ \mpp.ini,") text aptitle $titlebar

  if (%mpp.trayicon != $null) { writeini $+(",$mircdirprofiles\ $+ %mpp.profile $+ \mpp.ini,") files trayicon %mpp.trayicon }
  else { remini $+(",$mircdirprofiles\ $+ %mpp.profile $+ \mpp.ini,") files trayicon }
}

alias mppsd1 {}

on *:exit: {
  if (%hal9000 == 1) {
    if $exists($mircdirsounds\wav\shutdown.wav) { splay shutdown.wav }
  }
  .timermppoff -o 1 3 mppsd1
  proman2
}

alias addgtsdll {
  ;.reload -rs51 $+(",$mircdirsystem\gtsdll\gtsdll.ini,")
}

on *:start: {

  utsound

  if (%mppsec == $null) { set %mppsec 1 }

  relnotes

  if (%shownotes == 1) {
    set %temp110 $readini($mircdirsystem\mpp\mpp.ini,mpp,notes)
    if (%temp110 != $null) {
      set %temp117 $readini($mircdirsystem\mpp\mpp.ini,mpp,version)
      if (%temp117 != $null) {
        var %k = $input(Would you like to view the release notes for mIRC Power Pack %temp117 $+ ?,yi,Release Notes)
        if (%k == $true) { run %temp110 }
        set %shownotes 0
      }
    }
  }

  ;mppverset

  c3p0

  if (%mpp100 == $null ) set %mpp100 10
  if (%mpp300 == $null ) set %mpp300 13
  if (%mpp500 == $null ) set %mpp500 8
  if (%mpp700 == $null ) set %mpp700 9
  if (%mpp900 == $null ) set %mpp900 0
  if (%mppop == $null ) set %mppop 11
  if (%mppvoice == $null ) set %mppvoice 12
  if (%mpphalfop == $null ) set %mpphalfop 2
  if (%mppignore == $null ) set %mppignore 4
  if (%mppaop == $null ) set %mppaop 3
  if (%mppavoice == $null ) set %mppavoice 5
  if (%mppprotect == $null ) set %mppprotect 6
  if (%mppnotice == $null ) set %mppnotice 7

  ;;;;;proman1

  mppbuild

  ;  echo -a HERE!

  set %mpp.toolbar2 0
  set %mpp.toolbar3 0

  .remove $+(",$mircdirsystem\mpp\timers.txt,")

  if (%mppkickcount == $null) { set %mppkickcount 1 }

  if (%soundreport == $null) { set %soundreport 1 }

  set %temp $readini($mircdirsystem\mpp\mpp.ini,mpp,version)

  if (%v.mpp70rc6 != %temp) { setrc6 | deloldmppup | addgtsdll | set %v.mpp70rc6 %temp }

  if (%mppcolors == 1) {
    colfix
  }

  set %keyrpt 0

  hmake keys
  hload -i keys $+(",$mircdirsystem\mpp\keys.txt,") keys

  .timerrx6 -o 0 60 rx6

  updateuptime

  set %mpp.timertest 0

  set %killemall 0

  unset %dotnet %dccnick %dcccnick2 %dccfile2

  .timestamp -f %mpp.timestamp

  set %mircini $mircini

  syncini2

  .remove $+(",$mircdirsystem\mpp\online.txt,")

  set %ontst 0
  set %onlinetest 0
  .timeronlinetest2 -o 0 900 onlinetest2

  set %mqa.mdll $+(",$mircdirsystem\mqa\mdx.dll,")
  set %mg.mdll $+(",$mircdirsystem\multig~1\MDX.DLL,")
  set %mg.vdll $+(",$mircdirsystem\multig~1\views.mdx,")
  set %rfs-dir $+(",$mircdirsystem\rfs,")

  if (%mpp.colorquit == 1) {
    set %mpp.quitmsg %mpp.colquitmsg
  }
  else {
    set %mpp.quitmsg %mpp.nocolquitmsg
  }

  set %mpp.ctcp 13,1m0,1IRC 4,1P0,1ower 8,1P0,1ack 00,01 $+ %mpp.version3 0,1(12,1 $+ %mpp.website $+ 0,1) by 14,1sod4,1/0,1sgt-d 0,1(12,1 $+ %mpp.email $+ 0,1)

  if (%mpp.firstrun == 1) { run -p $+(",$mircdirsystem\mpp\mcc.exe,") /connections | set %mpp.firstrun 0 }

  echo -a 13,1m0IRC 4,1P0,1ower 8,1P0,1ack 00,01 $+ %mpp.version3 0,1(12,1 $+ %mpp.website $+ 0,1)
  echo -a 
  echo -a 14,1Created by: 14,1sod4,1/0,1sgt-d 0,1(12,1 $+ %mpp.email $+ 0,1)
  echo -a 
  echo -a 14,1Build Date:0,1 %mpp.builddate
  echo -a 
  echo -a 14,1MPP Web Site:12,1 %mpp.website $+ 0,1
  echo -a 
  echo -a 14,1MPP Forums:12,1 %mpp.forums 0,1
  echo -a 
  echo -a 14,1Help Channel: 0irc://irc.enterthegame.com:6667/mpp
  echo -a 

  ;3.1, 95, 98, NT, ME, 2000, or XP
  set %mppos $os

  if (%mppos == 3.1) { echo 8Windows 3.1 detected... setting command interpreter to: 13COMMAND.COM | /mpp9x }
  if (%mppos == 95) { echo 8Windows 95 detected... setting command interpreter to: 13COMMAND.COM | /mpp9x }
  if (%mppos == 98) { echo 8Windows 98 detected... setting command interpreter to: 13COMMAND.COM | /mpp9x }
  if (%mppos == ME) { echo 8Windows ME detected... setting command interpreter to: 13COMMAND.COM | /mpp9x }

  if (%mppos == nt) { echo 8Windows NT detected... setting command interpreter to: 13CMD.EXE | /mppnt }
  if (%mppos == 2000) || (%mppos == 2k) { echo 8Windows 2000 detected... setting command interpreter to: 13CMD.EXE | /mppnt }
  if (%mppos == xp) { echo 8Windows XP detected... setting command interpreter to: 13CMD.EXE | /mppnt }
  echo -a 

  if (%hal9000 == 1) {
    if $exists($mircdirsounds\wav\startup.wav) { splay startup.wav }
  }
  .timermppstart2 0 10 mppstart2

  if (%mpp.updatecheck == 1) { mppupdate1 }

  ;  if (%mpp.persistent == 1) { regfix2 | .timermpp.persistent -o 0 60 regfix2 }

  if (%mpp.persistent == 1) { regfix2 }

  if (%mpp.initial == 1) {
    echo -s 0This is your first launch of MPP for this installation.  Please wait one minute while MPP Control Center (MCC) is loaded.
    echo -s 1,1.
    echo -s 4You must completely fill out the first server connection in MCC before you click the Save button - this sets your information in mIRC.
    echo -s 1,1.
  }
}


alias mppstart2 {
  .timermppstart2 off
  ;mppabout
}

on *:connect: {
  ;.timerMPPSTARTUP2 -o 0 %mpp.delay2 /mppstartup2
}

alias mpp.init {
  .timermppinit off
  mppxinit
  ;mppx2
}

alias mppstartup2 {
  ;.timerMPPSTARTUP2 off
  ;.disable #BlockNames2
  ;if (%myss == Startup Sound [ON]) {
  ;  .timerMySound -o 0 1 /mysound
}

;not using names alias now

alias names1 {
  echo 4 -s WTF?!?!?!
  if (%blocknames == 3) { .disable #blocknames1 | .disable #blocknames2 }
  if (%blocknames == 2) { .enable #blocknames2 | .disable #blocknames1 }
  names $1-
  .timernames -o 0 15 names2
}

alias names2 {
  .timernames off
  if (%blocknames == 3) { .disable #blocknames2 | .disable #blocknames1 }
  if (%blocknames == 2) { .disable #blocknames1 | .enable #blocknames2 }
}

alias mysound_dead {
  .timerMySound OFF
  ;  scid 1 sound %xchn1 " $+ %mysound $+ "
  ;scid 1 sound %xchn1 $nopath(%mysound)

  ;  set %i 1
  ;  if ( $scid(%i).network == enterthegame ) { scid %i mppallow | goto done }
  ;  if (%i == 25 ) { goto done }
  ;  inc %i
  ;  goto next
  ;  :done

}

#mp3 off
ctcp *:text:*!*.mp3:*: {
  ;echo 8 -a $1
  ;echo 8 -a $2-
  ;echo 8 -a $3
  ;echo 8 -a $4
  ;echo 8 -a $5
  /set %xxn $+(",$mircdir,") $+ mp3\ $+ $2-
  if $exists( %xxn ) {
    /echo 9 -a TRUE
  }
  else {
    /echo 4 -a FALSE
    ;   /msg # $1-
    ;    /echo $1-
    ;    /echo 11 -a %xxn
    ;    /dcc send $nick " $+ %xxn $+ "
  }
}
#mp3 end

on *:text:~version:*:{
  if (%mpp.core == $null) { set %mpp.core N/A }
  notice $nick 13,1m0,1IRC 4,1P0,1ower 8,1P0,1ack 00,01 $+ %mpp.version3 4,1/ 0,1Build:0,1 $readini(system\mpp\mpp.ini,mpp,buildid) 4,1/ 0,1Core:0,1 %mpp.core 0,1(12,1 $+ %mpp.website $+ 0,1) by 14,1sod4,1/0,1sgt-d 0,1(12,1 $+ %mpp.email $+ 0,1)
}

on *:text:~*:*:{
  set %temp $remove($1,~)
  if (%temp == $me) {
    if (%mpp.core == $null) { set %mpp.core N/A }
    notice $nick 13,1m0,1IRC 4,1P0,1ower 8,1P0,1ack 00,01 $+ %mpp.version3 4,1/ 0,1Build:0,1 $readini(system\mpp\mpp.ini,mpp,buildid) 4,1/ 0,1Core:0,1 %mpp.core 0,1(12,1 $+ %mpp.website $+ 0,1) by 14,1sod4,1/0,1sgt-d 0,1(12,1 $+ %mpp.email $+ 0,1)
  }
}

alias pageroff {
  unset %pager1 %pager2 %pager3 %pagerx %pagery %pagerz
}

alias pageron {
  set %pagerx Priority [1]
  set %pagery Priority [2]
  set %pagerz Priority [3]
  ; set %pager1 %pager1b
  ; set %pager2 %pager2b
  ; set %pager3 %pager3b
}

;myss
alias myss {
  if (%myss == Startup Sound [ON]) {
    set %myss Startup Sound [OFF]
    writeini %mpp mpp myss 0
    writeini %mpp2 mpp myss 0
    set %_myss 0
    ;/disable #mysound
    ;echo 4 -a Startup Sound [OFF]

  }
  else {
    set %myss Startup Sound [ON]
    ;/enable #mysound
    writeini %mpp mpp myss 1
    writeini %mpp2 mpp myss 1
    set %_myss 1
    ;echo 9 -a Startup Sound [ON]
  }
}

;mimg
alias mimg {
  if (%mppimages == MPP Images [ON]) {
    set %mppimages MPP Images [OFF]
    writeini %mpp mpp mppimages 0
    writeini %mpp2 mpp mppimages 0
    ;/disable #mysound
    /run -n system\imgoff.bat
    echo 4 -a MPP Images [OFF] (mIRC must be restarted for changes to take effect)
  }
  else {
    set %mppimages MPP Images [ON]
    writeini %mpp mpp mppimages 1
    writeini %mpp2 mpp mppimages 1
    ;/enable #mysound
    /run -n system\imgon.bat
    echo 9 -a MPP Images [ON] (mIRC must be restarted for changes to take effect)
  }
}

;Xany
alias xany {
  if (%xany == Anonymous Access [ON]) {
    set %xany Anonymous Access [OFF]
    set %_xany 0
    writeini %mpp mpp xany 0
    writeini %mpp2 mpp xany 0

    .disable #anon1
    .enable #anon2
    ;echo 4 -a Normal Mode: Anonymous Access [OFF]
  }
  else {
    set %xany Anonymous Access [ON]
    set %_xany 1
    writeini %mpp mpp xany 1
    writeini %mpp2 mpp xany 1
    .enable #anon1
    .disable #anon2
    ;echo 9 -a Normal Mode: Anonymous Access [ON]
  }
}

;mpage
alias mpage {
  if (%mpage == mIRC Pager [ON]) {
    set %mpage mIRC Pager [OFF]
    set %_mpage 0
    writeini %mpp mpp mpage 0
    writeini %mpp2 mpp mpage 0
    /pageroff
    ;echo 4 -a Normal Mode: mIRC Pager [OFF]
  }
  else {
    set %mpage mIRC Pager [ON]
    set %_mpage 1
    writeini %mpp mpp mpage 1
    writeini %mpp2 mpp mpage 1
    /pageron
    ;echo 9 -a Normal Mode: mIRC Pager [ON]
  }
}

;Sounds (Toggle)

alias msnd {
  if (%msnd == Sounds [ON]) {
    set %_msnd 0
    writeini %mpp mpp msnd 0
    writeini %mpp2 mpp msnd 0
    set %msnd Sounds [OFF]
    .sound off
    /stop
    ;echo 4 -a Normal Mode: Sounds [OFF]
  }
  else {
    set %_msnd 1
    set %msnd Sounds [ON]
    writeini %mpp mpp msnd 1
    writeini %mpp2 mpp msnd 1
    .sound on
    ;echo 9 -a Normal Mode: Sounds [ON]
  }
}

;MS Agent (Toggle)
alias magt {
  if (%magt == MS Agent [ON]) {
    set %magt MS Agent [OFF]
    set %_magt 0
    writeini %mpp mpp magt 0
    writeini %mpp2 mpp magt 0
    .disable #msagent
    ;echo 4 -a Normal Mode: MS Agent [OFF]
  }
  else {
    set %magt MS Agent [ON]
    set %_magt 1
    writeini %mpp mpp magt 1
    writeini %mpp2 mpp magt 1
    .enable #msagent
    ;echo 9 -a Normal Mode: MS Agent [ON]
  }
}

;File Server (Toggle)
alias msrv {
  if (%msrv == File Server [ON]) {
    set %msrv File Server [OFF]
    set %_msrv 0
    writeini %mpp mpp msrv 0
    writeini %mpp2 mpp msrv 0
    .disable #fserve
    ;echo 4 -a Normal Mode: File Server [OFF]
  }
  else {
    set %msrv File Server [ON]
    set %_msrv 1
    writeini %mpp mpp msrv 1
    writeini %mpp2 mpp msrv 1
    .enable #fserve
    ;echo 9 -a Normal Mode: File Server [ON]
  }
}

;DCC Chat (3-Way Toggle)
alias mdcc {
  if (%mdcc == DCC Chat (Auto)) {
    set %mdcc DCC Chat (Ask)
    set %_mdcc 1
    writeini %mpp mpp creqmode ask
    writeini %mpp2 mpp creqmode ask
    .creq +m ask
    ;echo 8 -a Normal Mode: DCC Chat [ASK]
    set %creqmode ask
  }
  else if (%mdcc == DCC Chat (Ask)) {
    set %mdcc DCC Chat (Ignore)
    set %_mdcc 0
    writeini %mpp mpp creqmode ignore
    writeini %mpp2 mpp creqmode ignore
    .creq +m ignore
    ;echo 4 -a Normal Mode: DCC Chat [OFF]
    set %creqmode ignore
  }
  else {
    set %mdcc DCC Chat (Auto)
    set %_mdcc 1
    writeini %mpp mpp creqmode auto
    writeini %mpp2 mpp creqmode auto
    .creq +m auto
    ;echo 9 -a Normal Mode: DCC Chat [AUTO]
    set %creqmode auto
  }
}

;DCC Send (3-Way Toggle)
alias mdcs {
  if (%mdcs == DCC Send (Auto)) {
    set %mdcs DCC Send (Ask)
    set %_mdcs 1
    writeini %mpp mpp sreqmode ask
    writeini %mpp2 mpp sreqmode ask
    .sreq +m ask
    ;echo 8 -a Normal Mode: DCC Send [ASK]
    set %sreqmode ask
  }
  else if (%mdcs == DCC Send (Ask)) {
    set %mdcs DCC Send (Ignore)
    set %_mdcs 0
    writeini %mpp mpp sreqmode ignore
    writeini %mpp2 mpp sreqmode ignore
    .sreq +m ignore
    ;echo 4 -a Normal Mode: DCC Send [OFF]
    set %sreqmode ignore
  }
  else {
    set %mdcs DCC Send (Auto)
    set %_mdcs 1
    writeini %mpp mpp sreqmode auto
    writeini %mpp2 mpp sreqmode auto
    .sreq +m auto
    ;echo 9 -a Normal Mode: DCC Send [AUTO]
    set %sreqmode auto
  }
}

;gaming modes

;File Server (Toggle)
alias mqpmsrv {
  if (%mqpmsrv == 1) {
    set %mqpmsrv 0
    writeini %mpp mpp mqpmsrv 0
    writeini %mpp2 mpp mqpmsrv 0
    set %m_mqpmsrv File Server [OFF]
    set %_m_mqpmsrv 0
    .disable #fserve
    ;echo 4 -a Gaming Mode: File Server [OFF]
  }
  else {
    set %mqpmsrv 1
    writeini %mpp mpp mqpmsrv 1
    writeini %mpp2 mpp mqpmsrv 1
    set %m_mqpmsrv File Server [ON]
    set %_m_mqpmsrv 1
    .enable #fserve
    ;echo 9 -a Gaming Mode: File Server [ON]
  }
}

;MS Agent (Toggle) in games
alias mqpmagt {
  if (%mqpmagt == 1) {
    set %mqpmagt 0
    writeini %mpp mpp mqpmagt 0
    writeini %mpp2 mpp mqpmagt 0
    set %m_mqpmagt MS Agent [OFF]
    set %_m_mqpmagt 0
    .disable #msagent
    ;echo 4 -a Gaming Mode: MS Agent [OFF]
  }
  else {
    set %mqpmagt 1
    writeini %mpp mpp mqpmagt 1
    writeini %mpp2 mpp mqpmagt 1
    set %m_mqpmagt MS Agent [ON]
    set %_m_mqpmagt 1
    .enable #msagent
    ;echo 9 -a Gaming Mode: MS Agent [ON]
  }
}

;Xany
alias mqpxany {
  if (%mqpxany == 1) {
    set %mqpxany 0
    writeini %mpp mpp mqpxany 0
    writeini %mpp2 mpp mqpxany 0
    set %m_mqpxany Anonymous Access [OFF]
    set %_m_mqpxany 0
    .disable #anon1
    .enable #anon2
    ;echo 4 -a Gaming Mode: Anonymous Access [OFF]
  }
  else {
    set %mqpxany 1
    writeini %mpp mpp mqpxany 1
    writeini %mpp2 mpp mqpxany 1
    set %m_mqpxany Anonymous Access [ON]
    set %_m_mqpxany 1
    .enable #anon1
    .disable #anon2
    ;echo 9 -a Gaming Mode: Anonymous Access [ON]
  }
}

;sounds in games
alias mqpsnd {
  if (%mqpsnd == 1) {
    set %m_mqpsnd Sounds [OFF]
    writeini %mpp mpp mqpsnd 0
    writeini %mpp2 mpp mqpsnd 0
    set %_m_mqpsnd 0
    set %mqpsnd 0
    ;echo -a 4Gaming Mode: Sounds [OFF]
  }
  else {
    set %m_mqpsnd Sounds [ON]
    set %mqpsnd 1
    writeini %mpp mpp mqpsnd 1
    writeini %mpp2 mpp mqpsnd 1
    set %_m_mqpsnd 1
    ;echo -a 9Gaming Mode: Sounds [ON]
  }
}

;dcc sends in games
alias mqpdcs {
  if (%mqpdcs == 1) {
    set %m_mqpdcs DCC Send [OFF]
    set %mqpdcs 0
    writeini %mpp mpp mqpdcs 0
    writeini %mpp2 mpp mqpdcs 0
    set %_m_mqpdcs 0
    ;echo -a 4Gaming Mode: DCC Send [OFF]
  }
  else {
    set %m_mqpdcs DCC Send [ON]
    set %mqpdcs 1
    writeini %mpp mpp mqpdcs 1
    writeini %mpp2 mpp mqpdcs 1
    set %_m_mqpdcs 1
    ;echo -a 9Gaming Mode: DCC Send [ON]
  }
}

;dcc chats in games
alias mqpdcc {
  if (%mqpdcc == 1) {
    set %m_mqpdcc DCC Chat [OFF]
    set %_m_mqpdcc 0
    set %mqpdcc 0
    writeini %mpp mpp mqpdcc 0
    writeini %mpp2 mpp mqpdcc 0
    ;echo -a 4Gaming Mode: DCC Chat [OFF]
  }
  else {
    set %m_mqpdcc DCC Chat [ON]
    set %_m_mqpdcc 1
    set %mqpdcc 1
    writeini %mpp mpp mqpdcc 1
    writeini %mpp2 mpp mqpdcc 1
    ;echo -a 9Gaming Mode: DCC Chat [ON]
  }
}

;MP3 Listing in games
alias mqpmp3lt {
  if (%mqpmp3lt == 1) {
    set %m_mqpmp3lt MP3 Listing [OFF]
    set %_m_mqpmp3lt 0
    set %mqpmp3lt 0
    writeini %mpp mpp mqpmp3lt 0
    writeini %mpp2 mpp mqpmp3lt 0
    ;echo 4 -a Gaming Mode: MP3 Listing [OFF]
  }
  else {
    set %m_mqpmp3lt MP3 Listing [ON]
    set %mqpmp3lt 1
    writeini %mpp mpp mqpmp3lt 1
    writeini %mpp2 mpp mqpmp3lt 1
    set %_m_mqpmp3lt 1
    ;echo 9 -a Gaming Mode: MP3 Listing [ON]
  }
}

;Remote (Toggle) in games
alias mqprem1 {
  if (%mqprem1 == 1) {
    set %m_mqprem1 Remote Control [OFF]
    set %_m_mqprem1 0
    set %mqprem1 0
    writeini %mpp mpp mqprem1 0
    writeini %mpp2 mpp mqprem1 0
    .enable #remote2
    .disable #remote1
    ;echo 4 -a Gaming Mode: Remote Control [OFF]
  }
  else {
    set %m_mqprem1 Remote Control [ON]
    set %mqprem1 1
    writeini %mpp mpp mqprem1 1
    writeini %mpp2 mpp mqprem1 1
    set %_m_mqprem1 1
    .enable #remote1
    .disable #remote2
    ;echo 9 -a Gaming Mode: Remote Control [ON]
  }
}

;Auto Get (Toggle)
alias mqpmget {
  if (%mqpmget == 1) {
    set %mqpmget 0
    writeini %mpp mpp mqpmget 0
    writeini %mpp2 mpp mqpmget 0
    set %m_mqpmget Auto Get Sounds [OFF]
    set %_m_mqpmget 0
    .disable #autoget
    ;echo 4 -a Gaming Mode: Auto Get Sounds [OFF]
  }
  else {
    set %mqpmget 1
    writeini %mpp mpp mqpmget 1
    writeini %mpp2 mpp mqpmget 1
    set %_m_mqpmget 1
    set %m_mqpmget Auto Get Sounds [ON]
    .enable #autoget
    ;echo 9 -a Gaming Mode: Auto Get Sounds [ON]
  }
}

alias allon allonn
alias alloff alloffn

alias allonn {
  /on1
  set %msnd Sounds [ON]
  set %magt MS Agent [ON]
  set %msrv File Server [ON]
  set %mdcs DCC Send (Auto) | .sreqmode auto
  set %mdcc DCC Chat (Auto) | .creqmode auto
  set %rem1 Remote Control [ON]
  set %mget Auto Get Sounds [ON]
  set %xany Anonymous Access [ON]
  set %mpage mIRC Pager [ON]
  set %mp3lt MP3 Listing [ON]
  set %_msnd 1
  set %_magt 1
  set %_msrv 1
  set %_mdcs 1
  set %_mdcc 1
  set %_rem1 1
  set %_mget 1
  set %_xany 1
  set %_mpage 1
  set %_mp3lt 1

  writeini %mpp mpp msnd 1
  writeini %mpp mpp magt 1
  writeini %mpp mpp msrv 1
  writeini %mpp mpp sreqmode auto
  writeini %mpp mpp creqmode auto
  writeini %mpp mpp rem1 1
  writeini %mpp mpp mget 1
  writeini %mpp mpp xany 1
  writeini %mpp mpp mpage 1
  writeini %mpp mpp mp3lt 1

  writeini %mpp2 mpp msnd 1
  writeini %mpp2 mpp magt 1
  writeini %mpp2 mpp msrv 1
  writeini %mpp2 mpp sreqmode auto
  writeini %mpp2 mpp creqmode auto
  writeini %mpp2 mpp rem1 1
  writeini %mpp2 mpp mget 1
  writeini %mpp2 mpp xany 1
  writeini %mpp2 mpp mpage 1
  writeini %mpp2 mpp mp3lt 1

}

alias alloffn {
  /off
  set %msnd Sounds [OFF]
  set %magt MS Agent [OFF]
  set %msrv File Server [OFF]
  set %mdcs DCC Send (Ignore) | .sreqmode ignore
  set %mdcc DCC Chat (Ignore) | .creqmode ignore
  set %rem1 Remote Control [OFF]
  set %mget Auto Get Sounds [OFF]
  set %xany Anonymous Access [OFF]
  set %mpage mIRC Pager [OFF]
  set %mp3lt MP3 Listing [OFF]
  set %_msnd 0
  set %_magt 0
  set %_msrv 0
  set %_mdcs 0
  set %_mdcc 0
  set %_rem1 0
  set %_mget 0
  set %_xany 0
  set %_mpage 0
  set %_mp3lt 0

  writeini %mpp mpp msnd 0
  writeini %mpp mpp magt 0
  writeini %mpp mpp msrv 0
  writeini %mpp mpp sreqmode ignore
  writeini %mpp mpp creqmode ignore
  writeini %mpp mpp rem1 0
  writeini %mpp mpp mget 0
  writeini %mpp mpp xany 0
  writeini %mpp mpp mpage 0
  writeini %mpp mpp mp3lt 0

  writeini %mpp2 mpp msnd 0
  writeini %mpp2 mpp magt 0
  writeini %mpp2 mpp msrv 0
  writeini %mpp2 mpp sreqmode ignore
  writeini %mpp2 mpp creqmode ignore
  writeini %mpp2 mpp rem1 0
  writeini %mpp2 mpp mget 0
  writeini %mpp2 mpp xany 0
  writeini %mpp2 mpp mpage 0
  writeini %mpp2 mpp mp3lt 0

}

alias mqppgr {
  if (%mqppgr == 1) {
    set %m_mqppgr mIRC Pager [OFF]
    set %_m_mqppgr 0
    set %mqppgr 0
    writeini %mpp mpp mqppgr 0
    writeini %mpp2 mpp mqppgr 0
    ;echo -a 4Gaming Mode: mIRC Pager [OFF]
  }
  else {
    set %m_mqppgr mIRC Pager [ON]
    set %mqppgr 1
    writeini %mpp mpp mqppgr 1
    writeini %mpp2 mpp mqppgr 1
    set %_m_mqppgr 1
    ;echo -a 9Gaming Mode: mIRC Pager [ON]
  }
}

alias on1 {
  ;echo %creqmode
  ;echo %sreqmode
  .enable #anon1
  .disable #anon2
  .enable #autoget
  .enable #remote1
  .disable #remote2
  .sound on
  .enable #msagent
  .enable #fserve
  .creq +m %creqmode
  .sreq +m %sreqmode
  /pageron
  /echo 13Normal Event Modes: *** Sounds 9[ON] * MP3 Listing 9[ON] * MS Agent 9[ON] * File Server 9[ON] * Anon File Server 9[ON] * DCC Send 9[ $+ $upper(%sreqmode) $+ ] * DCC Chat 9[ $+ $upper(%creqmode) $+ ] * Remote Control 9[ON] * Auto Get Sounds 9[ON] * mIRC Pager 9[ON] ***
}

alias off {
  ;echo %creqmode
  ;echo %sreqmode
  .disable #anon1
  .enable #anon2
  .disable #autoget
  .sound off
  .disable #msagent
  .disable #fserve
  .enable #remote2
  .disable #remote1
  .creq +m ignore
  .sreq +m ignore
  /pageroff
  /echo 13Normal Event Modes: *** Sounds 4[OFF] * MP3 Listing 4[OFF] * MS Agent 4[OFF] * File Server 4[OFF] * Anon File Server 4[OFF] * DCC Send 4[OFF] * DCC Chat 4[OFF] * Remote Control 4[OFF] * Auto Get Sounds 4[OFF] * mIRC Pager 4[OFF] ***
}

alias allong {
  /on1g
  set %m_mqpsnd Sounds [ON]
  set %m_mqpmagt MS Agent [ON]
  set %m_mqpmsrv File Server [ON]
  set %m_mqpdcs DCC Send [ON]
  set %m_mqpdcc DCC Chat [ON]
  set %m_mqprem1 Remote Control [ON]
  set %m_mqpmget Auto Get Sounds [ON]
  set %m_mqpxany Anonymous Access [ON]
  set %m_mqppgr mIRC Pager [ON]
  set %m_mqpmp3lt MP3 Listing [ON]
  set %mqpsnd 1
  set %mqpmagt 1
  set %mqpmsrv 1
  set %mqpdcs 1
  set %mqpdcc 1
  set %mqprem1 1
  set %mqpmget 1
  set %mqpxany 1
  set %mqppgr 1
  set %mqpmp3lt 1

  set %_m_mqpsnd 1
  set %_m_mqpmagt 1
  set %_m_mqpmsrv 1
  set %_m_mqpdcs 1
  set %_m_mqpdcc 1
  set %_m_mqprem1 1
  set %_m_mqpmget 1
  set %_m_mqpxany 1
  set %_m_mqppgr 1
  set %_m_mqpmp3lt 1

  writeini %mpp mpp mqpsnd 1
  writeini %mpp mpp mqpmagt 1
  writeini %mpp mpp mqpmsrv 1
  writeini %mpp mpp mqpdcs 1
  writeini %mpp mpp mqpdcc 1
  writeini %mpp mpp mqprem1 1
  writeini %mpp mpp mqpmget 1
  writeini %mpp mpp mqpxany 1
  writeini %mpp mpp mqppgr 1
  writeini %mpp mpp mqpmp3lt 1

  writeini %mpp2 mpp mqpsnd 1
  writeini %mpp2 mpp mqpmagt 1
  writeini %mpp2 mpp mqpmsrv 1
  writeini %mpp2 mpp mqpdcs 1
  writeini %mpp2 mpp mqpdcc 1
  writeini %mpp2 mpp mqprem1 1
  writeini %mpp2 mpp mqpmget 1
  writeini %mpp2 mpp mqpxany 1
  writeini %mpp2 mpp mqppgr 1
  writeini %mpp2 mpp mqpmp3lt 1

}

alias alloffg {
  /offg
  set %m_mqpsnd Sounds [OFF]
  set %m_mqpmagt MS Agent [OFF]
  set %m_mqpmsrv File Server [OFF]
  set %m_mqpdcs DCC Send [OFF]
  set %m_mqpdcc DCC Chat [OFF]
  set %m_mqprem1 Remote Control [OFF]
  set %m_mqpmget Auto Get Sounds [OFF]
  set %m_mqpxany Anonymous Access [OFF]
  set %m_mqppgr mIRC Pager [OFF]
  set %m_mqpmp3lt MP3 Listing [OFF]
  set %mqpsnd 0
  set %mqpmagt 0
  set %mqpmsrv 0
  set %mqpdcs 0
  set %mqpdcc 0
  set %mqprem1 0
  set %mqpmget 0
  set %mqpxany 0
  set %mqppgr 0
  set %mqpmp3lt 0

  writeini %mpp mpp mqpsnd 0
  writeini %mpp mpp mqpmagt 0
  writeini %mpp mpp mqpmsrv 0
  writeini %mpp mpp mqpdcs 0
  writeini %mpp mpp mqpdcc 0
  writeini %mpp mpp mqprem1 0
  writeini %mpp mpp mqpmget 0
  writeini %mpp mpp mqpxany 0
  writeini %mpp mpp mqppgr 0
  writeini %mpp mpp mqpmp3lt 0

  writeini %mpp2 mpp mqpsnd 0
  writeini %mpp2 mpp mqpmagt 0
  writeini %mpp2 mpp mqpmsrv 0
  writeini %mpp2 mpp mqpdcs 0
  writeini %mpp2 mpp mqpdcc 0
  writeini %mpp2 mpp mqprem1 0
  writeini %mpp2 mpp mqpmget 0
  writeini %mpp2 mpp mqpxany 0
  writeini %mpp2 mpp mqppgr 0
  writeini %mpp2 mpp mqpmp3lt 0

  set %_m_mqpsnd 0
  set %_m_mqpmagt 0
  set %_m_mqpmsrv 0
  set %_m_mqpdcs 0
  set %_m_mqpdcc 0
  set %_m_mqprem1 0
  set %_m_mqpmget 0
  set %_m_mqpxany 0
  set %_m_mqppgr 0
  set %_m_mqpmp3lt 0

}

alias on1g {
  .enable #anon1
  .disable #anon2
  .enable #autoget
  .enable #remote1
  .disable #remote2
  .sound on
  .enable #msagent
  .enable #fserve
  .creq +m %creqmode
  .sreq +m %sreqmode
  /pageron
  /echo 11Gaming Event Modes: *** Sounds 9[ON] * MP3 Listing 9[ON] * MS Agent 9[ON] * File Server 9[ON] * Anon File Server 9[ON] * DCC Send 9[ON] * DCC Chat 9[ON] * Remote Control 9[ON] * Auto Get Sounds 9[ON] * mIRC Pager 9[ON] ***
}

alias offg {
  set %mqpsnd 0
  .disable #anon1
  .enable #anon2
  .disable #autoget
  .sound off
  .disable #msagent
  .disable #fserve
  .enable #remote2
  .disable #remote1
  .creq +m ignore
  .sreq +m ignore
  /pageroff
  /echo 11Gaming Event Modes: *** Sounds 4[OFF] * MP3 Listing 4[OFF] * MS Agent 4[OFF] * File Server 4[OFF] * Anon File Server 4[OFF] * DCC Send 4[OFF] * DCC Chat 4[OFF] * Remote Control 4[OFF] * Auto Get Sounds 4[OFF] * mIRC Pager 4[OFF] ***
}

alias on2 {
  .sound off
  .disable #msagent
  .enable #fserve
  .creq +m %creqmode
  .sreq +m %sreqmode
  /echo *** Sounds 4[OFF] * MS Agent 4[OFF] * File Server 9[ON] * DCC File/Chat 9[ON] * Remote Control 9[ON] * Auto Get Sounds 9[ON] ***
}

;MP3 Listing (Toggle)
alias mp3lt {
  if (%mp3lt == MP3 Listing [ON]) {
    set %mp3lt MP3 Listing [OFF]
    writeini %mpp mpp mp3lt 0
    writeini %mpp2 mpp mp3lt 0
    set %_mp3lt 0
    ;echo 4 -a Normal Mode: MP3 Listing [OFF]
  }
  else {
    set %mp3lt MP3 Listing [ON]
    set %_mp3lt 1
    writeini %mpp mpp mp3lt 1
    writeini %mpp2 mpp mp3lt 1
    ;echo 9 -a Normal Mode: MP3 Listing [ON]
  }
}

;Remote (Toggle)
alias rem1 {
  if (%rem1 == Remote Control [ON]) {
    set %rem1 Remote Control [OFF]
    set %_rem1 0
    writeini %mpp mpp rem1 0
    writeini %mpp2 mpp rem1 0
    .enable #remote2
    .disable #remote1
    ;echo 4 -a Normal Mode: Remote Control [OFF]
  }
  else {
    set %rem1 Remote Control [ON]
    set %_rem1 1
    writeini %mpp mpp rem1 1
    writeini %mpp2 mpp rem1 1
    .enable #remote1
    .disable #remote2
    ;echo 9 -a Normal Mode: Remote Control [ON]
  }
}

;Auto Get (Toggle)
alias mget {
  if (%mget == Auto Get Sounds [ON]) {
    set %mget Auto Get Sounds [OFF]
    set %_mget 0
    writeini %mpp mpp mget 0
    writeini %mpp2 mpp mget 0
    .disable #autoget
    ;echo 4 -a Normal Mode: Auto Get Sounds [OFF]
  }
  else {
    set %mget Auto Get Sounds [ON]
    set %_mget 1
    writeini %mpp mpp mget 1
    writeini %mpp2 mpp mget 1
    .enable #autoget
    ;echo 9 -a Normal Mode: Auto Get Sounds [ON]
  }
}

;mwe1 (Toggle)
alias mwe1 {
  if (%mwe1 == Explorer View [ON]) {
    set %mwe1 Explorer View [OFF]
    unset %we1
    echo 4 -a Explorer View [OFF]
  }
  else {
    set %mwe1 Explorer View [ON]
    set %we1 /e,
    echo 9 -a Explorer View [ON]
  }
}

;mwe2 (Toggle)
alias mwe2 {
  if (%mwe2 == Root View [ON]) {
    set %mwe2 Root View [OFF]
    set %we2 ""
    echo 4 -a Root View [OFF]
  }
  else {
    set %mwe2 Root View [ON]
    set %we2 /root,
    echo 9 -a Root View [ON]
  }
}

alias a_kill {
  .gunload merlin
  .gload -h merlin merlin.acs
  .gshow merlin 325 275
  .gtalk merlin # $nick Let's get on with the killing. Post an IP now god dammit. Hah hah haha. LOL.
  .ghide merlin
  .timerbyeagt 0 20 /unld
}

alias a_die {
  .gunload genie
  .gload -h genie genie.acs
  .gshow genie 325 275
  .gtalk genie # $nick Alright lamers. It's time to die. Someone get us a fricken server. Hurry up you sons a bitches. Heh heh hehe. ROGL.
  .ghide genie
  .timerbyeagt 0 20 /unld
}

alias a_frag {
  .gunload peedy
  .gload -h peedy peedy.acs
  .gshow peedy 325 275
  .gplay peedy 1
  .gtalk peedy # $nick To frag, or not to frag. That is the question. The answer is much simpler: I will annihilate you. Ha Ha!
  .ghide peedy
  .timerbyeagt 0 20 /unld
}

alias a_kickass {
  .gunload robby
  .gload -h robby robby.acs
  .gshow robby 325 275
  .gplay robby 1
  .gtalk robby # $nick It's time to kick ass and chew bubble gum.  And I'm all out of gum. He He He!
  .ghide robby
  .timerbyeagt 0 20 /unld
}

alias unld {
  .timerbyeagt off
  .gunload genie
  .gunload peedy
  .gunload robby
}

;a quick & dirty agent sample script :p
alias agent1 {
  .gunload merlin
  .gload -h merlin merlin.acs
  .gshow merlin 0 100
  .gtalk merlin Whoa!
  .gtalk merlin How the hell R ya?
  .gplay merlin 4
  .gtalk -w merlin $+(",$mircdirsounds\wav\glory.wav,")
  .gmove merlin 650 100
  .gtalk merlin Time to open up a can of woop ass!
  .gplay merlin 23
  .gmove merlin 325 400
  .gplay merlin 25
  .gtalk merlin Hahaha heh hehe rogl lol
  .gplay merlin 29
  .gtalk merlin I own you. fool!
  .gplay merlin 1
  .gtalk merlin mirc power pack version five point blah blah blah by sargent fuggen D.
  .gtalk merlin god. what a complete asshole.
  .gtalk merlin next thing you know, he will want you to send him some money.
  .gtalk merlin or something
  .gtalk merlin dirty bastard
  .gtalk merlin just /ignore him
  .gtalk merlin thats what I do
  .gtalk merlin he is such a lamer
  .gtalk merlin ok. lay terz
  .gplay merlin 27
  .ghide merlin
  ;.gunload merlin
}

;alias mp3 {
;  /say 13Now Playing MP3: 8 $$?="Group:" 4 $$?="Song:"
;}

alias snd {
  /set -u %sndfile $$dir sounds\*.wav,*.mid,*.mp3
  /sound # $+(",%sndfile,")
  ;/echo 8 $right(%sndfile,3)
  if ( $right(%sndfile,3) == wav ) /say 13! $+ $me $nopath(%sndfile)
  else /say 11! $+ $me $nopath(%sndfile)
}

alias wma {
  /set -u %wmafile $$dir sounds\wma\*.wma
  /sound $+(",%wmafile,")
  /say 11! $+ $me $nopath(%wmafile)
}

alias xmp3 {
  /set -u %mp3file $$dir sounds\mp3\*.mp3
  /sound $+(",%mp3file,")
  /say 13! $+ $me $nopath(%mp3file)
}

alias ogg {
  /set -u %oggfile $$dir sounds\ogg\*.ogg
  /sound $+(",%oggfile,")
  /say 9! $+ $me $nopath(%oggfile)
}

alias wav {
  /set -u %wavfile $$dir sounds\wav\*.wav
  /sound $+(",%wavfile,")
  /say 8! $+ $me $nopath(%wavfile)
}

alias mid {
  /set -u %midfile $$dir sounds\mid\*.mid
  /sound $+(",%midfile,")
  /say 7! $+ $me $nopath(%midfile)
}

alias xmp3-old {
  /set -u %mp3file $$dir sounds\mp3\*.mp3
  ;/echo %mp3file
  /sound # $+(",%mp3file,")
  /say 13! $+ $me $nopath(%mp3file)
  ;/snddir
  ;/set -u %mp3file $$?="MP3 File:" $$+ .mid
  ;/say 9Now Playing:10 $nopath(%mp3file)
}

alias ddwma if (%soundreport != 0) { /say 11! $+ $me $nopath(%ddwma) }
alias ddmp3 if (%soundreport != 0) { /say 13! $+ $me $nopath(%ddmp3) }
alias ddogg if (%soundreport != 0) { /say 9! $+ $me $nopath(%ddogg) }
alias ddwav if (%soundreport != 0) { /say 8! $+ $me $nopath(%ddwav) }
alias ddmid if (%soundreport != 0) { /say 7! $+ $me $nopath(%ddmid) }

alias ddwma_old {
  /echo 13 -a %ddwma
  /set %xxm $nopath(%ddwma)
  /set %xxn $+(",$mircdir,") $+ wma\ $+ %xxm
  /echo 8 -a file only: %xxm
  ;  if $exists( %ddwma ) {

  if $exists( %xxn ) {

    /echo 9 -a TRUE
  }
  else /echo 4 -a FALSE
  /echo 11 -a $+(",$mircdir,") $+ wma\ $+ %xxm
  /run %ddwma
  /say 8! $+ $me $nopath(%ddwma)
}

alias ddmp32 {
  /echo 13 -a %ddmp3
  /set %xxm $nopath(%ddmp3)
  /set %xxn $+(",$mircdir,") $+ mp3\ $+ %xxm
  /echo 8 -a file only: %xxm
  ;  if $exists( %ddmp3 ) {

  if $exists( %xxn ) {

    /echo 9 -a TRUE
  }
  else /echo 4 -a FALSE
  /echo 11 -a $+(",$mircdir,") $+ mp3\ $+ %xxm
  ;  /run %ddmp3
  /say 8! $+ $me $nopath(%ddmp3)
}

alias snddir /run explorer.exe /e, $+(",$mircdirsounds,")
alias wmadir /run explorer.exe /e, $+(",$mircdirsounds\wma,")
alias mp3dir /run explorer.exe /e, $+(",$mircdirsounds\mp3,")
alias oggdir /run explorer.exe /e, $+(",$mircdirsounds\ogg,")
alias wavdir /run explorer.exe /e, $+(",$mircdirsounds\wav,")
alias middir /run explorer.exe /e, $+(",$mircdirsounds\mid,")
alias dndir /run explorer.exe /e, $+(",$mircdirdownload,")

;alias pub /join #sod
;alias pvt /join #sodpvt $network $+ #sodpvt
;alias q1 /join #sod_q1 %key1
;alias q2 /join #sod_q2 %key1
;alias q3 /join #sod_q3 %key1
alias mq++ /join #mq+
;alias mpp /join #mpp

;alias many /run explorer.exe %we1 %we2 $+ $mircdir $+ fserve\adm\sec\pvt\pub\any
;alias mpub /run explorer.exe %we1 %we2 $+ $mircdir $+ fserve\adm\sec\pvt\pub
;alias mpvt /run explorer.exe %we1 %we2 $+ $mircdir $+ fserve\adm\sec\pvt
;alias msec /run explorer.exe %we1 %we2 $+ $mircdir $+ fserve\adm\sec
;alias madm /run explorer.exe %we1 %we2 $+ $mircdir $+ fserve\adm
;alias mall /run explorer.exe %we1 $+ $mircdir $+ fserve

alias kill /say @kill | /a_kill
alias die /say @die | /a_die
alias frag /say @frag | /a_frag
alias kickass /say @kickass | /a_kickass

alias status statusn | statusg

alias statusn {
  if (%msnd == Sounds [ON]) /set %msnd2 Sounds 9[ON]
  else /set %msnd2 Sounds 4[OFF]
  if (%magt == MS Agent [ON]) /set %magt2 MS Agent 9[ON]
  else /set %magt2 MS Agent 4[OFF]
  if (%msrv == File Server [ON]) /set %msrv2 File Server 9[ON]
  else /set %msrv2 File Server 4[OFF]
  if (%xany == Anonymous Access [ON]) /set %xany2 Anon File Server 9[ON]
  else /set %xany2 Anon File Server 4[OFF]

  if (%mdcs == DCC Send (Auto)) /set %mdcs2 DCC Send 9[AUTO]
  else if (%mdcs == DCC Send (Ask)) /set %mdcs2 DCC Send 8[ASK]
  else /set %mdcs2 DCC Send 4[OFF]

  if (%mdcc == DCC Chat (Auto)) /set %mdcc2 DCC Chat 9[AUTO]
  else if (%mdcc == DCC Chat (Ask)) /set %mdcc2 DCC Chat 8[ASK]
  else /set %mdcc2 DCC Chat 4[OFF]

  if (%rem1 == Remote Control [ON]) /set %rem12 Remote Control 9[ON]
  else /set %rem12 Remote Control 4[OFF]
  if (%mget == Auto Get Sounds [ON]) /set %mget2 Auto Get Sounds 9[ON]
  else /set %mget2 Auto Get Sounds 4[OFF]

  if (%mpage == mIRC Pager [ON]) /set -u %mpage2 mIRC Pager 9[ON]
  else /set -u %mpage2 mIRC Pager 4[OFF]

  if (%mp3lt == MP3 Listing [ON]) /set -u %mp3lt2 MP3 Listing 9[ON]
  else /set -u %mp3lt2 MP3 Listing 4[OFF]

  /echo 13Normal Event Modes: *** %msnd2 * %mp3lt2 * %magt2 * %msrv2 * %xany2 * %mdcs2 * %mdcc2 * %rem12 * %mget2 * %mpage2 ***

}

alias statusg status2

alias status2 {

  if (%m_mqpsnd == Sounds [ON]) /set %m_mqpmsnd2 Sounds 9[ON]
  else /set %m_mqpmsnd2 Sounds 4[OFF]

  if (%m_mqpmagt == MS Agent [ON]) /set %m_mqpmagt2 MS Agent 9[ON]
  else /set %m_mqpmagt2 MS Agent 4[OFF]

  if (%m_mqpmsrv == File Server [ON]) /set %m_mqpmsrv2 File Server 9[ON]
  else /set %m_mqpmsrv2 File Server 4[OFF]

  if (%m_mqpxany == Anonymous Access [ON]) /set %m_mqpxany2 Anon File Server 9[ON]
  else /set %m_mqpxany2 Anon File Server 4[OFF]

  if (%m_mqpdcs == DCC Send [ON]) /set %m_mqpdcs2 DCC Send 9[ON]
  else if (%m_mqpdcs == DCC Send [ASK]) /set %m_mqpdcs2 DCC Send 8[ASK]
  else /set %m_mqpdcs2 DCC Send 4[OFF]

  if (%m_mqpdcc == DCC Chat [ON]) /set %m_mqpdcc2 DCC Chat 9[ON]
  else if (%m_mqpdcc == DCC Chat [ASK]) /set %m_mqpdcc2 DCC Chat 8[ASK]
  else /set %m_mqpdcc2 DCC Chat 4[OFF]

  if (%m_mqprem1 == Remote Control [ON]) /set %m_mqprem12 Remote Control 9[ON]
  else /set %m_mqprem12 Remote Control 4[OFF]

  if (%m_mqpmget == Auto Get Sounds [ON]) /set %m_mqpmget2 Auto Get Sounds 9[ON]
  else /set %m_mqpmget2 Auto Get Sounds 4[OFF]

  if (%m_mqppgr == mIRC Pager [ON]) /set -u %m_mqppgr2 mIRC Pager 9[ON]
  else /set -u %m_mqppgr2 mIRC Pager 4[OFF]

  if (%m_mqpmp3lt == MP3 Listing [ON]) /set -u %m_mqpmp3lt2 MP3 Listing 9[ON]
  else /set -u %m_mqpmp3lt2 MP3 Listing 4[OFF]

  /echo 11Gaming Event Modes: *** %m_mqpmsnd2 * %m_mqpmp3lt2 * %m_mqpmagt2 * %m_mqpmsrv2 * %m_mqpxany2 * %m_mqpdcs2 * %m_mqpdcc2 * %m_mqprem12 * %m_mqpmget2 * %m_mqppgr2 ***

}

alias icqset {

  /set %myicq $?="My ICQ# ( $+ %myicq2 $+ ):"
  if (%myicq == $null) /set %myicq %myicq2
  /set %myicq2 %myicq

  /set %myemail $?="My Email ( $+ %myemail2 $+ ):"
  if (%myemail == $null) /set %myemail %myemail2
  /set %myemail2 %myemail

  /echo 8 ICQ Setup Complete
  /echo 13 My ICQ#: %myicq
  /echo 13 My Email: %myemail

}

alias about2 {
  echo -a 
  echo -a 13,1m0IRC 4,1P0,1ower 8,1P0,1ack 00,01 $+ %mpp.version3 0,1(12,1 $+ %mpp.website $+ 0,1)
  echo -a 
  echo -a 14,1Created by: 14,1sod4,1/0,1sgt-d 0,1(12,1 $+ %mpp.email $+ 0,1)
  echo -a 
  echo -a 14,1Build Date:0,1 %mpp.builddate
  echo -a 
  echo -a 14,1MPP Web Site:12,1 %mpp.website $+ 0,1
  echo -a 
  echo -a 14,1MPP Forums:12,1 %mpp.forums 0,1
  echo -a 
  echo -a 14,1Help Channel: 0irc://irc.enterthegame.com:6667/mpp
  echo -a 
  ;  mppabout
}

alias iedit /run notepad.exe $+(",$mircdirsystem\mpp\icq.dat,")

alias stop /splay stop

alias someoff {
  /off3
  set %mdcc DCC File/Chat [OFF]
  set %msnd Sounds [OFF]
  set %mpage mIRC Pager [OFF]
}

alias off3 {
  .disable #autoget
  .creq +m ignore
  .sreq +m ignore
  .sound off
  ;  /pageroff
  /echo *** Sounds 4[OFF] * DCC File/Chat 4[OFF] ***
}

alias someon {
  /on3
  set %mdcc DCC File/Chat [ON]
  set %msnd Sounds [ON]
  ;  set %mpage mIRC Pager [ON]
}

alias on3 {
  .enable #autoget
  .creq +m %creqmode
  .sreq +m %sreqmode
  .sound on
  ;  /pageron
  /echo *** Sounds 9[ON] * DCC File/Chat 9[ON] ***
}

;on *:dns:{}

;Q3 Quick Ping!
;some of this is a paraphrased snippet rip from Shane's Autoping script...

alias qp {
  set %autopingchan #
  if ($1 == $null) {
    set %tmp $$?="Q3 Quick Ping!:  Enter the server address (do NOT include the PORT!). $crlf $+ Example: sgc.clanxux.net:27960"
    /dns %tmp
  }
  else {
    /dns $1
  }
  set %autopingquiet 0
  set %autopingudp 1
  q3ping %two
  write -c %apbat ping -n 10 -w 1000 $chr(37) $+ 1 > %aptxt
  write -c %aptxt checking pings...
  autopingparseip %two
  set %autopingtimer 0
  .timerautoping 300 1 /checkautopingfile
}

alias qp2 {
  set %autopingchan #
  if ($1 == $null) {
    set %one $$?="Q3 Quick Ping!:  Enter the server address (port is optional). $crlf $+ Example: sgc.clanxux.net:27960"
  }
  else {
    set %one $1
  }
  set %autopingquiet 0
  set %autopingudp 1
  q3ping %one
  write -c %apbat ping -n 10 -w 1000 $chr(37) $+ 1 > %aptxt
  write -c %aptxt checking pings...
  autopingparseip %one
  set %autopingtimer 0
  .timerautoping 300 1 /checkautopingfile
}

alias mppset mgr

alias mppset2 {
  /snick
  /sndset
  /icqset
  /echo -a -
  /echo -a 13m0IRC 4P0ower 8P0ack 00 $+ %mpp.version3 0(12 $+ %mpp.website $+ 0) by 14,1sod4,1/0,1sgt-d 0(12 $+ %mpp.email $+ 0)
  /echo -a 
  /echo -a 8Setup Complete! 0,12:)
  /echo -a -
}

alias mamp { showplayer }
alias mamp1 mamp
alias mamp0 { hideplayer }

alias qt qtopen
alias as arenascout
alias ms mircscout
alias mg mg.launch
alias mq { mqa.opendialog mqa }

alias mss mssetup
alias msh sshelp

alias hehe { /_icq.earthquake -on -forever 1 }
alias icqon set %smarticq 1
alias icqoff set %smarticq 0

alias mppxinit {
  set %mpptst $scid(0)
  set %i 1
  %mpptst = %mpptst + %i
  ;echo -a mpptst = %mpptst

  :next
  ;echo i = %i
  if ( $scid(%i).network == enterthegame) { set %mppx1 $scid(%i) }
  if ( $scid(%i).network == gamesurge) { set %mppx2 $scid(%i) }
  if (%i == %mpptst) { goto done }
  inc %i
  goto next
  :done
  mpp.init2
}

alias nick {
  if ($cid == 1) {
    set %qnick $1
    set %abc @ $+ $1
    set %cba ! $+ $1
    ;set %cbz ~ $+ $1
  }
  if $1 { nick $1 }
}

alias norm back
alias normal back

alias back {
  if ($cid == 1 ) { set %mpp.away1 0 | nick %mpp.nick1 }
  if ($cid == 2 ) { set %mpp.away2 0 | nick %mpp.nick2 }
  if ($cid == 3 ) { set %mpp.away3 0 | nick %mpp.nick3 }
  if ($cid == 4 ) { set %mpp.away4 0 | nick %mpp.nick4 }
  if ($cid == 5 ) { set %mpp.away5 0 | nick %mpp.nick5 }
  if ($cid == 6 ) { set %mpp.away6 0 | nick %mpp.nick6 }
  if ($cid == 7 ) { set %mpp.away7 0 | nick %mpp.nick7 }
  if ($cid == 8 ) { set %mpp.away8 0 | nick %mpp.nick8 }
  if ($cid == 9 ) { set %mpp.away9 0 | nick %mpp.nick9 }
  if ($cid == 10 ) { set %mpp.away10 0 | nick %mpp.nick10 }
  /away
}

;used my mas
;on away... reason, then nick change
alias away3 {
  if ($cid == 1) { set %mpp.anick1 %mpp.nick1 $+ $1 | set %mpp.away1 1 | unset %awayreason | set %awayreason $2- | away3b | nick %mpp.anick1 }
  if ($cid == 2) { set %mpp.anick2 %mpp.nick2 $+ $1 | set %mpp.away2 1 | unset %awayreason | set %awayreason $2- | away3b | nick %mpp.anick2 }
  if ($cid == 3) { set %mpp.anick3 %mpp.nick3 $+ $1 | set %mpp.away3 1 | unset %awayreason | set %awayreason $2- | away3b | nick %mpp.anick3 }
  if ($cid == 4) { set %mpp.anick4 %mpp.nick4 $+ $1 | set %mpp.away4 1 | unset %awayreason | set %awayreason $2- | away3b | nick %mpp.anick4 }
  if ($cid == 5) { set %mpp.anick5 %mpp.nick5 $+ $1 | set %mpp.away5 1 | unset %awayreason | set %awayreason $2- | away3b | nick %mpp.anick5 }
  if ($cid == 6) { set %mpp.anick6 %mpp.nick6 $+ $1 | set %mpp.away6 1 | unset %awayreason | set %awayreason $2- | away3b | nick %mpp.anick6 }
  if ($cid == 7) { set %mpp.anick7 %mpp.nick7 $+ $1 | set %mpp.away7 1 | unset %awayreason | set %awayreason $2- | away3b | nick %mpp.anick7 }
  if ($cid == 8) { set %mpp.anick8 %mpp.nick8 $+ $1 | set %mpp.away8 1 | unset %awayreason | set %awayreason $2- | away3b | nick %mpp.anick8 }
  if ($cid == 9) { set %mpp.anick9 %mpp.nick9 $+ $1 | set %mpp.away9 1 | unset %awayreason | set %awayreason $2- | away3b | nick %mpp.anick9 }
  if ($cid == 10) { set %mpp.anick10 %mpp.nick10 $+ $1 | set %mpp.away10 1 | unset %awayreason | set %awayreason $2- | away3b | nick %mpp.anick10 }
}

;used my mas
;on away... reason, no nick change
alias away4 {
  if ($cid == 1) { set %mpp.anick1 %mpp.nick1 $+ $1 | set %mpp.away1 1 | unset %awayreason | set %awayreason $2- | away3b }
  if ($cid == 2) { set %mpp.anick2 %mpp.nick2 $+ $1 | set %mpp.away2 1 | unset %awayreason | set %awayreason $2- | away3b }
  if ($cid == 3) { set %mpp.anick3 %mpp.nick3 $+ $1 | set %mpp.away3 1 | unset %awayreason | set %awayreason $2- | away3b }
  if ($cid == 4) { set %mpp.anick4 %mpp.nick4 $+ $1 | set %mpp.away4 1 | unset %awayreason | set %awayreason $2- | away3b }
  if ($cid == 5) { set %mpp.anick5 %mpp.nick5 $+ $1 | set %mpp.away5 1 | unset %awayreason | set %awayreason $2- | away3b }
  if ($cid == 6) { set %mpp.anick6 %mpp.nick6 $+ $1 | set %mpp.away6 1 | unset %awayreason | set %awayreason $2- | away3b }
  if ($cid == 7) { set %mpp.anick7 %mpp.nick7 $+ $1 | set %mpp.away7 1 | unset %awayreason | set %awayreason $2- | away3b }
  if ($cid == 8) { set %mpp.anick8 %mpp.nick8 $+ $1 | set %mpp.away8 1 | unset %awayreason | set %awayreason $2- | away3b }
  if ($cid == 9) { set %mpp.anick9 %mpp.nick9 $+ $1 | set %mpp.away9 1 | unset %awayreason | set %awayreason $2- | away3b }
  if ($cid == 10) { set %mpp.anick10 %mpp.nick10 $+ $1 | set %mpp.away10 1 | unset %awayreason | set %awayreason $2- | away3b | }
}

alias away3b {
  if (%mpp.awaytype == notice) { if (%awayreason != $null) { ame %awayreason } }
  elseif (%mpp.awaytype == message) { if (%awayreason != $null) { amsg %awayreason } }
  away %awayreason
}

;used my mas
;on back... nick change, then reason
alias back2 {
  if ($cid == 1 ) { set %mpp.away1 0 | nick %mpp.nick1 | set %backreason $1- }
  if ($cid == 2 ) { set %mpp.away2 0 | nick %mpp.nick2 | set %backreason $1- }
  if ($cid == 3 ) { set %mpp.away3 0 | nick %mpp.nick3 | set %backreason $1- }
  if ($cid == 4 ) { set %mpp.away4 0 | nick %mpp.nick4 | set %backreason $1- }
  if ($cid == 5 ) { set %mpp.away5 0 | nick %mpp.nick5 | set %backreason $1- }
  if ($cid == 6 ) { set %mpp.away6 0 | nick %mpp.nick6 | set %backreason $1- }
  if ($cid == 7 ) { set %mpp.away7 0 | nick %mpp.nick7 | set %backreason $1- }
  if ($cid == 8 ) { set %mpp.away8 0 | nick %mpp.nick8 | set %backreason $1- }
  if ($cid == 9 ) { set %mpp.away9 0 | nick %mpp.nick9 | set %backreason $1- }
  if ($cid == 10 ) { set %mpp.away10 0 | nick %mpp.nick10 | set %backreason $1- }
  if (%mpp.awaytype == notice) { if (%backreason != $null) { ame %backreason } }
  elseif (%mpp.awaytype == message) { if (%backreason != $null) { amsg %backreason } }
  /away
}

alias mqpsndon { %mqpsnd 1 }
alias mqpsndoff { %mqpsnd 0 }
alias mqpdcson { %mqpdcs 1 }
alias mqpdcsoff { %mqpdcs 0 }
alias mqpdccon { %mqpdcc 1 }
alias mqpdccoff { %mqpdcc 0 }

alias creqmode {
  if ($2 == 0) || ($2 == off) || ($2 == ignore) { set %creqmode ignore }
  if ($2 == 1) || ($2 == on) || ($2 == auto) { set %creqmode auto }
  if ($2 == 2) || ($2 == ask) { set %creqmode ask }
}

alias sreqmode {
  if ($2 == 0) || ($2 == off) || ($2 == ignore) { set %sreqmode ignore }
  if ($2 == 1) || ($2 == on) || ($2 == auto) { set %sreqmode auto }
  if ($2 == 2) || ($2 == ask) { set %sreqmode ask }
}

on ^*:hotlink:*[e-mail]*:* { return }
on *:hotlink:*[e-mail]*:* { run mailto:[e-mail]?subject=MPP%20 $+ %mpp.version }

on ^*:hotlink:*[e-mail]*:* { return }
on *:hotlink:*[e-mail]*:* { run mailto:[e-mail]?subject=MPP%20 $+ %mpp.version }

on ^*:hotlink:*[e-mail]*:* { return }
on *:hotlink:*[e-mail]*:* { run mailto:[e-mail]?subject=MPP%20 $+ %mpp.version }

;now, if the first 6 chars of any text are:  irc://
;then treat it as a hotlink for an irc server & channel combo
;this sets %irchotlink to:  irc://
alias irchotlinkset { set %irchotlink irc $+ $chr(58) $+ $chr(47) $+ $chr(47) }
on ^*:hotlink:*:* { if ($left($1,6) == %irchotlink) return | halt }
on *:hotlink:*:* { run $1 }
;now if a user types:  irc://irc.enterthegame.com:6667/sod
;it will be a hotlink you can double click on to autojoin
;you will connect to the server and join #sod



alias keytest {
  set %i 1
  :next
  echo 9 %i = $chr(%i)
  if (%i == 256) { goto done }
  inc %i
  goto next
  :done
}

alias mpp.init2 {
  .timermppinit off
  scid %mppx1 mppx
  scid %mppx2 mppx
  unset %mppx1 %mppx2
}

;on 1:dns: echo -a IAddress: $iaddress - RAddress: $raddress

;mpp control center aliases

alias mhs run -p $+(",$mircdirsystem\mpp\mhs.exe,") $1

alias mcc run -p $+(",$mircdirsystem\mpp\mcc.exe,") $1-
alias mpp mcc
alias mgr mcc

alias mccmain mcc /main
alias mppmain mccmain

alias mccevents1 mcc /events1
alias mppevents1 mccevents1

alias mccevents2 mcc /events2
alias mppevents2 mccevents2

alias mcctimestamp mcc /timestamp
alias mpptimestamp mcctimestamp

alias mccconnections mcc /connections
alias mppconnections mccconnections

alias mccnetwork mcc /network
alias mppnetwork mccnetwork

alias mccetg mcc /etg
alias mppetg mccetg

alias mccpgp mcc /pgp
alias mpppgp mccpgp

alias mccother mcc /other
alias mppother mccother

alias mccres mcc /res
alias mppres mccres

alias mcccol mcc /colors
alias mppcol mcccol

alias mccrgb mcc /rgb
alias mpprgb mccrgb

alias mqpset mppgames

alias mccgames mcc /games
alias mppgames mccgames

alias mccteamspeak mcc /teamspeak
alias mppteamspeak mccteamspeak
alias mccts mccteamspeak

alias mccv mcc /ventrilo
alias mccvent mccv
alias mccventrilo mccv

alias mcchelp mcc /help
alias mpphelp mcchelp

alias mmx mcc /diagon $1-

alias webhelp run %mpp.website $+ /help

alias mccimg mcc /img
alias mccrw mcc /rw
alias mccsodpit mcc /sodpit

;Benchmark Aliases

alias 3dmark03 { if ($exists(%3dmark03)) run -p %3dmark03 $1 | else run http://www.futuremark.com/download/?3dmark03.shtml }
alias pcmark02 { if ($exists(%pcmark02)) run -p %pcmark02 $1 | else run http://www.futuremark.com/download/?pcmark2002.shtml }
alias 3dmark01 { if ($exists(%3dmark01)) run -p %3dmark01 $1 | else run http://www.futuremark.com/download/?3dmark2001.shtml }
alias 3dmark00 { if ($exists(%3dmark00)) run -p %3dmark00 $1 | else run http://www.futuremark.com/download/?3dmark2000.shtml }
alias video00 { if ($exists(%video00)) run -p %video00 $1 | else run http://www.futuremark.com/download/?video2000.shtml }
alias 3dmark99 { if ($exists(%3dmark99)) run -p %3dmark99 $1 | else run http://www.futuremark.com/download/?3dmark99max.shtml }
alias xlr8r { if ($exists(%xlr8r)) run -p %xlr8r $1 | else run http://www.futuremark.com/download/?xl-r8r.shtml }
alias xl-r8r xlr8r

alias nbench2 { if ($exists(%nbench2)) run -p %nbench2 $1 | else { run http://www.benchmarkhq.ru/cgi-bin/click.cgi?137 | run http://www.majorgeeks.com/article.php?sid=156 } }
alias nbench1 { if ($exists(%nbench1)) run -p %nbench1 $1 | else { run http://www.pc-gamers.com/article.php?sid=64&website=pc-gamers | run http://www.abitboy.com/files/nbench.zip } }
alias glxs { if ($exists(%glxs)) run -p %glxs $1 | else run http://www.glexcess.com }
alias glexcess glxs
alias dronez { if ($exists(%dronez)) run -p %dronez $1 | else run http://www.majorgeeks.com/article.php?sid=136&cat=4 }
alias glmark { if ($exists(%glmark)) run -p %glmark $1 | else run http://www.vulpine.de/demos_benchmark.html }
alias fr { if ($exists(%fr)) run -p %fr $1 | else run http://www.remedy-ent.com/fr }
alias sandra { if ($exists(%sandra)) run -p %sandra $1 | else run http://www.sisoftware.net/index.html?dir=&location=sware_dl&langx=en&a= }

;External Program Aliases

alias dstudio run -p $+(",$mircdirsystem\dstudio\dstudio.exe,")
alias smicqset /_icq.dlg_settings
alias sicqs smicqset
alias sicq smarticq

alias gamespy { if ($exists(%gsexe)) run -p %gsexe $1- | else run http://www.gamespy3d.com }

alias ase { if ($exists(%ase)) run -p %ase $1- | else run http://www.udpsoft.com/eye }

;wolfenstein demo player
alias wdp { if ($exists(%wdp)) run -p %wdp $1- | else run www.3dcenter.de/dsc/beta.php }

;demoshow creator, q3 demo player
alias dsc { if ($exists(%dsc)) run -p %dsc $1- | else run www.3dcenter.de/dsc/beta.php }

;seismovision, multi game demo player
alias seismovision { if ($exists(%seismovision)) run -p %seismovision $1- | else run http://www.planetquake3.net/seismovision }
alias seismo seismovision

alias xteq xsetup
alias x-teq xsetup
alias xsetup { if ($exists(%xsetup)) run -p %xsetup /LAUNCH_CLASSIC_UI $1- | else run http://www.xteq.com/products/xset }
alias xwizard { if ($exists(%xsetup)) run -p %xsetup /LAUNCH_WIZARDS $1- | else run http://www.xteq.com/products/xset }

alias pcany { if ($exists(%pcany)) run -p %pcany /r $1- | else run http://www.symantec.com }
alias avg { if ($exists(%avg)) run -p %avg $1- | else run http://www.grisoft.com/html/us_downl.htm }
alias avgcc { if ($exists(%avgcc)) run -p %avgcc $1- | else run http://www.grisoft.com/html/us_downl.htm }
alias zonealarm { if ($exists(%zonealarm)) run -p %zonealarm $1- | else run http://www.zonelabs.com }
alias liquid { if ($exists(%liquid)) run -p %liquid $1- | else run http://www.liquidaudio.com/products/liqplayer }

alias winamp { if ($exists(%winamp)) run -p %winamp $1- | else run http://www.winamp.com }
alias winamp3 { if ($exists(%winamp3)) run -p %winamp3 $1- | else run http://www.winamp.com }

alias kjofol { if ($exists(%kjofol)) run -p %kjofol $1- | else run http://www.team-mp3.com/mp3/players/kjofol.htm }
alias sonique { if ($exists(%sonique)) run -p %sonique $1- | else run http://www.sonique.com }
alias qcd { if ($exists(%qcd)) run -p %qcd $1- | else run http://www.quinnware.com/news.html }
alias rcon { if ($exists(%rcon)) run -p %rcon $1- | else run http://www.planetquake.com/fragomatic/app_rcon.asp }
alias 3dna { if ($exists(%3dna)) run -p %3dna -open | else run http://www.3dna.net }

alias mbm { if ($exists(%mbm5)) run -p %mbm5 | else run http://mbm.livewiredev.com }
alias mbm5 mbm

alias msn { if ($exists(%msnmsgr)) run -p %msnmsgr | run http://messenger.microsoft.com }
alias aim { if ($exists(%aim)) run -p %aim | else run http://www.aim.com }
alias xpantispy { if ($exists(%xpantispy)) run -p %xpantispy | else run http://www.xp-antispy.de/index.html?/news-e.htm }
alias adaware { if ($exists(%adaware)) run -p %adaware | else run http://www.lavasoftusa.com/software/adaware }
alias mozilla { if ($exists(%mozilla)) run -p %mozilla | else run http://www.mozilla.org }
alias mozmail { if ($exists(%mozilla)) run -p %mozilla -mail | else run http://www.mozilla.org }
alias mwash { if ($exists(%mailwasher)) run -p %mailwasher | else run http://mailwasher.net }
alias icq { if ($exists(%icq)) run -p %icq $1- | else run http://www.icq.com/download }
alias nav { if ($exists(%nav)) run -p %nav | else run http://http://www.symantec.com/nav/nav_pro }
alias nu { if ($exists(%nui)) run -p %nui | else run http://http://www.symantec.com }
alias vnc { if ($exists(%vncviewer)) run -p %vncviewer | else run http://www.tightvnc.com }
alias vncd { if ($exists(%vncserver)) run -p %vncserver | else run http://www.tightvnc.com }

alias ipchicken run http://www.ipchicken.com

alias ipmonster { if ($exists(%ipmonster)) run -p %ipmonster $1- | else run %mpp.sodpit $+ /files/ipm.exe }

alias grc run explorer.exe $+(",$mircdirsystem\grc,")
alias scsiid run $+(",$mircdirsystem\grc\scsiid.exe,")
alias idserve run $+(",$mircdirsystem\grc\idserve.exe,")
alias ipagent run $+(",$mircdirsystem\grc\ipagent.exe,")
alias leaktest run $+(",$mircdirsystem\grc\leaktest.exe,")
alias letshare run $+(",$mircdirsystem\grc\letshare.exe,")
alias dcombob run $+(",$mircdirsystem\grc\dcombob.exe,")
alias noshare run $+(",$mircdirsystem\grc\noshare.exe,")
alias patchwork run $+(",$mircdirsystem\grc\patchwrk.exe,")
alias socketlock run $+(",$mircdirsystem\grc\socketlock.exe,")
alias sockettome run $+(",$mircdirsystem\grc\sockettome.exe,")
alias unpnp run $+(",$mircdirsystem\grc\unpnp.exe,")
alias xpdite run $+(",$mircdirsystem\grc\xpdite.exe,")
alias shields run https://grc.com/x/ne.dll?bh0bkyd2

alias secchk run http://security.symantec.com/default.asp?productid=symhome&langid=ie&venid=sym
alias inet run control.exe inetcpl.cpl
alias admtools run %admtools
alias mas run -p $+(",$mircdirsystem\mpp\mas.exe,")
alias mppup echo -a 4Sorry, not implemented yet.
alias mppweb run %mpp.website $+ /mpp
alias asservers { arenascout | did -c arenascout 3 }
alias assearch { arenascout | did -c arenascout 4 }
alias assetup { arenascout | did -c arenascout 5 }
alias mgsetup { mg.opendialog mg.setup }
alias mmset run control.exe mmsys.cpl
alias dispset run control.exe desk.cpl
alias display dispset
alias sysset run control.exe sysdm.cpl
alias wmp run "C:\Program Files\Windows Media Player\wmplayer.exe"
alias ex run c:\windows\explorer.exe /e, c:\
alias cmd run %mppcmd /k cd c:\
alias ie run "c:\program files\internet explorer\iexplore.exe"
alias oe run "c:\program files\outlook express\msimn.exe"
alias nmail run mailto:
alias control run control.exe
alias msinfo run "c:\program files\common files\microsoft shared\msinfo\msinfo32.exe"
alias faq mircfaq.hlp
alias xcp1 run notepad $+(",$mircdirsystem\cpanel\cpanel1.ini,")
alias xcp2 run notepad $+(",$mircdirsystem\cpanel\cpanel2.ini,")
alias xcp3 cp3a
alias xcp3a run notepad $+(",$mircdirsystem\cpanel\cpanel3a.ini,")
alias xcp3b run notepad $+(",$mircdirsystem\cpanel\cpanel3b.ini,")
alias cp1 cpanel1
alias cp2 cpanel2
alias cp3 cpanel3
alias nvd run nvtuicpl.cpl


;for xp xpanel users
#xpaliases on
alias winipcfg { if ($exists(%wntipcfg)) run -p %wntipcfg $1- | else run http://download.microsoft.com/download/win2000platform/wntipcfg/1.00.0.1/nt5/en-us/WntIpcfg_setup.exe }
alias events run c:\windows\system32\eventvwr.msc
alias taskman run c:\windows\system32\taskmgr.exe
alias msconfig run "c:\windows\pchealth\helpctr\binaries\msconfig.exe"
alias tweakui { if ($exists(%tweakui)) run -p %tweakui $1- | else run http://www.microsoft.com/windowsxp/pro/downloads/powertoys.asp }
alias drwatson run "c:\windows\system32\drwtsn32.exe"
alias dxdiag run "c:\windows\system32\dxdiag.exe"
alias devman run devmgmt.msc
alias perfmon run perfmon.msc
alias perfman perfmon
alias compman run compmgmt.msc
alias services run services.msc
;alias nv run C:\WINDOWS\system32\RUNDLL32.EXE nvcpl.dll,setview
alias nv run C:\WINDOWS\system32\RUNDLL32.EXE Desk.Cpl,DisplayClassInstaller
alias nvt run C:\WINDOWS\system32\RUNDLL32.EXE nvcpl.dll,NvQTweak

#xpaliases end

;for win98 cpanel users
#98aliases off
alias winipcfg run -p %winipcfg $1-
alias taskman run c:\windows\taskman.exe
alias msconfig run "c:\windows\system\msconfig.exe"
alias tweakui run C:\WINDOWS\control.exe tweakui.cpl
alias drwatson run "c:\windows\drwatson.exe"
alias dxdiag run "c:\windows\system\dxdiag.exe"
alias devman run C:\WINDOWS\RUNDLL32.EXE shell32.dll,Control_RunDLL SYSDM.CPL ,1
alias perform run C:\WINDOWS\RUNDLL32.EXE shell32.dll,Control_RunDLL SYSDM.CPL ,3
alias sysmon run "c:\windows\sysmon.exe"
alias qfecheck run "c:\windows\qfecheck.exe"
#98aliases end

;set default game tool
alias mpp.arenascout { mpp.off1 | writeini %mpp2 mpp gametool arenascout | writeini %mpp mpp gametool arenascout | .enable #mpp.arenascout | set %mpp.default arenascout | set %mpp.b.as $style(1) ArenaScout }
alias mpp.multibrowser { mpp.off1 | writeini %mpp2 mpp gametool multibrowser | writeini %mpp mpp gametool multibrowser | .enable #mpp.multibrowser | set %mpp.default multibrowser | set %mpp.b.mb $style(1) Multi Browser }
alias mpp.qtool { mpp.off1 | writeini %mpp2 mpp gametool qtool | writeini %mpp mpp gametool qtool | .enable #mpp.qtool | set %mpp.default qtool | set %mpp.b.qt $style(1) QTool }
alias mpp.mircscout { mpp.off1 | writeini %mpp2 mpp gametool mircscout | writeini %mpp mpp gametool mircscout | .enable #mpp.mircscout | set %mpp.default mircscout | set %mpp.b.ms $style(1) mIRCScout }
alias mpp.multigate { mpp.off1 | writeini %mpp2 mpp gametool multigate | writeini %mpp mpp gametool multigate | .enable #mpp.multigate | set %mpp.default multigate | set %mpp.b.mg $style(1) MultiGate }
alias mpp.mqadmin { mpp.off1 | writeini %mpp2 mpp gametool mqadmin | writeini %mpp mpp gametool mqadmin | .enable #mpp.mqadmin | set %mpp.default mqadmin | set %mpp.b.mq $style(1) MQAdmin }

;turn all game tools off
alias mpp.off1 {
  set %mpp.b.as ArenaScout
  set %mpp.b.mb Multi Browser
  set %mpp.b.qt QTool
  set %mpp.b.ms mIRCScout
  set %mpp.b.mg MultiGate
  set %mpp.b.mq MQAdmin
  .disable #mpp.arenascout
  .disable #mpp.multibrowser
  .disable #mpp.qtool
  .disable #mpp.mircscout
  .disable #mpp.multigate
  .disable #mpp.mqadmin
}

;mpp toolbar sample
alias mpptb { window -hp +b @toolbar 0 0 575 25 @toolbar | drawpic @toolbar 0 0 0 0 575 25 $+(",$mircdirsystem\mpp\images\toolbar.jpg,") | window -a @toolbar }

Menu @toolbar {
  sclick {
    if ($inrect($mouse.x,$mouse.y,1,1,70,25)) { /psaddon }
    if ($inrect($mouse.x,$mouse.y,75,1,70,25)) { splay $+(",$mircdirSounds\ex.sound.0.mp3,") | dopen gen gen }
    if ($inrect($mouse.x,$mouse.y,152,1,62,25)) { if ($r.srv(excursion,serve.dialog) == 1) { dopen serve serve } | elseif ($r.srv(excursion,serve.dialog) == 2) { dopen serve2 serve2 } | else { dopen serve3 serve3 } }
    if ($inrect($mouse.x,$mouse.y,218,1,33,25)) { dopen kick.protection kick.protection }
    if ($inrect($mouse.x,$mouse.y,258,1,57,25)) { dopen themesetup themesetup }
    if ($inrect($mouse.x,$mouse.y,320,1,62,25)) { dopen addon addon }
    if ($inrect($mouse.x,$mouse.y,390,1,38,25)) { logs }
    if ($inrect($mouse.x,$mouse.y,435,1,60,25)) { dopen Queue_Manager Queue_Manager }
    if ($inrect($mouse.x,$mouse.y,500,1,60,25)) { dopen Fserve Fserve }
  }
  dclick:run $r.ex(WebPage)
  Help:help
  Goto WebPage:run $r.ex(WebPage)
  Email $r.ex(Author):run mailto: $+ $r.ex(Email)
  -
  Close:window -c @toolbar
}

on *:open:?:{
  whois2 $nick
}

on *:open:=:{
  whois3 $nick
}

alias credits run %mpp.website $+ /docs/credits.htm

alias whois {
  if (%whoack == 0) {
    set %whotmp $1-
    if (%whoisreport == 0) {
      .disable #whois_command
      .disable #whoisa_command
      .disable #whois_normal
      .disable #whoisa_normal
      .disable #whois_query
      .disable #whoisa_query
      .disable #whois_chat
      .disable #whoisa_chat
      .disable #whois1
    }
    else if (%whoisreport == 1) {
      .enable #whois_command
      .enable #whoisa_command
      .disable #whois_normal
      .disable #whoisa_normal
      .disable #whois_query
      .disable #whoisa_query
      .disable #whois_chat
      .disable #whoisa_chat
      .disable #whois1
    }
    whois %whotmp
    .timerwhoisaway -o 0 5 whois_end
  }
  else {
    whois %whotmp
    .timerwhoisaway -o 0 5 whois_end
  }
}

alias whois2 {
  set %whoack 1
  set %whotmp $1-
  if (%whoisreport == 1) {
    .disable #whois_command
    .disable #whoisa_command
    .disable #whois_normal
    .disable #whoisa_normal
    .enable #whois_query
    .enable #whoisa_query
    .disable #whois_chat
    .disable #whoisa_chat
    .disable #whois1
  }
  else {
    .disable #whois_command
    .disable #whoisa_command
    .enable #whois_normal
    .enable #whoisa_normal
    .disable #whois_query
    .disable #whoisa_query
    .disable #whois_chat
    .disable #whoisa_chat
    .disable #whois1
  }
  whois %whotmp
  .timerwhoisaway -o 0 5 whois_end
}

alias whois3 {
  set %whoack 1
  set %whotmp $1-
  if (%whoisreport == 1) {
    .disable #whois_command
    .disable #whoisa_command
    .disable #whois_normal
    .disable #whoisa_normal
    .disable #whois_query
    .disable #whoisa_query
    .enable #whois_chat
    .enable #whoisa_chat
    .disable #whois1
  }
  else {
    .disable #whois_command
    .disable #whoisa_command
    .enable #whois_normal
    .enable #whoisa_normal
    .disable #whois_query
    .disable #whoisa_query
    .disable #whois_chat
    .disable #whoisa_chat
    .disable #whois1
  }
  whois %whotmp
  .timerwhoisaway -o 0 5 whois_end
}

alias whois_end {
  .timerwhoisaway off
  .disable #whois_normal
  .disable #whois_chat
  .disable #whoisa_chat
  .disable #whois_command
  .enable #whois_query
  .disable #whoisa_command
  .disable #whoisa_query
  .disable #whoisa_normal
  .enable #whois1
  set %whoack 0
}

alias lv {
  if ($1 == center) { set %lvx -1 | set %lvy -1 }
  else if ($1 == normal) { set %lvx 10 | set %lvy 10 }
  else if ($1 == 800) { .enable #lv800 | .disable #lv1024 | .disable #lv1280 }
  else if ($1 == 1024) { .disable #lv800 | .enable #lv1024 | .disable #lv1280 }
  else if ($1 == 1280) { .disable #lv800 | .disable #lv1024 | .enable #lv1280 }
  else {
    echo -a 0Syntax:8 /lv {800|1024|1280|normal|center}
    echo -a 0Example: /lv 1024 would set logviewer to 1024
    echo -a 0If you then want to force it to center: /lv center
    echo -a 0IF you don't like center: /lv normal
  }
}

alias cp {

  if ($1 != $null) && ($2 != $null) {
    if ($3 == c) || ($3 == n) {
      if ($4 == d) || ($4 == n) {

        set %cpw $1
        set %cph $2

        if ($3 == c) { set %cpx -1 | set %cpy -1 }
        else if ($3 == n) { set %cpx 10 | set %cpy 10 }

        if ($4 == d) { set %cpv -mnd }
        else if ($4 == n) { set %cpv -mn }

        ;echo -a 9Control Panel Settings Applied!

      }
      else echo -a 4Bad Desktop setting, use d or n
    }
    else echo -a 4Bad Center setting, use c or n
  }
  else {
    echo -a 0Syntax: /cp x y c|n d|n
    echo -a 4All options required
    echo -a 
    echo -a 0Example #1 (these are the default settings):  /cp 292 216 c d
    echo -a 3This sets the width to 292, the height to 216, centered, and cpanel is a desktop window (won't minimize with mirc).
    echo -a 
    echo -a 0Example #2:  /cp 292 216 n n
    echo -a 2This sets the same width and length, the window is not centered (will position 10 pixels in from top left of your monitor) and cpanel is not a desktop window (will minimize with mirc).
  }
}

;alias dns {

;  .disable #userhost
;  dns %dnsnick
;  .enable #userhost

;}

alias comchan { set -u %rndcol1 $rand(7,13) | echo -a 0Common Channels with $+ %rndcol1 $$1 $+ 0: $comchan($$1,1) $comchan($$1,2) $comchan($$1,3) $comchan($$1,4) $comchan($$1,5) $comchan($$1,6) $comchan($$1,7) $comchan($$1,8) $comchan($$1,9) $comchan($$1,10) }

alias comchan1 {
  echo %whotmp 1. 14Common:0 $comchan(%whotmp,1) $comchan(%whotmp,2) $comchan(%whotmp,3) $comchan(%whotmp,4) $comchan(%whotmp,5) $comchan(%whotmp,6) $comchan(%whotmp,7) $comchan(%whotmp,8) $comchan(%whotmp,9) $comchan(%whotmp,10)
}
alias comchan2 {
  echo -a 1. 14Common:0 $comchan(%whotmp,1) $comchan(%whotmp,2) $comchan(%whotmp,3) $comchan(%whotmp,4) $comchan(%whotmp,5) $comchan(%whotmp,6) $comchan(%whotmp,7) $comchan(%whotmp,8) $comchan(%whotmp,9) $comchan(%whotmp,10)
}
alias comchan3 {
  echo = $+ %whotmp 1. 14Common:0 $comchan(%whotmp,1) $comchan(%whotmp,2) $comchan(%whotmp,3) $comchan(%whotmp,4) $comchan(%whotmp,5) $comchan(%whotmp,6) $comchan(%whotmp,7) $comchan(%whotmp,8) $comchan(%whotmp,9) $comchan(%whotmp,10)
}

alias whoend1 { echo %whotmp 14------------------------------------------------------- }

alias whoend3 { echo = $+ %whotmp 14------------------------------------------------------- }

alias whoend2 { echo -a 14------------------------------------------------------- }

menu @Transfers {
  dclick:run explorer.exe /e, $+(",$mircdirdownload,")
  Open Download Folder:run explorer.exe /e, $+(",$mircdirdownload,")
  -
  Open WMA Folder:run explorer.exe /e, $+(",$mircdirsounds\wma,")
  Open MP3 Folder:run explorer.exe /e, $+(",$mircdirsounds\mp3,")
  Open OGG Folder:run explorer.exe /e, $+(",$mircdirsounds\ogg,")
  Open WAV Folder:run explorer.exe /e, $+(",$mircdirsounds\wav,")
  Open MID Folder:run explorer.exe /e, $+(",$mircdirsounds\mid,")
  -
  Close Transfers Window:/window -c @Transfers
}

alias mpptransfers {
  if ($1 == 1) { .enable #mpptransfers | .enable #spam1 | echo 0 -a MPP Transfers Window 9[0ON9] }
  elseif ($1 == 0) { .disable #mpptransfers | .disable #spam1 | echo 0 -a MPP Transfers Window 4[0OFF4]
    echo -a You might want to do this if you aren't using the MPP Transfers Window:  ALT + O (mIRC Options) -> DCC -> Options -> On Completion -> Close Window --- Uncheck "GET".
  }
}

alias mpptransfers2 {
  if ($1 == 1) { .enable #mpptransfers | .enable #spam1 }
  elseif ($1 == 0) { .disable #mpptransfers | .disable #spam1 }
}

#mpptransfers on
alias dccmgr {
  if ($window(@transfers) != @transfers) {
    window -znk[1] @Transfers @Transfers
    echo @transfers 0,1MPP Transfers: 14,1Double click to open your Download Folder, or right click for more options.
    echo @transfers 1,1.
  }
  else { window -znk[1] @Transfers @Transfers }
}
#mpptransfers end

;set %dccnick2 $nick | set %sendfail $+(",$filename,") |

#spam1 on
on *:filesent:*:{ dccmgr | echo @Transfers 9[0+9] Sent9 $nopath($filename) ( $+ $file($filename).size bytes) to9 $nick on $adate at $asctime(hh:nn:ss) }
on *:filercvd:*:{ dccmgr | echo @Transfers 9[0+9] Received9 $nopath($filename) ( $+ $file($filename).size bytes) from9 $nick on $adate at $asctime(hh:nn:ss) | echo -a 9[0+9] Received9 $nopath($filename) ( $+ $file($filename).size bytes) from9 $nick on $adate at $asctime(hh:nn:ss) - Double click here: 0,1[9,1Transfers0,1] }
on *:sendfail:*:{ dccmgr | echo @Transfers 4[0-4] Failed to Send4 $nopath($filename) to4 $nick on $adate at $asctime(hh:nn:ss) }
on *:getfail:*:{ dccmgr | echo @Transfers 4[0-4] Failed to Receive4 $nopath($filename) from4 $nick on $adate at $asctime(hh:nn:ss) }
#spam1 end

#spam2 off
on *:filesent:*:{ dccmgr | echo @Transfers 9[0+9] Sent9 $nopath($filename) ( $+ $file($filename).size bytes) to9 $nick on $adate at $asctime(hh:nn:ss) | echo -a 9[0+9] Sent9 $nopath($filename) ( $+ $file($filename).size bytes) to9 $nick on $adate at $asctime(hh:nn:ss) - Double click here: 0,1[9,1Transfers0,1] }
on *:filercvd:*:{ dccmgr | echo @Transfers 9[0+9] Received9 $nopath($filename) ( $+ $file($filename).size bytes) from9 $nick on $adate at $asctime(hh:nn:ss) | echo -a 9[0+9] Received9 $nopath($filename) ( $+ $file($filename).size bytes) from9 $nick on $adate at $asctime(hh:nn:ss) - Double click here: 0,1[9,1Transfers0,1] }
on *:sendfail:*:{ dccmgr | echo @Transfers 4[0-4] Failed to Send4 $nopath($filename) to4 $nick on $adate at $asctime(hh:nn:ss) | echo -a 4[0-4] Failed to Send4 $nopath($filename) to4 $nick on $adate at $asctime(hh:nn:ss) - Double click here: 0,1[4,1Transfers0,1] }
on *:getfail:*:{ dccmgr | echo @Transfers 4[0-4] Failed to Receive4 $nopath($filename) from4 $nick on $adate at $asctime(hh:nn:ss) | echo -a 4[0-4] Failed to Receive4 $nopath($filename) from4 $nick on $adate at $asctime(hh:nn:ss) - Double click here: 0,1[4,1Transfers0,1] }
#spam2 end

on *:text:*Priority*1*:*:{ set %pagex $nick | pagex }
on *:text:*Priority*2*:*:{ set %pagex $nick | pagex }
on *:text:*Priority*3*:*:{ set %pagex $nick | pagex }

alias pagex {
  if (%pagerx != $null) {
    notice %pagex Pager [On] * Logging [On] * Your message was received.
  }
  else {
    notice %pagex Pager [Off] * Logging [Off] * Your message was not received.
  }
}

;;;
;;; F-KEY BINDS
;;;

;Normal Functions (FKEY)

alias ulevoff {
  %_u1 0
  %_u2 0
  %_u3 0
  %_u4 0
  %_u5 0
  %_u6 0
  %_u7 0
  %_u8 0
  %_u9 0
  %_u0 0
}

alias f1 $readini($+(",$mircdirsystem\mpp\fkeys.ini,"),fkeys,f1)
alias f2 $readini($+(",$mircdirsystem\mpp\fkeys.ini,"),fkeys,f2)
alias f3 $readini($+(",$mircdirsystem\mpp\fkeys.ini,"),fkeys,f3)
alias f4 $readini($+(",$mircdirsystem\mpp\fkeys.ini,"),fkeys,f4)
alias f5 $readini($+(",$mircdirsystem\mpp\fkeys.ini,"),fkeys,f5)
alias f6 $readini($+(",$mircdirsystem\mpp\fkeys.ini,"),fkeys,f6)
alias f7 $readini($+(",$mircdirsystem\mpp\fkeys.ini,"),fkeys,f7)
alias f8 $readini($+(",$mircdirsystem\mpp\fkeys.ini,"),fkeys,f8)
alias f9 $readini($+(",$mircdirsystem\mpp\fkeys.ini,"),fkeys,f9)
alias f10 $readini($+(",$mircdirsystem\mpp\fkeys.ini,"),fkeys,f10)
alias f11 $readini($+(",$mircdirsystem\mpp\fkeys.ini,"),fkeys,f11)
alias f12 $readini($+(",$mircdirsystem\mpp\fkeys.ini,"),fkeys,f12)

alias lvalloff {
  set %lv800 0
  set %lv1024 0
  set %lv1280 0
}

alias lvalloff2 {
  set %lvcn 0
  set %lvncn 0
}

alias cpalloff {
  set %cpcd 0
  set %cpnd 0
  set %cpcn 0
  set %cpnn 0
}

alias _boff {
  set %_bpa 0
  set %_bpb 0
  set %_bp1 0
  set %_bp2 0
  set %_bp3 0
  set %_bp4 0
  set %_bp5 0
  set %_bp6 0
  set %_bp7 0
  set %_bp8 0
  set %_bp9 0
  set %_bp0 0
}

alias 1liner say $read $+(",$mircdirsystem\beeker\1liners.txt,")
alias yomama say $read $+(",$mircdirsystem\beeker\yomama.txt,")

alias rainbow {
  var %temp = 1, %max = $len($1-), %char, %string, %color = 4 7 8 3 12 6, %cs = $rand(1,$numtok(%color,32))
  while (%temp <= %max) {
    %char = $mid($1-,%temp,1) | if (%char isnum) %string = %string $+  $+ $gettok(%color,%cs,32) $+ ,99 $+ %char
    elseif (%char = $chr(32)) { inc %temp | %char = $mid($1-,%temp,1) | %string = %string  $+ $gettok(%color,%cs,32) $+ %char }
    else { %string = %string $+  $+ $gettok(%color,%cs,32) $+ %char }
    inc %temp | inc %cs | if (%cs > $numtok(%color,32)) %cs = 1
  }
  if ($isid) return %string | else msg # %string
}

alias rainbow2 {
  var %temp = 1, %max = $len($1-), %char, %string, %color = 4 7 8 3 12 6, %cs = $rand(1,$numtok(%color,32))
  while (%temp <= %max) {
    %char = $mid($1-,%temp,1) | if (%char isnum) %string = %string $+  $+ $gettok(%color,%cs,32) $+ ,99 $+ %char
    elseif (%char = $chr(32)) { inc %temp | %char = $mid($1-,%temp,1) | %string = %string  $+ $gettok(%color,%cs,32) $+ %char }
    else { %string = %string $+  $+ $gettok(%color,%cs,32) $+ %char }
    inc %temp | inc %cs | if (%cs > $numtok(%color,32)) %cs = 1
  }
  if ($isid) return %string | else msg %tempnick %string
}

alias reverse {
  var %old = $strip($1-), %temp = $len(%old), %char, %string
  while (%temp > 0) {
    %char = $mid($1-,%temp,1) | if (%char = $chr(32)) { dec %temp | %char = $mid(%old,%temp,1) | %string = %string %char }
    else { %string = %string $+ %char } | dec %temp
  }
  if ($isid) return %string | else msg # %string
}

alias reverse2 {
  var %old = $strip($1-), %temp = $len(%old), %char, %string
  while (%temp > 0) {
    %char = $mid($1-,%temp,1) | if (%char = $chr(32)) { dec %temp | %char = $mid(%old,%temp,1) | %string = %string %char }
    else { %string = %string $+ %char } | dec %temp
  }
  if ($isid) return %string | else msg %tempnick %string
}

alias lol say 15{14{ 15ú14σⁿgHε±g 15╪14ⁿt 15ú14÷ⁿ╨ 15}14}

alias funky /run notepad.exe system\mpp\funky.txt

;Control Functions (CTRL+FKEY)

alias cf1 mpp.ops $1-
alias cf2 mpp.deop $1-
alias cf3 mpp.voice $1-
alias cf4 mpp.devoice $1-

alias cf5 set %ch1 #$$?="Channel to Join:" | set %ch2 $?="Channel Key (If Any):" | /join %ch1 %ch2
alias cf6 /invite $$1 #$$?="Invite $1 to Channel:"
;alias cf7 /run notepad.exe notes.txt

alias cf7 whois $$1

alias cf8 {
  /set -u %val_1 $rand(7,13)
  /dns $$1
  /echo -a -
  /echo -a  $+ %val_1 $+ User Profile
  /echo -a Nickname: $$1
  /echo -a Address: $address($$1,5)
  /echo -a Mask:13 $address($$1,%mpp.masklevel)
  ;  /whois $$1
}

alias cf9 {
  echo -a # Nickname - User Mask - User Level
  set %i 1
  :next
  set %nick $snick(#,%i)
  if %nick == $null goto done
  /ultst
  if %nick isop # echo 9 -a %nick - $address(%nick,%mpp.masklevel) - %ulev
  else if %nick isvo # echo 8 -a %nick - $address(%nick,%mpp.masklevel) - %ulev
  else echo 4 -a %nick - $address(%nick,%mpp.masklevel) - %ulev
  inc %i
  goto next
  :done
  echo -a -
}

alias cf10 /run notepad.exe system\finger.txt
alias cf11 /finger $$1

alias cf12 {
  set %mp3nick $1
  mp3get
}

;Extended Functions (SHIFT+FKEY)

alias ssf3 {
  set %btime $$?"Minute(s) For Timed Ban:"
  set %breas $$?"Reason For Timed Ban:"
  /whois $$1
  set %btime1 %btime * 60
  set %btime2 %btime1 + 5
  set %bnick $$1
  set %baddy $address($$1,%mpp.masklevel)
  /kick # %bnick 8timed ban from 13 $+ # $+  for 9 $+ %btime $+  minute(s) :::reason::: 11 $+ %breas
  /mode # +b %baddy
  /kick # %bnick 8timed ban from 13 $+ # $+  for 9 $+ %btime $+  minute(s) :::reason::: 11 $+ %breas
  /mode # +b %baddy
  /mode # +n
  .timer $+ CHN-> $+ %bnick 1 %btime1 /mode # -n
  .timer $+ BAN-> $+ %bnick 1 %btime1 /mode # -b %baddy
  .timer $+ INV-> $+ %bnick 1 %btime2 /invite %bnick #
}

alias sf1 /msg $$1 $$?="Private Message for $1 $+ :"
alias sf2 /notice $$1 $$?="Notice for $1 $+ :"
alias sf3 /notice $chan $$?="Notice for $chan $+ :"
alias sf4 /onotice $chan $$?="Operator Notice for $chan $+ :"

alias sf6 /notice $1 /ctcp $me fserve | /ctcp $1 xfiles

alias sf7 {
  /set -u %woo ""
  /set -u %woo $sdir "\"
  if ( %woo != $null ) {
    /notice $1 File Server: %woo
    ;/write -c $mircdir $+ fserve\cst.txt 15Welcome to my 8CUSTOM15 mIRC File Server! :)
    ;/write $mircdir $+ fserve\cst.txt 15Type HELP for a list of commands
    ;/write $mircdir $+ fserve\cst.txt 11[ $+ %woo $+ ]
    /fserve $1 20 $+(",$mircdirdownload,") $+(",$mircdirdownload\welcome.txt,") | /sound $1 link.wav
  }
}

alias sf8 /ctcp $1 fserve

alias sf9 {
  echo -a # Nickname - User Mask - User Level
  set %i 1
  :next
  set %nick $snick(#,%i)
  if %nick == $null goto done
  /ctcp %nick icq
  inc %i
  goto next
  :done
  echo -a -
}

alias sf10 { set %pmsg $?="Pager Message (leave blank for none):" | if (%pmsg != $null) { set %pmsg 0* %pmsg } | msg $1 Priority [1] %pmsg | splay $+(",$mircdirsystem\mpp\page1.wav,") }
alias sf11 { set %pmsg $?="Pager Message (leave blank for none):" | if (%pmsg != $null) { set %pmsg 0* %pmsg } | msg $1 Priority [2] %pmsg | splay $+(",$mircdirsystem\mpp\page2.wav,") }
alias sf12 { set %pmsg $?="Pager Message (leave blank for none):" | if (%pmsg != $null) { set %pmsg 0* %pmsg } | msg $1 Priority [3] %pmsg | splay $+(",$mircdirsystem\mpp\page3.wav,") }

on *:dns: {
  ;echo -a IP Address: $iaddress / $raddress
  set %userip $iaddress
  ;echo -a %userip
  set %two $raddress
  if (%vncmode == 1) {
    set %vncop 1 | echo -a 0VNC Viewer (9Best Compression0) to %two | run -p %vncviewer %userip -compresslevel 9 -quality 0
  }
  else if (%vncmode == 2) {
    set %vncop 1 | echo -a 0VNC Viewer (8Fast Compression0) to %two | run -p %vncviewer %userip -encoding hextile
  }
  else if (%vncmode == 3) {
    set %vncop 1 | echo -a 0VNC Viewer (4Normal Compression0) to %two | run -p %vncviewer %userip
  }
  unset %vncmode
}

alias ultst {
  /set -u %ulev $level($address(%nick,%mpp.masklevel))
  if (%ulev == 1) /set -u %ulev Anonymous (1)
  if (%ulev == 3) /set -u %ulev Public (3)
  if (%ulev == 5) /set -u %ulev Private (5)
  if (%ulev == 7) /set -u %ulev Secure (7)
  if (%ulev == 9) /set -u %ulev Administrator (9)
  ;  /echo %ulev
}

;;;
;;; SODPIT SCRIPT
;;;

alias sodpit2 {
  window -pk0 @SoDPiT -1 -1
  dll $+(",$mircdirsystem\mpp\nhtmln.dll,") attach $window(@SoDPiT).hwnd
  dll $+(",$mircdirsystem\mpp\nhtmln.dll,") navigate %mpp.sodpit
}

alias sodpitlogin2 {
  window -pk0 @SoDPiT -1 -1
  dll $+(",$mircdirsystem\mpp\nhtmln.dll,") attach $window(@SoDPiT).hwnd
  dll $+(",$mircdirsystem\mpp\nhtmln.dll,") navigate %mpp.sodpit $+ /irc_mbr_fs.asp?user= $+ %sodpitusername $+ &pass= $+ %sodpituserpass
}

alias sodpitadm22 {
  window -pk0 @SoDPiT -1 -1
  dll $+(",$mircdirsystem\mpp\nhtmln.dll,") attach $window(@SoDPiT).hwnd
  dll $+(",$mircdirsystem\mpp\nhtmln.dll,") navigate %mpp.sodpit $+ /asp/irc_adm_login.asp?user= $+ %sodpitadminname $+ &pass= $+ %sodpitadminpass
}

alias sodpit run %mpp.sodpit
alias sodpitlogin run %mpp.sodpit $+ /irc_mbr_fs.asp?user= $+ %sodpitusername $+ &pass= $+ %sodpituserpass
alias sodpitadm run %mpp.webmail
alias sodpitadm1 run %mpp.sodpit $+ /irc_adm_fs.asp?user= $+ %sodpitadminname $+ &pass= $+ %sodpitadminpass
alias sodpitadm2 run %mpp.sodpit $+ /asp/irc_adm_login.asp?user= $+ %sodpitadminname $+ &pass= $+ %sodpitadminpass

alias sod {
  if ($1 == login) { sodpitlogin }
  if ($1 == mail) { sodpitadm }
  if ($1 == full) { sodpitadm1 }
  if ($1 == lite) { sodpitadm2 }
  if ($1 == admin) { sodpitadm1 }
  if ($1 == admin2) { sodpitadm2 }
}

;;;
;;; PROGRAM UPDATER
;;;

alias programs run $+(",$mircdirsystem\mpp\programs.txt,")
alias pgm programs

alias pgmup {

  set %temp $+(",$mircdirsystem\mpp\programs.txt,")

  set %mpp.gt $+(",$readini(%temp,programs,GUIDTracker),")
  set %mpp.ssu $+(",$readini(%temp,programs,SpySweeperUpdate),")

  set %gsexe $+(",$readini(%temp,programs,GameSpy),")

  set %ase " $+ $readini(%temp,programs,All-Seeing_Eye) $+ "

  set %3dmark03 " $+ $readini(%temp,programs,3DMark2003) $+ "
  set %pcmark02 " $+ $readini(%temp,programs,PCMark2002) $+ "
  set %3dmark01 " $+ $readini(%temp,programs,3DMark2001) $+ "
  set %3dmark00 " $+ $readini(%temp,programs,3DMark2000) $+ "
  set %video00 " $+ $readini(%temp,programs,Video2000) $+ "
  set %3dmark99 " $+ $readini(%temp,programs,3DMark99) $+ "
  set %xlr8r " $+ $readini(%temp,programs,XL-R8R) $+ "
  set %nbench2 " $+ $readini(%temp,programs,N-Bench2) $+ "
  set %nbench1 " $+ $readini(%temp,programs,N-Bench1) $+ "
  set %glxs " $+ $readini(%temp,programs,GLExcess) $+ "
  set %dronez " $+ $readini(%temp,programs,DroneZmarK) $+ "
  set %glmark " $+ $readini(%temp,programs,GLmark) $+ "
  set %fr " $+ $readini(%temp,programs,Final_Reality) $+ "
  set %sandra " $+ $readini(%temp,programs,SiSoft_Sandra) $+ "

  set %seismovision " $+ $readini(%temp,programs,Seismovision) $+ "
  set %dsc " $+ $readini(%temp,programs,DemoShow_Creator) $+ "
  set %wdp " $+ $readini(%temp,programs,Wolfenstein_Demo_Player) $+ "
  set %rcon " $+ $readini(%temp,programs,Rcon_Commander) $+ "

  set %nav " $+ $readini(%temp,programs,Norton_AntiVirus) $+ "
  set %nui " $+ $readini(%temp,programs,Norton_Utilities) $+ "
  set %avg " $+ $readini(%temp,programs,AVG_AntiVirus) $+ "
  set %avgcc " $+ $readini(%temp,programs,AVG_Control_Center) $+ "
  set %zonealarm " $+ $readini(%temp,programs,ZoneAlarm) $+ "
  set %adaware " $+ $readini(%temp,programs,Ad-aware) $+ "

  set %winamp " $+ $readini(%temp,programs,Winamp) $+ "
  set %winamp3 " $+ $readini(%temp,programs,Winamp3) $+ "

  set %kjofol " $+ $readini(%temp,programs,K-Jofol) $+ "
  set %sonique " $+ $readini(%temp,programs,Sonique) $+ "
  set %qcd " $+ $readini(%temp,programs,Quintessential_Player) $+ "
  set %liquid " $+ $readini(%temp,programs,Liquid_Player) $+ "

  set %icq " $+ $readini(%temp,programs,ICQ) $+ "
  set %aim " $+ $readini(%temp,programs,AIM) $+ "
  set %msnmsgr " $+ $readini(%temp,programs,MSN_Messenger) $+ "

  set %pcany " $+ $readini(%temp,programs,PCAnywhere) $+ "
  set %vncviewer " $+ $readini(%temp,programs,VNC_Viewer) $+ "
  set %vncserver " $+ $readini(%temp,programs,VNC_Server) $+ "

  set %tweakui " $+ $readini(%temp,programs,TweakUI) $+ "

  set %ipmonster " $+ $readini(%temp,programs,IP_Monster) $+ "

  set %wntipcfg " $+ $readini(%temp,programs,WntIPCfg) $+ "
  set %winipcfg " $+ $readini(%temp,programs,WinIPCfg) $+ "

  set %xsetup " $+ $readini(%temp,programs,Xteq_X-Setup) $+ "
  set %xpantispy " $+ $readini(%temp,programs,XP-Antispy) $+ "

  set %mozilla " $+ $readini(%temp,programs,Mozilla) $+ "
  set %mailwasher " $+ $readini(%temp,programs,MailWasher) $+ "
  set %3dna " $+ $readini(%temp,programs,3DNA_Desktop) $+ "

  set %mbm5 " $+ $readini(%temp,programs,mbm5) $+ "

  unset %temp

  if ($1 == $null) echo -a 0Programs Updated!

}

;;;
;;; REVERSE TEXT
;;;

alias rev {
  ;declare variables
  ;%c stores the total number of words found
  var %c $calc($iif($count($$1-,$chr(32)),$ifmatch,0) +1) , %v, %f
  ;words loop - begining from the last word of the sentence to the first
  while ( %c > 0) {
    %f = $gettok($$1-,%c,32) | var %i $len(%f) , %t
    ;letters loop - begining from the last letter of the word to the first (obviously)
    while (%i) { %t = $+(%t,$right($left(%f,%i),1)) | dec %i }
    ;adds the reconstructed words to the end of the the rest
    dec %c | %v = %v %t
  }
  ;if is ident., it'll return the result
  if ($isid) { return %v }
  ;if connected to a server it'll say the result
  $iif($server,say,echo) %v
}
alias revd return $dialog(rev,rev,-1)
dialog rev {
  size -1 -1 200 50
  option dbu
  title "Reverse words?"
  edit "Insert text here",2,5 5 192 12, autohs
  edit "",3,5 20 192 12, read autohs
  button "&Copy reversed words",4,5 36 60 12, default
  button "E&xit",1,166 36 30 12, okay default
}
on *:dialog:rev:*:*: {
  var %e $devent , %n $dname , %d $did
  if (%e == init) { did -fa %n 2 $chr(32) }
  if (%e == edit) && (%d == 2) { did -o %n 3 1 $rev($did(2)) }
  if (%e == sclick) && (%d == 4) { clipboard $did(3) }
}


;;;
;;; TEAMSPEAK SCRIPT
;;;

alias tsset {

  set %mpp_ts2_clientexe "C:\Program Files\TS2RC2C\TeamSpeak.exe"
  set %mpp_ts2_serverexe "c:\program files\ts2rc2s\server_windows.exe"

  set %mpp.ts2_server1 sod1.ath.cx
  set %mpp_ts2_nickname1 your_nick_here
  set %mpp_ts2_loginname1 your_login_name_here
  set %mpp_ts2_password1 your_login_pw_here

  set %mpp.ts2_server2 sod2.ath.cx
  set %mpp_ts2_nickname2 your_nick_here
  set %mpp_ts2_loginname2 your_login_name_here
  set %mpp_ts2_password2 your_login_pw_here

  set %mpp.ts2_server3 localhost
  set %mpp_ts2_nickname3 your_nick_here
  set %mpp_ts2_loginname3 your_login_name_here
  set %mpp_ts2_password3 your_login_pw_here
}

alias ts tsc

alias tsc { if ($exists(%mpp_ts2_clientexe)) run -p %mpp_ts2_clientexe | else run http://www.teamspeak.org }
alias tss { if ($exists(%mpp_ts2_serverexe)) run -p %mpp_ts2_serverexe | else run http://www.teamspeak.org }

alias ts1ch1 run -p %mpp_ts2_clientexe %mpp.ts2_server1 $+ ?nickname= $+ %mpp_ts2_nickname1 $+ ?loginname= $+ %mpp_ts2_loginname1 $+ ?password= $+ %mpp_ts2_password1 $+ ?channel= $+ %mpp.ts1ch1 $+ ?channelpassword= $+ %mpp.ts1ch1p
alias ts1ch2 run -p %mpp_ts2_clientexe %mpp.ts2_server1 $+ ?nickname= $+ %mpp_ts2_nickname1 $+ ?loginname= $+ %mpp_ts2_loginname1 $+ ?password= $+ %mpp_ts2_password1 $+ ?channel= $+ %mpp.ts1ch2 $+ ?channelpassword= $+ %mpp.ts1ch2p
alias ts1ch3 run -p %mpp_ts2_clientexe %mpp.ts2_server1 $+ ?nickname= $+ %mpp_ts2_nickname1 $+ ?loginname= $+ %mpp_ts2_loginname1 $+ ?password= $+ %mpp_ts2_password1 $+ ?channel= $+ %mpp.ts1ch3 $+ ?channelpassword= $+ %mpp.ts1ch3p
alias ts1ch4 run -p %mpp_ts2_clientexe %mpp.ts2_server1 $+ ?nickname= $+ %mpp_ts2_nickname1 $+ ?loginname= $+ %mpp_ts2_loginname1 $+ ?password= $+ %mpp_ts2_password1 $+ ?channel= $+ %mpp.ts1ch4 $+ ?channelpassword= $+ %mpp.ts1ch4p
alias ts1ch5 run -p %mpp_ts2_clientexe %mpp.ts2_server1 $+ ?nickname= $+ %mpp_ts2_nickname1 $+ ?loginname= $+ %mpp_ts2_loginname1 $+ ?password= $+ %mpp_ts2_password1 $+ ?channel= $+ %mpp.ts1ch5 $+ ?channelpassword= $+ %mpp.ts1ch5p

alias ts2ch1 run -p %mpp_ts2_clientexe %mpp.ts2_server2 $+ ?nickname= $+ %mpp_ts2_nickname2 $+ ?loginname= $+ %mpp_ts2_loginname2 $+ ?password= $+ %mpp_ts2_password2 $+ ?channel= $+ %mpp.ts2ch1 $+ ?channelpassword= $+ %mpp.ts2ch1p
alias ts2ch2 run -p %mpp_ts2_clientexe %mpp.ts2_server2 $+ ?nickname= $+ %mpp_ts2_nickname2 $+ ?loginname= $+ %mpp_ts2_loginname2 $+ ?password= $+ %mpp_ts2_password2 $+ ?channel= $+ %mpp.ts2ch2 $+ ?channelpassword= $+ %mpp.ts2ch2p
alias ts2ch3 run -p %mpp_ts2_clientexe %mpp.ts2_server2 $+ ?nickname= $+ %mpp_ts2_nickname2 $+ ?loginname= $+ %mpp_ts2_loginname2 $+ ?password= $+ %mpp_ts2_password2 $+ ?channel= $+ %mpp.ts2ch3 $+ ?channelpassword= $+ %mpp.ts2ch3p
alias ts2ch4 run -p %mpp_ts2_clientexe %mpp.ts2_server2 $+ ?nickname= $+ %mpp_ts2_nickname2 $+ ?loginname= $+ %mpp_ts2_loginname2 $+ ?password= $+ %mpp_ts2_password2 $+ ?channel= $+ %mpp.ts2ch4 $+ ?channelpassword= $+ %mpp.ts2ch4p
alias ts2ch5 run -p %mpp_ts2_clientexe %mpp.ts2_server2 $+ ?nickname= $+ %mpp_ts2_nickname2 $+ ?loginname= $+ %mpp_ts2_loginname2 $+ ?password= $+ %mpp_ts2_password2 $+ ?channel= $+ %mpp.ts2ch5 $+ ?channelpassword= $+ %mpp.ts2ch5p

alias ts3ch1 run -p %mpp_ts2_clientexe %mpp.ts2_server3 $+ ?nickname= $+ %mpp_ts2_nickname3 $+ ?loginname= $+ %mpp_ts2_loginname3 $+ ?password= $+ %mpp_ts2_password3 $+ ?channel= $+ %mpp.ts3ch1 $+ ?channelpassword= $+ %mpp.ts3ch1p
alias ts3ch2 run -p %mpp_ts2_clientexe %mpp.ts2_server3 $+ ?nickname= $+ %mpp_ts2_nickname3 $+ ?loginname= $+ %mpp_ts2_loginname3 $+ ?password= $+ %mpp_ts2_password3 $+ ?channel= $+ %mpp.ts3ch2 $+ ?channelpassword= $+ %mpp.ts3ch2p
alias ts3ch3 run -p %mpp_ts2_clientexe %mpp.ts2_server3 $+ ?nickname= $+ %mpp_ts2_nickname3 $+ ?loginname= $+ %mpp_ts2_loginname3 $+ ?password= $+ %mpp_ts2_password3 $+ ?channel= $+ %mpp.ts3ch3 $+ ?channelpassword= $+ %mpp.ts3ch3p
alias ts3ch4 run -p %mpp_ts2_clientexe %mpp.ts2_server3 $+ ?nickname= $+ %mpp_ts2_nickname3 $+ ?loginname= $+ %mpp_ts2_loginname3 $+ ?password= $+ %mpp_ts2_password3 $+ ?channel= $+ %mpp.ts3ch4 $+ ?channelpassword= $+ %mpp.ts3ch4p
alias ts3ch5 run -p %mpp_ts2_clientexe %mpp.ts2_server3 $+ ?nickname= $+ %mpp_ts2_nickname3 $+ ?loginname= $+ %mpp_ts2_loginname3 $+ ?password= $+ %mpp_ts2_password3 $+ ?channel= $+ %mpp.ts3ch5 $+ ?channelpassword= $+ %mpp.ts3ch5p

alias ts4ch1 run -p %mpp_ts2_clientexe %mpp.ts2_server4 $+ ?nickname= $+ %mpp_ts2_nickname4 $+ ?loginname= $+ %mpp_ts2_loginname4 $+ ?password= $+ %mpp_ts2_password4 $+ ?channel= $+ %mpp.ts4ch1 $+ ?channelpassword= $+ %mpp.ts4ch1p
alias ts4ch2 run -p %mpp_ts2_clientexe %mpp.ts2_server4 $+ ?nickname= $+ %mpp_ts2_nickname4 $+ ?loginname= $+ %mpp_ts2_loginname4 $+ ?password= $+ %mpp_ts2_password4 $+ ?channel= $+ %mpp.ts4ch2 $+ ?channelpassword= $+ %mpp.ts4ch2p
alias ts4ch3 run -p %mpp_ts2_clientexe %mpp.ts2_server4 $+ ?nickname= $+ %mpp_ts2_nickname4 $+ ?loginname= $+ %mpp_ts2_loginname4 $+ ?password= $+ %mpp_ts2_password4 $+ ?channel= $+ %mpp.ts4ch3 $+ ?channelpassword= $+ %mpp.ts4ch3p
alias ts4ch4 run -p %mpp_ts2_clientexe %mpp.ts2_server4 $+ ?nickname= $+ %mpp_ts2_nickname4 $+ ?loginname= $+ %mpp_ts2_loginname4 $+ ?password= $+ %mpp_ts2_password4 $+ ?channel= $+ %mpp.ts4ch4 $+ ?channelpassword= $+ %mpp.ts4ch4p
alias ts4ch5 run -p %mpp_ts2_clientexe %mpp.ts2_server4 $+ ?nickname= $+ %mpp_ts2_nickname4 $+ ?loginname= $+ %mpp_ts2_loginname4 $+ ?password= $+ %mpp_ts2_password4 $+ ?channel= $+ %mpp.ts4ch5 $+ ?channelpassword= $+ %mpp.ts4ch5p

alias ts5ch1 run -p %mpp_ts2_clientexe %mpp.ts2_server5 $+ ?nickname= $+ %mpp_ts2_nickname5 $+ ?loginname= $+ %mpp_ts2_loginname5 $+ ?password= $+ %mpp_ts2_password5 $+ ?channel= $+ %mpp.ts5ch1 $+ ?channelpassword= $+ %mpp.ts5ch1p
alias ts5ch2 run -p %mpp_ts2_clientexe %mpp.ts2_server5 $+ ?nickname= $+ %mpp_ts2_nickname5 $+ ?loginname= $+ %mpp_ts2_loginname5 $+ ?password= $+ %mpp_ts2_password5 $+ ?channel= $+ %mpp.ts5ch2 $+ ?channelpassword= $+ %mpp.ts5ch2p
alias ts5ch3 run -p %mpp_ts2_clientexe %mpp.ts2_server5 $+ ?nickname= $+ %mpp_ts2_nickname5 $+ ?loginname= $+ %mpp_ts2_loginname5 $+ ?password= $+ %mpp_ts2_password5 $+ ?channel= $+ %mpp.ts5ch3 $+ ?channelpassword= $+ %mpp.ts5ch3p
alias ts5ch4 run -p %mpp_ts2_clientexe %mpp.ts2_server5 $+ ?nickname= $+ %mpp_ts2_nickname5 $+ ?loginname= $+ %mpp_ts2_loginname5 $+ ?password= $+ %mpp_ts2_password5 $+ ?channel= $+ %mpp.ts5ch4 $+ ?channelpassword= $+ %mpp.ts5ch4p
alias ts5ch5 run -p %mpp_ts2_clientexe %mpp.ts2_server5 $+ ?nickname= $+ %mpp_ts2_nickname5 $+ ?loginname= $+ %mpp_ts2_loginname5 $+ ?password= $+ %mpp_ts2_password5 $+ ?channel= $+ %mpp.ts5ch5 $+ ?channelpassword= $+ %mpp.ts5ch5p

alias ts1sc1 run -p %mpp_ts2_clientexe %mpp.ts2_server1 $+ ?nickname= $+ %mpp_ts2_nickname1 $+ ?loginname= $+ %mpp_ts2_loginname1 $+ ?password= $+ %mpp_ts2_password1 $+ ?channel= $+ %mpp.ts1ch1 $+ ?subchannel= $+ %mpp.ts1sc1 $+ ?channelpassword= $+ %mpp.ts1ch1p
alias ts1sc2 run -p %mpp_ts2_clientexe %mpp.ts2_server1 $+ ?nickname= $+ %mpp_ts2_nickname1 $+ ?loginname= $+ %mpp_ts2_loginname1 $+ ?password= $+ %mpp_ts2_password1 $+ ?channel= $+ %mpp.ts1ch2 $+ ?subchannel= $+ %mpp.ts1sc2 $+ ?channelpassword= $+ %mpp.ts1ch2p
alias ts1sc3 run -p %mpp_ts2_clientexe %mpp.ts2_server1 $+ ?nickname= $+ %mpp_ts2_nickname1 $+ ?loginname= $+ %mpp_ts2_loginname1 $+ ?password= $+ %mpp_ts2_password1 $+ ?channel= $+ %mpp.ts1ch3 $+ ?subchannel= $+ %mpp.ts1sc3 $+ ?channelpassword= $+ %mpp.ts1ch3p
alias ts1sc4 run -p %mpp_ts2_clientexe %mpp.ts2_server1 $+ ?nickname= $+ %mpp_ts2_nickname1 $+ ?loginname= $+ %mpp_ts2_loginname1 $+ ?password= $+ %mpp_ts2_password1 $+ ?channel= $+ %mpp.ts1ch4 $+ ?subchannel= $+ %mpp.ts1sc4 $+ ?channelpassword= $+ %mpp.ts1ch4p
alias ts1sc5 run -p %mpp_ts2_clientexe %mpp.ts2_server1 $+ ?nickname= $+ %mpp_ts2_nickname1 $+ ?loginname= $+ %mpp_ts2_loginname1 $+ ?password= $+ %mpp_ts2_password1 $+ ?channel= $+ %mpp.ts1ch5 $+ ?subchannel= $+ %mpp.ts1sc5 $+ ?channelpassword= $+ %mpp.ts1ch5p

alias ts2sc1 run -p %mpp_ts2_clientexe %mpp.ts2_server2 $+ ?nickname= $+ %mpp_ts2_nickname2 $+ ?loginname= $+ %mpp_ts2_loginname2 $+ ?password= $+ %mpp_ts2_password2 $+ ?channel= $+ %mpp.ts2ch1 $+ ?subchannel= $+ %mpp.ts2sc1 $+ ?channelpassword= $+ %mpp.ts2ch1p
alias ts2sc2 run -p %mpp_ts2_clientexe %mpp.ts2_server2 $+ ?nickname= $+ %mpp_ts2_nickname2 $+ ?loginname= $+ %mpp_ts2_loginname2 $+ ?password= $+ %mpp_ts2_password2 $+ ?channel= $+ %mpp.ts2ch2 $+ ?subchannel= $+ %mpp.ts2sc2 $+ ?channelpassword= $+ %mpp.ts2ch2p
alias ts2sc3 run -p %mpp_ts2_clientexe %mpp.ts2_server2 $+ ?nickname= $+ %mpp_ts2_nickname2 $+ ?loginname= $+ %mpp_ts2_loginname2 $+ ?password= $+ %mpp_ts2_password2 $+ ?channel= $+ %mpp.ts2ch3 $+ ?subchannel= $+ %mpp.ts2sc3 $+ ?channelpassword= $+ %mpp.ts2ch3p
alias ts2sc4 run -p %mpp_ts2_clientexe %mpp.ts2_server2 $+ ?nickname= $+ %mpp_ts2_nickname2 $+ ?loginname= $+ %mpp_ts2_loginname2 $+ ?password= $+ %mpp_ts2_password2 $+ ?channel= $+ %mpp.ts2ch4 $+ ?subchannel= $+ %mpp.ts2sc4 $+ ?channelpassword= $+ %mpp.ts2ch4p
alias ts2sc5 run -p %mpp_ts2_clientexe %mpp.ts2_server2 $+ ?nickname= $+ %mpp_ts2_nickname2 $+ ?loginname= $+ %mpp_ts2_loginname2 $+ ?password= $+ %mpp_ts2_password2 $+ ?channel= $+ %mpp.ts2ch5 $+ ?subchannel= $+ %mpp.ts2sc5 $+ ?channelpassword= $+ %mpp.ts2ch5p

alias ts3sc1 run -p %mpp_ts2_clientexe %mpp.ts2_server3 $+ ?nickname= $+ %mpp_ts2_nickname3 $+ ?loginname= $+ %mpp_ts2_loginname3 $+ ?password= $+ %mpp_ts2_password3 $+ ?channel= $+ %mpp.ts3ch1 $+ ?subchannel= $+ %mpp.ts3sc1 $+ ?channelpassword= $+ %mpp.ts3ch1p
alias ts3sc2 run -p %mpp_ts2_clientexe %mpp.ts2_server3 $+ ?nickname= $+ %mpp_ts2_nickname3 $+ ?loginname= $+ %mpp_ts2_loginname3 $+ ?password= $+ %mpp_ts2_password3 $+ ?channel= $+ %mpp.ts3ch2 $+ ?subchannel= $+ %mpp.ts3sc2 $+ ?channelpassword= $+ %mpp.ts3ch2p
alias ts3sc3 run -p %mpp_ts2_clientexe %mpp.ts2_server3 $+ ?nickname= $+ %mpp_ts2_nickname3 $+ ?loginname= $+ %mpp_ts2_loginname3 $+ ?password= $+ %mpp_ts2_password3 $+ ?channel= $+ %mpp.ts3ch3 $+ ?subchannel= $+ %mpp.ts3sc3 $+ ?channelpassword= $+ %mpp.ts3ch3p
alias ts3sc4 run -p %mpp_ts2_clientexe %mpp.ts2_server3 $+ ?nickname= $+ %mpp_ts2_nickname3 $+ ?loginname= $+ %mpp_ts2_loginname3 $+ ?password= $+ %mpp_ts2_password3 $+ ?channel= $+ %mpp.ts3ch4 $+ ?subchannel= $+ %mpp.ts3sc4 $+ ?channelpassword= $+ %mpp.ts3ch4p
alias ts3sc5 run -p %mpp_ts2_clientexe %mpp.ts2_server3 $+ ?nickname= $+ %mpp_ts2_nickname3 $+ ?loginname= $+ %mpp_ts2_loginname3 $+ ?password= $+ %mpp_ts2_password3 $+ ?channel= $+ %mpp.ts3ch5 $+ ?subchannel= $+ %mpp.ts3sc5 $+ ?channelpassword= $+ %mpp.ts3ch5p

alias ts4sc1 run -p %mpp_ts2_clientexe %mpp.ts2_server4 $+ ?nickname= $+ %mpp_ts2_nickname4 $+ ?loginname= $+ %mpp_ts2_loginname4 $+ ?password= $+ %mpp_ts2_password4 $+ ?channel= $+ %mpp.ts4ch1 $+ ?subchannel= $+ %mpp.ts4sc1 $+ ?channelpassword= $+ %mpp.ts4ch1p
alias ts4sc2 run -p %mpp_ts2_clientexe %mpp.ts2_server4 $+ ?nickname= $+ %mpp_ts2_nickname4 $+ ?loginname= $+ %mpp_ts2_loginname4 $+ ?password= $+ %mpp_ts2_password4 $+ ?channel= $+ %mpp.ts4ch2 $+ ?subchannel= $+ %mpp.ts4sc2 $+ ?channelpassword= $+ %mpp.ts4ch2p
alias ts4sc3 run -p %mpp_ts2_clientexe %mpp.ts2_server4 $+ ?nickname= $+ %mpp_ts2_nickname4 $+ ?loginname= $+ %mpp_ts2_loginname4 $+ ?password= $+ %mpp_ts2_password4 $+ ?channel= $+ %mpp.ts4ch3 $+ ?subchannel= $+ %mpp.ts4sc3 $+ ?channelpassword= $+ %mpp.ts4ch3p
alias ts4sc4 run -p %mpp_ts2_clientexe %mpp.ts2_server4 $+ ?nickname= $+ %mpp_ts2_nickname4 $+ ?loginname= $+ %mpp_ts2_loginname4 $+ ?password= $+ %mpp_ts2_password4 $+ ?channel= $+ %mpp.ts4ch4 $+ ?subchannel= $+ %mpp.ts4sc4 $+ ?channelpassword= $+ %mpp.ts4ch4p
alias ts4sc5 run -p %mpp_ts2_clientexe %mpp.ts2_server4 $+ ?nickname= $+ %mpp_ts2_nickname4 $+ ?loginname= $+ %mpp_ts2_loginname4 $+ ?password= $+ %mpp_ts2_password4 $+ ?channel= $+ %mpp.ts4ch5 $+ ?subchannel= $+ %mpp.ts4sc5 $+ ?channelpassword= $+ %mpp.ts4ch5p

alias ts5sc1 run -p %mpp_ts2_clientexe %mpp.ts2_server5 $+ ?nickname= $+ %mpp_ts2_nickname5 $+ ?loginname= $+ %mpp_ts2_loginname5 $+ ?password= $+ %mpp_ts2_password5 $+ ?channel= $+ %mpp.ts5ch1 $+ ?subchannel= $+ %mpp.ts5sc1 $+ ?channelpassword= $+ %mpp.ts5ch1p
alias ts5sc2 run -p %mpp_ts2_clientexe %mpp.ts2_server5 $+ ?nickname= $+ %mpp_ts2_nickname5 $+ ?loginname= $+ %mpp_ts2_loginname5 $+ ?password= $+ %mpp_ts2_password5 $+ ?channel= $+ %mpp.ts5ch2 $+ ?subchannel= $+ %mpp.ts5sc2 $+ ?channelpassword= $+ %mpp.ts5ch2p
alias ts5sc3 run -p %mpp_ts2_clientexe %mpp.ts2_server5 $+ ?nickname= $+ %mpp_ts2_nickname5 $+ ?loginname= $+ %mpp_ts2_loginname5 $+ ?password= $+ %mpp_ts2_password5 $+ ?channel= $+ %mpp.ts5ch3 $+ ?subchannel= $+ %mpp.ts5sc3 $+ ?channelpassword= $+ %mpp.ts5ch3p
alias ts5sc4 run -p %mpp_ts2_clientexe %mpp.ts2_server5 $+ ?nickname= $+ %mpp_ts2_nickname5 $+ ?loginname= $+ %mpp_ts2_loginname5 $+ ?password= $+ %mpp_ts2_password5 $+ ?channel= $+ %mpp.ts5ch4 $+ ?subchannel= $+ %mpp.ts5sc4 $+ ?channelpassword= $+ %mpp.ts5ch4p
alias ts5sc5 run -p %mpp_ts2_clientexe %mpp.ts2_server5 $+ ?nickname= $+ %mpp_ts2_nickname5 $+ ?loginname= $+ %mpp_ts2_loginname5 $+ ?password= $+ %mpp_ts2_password5 $+ ?channel= $+ %mpp.ts5ch5 $+ ?subchannel= $+ %mpp.ts5sc5 $+ ?channelpassword= $+ %mpp.ts5ch5p

alias ts1sc1b run -p %mpp_ts2_clientexe %mpp.ts2_server1 $+ ?nickname= $+ %mpp_ts2_nickname1 $+ ?loginname= $+ %mpp_ts2_loginname1 $+ ?password= $+ %mpp_ts2_password1 $+ ?channel= $+ %mpp.ts1ch1 $+ ?subchannel= $+ %mpp.ts1sc1b $+ ?channelpassword= $+ %mpp.ts1ch1p
alias ts1sc2b run -p %mpp_ts2_clientexe %mpp.ts2_server1 $+ ?nickname= $+ %mpp_ts2_nickname1 $+ ?loginname= $+ %mpp_ts2_loginname1 $+ ?password= $+ %mpp_ts2_password1 $+ ?channel= $+ %mpp.ts1ch2 $+ ?subchannel= $+ %mpp.ts1sc2b $+ ?channelpassword= $+ %mpp.ts1ch2p
alias ts1sc3b run -p %mpp_ts2_clientexe %mpp.ts2_server1 $+ ?nickname= $+ %mpp_ts2_nickname1 $+ ?loginname= $+ %mpp_ts2_loginname1 $+ ?password= $+ %mpp_ts2_password1 $+ ?channel= $+ %mpp.ts1ch3 $+ ?subchannel= $+ %mpp.ts1sc3b $+ ?channelpassword= $+ %mpp.ts1ch3p
alias ts1sc4b run -p %mpp_ts2_clientexe %mpp.ts2_server1 $+ ?nickname= $+ %mpp_ts2_nickname1 $+ ?loginname= $+ %mpp_ts2_loginname1 $+ ?password= $+ %mpp_ts2_password1 $+ ?channel= $+ %mpp.ts1ch4 $+ ?subchannel= $+ %mpp.ts1sc4b $+ ?channelpassword= $+ %mpp.ts1ch4p
alias ts1sc5b run -p %mpp_ts2_clientexe %mpp.ts2_server1 $+ ?nickname= $+ %mpp_ts2_nickname1 $+ ?loginname= $+ %mpp_ts2_loginname1 $+ ?password= $+ %mpp_ts2_password1 $+ ?channel= $+ %mpp.ts1ch5 $+ ?subchannel= $+ %mpp.ts1sc5b $+ ?channelpassword= $+ %mpp.ts1ch5p

alias ts2sc1b run -p %mpp_ts2_clientexe %mpp.ts2_server2 $+ ?nickname= $+ %mpp_ts2_nickname2 $+ ?loginname= $+ %mpp_ts2_loginname2 $+ ?password= $+ %mpp_ts2_password2 $+ ?channel= $+ %mpp.ts2ch1 $+ ?subchannel= $+ %mpp.ts2sc1b $+ ?channelpassword= $+ %mpp.ts2ch1p
alias ts2sc2b run -p %mpp_ts2_clientexe %mpp.ts2_server2 $+ ?nickname= $+ %mpp_ts2_nickname2 $+ ?loginname= $+ %mpp_ts2_loginname2 $+ ?password= $+ %mpp_ts2_password2 $+ ?channel= $+ %mpp.ts2ch2 $+ ?subchannel= $+ %mpp.ts2sc2b $+ ?channelpassword= $+ %mpp.ts2ch2p
alias ts2sc3b run -p %mpp_ts2_clientexe %mpp.ts2_server2 $+ ?nickname= $+ %mpp_ts2_nickname2 $+ ?loginname= $+ %mpp_ts2_loginname2 $+ ?password= $+ %mpp_ts2_password2 $+ ?channel= $+ %mpp.ts2ch3 $+ ?subchannel= $+ %mpp.ts2sc3b $+ ?channelpassword= $+ %mpp.ts2ch3p
alias ts2sc4b run -p %mpp_ts2_clientexe %mpp.ts2_server2 $+ ?nickname= $+ %mpp_ts2_nickname2 $+ ?loginname= $+ %mpp_ts2_loginname2 $+ ?password= $+ %mpp_ts2_password2 $+ ?channel= $+ %mpp.ts2ch4 $+ ?subchannel= $+ %mpp.ts2sc4b $+ ?channelpassword= $+ %mpp.ts2ch4p
alias ts2sc5b run -p %mpp_ts2_clientexe %mpp.ts2_server2 $+ ?nickname= $+ %mpp_ts2_nickname2 $+ ?loginname= $+ %mpp_ts2_loginname2 $+ ?password= $+ %mpp_ts2_password2 $+ ?channel= $+ %mpp.ts2ch5 $+ ?subchannel= $+ %mpp.ts2sc5b $+ ?channelpassword= $+ %mpp.ts2ch5p

alias ts3sc1b run -p %mpp_ts2_clientexe %mpp.ts2_server3 $+ ?nickname= $+ %mpp_ts2_nickname3 $+ ?loginname= $+ %mpp_ts2_loginname3 $+ ?password= $+ %mpp_ts2_password3 $+ ?channel= $+ %mpp.ts3ch1 $+ ?subchannel= $+ %mpp.ts3sc1b $+ ?channelpassword= $+ %mpp.ts3ch1p
alias ts3sc2b run -p %mpp_ts2_clientexe %mpp.ts2_server3 $+ ?nickname= $+ %mpp_ts2_nickname3 $+ ?loginname= $+ %mpp_ts2_loginname3 $+ ?password= $+ %mpp_ts2_password3 $+ ?channel= $+ %mpp.ts3ch2 $+ ?subchannel= $+ %mpp.ts3sc2b $+ ?channelpassword= $+ %mpp.ts3ch2p
alias ts3sc3b run -p %mpp_ts2_clientexe %mpp.ts2_server3 $+ ?nickname= $+ %mpp_ts2_nickname3 $+ ?loginname= $+ %mpp_ts2_loginname3 $+ ?password= $+ %mpp_ts2_password3 $+ ?channel= $+ %mpp.ts3ch3 $+ ?subchannel= $+ %mpp.ts3sc3b $+ ?channelpassword= $+ %mpp.ts3ch3p
alias ts3sc4b run -p %mpp_ts2_clientexe %mpp.ts2_server3 $+ ?nickname= $+ %mpp_ts2_nickname3 $+ ?loginname= $+ %mpp_ts2_loginname3 $+ ?password= $+ %mpp_ts2_password3 $+ ?channel= $+ %mpp.ts3ch4 $+ ?subchannel= $+ %mpp.ts3sc4b $+ ?channelpassword= $+ %mpp.ts3ch4p
alias ts3sc5b run -p %mpp_ts2_clientexe %mpp.ts2_server3 $+ ?nickname= $+ %mpp_ts2_nickname3 $+ ?loginname= $+ %mpp_ts2_loginname3 $+ ?password= $+ %mpp_ts2_password3 $+ ?channel= $+ %mpp.ts3ch5 $+ ?subchannel= $+ %mpp.ts3sc5b $+ ?channelpassword= $+ %mpp.ts3ch5p

alias ts4sc1b run -p %mpp_ts2_clientexe %mpp.ts2_server4 $+ ?nickname= $+ %mpp_ts2_nickname4 $+ ?loginname= $+ %mpp_ts2_loginname4 $+ ?password= $+ %mpp_ts2_password4 $+ ?channel= $+ %mpp.ts4ch1 $+ ?subchannel= $+ %mpp.ts4sc1b $+ ?channelpassword= $+ %mpp.ts4ch1p
alias ts4sc2b run -p %mpp_ts2_clientexe %mpp.ts2_server4 $+ ?nickname= $+ %mpp_ts2_nickname4 $+ ?loginname= $+ %mpp_ts2_loginname4 $+ ?password= $+ %mpp_ts2_password4 $+ ?channel= $+ %mpp.ts4ch2 $+ ?subchannel= $+ %mpp.ts4sc2b $+ ?channelpassword= $+ %mpp.ts4ch2p
alias ts4sc3b run -p %mpp_ts2_clientexe %mpp.ts2_server4 $+ ?nickname= $+ %mpp_ts2_nickname4 $+ ?loginname= $+ %mpp_ts2_loginname4 $+ ?password= $+ %mpp_ts2_password4 $+ ?channel= $+ %mpp.ts4ch3 $+ ?subchannel= $+ %mpp.ts4sc3b $+ ?channelpassword= $+ %mpp.ts4ch3p
alias ts4sc4b run -p %mpp_ts2_clientexe %mpp.ts2_server4 $+ ?nickname= $+ %mpp_ts2_nickname4 $+ ?loginname= $+ %mpp_ts2_loginname4 $+ ?password= $+ %mpp_ts2_password4 $+ ?channel= $+ %mpp.ts4ch4 $+ ?subchannel= $+ %mpp.ts4sc4b $+ ?channelpassword= $+ %mpp.ts4ch4p
alias ts4sc5b run -p %mpp_ts2_clientexe %mpp.ts2_server4 $+ ?nickname= $+ %mpp_ts2_nickname4 $+ ?loginname= $+ %mpp_ts2_loginname4 $+ ?password= $+ %mpp_ts2_password4 $+ ?channel= $+ %mpp.ts4ch5 $+ ?subchannel= $+ %mpp.ts4sc5b $+ ?channelpassword= $+ %mpp.ts4ch5p

alias ts5sc1b run -p %mpp_ts2_clientexe %mpp.ts2_server5 $+ ?nickname= $+ %mpp_ts2_nickname5 $+ ?loginname= $+ %mpp_ts2_loginname5 $+ ?password= $+ %mpp_ts2_password5 $+ ?channel= $+ %mpp.ts5ch1 $+ ?subchannel= $+ %mpp.ts5sc1b $+ ?channelpassword= $+ %mpp.ts5ch1p
alias ts5sc2b run -p %mpp_ts2_clientexe %mpp.ts2_server5 $+ ?nickname= $+ %mpp_ts2_nickname5 $+ ?loginname= $+ %mpp_ts2_loginname5 $+ ?password= $+ %mpp_ts2_password5 $+ ?channel= $+ %mpp.ts5ch2 $+ ?subchannel= $+ %mpp.ts5sc2b $+ ?channelpassword= $+ %mpp.ts5ch2p
alias ts5sc3b run -p %mpp_ts2_clientexe %mpp.ts2_server5 $+ ?nickname= $+ %mpp_ts2_nickname5 $+ ?loginname= $+ %mpp_ts2_loginname5 $+ ?password= $+ %mpp_ts2_password5 $+ ?channel= $+ %mpp.ts5ch3 $+ ?subchannel= $+ %mpp.ts5sc3b $+ ?channelpassword= $+ %mpp.ts5ch3p
alias ts5sc4b run -p %mpp_ts2_clientexe %mpp.ts2_server5 $+ ?nickname= $+ %mpp_ts2_nickname5 $+ ?loginname= $+ %mpp_ts2_loginname5 $+ ?password= $+ %mpp_ts2_password5 $+ ?channel= $+ %mpp.ts5ch4 $+ ?subchannel= $+ %mpp.ts5sc4b $+ ?channelpassword= $+ %mpp.ts5ch4p
alias ts5sc5b run -p %mpp_ts2_clientexe %mpp.ts2_server5 $+ ?nickname= $+ %mpp_ts2_nickname5 $+ ?loginname= $+ %mpp_ts2_loginname5 $+ ?password= $+ %mpp_ts2_password5 $+ ?channel= $+ %mpp.ts5ch5 $+ ?subchannel= $+ %mpp.ts5sc5b $+ ?channelpassword= $+ %mpp.ts5ch5p

alias t1o /run -p %mpp_ts2_clientexe %mpp.ts2_server1 $+ ?nickname= $+ %mpp_ts2_nickname1 $+ ?loginname= $+ %mpp_ts2_loginname1 $+ ?password= $+ %mpp_ts2_password1
alias t1 /run -p %mpp_ts2_clientexe %mpp.ts2_server1 $+ ?nickname= $+ %mpp_ts2_nickname1 $+ ?loginname= $+ %mpp_ts2_loginname1 $+ ?password= $+ %mpp_ts2_password1 $+ ?channel=SoD Public
alias t1p /run -p %mpp_ts2_clientexe %mpp.ts2_server1 $+ ?nickname= $+ %mpp_ts2_nickname1 $+ ?loginname= $+ %mpp_ts2_loginname1 $+ ?password= $+ %mpp_ts2_password1 $+ ?channel=SoD Private
alias t1c /run -p %mpp_ts2_clientexe %mpp.ts2_server1 $+ ?nickname= $+ %mpp_ts2_nickname1 $+ ?loginname= $+ %mpp_ts2_loginname1 $+ ?password= $+ %mpp_ts2_password1 $+ ?channel=CaptureStrike
alias t1cr /run -p %mpp_ts2_clientexe %mpp.ts2_server1 $+ ?nickname= $+ %mpp_ts2_nickname1 $+ ?loginname= $+ %mpp_ts2_loginname1 $+ ?password= $+ %mpp_ts2_password1 $+ ?channel=CaptureStrike?subchannel=Red
alias t1cb /run -p %mpp_ts2_clientexe %mpp.ts2_server1 $+ ?nickname= $+ %mpp_ts2_nickname1 $+ ?loginname= $+ %mpp_ts2_loginname1 $+ ?password= $+ %mpp_ts2_password1 $+ ?channel=CaptureStrike?subchannel=Blue
alias t1r /run -p %mpp_ts2_clientexe %mpp.ts2_server1 $+ ?nickname= $+ %mpp_ts2_nickname1 $+ ?loginname= $+ %mpp_ts2_loginname1 $+ ?password= $+ %mpp_ts2_password1 $+ ?channel=Rocket Arena
alias t1rr /run -p %mpp_ts2_clientexe %mpp.ts2_server1 $+ ?nickname= $+ %mpp_ts2_nickname1 $+ ?loginname= $+ %mpp_ts2_loginname1 $+ ?password= $+ %mpp_ts2_password1 $+ ?channel=Rocket Arena?subchannel=Red
alias t1rb /run -p %mpp_ts2_clientexe %mpp.ts2_server1 $+ ?nickname= $+ %mpp_ts2_nickname1 $+ ?loginname= $+ %mpp_ts2_loginname1 $+ ?password= $+ %mpp_ts2_password1 $+ ?channel=Rocket Arena?subchannel=Blue

alias t2o /run -p %mpp_ts2_clientexe %mpp.ts2_server2 $+ ?nickname= $+ %mpp_ts2_nickname2 $+ ?loginname= $+ %mpp_ts2_loginname2 $+ ?password= $+ %mpp_ts2_password2
alias t2 /run -p %mpp_ts2_clientexe %mpp.ts2_server2 $+ ?nickname= $+ %mpp_ts2_nickname2 $+ ?loginname= $+ %mpp_ts2_loginname2 $+ ?password= $+ %mpp_ts2_password2 $+ ?channel=SoD Public
alias t2p /run -p %mpp_ts2_clientexe %mpp.ts2_server2 $+ ?nickname= $+ %mpp_ts2_nickname2 $+ ?loginname= $+ %mpp_ts2_loginname2 $+ ?password= $+ %mpp_ts2_password2 $+ ?channel=SoD Private
alias t2c /run -p %mpp_ts2_clientexe %mpp.ts2_server2 $+ ?nickname= $+ %mpp_ts2_nickname2 $+ ?loginname= $+ %mpp_ts2_loginname2 $+ ?password= $+ %mpp_ts2_password2 $+ ?channel=CaptureStrike
alias t2cr /run -p %mpp_ts2_clientexe %mpp.ts2_server2 $+ ?nickname= $+ %mpp_ts2_nickname2 $+ ?loginname= $+ %mpp_ts2_loginname2 $+ ?password= $+ %mpp_ts2_password2 $+ ?channel=CaptureStrike?subchannel=Red
alias t2cb /run -p %mpp_ts2_clientexe %mpp.ts2_server2 $+ ?nickname= $+ %mpp_ts2_nickname2 $+ ?loginname= $+ %mpp_ts2_loginname2 $+ ?password= $+ %mpp_ts2_password2 $+ ?channel=CaptureStrike?subchannel=Blue
alias t2r /run -p %mpp_ts2_clientexe %mpp.ts2_server2 $+ ?nickname= $+ %mpp_ts2_nickname2 $+ ?loginname= $+ %mpp_ts2_loginname2 $+ ?password= $+ %mpp_ts2_password2 $+ ?channel=Rocket Arena
alias t2rr /run -p %mpp_ts2_clientexe %mpp.ts2_server2 $+ ?nickname= $+ %mpp_ts2_nickname2 $+ ?loginname= $+ %mpp_ts2_loginname2 $+ ?password= $+ %mpp_ts2_password2 $+ ?channel=Rocket Arena?subchannel=Red
alias t2rb /run -p %mpp_ts2_clientexe %mpp.ts2_server2 $+ ?nickname= $+ %mpp_ts2_nickname2 $+ ?loginname= $+ %mpp_ts2_loginname2 $+ ?password= $+ %mpp_ts2_password2 $+ ?channel=Rocket Arena?subchannel=Blue

alias t3o /run -p %mpp_ts2_clientexe %mpp.ts2_server3 $+ ?nickname= $+ %mpp_ts2_nickname3 $+ ?loginname= $+ %mpp_ts2_loginname3 $+ ?password= $+ %mpp_ts2_password3
alias t3 /run -p %mpp_ts2_clientexe %mpp.ts2_server3 $+ ?nickname= $+ %mpp_ts2_nickname3 $+ ?loginname= $+ %mpp_ts2_loginname3 $+ ?password= $+ %mpp_ts2_password3 $+ ?channel=SoD Public
alias t3p /run -p %mpp_ts2_clientexe %mpp.ts2_server3 $+ ?nickname= $+ %mpp_ts2_nickname3 $+ ?loginname= $+ %mpp_ts2_loginname3 $+ ?password= $+ %mpp_ts2_password3 $+ ?channel=SoD Private
alias t3c /run -p %mpp_ts2_clientexe %mpp.ts2_server3 $+ ?nickname= $+ %mpp_ts2_nickname3 $+ ?loginname= $+ %mpp_ts2_loginname3 $+ ?password= $+ %mpp_ts2_password3 $+ ?channel=CaptureStrike
alias t3cr /run -p %mpp_ts2_clientexe %mpp.ts2_server3 $+ ?nickname= $+ %mpp_ts2_nickname3 $+ ?loginname= $+ %mpp_ts2_loginname3 $+ ?password= $+ %mpp_ts2_password3 $+ ?channel=CaptureStrike?subchannel=Red
alias t3cb /run -p %mpp_ts2_clientexe %mpp.ts2_server3 $+ ?nickname= $+ %mpp_ts2_nickname3 $+ ?loginname= $+ %mpp_ts2_loginname3 $+ ?password= $+ %mpp_ts2_password3 $+ ?channel=CaptureStrike?subchannel=Blue
alias t3r /run -p %mpp_ts2_clientexe %mpp.ts2_server3 $+ ?nickname= $+ %mpp_ts2_nickname3 $+ ?loginname= $+ %mpp_ts2_loginname3 $+ ?password= $+ %mpp_ts2_password3 $+ ?channel=Rocket Arena
alias t3rr /run -p %mpp_ts2_clientexe %mpp.ts2_server3 $+ ?nickname= $+ %mpp_ts2_nickname3 $+ ?loginname= $+ %mpp_ts2_loginname3 $+ ?password= $+ %mpp_ts2_password3 $+ ?channel=Rocket Arena?subchannel=Red
alias t3rb /run -p %mpp_ts2_clientexe %mpp.ts2_server3 $+ ?nickname= $+ %mpp_ts2_nickname3 $+ ?loginname= $+ %mpp_ts2_loginname3 $+ ?password= $+ %mpp_ts2_password3 $+ ?channel=Rocket Arena?subchannel=Blue

alias t4o /run -p %mpp_ts2_clientexe %mpp.ts2_server4 $+ ?nickname= $+ %mpp_ts2_nickname4 $+ ?loginname= $+ %mpp_ts2_loginname4 $+ ?password= $+ %mpp_ts2_password4
alias t5o /run -p %mpp_ts2_clientexe %mpp.ts2_server5 $+ ?nickname= $+ %mpp_ts2_nickname5 $+ ?loginname= $+ %mpp_ts2_loginname5 $+ ?password= $+ %mpp_ts2_password5

alias vc ventrilo
alias vclient ventrilo
alias ventrilo { if ($exists(%mpp.ventriloclient)) run -p %mpp.ventriloclient $1- | else run http://www.ventrilo.com }

alias vs vserver
alias vserver { if ($exists(%mpp.ventriloserver)) run -p %mpp.ventriloserver $1- | else run http://www.ventrilo.com }

alias vc1 {
  ;echo -a ventrilo:// $+ %mpp.v1srv $+ /servername= $+ %mpp.v1name $+ &serverpassword= $+ %mpp.v1srvpw $+ &channelname= $+ %mpp.v1chn $+ &channelpassword= $+ %mpp.v1chnpw
  run -p ventrilo:// $+ %mpp.v1srv $+ /servername= $+ %mpp.v1name $+ &serverpassword= $+ %mpp.v1srvpw $+ &channelname= $+ %mpp.v1chn $+ &channelpassword= $+ %mpp.v1chnpw
}

alias vc2 {
  ;echo -a ventrilo:// $+ %mpp.v2srv $+ /servername= $+ %mpp.v2name $+ &serverpassword= $+ %mpp.v2srvpw $+ &channelname= $+ %mpp.v2chn $+ &channelpassword= $+ %mpp.v2chnpw
  run -p ventrilo:// $+ %mpp.v2srv $+ /servername= $+ %mpp.v2name $+ &serverpassword= $+ %mpp.v2srvpw $+ &channelname= $+ %mpp.v2chn $+ &channelpassword= $+ %mpp.v2chnpw
}

alias vc3 {
  ;echo -a ventrilo:// $+ %mpp.v3srv $+ /servername= $+ %mpp.v3name $+ &serverpassword= $+ %mpp.v3srvpw $+ &channelname= $+ %mpp.v3chn $+ &channelpassword= $+ %mpp.v3chnpw
  run -p ventrilo:// $+ %mpp.v3srv $+ /servername= $+ %mpp.v3name $+ &serverpassword= $+ %mpp.v3srvpw $+ &channelname= $+ %mpp.v3chn $+ &channelpassword= $+ %mpp.v3chnpw
}

;ventrilo://www.myserver.com:3784/servername=Name&serverpassword=Pass

;%mpp.vnickname1
;%mpp.vpassword1


;alias vc1 run -p %mpp.ventriloclient %mpp.vserver1
;alias vc2 run -p %mpp.ventriloclient %mpp.vserver2
;alias vc3 run -p %mpp.ventriloclient %mpp.vserver3

alias rw rwc
alias rwc { if ($exists(%mpp.rwclient)) run -p %mpp.rwclient $1- | else run http://www.rogerwilco.com }
alias rws { if ($exists(%mpp.rwserver)) run -p %mpp.rwserver $1- | else run http://www.rogerwilco.com }

alias rws1 run -p %mpp.rwclient /join1 %mpp.rserver1 /callsign %mpp.rnickname1 %mpp.rpassword1
alias rws2 run -p %mpp.rwclient /join1 %mpp.rserver2 /callsign %mpp.rnickname2 %mpp.rpassword2
alias rws3 run -p %mpp.rwclient /join1 %mpp.rserver3 /callsign %mpp.rnickname3 %mpp.rpassword3

;;;
;;; BLOWFISH SCRIPT
;;;

alias bftoggle {
  if (%blowfish == 1) {
    set %blowfish 0
    set %_mblowfish 0
    set %mblowfish Blowfish [OFF]
    echo 4 -a Blowfish [OFF]
  }
  else {
    set %blowfish 1
    set %_mblowfish 1
    set %mblowfish Blowfish [ON]
    echo 9 -a Blowfish [ON]
  }
}

alias bmtoggle {
  if (%blowmode == 1) {
    set %blowmode 0
    set %_mblowmode 0
    set %mblowmode Blowfish Mode [OFF]
    echo 4 -a Blowfish Mode [OFF]
  }
  else {
    set %blowmode 1
    set %_mblowmode 1
    set %mblowmode Blowfish Mode [ON]
    echo 9 -a Blowfish Mode [ON]
  }
}

alias blow { notice %temp To Encrypt using Blowfish: 11+13 $me 8[key] 4[normal text string] | notice %temp To Decrypt using Blowfish: 11-13 $me 8[key] 4[blowfish encrypted string, ex: N.HqJ.ISKdW1wN37S0ao3Qq/] }

;set the public key
alias bfkey { set %blowkey $1 | echo 11 Blowfish Public Key set to:  $1 }
alias bfk { set %blowkey $1 | echo 11 Blowfish Public Key set to:  $1 }

;set the private keys
alias bfk1 { set %bfk1 $1 | echo 13 Blowfish Private Key #1 set to:  $1 }
alias bfk2 { set %bfk2 $1 | echo 13 Blowfish Private Key #2 set to:  $1 }
alias bfk3 { set %bfk3 $1 | echo 13 Blowfish Private Key #3 set to:  $1 }
alias bfk4 { set %bfk4 $1 | echo 13 Blowfish Private Key #4 set to:  $1 }
alias bfk5 { set %bfk5 $1 | echo 13 Blowfish Private Key #5 set to:  $1 }
alias bfk6 { set %bfk6 $1 | echo 13 Blowfish Private Key #6 set to:  $1 }
alias bfk7 { set %bfk7 $1 | echo 13 Blowfish Private Key #7 set to:  $1 }
alias bfk8 { set %bfk8 $1 | echo 13 Blowfish Private Key #8 set to:  $1 }
alias bfk9 { set %bfk9 $1 | echo 13 Blowfish Private Key #9 set to:  $1 }
alias bfk0 { set %bfk0 $1 | echo 13 Blowfish Private Key #10 set to:  $1 }

;turn on/off blowfish encryption/decryption
alias bfon { set %blowfish 1 | echo 9 Blowfish ON | set %mblowfish Blowfish [ON] }
alias bfoff { set %blowfish 0 | echo 4 Blowfish OFF | set %mblowfish Blowfish [OFF] }

;turn on/off blowfish mode
;if ON, everything you type is encrypted
;if OFF, nothing is encrypted unless it is preceded by /b /bq or /b1 thru /b0
alias bmon  { set %blowmode 1 | echo 9 Blowfish Mode ON | set %mblowmode Blowfish Mode [ON] }
alias bmoff { set %blowmode 0 | echo 4 Blowfish Mode OFF | set %mblowmode Blowfish Mode [OFF] }

;the actual blowfish aliases...

;alias b if ($1 != $null) { set %temp $dll(system\mpp\blowfish.dll,Encrypt,%blowkey $1- ) | set %temp $remove(%temp,+OK ) | /say =! %temp | echo 13 $1- }
alias b if ($1 != $null) { set %temp $dll(system\mpp\blowfish.dll,Encrypt,$chan $1- ) | set %temp $remove(%temp,+OK ) | /say =! %temp | echo 13 $1- }
alias bq if ($1 != $null) { set %temp $dll(system\mpp\blowfish.dll,Encrypt,$me $1- ) | set %temp $remove(%temp,+OK ) | /say =? %temp | echo 13 $1- }
alias b1 if ($1 != $null) { set %temp $dll(system\mpp\blowfish.dll,Encrypt,%bfk1 $1- ) | set %temp $remove(%temp,+OK ) | /say =1 %temp | echo 13 $1- }
alias b2 if ($1 != $null) { set %temp $dll(system\mpp\blowfish.dll,Encrypt,%bfk2 $1- ) | set %temp $remove(%temp,+OK ) | /say =2 %temp | echo 13 $1- }
alias b3 if ($1 != $null) { set %temp $dll(system\mpp\blowfish.dll,Encrypt,%bfk3 $1- ) | set %temp $remove(%temp,+OK ) | /say =3 %temp | echo 13 $1- }
alias b4 if ($1 != $null) { set %temp $dll(system\mpp\blowfish.dll,Encrypt,%bfk4 $1- ) | set %temp $remove(%temp,+OK ) | /say =4 %temp | echo 13 $1- }
alias b5 if ($1 != $null) { set %temp $dll(system\mpp\blowfish.dll,Encrypt,%bfk5 $1- ) | set %temp $remove(%temp,+OK ) | /say =5 %temp | echo 13 $1- }
alias b6 if ($1 != $null) { set %temp $dll(system\mpp\blowfish.dll,Encrypt,%bfk6 $1- ) | set %temp $remove(%temp,+OK ) | /say =6 %temp | echo 13 $1- }
alias b7 if ($1 != $null) { set %temp $dll(system\mpp\blowfish.dll,Encrypt,%bfk7 $1- ) | set %temp $remove(%temp,+OK ) | /say =7 %temp | echo 13 $1- }
alias b8 if ($1 != $null) { set %temp $dll(system\mpp\blowfish.dll,Encrypt,%bfk8 $1- ) | set %temp $remove(%temp,+OK ) | /say =8 %temp | echo 13 $1- }
alias b9 if ($1 != $null) { set %temp $dll(system\mpp\blowfish.dll,Encrypt,%bfk9 $1- ) | set %temp $remove(%temp,+OK ) | /say =9 %temp | echo 13 $1- }
alias b0 if ($1 != $null) { set %temp $dll(system\mpp\blowfish.dll,Encrypt,%bfk0 $1- ) | set %temp $remove(%temp,+OK ) | /say =0 %temp | echo 13 $1- }

alias setbm {
  set %setbm $1
  if (%setbm == bq) set %setbm2 Public 1
  if (%setbm == b) set %setbm2 Public 2
  if (%setbm == b1) set %setbm2 Private 1
  if (%setbm == b2) set %setbm2 Private 2
  if (%setbm == b3) set %setbm2 Private 3
  if (%setbm == b4) set %setbm2 Private 4
  if (%setbm == b5) set %setbm2 Private 5
  if (%setbm == b6) set %setbm2 Private 6
  if (%setbm == b7) set %setbm2 Private 7
  if (%setbm == b8) set %setbm2 Private 8
  if (%setbm == b9) set %setbm2 Private 9
  if (%setbm == b0) set %setbm2 Private 10
}

;this is what makes blowfish mode work...

;on *:input:*:{ if (%blowmode == 1) { if $left( $1, 1) != $chr(47) { %setbm $1- | halt } } }

;private keys, chan
on *:text:=1 *:# { if (%blowfish == 1) { if ($2 != $null) { set %temp $dll(system\mpp\blowfish.dll,Decrypt,%bfk1 $2-) | set %temp $remove(%temp,+OK ) | echo 9 # %temp } } }
on *:text:=2 *:# { if (%blowfish == 1) { if ($2 != $null) { set %temp $dll(system\mpp\blowfish.dll,Decrypt,%bfk2 $2-) | set %temp $remove(%temp,+OK ) | echo 9 # %temp } } }
on *:text:=3 *:# { if (%blowfish == 1) { if ($2 != $null) { set %temp $dll(system\mpp\blowfish.dll,Decrypt,%bfk3 $2-) | set %temp $remove(%temp,+OK ) | echo 9 # %temp } } }
on *:text:=4 *:# { if (%blowfish == 1) { if ($2 != $null) { set %temp $dll(system\mpp\blowfish.dll,Decrypt,%bfk4 $2-) | set %temp $remove(%temp,+OK ) | echo 9 # %temp } } }
on *:text:=5 *:# { if (%blowfish == 1) { if ($2 != $null) { set %temp $dll(system\mpp\blowfish.dll,Decrypt,%bfk5 $2-) | set %temp $remove(%temp,+OK ) | echo 9 # %temp } } }
on *:text:=6 *:# { if (%blowfish == 1) { if ($2 != $null) { set %temp $dll(system\mpp\blowfish.dll,Decrypt,%bfk6 $2-) | set %temp $remove(%temp,+OK ) | echo 9 # %temp } } }
on *:text:=7 *:# { if (%blowfish == 1) { if ($2 != $null) { set %temp $dll(system\mpp\blowfish.dll,Decrypt,%bfk7 $2-) | set %temp $remove(%temp,+OK ) | echo 9 # %temp } } }
on *:text:=8 *:# { if (%blowfish == 1) { if ($2 != $null) { set %temp $dll(system\mpp\blowfish.dll,Decrypt,%bfk8 $2-) | set %temp $remove(%temp,+OK ) | echo 9 # %temp } } }
on *:text:=9 *:# { if (%blowfish == 1) { if ($2 != $null) { set %temp $dll(system\mpp\blowfish.dll,Decrypt,%bfk9 $2-) | set %temp $remove(%temp,+OK ) | echo 9 # %temp } } }
on *:text:=0 *:# { if (%blowfish == 1) { if ($2 != $null) { set %temp $dll(system\mpp\blowfish.dll,Decrypt,%bfk0 $2-) | set %temp $remove(%temp,+OK ) | echo 9 # %temp } } }

;private keys, query
on *:text:=1 *:? { if (%blowfish == 1) { if ($2 != $null) { set %temp $dll(system\mpp\blowfish.dll,Decrypt,%bfk1 $2-) | set %temp $remove(%temp,+OK ) | echo 9 $nick %temp } } }
on *:text:=2 *:? { if (%blowfish == 1) { if ($2 != $null) { set %temp $dll(system\mpp\blowfish.dll,Decrypt,%bfk2 $2-) | set %temp $remove(%temp,+OK ) | echo 9 $nick %temp } } }
on *:text:=3 *:? { if (%blowfish == 1) { if ($2 != $null) { set %temp $dll(system\mpp\blowfish.dll,Decrypt,%bfk3 $2-) | set %temp $remove(%temp,+OK ) | echo 9 $nick %temp } } }
on *:text:=4 *:? { if (%blowfish == 1) { if ($2 != $null) { set %temp $dll(system\mpp\blowfish.dll,Decrypt,%bfk4 $2-) | set %temp $remove(%temp,+OK ) | echo 9 $nick %temp } } }
on *:text:=5 *:? { if (%blowfish == 1) { if ($2 != $null) { set %temp $dll(system\mpp\blowfish.dll,Decrypt,%bfk5 $2-) | set %temp $remove(%temp,+OK ) | echo 9 $nick %temp } } }
on *:text:=6 *:? { if (%blowfish == 1) { if ($2 != $null) { set %temp $dll(system\mpp\blowfish.dll,Decrypt,%bfk6 $2-) | set %temp $remove(%temp,+OK ) | echo 9 $nick %temp } } }
on *:text:=7 *:? { if (%blowfish == 1) { if ($2 != $null) { set %temp $dll(system\mpp\blowfish.dll,Decrypt,%bfk7 $2-) | set %temp $remove(%temp,+OK ) | echo 9 $nick %temp } } }
on *:text:=8 *:? { if (%blowfish == 1) { if ($2 != $null) { set %temp $dll(system\mpp\blowfish.dll,Decrypt,%bfk8 $2-) | set %temp $remove(%temp,+OK ) | echo 9 $nick %temp } } }
on *:text:=9 *:? { if (%blowfish == 1) { if ($2 != $null) { set %temp $dll(system\mpp\blowfish.dll,Decrypt,%bfk9 $2-) | set %temp $remove(%temp,+OK ) | echo 9 $nick %temp } } }
on *:text:=0 *:? { if (%blowfish == 1) { if ($2 != $null) { set %temp $dll(system\mpp\blowfish.dll,Decrypt,%bfk0 $2-) | set %temp $remove(%temp,+OK ) | echo 9 $nick %temp } } }

;public key, chan & query
;on *:text:=! *:# { if (%blowfish == 1) { if ($2 != $null) { set %temp $dll(system\mpp\blowfish.dll,Decrypt,%blowkey $2-) | set %temp $remove(%temp,+OK ) | echo 9 # %temp } } }
;on *:text:=! *:? { if (%blowfish == 1) { if ($2 != $null) { set %temp $dll(system\mpp\blowfish.dll,Decrypt,%blowkey $2-) | set %temp $remove(%temp,+OK ) | echo 9 $nick %temp } } }
on *:text:=! *:# { if (%blowfish == 1) { if ($2 != $null) { set %temp $dll(system\mpp\blowfish.dll,Decrypt,$chan $2-) | set %temp $remove(%temp,+OK ) | echo 9 # %temp } } }
on *:text:=! *:? { if (%blowfish == 1) { if ($2 != $null) { set %temp $dll(system\mpp\blowfish.dll,Decrypt,$chan $2-) | set %temp $remove(%temp,+OK ) | echo 9 $nick %temp } } }

;nick key, chan & query
on *:text:=? *:# { if (%blowfish == 1) { if ($2 != $null) { set %temp $dll(system\mpp\blowfish.dll,Decrypt,$nick $2-) | set %temp $remove(%temp,+OK ) | echo 9 # %temp } } }
on *:text:=? *:? { if (%blowfish == 1) { if ($2 != $null) { set %temp $dll(system\mpp\blowfish.dll,Decrypt,$nick $2-) | set %temp $remove(%temp,+OK ) | echo 9 $nick %temp } } }

;pass nickname as key, chan & query
;on *:text:= *:# { if (%blowfish == 1) && (%setbm == bq) { if ($2 != $null) { set %temp $dll(system\mpp\blowfish.dll,Decrypt,%blowkey $2-) | set %temp $remove(%temp,+OK ) | echo 9 # %temp } } }
;on *:text:= *:? { if (%blowfish == 1) && (%setbm == bq) { if ($2 != $null) { set %temp $dll(system\mpp\blowfish.dll,Decrypt,$nick $2-) | set %temp $remove(%temp,+OK ) | echo 9 $nick %temp } } }

;not used
;on *:text:= *:* { if (%blowfish == 1) { if ($2 != $null) { set %temp $dll(system\mpp\blowfish.dll,Decrypt,$nick $2-) | set %temp $remove(%temp,+OK ) | echo 9 $nick %temp } } }

;encrypt/decrypt for non blowfish users...
on *:text:+ *:* { if (%blowfish == 1) { if ($2 == $me) { if ($4 != $null) { set %temp $dll(system\mpp\blowfish.dll,Encrypt,$3 $4-) | set %temp $remove(%temp,+OK ) | /notice $nick 4(Encrypt) Key: $3 / String: %temp } } } }
on *:text:- *:* { if (%blowfish == 1) { if ($2 == $me) { if ($4 != $null) { set %temp $dll(system\mpp\blowfish.dll,Decrypt,$3 $4-) | set %temp $remove(%temp,+OK ) | /notice $nick 9(Decrypt) Key: $3 / String: %temp } } } }

on *:text:+++:# { if (%blowfish == 1) { set %temp $nick | blow } }

;make sure to turn blowfish mode OFF each time you quit mirc...
on *:disconnect: { /set %blowmode 0 }

;not used
;on *:text:-ok*:* { if (%blowfish == 1) {
;    echo -a $1 $2 $3 $4-
;    if ($4 != $null) {
;      echo -a 9 $dll(system\mpp\blowfish.dll,Decrypt,$3 $4-)
;    }
;  }
;}

;not used
;alias f1 {
;  set %temp2 $?="String To Encrypt:"
;  set %temp $?="Encryption Key:"
;  echo 4 $+ Key: %temp - Message: $dll(system\mpp\blowfish.dll,Encrypt,%temp %temp2)
;}

;not used
;alias f2 {
;  set %temp $?="Decryption Key:"
;  echo 9 $+ Key: %temp - Message: $dll(system\mpp\blowfish.dll,Decrypt,%temp $cb)
;}

alias resetblowfish {
  set %mblowfish Blowfish [ON]
  set %blowfish 1
  set %mblowmode Blowfish Mode [OFF]
  set %blowmode 0
  set %setbm bq
  set %setbm2 Public 1
  set %blowkey testing
  set %bfk1 aaa
  set %bfk2 bbb
  set %bfk3 ccc
  set %bfk4 ddd
  set %bfk5 eee
  set %bfk6 vvv
  set %bfk7 www
  set %bfk8 xxx
  set %bfk9 yyy
  set %bfk0 zzz
  echo 11 -a Blowfish settings have been reset to factory defaults.  :p~
}

;;;
;;; mIRCSter
;;;

ctcp 1:mp3:*:{
  if ($exists($+(",$mircdirdownload\listmx01.txt,")) == $true) {
    /copy -o $+(",$mircdirdownload\listmx01.txt,") $+(",$mircdirdownload\listmx02.txt,")
    .remove $+(",$mircdirdownload\listmx01.txt,")
    /play -e $nick $+(",$mircdirdownload\listmx02.txt,") 1
  }
}

alias remx /play -e $nick $+(",$mircdirdownload\listmx02.txt,") 1

alias test3 {
  if ($exists($+(",$mircdirdownload\listmx01.txt,")) == $true) {
    /copy -o $+(",$mircdirdownload\listmx01.txt,") $+(",$mircdirdownload\listmx02.txt,")
    .remove $+(",$mircdirdownload\listmx01.txt,")
    /play -e $nick $+(",$mircdirdownload\listmx02.txt,") 1
  }
}

alias mp3get {
  ;  if (%mp3chan == $null) set %mp3chan $chan(1)
  ;  set %mp3chan2 %mp3chan
  ;  set %mp3chan #$?="MP3 Channel (ENTER = %mp3chan ):"
  ;  if (%mp3chan == $null) set %mp3chan %mp3chan2
  echo -a 13 $+ %mp3nick $+ : 8! $+ %mp3nick $cb
  query %mp3nick ! $+ %mp3nick $cb
}

#mircster1 on
on 1:text:@list*:?:{

  if (%mp3lt == MP3 Listing [ON]) {

    set %mp3dxr $+(",$mircdirsounds\mp3,")
    set %mp3str * $+ $2- $+ *.mp3
    set %vmp3 $findfile(%mp3dxr,%mp3str,0)

    set %mp3dxr $+(",$mircdirsounds\wma,")
    set %mp3str * $+ $2- $+ *.wma
    set %vmp2 $findfile(%mp3dxr,%mp3str,0)

    set %mp3dxr $+(",$mircdirsounds\ogg,")
    set %mp3str * $+ $2- $+ *.ogg
    set %vmp4 $findfile(%mp3dxr,%mp3str,0)

    set %vmp1 %vmp3 + %vmp2 + %vmp4

    if (%vmp1 > 0) {

      write -c $+(",$mircdirdownload\listmx01.txt,")
      write $+(",$mircdirdownload\listmx01.txt,") .
      write $+(",$mircdirdownload\listmx01.txt,") 0mIRCster 0Query 0Result(s):9 %vmp1 File(s) Found! 9:)
      write $+(",$mircdirdownload\listmx01.txt,") .
      write $+(",$mircdirdownload\listmx01.txt,") 9Woohoo!!  To download an 11MP3, 11WMA or 8OGG file from the list below, left click and drag your mouse over the filename until the entire filename is highlighted (including the .mp3 .ogg or.wma ending), then release the left mouse button.  Now press: 13CTRL+F12.  Your download should then start automatically. 13:)

      if (%vmp3 > 0) {
        write $+(",$mircdirdownload\listmx01.txt,") .
        write $+(",$mircdirdownload\listmx01.txt,") 11MP3 Files ( $+ %vmp3 $+ ):
        write $+(",$mircdirdownload\listmx01.txt,") .
        set %mp3dxr $+(",$mircdirsounds\mp3,")
        ;/echo -a $mircdirsounds\ $+ mp3
        set %mp3str * $+ $2- $+ *.mp3
        set %vmp3 $findfile(%mp3dxr,%mp3str,0)
        ;        $findfile(%mp3dxr,%mp3str,0, write " $+ $mircdirdownload\listmx01.txt $+ " 11 $+ $nopath($1-) - $file($mircdirsounds\ $+mp3\ $+ $nopath($1-)),size)

        ;echo -a 9GRR!!!
        ;echo -a 11 %vmp3 - %mp3dxr - %mp3str - $nopath($1-)
        set %temp $findfile(%mp3dxr,%mp3str,0, write $+(",$mircdirdownload\listmx01.txt,") 11 $+ $nopath($1-))
      }

      if (%vmp2 > 0) {
        write $+(",$mircdirdownload\listmx01.txt,") .
        write $+(",$mircdirdownload\listmx01.txt,") 13WMA Files ( $+ %vmp2 $+ ):
        write $+(",$mircdirdownload\listmx01.txt,") .
        set %mp3dxr $+(",$mircdirsounds\wma,")
        set %mp3str * $+ $2- $+ *.wma
        set %vmp2 $findfile(%mp3dxr,%mp3str,0)
        ; set %temp2 $findfile(%mp3dxr,%mp3str,0, write " $+ $mircdirdownload\listmx01.txt $+ " 13 $+ $nopath($1-) - $bytes($mircdirsounds\ $+mp3\ $+ $nopath($1-)) bytes)
        set %temp3 $findfile(%mp3dxr,%mp3str,0, write $+(",$mircdirdownload\listmx01.txt,") 13 $+ $nopath($1-))
        ;        write " $+ $mircdirdownload\listmx01.txt $+ " .
        ;        write " $+ $mircdirdownload\listmx01.txt $+ " WMA Support here is BETA and NOT native for mIRC.  Until mIRC can handle WMA playback and fully supports the format, the other person will have to manually send you the file(s).  :(
      }

      if (%vmp4 > 0) {
        write $+(",$mircdirdownload\listmx01.txt,") .
        write $+(",$mircdirdownload\listmx01.txt,") 8OGG Files ( $+ %vmp4 $+ ):
        write $+(",$mircdirdownload\listmx01.txt,") .
        set %mp3dxr $+(",$mircdirsounds\ogg,")
        set %mp3str * $+ $2- $+ *.ogg
        set %vmp4 $findfile(%mp3dxr,%mp3str,0)
        ; set %temp2 $findfile(%mp3dxr,%mp3str,0, write " $+ $mircdirdownload\listmx01.txt $+ " 13 $+ $nopath($1-) - $bytes($mircdirsounds\ $+mp3\ $+ $nopath($1-)) bytes)
        set %temp3 $findfile(%mp3dxr,%mp3str,0, write $+(",$mircdirdownload\listmx01.txt,") 8 $+ $nopath($1-))
        ;write " $+ $mircdirdownload\listmx01.txt $+ " .
        ;        write " $+ $mircdirdownload\listmx01.txt $+ " WMA Support here is BETA and NOT native for mIRC.  Until mIRC can handle WMA playback and fully supports the format, the other person will have to manually send you the file(s).  :(
      }


      msg $nick 0Found:11 %vmp3 MP3 file(s)0,13 %vmp2 WMA file(s)0 and8 %vmp4 OGG file(s)0. Generating a report (15 second delay)...

      ;  echo 9 -a $bytes(c:\autoexec.bat,k)

      write $+(",$mircdirdownload\listmx01.txt,") .
      write $+(",$mircdirdownload\listmx01.txt,") To download an 11MP3, 11WMA or 8OGG file from the list above, left click and drag your mouse over the filename until the entire filename is highlighted (including the .mp3 .ogg or .wma ending), then release the left mouse button.  Now press: 13CTRL+F12.  Your download should then start automatically. 13:)
      write $+(",$mircdirdownload\listmx01.txt,") .

      write $+(",$mircdirdownload\listmx01.txt,") End of Results
      write $+(",$mircdirdownload\listmx01.txt,") .
      dcc send $nick " $+ $mircdirdownload\listmx01.txt)
      ;splay $nick $mircdirsounds\ $+ wav\xian1.wav
      /sound $nick $+(",$mircdirsounds\wav\xian1.wav,")
      set %mp3nick2 $nick
      .timermp3delay -o 0 15 /mp3list
      ;      /mp3list
    }
    else {
      msg $nick 0mIRCster 0Query 0Result(s):4 %vmp3 File(s) Found. 4:(
      msg $nick 4Woops!  When using 0@list <info>, try using the smallest amount of information, but try to be specific.  13Example #1: If you are searching for "0Metal Church", try using 0@list metal or 0@list church.  13Example #2: 0@list x might not be specific enough, so try including more information.
    }

  }
}
#mircster1 end

#mircster2 off
on 1:text:@list*:?:{
  /msg $nick 4Sorry, mIRCster is temporarily not running.  I might be playing an online game or something.  Check back later!  0,12:)
}
#mircster2 end


alias mp3list {
  ctcp %mp3nick2 mp3
  .timermp3delay off
}

;on *:connect:/n1
;alias n1 timernick -o 0 20 /nick hehe3
;alias n0 .timernick off



;;;
;;; MPP MENU
;;;

;menu channel,status,menubar {
;  -
;}

#onlinemsgs on

on *:quit: {
  if (%killemall != 1) {
    set %i 1
    :next
    if (%i == 1) { if ( $query(1) == $nick ) { echo $nick 0 $+ $nick is now 4[0Offline4] } }
    if (%i == 2) { if ( $query(2) == $nick ) { echo $nick 0 $+ $nick is now 4[0Offline4] } }
    if (%i == 3) { if ( $query(3) == $nick ) { echo $nick 0 $+ $nick is now 4[0Offline4] } }
    if (%i == 4) { if ( $query(4) == $nick ) { echo $nick 0 $+ $nick is now 4[0Offline4] } }
    if (%i == 5) { if ( $query(5) == $nick ) { echo $nick 0 $+ $nick is now 4[0Offline4] } }
    if (%i == 6) { if ( $query(6) == $nick ) { echo $nick 0 $+ $nick is now 4[0Offline4] } }
    if (%i == 7) { if ( $query(7) == $nick ) { echo $nick 0 $+ $nick is now 4[0Offline4] } }
    if (%i == 8) { if ( $query(8) == $nick ) { echo $nick 0 $+ $nick is now 4[0Offline4] } }
    if (%i == 9) { if ( $query(9) == $nick ) { echo $nick 0 $+ $nick is now 4[0Offline4] } }
    if (%i == 10) { if ( $query(10) == $nick ) { echo $nick 0 $+ $nick is now 4[0Offline4] } }
    if (%i == 11) { if ( $query(11) == $nick ) { echo $nick 0 $+ $nick is now 4[0Offline4] } }
    if (%i == 12) { if ( $query(12) == $nick ) { echo $nick 0 $+ $nick is now 4[0Offline4] } }
    if (%i == 13) { if ( $query(13) == $nick ) { echo $nick 0 $+ $nick is now 4[0Offline4] } }
    if (%i == 14) { if ( $query(14) == $nick ) { echo $nick 0 $+ $nick is now 4[0Offline4] } }
    if (%i == 15) { if ( $query(15) == $nick ) { echo $nick 0 $+ $nick is now 4[0Offline4] } }
    if (%i == 16) { if ( $query(16) == $nick ) { echo $nick 0 $+ $nick is now 4[0Offline4] } }
    if (%i == 17) { if ( $query(17) == $nick ) { echo $nick 0 $+ $nick is now 4[0Offline4] } }
    if (%i == 18) { if ( $query(18) == $nick ) { echo $nick 0 $+ $nick is now 4[0Offline4] } }
    if (%i == 19) { if ( $query(19) == $nick ) { echo $nick 0 $+ $nick is now 4[0Offline4] } }
    if (%i == 20) { if ( $query(20) == $nick ) { echo $nick 0 $+ $nick is now 4[0Offline4] } }
    inc %i 1
    if ( %i == 16 ) goto done
    if %i = 20 goto done
    goto next
    :done
    set %getline $read( $+(",$mircdirsystem\mpp\online.txt,") w, $nick )
    set %getline $readn
    write -dw $+ $nick $+(",$mircdirsystem\mpp\online.txt,")
  }
}

alias onlinetest {
  .timeronlinetest off
  set %onlinetest 0
}

alias onlinetest2 {
  set %onlinetest 0
}

#onlinemsgs end

alias ddeman {
  .ddeserver off
  .ddeserver on %ddeserver
}

alias ircregfix {
  set %tmpr2d $mircexe
  set %tmpr2d $replace(%tmpr2d,\,\\)
  set %tmpr2d $chr(92) $+ $chr(34) $+ %tmpr2d $+ $chr(92) $+ $chr(34)
  ;echo -a %tmpr2d
  set %tmpreg $+(",$mircdirsystem\mpp\irc.reg,")
  if (%mppos == XP) || (%mppos == 2K) { write -c %tmpreg Windows Registry Editor Version 5.00 }
  elseif (%mppos == 98) || (%mppos == ME) || (%mppos == NT) || (%mppos == 95) { write -c %tmpreg REGEDIT4 }
  write %tmpreg [HKEY_LOCAL_MACHINE\SOFTWARE\Classes\irc]
  write %tmpreg @="URL:IRC Protocol"
  write %tmpreg "EditFlags"=hex:02,00,00,00
  write %tmpreg "URL Protocol"=""
  write %tmpreg [HKEY_LOCAL_MACHINE\SOFTWARE\Classes\irc\DefaultIcon]
  write %tmpreg @=" $+ %tmpr2d $+ $chr(34)
  write %tmpreg [HKEY_LOCAL_MACHINE\SOFTWARE\Classes\irc\Shell]
  write %tmpreg [HKEY_LOCAL_MACHINE\SOFTWARE\Classes\irc\Shell\open]
  write %tmpreg [HKEY_LOCAL_MACHINE\SOFTWARE\Classes\irc\Shell\open\command]
  write %tmpreg @=" $+ %tmpr2d -noconnect"
  write %tmpreg [HKEY_LOCAL_MACHINE\SOFTWARE\Classes\irc\Shell\open\ddeexec]
  write %tmpreg @="%1"
  write %tmpreg [HKEY_LOCAL_MACHINE\SOFTWARE\Classes\irc\Shell\open\ddeexec\Application]
  write %tmpreg @=" $+ %ddeserver $+ "
  write %tmpreg [HKEY_LOCAL_MACHINE\SOFTWARE\Classes\irc\Shell\open\ddeexec\ifexec]
  write %tmpreg @="%1"
  write %tmpreg [HKEY_LOCAL_MACHINE\SOFTWARE\Classes\irc\Shell\open\ddeexec\Topic]
  write %tmpreg @="Connect"
  run regedit.exe /s $shortfn(%tmpreg)
  ;.remove $+(",%tmpreg,")
  ;unset %tmpr2d %tmpreg
  if ($1 != -q) echo -a Registry fixed.  All irc:// web links will now be handled inside this instance of MPP.
}

alias chatregfix {
  .timerrfix off
  set %tmpr2dx $mircexe
  set %tmpr2dx $replace(%tmpr2dx,\,\\)
  set %tmpr2dx $chr(92) $+ $chr(34) $+ %tmpr2dx $+ $chr(92) $+ $chr(34)
  ;echo -a %tmpr2dx
  set %tmpregx $+(",$mircdirsystem\mpp\chat.reg,")
  if (%mppos == XP) || (%mppos == 2K) { write -c %tmpregx Windows Registry Editor Version 5.00 }
  elseif (%mppos == 98) || (%mppos == ME) || (%mppos == NT) || (%mppos == 95) { write -c %tmpregx REGEDIT4 }
  write %tmpregx [HKEY_LOCAL_MACHINE\SOFTWARE\Classes\ChatFile]
  write %tmpregx @="Chat File"
  write %tmpregx [HKEY_LOCAL_MACHINE\SOFTWARE\Classes\ChatFile\DefaultIcon]
  write %tmpregx @=" $+ %tmpr2dx $+ $chr(34)
  write %tmpregx [HKEY_LOCAL_MACHINE\SOFTWARE\Classes\ChatFile\Shell]
  write %tmpregx [HKEY_LOCAL_MACHINE\SOFTWARE\Classes\ChatFile\Shell\open]
  write %tmpregx [HKEY_LOCAL_MACHINE\SOFTWARE\Classes\ChatFile\Shell\open\command]
  write %tmpregx @=" $+ %tmpr2dx -noconnect"
  write %tmpregx [HKEY_LOCAL_MACHINE\SOFTWARE\Classes\ChatFile\Shell\open\ddeexec]
  write %tmpregx @="%1"
  write %tmpregx [HKEY_LOCAL_MACHINE\SOFTWARE\Classes\ChatFile\Shell\open\ddeexec\Application]
  write %tmpregx @=" $+ %ddeserver $+ "
  write %tmpregx [HKEY_LOCAL_MACHINE\SOFTWARE\Classes\ChatFile\Shell\open\ddeexec\ifexec]
  write %tmpregx @="%1"
  write %tmpregx [HKEY_LOCAL_MACHINE\SOFTWARE\Classes\ChatFile\Shell\open\ddeexec\Topic]
  write %tmpregx @="Connect"
  run regedit.exe /s $shortfn(%tmpregx)
  ;  .remove $+(",%tmpregx,")
  ;unset %tmpr2dx %tmpregx
  if ($1 != -q) echo -a Registry fixed.  All .chat files will now be handled inside this instance of MPP.
}

alias killemall {
  if (%killemall == 0) {
    awaytoolbar2
    set %killemall 1
    echo -a 3Gaming Event Mode
    if (%armq != ON) { echo -a 3Auto Return OFF (type /0 to set yourself back) }
    .enable #input
    .disable #anon1 | .enable #anon2
    if (%mqppgr == 1) { /pageron } | else { /pageroff }
    if (%mqpsnd == 1) { .sound on } | else { .sound off }
    if (%mqpdcs == 1) { .sreq +m %sreqmode } | else { .sreq +m ignore }
    if (%mqpdcc == 1) { .creq +m %creqmode } | else { .creq +m ignore }
    if (%mqpmagt == 1) { .enable #msagent } | else { .disable #msagent }
    if (%mqpxany == 1) { .disable #anon2 | .enable #anon1 } | else { .disable #anon1 | .enable #anon2 }
    if (%mqpmsrv == 1) { .enable #fserve } | else { .disable #fserve }
    if (%mqpmget == 1) { .enable #autoget } | else { .disable #autoget }
    if (%mqprem1 == 1) { .disable #remote2 | .enable #remote1 } | else { .enable #remote2 | .disable #remote1 }
    if (%mqpmp3lt == 1) { .disable #mircster2 | .enable #mircster1 } | else { .enable #mircster2 | .disable #mircster1 }
    timers off3
  }
}

alias copter { /run $+(",$mircdirsystem\mpp\copter.swf,") }
alias sodlogo { /run $+(",$mircdirsystem\mpp\sod.swf,") }

; this is a complete rewrite of the /timers command
; see the readme file for all of the gory details

alias timers {

  ;pause all timers
  if ($1 == pause) {
    var %a = $timer(0)
    var %b = 1
    while (%b <= %a) {
      .timer $+ $timer(%b) -p
      inc %b
    }
  }

  ;resume all timers
  elseif ($1 == resume) {
    var %a = $timer(0)
    var %b = 1
    while (%b <= %a) {
      .timer $+ $timer(%b) -r
      inc %b
    }
  }

  ;normal all off
  elseif ($1 == off) {
    if (%mpp.timertest != 1) {
      if ($hget(timers) == timers) { .hfree timers }
      var %a = $timer(0)
      hadd -m timers amount %a
      while (%a > 0) {
        if ($timer(%a).reps == 0) {
          var %name = $timer(%a)
          var %command = $timer(%a).com
          var %delay = $timer(%a).delay
          var %secs = $timer(%a).secs
          if ((%name) && (%command) && (%delay)) {
            .hadd timers name $+ %a %name
            .hadd timers command $+ %a %command
            if (%delay == 1) { %delay == 2 }
            elseif (!%secs) { %delay == 2 }
            .hadd timers delay $+ %a %delay
          }
        }
        else {
          var %c = $timer(%a).com
          .timer $+ $timer(%a) off
          %c
          hadd timers amount $calc($hget(timers,amount) - 1)
        }
        dec %a
      }
      .timer* off
      .hsave -o timers $+(",$mircdirsystem\mpp\timers.txt,")
      set %mpp.timertest 1
      echo -a 15* All timers Off
    }
    else {
      echo -a 15* Timers are already off!  Try: /timers on
    }
  }

  ;silent all off
  elseif ($1 == off2) {
    if (%mpp.timertest != 1) {
      if ($hget(timers) == timers) { .hfree timers }
      var %a = $timer(0)
      hadd -m timers amount %a
      while (%a > 0) {
        if ($timer(%a).reps == 0) {
          var %name = $timer(%a)
          var %command = $timer(%a).com
          var %delay = $timer(%a).delay
          var %secs = $timer(%a).secs
          if ((%name) && (%command) && (%delay)) {
            .hadd timers name $+ %a %name
            .hadd timers command $+ %a %command
            if (%delay == 1) { %delay == 2 }
            elseif (!%secs) { %delay == 2 }
            .hadd timers delay $+ %a %delay
          }
        }
        else {
          var %c = $timer(%a).com
          .timer $+ $timer(%a) off
          %c
          hadd timers amount $calc($hget(timers,amount) - 1)
        }
        dec %a
      }
      .timer* off
      .hsave -o timers $+(",$mircdirsystem\mpp\timers.txt,")
      set %mpp.timertest 1
    }
  }

  ;silent all off except msb scorebot
  elseif ($1 == off3) {
    if (%mpp.timertest != 1) {
      if ($hget(timers) == timers) { .hfree timers }
      var %a = $timer(0)
      hadd -m timers amount %a
      while (%a > 0) {
        if ($timer(%a).reps == 0) {
          var %name = $timer(%a)
          var %command = $timer(%a).com
          var %delay = $timer(%a).delay
          var %secs = $timer(%a).secs
          if ((%name) && (%command) && (%delay)) {
            .hadd timers name $+ %a %name
            .hadd timers command $+ %a %command
            if (%delay == 1) { %delay == 2 }
            elseif (!%secs) { %delay == 2 }
            .hadd timers delay $+ %a %delay
          }
          if (($timer(%a) != msbscorebotrpt) && ($timer(%a) != mppaway305) && ($timer(%a) != mppaway306) && ($timer(%a) != mppawaymsgslogged)) {
            .timer $+ $timer(%a) off
          }
        }
        else {
          var %c = $timer(%a).com
          .timer $+ $timer(%a) off
          %c
          hadd timers amount $calc($hget(timers,amount) - 1)
        }
        dec %a
      }
      .hsave -o timers $+(",$mircdirsystem\mpp\timers.txt,")
      set %mpp.timertest 1
      ;echo -a 15* All timers Off
    }
    else {
      ;echo -a 15* Timers are already off!  Try: /timers on
    }
  }

  ;normal all on
  elseif ($1 == on) {
    if (%mpp.timertest == 1) {
      scid 1
      if ($hget(timers) == timers) {
        .hfree timers
        .hmake timers 100
        .hload timers $+(",$mircdirsystem\mpp\timers.txt,")
      }
      var %a = $hget(timers,amount)
      var %b = 1
      while (%b <= %a) {
        var %name = $hget(timers,name $+ %b)
        var %command = $hget(timers,command $+ %b)
        var %delay = $hget(timers,delay $+ %b)
        if ((%name) && (%command) && (%delay) && ($timer(%name) == $null)) {
          .timer $+ %name 0 %delay %command
        }
        inc %b
      }
      echo -a 15* All timers started
      unset %mpp.timertest
    }
    else {
      echo -a 15* Timers are already on!  Try: /timers off
    }
  }

  ;silent all on
  elseif ($1 == on2) {
    if (%mpp.timertest == 1) {
      scid 1
      if ($hget(timers) == timers) {
        .hfree timers
        .hmake timers 100
        .hload timers $+(",$mircdirsystem\mpp\timers.txt,")
      }
      var %a = $hget(timers,amount)
      var %b = 1
      while (%b <= %a) {
        var %name = $hget(timers,name $+ %b)
        var %command = $hget(timers,command $+ %b)
        var %delay = $hget(timers,delay $+ %b)
        if ((%name) && (%command) && (%delay) && ($timer(%name) == $null)) {
          .timer $+ %name 0 %delay %command
        }
        inc %b
      }
      ;echo -a 15* All timers started
      unset %mpp.timertest
    }
    else {
      ;echo -a 15* Timers are already on!  Try: /timers off
    }
  }

  else { timers }

}

alias colfix {

  color 0 %col.rgb0
  color 1 %col.rgb1
  color 2 %col.rgb2
  color 3 %col.rgb3
  color 4 %col.rgb4
  color 5 %col.rgb5
  color 6 %col.rgb6
  color 7 %col.rgb7
  color 8 %col.rgb8
  color 9 %col.rgb9
  color 10 %col.rgb10
  color 11 %col.rgb11
  color 12 %col.rgb12
  color 13 %col.rgb13
  color 14 %col.rgb14
  color 15 %col.rgb15

  color background %col.background
  color title %col.title
  color editbox %col.editbox
  color editbox text %col.editboxtext
  color inactive %col.inactive
  color listbox %col.listbox
  color listbox text %col.listboxtext
  color gray %col.grayed
  color action %col.action
  color ctcp %col.ctcp
  color highlight %col.highlight
  color info %col.info
  color info2 %col.info2
  color invite %col.invite
  color join %col.join
  color kick %col.kick
  color mode %col.mode
  color nick %col.nick
  color normal %col.normal
  color notice %col.notice
  color notify %col.notify
  color other %col.other
  color own %col.own
  color part %col.part
  color quit %col.quit
  color topic %col.topic
  color wallops %col.wallops
  color whois %col.whois

}

alias colfux {

  color action 1
  color ctcp 1
  color highlight 1
  color info 1
  color info2 1
  color invite 1
  color join 1
  color kick 1
  color mode 1
  color nick 1
  color normal 1
  color notice 1
  color notify 1
  color other 1
  color own 1
  color part 1
  color quit 1
  color topic 1
  color wallops 1
  color whois 1
  color listbox 0
  color listbox text 1
  color gray 1
  color title 1
  color background 0
  color editbox 0
  color editbox text 1
  color inactive 0

  color -r 0
  color -r 1
  color -r 2
  color -r 3
  color -r 4
  color -r 5
  color -r 6
  color -r 7
  color -r 8
  color -r 9
  color -r 10
  color -r 11
  color -r 12
  color -r 13
  color -r 14
  color -r 15

}

alias varfux {

  set %mpp.firstrun 1
  set %mpp.initial 1

  set %sodpitusername
  set %sodpituserpass
  set %sodpitadminname
  set %sodpitadminpass

  set %mpp.ts2_server1
  set %mpp_ts2_nickname1
  set %mpp_ts2_loginname1
  set %mpp_ts2_password1

  set %mpp.ts2_server2
  set %mpp_ts2_nickname2
  set %mpp_ts2_loginname2
  set %mpp_ts2_password2

  set %mpp.ts2_server3
  set %mpp_ts2_nickname3
  set %mpp_ts2_loginname3
  set %mpp_ts2_password3

  set %fullname
  set %nickname
  set %altnick
  set %userid
  set %myicq
  set %myemail

  set %adm1
  set %adm2
  set %adm3
  set %adm4
  set %adm5
  set %adm6
  set %adm7
  set %adm8
  set %adm9
  set %adm0

  set %qnick
  set %abc
  set %cba
  set %cbz
  set %pager1b
  set %pager2b
  set %pager3b

  set %mpp.nick1
  set %mpp.nick2
  set %mpp.nick3
  set %mpp.nick4
  set %mpp.nick5
  set %mpp.nick6
  set %mpp.nick7
  set %mpp.nick8
  set %mpp.nick9
  set %mpp.nick10

  set %mpp.anick1
  set %mpp.anick2
  set %mpp.anick3
  set %mpp.anick4
  set %mpp.anick5
  set %mpp.anick6
  set %mpp.anick7
  set %mpp.anick8
  set %mpp.anick9
  set %mpp.anick10

  set %mpp.vserver1
  set %mpp.vnickname1
  set %mpp.vloginname1
  set %mpp.vpassword1
  set %mpp.vserver2
  set %mpp.vnickname2
  set %mpp.vloginname2
  set %mpp.vpassword2
  set %mpp.vserver3
  set %mpp.vnickname3
  set %mpp.vloginname3
  set %mpp.vpassword3

  set %mpp.rserver1
  set %mpp.rnickname1
  set %mpp.rloginname1
  set %mpp.rpassword1
  set %mpp.rserver2
  set %mpp.rnickname2
  set %mpp.rloginname2
  set %mpp.rpassword2
  set %mpp.rserver3
  set %mpp.rnickname3
  set %mpp.rloginname3
  set %mpp.rpassword3

  set %mpp.who 1

  .remove $+(",$mircdirsystem\mpp\irc.reg,")
  .remove $+(",$mircdirsystem\mpp\chat.reg,")

}

; ops ,voice, deops, devoice
; mass ops, massvoice, massdeops, massdevoice
; by [SoD]Dead

alias mpp.ops {
  if (($1 != $null) && ($me isop #)) {
    var %a = $numtok($1-,32)
    var %b = 1
    var %c = $modespl
    while (%b <= %a) {
      var %d = %d $gettok($1-,%b,32)
      var %f = $numtok(%d,32)
      if (%c == %f) {
        mode # + $+ $str(o,%c) %d
        %d = $null
      }
      inc %b
    }
    if (%d != $null) {
      var %e = $numtok(%d,32)
      mode # + $+ $str(o,%e) %d
    }
  }
}
alias mpp.voice {
  if (($1 != $null) && ($me isop #)) {
    var %a = $numtok($1-,32)
    var %b = 1
    var %c = $modespl
    while (%b <= %a) {
      var %d = %d $gettok($1-,%b,32)
      var %f = $numtok(%d,32)
      if (%c == %f) {
        mode # + $+ $str(v,%c) %d
        %d = $null
      }
      inc %b
    }
    if (%d != $null) {
      var %e = $numtok(%d,32)
      mode # + $+ $str(v,%e) %d
    }
  }
}
alias mpp.deop {
  if (($1 != $null) && ($me isop #)) {
    var %a = $numtok($1-,32)
    var %b = 1
    var %c = $modespl
    while (%b <= %a) {
      var %d = %d $gettok($1-,%b,32)
      var %f = $numtok(%d,32)
      if (%c == %f) {
        mode # - $+ $str(o,%c) %d
        %d = $null
      }
      inc %b
    }
    if (%d != $null) {
      var %e = $numtok(%d,32)
      mode # - $+ $str(o,%e) %d
    }
  }
}
alias mpp.devoice {
  if (($1 != $null) && ($me isop #)) {
    var %a = $numtok($1-,32)
    var %b = 1
    var %c = $modespl
    while (%b <= %a) {
      var %d = %d $gettok($1-,%b,32)
      var %f = $numtok(%d,32)
      if (%c == %f) {
        mode # - $+ $str(v,%c) %d
        %d = $null
      }
      inc %b
    }
    if (%d != $null) {
      var %e = $numtok(%d,32)
      mode # - $+ $str(v,%e) %d
    }
  }
}
alias mpp.massop {
  var %a = $nopnick(#,0)
  if ((%a > 0) && ($me isop #)) {
    var %b = 1
    var %c = $modespl
    while (%b <= %a) {
      var %d = %d $nopnick(#,%b)
      var %f = $numtok(%d,32)
      if (%c == %f) {
        mode # + $+ $str(o,%c) %d
        %d = $null
      }
      inc %b
    }
    if (%d != $null) {
      var %e = $numtok(%d,32)
      mode # + $+ $str(o,%e) %d
    }
  }
}
alias mpp.massvoice {
  var %a = $nvnick(#,0)
  if ((%a > 0) && ($me isop #)) {
    var %b = 1
    var %c = $modespl
    while (%b <= %a) {
      var %d = %d $nvnick(#,%b)
      var %f = $numtok(%d,32)
      if (%c == %f) {
        mode # + $+ $str(v,%c) %d
        %d = $null
      }
      inc %b
    }
    if (%d != $null) {
      var %e = $numtok(%d,32)
      mode # + $+ $str(v,%e) %d
    }
  }
}
alias mpp.massdeop {
  var %a = $opnick(#,0)
  if ((%a > 0) && ($me isop #)) {
    var %b = 1
    var %c = $modespl
    while (%b <= %a) {
      if (($opnick(#,%b) != $me) && ($opnick(#,%b) != ChanServ)) { var %d = %d $opnick(#,%b) }
      var %f = $numtok(%d,32)
      if (%c == %f) {
        mode # - $+ $str(o,%c) %d
        %d = $null
      }
      inc %b
    }
    if (%d != $null) {
      var %e = $numtok(%d,32)
      mode # - $+ $str(o,%e) %d
    }
  }
}
alias mpp.massdevoice {
  var %a = $vnick(#,0)
  if ((%a > 0) && ($me isop #)) {
    var %b = 1
    var %c = $modespl
    while (%b <= %a) {
      if (($vnick(#,%b) != $me) && ($vnick(#,%b) != ChanServ)) { var %d = %d $vnick(#,%b) }
      var %f = $numtok(%d,32)
      if (%c == %f) {
        mode # - $+ $str(v,%c) %d
        %d = $null
      }
      inc %b
    }
    if (%d != $null) {
      var %e = $numtok(%d,32)
      mode # - $+ $str(v,%e) %d
    }
  }
}

;;;
;;; User Access Levels & Remotes
;;;

; 100 = File Server
; 200 = Currently Unused
; 300 = Q3 Messenger
; 400 = Currently Unused
; 500 = Remote Control
; 600 = Currently Unused
; 700 = OGX Scanner
; 800 = Currently Unused
; 900 = Administrator

;;;
;;; Anonymous (Level 1)
;;;

#autoget on
on *:nosound: { msg $nick ! $+ $nick $2- | halt }
#autoget end

ctcp 1:icq:*:/ctcp $nick uin %myicq
ctcp 1:uin:*:{

  if ($2 == $null) {
    /echo 13 -a $nick $+ 's ICQ Information Is Not Available
    /msg $nick To setup your ICQ information, type: /icqset
  }
  else {
    set %icqname $nick
    /set -u %ilen $len( %icqname )
    ;/set -u %ileft $pos( %icqname ,1,1 )
    /set -u %iright $pos( %icqname ,|,2 )
    if (%iright != $null) /set -u %icalc $calc( %iright - %ileft )
    else /set -u %icalc $calc( %ilen + 1 - %ileft )
    /set -u %ileft $calc( %ileft + 1 )
    /set -u %icalc $calc( %icalc - 1 )
    /set %imid $mid( %icqname , %ileft , %icalc)
    ;echo 8 -a icqname: %imid
    ;  %icqtmp = $readini $mircdir $+ system\mpp\icq.dat %imid icq
    ;/echo 11 %icqtmp
    /writeini $+(",$mircdirsystem\mpp\icq.dat,") %imid icq $2
    /echo 8 -a Added ICQ User
    /echo 13 -a Name: %imid
    /echo 13 -a ICQ#: $2
  }
}

#msagent off
on *:text:@kill:*:/a_kill
on *:text:@die:*:/a_die
on *:text:@kickass:*:/a_kickass
on *:text:@frag:*:/a_frag
#msagent end

;;;
;;; File Server (Level 100)
;;;

#anon1 on
ctcp 1:fserve:*:/fserve $nick 20 $+(",$mircdirdownload,") $+(",$mircdirdownload\welcome.txt,") | /sound $nick link.wav
#anon1 end

#anon2 off
ctcp 1:fserve:*:/notice $nick File Server (Level 100) or higher is required to access files | /sound $nick access.wav
#anon2 end

#fserve on
on *:text:@serve:?:/notice $nick the @serve command has expired - please try: /ctcp $me fserve
ctcp 1:xfiles:*:/ctcp $nick fserve
ctcp 100:fserve:*:/fserve $nick 20 $+(",$mircdirdownload,") $+(",$mircdirdownload\welcome.txt,") | /sound $nick link.wav
#fserve end

;;;
;;; Remote Control (Level 500)
;;;

;level 500 users can now tell remote mpp users to part a channel in an effort to regain ops
; the /part only lasts for 60 seconds, and only newer mpp users will cooperate

on 500:notice:r3j01n*:?: {
  set %part $2
  set %part2 $nick
  set %part3 $chan(%part).key
  ;echo -a 9 %part3
  /notice %part2 leaving %part for 60 seconds...
  /part %part
  .timerPART -o 0 60 /mpppart
}

alias mpppart {
  .timerPART off
  /join %part %part3
}

;level 500 users can now tell remote mpp users to reset their nickname
;this is helpful for people that have |q3ra tagged onto their nick for 5 straight weeks
;this command has depricated as mqp isn't used as much

on 500:notice:r353t*:?: {
  ;echo 9 -a $away
  set %bleh #
  set %bleh2 $nick
  ;echo -a 9 %bleh
  ;
  ;just setting up a few nick possibilities, we can add more later...
  ;we don't want to reset ppl if they are really away with |afk |dnd |brb, etc
  ;
  ;currently, only checking these suffixes:
  ;|q3ra |q3dm |q3ctf |wolf |q3a |q3 |q3osp |q3cmpa |dmc |tfc |cs |q2dm |q2ra |q2ctf |q3gib
  ;
  if ($me == %clanabcd $+ |q3ra) || ($me == %clanabcd $+ |q3dm) || ($me == %clanabcd $+ |q3ctf) || ($me == %clanabcd $+ |wolf) || ($me == %clanabcd $+ |q3a) || ($me == %clanabcd $+ |q3) || ($me == %clanabcd $+ |q3osp) || ($me == %clanabcd $+ |q3cmpa) || ($me == %clanabcd $+ |dmc) || ($me == %clanabcd $+ |tfc) || ($me == %clanabcd $+ |cs) || ($me == %clanabcd $+ |q2dm) || ($me == %clanabcd $+ |q2ra) || ($me == %clanabcd $+ |q2ctf) || ($me == %clanabcd $+ |q3gib) {
    /notice %bleh2 i know i'm not playing, i was just testing you... :p~
    /0
  }
  else {
    /notice %bleh2 i wasn't playing, biatch! :p~
  }
}

#remote1 on
ctcp 1:rjoin:*:/notice $nick RJOIN: Remote Control (Level 500) or higher is required to use this function | /sound $nick denied.wav
ctcp 500:rjoin:*:/join $2 $3
ctcp 1:rtalk:*:/notice $nick RTALK: Remote Control (Level 500) or higher is required to use this function | /sound $nick denied.wav
ctcp 500:rtalk:*:{
  echo $nick 1 $1 2 $2
  /set -u %rndcol1 $rand(3,15)
  /set -u %rndcol2 $rand(3,15)
  /msg $2 $3- $+ %rndcol1 * $nick  $+ %rndcol2 $+ *
}
ctcp 1:rsound:*:/notice $nick RSOUND: Remote Control (Level 500) or higher is required to use this function | /sound $nick denied.wav
ctcp 500:rsound:*: {
  /sound $2 $nopath($3)
  /set -u %rndcol1 $rand(3,15)
  /set -u %rndcol2 $rand(3,15)
  /set -u %FUGG $nopath($3)
  if ( $right(%FUGG,3) == wav ) /msg $2 8! $+ $me %FUGG  $+ %rndcol1 $+ * $nick  $+ %rndcol2 $+ *
  else if ( $right(%FUGG,3) == wma ) /msg $2 11! $+ $me %FUGG  $+ %rndcol1 $+ * $nick  $+ %rndcol2 $+ *
  else if ( $right(%FUGG,3) == mp3 ) /msg $2 13! $+ $me %FUGG  $+ %rndcol1 $+ * $nick  $+ %rndcol2 $+ *
  else if ( $right(%FUGG,3) == ogg ) /msg $2 9! $+ $me %FUGG  $+ %rndcol1 $+ * $nick  $+ %rndcol2 $+ *
  else if ( $right(%FUGG,3) == mid ) /msg $2 7! $+ $me %FUGG  $+ %rndcol1 $+ * $nick  $+ %rndcol2 $+ *
  else /msg $2 13! $+ $me %FUGG  $+ %rndcol1 $+ * $nick  $+ %rndcol2 $+ *
}
ctcp 1:rkick:*:/notice $nick RKICK: Remote Control (Level 500) or higher is required to use this function | /sound $nick denied.wav
ctcp 500:rkick:*:{
  ;/echo -a 1 = $1
  ;/echo -a 2 = $2
  ;/echo -a 3 = $3
  ;/echo -a 4 = $4-
  /set -u %rndcol1 $rand(3,15)
  /set -u %rndcol2 $rand(3,15)
  /set -u %rndcol3 $rand(3,15)
  /set -u %rndcol4 $rand(3,15)
  /set -u %rndcol5 $rand(3,15)
  /set -u %rndcol6 $rand(3,15)
  /set -u %rndcol7 $rand(3,15)
  /set -u %rndcol8 $rand(3,15)
  /set -u %rndcol9 $rand(3,15)
  /set -u %rndcol10 $rand(3,15)
  /set -u %rndcol11 $rand(3,15)
  ;/echo -a $3
  ;/echo -9 -a $me
  echo -9 -a $1 $2 $3 $4 $5
  if ($3 != $me) /kick $2 $3  $+ %rndcol1 $+ * $+ %rndcol2 $4- $+ %rndcol3 * $+ %rndcol4 Remote $+ %rndcol5 Kick * $+ %rndcol6 $nick  $+ %rndcol7 $+ *
  else if ($nick != $me) /kick $2 $nick  $+ %rndcol1 $+ * $+ %rndcol2 $4- $+ %rndcol3 * $+ %rndcol4 <- nice try j@ck@$$!!! :p $+ %rndcol5 * $+ %rndcol6 Remote $+ %rndcol7 Kick $+ %rndcol8 DENIED! $+ %rndcol9 * $+ %rndcol10 $me  $+ %rndcol11 $+ *
  else if ($nick == $me) echo 13 -a RKICK: Cannot remotely kick yourself
}
#remote1 end

#remote2 off
ctcp *:rtalk:*:/notice $nick RTALK: Remote functions are DISABLED
ctcp *:rsound:*:/notice $nick RSOUND: Remote functions are DISABLED
ctcp *:rjoin:*:/notice $nick RJOIN: Remote functions are DISABLED
ctcp *:rkick:*:/notice $nick RKICK: Remote functions are DISABLED
#remote2 end

;;;
;;; OGX Scanner (Level 800)
;;;

; ogx remotes are defined in ogx.mrc

;;;
;;; Administrator (Level 900)
;;;

ctcp 900:fserve:*:/fserve $nick 20 $+(",$mircdirdownload,") $+(",$mircdirdownload\welcome.txt,") | /sound $nick link.wav
ctcp 900:sva:*:/fserve $nick 20 a $+ $chr(58) $+ $chr(92) $+(",$mircdirdownload\welcome.txt,") | /sound $nick link.wav
ctcp 900:svb:*:/fserve $nick 20 b $+ $chr(58) $+ $chr(92) $+(",$mircdirdownload\welcome.txt,") | /sound $nick link.wav
ctcp 900:svc:*:/fserve $nick 20 c $+ $chr(58) $+ $chr(92) $+(",$mircdirdownload\welcome.txt,") | /sound $nick link.wav
ctcp 900:svd:*:/fserve $nick 20 d $+ $chr(58) $+ $chr(92) $+(",$mircdirdownload\welcome.txt,") | /sound $nick link.wav
ctcp 900:sve:*:/fserve $nick 20 e $+ $chr(58) $+ $chr(92) $+(",$mircdirdownload\welcome.txt,") | /sound $nick link.wav
ctcp 900:svf:*:/fserve $nick 20 f $+ $chr(58) $+ $chr(92) $+(",$mircdirdownload\welcome.txt,") | /sound $nick link.wav
ctcp 900:svg:*:/fserve $nick 20 g $+ $chr(58) $+ $chr(92) $+(",$mircdirdownload\welcome.txt,") | /sound $nick link.wav
ctcp 900:svh:*:/fserve $nick 20 h $+ $chr(58) $+ $chr(92) $+(",$mircdirdownload\welcome.txt,") | /sound $nick link.wav
ctcp 900:svi:*:/fserve $nick 20 i $+ $chr(58) $+ $chr(92) $+(",$mircdirdownload\welcome.txt,") | /sound $nick link.wav
ctcp 900:svj:*:/fserve $nick 20 j $+ $chr(58) $+ $chr(92) $+(",$mircdirdownload\welcome.txt,") | /sound $nick link.wav
ctcp 900:svk:*:/fserve $nick 20 k $+ $chr(58) $+ $chr(92) $+(",$mircdirdownload\welcome.txt,") | /sound $nick link.wav
ctcp 900:svl:*:/fserve $nick 20 l $+ $chr(58) $+ $chr(92) $+(",$mircdirdownload\welcome.txt,") | /sound $nick link.wav
ctcp 900:svm:*:/fserve $nick 20 m $+ $chr(58) $+ $chr(92) $+(",$mircdirdownload\welcome.txt,") | /sound $nick link.wav
ctcp 900:svn:*:/fserve $nick 20 n $+ $chr(58) $+ $chr(92) $+(",$mircdirdownload\welcome.txt,") | /sound $nick link.wav
ctcp 900:svo:*:/fserve $nick 20 o $+ $chr(58) $+ $chr(92) $+(",$mircdirdownload\welcome.txt,") | /sound $nick link.wav
ctcp 900:svp:*:/fserve $nick 20 p $+ $chr(58) $+ $chr(92) $+(",$mircdirdownload\welcome.txt,") | /sound $nick link.wav
ctcp 900:svq:*:/fserve $nick 20 q $+ $chr(58) $+ $chr(92) $+(",$mircdirdownload\welcome.txt,") | /sound $nick link.wav
ctcp 900:svr:*:/fserve $nick 20 r $+ $chr(58) $+ $chr(92) $+(",$mircdirdownload\welcome.txt,") | /sound $nick link.wav
ctcp 900:svs:*:/fserve $nick 20 s $+ $chr(58) $+ $chr(92) $+(",$mircdirdownload\welcome.txt,") | /sound $nick link.wav
ctcp 900:svt:*:/fserve $nick 20 t $+ $chr(58) $+ $chr(92) $+(",$mircdirdownload\welcome.txt,") | /sound $nick link.wav
ctcp 900:svu:*:/fserve $nick 20 u $+ $chr(58) $+ $chr(92) $+(",$mircdirdownload\welcome.txt,") | /sound $nick link.wav
ctcp 900:svv:*:/fserve $nick 20 v $+ $chr(58) $+ $chr(92) $+(",$mircdirdownload\welcome.txt,") | /sound $nick link.wav
ctcp 900:svw:*:/fserve $nick 20 w $+ $chr(58) $+ $chr(92) $+(",$mircdirdownload\welcome.txt,") | /sound $nick link.wav
ctcp 900:svx:*:/fserve $nick 20 x $+ $chr(58) $+ $chr(92) $+(",$mircdirdownload\welcome.txt,") | /sound $nick link.wav
ctcp 900:svy:*:/fserve $nick 20 y $+ $chr(58) $+ $chr(92) $+(",$mircdirdownload\welcome.txt,") | /sound $nick link.wav
ctcp 900:svz:*:/fserve $nick 20 z $+ $chr(58) $+ $chr(92) $+(",$mircdirdownload\welcome.txt,") | /sound $nick link.wav

menu nicklist {
  Extra Tools
  .-
  .Message With Nick
  ..Message With $$1:editbox -ap $mppnick($1)
  ..Setup Nick Apperance:{ if !$dialog(mppnick) { dialog -m mppnick mppnick } }
}
alias mppnick {
  var %a = $readini($mircdirsystem\mpp\mpp.ini,nick,color1)
  var %b = $readini($mircdirsystem\mpp\mpp.ini,nick,color2)
  var %c = $readini($mircdirsystem\mpp\mpp.ini,nick,surround)
  if ((%a != $null) && (%b != $null) && (%c != $null)) {
    return $chr(3) $+ %a $+ $chr(2) $+ $chr(2) $+ $chr($gettok(%c,1,32)) $+ $chr(3) $+ %b $+ $chr(2) $+ $chr(2) $+ $1 $+ $chr(3) $+ %a $+ $chr(2) $+ $chr(2) $+ $chr($gettok(%c,2,32)) $+ $chr(3)
  }
  elseif ((%a != $null) && (%b != $null) && (%c == $null)) {
    return $chr(3) $+ %b $+ $chr(2) $+ $chr(2) $+ $1 $+ $chr(3) $+ %a :: $+ $chr(3)
  }
  elseif ((%a != $null) && (%b == $null) && (%c == $null)) {
    return $1 $+ $chr(3) $+ %a :: $+ $chr(3)
  }
  elseif ((%a == $null) && (%b != $null) && (%c == $null)) {
    return $chr(3) $+ %b $+ $chr(2) $+ $chr(2) $+ $1 $+ $chr(3) ::
  }
  elseif ((%a == $null) && (%b == $null) && (%c != $null)) {
    return $chr($gettok(%c,1,32)) $+ $1 $+ $chr($gettok(%c,2,32))
  }
  elseif ((%a != $null) && (%b == $null) && (%c != $null)) {
    return return $chr(3) $+ %a $+ $chr(2) $+ $chr(2) $+ $chr($gettok(%c,1,32)) $+ $chr(3) $+ $chr(2) $+ $chr(2) $+ $1 $+ $chr(3) $+ %a $+ $chr(2) $+ $chr(2) $+ $chr($gettok(%c,2,32)) $+ $chr(3)
  }
  elseif ((%a == $null) && (%b != $null) && (%c != $null)) {
    return $chr($gettok(%c,1,32)) $+ $chr(3) $+ %b $+ $chr(2) $+ $chr(2) $+ $1 $+ $chr(3) $+ $chr(2) $+ $chr(2) $+ $chr($gettok(%c,2,32))
  }
  elseif ((%a == $null) && (%b == $null) && (%c != $null)) {
    return $chr($gettok(%c,1,32)) $+ $1 $+ $gettok(%c,2,32))
  }
  else {
    return $1 ::
  }
}
dialog mppnick {
  title "Messages with Nicks"
  size -1 -1 100 80
  option dbu

  text "This will setup how the nick you prefix your message with will be displayed.", 1, 1 3 98 14, center
  text "Color1", 2, 13 20 20 7
  combo 3, 5 27 40 130, drop
  text "Color2", 4, 63 20 20 7
  combo 5, 55 27 40 130, drop
  text "Surround", 6, 33 41 25 7
  combo 7, 28 48 40 130, drop
  button "Preview", 8, 8 65 30 11
  button "Close",9, 60 65 30 11, cancel
}
on *:dialog:mppnick:*:*: {
  if ($devent == init) {
    did -a mppnick 3,5 white
    did -a mppnick 3,5 black
    did -a mppnick 3,5 blue
    did -a mppnick 3,5 green
    did -a mppnick 3,5 red
    did -a mppnick 3,5 brown
    did -a mppnick 3,5 purple
    did -a mppnick 3,5 orange
    did -a mppnick 3,5 yellow
    did -a mppnick 3,5 lightgreen
    did -a mppnick 3,5 cyan
    did -a mppnick 3,5 lightcyan
    did -a mppnick 3,5 lightblue
    did -a mppnick 3,5 pink
    did -a mppnick 3,5 grey
    did -a mppnick 3,5 lightgrey
    did -a mppnick 3,5 none
    did -a mppnick 7 ½ ╗
    did -a mppnick 7 < >
    did -a mppnick 7 ï ¢
    did -a mppnick 7 ( )
    did -a mppnick 7 $chr(91) $chr(93)
    did -a mppnick 7 $chr(123) $chr(125)
    did -a mppnick 7 ╖ ╖
    did -a mppnick 7 ║ ║
    did -a mppnick 7 ░ ░
    did -a mppnick 7 ò ò
    did -a mppnick 7 ô ö
    did -a mppnick 7 " "
    did -a mppnick 7 ! !
    did -a mppnick 7 * *
    did -a mppnick 7 û û
    did -a mppnick 7 - -
    did -a mppnick 7 @ @
    did -a mppnick 7 ⌐ ⌐
    did -a mppnick 7 « «
    did -a mppnick 7 ≈ ≈
    did -a mppnick 7 + +
    did -a mppnick 7 ~ ~
    did -a mppnick 7 : :
    did -a mppnick 7 none
    var %a = $readini($mircdirsystem\mpp\mpp.ini,nick,color1)
    var %b = $readini($mircdirsystem\mpp\mpp.ini,nick,color2)
    var %c = $readini($mircdirsystem\mpp\mpp.ini,nick,surround)
    if (%a != $null) { did -c mppnick 3 $calc(%a + 1) }
    else { did -c mppnick 3 17 }
    if (%b != $null) { did -c mppnick 5 $calc(%b + 1) }
    else { did -c mppnick 5 17 }
    if (%c != $null) {
      var %d = $chr($gettok(%c,1,32)) $chr($gettok(%c,2,32))
    }
    else {
      var %d = none
    }
    var %e = $didwm(mppnick,7,%d)
    did -c mppnick 7 %e
  }
  elseif ($devent == sclick) {
    if ($did == 3) {
      var %a = $did(3).sel
      if (%a == 17) {
        remini $+(",$mircdirsystem\mpp\mpp.ini,") nick color1
      }
      else {
        writeini $+(",$mircdirsystem\mpp\mpp.ini,") nick color1 $calc(%a - 1)
      }
    }
    elseif ($did == 5) {
      var %a = $did(5).sel
      if (%a == 17) {
        remini $+(",$mircdirsystem\mpp\mpp.ini,") nick color2
      }
      else {
        writeini $+(",$mircdirsystem\mpp\mpp.ini,") nick color2 $calc(%a - 1)
      }
    }
    elseif ($did == 7) {
      var %a = $did(7).seltext
      if (%a == none) {
        remini $+(",$mircdirsystem\mpp\mpp.ini,") nick surround
      }
      else {
        writeini $+(",$mircdirsystem\mpp\mpp.ini,") nick surround $asc($gettok(%a,1,32)) $asc($gettok(%a,2,32))
      }
    }
    elseif ($did == 8) {
      echo -a $mppnick($me)
    }
  }
}

;this on text MUST BE THE LAST on text in this script!
on *:text:*:*:{
  if (($me isin $1-) && (%mppsound0 != $null) && ($exists($mircdirsounds\wav\ $+ %mppsound0))) { splay %mppsound0 }
  if ((%mpptext1 isin $1-) && (%mppsound1 != $null) && ($exists($mircdirsounds\wav\ $+ %mppsound1))) { splay %mppsound1 }
  if ((%mpptext2 isin $1-) && (%mppsound2 != $null) && ($exists($mircdirsounds\wav\ $+ %mppsound2))) { splay %mppsound2 }
  if ((%mpptext3 isin $1-) && (%mppsound3 != $null) && ($exists($mircdirsounds\wav\ $+ %mppsound3))) { splay %mppsound3 }
}

;;;
;;; SERVER BLOCKS
;;;

#rawtest off
;raw *:*: echo -s $numeric $1-
#rawtest end

#BlockWelcome on
;welcome
raw 001:*:{ halt } ; welcome
raw 002:*:{ halt } ; yourhost
raw 003:*:{ halt } ; created
raw 004:*:{ halt } ; myinfo
raw 005:*:{ halt } ;protctl
raw 005a:*:{ halt } ;protctl
raw 005b:*:{ halt } ;protctl
raw 006:*:{ halt } ; map
raw 007:*:{ halt } ;mapend
raw 008:*:{ halt } ;snomask
#BlockWelcome end

#BlockMOTD on
;motd
raw 372:*:{ halt } ; motd
raw 375:*:{ halt } ; motd start
raw 376:*:{ halt } ; end of motd
#BlockMOTD END

#BlockWho on
raw 352:*:{ halt } ; who
raw 315:*:{ halt } ; endofwho
#BlockWho end

#BlockLUsers on
;lusers
raw 250:*:{ halt } ; statscon
raw 251:*:{ halt } ; luserclient
raw 252:*:{ halt } ; luserop
raw 253:*:{ halt } ; luserunknown
raw 254:*:{ halt } ; luserchannels
raw 255:*:{ halt } ; lusername
raw 256:*:{ halt } ; adminme
raw 265:*:{ halt } ; localusers
raw 266:*:{ halt } ; gloablusers
#BlockLUsers END

#BlockNames1 off
raw 353:*:{ halt } ; namereply
raw 366:*:{ halt } ; endofnames
#BlockNames1 end

#BlockNames2 on
raw 353:*:{ echo -a 0 $+ $3- | halt } ; namereply
raw 366:*:{ echo -a 4 $+ $1- | halt } ; endofnames
#BlockNames2 end

#userhost off
raw 302:*:{ halt } ; userhost
#userhost end

#userhost2 on
raw 302:*:{ echo -a 11 $+ $1- | halt } ; userhost
#userhost2 end

#whois_query on
raw 311:*:{
  echo %whotmp 14-------------------------------------------------------
echo %whotmp 1,1... 14Nick:0 $c(2) $+ $2 $+ | echo %whotmp 1... 14Name:9 $c(2) $+ $6- | echo %whotmp 1 14Address:11 $c(2) $+ $3 $+ @ $+ $4 | halt } ; whois
raw 330:*:{ echo %whotmp 1,1...14Logon:0,1 $3 | halt }
raw 312:*:{ echo %whotmp 1,1.14 Server:2 $c(2) $+ $3 $+ , $+ $c(2) $4- | halt } ; whoisserver
raw 317:*:{ echo %whotmp 1,1... 14Idle:4 $c(2) $+ $duration($3) | echo %whotmp 1. 14SignOn:13 $c(2) $+ $asctime($4,dddd) $+ , $asctime($4,mmmm doo) $+ , $asctime($4,yyyy) at $asctime($4,h:nntt) | halt } ; whoisidle
raw 318:*:{ whoend1 | halt } ; endofwhois
raw 319:*:{ echo %whotmp 14,1Channels:8 $c(2) $+ $3- | halt }
raw 313:*:{ echo %whotmp 1,1..14Status:4 $2- | halt }
comchan1 $nick | halt ; whoischannels
#whois_query end

#whoisa_query off
raw 301:*:{ echo %whotmp 1... 14Away:7 $c(2) $+ $3- | halt } ; away
#whoisa_query end

#whois_chat off
raw 311:*:{
  echo = $+  %whotmp 14-------------------------------------------------------
echo = $+  %whotmp 1... 14Nick:0 $c(2) $+ $2 $+ | echo = $+  %whotmp 1... 14Name:9 $c(2) $+ $6- | echo = $+  %whotmp 1 14Address:11 $c(2) $+ $3 $+ @ $+ $4 | halt } ; whois
raw 330:*:{ echo = $+ %whotmp 1,1...14Logon:0,1 $3 | halt }
raw 312:*:{ echo = $+ %whotmp 1.14 Server:2 $c(2) $+ $3 $+ , $+ $c(2) $4- | halt } ; whoisserver
raw 317:*:{ echo = $+ %whotmp 1... 14Idle:4 $c(2) $+ $duration($3) | echo = $+  %whotmp 1. 14SignOn:13 $c(2) $+ $asctime($4,dddd) $+ , $asctime($4,mmmm doo) $+ , $asctime($4,yyyy) at $asctime($4,h:nntt) | halt } ; whoisidle
raw 318:*:{ whoend3 | halt } ; endofwhois
raw 319:*:{ echo = $+ %whotmp 14Channels:8 $c(2) $+ $3- | halt }
raw 313:*:{ echo = $+ %whotmp 1,1..14Status:4 $2- | halt }
comchan3 $nick | halt ; whoischannels
#whois_chat end

#whoisa_chat off
raw 301:*:{ echo = $+ %whotmp 1... 14Away:7 $c(2) $+ $3- | halt } ; away
#whoisa_chat end

#whois_command off
raw 311:*:{
  echo -a 14-------------------------------------------------------
echo -a 1... 14Nick:0 $c(2) $+ $2 $+ | echo -a 1... 14Name:9 $c(2) $+ $6- | echo -a 1 14Address:11 $c(2) $+ $3 $+ @ $+ $4 | halt } ; whois
raw 330:*:{ echo -a 1,1...14Logon:0,1 $3 | halt }
raw 312:*:{ echo -a 1.14 Server:2 $c(2) $+ $3 $+ , $+ $c(2) $4- | halt } ; whoisserver
raw 317:*:{
echo -a 1... 14Idle:4 $c(2) $+ $duration($3) | echo -a 1. 14SignOn:13 $c(2) $+ $asctime($4,dddd) $+ , $asctime($4,mmmm doo) $+ , $asctime($4,yyyy) at $asctime($4,h:nntt) | halt } ; whoisidle
raw 318:*:{ whoend2 | halt } ; endofwhois
raw 319:*:{ echo -a 14Channels:8 $c(2) $+ $3- | halt }
raw 313:*:{ echo -a 1,1..14Status:4 $2- | halt }
set %whotmp $2 | comchan2 %whotmp | halt  ; whoischannels
#whois_command end

#whoisa_command off
raw 301:*:{ echo -a 1... 14Away:7 $c(2) $+ $3- | halt } ; away
#whoisa_command end

#whois_normal off
raw 311:*:{ echo %whotmp 0 $+ $2 is $3 $+ @ $+ $4- | halt } ; whois
raw 312:*:{ echo %whotmp 0 $+ $2 using $3- | halt } ; whoisserver
raw 317:*:{ echo %whotmp 0 $+ $2 has been idle $duration($3) $+ , signed on $c(2) $+ $asctime($4) | halt } ; whoisidle
raw 318:*:{ echo %whotmp 0 $+ $2- | halt } ; endofwhois
raw 319:*:{ echo %whotmp 0 $+ $2 on $3- | halt } ; whoischannels
#whois_normal end

#whoisa_normal off
raw 301:*:{ echo %whotmp 0 $+ $2 is away: $3- | halt } ; away
#whoisa_normal end

#whois1 on
raw 301:*:{ halt } ; away
#whois1 end