[Commands]
n0=#pager start
n1=1:page {
n2=  if (%showctcp == on && $nick != $me) echo %c -a $chr(91) $+ $nick  $+ %c2 $+ $parm1 $+  $+ $chr(93)
n3=  if (%pager == off) goto pageroff | %sound | if ($parm2 == $null) goto nomsg | if (%msglog == on) write %path $+ \msg.txt $nick $+ ( $+ $address)( $+ $remove($adate,$right(3,$adate)) $+ @ $+ %time1 $+ ) $parm2*
n4=  if ($away == $true) raw -q notice $nick :Page has been received (Away Time:  $+ %ahours $+  h $+  $+ %aminutes $+ m $+ ) | if (%away == off) raw -q notice $nick :Page has been recorded. | goto end
n5=  :nomsg | raw -q notice $nick :Page received successfully. | goto end | :pageroff | raw -q notice $nick :This function has been disabled. | :end | .ignore -tu10 *!*@ $+ $site
n6=  if (%alert == %siren && %defcon == on) { .ignore -tu30 *!*@* | nick \ $+ $me | %kchan = .ignore -ut *!*@* | echo %c -a %h Possible flood detected, changing nick to  $+ %c2 $+ \ $+ $me $+  for %fnt seconds. CTCPs are now ignored, to undo ignore press  $+ %c2 $+ F12. | set %fnn $me | timer 1 %fnt nick %fnn | set %alert 0 | halt } | inc %alert | .timer 1 10 if (%alert > 0) dec %alert
n7=}
n8=#pager end
n9=30:info {
n10=  if (%showctcp == on && $nick != $me) echo %c -a $chr(91) $+ $nick  $+ %c2 $+ $parm1 $+  $+ $chr(93)
n11=  if ($parm2 == $null) { raw -q notice $nick :Usage: /CTCP $me INFO <info-line> (sets your info line) or /CTCP $me INFO none (removes your info line) | halt }
n12=  if ($parm2 == none) { write -ds $+ $address($nick,3) %path $+ \info.txt | raw -q notice $nick :Removed your info line. | halt }
n13=  write -ds $+ $address($nick,3) %path $+ \info.txt | write %path $+ \info.txt $address($nick,3) $remove($remove($parm2*,|),/) | raw -q notice $nick :Now: $parm2*
n14=}
n15=30:help {
n16=  if (%showctcp == on && $nick != $me) echo %c -a $chr(91) $+ $nick  $+ %c2 $+ $parm1 $+  $+ $chr(93)
n17=  raw -q notice $nick :( $+ %script $+ ) List of Commands for User Level voice ( $+ %script $+ )
n18=  raw -q notice $nick :/CTCP $me CHAN - Gives you a listing of all channels I am in.
n19=  .timer 1 3 raw -q notice $nick :/CTCP $me INVITE <channel # or all> - Invites you to the requested channel or all channels.
n20=  .timer 1 3 raw -q notice $nick :/CTCP $me INFO <info-line> - Sets your info line.
n21=  .timer 1 7 raw -q notice $nick :/CTCP $me PASS <password> - Sets your password for ident and other features.
n22=  .timer 1 7 raw -q notice $nick :/CTCP $me IDENT <password> - Adds a new hostmask to your my user file for you.
n23=}
n24=40:help {
n25=  if (%showctcp == on && $nick != $me) echo %c -a $chr(91) $+ $nick  $+ %c2 $+ $parm1 $+  $+ $chr(93)
n26=  raw -q notice $nick :( $+ %script $+ ) List of Commands for User Level op ( $+ %script $+ )
n27=  raw -q notice $nick :/CTCP $me CHAN - Gives you a listing of all channels I am in.
n28=  .timer 1 3 raw -q notice $nick :/CTCP $me INVITE <channel # or all> - Invites you to the requested channel or all channels.
n29=  .timer 1 3 raw -q notice $nick :/CTCP $me OP <channel> <password> - Grants you Ops in the requested channel. 
n30=  .timer 1 7 raw -q notice $nick :/CTCP $me VOICE <channel> <nick(optional for your friends)> - Gives you or your friends voice in the requested channel.
n31=  .timer 1 11 raw -q notice $nick :/CTCP $me UNBAN <channel> - Removes all bans on you in the requested channel.
n32=  .timer 1 11 raw -q notice $nick :/CTCP $me INFO <info-line> - Sets your info line.
n33=  .timer 1 15 raw -q notice $nick :/CTCP $me PASS <password> [newpass] - Sets or changes your password.
n34=  .timer 1 15 raw -q notice $nick :/CTCP $me IDENT <password> - Adds a new hostmask to your my user file.
n35=}
n36=#friends start
n37=30:chan { if (%showctcp == on && $nick != $me) echo %c -a $chr(91) $+ $nick  $+ %c2 $+ $parm1 $+  $+ $chr(93) | chan $nick }
n38=30:invite {
n39=  if (%showctcp == on && $nick != $me) echo %c -a $chr(91) $+ $nick  $+ %c2 $+ $parm1 $+  $+ $chr(93)
n40=  if ($parm2 == $null) { raw -q notice $nick :Usage: /CTCP $me INVITE <channel # or all> | halt } | if ($parm2 == all) { ia $nick | raw -q notice $nick :Inviting you to all channels I'm opped in. | halt }
n41=  if $nick ison $parm2 { raw -q notice $nick :You are already on  $+ $parm2 $+ . | halt } | if $me ison $parm2 goto in | raw -q notice $nick :I'm not on  $+ $parm2 $+ . | halt 
n42=  :in | if $me isop $parm2 goto next | raw -q notice $nick :I'm not opped in $parm2 right now. | halt | :next | invite $nick $parm2 | raw -q notice $parm2 :Invited $nick $+ ( $+ $address $+ ) to  $+ $parm2 $+ .
n43=}
n44=40:unban { if (%showctcp == on && $nick != $me) echo %c -a $chr(91) $+ $nick  $+ %c2 $+ $parm1 $+  $+ $chr(93) | if ($parm2 == $null) { raw -q notice $nick :Usage: UNBAN <channel> | halt } | if $me isop $parm2 { set %unban on | set %ubchan $parm2 | set %ubnick $nick | whois $nick } | else raw -q notice $nick :I'm not opped in  $+ $parm2 $+  . }
n45=40:voice {
n46=  if (%showctcp == on && $nick != $me) echo %c -a $chr(91) $+ $nick  $+ %c2 $+ $parm1 $+  $+ $chr(93)
n47=  if ($parm2 == $null) { raw -q notice $nick :Usage: /CTCP $me VOICE <channel #> [nickname(for friends)]  | halt } | if $me isop $parm2 goto voice
n48=  raw -q notice $nick :I'm not opped in  $+ $parm2 $+  | halt | :voice | if ($parm3 == $null) mode $parm2 +v $nick | if ($parm3 != $null) mode $parm2 +v $parm3 
n49=}
n50=40:op {
n51=  if (%showctcp == on && $nick != $me) echo %c -a $chr(91) $+ $nick  $+ %c2 $+ $parm1 $+  $+ $chr(93)
n52=  if ($parm2 == $null) { raw -q notice $nick :Usage: /CTCP $me OP <channel #> <password> | halt }
n53=  if (%reqpass == on) { if ($oppw($nick,$parm3) == 1) goto next | raw -q notice $nick :Invalid password. | halt  | :next | %pspnck = $readini %path $+ \names.txt %popnck opchannel | if (($parm2 isin %pspnck) || (%pspnck == all)) goto next1 | raw -q notice $nick :You do not have this function available to you on $parm2 $+ . |  halt  }
n54=  :next1 | if $me isop $parm2 goto op | raw -q notice $nick :I'm not opped in $parm2 $+ . | halt | :op | mode $parm2 +o $nick
n55=}
n56=1:ident* { if (%showctcp == on && $nick != $me) echo %c -a $chr(91) $+ $nick  $+ %c2 $+ $parm1 $+  $+ $chr(93) | if ($parm2 == $null) { raw -q notice $nick :Usage: /CTCP $me IDENT <password> | halt } | if ($idpass($parm2) != $nick && $idpass($parm2) != $null) { raw -q notice $nick :You're not $nick, you're $idpass($parm2) $+ . | halt } | set %ident on | set %ipass $parm2 | whois $nick | .ignore -tu10 *!*@ $+ $site }
n57=30:pass {
n58=  if (%showctcp == on && $nick != $me) echo %c -a $chr(91) $+ $nick  $+ %c2 $+ $parm1 $+  $+ $chr(93)
n59=  if ($parm2 == $null) { raw -q notice $nick :Usage: /CTCP $me PASS <password> | halt }
n60=  if ($idpass($parm2) != $null && $parm3 == $null) { raw -q notice $nick :You already have a password set. | halt } | if ($len($parm2) < 4) { raw -q notice $nick :Please use at least 4 characters. | halt } | if ($idpass($parm2) != $null && $parm3 == $null) { raw -q notice $nick :Invalid password, please try again. | halt } | if ($parm3 == $null) { writeini %path $+ \names.txt $nick password $parm2 | writeini %path $+ \names.txt passwords $parm2 $nick | raw -q notice $nick :Password set to ' $+ $parm2 $+ ' | halt }
n61=  if ($parm3 != $null && $len($parm3) < 4) { raw -q notice $nick :Please use at least 4 characters. | halt } | if ($idpass($parm3) != $null) { raw -q notice $nick :Invalid password, please try again. | halt } | if (($parm3 !=  $null) && ($idpass($parm2) == $nick) && ($idpass($parm3) == $null)) { writeini %path $+ \names.txt $nick password $parm3 | remini %path $+ \names.txt passwords $parm2 | writeini %path $+ \names.txt passwords $parm3 $nick | raw -q notice $nick :Changed password to ' $+ $parm3 $+ ' | halt } 
n62=}
n63=#friends end
n64=25:dcc chat { if ($parm5 == 19) .ignore -tu20 *!*@ $+ $site | else creq auto }
n65=25:dcc send {
n66=  if ($parm6 > %maxfsize && %fserve == on) { msg = $+ $nick Sorry, file size to large. Please send me a file less than %maxfsize bytes. | sreq ignore | close -g $nick $parm3 | halt }
n67=  else sreq auto
n68=}
n69=+6:dcc send { sreq ignore }
n70=#dcctoggles disabled
n71=1:dcc chat { creq ignore | raw -q notice $nick :Sorry, I do not accept chats from strangers. | .ignore -tu20 *!*@ $+ $site }
n72=1:dcc send {
n73=  if ($parm6 > %maxfsize && %fserve == on) { msg = $+ $nick Sorry, file size to large. Please send me a file less than %maxfsize bytes. | sreq ignore | close -g $nick $parm3 | halt }
n74=  if (%fserve == on) sreq auto
n75=  else { sreq ignore | raw -q notice $nick :Sorry, I do not accept files from strangers. | .ignore -tu20 *!*@ $+ $site }
n76=}
n77=#dcctoggles end
n78=1:dcc send {
n79=  if ($parm6 > %maxfsize && %fserve == on) { msg = $+ $nick Sorry, file size to large. Please send me a file less than %maxfsize bytes. | sreq ignore | close -g $nick $parm3 | halt }
n80=  if (%fserve == on) sreq auto | if (%autoget == on) sreq auto | else sreq ask
n81=}
n82=1:dcc chat { if ($parm5 == 19) .ignore -tu20 *!*@ $+ $site | if (%autoget == on) sreq auto | else creq ask }
n83=#ctcpprot start
n84=+4:* {
n85=  if (%showctcp == on && $nick != $me) echo %c -a $chr(91) $+ $nick  $+ %c2 $+ $parm1 $+  $+ $chr(93)
n86=  if (%alert == %siren && %defcon == on) { .ignore -tu30 *!*@* | nick \ $+ $me | %kchan = .ignore -ut *!*@* | echo %c -a %h Possible flood detected, changing nick to  $+ %c2 $+ \ $+ $me $+  for %fnt seconds. CTCPs are now ignored, to undo ignore press  $+ %c2 $+ F12. | set %fnn $me | timer 1 %fnt nick %fnn | set %alert 0 | halt }
n87=  .ignore -tu20 *!*@ $+ $site | inc %alert
n88=  echo %c -a %h Added  $+ %c2 $+ $nick( $+ $address) to ignore list  $+ %c3 $+ (defcon level  $+ %alert $+  of  $+ %siren $+ ) | .timer 1 10 if (%alert > 0) dec %alert
n89=}
n90=+3:* {
n91=  if (%showctcp == on && $nick != $me) echo %c -a $chr(91) $+ $nick  $+ %c2 $+ $parm1 $+  $+ $chr(93)
n92=  if (%alert == %siren && %defcon == on) { .ignore -tu30 *!*@* | nick \ $+ $me | %kchan = .ignore -ut *!*@* | echo %c -a %h Possible flood detected, changing nick to  $+ %c2 $+ \ $+ $me $+  for %fnt seconds. CTCPs are now ignored, to undo ignore press  $+ %c2 $+ F12. | set %fnn $me | timer 1 %fnt nick %fnn | set %alert 0 | halt }
n93=  .auser =4 *!*@ $+ $site | inc %alert | .timer 1 10 if (%alert > 0) dec %alert
n94=}
n95=+2:* {
n96=  if (%showctcp == on && $nick != $me) echo %c -a $chr(91) $+ $nick  $+ %c2 $+ $parm1 $+  $+ $chr(93)
n97=  if (%alert == %siren && %defcon == on) { .ignore -tu30 *!*@* | nick \ $+ $me | %kchan = .ignore -ut *!*@* | echo %c -a %h Possible flood detected, changing nick to  $+ %c2 $+ \ $+ $me $+  for %fnt seconds. CTCPs are now ignored, to undo ignore press  $+ %c2 $+ F12. | set %fnn $me | timer 1 %fnt nick %fnn | set %alert 0 | halt }
n98=  .auser =3 *!*@ $+ $site | inc %alert | .timer 1 10 if (%alert > 0) dec %alert
n99=}
n100=1:echo {
n101=  if (%showctcp == on && $nick != $me) echo %c -a $chr(91) $+ $nick  $+ %c2 $+ $parm1 $+  $+ $chr(93)
n102=  if (%alert == %siren && %defcon == on) { .ignore -tu30 *!*@* | nick \ $+ $me | %kchan = .ignore -ut *!*@* | echo %c -a %h Possible flood detected, changing nick to  $+ %c2 $+ \ $+ $me $+  for %fnt seconds. CTCPs are now ignored, to undo ignore press  $+ %c2 $+ F12. | set %fnn $me | timer 1 %fnt nick %fnn | set %alert 0 | halt }
n103=  .ignore -tu20 *!*@ $+ $site | inc %alert
n104=  echo %c -a %h Added  $+ %c2 $+ $nick( $+ $address) to ignore list  $+ %c3 $+ (defcon level  $+ %alert $+  of  $+ %siren $+ ) | .timer 1 10 if (%alert > 0) dec %alert
n105=}
n106=1:version { 
n107=  if (%showctcp == on && $nick != $me) echo %c -a $chr(91) $+ $nick  $+ %c2 $+ $parm1 $+  $+ $chr(93)
n108=  if (%alert == %siren && %defcon == on) { .ignore -tu30 *!*@* | nick \ $+ $me | %kchan = .ignore -ut *!*@* | echo %c -a %h Possible flood detected, changing nick to  $+ %c2 $+ \ $+ $me $+  for %fnt seconds. CTCPs are now ignored, to undo ignore press  $+ %c2 $+ F12. | set %fnn $me | timer 1 %fnt nick %fnn | set %alert 0 | halt }
n109=  .auser =2 *!*@ $+ $site | .timer 1 30 .ruser 2,3,4 *!*@ $+ $site |  inc %alert | .timer 1 10 if (%alert > 0) dec %alert 
n110=  raw -q notice $nick :
VERSION %h $+ by Sprint  for mIRC4.72+ $+ ... $+ [ $+ .Phear Me Fool. $+ ] | 
n111=}
n112=1:* {
n113=  if ((%showctcp == on) && ($nick != $me)) echo %c -a $chr(91) $+ $nick  $+ %c2 $+ $parm1 $+  $+ $chr(93)
n114=  if (%alert == %siren && %defcon == on) { .ignore -tu30 *!*@* | nick \ $+ $me | %kchan = .ignore -ut *!*@* | echo %c -a %h Possible flood detected, changing nick to  $+ %c2 $+ \ $+ $me $+  for %fnt seconds. CTCPs are now ignored, to undo ignore press  $+ %c2 $+ F12. | set %fnn $me | timer 1 %fnt nick %fnn | set %alert 0 | halt }
n115=  .auser =2 *!*@ $+ $site | .timer 1 30 .ruser 2,3,4 *!*@ $+ $site | inc %alert | .timer 1 10 if (%alert > 0) dec %alert
n116=}
n117=#ctcpprot end