diff --git a/fix b/fix new file mode 100644 index 0000000..6bf7976 --- /dev/null +++ b/fix @@ -0,0 +1,31 @@ +on *:load:{ + unset %f + var %m = $chr(59) you can put your own q here, this file will not be overwritten when updating nbs-irc. + if (!$exists(scripts\a-own.nbs)) .write scripts\a-own.nbs $replace(%m,q,aliases) + .load -a scripts\a-own.nbs + n.checkscript alias1.nbs -a + n.checkscript alias2.nbs -a + n.checkscript alias3.nbs -a + if (!$exists(scripts\r-own.nbs)) .write scripts\r-own.nbs $replace(%m,q,scripts) + .load -rs1 scripts\r-own.nbs + n.checkscript main.nbs -rs + if (!$tname) .theme cold + if (!%f) .echo -qg $input(Repair appears to be successfull $+ $chr(44) restart may be required,o) + .unload -rs fix +} +alias -l n.checkscript { + if ($2 == -a) && (!$alias($1)) || ($2 == -rs) && (!$script($1)) { + if ($exists(scripts\ $+ $1)) { + .load [ $2 ] scripts\ $+ $1 + } + else { + if ($dialog(strt)) dialog -x strt + set %f 1 + var %a = -age 4,4 $str(W,54) + echo %a + echo -ag * Error: file $mircdirscripts\ $+ $1 is missing, Replace the file and restart nbs or reinstall an update/full version. + echo -ag * Note: installing updates will keep all settings, full reinstall will only keep nbs settings. + echo %a + } + } +} diff --git a/mirc.ini b/mirc.ini new file mode 100644 index 0000000..3e8bfa5 --- /dev/null +++ b/mirc.ini @@ -0,0 +1,174 @@ +[chanfolder] +n0=#nbs-irc + +[text] +ignore=*.com +commandchar=/ +linesep=- +timestamp=(HH:nn:ss) +accept=*.* +aptitle= +quit=$quitmsg +defport=6667 +theme=mIRC Classic +logstamp=(HH:nn:ss) +network=QuakeNet + +[warn] +fserve=on +dcc=off +[dirs] +logdir=logs\ +waves=sounds\ +midis=sounds\ +mp3s=sounds\ +wmas=sounds\ +oggs=sounds\ +[options] +n0=0,1,0,0,1,0,300,0,0,0,1,0,0,0,0,0,0,0,0,0,4096,0,1,0,0,0,1,1,0,50,1,1,0,1,0 +n1=3,100,0,0,0,0,0,0,2,0,1,1,1,1,0,0,1,1,0,0,0,0,1,0,5,0,0,0,0,0,1,1,0,0,0,2 +n2=0,0,0,2,1,1,1,1,0,60,120,0,0,1,0,0,0,0,1,120,20,10,0,0,0,0,1,1,0,1,0,1,0,0,1,0 +n3=3000,0,0,0,1,0,1,1,0,1,0,1,0,0,0,1,1,1,0,1,0,0,1,0,0,1,0,0,0,0,0,3,180,0,0,0,0 +n4=1,0,1,1,0,3,9999,0,0,1,1,1,1024,0,1,99,60,0,0,0,2,1,1,0,0,5000,1,1,131,0,0,0,1,1,0,0,1 +n5=1,1,1,0,1,1,1,1,1,1,0,0,0,1,1,1,1,1,300,100,10,0,0,29,0,1,1,8192,1,0,0,99,0,1,0,0 +n6=0,1,0,0,0,0,0,0,0,0,0,0,0,17,0,0,0,1,1,1,0,0,100,1,1,0,1,0,1,0,5,1,1,1,0,0 +n7=1,0,0,0,0,0,0,1,1,1,1,1,0,1,0,0,1,70,0,30,1,1,1,1,1,1,0,0,0,0,1,1,1,1,1,0,1 +n8=1,2,1,168,1,1,1,2,0,0,0,0,0,0,0,0,1,0,0,0,0,0,168,1,0,1,1,1,1,0,0,1,1,0,3 +[pfiles] +n0=popups.ini +n1=popups.ini +n2=popups.ini +n3=popups.ini +n4=popups.ini +[windows] +main=144,864,58,701,2,1,0 +scripts=25,473,45,441,0,0,0 +wstatus=-1,818,-1,579,1,1,0 +wstatus-QuakeNet=-1,818,-1,579,1,1,0 +status=0,818,0,579,2,1,0 +status-QuakeNet=0,818,0,579,2,1,0 +[agent] +enable=0 +char=merlin.acs +options=1,1,1,100,0 +speech=150,60,100,1,180,10,50,1,1,1,0,50,1 +channel=1,1,1,1,1,1,1,1,1 +private=1,1,1,1 +other=1,1,1,1,1,1,1,0 +pos=20,20 +lang=0x041d +[files] +servers=servers.ini +finger=finger.txt +urls=urls.ini +addrbk=addrbk.ini +trayicon=scripts\dll\i.dll +[dde] +ServerStatus=on +ServiceName=mIRC- +CheckName=off + +[background] +[fonts] +fstatus=tahoma,411,0 +fchannel=tahoma,411,0 +fquery=tahoma,411,0 +flist=tahoma,411,0 +ffinger=tahoma,411,0 +fwwwlist=tahoma,411,0 +fnotify=tahoma,411,0 +flinks=tahoma,411,0 +fscripts=Courier New,414,0 +[ident] +active=no +system=UNIX +port=113 +[socks] +enabled=no +port=1080 +method=4 +dccs=no +useip=yes +[language] +sjis=0 +multibyte=0 +mbed=1 +utf=1 +linking=1 +[clicks] +status=/lusers +query=/whois $$1 +channel=/channel +nicklist=/query $$1 +notify=/whois $$1 +message=/whois $$1 +[marker] +show=off +size=3 +colour=4 +method=1 +[fileserver] +[dccserver] +n0=0,59,0,0,0,0 +[mirc] +host=QuakeNet: Random serverSERVER:irc.quakenet.org:6667GROUP:QuakeNet +[styles] +thin=0 +font=0 +hide=0 +color=2960685 +size=1 +buttons=0 +[highlight] +[findtext] +[tipopts] +options=0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,30,10,1 +[ports] +dcc=1 +other=0 +random=off +bind=off +[ssl] +show=1 +[waves] +query=No Sound +notice=No Sound +invite=No Sound +disconnect=No Sound +send=scripts\beep.wav +highlight=No Sound +flash=No Sound +dccfail=No Sound +chat=No Sound +connect=No Sound +[dragdrop] +n0=*.wav:/sound $1 $2- +n1=*.*:/dcc send $1 $2- +s0=*.*:/dcc send $1 $2- +[extensions] +n0=defaultEXTDIR:download\ +n1=*.wav,*.mid,*.mp3,*.wma,*.oggEXTDIR:download\EXTOPT:1 +[colors] +n0=mIRC Classic,1,0,15,15,14,14,15,14,14,14,14,0,15,14,14,0,14,14,0,14,0,1,0,1,0,15,6,1,1,15 +[palettes] +n0=16777215,0,8323072,37632,255,127,10223772,32764,65535,64512,9671424,16747530,16515072,16711935,8355711,13158600 +[cnicks] +n0=Q!TheQBot@CServe.quakenet.org,14,,,0,0,0,2,0 +n1=L!TheLBot@lightweight.quakenet.org,14,,,0,0,0,2,0 +n2=$me,11,,,1,1,0,2,0 +n3=,0,@,,0,0,0,2,0 +n4=,15,+,,0,0,0,2,0 +n5=,14,,,0,1,0,2,0 +[afiles] +n0=scripts\a-own.nbs +n1=scripts\alias1.nbs +n2=scripts\alias3.nbs +n3=scripts\alias2.nbs +[rfiles] +n0=variables.ini +n1=variables.ini +n2=scripts\r-own.nbs +n3=scripts\main.nbs +n4=scripts\tema\cold.tem +[update] +check=0 \ No newline at end of file diff --git a/nbs.ico b/nbs.ico new file mode 100644 index 0000000..567dbd3 Binary files /dev/null and b/nbs.ico differ diff --git a/popups.ini b/popups.ini new file mode 100644 index 0000000..afdddeb --- /dev/null +++ b/popups.ini @@ -0,0 +1,10 @@ +[cpopup] + +[bpopup] +n0=Script + +[mpopup] + +[qpopup] + +[lpopup] \ No newline at end of file diff --git a/scripts/a-own.nbs b/scripts/a-own.nbs new file mode 100644 index 0000000..366979a --- /dev/null +++ b/scripts/a-own.nbs @@ -0,0 +1 @@ +; you can put your own aliases here, this file will not be overwritten when updating nbs-irc diff --git a/scripts/alias1.nbs b/scripts/alias1.nbs new file mode 100644 index 0000000..a15ab2d --- /dev/null +++ b/scripts/alias1.nbs @@ -0,0 +1,153 @@ +sys { + $iif($1 == -e,n.echo normal -atg,say) OS: $n.osinfo  –  CPU: $n.cpuinfo  –  Memory usage: $+($dedll(usedphysicalmem),/,$dedll(totalphysicalmem)) MB ( $+ $dedll(memoryload) $+ )  –  Graphics: $dedll(videocard) ( $+ $replacecs($dedll(res),bpp,bit) $+ ) +} +os { + cuptime + var %x = $n.osinfo + $iif($1 == -e,n.echo normal -atg,say) os: %x $iif(xp isin %x,(installed on $gettok($dedll(installdate),2-,44) $+ ))  –  uptime: $dur($calc($ticks / 1000)) +} +uptime { + cuptime + $iif($1 == -e,n.echo normal -atg,say) uptime: $dur($calc($ticks / 1000)) $iif($ticks < $ncfg(ruptime),  –  record: $dur($calc($ncfg(ruptime) / 1000))) +} +ip { + if ($ip) $iif($1 == -e,n.echo normal -atg,say) ip: $ip + else n.echo normal -atg no ip found +} +cuptime { + if (!$ncfg(ruptime)) { w_ncfg ruptime $ticks } + if ($ticks > $ncfg(ruptime)) { w_ncfg ruptime $ticks } +} +uptimefake say Win95 uptime: $r(3,51) $+ w $r(1,6) $+ d $r(1,23) $+ h $r(1,59) $+ s +wah say 8,9WAAA8,9A9,8AAAA8,9AAA9,8AAAAA8,9AAAA9,8AAAAA8,9AAAA9,8AAAAAAA8,9AAAAA9,8AAAA8,9AAAA9,8AAAAA8,9AAAA9,8AAAA8,9AAA9,8AAAA8,9AA9,8AAAA8,9AAAHH9,8HHHH8,9!!!!!!!!!! +:p say :PpPPppPPpPPppPppPPpPPpPPppPppPPpPPpPPppPppPPpPPpPPppPppPPpPPpPPppPppPPpPPpPPppPppPPpPPpPPppP +wee say 8,9WEEEE9,8EEEE8,9EEEE9,8EEEE8,9EEEE9,8EEEE8,9EEEE9,8EEEE8,9EEEE9,8EEEE8,9EEEE9,8EEEE8,9EEEE9,8EEEE8,9EEEE9,8EEEE8,9EEEE9,8EEEE8,9EEEE9,8EEEE8,9!!!!!!!!!! +bu say brain usage: 1% [4|||||||||] +mem $iif($1 == -e,n.echo normal -atg,say) memory usage: $+($dedll(usedphysicalmem),/,$dedll(totalphysicalmem)) MB ( $+ $dedll(memoryload) $+ ) +cpu $iif($1 == -e,n.echo normal -atg,say) cpu: $n.cpuinfo +gfx $iif($1 == -e,n.echo normal -atg,say) graphics card: $dedll(videocard) ( $+ $replacecs($dedll(res),bpp,bit) $+ ) +net $iif($1 == -e,n.echo normal -atg,say) nic: $dedll(conn) +snd $iif($1 == -e,n.echo normal -atg,say) sound card: $dedll(soundcard) +bw { + var %d = $dedll(banddown), %u = $dedll(bandup) + if (%u > 1023) var %u = $round($calc(%u /1024),2) MB/s + else var %u = $round(%u,1) kB/s + if (%d > 1023) var %d = $round($calc(%d /1024),2) MB/s + else var %d = $round(%d,1) kB/s + $iif($1 == -e,n.echo normal -atg,say) download: %d  –  upload: %u +} +whois2 do_whois $1 +whois { + if ($chr(42) isin $1) || ($chr(63) isin $1) do_whois $1 + else do_whois $1 $1 +} +do_whois { + if ($ncfg(whois) == @whois) { + set %w-dest @whois ( $+ $cid $+ ) + if (!$window(%w-dest)) { + if ($ncfg(whois_inside) == 1) window -k0n %w-dest + else window -k0dn %w-dest 200 200 600 200 nbs.ico + } + if ($ncfg(whois_inside) != 1) iline $color(info) %w-dest 1 $timestamp $pre waiting for reply $par($1) + if ($appactive) && (!%whois.window.passive) window -a %w-dest + } + !whois $1- +} +hdd hd $1- +hd { + ghds fixed + $iif($1 == -e,echo -a $pre,say) free space: %thdf $+ / $+ %thds GB ( $+ $perc(%thdfree,%thdsize) $+ ) +} +hdds hds $1- +hds { + unset %? + if (l isin $1-) var %labels = 1 + if (e isin $1-) var %hd.echo = 1 + if (m isin $1-) var %type = remote + else var %type = fixed + var %ii = 99 + while (%ii < 123) { + if ($disk($chr(%ii)).type == %type) var % [ $+ [ $chr(%ii) ] ] $iif(%labels == 1 && $disk($chr(%ii)).label,( $+ $disk($chr(%ii)).label $+ )) $round($calc($calc($disk($chr(%ii)).free / 1024 / 1024) /1024),2) $+ / $+ $round($calc($calc($disk($chr(%ii)).size / 1024 / 1024) / 1024),2) + inc %ii + } + var %ii = 99, %hdsay + while (%ii < 123) { + var %tmp.v = $chr(37) $+ $chr(%ii) + if ($eval(%tmp.v,2)) var %hdsay = %hdsay ( $+ $upper($right(%tmp.v,-1)) $+ :) $eval(%tmp.v,2)  -  + inc %ii + } + ghds %type + if (%thds > 1) $iif(%hd.echo == 1,n.echo normal -atg,say) free space: %hdsay (total: %thdf $+ / $+ %thds GB) + else n.echo info -atg /hds: no %type drives found +} +ghds { + if ($1) var %type = $1 + unset %thdfree %thdsize + set %ii 99 + while (%ii < 123) { + if ($disk($chr(%ii)).type == %type) inc %thdfree $disk($chr(%ii)).free + inc %ii + } + set %ii 99 + while (%ii < 123) { + if ($disk($chr(%ii)).type == %type) inc %thdsize $disk($chr(%ii)).size + inc %ii + } + set %thdf $round($calc($calc(%thdfree /1024/1024) /1024),2) + set %thds $round($calc($calc(%thdsize /1024/1024) /1024),2) +} +txt if ($exists($1)) { set %txt $1- | dlg txt } +setup dlg cp +popups dlg popups +about aboutnbs +aboutnbs dlg om +autocon dlg autocon +nq dlg np +quakenet dlg qnet +undernet dlg unet +misc gen +gen dlg misc +blist dlg blist +seekcw dlg pcw +prot dlg skydd +alarm dlg alarm +sa dlg mp3s +mp3say dlg mp3s +fkeys dlg fkeys +ch dlg cl +cns dlg ns +cmds dlg cmds +paste { set %paste.target $active | dlg paste } +gl g-join $1- +tedit { + if ($1) set %tedit $1- + else set %tedit $left($nopath($isalias(ttimestamp).fname),-4) + dlg tedit +} +hevents { + set %he.chan $1 + dlg hevent +} +caj { + if ($1) set %n.caj $1- + else set %n.caj $network + dlg aj +} +addedit { + if ($1) set %addedit $1- + dlg addedit +} +ren { + say 1,1@@@@@@@@0,0@1,1@@0,0@1,1@ + say 1,1@@@@@@@@0,0@1,1@@0,0@1,1@ + say 1,1@@@@@@@@@0,0@@0,01,1@@ + say 1,1@@@@@@@@0,0@@@1,1@@ + say 1,1@@@@@@@@@0,0@@1,1@@ + say 1,1@@0,0@@@@@@@@@1,1@@ + say 1,1@0,0@@@@@@@@@@1,1@@ + say 1,1@0,0@@@@@@@@@@1,1@@ + say 1,1@0,0@1,1@0,0@1,1@@@@0,0@1,1@0,0@1,1@@ + say 1,1@0,0@1,1@0,0@1,1@@@@0,0@1,1@0,0@1,1@@ + say 1,1@0,0@1,1@0,0@1,1@@@@0,0@1,1@0,0@1,1@@ +} +faq n.url http://www.nbs-irc.net/faq diff --git a/scripts/alias2.nbs b/scripts/alias2.nbs new file mode 100644 index 0000000..e356b6f --- /dev/null +++ b/scripts/alias2.nbs @@ -0,0 +1,102 @@ +f2 setup +f3 n.fkey F3 +f4 n.fkey F4 +f5 n.fkey F5 +f6 if ($me ison %banchan) && (%banchan == $active) && (%banmode) && (%banmask) mode %banchan %banmode %banmask +f7 n.fkey F7 +f8 n.fkey F8 +f9 n.fkey F9 +f10 n.fkey F10 +f11 n.fkey F11 +f12 n.fkey F12 + +cf1 cmds +cf2 if (%tmp.dnsresult) clipboard $ifmatch +cf5 { + if (%rejointimer) { + .timer [ $+ [ %rejointimer ] ] off + echo $color(info) -atg $pre rejoin aborted $par(%rejointimer) + } +} +cf12 scon -a clearall | scon -at1 topicall +sf1 dll scripts\dll\winamp.dll prevsong +sf2 dll scripts\dll\winamp.dll playsong +sf3 dll scripts\dll\winamp.dll playpause +sf4 dll scripts\dll\winamp.dll stopsong +sf5 dll scripts\dll\winamp.dll nextsong + +n.fkey { + if (!$1) return + if ($ncfg(fkey_ [ $+ [ $1 ] ])) && ($ifmatch != ânoneâ) $eval($ifmatch,2) + else echo $color(other) -atg $pre Key $1 is unbound (use /fkeys to bind) +} +fkey n.fkey $1- +o { + if ($n.qnet) { + if (Q ison $active) { msg Q op $active } + elseif (L ison $active) { msg L op $active } + } +} +g { + if ($1) n.url http://www.google.com/search?q= $+ $replace($1-,$chr(32),$chr(37) $+ 20) + else n.url http://www.google.com/ +} +imdb { + if ($1) n.url http://www.imdb.com/Find?for= $+ $replace($1-,$chr(32),$chr(37) $+ 20) $+ &select=All + else n.url http://www.imdb.com/ +} +wiki { + if ($1) n.url http://en.wikipedia.org/wiki/ $+ $replace($1-,$chr(32),$chr(37) $+ 20) + else n.url http://en.wikipedia.org/ +} +thott { + if ($1) n.url http://www.thottbot.com/?s= $+ $replace($1-,$chr(32),$chr(37) $+ 20) + else n.url http://www.thottbot.com/ +} +allak { + if ($1) n.url http://wow.allakhazam.com/search.html?q= $+ $replace($1-,$chr(32),$chr(37) $+ 20) + else n.url http://wow.allakhazam.com/ +} +wh { + if ($1) n.url http://www.wowhead.com/?search= $+ $replace($1-,$chr(32),$chr(37) $+ 20) + else n.url http://www.wowhead.com/ +} +join { + if ($numtok($1,44) < 2) && (-* !iswm $1) { + if ($left($1,1) == $chr(35)) || ($left($1,1) == &) var %c = $1 + else var %c = $chr(35) $+ $1 + if (!$2) && ($chankey(%c)) join %c $v1 + else { + if ($2) set %pw. [ $+ [ %c ] ] $2 + join %c $2 + } + } + else !join $1- +} +slap { + if ($read(config\slaps.txt)) me $replace($read(config\slaps.txt),[nick],$$1) + else me slaps $$1 around a bit with a large trout +} +op mode # + $+ $str(o,$modespl) $$1 $2- +dop mode # - $+ $str(o,$modespl) $$1 $2- +voice mode # + $+ $str(v,$modespl) $$1 $2- +dvoice mode # - $+ $str(v,$modespl) $$1 $2- +j join $$1- +q query $$1- +p part # $1- +n names #$$1 +w whois $$1 +ws whois2 $$1 +qw if ($n.qnet) msg Q whois $$1 +t topic $iif($chr(35) !isin $1,$active) $1- +wii !whois $$1 $1 +k kick $$1 $2- +kick { + var %r = $read(config\kicks.txt) + if ($1 ischan) kick $1 $2 $iif(!$3,%r,$3-) + else kick $active $1 $iif(!$2,%r,$2-) +} +q query $$1 $2- +send dcc send $$1 $2 +chat dcc chat $$1 +ping ctcp $$1 ping diff --git a/scripts/alias3.nbs b/scripts/alias3.nbs new file mode 100644 index 0000000..76ef178 --- /dev/null +++ b/scripts/alias3.nbs @@ -0,0 +1,139 @@ +bpre return $remove($strip($pre),$chr(160),$chr(32)) +quitmsg { + if (!$read(config\quits.txt)) { return - $strip($n.name) $n.version - www.nbs-irc.net - } + else return $read(config\quits.txt) +} +bncwin { + return @ $+ $1 ( $+ $2 $+ ) +} +hidchans { + var %tmp = 0, %i = 1 + while (%i <= $chan(0)) { + if ($window($chan(%i)).state != hidden) inc %tmp + inc %i + } + return %tmp +} +n.cbgn { + var %i = 1, %e = $did($1,$2).lines + while (%i <= %e) { + if ($did($1,$2,%i) == $3) return %i + inc %i + } +} +n.file { + return $replace($1-,?,_,/_,\_,*,_,:,_,<,_,>,_,",_,|,_) +} +authedited { + if ($ncfg(authnick) != nick) && ($ncfg(authpass) != pass) return $true +} +qwa { + if ($isid) return $dll(scripts\dll\wa_link.dll,WA_Link_Raw_Stats,$1-) +} +swamp { + if ($isid) return $dll(scripts\dll\swamp.dll,WinAmpGet,$1-) +} +winamp.tid { + var %s = $1, %a = $asctime($qwa(%s),nn:ss) + if ($asctime($qwa(%s),HH) > 1) var %a = $calc($gettok(%a,1,58) + ($ifmatch -1) *60) $+ : $+ $gettok(%a,2,58) + return %a +} +n.osinfo { + return $remove($getsys(Win32_OperatingSystem).Caption,Microsoft,(r),(tm),®,™,â,Â,„,¢) $+ $iif($replace($getsys(Win32_OperatingSystem).CSDVersion,service pack $+ $chr(32),SP),$c44 $ifmatch) +} +n.cpuinfo { + var %x = $getsys(Win32_Processor).Name + if (unknown isin %x) var %x = $dedll(cpuinfo) + return $removecs($remove(%x,cpu,(r),(tm),®,™,â,Â,@,„,¢),Dual Core Processor) (at $getsys(Win32_Processor).CurrentClockSpeed MHz) +} +dedll return $dll(scripts\dll\darkenginex.dll,$1,_) +getsys { + if ($1) { + .comopen sys WbemScripting.SWbemLocator + if (!$comerr) { + var %x = $com(sys,ConnectServer,3,dispatch* sys2), %x = $com(sys2,ExecQuery,3,bstr*,select $prop from $1,dispatch* sys3), %x = $comval(sys3,$iif($2,$2,1),$prop) + if ($com(sys)) .comclose sys + if ($com(sys2)) .comclose sys2 + if ($com(sys3)) .comclose sys3 + return %x + } + } +} +clr return $+(,$color($1),$2,) +awaynet { + var %i = 1, %awaytot 0 + while (%i <= $scon(0)) { + if ($scon(%i).away) { inc %awaytot } + inc %i + } + return %awaytot +} +perc return $round($calc(($1 / $2)*100),1) $+ % +dur { + if ($1) return $remove($duration($1,$iif(!$2,1,$2)),ks,k,ays,ay,rs,r,ins,in,ecs,ec) +} +dur2 { + if ($1) { + var %x = $duration($1,3) + if ($gettok(%x,1,58) > 0) return %x + else return $gettok(%x,2-,58) + } +} +csinfo.id { return name: $readini(scripts\qstat\cs_info.ini, cs, namn) $chr(160) $chr(160) players: $readini(scripts\qstat\cs_info.ini, cs, spelare) $chr(160) $chr(160) map: $readini(scripts\qstat\cs_info.ini, cs, map) $chr(160) $chr(160) ping: $readini(scripts\qstat\cs_info.ini, cs, ping) $chr(160) $chr(160) ip: $readini(scripts\qstat\cs_info.ini, cs, ip) } +csip return $readini(scripts\qstat\cs_info.ini, cs, ip) +bfe { + var %l = $len($1) + while (%l) { + var %c = $calc($asc($mid($1,%l,1)) - %l) + if ($len(%c) < 2) var %c = 00 $+ %c + elseif ($len(%c) < 3) var %c = 0 $+ %c + var %r = %r $+ %c + dec %l 1 + } + return %r +} +n.input { + set %n.input1 $1 + set %n.input2 $2 + set %n.input3 $3 + return $dialog(input,input,-4) +} +chankey { + if ($chan($1).key) return $ifmatch + elseif (%pw. [ $+ [ $1 ] ]) return $ifmatch +} +n.chanstats { + if ($1) return Total $nick($1,0) nicks $par($+($iif($nick($1,0,o) > 0,$ifmatch ops),$iif($nick($1,0,h) > 0,$chr(44) $ifmatch halfops),$iif($nick($1,0,v) > 0,$chr(44) $ifmatch voices),$iif($nick($1,0,r) > 0,$chr(44) $ifmatch $iif($len($prefix) > 3,other,regular)))) +} +n.par if ($1) return ( $+ $1- $+ ) +insttime return $right($calc($ncfg(installtime) - $ctime),-1) +cm if ($1 isnum 5-14) return $replacecs($1,5,t,6,n,7,i,8,m,9,c,10,s,11,r,12,N,13,C,14,p) +cmode { + if (!$2) return + if ($3 == o) return $left($removecs($nick($2,$1).pnick,$1),1) + elseif ($hget(nbs,modeprefix) == 1) { + if ($3) return $left($removecs($nick($2,$1).pnick,$1),1) + else return $left($removecs($nick($2,$1).pnick,$1),1) $+ $1 + } + elseif (!$3) return $1 +} +avgpd { + if ($1) { + if ($insttime < 86401) return $1 + else return $round($calc($1 / ($insttime /86400)),1) + } +} +nohide { + if (!$1) return + if ($istok($ncfg(nohide),$1,32)) return 1 +} +c44 return $chr(44) +cit return $+(",$1-,") +n.qnet if ($right($server,13) == .quakenet.org) && ($network == quakenet) return $true +n.unet if ($right($server,13) == .undernet.org) && ($network == undernet) return $true +n.maxbans if (%maxbans. [ $+ [ $cid ] ]) return $ifmatch | else return ? +n.topiclen if (%topiclen. [ $+ [ $cid ] ]) return $ifmatch | else return ? +n.useragent return $+($strip($n.name),/,$n.version) (r: $n.version.date $+ , m: $version $+ , w: $os $+ , t: $tname $+ ) +n.name return nbs-irc +n.version return 2.39 +n.version.date if ($read(scripts\other\version,1)) return $ifmatch diff --git a/scripts/beep.wav b/scripts/beep.wav new file mode 100644 index 0000000..d4994b9 Binary files /dev/null and b/scripts/beep.wav differ diff --git a/scripts/dll/aircdll.dll b/scripts/dll/aircdll.dll new file mode 100644 index 0000000..28ed46b Binary files /dev/null and b/scripts/dll/aircdll.dll differ diff --git a/scripts/dll/darkenginex.dll b/scripts/dll/darkenginex.dll new file mode 100644 index 0000000..b886274 Binary files /dev/null and b/scripts/dll/darkenginex.dll differ diff --git a/scripts/dll/dcx.dll b/scripts/dll/dcx.dll new file mode 100644 index 0000000..c1aa4b3 Binary files /dev/null and b/scripts/dll/dcx.dll differ diff --git a/scripts/dll/i.dll b/scripts/dll/i.dll new file mode 100644 index 0000000..2372350 Binary files /dev/null and b/scripts/dll/i.dll differ diff --git a/scripts/dll/mDock61.dll b/scripts/dll/mDock61.dll new file mode 100644 index 0000000..1a6bd80 Binary files /dev/null and b/scripts/dll/mDock61.dll differ diff --git a/scripts/dll/mdx/BARS.MDX b/scripts/dll/mdx/BARS.MDX new file mode 100644 index 0000000..24f0a36 Binary files /dev/null and b/scripts/dll/mdx/BARS.MDX differ diff --git a/scripts/dll/mdx/CTL_GEN.MDX b/scripts/dll/mdx/CTL_GEN.MDX new file mode 100644 index 0000000..cb7ca55 Binary files /dev/null and b/scripts/dll/mdx/CTL_GEN.MDX differ diff --git a/scripts/dll/mdx/VIEWS.MDX b/scripts/dll/mdx/VIEWS.MDX new file mode 100644 index 0000000..1316a29 Binary files /dev/null and b/scripts/dll/mdx/VIEWS.MDX differ diff --git a/scripts/dll/mdx/dialog.mdx b/scripts/dll/mdx/dialog.mdx new file mode 100644 index 0000000..814cb3d Binary files /dev/null and b/scripts/dll/mdx/dialog.mdx differ diff --git a/scripts/dll/mdx/mdx.dll b/scripts/dll/mdx/mdx.dll new file mode 100644 index 0000000..5c867f8 Binary files /dev/null and b/scripts/dll/mdx/mdx.dll differ diff --git a/scripts/dll/swamp.dll b/scripts/dll/swamp.dll new file mode 100644 index 0000000..fbf43f8 Binary files /dev/null and b/scripts/dll/swamp.dll differ diff --git a/scripts/dll/tb.dll b/scripts/dll/tb.dll new file mode 100644 index 0000000..ed7e488 Binary files /dev/null and b/scripts/dll/tb.dll differ diff --git a/scripts/dll/wa_link.dll b/scripts/dll/wa_link.dll new file mode 100644 index 0000000..629ded0 Binary files /dev/null and b/scripts/dll/wa_link.dll differ diff --git a/scripts/dll/winamp.dll b/scripts/dll/winamp.dll new file mode 100644 index 0000000..902a1df Binary files /dev/null and b/scripts/dll/winamp.dll differ diff --git a/scripts/img/taskbar.png b/scripts/img/taskbar.png new file mode 100644 index 0000000..0254476 Binary files /dev/null and b/scripts/img/taskbar.png differ diff --git a/scripts/img/tray.png b/scripts/img/tray.png new file mode 100644 index 0000000..5e627da Binary files /dev/null and b/scripts/img/tray.png differ diff --git a/scripts/main.nbs b/scripts/main.nbs new file mode 100644 index 0000000..a29ff27 --- /dev/null +++ b/scripts/main.nbs @@ -0,0 +1,5696 @@ +alias n.checkfiles { + set %f bug + if ($script(blandat.nbs)) .unload -rs blandat.nbs + if ($script(jpqosv.nbs)) .unload -rs jpqosv.nbs + if ($script(raw.nbs)) .unload -rs raw.nbs + if ($script(tema.nbs)) .unload -rs tema.nbs + if ($script(dialog.nbs)) .unload -rs dialog.nbs + if ($script(popups1.nbs)) .unload -rs popups1.nbs + var %m = $chr(59) you can put your own q here, this file will not be overwritten when updating nbs-irc. + if (!$exists(scripts\a-own.nbs)) .write scripts\a-own.nbs $replace(%m,q,aliases) + .load -a scripts\a-own.nbs + n.checkscript alias1.nbs -a + n.checkscript alias2.nbs -a + n.checkscript alias3.nbs -a + if (!$exists(scripts\r-own.nbs)) { + .write scripts\r-own.nbs $replace(%m,q,scripts) + .load -rs1 scripts\r-own.nbs + } + if (!$tname) .theme cold +} +alias -l n.checkscript { + if (!$script($1)) { + if ($exists(scripts\ $+ $1)) .load -a scripts\ $+ $1 + else { + if ($dialog(strt)) dialog -x strt + var %a = -sge 4,4 $str(W,52) + echo %a + echo 4 -sg * Error: file $+($gettok($mircdir,-1, 92),\nbs\, $1) is missing, Replace the file and restart nbs or reinstall an update/full version. + echo -ag * Note: installing updates will keep all settings, full reinstall will only keep nbs settings. + echo %a + if (%f != 1) { + .echo -qg $input(There is/are some file(s) missing $+ $chr(44) check the status window. nbs will not work properly until you resolve this.,o) + set %f 1 + } + } + } +} + +alias n.ds { + if (!$3) return + elseif ($1 == cw) { + if ($did($dname,$2).state == 1) w_ncfg $3 1 + else w_ncfg $3 o + } + elseif ($1 == cr) { + if ($ncfg($3) == 1) did -c $dname $2 + else did -u $dname $2 + } +} +alias n.preview { + if ($dialog($1)) && ($2) { + if (!$window(@previewx)) { + window -hodfnp +dL @previewx 99 $calc($dialog($1).y -60) $calc($window(-1).w -198) 52 + drawrect @previewx $color(normal) 0 0 0 $calc($window(-1).w -198) 52 + drawtext -o @previewx $color(highlight) tahoma 10 4 2 $iif($dialog(cc),Topic preview for %ccc $+ :,Preview - right click to close) + window -o @previewx + } + if (!$window(@preview)) { + window -dhk0 +dL @preview 100 $calc($dialog($1).y -40) $calc($window(-1).w -200) 31 + } + clear @preview + echo $iif($dialog(cc),$color(topic),$color(normal)) @preview $2- + window -o @preview + } + elseif ($window(@preview)) close -@ @preview* +} +on *:dialog:*:close:0:{ + if ($window(@preview)) close -@ @preview* +} + +alias setver { + var %date = $iif($1,$1,$date(yy-mm-dd)) + write -c scripts\other\version %date + n.echo info -atg Version: $n.version ( $+ %date $+ ) +} + +alias n.servemp3 { + inc -u20 %mp3serv.prot 1 + if ($hget(temp,mp3serv.file)) && (%mp3serv.prot < 4) && (!%mp3serv. [ $+ [ $1 ] ]) { + set -u10 %mp3serv. $+ $1 1 + if (http://* !iswm $hget(temp,mp3serv.file)) { + .dcc maxcps $calc($iif($ncfg(mp3maxcps) == o,0,$ncfg(mp3maxcps)) * 1024) + dc $+ $chr(99) $chr(115) $+ e $+ $chr(110) $+ d $1 $hget(temp,mp3serv.file) + } + else echo $color(info) -stge Error: could not send $hget(temp,mp3serv.file) + } +} +alias n.url { + var %f = $+(scripts\temp\url_,$r(a,z),$r(a,z),$r(a,z),$r(a,z),.url) + write -c %f [InternetShortcut] + write %f URL= $+ $1- + .run %f + .timer 1 3 .remove %f +} + +alias n.toolbar { + toolbar -r + toolbar -d sep1 + toolbar -d sep2 + toolbar -d sep3 + toolbar -d sep4 + toolbar -d sep5 + toolbar -d sep6 + toolbar -d sep7 + toolbar -d chanlist + toolbar -d addrbook + toolbar -d timer + toolbar -d send + toolbar -d chat + toolbar -d dccopts + toolbar -d rcvdfiles + toolbar -d logfiles + toolbar -d notify + toolbar -d notify2 + toolbar -d urls + toolbar -d urls2 + toolbar -d about + toolbar -m 8 6 + toolbar -m 6 7 + toolbar -iz1n7 3 ac "Auto connect settings" scripts\dll\tb.dll /autocon @tb.ac + toolbar -is 5 s1 + toolbar -is 10 s2 + toolbar -iz1n0 11 nbs-setup "nbs options" scripts\dll\tb.dll /setup @tb.setup + toolbar -iz1n2 12 nbs-theme "Theme/font setup" scripts\dll\tb.dll /theme @tb.theme + toolbar -iz1n3 13 nbs-alarm "Alarm timer" scripts\dll\tb.dll /alarm @tb.alarm + toolbar -iz1n1 14 nbs-lv "Logviewer" scripts\dll\tb.dll /logg @tb.lv + if ($ncfg(toolbar_disable_winamp) != 1) { + toolbar -is 15 s3 + toolbar -iz1n4 16 nbs-waprev "Previous track (Winamp)" scripts\dll\tb.dll "/dll scripts\dll\winamp.dll prevsong" + toolbar -iz1n5 17 nbs-waplaypause "Play/pause (Winamp)" scripts\dll\tb.dll "/dll scripts\dll\winamp.dll playpause" + toolbar -iz1n6 18 nbs-wanext "Next track (Winamp)" scripts\dll\tb.dll "/dll scripts\dll\winamp.dll nextsong" + } + if ($dialog(tb)) dialog -x tb + dlg tb + showmirc -s +} +menu @tb.setup { + .Misc settings $chr(9) (/misc):misc + .Theme/font settings $chr(9) (/theme):theme + .Sound/highlight settings $chr(9) (/nq):nq + .Song announce $chr(9) (/sa):sa + .Protections $chr(9) (/prot):prot + .Auto connect $chr(9) (/autocon):autocon + .Autojoin $chr(9) (/caj):caj + .QuakeNet setup $chr(9) (/quakenet):quakenet + .UnderNet setup $chr(9) (/undernet):undernet + .NickServ setup $chr(9) (/cns):cns + .Notifications $chr(9) (/popups):popups + .F-key bindings $chr(9) (/fkeys):fkeys + .Logviewer $chr(9) (/lv):lv + .Game launcher $chr(9) (/g-join):g-join + .Blacklist $chr(9) (/blist):blist + .Alarm timer $chr(9) (/alarm):alarm +} +menu @tb.theme { + Reload theme $chr(9) (/theme -r):theme -r + Edit theme $chr(9) (/tedit):tedit +} +menu @tb.alarm { + Ring in + .1 minute: .timeralarm 1 60 beep 10 100 | n.echo info -atg Alarm set: 1 minute + .2 minutes: .timeralarm 1 120 beep 10 100 | n.echo info -atg Alarm set: 2 minutes + .5 minutes: .timeralarm 1 300 beep 10 100 | n.echo info -atg Alarm set: 5 minutes + .10 minutes: .timeralarm 1 600 beep 10 100 | n.echo info -atg Alarm set: 10 minutes + Stop:.timeralarm off | splay stop +} +alias n.checkkey if ($chan($1).key) set %pw. [ $+ [ $1 ] ] $chan($1).key +alias n.ptext { + if ($hget(nbs,popup_mode) == 2) && ($appactive) return + elseif ($hget(nbs,popup_mode) == 4) return + if ($hget(nbs,popup_away) == 1) && ($away) return + n.ptext2 $1- +} +alias n.ptext2 { + if ($chr(1) isin $2-) { + hadd -m temp lastpop $1- + if ($window(@n.popup)) close -@ @n.popup + var %1 = $gettok($1-,2,1), %2 = $gettok($1-,3-,1) + if ($gettok($1-,1,1)) set %popup.window $ifmatch + else unset %popup.window + var %font = $window(status window).font, %fontsize = $window(status window).fontsize + var %h = $calc($height(l,%font,%fontsize) +25) + if ($width(%2,%font,%fontsize) > 250) && ($width(%2,%font,%fontsize) <= 750) { + var %w = $calc($width(%2,%font,%fontsize) + $width(Mia,%font,%fontsize)) + } + elseif ($width(%2,%font,%fontsize) <= 250) { + var %w = $calc($width(%2,%font,%fontsize) + (250 - $width(%2,%font,%fontsize))) + } + else { + while ($width(%2,%font,%fontsize) > 1000) var %2 = $left(%2,$calc($len(%2) -30)) + while ($width(%2,%font,%fontsize) > 750) var %2 = $left(%2,$calc($len(%2) -10)) + var %2 = $left(%2,$calc($len(%2) -3)) $+ ... + var %w = $calc($width(%2,%font,%fontsize) + $width(...,%font,%fontsize)) + } + if ($chr(45) isin $hget(nbs,popup_posx)) && ($hget(nbs,popup_centerx) != 1) { var %x = $calc( [ $window(-1).w ] - (%w + $remove($hget(nbs,popup_posx),-))) } + elseif ($chr(45) !isin $hget(nbs,popup_posx)) && ($hget(nbs,popup_centerx) != 1) { var %x = $$hget(nbs,popup_posx) } + elseif ($hget(nbs,popup_centerx) == 1) { var %x = $calc($window(-1).w /2- (%w /2)) } + if ($chr(45) isin $hget(nbs,popup_posy)) && ($hget(nbs,popup_centery) != 1) { var %y = $calc( [ $window(-1).h ] - $remove($hget(nbs,popup_posy),-) ) } + elseif ($chr(45) !isin $hget(nbs,popup_posy)) && ($hget(nbs,popup_centery) != 1) { var %y = $hget(nbs,popup_posy) } + elseif ($hget(nbs,popup_centery) == 1) { var %y = $calc($window(-1).h /2- 19) } + window -hodfnp +dL @n.popup %x %y %w %h + drawfill @n.popup $color(background) 0 1 1 + drawtext -o @n.popup $color(highlight) tahoma 10 4 2 %1 + drawtext -o @n.popup $color(info) tahoma 10 $calc(%w -51) 2 $time + drawtext -p @n.popup $color(normal) $cit(%font) %fontsize 4 20 %2 + drawrect @n.popup $color(normal) 0 0 0 %w %h + if ($timerncpopup) .timerncpopup off + .timerncpopup -oi 1 $iif($hget(nbs,popup_timeout),$ifmatch,7) close -@ @n.popup + window -o @n.popup + } +} +alias n.aj.edit { + if (!$1) return + var %a = config\autojoin- $+ $network $+ .txt + if ($read(%a,w,$1*)) { + write -dl $+ $readn %a + n.echo info -atg Removed $1 from autojoin $iif($ncfg(autojoin) != 1,$par(autojoin is off)) + } + else { + if (k isin $chan($1).mode) && (!$chankey($1)) var %k = $n.input(Enter channel key:) + else var %k = $chankey($1) + write %a $1 %k + n.echo info -atg Added $1 $iif(%k,$par(key: %k)) to autojoin $iif($ncfg(autojoin) != 1,$par(note: autojoin is off)) + } +} +alias invite { + if (!$2) && (#) !invite $1 # + else !invite $1- +} +alias away { + unset %n.away.* + !away $1- +} +alias lastpop { + n.ptext2 $hget(temp,lastpop) +} +alias logg { + if ($window(@logviewer)) && (!$n.input(Clear logviewer and load $window($active).logfile $+ ?,y/n)) return + close -@ @logviewer + lv $iif($1,$1,$active) +} +alias lv logviewer $1- +alias logviewer { + if ($window(@logviewer)) { + window -a @logviewer + return + } + set %lv.dir $logdir + if ($1) { + if ($window($1)) { + set %lv.dir $nofile($window($1).logfile) + var %load = $n.log($1) + } + elseif ($exists($logdir $+ $network $+ \ $+ $1 $+ .log)) { + set %lv.dir $logdir $+ $network $+ \ + var %load = %lv.dir $+ $1 $+ .log + } + } + window -l25eazk0 @Logviewer + if (%load) aline -l @logviewer $chr(91) .. $chr(93) + var %a = $finddir(%lv.dir,*,0,1,aline -l @logviewer $chr(91) $nopath($1-) $chr(93)) + var %b = $findfile(%lv.dir,*.log,0,1,aline -l @logviewer $nopath($1-)) + if (%load) { + if ($file(%load).size > 10000000) { + if (!$n.input(This is a very large log file ( $+ $round($calc($file(%load).size /1024/1024),2) MB) $+ $c44 loading will take some time. Do you want to continue?,y/n)) return + } + echo @logviewer $npre loading %load $+ ... + loadbuf -pi4 @logviewer $+(",%load,") + echo @logviewer $npre $kl:($nopath(%load)) $lines(%load) lines, $round($calc($file(%load).size /1024),2) KB + } + ;%b log files and %a folders found in %lv.dir +} +alias slog { + if ($1) { + var %s.file = $n.log($active) + if (!$isfile(%s.file)) n.echo other -atg /slog: no log file found for $active + else { + var %s.win = @search:  $+ $nopath(%s.file), %t = $ticks + if ($file(%s.file).size > 10000000) { + if (!$n.input(This is a very large log file ( $+ $round($calc($file(%s.file).size /1024/1024),2) MB) $+ $c44 searching it will take some time. Do you want to continue?,y/n)) return + } + if (!$window(%s.win)) window -k0n %s.win + clear %s.win + echo -t %s.win $npre searching for $n.quote($1-) in %s.file + echo %s.win  + window -a %s.win + filter -fwpb $+(",%s.file,") %s.win * $+ $1- $+ * + if ($filtered) { + echo %s.win  + echo -t %s.win $npre found $filtered matches in %s.file $par($round($calc(($ticks - %t)/1000),1) $+ s) + } + else echo -t %s.win $npre no matches were found for $n.quote($1-) in %s.file + } + } + else n.echo info -atg usage: /slog +} +alias n.echo { + if ($window($3)) && (a !isin $2) && (s !isin $2) echo $color($1) $2 $+ i4 $3 $npre $4- + elseif ($cid != $activecid) { + scid $cid + echo $color($1) $replace($2,a,s) $+ i4 $npre $3- + scid -r + } + else echo $color($1) $2 $+ i4 $npre $3- +} +alias month { + if ($1 isnum 1-12) { + var %d = $calc($1 +1), %days = $iif($1 == 12,31,$gettok($asctime($calc($ctime(1/ $+ %d $+ /2008 00:00) - 86400)),3,32)) + n.echo info -atg Month $1 $+ : $clr(norm,$date($ctime(08- $+ $1 $+ -01),mmmm)) $par(%days days) + } + else n.echo info -atg Usage: /month <1-12> +} +alias n.download { + if (!$sock(n.download)) && ($1) { + var %url = $remove($1,http://) + var %host = $gettok(%url,1,47), %fil = / $+ $gettok(%url,2-,47) + if ($crc(scripts\temp\ $+ $nopath(%fil)) > 0) set %crc. [ $+ [ $nopath(%fil) ] ] $ifmatch + sockopen n.download %host 80 + sockmark n.download HEAD %host %fil + } +} + +on *:SOCKOPEN:n.download:{ + if (!$sockerr) { + write -c scripts\temp\ $+ $n.file($nopath($gettok($sock($sockname).mark,3,32))) + sockwrite -n $sockname GET $gettok($sock($sockname).mark,3,32) HTTP/1.1 + sockwrite -n $sockname HOST: $gettok($sock($sockname).mark,2,32) + sockwrite -n $sockname User-Agent: $n.useragent + sockwrite -n $sockname Accept: text/plain + sockwrite -n $sockname $crlf + } +} + +on *:SOCKREAD:n.download:{ + if (!$sockerr) { + var %head + :start + if ($gettok($sock($sockname).mark,1,32) == head) { sockread %head } + else { sockread &b } + if ($sockbr) { + if ($gettok($sock($sockname).mark,1,32) == head) { + if (http/?.? iswm $gettok(%head,1,32)) && ($gettok(%head,2,32) != 200) { + return + } + elseif (!%head) sockmark $sockname GET $gettok($sock($sockname).mark,2-,32) + } + elseif ($gettok($sock($sockname).mark,1,32) == get) { + bwrite scripts\temp\ $+ $n.file($nopath($gettok($sock($sockname).mark,3,32))) -1 &b + } + goto start + } + } +} + +alias channel { + if (% [ $+ [ # ] $+ ] .disabled == 1) && (!$chan(#).mode) { + n.echo other -atg $kl:(channel central) please wait... + return + } + if ($ncfg(newcc) == 1) cc # + else !channel +} +alias auth { + if ($n.qnet) { + if ($2) { + .raw auth $1- + var %a = auth $par($1) + } + elseif ($ncfg(use_challengeauth) == 1) && ($authedited) { + .msg Q@CServe.quakenet.org challenge + var %a = auth challenge $par($ncfg(authnick)) + } + elseif ($authedited) { + var %q = $ncfg(authpass), %k = $calc($len(%q) +1), %x = 1, %r + while (%k > 1) { + var %k = $calc(%k -3), %r = %r $+ $chr($calc($mid(%q,%k,3) + %x)) + inc %x 1 + } + .raw auth $ncfg(authnick) %r + var %a = auth $par($ncfg(authnick)) + } + if (%a) n.echo notice -agqt sending %a + } + elseif ($n.unet) { + if ($2) { + .msg x@channels.undernet.org login $1- + var %a = auth $par($1) + } + elseif ($ncfg(undernet_authnick)) { + var %q = $ncfg(undernet_authpass), %k = $calc($len(%q) +1), %x = 1, %r + while (%k > 1) { + var %k = $calc(%k -3), %r = %r $+ $chr($calc($mid(%q,%k,3) + %x)) + inc %x 1 + } + .msg x@channels.undernet.org login $ncfg(undernet_authnick) %r + var %a = auth $par($ncfg(undernet_authnick)) + } + if (%a) n.echo notice -agqt sending %a + } +} +alias sendsong mp3send $1- +alias wsend mp3send $1- +alias exportlog { + if ($1) var %f = $1-, %a + elseif (!$1) var %f = $sfile($logdir *.*,Please select log file to export) + if ($file(%f).size > 10000000) && (!$n.input(This may take some time. $crlf $crlf $+ Do you want to continue?,y/n)) return + var %o = $sfile($replace($nopath(%f),.log,.txt),Please select destination file,Create) + if (%o) write -c $cit(%o) + if ($exists(%f)) && ($exists(%o)) { + dialog -md exportlog exportlog + if ($file(%f).size > 1000000) { + showmirc -t + var %m = m + } + var %i = 1, %t = $lines(%f), %tid = $ticks + did -ar exportlog 1 Opening files + .fopen i $cit(%f) + .fopen -no o $cit(%o) + while (!$fopen(i).eof) { + if ($fread(i)) .fwrite -n o $strip($ifmatch) + else .fwrite o $crlf + if (9 isin %i) did -ar exportlog 1 Exporting: $round($calc(%i / %t *100),0) $+ % + inc %i 1 + } + .fclose i + .fclose o + n.echo other -atg log export finished in $round($calc(($ticks - %tid)/1000),1) $+ s $par(output: %o) + if (%m) showmirc -s + dialog -x exportlog + .timer 1 0 if ($n.input(Do you want to open $nopath(%o) $+ ?,y/n)) run $cit(%o) + } + else n.echo other -atg /exportlog: file error +} +alias query { + if (!$1) return + if ($query($1)) { !query $1- | return } + !query $1 + n.query.stats $1 $ial($1).addr + if ($2) msg $1- +} +alias n.query.stats { + w_ncfg query_total $calc($ncfg(query_total) +1) + echo $color(info) -tg $1 $npre Query with $1 $par($2) + if ($comchan($1,0) > 0) { + var %i = 1 + while (%i <= $comchan($1,0)) { + var %comchans = %comchans $cmode($1,$comchan($1,%i),a) $+ $comchan($1,%i) + inc %i + } + echo $color(info) -tg $1 $npre Common channels: $replace(%comchans,$chr(32),$chr(44) $+ $chr(32)) $par($comchan($1,0)) + } + echo $color(info) -tg $1 $npre Total querys: $ncfg(query_total) $par(~ $+ $avgpd($ncfg(query_total)) per day) +} + +alias checkforupdates { + set %nbs_vcheck 10 + unset %nbs_vcheck_date + n.versioncheck +} + +alias n.versioncheck { + if ($ncfg(version_check) == 1) { + %file = scripts\temp\v.txt + if ($exists(%file)) && ($read(%file,1) > $n.version) .timer 1 30 n.versioncheck2 + elseif (%nbs_vcheck_date != $date) { + if (%nbs_vcheck == 10) { + n.download http://version.nbs-irc.net/v.txt + .timer 1 30 n.versioncheck2 + set %nbs_vcheck_date $date + unset %nbs_vcheck + } + else inc %nbs_vcheck 1 + } + } +} +alias n.versioncheck2 { + var %x = scripts\temp\v.txt + if ($read(%x,3) == $md5(nbs)) && ($read(%x,1) isnum) && ($read(%x,1) > $n.version) { + echo -ag  + n.echo normal -ag A newer version of nbs-irc is available. + if ($read(%x,2)) n.echo info -ag $ifmatch + echo -ag  + } + else .remove %x +} + +alias n.netsplitquit { + var %i = 1 + while (%i <= $chan(0)) { + if ($hget(temp,netsplit.tq. [ $+ [ $cid ] $+ ] . [ $+ [ $chan(%i) ] ]) > 0) { + if ($hget(temp,netsplit.quit.f. [ $+ [ $cid ] $+ ] . [ $+ [ $chan(%i) ] ]) != 1) { + hadd -m temp nstemp $hget(temp,netsplit.quit. [ $+ [ $cid ] $+ ] . [ $+ [ $chan(%i) ] ]) + n.echo quit -ti4 $chan(%i) Netsplit $par($1 ‹-› $2) $numtok($hget(temp,nstemp),44) quits: $left($hget(temp,nstemp),-1) + } + else { + n.echo quit -ti4 $chan(%i) Netsplit $par($1 ‹-› $2) $hget(temp,netsplit.tq. [ $+ [ $cid ] $+ ] . [ $+ [ $chan(%i) ] ]) quits + } + } + hdel -w temp netsplit.*. [ $+ [ $cid ] $+ ] . [ $+ [ $chan(%i) ] ] + hdel temp nstemp + inc %i + } +} +alias n.netsplitjoin { + if ($1) && ($hget(temp,netsplit.tj. [ $+ [ $cid ] $+ ] . [ $+ [ $1 ] ]) > 0) { + if ($hget(temp,netsplit.join.f. [ $+ [ $cid ] $+ ] . [ $+ [ $1 ] ]) != 1) { + if ($hget(temp,netsplit.join. [ $+ [ $cid ] $+ ] . [ $+ [ $1 ] ])) hadd -m temp nstemp $ifmatch + if ($numtok($hget(temp,nstemp),44) > 1) n.echo join -ti4 $1 Join: $left($hget(temp,nstemp),-1) $par($numtok($hget(temp,nstemp),44)) + else n.echo join -ti4 $1 Join: $left($hget(temp,nstemp),-1) $par($right($address($left($hget(temp,nstemp),-1),1),-3)) + } + else { + n.echo join -ti4 $1 Join: $hget(temp,netsplit.tj. [ $+ [ $cid ] $+ ] . [ $+ [ $1 ] ]) nicks have joined $1 + } + hdel -w temp netsplit.*. [ $+ [ $cid ] $+ ] . [ $+ [ $1 ] ] + hdel temp nstemp + } +} +alias kb if ($2) !raw -q KICK $1-2 : $+ $3- $+ $crlf $+ MODE $1 +b $address($2,$ncfg(ban_mask)) +alias bk if ($2) !raw -q MODE $1 -o+b $2 $address($2,$ncfg(ban_mask)) $+ $crlf $+ KICK $1-2 : $+ $3- +on *:LOGON:*:set %n.connecting. [ $+ [ $cid ] ] 1 +on *:CONNECT:{ + if ($n.qnet) { + if ($ncfg(autoauth) == 1) && ($ncfg(authnick)) && ($ncfg(authpass)) auth + if ($ncfg(mode+x) == 1) mode $me +x + } + elseif ($n.unet) { + if ($ncfg(undernet_autoauth) == 1) && ($ncfg(undernet_authnick)) && ($ncfg(undernet_authpass)) auth + if ($ncfg(undernet_mode+x) == 1) mode $me +x + } + if ($status == connected) echo -se $npre $kl:(Network) $network $kl:(Server) $server $par($port) + titleupdate + if ($ncfg(autojoin) == 1) && ($ncfg(autojoin_disable_ $+ $network) != 1) .timer 1 3 aj + cl_showall + if (!%n.quakenet) && (!$authedited) && ($n.qnet) { + .timer 1 1 if ($n.input(Do you want to configure your QuakeNet settings now?,y/n)) quakenet + set %n.quakenet 1 + } + if (!%n.undernet) && (!$ncfg(undernet_authnick)) && ($n.unet) { + .timer 1 1 if ($n.input(Do you want to configure your UnderNet settings now?,y/n)) undernet + set %n.undernet 1 + } + .timer 1 20 unset %n.connecting. [ $+ [ $cid ] ] + hadd -mu59 temp clag.block 1 + if ($hget(nbs,popup_discon) == 1) n.ptext - $chr(1) $network $+ : Connected $chr(1) $npre Connected to $+($server,$clr(info,:),$port) + if ($cid == 1) n.versioncheck +} +on *:DISCONNECT:{ + cuptime + hdel -w nbs ci. [ $+ [ $cid ] $+ ] .* + .timerwho. [ $+ [ $cid ] $+ ] .* off + cl_showall + titleupdate + if ($hget(netsplit)) hdel -w netsplit $cid $+ .* + hadd -mu600 temp disconnect. [ $+ [ $cid ] ] $me $address($me,1) + if ($hget(nbs,popup_discon) == 1) n.ptext - $chr(1) $network $+ : disconnected $chr(1) $npre Disconnected from $+($server,$clr(info,:),$port) +} +alias n.log { + var %x = $mid($window($1).logfile,1,-5) $+ log + if ($exists(%x)) return %x + else return $window($1).logfile +} +alias cbinfo if (%n.connecting. [ $+ [ $cid ] ]) haltdef +on *:ACTIVE:*:if ($activecid != $lactivecid) titleupdate +alias defbrowserfix { + if ($?!="This will change CLASSES_ROOT\htmlfile\shell\open\command in the windows registry. Use only if you are not using IE as your default browser. $crlf $crlf $+ Continue?") { + var %newbrowser = $$sfile(c:\*.exe,Choose browser) + if (%newbrowser) { + write -c temp.reg REGEDIT4 + write temp.reg [HKEY_CLASSES_ROOT\htmlfile\shell\open\command] + write temp.reg @="\" $+ $replace(%newbrowser,\,\\) $+ \"" + run regedit /s temp.reg + .timer 1 2 .remove temp.reg + .echo -qg $n.input(Browser changed to: %newbrowser $+ .,info) + } + } +} +alias notifyer { + if ($notify($1)) { notify -r $1 } + else notify $1 +} +alias np { + if (%tmp.sa.spam != 1) { + set -u1 %tmp.sa.spam 1 + var %x = $n.songannounce + if (%x) $iif(c isincs $gettok($chan($active).mode,1,32),$strip(%x),%x) + } +} +alias n.blscan { + if ($1 !ischan) || ($hget(nbs,blacklist) != 1) return + if ($me isop $1) || ($me ishop $1) { + if ($chan($1).ial) && (!$timer(blscan. [ $+ [ $1 ] ])) { + var %i = 1, %e = $lines(config\blacklist.txt), %bl.nicks, %bl.bans, %bl.reasons + hadd -m temp blchan $1 + while (%i <= %e) { + if (!$n.bluser($address($me,5))) { + hadd -m temp bladdr $gettok($read(config\blacklist.txt,%i),1,44) + if ($gettok($read(config\blacklist.txt,%i),2,44)) hadd -m temp blreason $gettok($read(config\blacklist.txt,%i),2-,44) + else hadd -m temp blreason Blacklisted + if ($ialchan($hget(temp,bladdr),$hget(temp,blchan),0) > 0) { + var %in = 1 + while (%in <= $ialchan($hget(temp,bladdr),$hget(temp,blchan),0)) { + var %bl.nicks = $+(%bl.nicks,â,$ialchan($hget(temp,bladdr),$hget(temp,blchan),%in).nick) + var %bl.bans = $+(%bl.bans,â,$hget(temp,bladdr)) + var %bl.reasons = $+(%bl.reasons,â,$hget(temp,blreason)) + inc %in + } + } + } + inc %i + } + if ($numtok(%bl.nicks,266) < 6) && ($numtok(%bl.nicks,266) > 0) { + var %i = 1, %e = $numtok(%bl.nicks,226) + while (%i <= %e) { + !raw -q mode $hget(temp,blchan) -o+b $gettok(%bl.nicks,%i,226) $gettok(%bl.bans,%i,226) $+ $crlf $+ KICK $hget(temp,blchan) $gettok(%bl.nicks,%i,226) : $+ $gettok(%bl.reasons,%i,226) + inc %i + } + } + } + elseif ($nick($1,0) < 150) .timerblscan. [ $+ [ $1 ] ] 1 20 .timer 1 1 n.blscan $1 + } +} +alias n.bluser { + if ((!$1) || ($lines(config\blacklist.txt) < 1)) return + unset %bltmp + var %user = $1, %i = 1, %e = $lines(config\blacklist.txt) + while (%i <= %e) { + if ($remove($gettok($read(config\blacklist.txt,%i),1,44),$chr(32)) iswm %user) set -u10 %bltmp $read(config\blacklist.txt,%i) + inc %i + } + if (%bltmp) return 1 +} +alias aj { + var %a = config\autojoin- $+ $network $+ .txt + if ($lines(%a) == 0) { return } + if ($read(%a,1) == #channel1) && ($read(%a,2) == #channel2 key) && (!$read(%a,3)) { + n.echo other -stge ignoring autojoin $par(no channels added) + return + } + var %i = 1, %newchans = 0, %end = $lines(%a) + while (%i <= %end) { + if ($me !ison $gettok($read(%a,%i),1,32)) { + if ($gettok($read(%a,%i),2,32)) { + var %joincpw = %joincpw $gettok($read(%a,%i),1,32) $+ $chr(32) + var %joinpwds = %joinpwds $gettok($read(%a,%i),2,32) $+ $chr(32) + } + else var %joinchans = %joinchans $gettok($read(%a,%i),1,32)) $+ $chr(32) + inc %newchans + } + inc %i + } + if (%newchans > 0) { + echo $color(other) -st $npre joining %newchans channel $+ $iif(%newchans > 1,s) + if (%joinchans) !join $iif($ncfg(autojoin_minimize) == 1,-n) $replace(%joinchans,$chr(32),$chr(44)) + if (%joincpw) !join $iif($ncfg(autojoin_minimize) == 1,-n) $replace(%joincpw,$chr(32),$chr(44)) $replace(%joinpwds,$chr(32),$chr(44)) + } + else n.echo other -atg already on all channels in autojoin +} +alias emode { + if ($2) { + var %m = $1, %t = $2, %i = 1, %x + tokenize 44 $snicks + while (%i <= $0) { + if ($numtok(%x,32) == $modespl) { + mode # %m $+ $str(%t,$numtok(%x,32)) %x + dec %i + unset %x + } + else var %x = %x [ $chr(36) $+ [ %i ] ] + inc %i + } + mode # %m $+ $str(%t,$numtok(%x,32)) %x + } +} +alias ci { + if (!$1) return + return $round($calc($calc($calc($ticks - $hget(temp,ci. [ $+ [ $cid ] $+ ] . [ $+ [ $1 ] ])) / 1000) / 60),0) +} +on *:INPUT:@psyBNC (*):{ + if (($left($1,1) == /) && (!$ctrlenter)) { return } + .!msg -psybnc $1- + echo $color(notice) -at -› $1- +} +on *:INPUT:@sBNC (*):{ + if (($left($1,1) == /) && (!$ctrlenter)) { return } + .!msg -sBNC $1- + echo $color(notice) -at -› $1- +} +alias ci-check { + if ($ncfg(cic-time) < 1) return + if ($scon(0) == 1) { + if ($status == connected) { + var %i = 1 + while (%i <= $chan(0)) { + if (($ci($chan(%i)) >= $ncfg(cic-time)) && ($nohide($chan(%i)) != 1)) { if (($window($chan(%i)).state != hidden) && ($chan(%i) != $active)) window -h $chan(%i) } + inc %i + } + } + } + elseif ($scon(0) > 1) { + set %ii 1 + while (%ii <= $scon(0)) { + scon -t1 %ii + if ($status == connected) { + set %i 1 + while (%i <= $chan(0)) { + if (($ci($chan(%i)) >= $ncfg(cic-time)) && ($nohide($chan(%i)) != 1)) { if (($window($chan(%i)).state != hidden) && ($chan(%i) != $active)) window -h $chan(%i) } + inc %i + } + } + scon -r + inc %ii + } + } +} +alias psljud { splay $+(",$mircdirscripts\qry.wav,") } +alias n.songannounce { + %wa.in = $ncfg(mp3s) + if ($ncfg(itunes) == 1) { + n.getitunes + if (%it.title) { + if ([type] isin %wa.in) var %type = $lower($replace(%it.type,mpeg audio file,mp3)) + var %wa.out = $replace(%wa.in,[mp3],%it.artist - %it.title,[artist],%it.artist,[title],%it.title,[album],%it.album,[time],$dur2(%it.ttime),[etime],$dur2(%it.etime),[kbps],%it.bitrate kbps,[type],%type) + unset %it.* + } + else n.echo other -atg iTunes is not running, stopped or other error. + } + else { + if ($swamp(trackfilename) == $!null) || (!$swamp(trackfilename)) { n.echo other -atg Error: Winamp is not running/stopped | return } + if ([stopped] isin $dll(scripts\dll\winamp.dll,song,_)) { n.echo other -atg Error: Winamp must not be stopped | return } + if ([paused] isin $dll(scripts\dll\winamp.dll,song,_)) { n.echo other -atg Error: Winamp must not be paused | return } + var %x = $swamp(trackfilename), %wa.old = $removecs($dll(scripts\dll\winamp.dll,song,_),[paused],[stopped]) + if ([size] isin %wa.in) var %wa.size = $round($calc($file(%x).size /1024/1024),2) MB + if ([filename] isin %wa.in) var %wa.file = $nopath(%x) + if ([path] isin %wa.in) var %wa.path = $nofile(%x) + if ([folder] isin %wa.in) var %wa.folder = $gettok(%x,-2,92) + if ([artist] isin %wa.in) var %wa.artist = $qwa(artist) + if ([title] isin %wa.in) var %wa.title = $qwa(title) + if ([type] isin %wa.in) var %wa.type = $iif(/ isin $gettok(%x,-1,46),stream,$gettok(%x,-1,46))) + if ([kbps] isin %wa.in) var %wa.bitrate = $swamp(bitrate) + if ([album] isin %wa.in) var %wa.album = $qwa(album) + var %wa.out = $replace(%wa.in,âbÃ¥ld,,âcÃ¥lÃ¥r,,âånderlajn,,âcläör,,[random],$read(config\mp3.txt), $& + [artist],%wa.artist,[title],%wa.title,[mp3],%wa.old,[type],%wa.type,[etime],$dll(scripts\dll\winamp.dll,position,_), $& + [time],$replace($dll(scripts\dll\winamp.dll,songlength,_),00:-1,stream),[folder],%wa.folder, $& + [kbps],%wa.bitrate kbps,[album],%wa.album,[size],%wa.size,[filename],%wa.file,[path],%wa.path) + if ($hget(nbs,mp3serv) == 1) { hadd -u300 temp mp3serv.file $cit(%x) | unset %mp3serv.* } + } + return $replacecs(%wa.out,$false,none) +} +alias modent { + var %cmodes + if (N isincs $chanmodes) var %cmodes = C + if (C isincs $chanmodes) var %cmodes = %cmodes $+ N + .timer 1 10 if ($nick(%jkanal,0) == 1) mode %jkanal +nt $+ %cmodes +} +alias n.blscanall { + if ($status != connected) || ($chan(0) == 0) || ($ncfg(blacklist) != 1) return + var %i = 1 + while (%i <= $chan(0)) { + if (($me isop $chan(%i)) || ($me ishop $chan(%i))) && (($hget(nbs,blacklist_custom_channels) != 1) || ($istok($hget(nbs,blacklist_channels),$chan(%i),32))) { .timerbls. [ $+ [ $cid ] $+ ] . [ $+ [ $chan(%i) ] ] 1 [ %i ] n.blscan $chan(%i) } + inc %i + } +} +alias n.start.echo { + echo $color(info) -s - $clr(normal,$strip($n.name $n.version)) $iif($insttime > 86400,installed for $clr(normal, $+ $dur($insttime,2))) using theme $clr(normal,$tname) + echo $color(info) -s - $clr(normal,Ctrl+F1:) Commands $+ , $clr(normal,F2:) configuration + if ($lines(scripts\txt\tips.txt) > 0) { + echo -s $chr(160) + echo -s - tip: $read(scripts\txt\tips.txt) + } + titleupdate +} +alias leet { say $replace($1-,a,4,e,3,i,1,s,5,g,6,t,7,o,00,ä,'a',ö,'o') } +alias mp3 np +alias who { + set %n.whosvar 1 + !who $1- +} +alias names { + set %show.names 1 + !names $1- +} +alias n.getitunes { + .comopen itunes iTunes.application + if (!$comerr) { + .echo -qg $com(itunes,PlayerState,3) + if ($com(itunes).result == 1) { + .echo -qg $com(itunes,CurrentTrack,3,dispatch* itrack) + .echo -qg $com(itunes,CurrentStreamTitle,3) + .echo -qg $com(itrack,Name,3) + set %it.title $com(itrack).result + .echo -qg $com(itrack,Artist,3) + set %it.artist $com(itrack).result + .echo -qg $com(itrack,Album,3) + set %it.album $com(itrack).result + .echo -qg $com(itrack,BitRate,3) + set %it.bitrate $com(itrack).result + .echo -qg $com(itrack,Duration,3) + set %it.ttime $com(itrack).result + .echo -qg $com(itunes,PlayerPosition,3) + set %it.etime $com(itunes).result + .echo -qg $com(itrack,KindAsString,3) + set %it.type $com(itrack).result + } + } + if ($com(itrack)) .comclose itrack + if ($com(itunes)) .comclose itunes +} + +alias n.alarm_action { + if (%alarm.beep == 1) beep 10 100 + elseif ($isfile(%alarm.sound)) splay %alarm.sound + echo $color(info) -st $npre Alarm finished $iif(%alarm.message == 1,$par($ncfg(alarm_message))) + if (%alarm.message) n.ptext - $chr(1) Alarm $chr(1) $ncfg(alarm_message) + if (%alarm.program.on == 1) run -p $ncfg(alarm_program) +} +alias dns { + if (!$1) { dns | return } + echo $color(other) -atq $npre Looking up $n.quote($1) + .!dns $1- +} +alias fasttitle { + if ($appstate == tray) !flash $strip($remove($1-,$,%,|)) + else !dll scripts\dll\aircdll.dll SetMircTitle $strip($eval($1-,1)) + .!timertitlebar off +} +alias n.history { + if ($read($1,w,$2-)) { + write -dl $+ $readn $1 + } + write -il0 $1- + while ($lines($1) > 20) { + write -dl $+ $lines($1) $1 + } +} +alias idle { + if (!$isid) && ($1) { + set -u5 %whois.idle 1 + !whois $1 $1 + } +} +alias titleupdate { + if ($appstate != minimized) && ($appstate != tray) { + if (!$timer(titlebar)) .timertitlebar -i 0 10 titleupdate + if ($status == connected) { + if (!$hget(temp,clag.block)) && ($hget(nbs,check_lag) == 1) { + hadd -mu29 temp clag.block 1 + .notice $me lag437289 $ticks + } + if ($dialog(tb)) { + did -ac tb 1 $+($network,:) $+($server,:,$port) + var %lag = $iif(%lag. [ $+ [ $cid ] ],$ifmatch ms, --) + if ($away) { did -ar tb 2 connected: $dur($uptime(server,3),2) $+ $iif($hget(nbs,check_lag) == 1,$c44 lag: %lag) $+ , away: $dur($awaytime,2) ( $+ $awaymsg $+ ) } + elseif ($idle > 60) { did -ac tb 2 idle: $dur($idle,2) $+ , connected: $dur($uptime(server,3),2) $+ $iif($hget(nbs,check_lag) == 1,$c44 lag: %lag) } + else { did -ac tb 2 connected: $dur($uptime(server,3),2) $+ $iif($hget(nbs,check_lag) == 1,$c44 lag: %lag) } + } + } + elseif ($dialog(tb)) { + did -ac tb 1 nbs-irc $n.version - nbs-irc.net + did -ac tb 2 Use F2 to configure nbs-irc + } + } + .titlebar $iif($hget(nbs,titlebar_version) == 1,$version - $strip($n.name $n.version)) $iif($hget(nbs,titlebar_lag) == 1, $iif(%lag. [ $+ [ $cid ] ],- $ifmatch ms)) + if ($time(H) == 23) && ($time(n) == 59) .timerdaychange -o 0:00 1 0 scon -at1 n.daychange + if ($ncfg(ci-check) == 1) { + if (%cicheck > 6) { + set %cicheck 0 + ci-check + } + else inc %cicheck 1 + } +} +alias n.daychange { + if ($ncfg(show_daychanged) == 1) { + var %i = 1, %msg = Day changed to $day $par($date(d mmm yyyy)) + while (%i <= $chan(0)) { + n.echo info -t $chan(%i) %msg + inc %i + } + var %i = 1 + while (%i <= $query(0)) { + n.echo info -t $query(%i) %msg + inc %i + } + n.echo info -st %msg + } +} +alias clag { + set %lc 1 + .notice $me lag437289 $ticks +} +;L +alias -l n.checkscript { + if (!$script($1-)) { + if ($exists(scripts\ $+ $1-)) .load -rs scripts\ $+ $1- + else { echo 4 -atg * Script file $1- does not exist, replace file or reinstall nbs-irc. } + } +} +alias -l n.checkalias { + if (!$alias($1-)) { + if ($exists(scripts\ $+ $1-)) .load -a scripts\ $+ $1- + else { echo 4 -atg * Alias file $1- does not exist, replace file or reinstall nbs-irc. } + } +} +alias rcon_win { + if (!%rcon.port) return + if (!$window(@rcon)) dlg rcon_pass + else n.echo info -atgOnly one rcon connection supported, please close the existing rcon window. +} + +on *:udpread:rcon:{ + if ($sockerr > 0) return + :nextread + sockread -f %rcon + if ($sockbr == 0) return + if (challenge rcon isin %rcon) { + .timerrcon off + set %rcon.id $gettok(%rcon,3,32) + window -ek0d @rcon nbs.ico + titlebar @rcon $+([,%rcon.ip,:,%rcon.port,]) + echo -t @rcon $npre connected to $+(%rcon.ip,:,%rcon.port) + } + if (!%rcon) { goto end } + if ($left($remove(%rcon,ÿÿÿÿ),1) == l) var %rcon.svar = $right($remove(%rcon,ÿÿÿÿ),-1) + else var %rcon.svar = $remove(%rcon,ÿÿÿÿ) + echo -t @rcon <- %rcon.svar + :end + goto nextread +} +On *:INPUT:@rcon:{ + echo -t @rcon -> $1- + rcon_cmd $1- + haltdef +} +alias rcon_cmd if ($1) sockudp -k rcon 5000 %rcon.ip %rcon.port ÿÿÿÿ $+ rcon %rcon.id %rcon.pass $1- $+ $lf +On *:CLOSE:@rcon:{ + sockclose rcon* + unset %rcon.* +} +alias awaysys { + if ($away) n.echo normal -atg you are already marked away: $awaymsg + else dlg way +} +alias lame power $1- +alias power { + var %i = 1, %op = 0, %s = 0, %alla = 0 + while (%i <= $chan(0)) { + if ($me isop $chan(%i)) { + inc %op 1 + inc %s $nick($chan(%i),0) + } + inc %alla $nick($chan(%i),0) + inc %i 1 + } + $iif($1 == -e,echo -agt $npre you are,me is) oped in $+(%op,/,$chan(0)) channels on $+($network,.) (in control of $+(%s,/,%alla) people) +} +on *:start:{ + if ($version < 7) { + if ($n.input(Error: your mIRC version is $version $+ $c44 nbs-irc needs mIRC 7.0 or higher. $crlf $crlf $+ Would you like to go the mIRC download site?,y/n)) n.url http://www.mirc.com/get.html + exit + } + if ($uptime(mirc) < 10000) n.checkfiles + dll scripts\dll\dcx.dll WindowProps $window(-2).hwnd +i 0 nbs.ico + .echo -qg $findfile(scripts\temp\topic\,*,0,.remove $1-) + .echo -qg $findfile(scripts\temp\,paste_*,0,.remove $1-) + .echo -qg $findfile(scripts\temp\,url_*,0,.remove $1-) + hmake temp 5 + n.checkini + n.reloadconfig + n.updateevents + if ($ncfg(exttb) == 1) n.toolbar + background -ux + if ($dialog(strt)) did -a strt 1 3 + if ($os == 2k) || ($os == 98) || ($os == 95) || ($os == nt) tray -i17 scripts\dll\i.dll + else tray -i18 scripts\dll\i.dll + .timertitlebar -i 0 10 titleupdate + .timestamp -f $n.timestamp + .disable #röstning + hmake prot 10 + hload -i prot config\config.ini protections + if ($dialog(strt)) did -a strt 1 7 + if (!$tname) { + echo $color(info) -a - No theme loaded, loading default theme. + echo -a  + theme cold + } + cnicks + unset %txtload %wa.in %tedit* %n.connecting* %lag.* %temp %tmp* %ban* %oldnick.* %sbnc.* %psybnc.* %maxbans.* %topiclen.* %dns2nick* %addedit + ;if ($exists(scripts\r-own.nbs)) .load -rs1 scripts\r-own.nbs + if ($ncfg(updated) != 1) { + if ($script(misc.ini)) .unload -rs scripts\misc.ini + if ($exists(scripts\misc.ini)) .remove scripts\misc.ini + w_ncfg updated 1 + } + if ($exists(fix.ini)) .timer 1 1 .remove fix.ini + if (!$insttime) { + dlg 1st + set %nbs_vcheck 10 + } + n.start.echo + autoconnect_connectnow +} +alias host2nick { + if ($1) { + set %dns2nick.host $1 + echo $color(other) -atg $npre Searching for user(s) with host: %dns2nick.host + who %dns2nick.host + } + else n.echo other -atg Usage: /host2nick +} +alias dns2nick host2nick $1- +alias ip2nick { + if ($1) { + set %tmp.i2n 1 + dns $1 + } + else n.echo other -atg Usage: /ip2nick +} +alias mp3send { + if ($1) && (http://* !iswm $swamp(trackfilename)) dc $+ $chr(99) $chr(115) $+ e $+ $chr(110) $+ d $1 $swamp(trackfilename) + else n.echo info -atg Usage: /sendsong +} +alias n.mdx dll $cit(scripts\dll\mdx\mdx.dll) $1- +alias n.mdxv return scripts\dll\mdx\views.mdx +alias ncfg { + if ($1) && ($hget(nbs,$1)) return $ifmatch +} +alias w_ncfg { + if ($2) { + hadd -m nbs $1- + .writeini config\config.ini nbs-irc $1- + } +} +alias ncfgc { + if (!$readini(config\config.ini,nbs-irc,$1)) writeini config\config.ini nbs-irc $1- +} +alias n.reloadconfig { + if ($hget(nbs)) hfree nbs + hmake nbs 20 + hload -i nbs config\config.ini nbs-irc +} +alias n.highlight { + if (!$1) return + if ($ncfg(no_highlight) != off) && ($numtok($ncfg(no_highlight),44) > 0) { + var %i = 1, %e = $numtok($ncfg(no_highlight),44) + while (%i <= %e) { + if ($gettok($ncfg(no_highlight),%i,44) iswm $address($nick,5)) return + inc %i + } + } + window -g2 # + if ($hget(nbs,nickpip) == 1) && ((!%tmp.nbf) || (%tmp.nbf < 2)) { + splay $qt($mircdirscripts\beep.wav) + inc -u10 %tmp.nbf + } + if ($hget(nbs,nickwin) == 1) { + if (!window(@highlights ( $+ $cid $+ ))) window -k0n @highlights ( $+ $cid $+ ) + var %echo = @highlights ( $+ $cid $+ ) + } + else var %echo = -s + echo $color(other) %echo _________________________________________________ + echo %echo $timestamp $replace($nick.style,,$cmode($nick,$chan,o),,$nick) $+  $replace($1-,$me, $+ $me $+ ) + echo %echo $kl(#) - $kl($date) + echo $color(other) %echo ¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯ + if ($hget(nbs,popup_nick) == 1) n.ptext # $chr(1) Highlighted in # $chr(1) $replace($nick.style,,$cmode($nick,$chan,o),,$nick) $+  $1- +} +alias n.rejoin if ($me !ison $1) join -n $1- +alias ad { me is using $strip($n.name) $n.version (theme: $tname $+ ) - www.nbs-irc.net } +ctcp ^*:*:*:{ + if ($1 == dcc) { + if ($hget(nbs,popup_dcc) == 1) n.ptext - $chr(1) DCC from $nick $chr(1) $npre $eval($strip($3),1) ( $+ $round($calc($6 /1024/1024),2) MB) + .write $cit($logdir $+ -dcc.log) $date $time - Send from $nick $+ : $3 ( $+ $round($calc($6 /1024/1024),2) MB) + if (!$appactive) && ($ncfg(dcc_sound) == 1) splay $qt($mircdirscripts\beep.wav) + } + elseif ($1 != sound) { + haltdef + if (%tmp.ctcp > 4) { + .ignore -tu60 *!*@* + n.echo ctcp -stge CTCP protection: ignoring CTCPs for 60 seconds + return + } + inc -u15 %tmp.ctcp 1 + if ($1 == ping) { + if ((%tmp.ctcp < 4) || (!%tmp.ctcp)) .ctcpreply $nick PING $2- + n.echo ctcp -stme $kl(CTCP/PING) from $nick $par($address) $iif(%tmp.ctcp > 3,$par(Ignored)) + if ($hget(nbs,popup_other) == 1) n.ptext - $chr(1) CTCP $chr(1) $npre CTCP/PING) from $nick + + } + elseif ($1 == version) { + if ($nick isin %ctcp.ignore) { echo $color(ctcp) -stm $npre  $+ $kl(CTCP/VERSION) from $nick $par($address) $par(Ignored) | return } + if ((%tmp.ctcp < 4) || (!%tmp.ctcp)) .ctcpreply $nick VERSION $strip($n.name $n.version) - $strip(www.nbs-irc.net) + n.echo ctcp -stme $kl(CTCP/VERSION) from $nick $par($address) $iif(%tmp.ctcp > 3,$par(Ignored)) + if ($hget(nbs,popup_other) == 1) n.ptext - $chr(1) CTCP $chr(1) $npre CTCP/VERSION) from $nick + } + else n.echo ctcp -stme $kl(CTCP/ $+ $1 $+ ) from $nick $par($address) $iif(%tmp.ctcp > 3,$par(Ignored)) + if ($hget(nbs,popup_other) == 1) n.ptext - $chr(1) CTCP $chr(1) $npre CTCP/ $+ $eval($1,1) from $nick + } +} +alias n.capss { + if ($len($3-) > 9) { + if ($calc(100- $len($removecs($strip($3-),A,B,C,D,E,F,G,H,I,J,K,L,M,N,O,P,Q,R,S,T,U,V,W,X,Y,Z,Ã…,Ä,Ö,Ãœ,Ë,É,Ø)) / $len($strip($3-)) *100) >= $hget(prot,$+($1,caps.maxpercent))) { + kick $1-2 $iif($hget(prot,$+($1,caps.kickmsg)),$ifmatch,excess caps) + } + } +} +alias n.floods { + hadd -m temp flood $dll(scripts\dll\aircdll.dll, Flood, $+($1,$chr(44),$wildsite) 1 $hget(prot,$+($1,flood.lines)) $hget(prot,$+($1,flood.seconds))) + if (+FLOOD* iswm $hget(temp,flood)) { + if ($hget(prot,$+($1,flood.ban)) == 1) ban $iif($hget(prot,$+($1,bantime)) isnum 1-,-u $+ $calc($ifmatch *60)) $1-2 $ncfg(ban_mask) + kick $1-2 $iif($hget(prot,$+($1,flood.kickmsg)),$ifmatch,no flooding) + } +} +alias n.repeats { + hinc -mu10 temp $+($1,$2,$strip($3-)) 1 + if ($hget(temp,$+($1,$2, $strip($3-))) >= $hget(prot,$+($1,repeat.max))) { + hdel temp $+($1,$2,$strip($3-)) + if ($hget(prot,$+($1,repeat.ban)) == 1) ban $iif($hget(prot,$+($1,bantime)) isnum 1-,-u $+ $calc($ifmatch *60)) $1-2 $ncfg(ban_mask) + kick $1-2 $iif($hget(prot,$+($1,repeat.kickmsg)),$ifmatch,no repeating) + } +} +alias n.spams { + if ($hget(prot,$+($1,advertising.type)) == 1) && (*#?* iswm $3-) { + if ($hget(prot,$+($1,advertising.ban)) == 1) ban $iif($hget(prot,$+($1,bantime)) isnum 1-,-u $+ $calc($ifmatch *60)) $1-2 $ncfg(ban_mask) + kick $1-2 $iif($hget(prot,$+($1,advertising.kickmsg)),$ifmatch,no advertising) + } + elseif ($hget(prot,$+($1,advertising.type)) == 1) && (*join*#?* iswm $3-) || */j*#?* iswm $3-) { + if ($hget(prot,$+($1,advertising.ban)) == 1) ban $iif($hget(prot,$+($1,bantime)) isnum 1-,-u $+ $calc($ifmatch *60)) $1-2 $ncfg(ban_mask) + kick $1-2 $iif($hget(prot,$+($1,advertising.kickmsg)),$ifmatch,no advertising) + } +} +alias clonescan { + if (!$1) var %ch = $active + else var %ch = $1 + if (%ch !ischan) { echo $color(info) -atg $npre Usage: /clonescan [#channel] | return } + if ($me !ison %ch) return + var %i = 1, %w, %b + if (!$chan(%ch).ial) { + if ($nick(%ch,0) > 350) { + var %b = $n.input(This is a very large channel $+ $c44 scanning it might result in being disconnected. Do you want to scan it anyway?,y/n) + if (%b) { + echo $color(info) -agt $npre updating ial for %ch $+ , please wait. + set %csial %ch + !who %ch + return + } + } + else { + echo $color(info) -agt $npre updating ial for %ch $+ , please wait. + set %csial %ch + !who %ch + return + } + } + if ($hget(clones)) hfree clones + hmake clones 1 + var %antal = $nick(%ch,0), %antalk + while (%i <= %antal) { + var %w = $address($nick(%ch,%i),2) + if ($nick(%ch,%i)) hadd clones %w $hget(clones,%w) $clr(inf,$cmode($nick(%ch,%i),%ch,a)) $+ $nick(%ch,%i) + inc %i + } + window -nk0 @clones + echo @clones $chr(160) + echo @clones $chr(160) + echo @clones Clones in %ch $+ : + echo @clones $chr(160) + var %i = 1 + while (%i <= %antal) { + var %k = 1 + if ($numtok($hget(clones,%i).data,32) > 1) { + var %k = $ifmatch, %w = $hget(clones,%i).data + echo -i2 @clones $kl($hget(clones,%i).item) + echo -i2 @clones $chr(160) %k $+ : $replace(%w,$chr(32),$str($chr(160),3)) + echo @clones $chr(160) + inc %antalk %k + } + inc %i + } + var %unik = $calc(%antal - %antalk) + echo @clones $npre Unique hosts: %unik $+ / $+ %antal $par($perc(%unik,%antal)) + window -a @clones + hfree clones + unset %csial +} +alias vote { + if (%vote) { n.echo info -atg there is already an vote in progress | return } + if (!$server) { n.echo -atg info not connected | return } + if ($active !ischan) { n.echo info -atg not on a channel | return } + set %vchan # + set %vote $n.input(Enter topic (yes/no)) + set %ja 0 + set %nej 0 + msg %vchan %vote (vote with !yes or !no) + .enable #röstning +} +alias voteoff { + .disable #röstning + msg %vchan result: %vote (yes: %ja - no: %nej $+ ) + if (%r.nicks) msg %vchan voted: $ifmatch + unset %vote %ja %nej %röstat %r.nicks +} +#röstning off +ON *:TEXT:!yes:#: { + if (# == %vchan) && ($address($nick,1) !isin %röstat) { + set %röstat %röstat $address($nick,1) + set %r.nicks %r.nicks $nick (y) + inc %ja 1 + } +} +ON *:TEXT:!no:#: { + if (# == %vchan) && ($address($nick,1) !isin %röstat) { + set %röstat %röstat $address($nick,1) + set %r.nicks %r.nicks $nick (n) + inc %nej 1 + } +} +#röstning end +on ^*:HOTLINK:*.*.*.*:*:{ if ($remove($1,.) !isnum) { halt } } +on *:HOTLINK:*.*.*.*:*:{ + set %hlip $remove($1,],[,$chr(40),$chr(41),@,/,\) + if (*:?* !iswm %hlip) { + if ($ncfg(defgame) == hl) set %hlip %hlip $+ :27015 + if ($ncfg(defgame) == bf) set %hlip %hlip $+ :14567 + } + set %autoscan 1 + g-join +} + +alias dlg { + if (!$1) return + if (!$dialog($1)) dialog -m $1 $1 +} +alias theme { + if ($1) { + if ($1 == -r) { + set %poaksdfopka 1 + byt-tema $left($nopath($isalias(tname).fname),-4) + } + else byt-tema $1- + } + else dlg tema +} +alias g-join { + if ($1) set %hlip $1 + dlg gl +} +alias sendcb { + if (!$1) { n.echo info -atg Usage /sendcb [filename] | return } + if (!$cb) { n.echo info -atg No text in clipboard | return } + if (!$2) { var %c = 1, %r = $r(a,z) $+ $r(a,z) $+ $r(a,z) $+ $r(a,z) $+ $r(a,z) + while (%c <= $cb(0)) { + write clip- $+ %r $+ .txt $cb(%c) + inc %c + } + dcc send $1 clip- $+ %r $+ .txt + .timer 1 60 .remove clips- $+ %r $+ .txt + } + if ($2) { + var %c = 1 + while (%c <= $cb(0)) { + write $2 $+ .txt $cb(%c) + inc %c + } + dcc send $1 $2 $+ .txt + .timer 1 60 .remove $2 $+ .txt + } +} +alias n.bnc { + if (!$window($bncwin($1,$cid))) { + window -k0ne $bncwin($1,$cid) + echo -te $bncwin($1,$cid) $npre $1 window, right click for options. + } + else window -g1 $bncwin($1,$cid) + if ($2) { + .!msg - $+ $1- + echo $color(notice) -t $bncwin($1,$cid) -› $2- + } +} +alias nickserv_ghost { + if ($lines(config\nickserv- $+ $network $+ .txt) > 0) { + var %a = $read(config\nickserv- $+ $network $+ .txt), %k = $calc($len($gettok(%a,2-,44)) +1), %i = 1 + while (%k > 1) { + var %k = $calc(%k -3), %r = %r $+ $chr($calc($mid($gettok(%a,2-,44),%k,3) + %i)) + inc %i 1 + } + set %tmp.ghost $gettok(%a,1,44) + nickserv ghost $gettok(%a,1,44) %r + } +} +on ^*:snotice:*:{ + haltdef + if ($nick == irc.psychoid.net) { + n.bnc psyBNC + echo -tm $bncwin(psyBNC,$cid) ‹- $1- + } + elseif ($nick == shroudbnc.info) set %sbnc. [ $+ [ $cid ] ] 1 + else echo $color(notice) -stq $npre $par($nick) $1- +} + +on ^*:notice:*:*:{ + haltdef + if ($target ischan) { + echo $color(notice) -tgm $target $pre $par($+($cmode($nick,$target),:,$target)) $1- + if ($chr(1) $+ # isin $hget(prot,chans)) && ($me isop $target) || ($me ishop $target) { + if (($nick isop #) || ($nick ishop #)) && (!$hget(prot,$+(#,punishops))) return + if ($hget(prot,$+(#,caps)) == 1) n.capss $target $nick $1- + if ($hget(prot,$+(#,repeat)) == 1) n.repeats $target $nick $1- + if ($hget(prot,$+(#,flood)) == 1) n.floods $target $nick $1- + if ($hget(prot,$+(#,advertising)) == 1) n.spams $target $nick $1- + } + } + elseif ($address === psyBNC@lam3rz.de) && ($nick === Welcome) || ($nick === Wilkommen) set %psybnc. [ $+ [ $cid ] ] 1 + elseif ($nick == -psyBNC) { + n.bnc psyBNC + echo -tmi4 $bncwin(psybnc,$cid) ‹- $1- + } + elseif ($nick == -sBNC) { + n.bnc sBNC + echo -tmi4 $bncwin(sBNC,$cid) ‹- $1- + } + elseif ($nick == $me) && ($1 == lag437289) { + set %lag. $+ $cid $calc($ticks - $2) + if (%lc == 1) n.echo other -atg latency to $server $+ : %lag. [ $+ [ $cid ] ] ms + unset %lc + titleupdate + } + elseif ($n.qnet) && ($len($nick) == 1) { + if ($dialog(botctrl)) && (%bc.getmode) { + if ($1-7 == chanlev is only available to authed users.) { + did -ar botctrl 99 You are not authed + did -b botctrl 98,8 + } + if ($1-2 == Can't find) || ($3- == is not authed.) { + did -ar botctrl 99 (not authed) + did -b botctrl 98,8 + } + elseif ($1-6 == user %bc.nick is not known on) did -ar botctrl 99 (none) + elseif (flags for %bc.nick on isin $1-) did -ar botctrl 99 $6 + elseif (!$3) && ($2) did -ar botctrl 99 + $+ $2 + did -c botctrl 99 1 + } + elseif ($1 == CHALLENGE) && ($nick === Q) { + if (LEGACY-MD5 isin $3-) { + var %k = $calc($len($ncfg(authpass)) +1), %i = 1 + while (%k > 1) { + var %k = $calc(%k -3), %r = %r $+ $chr($calc($mid($ncfg(authpass),%k,3) + %i)) + inc %i 1 + } + n.echo notice -agqt received key, sending auth. + .msg q@cserve.quakenet.org challengeauth $ncfg(authnick) $md5($left(%r,10) $2) LEGACY-MD5 + } + else n.echo info -atg Error: LEGACY-MD5 seems to be removed, disable challengeauth to auth. + } + elseif ($mid($1,2,-1) ischan) n.echo notice -t $mid($1,2,-1) $kl($nick) $1- + else n.echo notice -atgi4 $kl:($nick) $1- + } + elseif ($n.unet) && ($nick == x) { + if ($mid($1,2,-1) ischan) n.echo notice -t $mid($1,2,-1) $kl($nick) $1- + else n.echo notice -atgi4 $kl:($nick) $1- + } + elseif ($nick === ChanServ) && ($mid($1,2,-1) ischan) n.echo notice -t $mid($1,2,-1) $kl($nick) $1- + elseif ($1-2 === DCC Send) && ($3) { + n.echo notice -seti4 $kl:(DCC Send from $nick) $deltok($3-,-1,32) $par($mid($gettok($3-,-1,32),2,-1)) + } + else { + n.echo notice -atmi4 $kl:(notice from $nick) $1- + } + if ($nick === NickServ) && ($ncfg(nickserv_on) == 1) { + if (nickname is registered isin $1-) && ($exists(config\nickserv- $+ $network $+ .txt)) { + var %a = $read(config\nickserv- $+ $network $+ .txt) + if ($me == $gettok(%a,1,44)) { + var %k = $calc($len($gettok(%a,2-,44)) +1), %i = 1 + while (%k > 1) { + var %k = $calc(%k -3), %r = %r $+ $chr($calc($mid($gettok(%a,2-,44),%k,3) + %i)) + inc %i 1 + } + $ncfg(nickserv_prefix) %r + } + } + elseif (ghost with your nick has been killed isin $1-) nick %tmp.ghost + } +} +alias back if ($away) dlg back +on *:APPACTIVE:titleupdate +on ^*:CLOSE:@psyBNC (*):if ($window(-psybnc)) close -m -psyBNC +on ^*:CLOSE:@sBNC (*):if ($window(-sbnc)) close -m -sBNC +alias echoall { + if (!$1) { return } + var %i = 1 + while (%i <= $chan(0)) { + echo -g $chan(%i) $1- + inc %i + } + unset %i +} +alias topicall { + var %i = 1 + while (%i <= $chan(0)) { + if ($chan(%i).topic) echo $color(topic) -tgi4 $chan(%i) - Topic: $chan(%i).topic + inc %i + } + unset %i +} +alias whochan { + if (!$1) return + var %c = $1 + if (!%whos) || (%whos > 180) set -u120 %whos 5 + else inc %whos 10 + if ($nick(%c,0) < 150) && ($nick(%c,0) > 1) && (!$chan(%c).ial) .timerwho. [ $+ [ $cid ] $+ ] . [ $+ [ %c ] ] 1 [ %whos ] !who %c +} +alias topicchan { + if (!$1) return + if ($chan($1).topic) .write -il1 $+(scripts\temp\topic\,$md5($1),â,$cid) $chan($1).topic +} +alias ehide { return $istok($hget(temp,$1),$2,44) } +alias hideshow.event { + if ($2) { + if ($ehide($2,$1)) hadd -m temp $2 $remtok($hget(temp,$2),$1,44) + else hadd -m temp $2 $addtok($hget(temp,$2),$1,44) + if ($hget(temp,$2)) w_ncfg hide_ $+ $2 $hget(temp,$2) + else w_ncfg hide_ $+ $2 o + } +} +alias n.saveconfig { + hsave -i nbs config\config.ini nbs-irc +} +alias n.updateevents { + hadd -m temp joins $ncfg(hide_joins) + hadd -m temp parts $ncfg(hide_parts) + hadd -m temp quits $ncfg(hide_quits) + hadd -m temp nicks $ncfg(hide_nicks) +} +alias n.checkini { + if ($isdir(txt)) && (!$isdir(config)) .rename txt config + if (!$isdir(config)) .mkdir config + if (!$isdir(logs)) .mkdir logs + if (!$isdir(download)) .mkdir download + if (!$isdir(scripts\temp)) .mkdir scripts\temp + if (!$isdir(scripts\temp\topic)) .mkdir scripts\temp\topic + if (!$exists(config\slaps.txt)) write config\slaps.txt slaps [nick] around a bit with a large trout + if (!$exists(config\kor.txt)) write config\kor.txt $+(cmd,$crlf,notepad,$crlf,calc,$crlf,regedit,$crlf,www.nbs-irc.net,$crlf,www.nbs-irc.net/forum,$crlf,www.google.com) + if ($exists(config\autojoin.txt)) .rename config\autojoin.txt config\autojoin-QuakeNet.txt + if (!$exists(config\autojoin-quakenet.txt)) { write -c config\autojoin-QuakeNet.txt } + if (!$exists(config\hl-servers.txt)) { write config\hl-servers.txt 130.243.72.27:27015 } + if (!$exists(config\kicks.txt)) { write config\kicks.txt bye } + if (!$exists(config\quits.txt)) { write -c config\quits.txt } + if (!$exists(config\mp3.txt)) write config\mp3.txt winamp » [mp3] :: [time] $crlf $+ np: [mp3] :: [time] + if (!$exists(config\games.txt)) { + write config\games.txt CS 1.6 $chr(124) c:\program\steam\steam.exe -applaunch 10 +connect [adr] +password [pass] + write config\games.txt CS:Source $chr(124) c:\program\steam\steam.exe -applaunch 240 +connect [adr] +password [pass] + write config\games.txt UT2004 $chr(124) C:\UT2004\system\ut2004.exe [adr] [pass] + write config\games.txt Call of Duty 2 $chr(124) c:\program\activision\call of duty 2\cod2mp_s.exe +password [pass] +connect [adr] + } + if (!$exists(config\awaymsg.txt)) write -c config\awaymsg.txt away + if (!$exists(config\awaynick.txt)) write -c config\awaynick.txt [nick]\away + if (!$exists(scripts\a-own.nbs)) { + .write scripts\a-own.nbs $chr(59) you can put your own alises here, this file will not be overwritten when updating nbs-irc + .load -a scripts\a-own.nbs + } + if (!$exists(scripts\r-own.nbs)) { + .write scripts\r-own.nbs $chr(59) you can put your own remote scripts here, this file will not be overwritten when updating nbs-irc + .load -rs1 scripts\r-own.nbs + } + ncfgc installtime $ctime + ncfgc whois @whois + ncfgc whois_inside 1 + ncfgc query_show_online 1 + ncfgc modeprefix 1 + ncfgc highlight_nick_color 8 + ncfgc nickwin 1 + ncfgc ar_time 3 + ncfgc newcc 1 + ncfgc exttb 1 + ncfgc smsg say + ncfgc skanaler #chan1 #chan2 (# = all channels) + ncfgc mp3s say winamp » [mp3] :: [time] + ncfgc mp3getcmd !get $+ $r(1,9) + ncfgc authnick nick + ncfgc authpass pass + ncfgc nickserv_on 1 + ncfgc nickserv_prefix nickserv identify + ncfgc awaynick [nick]\away + ncfgc awaymed away + ncfgc wapath c:\program\winamp\winamp.exe + ncfgc nickpip 1 + ncfgc nickbar 1 + ncfgc privpip 1 + ncfgc privljud psljud + ncfgc autojoin_minimize 1 + ncfgc autorejoin 1 + ncfgc cic-time 10 + ncfgc blacklist 1 + ncfgc dcc_sound 1 + ncfgc ban_mask 1 + ncfgc quakenet_bot_autojoin 1 + ncfgc undernet_bot_autojoin 1 + ncfgc titlebar_version 1 + ncfgc reclaim_nick 1 + ncfgc nicklist_use_themed_colors 1 + ncfgc use_theme_fonts 1 + ncfgc version_check 1 + ncfgc check_lag 1 + ncfgc no_highlight off + ncfgc show_daychanged 1 + ncfgc fkey_f1 /help + ncfgc fkey_f3 /awaysys + ncfgc fkey_f4 /back + ncfgc fkey_f5 /lastpop + ncfgc fkey_f7 /topic $eval(#,0) + ncfgc fkey_f8 /np + ncfgc fkey_f9 /logviewer + ncfgc fkey_f10 /g-join + ncfgc fkey_f11 /blist + ncfgc fkey_f12 /aboutnbs + ncfgc tb_skin nbs.png + ncfgc popup_query_always o + ncfgc popup_nick 1 + ncfgc popup_query 1 + ncfgc popup_discon 1 + ncfgc popup_dcc 1 + ncfgc popup_other 1 + ncfgc popup_mode 2 + ncfgc popup_timeout 6 + if ($os == 7) { + ncfgc popup_posx -5 + ncfgc popup_posy -83 + } + else { + ncfgc popup_posx -7 + ncfgc popup_posy -75 + } + ncfgc popup_centerx o + ncfgc popup_centery o + ncfgc popup_away o + ncfgc auto_connect_1_server irc.example.org (Example) +} + +; dialogs + +dialog paste { + title "Paste" + size -1 -1 219 155 + option dbu + icon scripts\dll\i.dll, 17 + text "", 1, 2 2 166 8 + edit "", 2, 2 11 215 130, multi return autohs vsbar + check "Delay lines (seconds):", 3, 3 143 63 10 + edit "1", 7, 66 143 19 11, autohs + button "Paste", 4, 142 143 37 11, ok + button "Cancel", 5, 180 143 37 11, cancel +} +on *:dialog:paste:init:0:{ + did -a paste 1 Are you sure you want to paste $cb(0) lines of text into this window? + dialog -t paste Paste to %paste.target + var %i = 1 + while (%i <= $cb(0)) { + did -a paste 2 $cb(%i) $+ $crlf + inc %i + } + if ($cb(7)) did -c paste 3 + if ($cb(12)) did -ar paste 7 2 + if ($cb(20)) did -ar paste 7 3 + did -f paste 4 +} +on *:dialog:paste:sclick:4:{ + if (%paste.target) { + var %x = scripts\temp\paste_ $+ $r(a,z) $+ $r(a,z) $+ $r(a,z) $+ $r(a,z) + savebuf -o paste 2 %x + if ($did(paste,2,1) isnum) .write -il1 %x $crlf + if ($did(paste,3).state == 1) && ($did(paste,7) isnum 1-) .play -a pastemsg %paste.target %x $did(paste,7) $+ 000 + else .play -a pastemsg %paste.target %x 0 + } + unset %paste.target + .timer 1 600 .remove %x +} + +dialog strt { + title "" + size -1 -1 66 3 + option dbu + text "", 1, 3 3 60 6 +} +on *:dialog:strt:init:0:{ + n.mdx SetMircVersion $version + n.mdx MarkDialog $dname + n.mdx SetDialog $dname style dlgframe + n.mdx SetControlMDX $dname 1 progressbar smooth > scripts\dll\mdx\ctl_gen.mdx + did -a strt 1 0 0 10 +} + +dialog cp { + title "Control Panel (/setup)" + size -1 -1 244 191 + option dbu + icon scripts\dll\i.dll, 17 + list 1, -1 -1 246 176, size extsel + button "Close", 2, 205 178 37 11, ok + text "", 100, 3 180 165 8 +} +on *:dialog:cp:sclick:2:dialog -x cp +on *:dialog:cp:init:0:{ + n.mdx SetMircVersion $version + n.mdx MarkDialog $dname + n.mdx SetControlMDX cp 1 ListView icon sortascending > scripts\dll\mdx\views.mdx + did -i cp 1 1 iconsize 32 32 + did -i cp 1 1 seticon list 2, $+ $scriptdirdll\i.dll + did -a cp 1 0 1 Misc settings + did -i cp 1 1 seticon list 0, $+ $scriptdirdll\i.dll + did -a cp 1 0 2 Theme/font + did -i cp 1 1 seticon list 5, $+ $scriptdirdll\i.dll + did -a cp 1 0 3 Sound/highlight + did -i cp 1 1 seticon list 6, $+ $scriptdirdll\i.dll + did -a cp 1 0 4 Song announce + did -i cp 1 1 seticon list 9, $+ $scriptdirdll\i.dll + did -a cp 1 0 5 Protections + did -i cp 1 1 seticon list 12, $+ $scriptdirdll\i.dll + did -a cp 1 0 6 Auto connect + did -i cp 1 1 seticon list 19, $+ $scriptdirdll\i.dll + did -a cp 1 0 7 Autojoin + did -i cp 1 1 seticon list 8, $+ $scriptdirdll\i.dll + did -a cp 1 0 8 QuakeNet + did -i cp 1 1 seticon list 23, $+ $scriptdirdll\i.dll + did -a cp 1 0 9 UnderNet + did -i cp 1 1 seticon list 20, $+ $scriptdirdll\i.dll + did -a cp 1 0 10 NickServ + did -i cp 1 1 seticon list 18, $+ $scriptdirdll\i.dll + did -a cp 1 0 11 Notifications + did -i cp 1 1 seticon list 11, $+ $scriptdirdll\i.dll + did -a cp 1 0 12 F-key bindings + did -i cp 1 1 seticon list 3, $+ $scriptdirdll\i.dll + did -a cp 1 0 13 Logviewer + did -i cp 1 1 seticon list 1, $+ $scriptdirdll\i.dll + did -a cp 1 0 14 Game launcher + did -i cp 1 1 seticon list 15, $+ $scriptdirdll\i.dll + did -a cp 1 0 15 Blacklist + did -i cp 1 1 seticon list 21, $+ $scriptdirdll\i.dll + did -a cp 1 0 16 Alarm timer + did -i cp 1 1 seticon list 10, $+ $scriptdirdll\i.dll + did -a cp 1 0 17 Commands + did -i cp 1 1 seticon list 0, $+ $mircdirnbs.ico + did -a cp 1 0 18 About + n.showversion 100 +} +on *:dialog:cp:dclick:1:{ + var %a = $gettok($did($dname,1).seltext,6-,32) + if (mi isin %a) misc + elseif (th isin %a) theme + elseif (sou isin %a) nq + elseif (son isin %a) mp3say + elseif (pr isin %a) prot + elseif (auto c isin %a) autocon + elseif (autoj isin %a) caj + elseif (qu isin %a) quakenet + elseif (und isin %a) undernet + elseif (ni isin %a) cns + elseif (no isin %a) popups + elseif (f- isin %a) fkeys + elseif (lo isin %a) logviewer + elseif (ga isin %a) g-join + elseif (bl isin %a) blist + elseif (al isin %a) alarm + elseif (co isin %a) cf1 + elseif (ab isin %a) aboutnbs +} +alias botcontrol { + unset %bc.* + if ($2) set %bc.nick $2 + if ($1) set %bc.chan $1 + elseif ($active ischan) set %bc.chan $active + if (q ison %bc.chan) set %bc.bot Q + elseif (l ison %bc.chan) set %bc.bot L + if (%bc.chan) && (%bc.bot) && (%bc.nick) dlg botctrl +} +dialog botctrl { + title "-" + size -1 -1 94 42 + option dbu + icon $scriptdirdll\i.dll, 17 + text "Set:", 2, 2 14 13 8 + text "Current:", 150, 2 3 23 8 + button "Set", 8, 25 29 33 11, default ok + button "Cancel", 9, 59 29 33 11, cancel + combo 98, 30 13 62 91, edit drop + text "", 99, 35 3 56 8, right +} +on *:dialog:botctrl:init:0:{ + did -f botctrl 98 + if (%bc.chan) && (%bc.bot) && (%bc.nick) { + dialog -t botctrl Chanlev: %bc.nick + set %bc.getmode 1 + .msg %bc.bot chanlev %bc.chan %bc.nick + did -a botctrl 99 getting... + did -c botctrl 99 1 + did -a botctrl 98 +gv (auto-voice) + did -a botctrl 98 -gv + did -a botctrl 98 $chr(32) + did -a botctrl 98 +ao (auto-op) + did -a botctrl 98 -ao + did -a botctrl 98 $chr(32) + did -a botctrl 98 +k (known) + did -a botctrl 98 -k + did -a botctrl 98 $chr(32) + did -a botctrl 98 +p (protect) + did -a botctrl 98 -p + did -a botctrl 98 $chr(32) + did -a botctrl 98 +m (master) + did -a botctrl 98 -m + did -a botctrl 98 $chr(32) + did -a botctrl 98 +d (prevent op) + did -a botctrl 98 -d + did -a botctrl 98 $chr(32) + did -a botctrl 98 +q (prevent voice) + did -a botctrl 98 -q + did -a botctrl 98 $chr(32) + did -a botctrl 98 +j (auto invite) + did -a botctrl 98 -j + } +} + +on *:dialog:botctrl:sclick:8:{ + if (%bc.chan) && (%bc.bot) && (%bc.nick) { + if ($did(botctrl,98)) msg %bc.bot chanlev %bc.chan %bc.nick $gettok($ifmatch,1,32) + else msg %bc.bot removeuser %bc.chan %bc.nick + } +} + + +dialog popups { + title "Notification popups (/popups)" + size -1 -1 138 189 + option dbu + icon $scriptdirdll\i.dll, 17 + tab "General", 15, 3 1 131 170 + box "Show notification popups:", 50, 9 18 119 64, tab 15 + box "Show notification popups for these events:", 51, 9 86 119 79, tab 15 + radio "When mIRC is not the active window", 6, 14 27 103 10, tab 15 group + radio "Always show notifications", 7, 14 36 100 10, tab 15 + radio "Disable notifications", 8, 14 45 57 10, tab 15 + check "Don't show notifications while away", 4, 15 56 100 10, tab 15 + edit "", 9, 47 67 14 11, tab 15 autohs center + text "seconds", 5, 63 69 25 8, tab 15 + text "Display time:", 1, 15 69 32 8, tab 15 + check "Highlights", 10, 16 95 50 11, tab 15 + check "Querys", 11, 16 104 50 11, tab 15 + radio "Only on first message", 2, 19 114 82 10, group tab 15 + radio "Always", 3, 19 123 36 10, tab 15 + check "DCCs", 12, 16 133 50 11, tab 15 + check "Connects/disconnects", 13, 16 142 70 11, tab 15 + check "Other events", 14, 16 151 56 11, tab 15 + tab "Positioning", 16 + combo 17, 17 29 104 100, tab 16 drop + text "Width (x):", 304, 24 64 26 8, tab 16 + edit "", 40, 51 62 25 11, tab 16 center + edit "", 41, 51 74 25 11, tab 16 center + check "Center", 250, 81 63 30 10, tab 16 + check "Center", 251, 81 75 29 10, tab 16 + text "Negative value for right side of the screen. Positive value for left side of the screen.", 302, 14 107 110 15, tab 16 + text "Height (y):", 305, 22 76 28 7, tab 16 + button "Preview", 206, 92 131 37 11, tab 16 + box "Position:", 18, 8 50 121 43, tab 16 + box "Usage:", 53, 8 97 121 31, tab 16 + box "Presets:", 52, 8 19 121 27, tab 16 + button "OK", 100, 60 175 37 11, default ok + button "Cancel", 101, 98 175 37 11, cancel +} +on *:dialog:popups:init:0:{ + if ($ncfg(popup_nick) == 1) did -c popups 10 + if ($ncfg(popup_query) == 1) did -c popups 11 + if ($ncfg(popup_dcc) == 1) did -c popups 12 + if ($ncfg(popup_discon) == 1) did -c popups 13 + if ($ncfg(popup_other) == 1) did -c popups 14 + if ($ncfg(popup_query_always) == 1) did -c popups 3 + else did -c popups 2 + if (!$ncfg(popup_query_always)) { + w_ncfg popup_query_always 1 + did -c popups 2 + } + if (!$ncfg(popup_mode)) { + w_ncfg popup_mode 2 + did -c popups 6 + } + elseif ($ncfg(popup_mode) == 2) did -c popups 6 + elseif ($ncfg(popup_mode) == 3) did -c popups 7 + elseif ($ncfg(popup_mode) == 4) did -c popups 8 + if ($ncfg(popup_timeout) !isnum 1-60) w_ncfg popup_timeout 7 + else did -a popups 9 $ncfg(popup_timeout) + if (!$ncfg(popup_posx)) w_ncfg popup_posx -2 + else did -a popups 40 $ncfg(popup_posx) + if (!$ncfg(popup_posy)) w_ncfg popup_posy -120 + else did -a popups 41 $ncfg(popup_posy) + if (!$ncfg(popup_centerx)) w_ncfg popup_centerx o + if (!$ncfg(popup_centery)) w_ncfg popup_centery o + if ($ncfg(popup_centerx) == 1) { did -b popups 40 | did -c popups 250 } + if ($ncfg(popup_centery) == 1) { did -b popups 41 | did -c popups 251 } + did -a popups 17 Bottom left + did -a popups 17 Bottom right (default) + did -a popups 17 Top left + did -a popups 17 Top right +} +on *:dialog:popups:sclick:100:{ + if ($did(popups,10).state == 1) w_ncfg popup_nick 1 + else w_ncfg popup_nick o + if ($did(popups,11).state == 1) w_ncfg popup_query 1 + else w_ncfg popup_query o + if ($did(popups,12).state == 1) w_ncfg popup_dcc 1 + else w_ncfg popup_dcc o + if ($did(popups,13).state == 1) w_ncfg popup_discon 1 + else w_ncfg popup_discon o + if ($did(popups,14).state == 1) w_ncfg popup_other 1 + else w_ncfg popup_other o + if ($did(popups,3).state == 1) w_ncfg popup_query_always 1 + else w_ncfg popup_query_always o + if ($did(popups,6).state == 1) w_ncfg popup_mode 2 + elseif ($did(popups,7).state == 1) w_ncfg popup_mode 3 + elseif ($did(popups,8).state == 1) w_ncfg popup_mode 4 + if ($did(popups,4).state == 1) w_ncfg popup_away 1 + else w_ncfg popup_away o + if ($did(popups,9) !isnum 1-60) { .echo -qg $n.input(Enter a valid number between 1 and 60.,info) | did -f popups 9 | halt } + w_ncfg popup_timeout $did(popups,9) + if ($did(popups,250).state == 1) w_ncfg popup_centerx 1 + else w_ncfg popup_centerx o + if ($did(popups,251).state == 1) w_ncfg popup_centery 1 + else w_ncfg popup_centery o + if ($remove($did(popups,40),$chr(45),$chr(32)) !isnum) && ($did(popups,250).state != 1) { .echo -qg $n.input(Please enter a valid number value.,info) | did -f popups 40 | halt } + if ($remove($did(popups,41),$chr(45),$chr(32)) !isnum) && ($did(popups,251).state != 1) { .echo -qg $n.input(Please enter a valid number value.,info) | did -f popups 41 | halt } + elseif ($remove($did(popups,40),$chr(45),$chr(32)) !isnum) return + elseif ($remove($did(popups,41),$chr(45),$chr(32)) !isnum) return + w_ncfg popup_posx $remove($did(popups,40),$chr(32)) + w_ncfg popup_posy $remove($did(popups,41),$chr(32)) + +} +on *:dialog:popups:sclick:17:{ + if (bottom r isin $did(popups,17).seltext) { + did -ra popups 40 -5 + did -ra popups 41 -83 + did -eeuu popups 40,41,250,251 + } + elseif (top r isin $did(popups,17).seltext) { + did -ra popups 40 -5 + did -ra popups 41 5 + did -eeuu popups 40,41,250,251 + } + elseif (bottom l isin $did(popups,17).seltext) { + did -ra popups 40 5 + did -ra popups 41 -83 + } + elseif (top l isin $did(popups,17).seltext) { + did -ra popups 40 5 + did -ra popups 41 5 + } +} +on *:dialog:popups:sclick:206:{ + var %text = Preview notification at $iif($did(popups,250).state == 1,(center),$did(popups,40)) $+ x $+ $iif($did(popups,251).state == 1,(center),$did(popups,41)) + var %h = $calc($height(l,$window(status window).font,$window(status window).fontsize) +25), %w = 250 + if ($window(@n.popup)) close -@ @n.popup + if ($chr(45) isin $did(popups,40)) && ($did(popups,250).state == 0) { var %x = $calc($window(-1).w - (%w + $remove($did(popups,40),-))) } + elseif ($chr(45) !isin $did(popups,40)) && ($did(popups,250).state == 0) { var %x = $did(popups,40) } + elseif ($did(popups,250).state == 1) { var %x = $calc($window(-1).w / 2 - (%w /2)) } + if ($chr(45) isin $did(popups,41)) && ($did(popups,251).state == 0) { var %y = $calc($window(-1).h - $remove($did(popups,41),-) ) } + elseif ($chr(45) !isin $did(popups,41)) && ($did(popups,251).state == 0) { var %y = $did(popups,41) } + elseif ($did(popups,251).state == 1) { var %y = $calc($window(-1).h / 2 - (25+ %h)) } + window -hdfonp +dL @n.popup %x %y %w %h + window -o @n.popup + drawfill @n.popup $color(background) 0 1 1 + drawtext -o @n.popup $color(highlight) tahoma 10 4 2 Preview + drawtext -o @n.popup $color(info) tahoma 10 $calc(%w -51) 2 $time + drawtext @n.popup $color(normal) $window(status window).font $window(status window).fontsize 4 20 %text + drawrect @n.popup $color(normal) 0 0 0 %w %h + if ($timerncpopup) .timerncpopup off + .timerncpopup -oi 1 $iif($ncfg(popup_timeout),$ifmatch,6) close -@ @n.popup +} +on *:dialog:popups:sclick:250:{ + if ($did(popups,250).state == 1) did -b popups 40 + else did -e popups 40 +} +on *:dialog:popups:sclick:251:{ + if ($did(popups,251).state == 1) did -b popups 41 + else did -e popups 41 +} + +dialog rcon_pass { + title "Rcon" + size -1 -1 83 43 + option dbu + button "OK", 1, 52 32 30 10, default ok + edit "", 2, 0 10 82 11, pass + check "Save", 3, 1 22 25 10 + text "Password:", 4, 1 2 31 7 +} +on *:dialog:rcon_pass:init:0:{ + if ($ncfg(rcon_password_save) == 1) { + did -c rcon_pass 3 + if ($ncfg(rcon_password)) did -a rcon_pass 2 $ifmatch + } + did -f rcon_pass 2 +} +on *:dialog:rcon_pass:sclick:1:{ + if ($did(rcon_pass,2).text) { + set %rcon.pass $ifmatch + if ($did(rcon_pass,3).state == 1) { + w_ncfg rcon_password %rcon.pass + w_ncfg rcon_password_save 1 + } + else { + w_ncfg rcon_password_save o + w_ncfg rcon_password Ã¥ + } + if (%rcon.pass) { + sockudp -k rcon 5000 %rcon.ip %rcon.port ÿÿÿÿ $+ challenge rcon $+ $lf + .timerrcon 1 1 sockclose rcon* + } + } +} + + +dialog exportlog { + title "Saving log..." + icon $scriptdiri.dll,18 + size -1 -1 50 10 + option dbu + text "", 1, 1 6 50 7, center + button "-", 2, 300 300 30 10, disable ok +} +On *:DIALOG:exportlog:init:0:{ + n.mdx SetMircVersion $version + n.mdx MarkDialog $dname + n.mdx SetDialog $dname style dlgframe +} +dialog tsettings { + title "Theme settings" + size -1 -1 89 37 + option dbu + icon $scriptdirdll\i.dll, 22 + check "Apply theme colors for nick list", 1, 2 2 84 10, + check "Apply theme fonts", 2, 2 12 62 10, + button "OK", 100, 51 25 37 11, ok +} +on *:dialog:tsettings:init:0:{ + n.ds cr 1 nicklist_use_themed_colors + n.ds cr 2 use_theme_fonts +} +on *:dialog:tsettings:sclick:1:n.ds cw 1 nicklist_use_themed_colors +on *:dialog:tsettings:sclick:2:n.ds cw 2 use_theme_fonts +dialog tedit { + title "tedit" + size -1 -1 169 228 + option dbu + icon $scriptdirdll\i.dll,16 + box "Colors", 76, 3 25 163 129 + box "Style", 75, 3 155 163 58 + box "Basics", 77, 3 1 163 22 + edit "", 1, 24 8 50 11, autohs + edit "", 2, 93 8 67 11, autohs + edit "", 3, 7 43 155 95, multi return autovs vsbar + button "Get current colors", 6, 87 139 75 11 + edit "", 4, 8 178 153 11, autohs + text "Name:", 12, 7 10 17 8 + text "Info:", 13, 79 10 13 8 + combo 5, 71 163 90 60, drop + text "Select item:", 7, 7 165 31 8 + text "", 8, 9 192 152 17 + button "Save as", 11, 91 216 37 11 + button "Cancel", 10, 129 216 37 11, cancel + text "Tip: setup colors using mIRC's color dialog (Alt+k)", 9, 8 34 143 8 +} +on *:dialog:tedit:init:0:{ + var %x = $+(",$scriptdirtema\,%tedit,.tem,"), %i = 3, %r + if ($exists(%x)) { + dialog -t tedit Theme editor: %tedit + did -a tedit 1 $gettok($read(%x,nw,alias tname*),4,32) + did -a tedit 2 $right($read(%x,1),-1) + while (%r != $chr(125) && (%i < 100)) { + var %r = $read(%x,n,%i) + did -a tedit 3 %r $+ $crlf + inc %i + } + did -d tedit 3 $calc($did(tedit,3).lines -1) + did -a tedit 5 - Theme style: + did -a tedit 5 Me style + did -a tedit 5 Nick style + did -a tedit 5 Bracket style 1 + did -a tedit 5 Bracket style 2 + did -a tedit 5 Quote style + did -a tedit 5 Prefix + did -a tedit 5 Timestamp + did -a tedit 5 Font + did -a tedit 5 - Nicklist colors: + did -a tedit 5 Me color + did -a tedit 5 Op color + did -a tedit 5 Voice color + did -a tedit 5 Regular color + set %tedit.me.style $gettok($read(%x,nw,*me.style*),4-,32) + set %tedit.nick.style $gettok($read(%x,nw,*nick.style*),4-,32) + set %tedit.par.style $gettok($read(%x,nw,*par.style*),4-,32) + set %tedit.bracket.style $gettok($read(%x,nw,*bracket.style*),4-,32) + set %tedit.pre $gettok($read(%x,nw,*pre*),4-,32) + set %tedit.quote.style $gettok($read(%x,nw,*quote.style*),4-,32) + set %tedit.ttimestamp $gettok($read(%x,nw,*ttimestamp*),4-,32) + set %tedit.tfont $gettok($read(%x,nw,*tfont*),4-,32) + set %tedit.me.clr $gettok($read(%x,nw,*me.clr*),4-,32) + set %tedit.op.clr $gettok($read(%x,nw,*op.clr*),4-,32) + set %tedit.voice.clr $gettok($read(%x,nw,*voice.clr*),4-,32) + set %tedit.normal.clr $gettok($read(%x,nw,*normal.clr*),4-,32) + } +} +on *:dialog:tedit:sclick:5:{ + if ($did(tedit,5)) { + var %x = $replace($replace($did(tedit,5),bracket style 1,par.style,bracket style 2,bracket.style,prefix,pre,timestamp,ttimestamp,font,tfont,me color,me.clr,op color,op.clr,voice color,voice.clr,regular color,normal.clr),$chr(32),.) + var %f = $+($scriptdirtema\,%tedit,.tem) + did -ar tedit 4 %tedit. [ $+ [ %x ] ] + did -ar tedit 8 $gettok($read($scriptdirtxt\tedit.txt,nw,%x $+ *),2-,44) + } +} +on *:dialog:tedit:edit:4:{ + if ($did(tedit,4)) && (- !isin $did(tedit,5)) && (- !isin $did(tedit,5)) { + var %x = $replace($replace($did(tedit,5),bracket style 1,par.style,bracket style 2,bracket.style,prefix,pre,timestamp,ttimestamp,font,tfont,me color,me.clr,op color,op.clr,voice color,voice.clr,regular color,normal.clr),$chr(32),.) + set %tedit. [ $+ [ %x ] ] $did(tedit,4) + } +} +on *:dialog:tedit:sclick:6:{ + did -r tedit 3 + color_gen +} +on *:dialog:tedit:sclick:11:{ + if (!$did(tedit,1)) return + var %x = $n.input(Enter theme filename:,$replace($did(tedit,1),/,-) $+ .tem) + if (%x) { + var %x = $qt($scriptdirtema\ $+ %x $+ $iif($right(%x,4) != .tem,.tem)), %i = 1 + if ($exists(%x)) && (!$n.input(Overwrite $nopath(%x) $+ ?,y/n)) return + write -c %x $chr(59) $+ $did(tedit,2) + write %x alias tclr $chr(123) + while (%i <= $did(tedit,3).lines) { + write %x $did(tedit,3,%i) + inc %i + } + write %x $chr(125) + write %x alias tname return $did(tedit,1) + write %x alias nick.style return %tedit.nick.style + write %x alias me.style return %tedit.me.style + write %x alias par.style return %tedit.par.style + write %x alias bracket.style return %tedit.bracket.style + if (%tedit.quote.style) write %x alias quote.style return %tedit.quote.style + write %x alias pre return %tedit.pre + write %x alias ttimestamp return %tedit.ttimestamp + if (%tedit.tfont) write %x alias tfont return %tedit.tfont + write %x alias me.clr return $replace(%tedit.me.clr,z,$chr(48)) + write %x alias op.clr return $replace(%tedit.op.clr,z,$chr(48)) + write %x alias voice.clr return $replace(%tedit.voice.clr,z,$chr(48)) + write %x alias normal.clr return $replace(%tedit.normal.clr,z,$chr(48)) + if ($n.input(Theme saved as $nopath(%x) $+ . $crlf $crlf $+ Do you want to $iif($nopath($isalias(tname).fname) == $nopath(%x),reload,load) the theme now?,y/n)) { + set %generatepreview 1 + if ($nopath(%x) == $nopath($isalias(tname).fname)) theme -r + else theme $left($nopath(%x),-4) + if ($dialog(tema)) dialog -x tema + } + dialog -x tedit + } +} +dialog tema { + title "Theme (/theme)" + size -1 -1 197 151 + option dbu + icon $scriptdirdll\i.dll, 17 + icon 2, 1 22 193 105, $scriptdirtema\blank.png, 0 + combo 4, 1 9 83 117, sort size drop + button "Change", 3, 164 8 30 11 + button "Edit theme", 12, 1 139 45 11 + button "Settings", 11, 82 139 37 11 + button "OK", 5, 120 139 37 11, ok + button "Close", 6, 158 139 37 11, cancel + text "Theme:", 9, 1 1 25 8 + text "Font:", 10, 165 1 25 7 + text "", 13, 2 129 139 9 + text "", 1, 148 129 45 9, right +} +on *:dialog:tema:init:0:{ + did -ar tema 13 $findfile($scriptdirtema,*.tem,0,1,did -a tema 4 $replace($left($nopath($1-),-4),-,: $chr(32)) ) themes available + var %x = $left($nopath($isalias(tname).fname),-4) + did -c tema 4 $n.cbgn(tema,4,$replace(%x,-,: $+ $chr(32))) + if ($exists($+(",$scriptdirtema\,%x,.bmp,"))) did -g tema 2 $+(",$mircdirscripts\tema\,%x,.bmp,") + elseif ($exists($+(",$scriptdirtema\,%x,.png,"))) did -g tema 2 $+(",$mircdirscripts\tema\,%x,.png,") + did -a tema 1 $round($calc($file($qt($mircdirscripts\tema\ $+ %x $+ .tem)).size /1024),2) KB +} +on *:dialog:tema:sclick:11:dlg tsettings +on *:dialog:tema:sclick:12:tedit $replace($did(tema,4).seltext,: $+ $chr(32),-) +on *:dialog:tema:sclick:4:{ + var %x = $replace($did(tema,4).seltext,: $+ $chr(32),-) + if ($exists($+(",$mircdirscripts\tema\,%x,.bmp,"))) did -g tema 2 $+(",$scriptdirtema\,%x,.bmp,") + elseif ($exists($+(",$scriptdirtema\,%x,.png,"))) did -g tema 2 $+(",$scriptdirtema\,%x,.png,") + else did -g tema 2 $qt($scriptdirtema\blank.png) + did -a tema 13 $right($read($qt($scriptdirtema\ $+ %x $+ .tem),1),-1) + did -a tema 1 $round($calc($file($qt($scriptdirtema\ $+ %x $+ .tem)).size /1024),2) KB +} +on *:dialog:tema:sclick:5:{ + if ($did(tema,4).seltext) .timer -m 1 300 byt-tema $replace($did(tema,4).seltext,: $+ $chr(32),-) +} +on *:dialog:tema:sclick:3:fc +dialog font { + title "Font settings (/fc)" + size -1 -1 103 91 + option dbu + icon $scriptdirdll\i.dll,16 + text "Font:", 2, 2 2 14 8 + text "Size:", 3, 65 2 23 8 + combo 1, 1 10 61 68, edit + combo 4, 65 10 24 54, edit + check "Bold", 7, 65 64 24 11, push + button "?", 8, 90 10 12 11 + button "Set", 5, 41 79 30 11, ok + button "Cancel", 6, 72 79 30 11, cancel + button "Default", 9, 1 79 31 11 +} +on *:dialog:font:init:0:{ + if ($window(status window).font) did -a font 1 $ifmatch + if ($window(status window).fontbold) did -c font 7 + if ($window(status window).fontsize) did -a font 4 $ifmatch + did -c font 4 1 + did -c font 1 1 + did -a font 1 Verdana + did -a font 1 Fixedsys + did -a font 1 Tahoma + did -a font 1 Arial + did -a font 1 Courier New + did -a font 1 Trebuchet MS + did -a font 1 Terminal + did -a font 4 9 + did -a font 4 10 + did -a font 4 11 + did -a font 4 12 + did -a font 4 -8 +} +on *:dialog:font:sclick:9:{ + did -c font 1 4 + did -c font 4 4 +} +on *:dialog:font:sclick:8:.echo -qg $n.input(Use negative size values (eg: -8) to match default font sizes (pt) instead of px.,info) +on *:dialog:font:sclick:5:{ + if ($did(font,7).state == 1) var %p = -zb + else var %p = -z + font %p $did(4).text $did(1).text +} +alias fc { + if ($2) { + font -z $1- + } + else dlg font font +} + +dialog np { + title "Sound/highlight settings (/nq)" + size -1 -1 149 119 + option dbu + icon $scriptdirdll\i.dll, 22 + box "On nick", 1, 2 2 145 36 + check "Enable 'beep' sound", 3, 8 11 61 10 + check "Highlight nick matches with color:", 2, 8 23 89 10 + combo 9, 99 22 21 110, limit 2 drop + button "Show", 14, 122 22 20 11 + box "On query/msg", 4, 2 40 145 64 + check "Enable Sound", 5, 8 48 49 10 + radio "Default", 6, 12 58 35 10 + radio "Internal mIRC beep", 7, 12 69 63 10 + radio "Custom:", 8, 12 80 30 10 + edit "", 10, 43 79 100 11, read autohs + button "...", 11, 117 91 25 10 + check "Only play sound when query opens", 13, 8 92 101 10 + button "Exclude...", 15, 72 107 37 11 + button "OK", 12, 110 107 37 11, ok +} +On *:DIALOG:np:init:0:{ + if ($ncfg(query_sound_onopen) == 1) { did -c np 13 } + if ($ncfg(nickpip) == 1) { did -c np 3 } + if ($ncfg(nickbar) == 1) { did -c np 2 } + if ($ncfg(privpip) == 1) { did -c np 5 } + if ($ncfg(highlight_nick_color)) { did -a np 9 $ncfg(highlight_nick_color) } + if ($ncfg(privljud) == beep) { did -c np 7 } + elseif ($ncfg(privljud) == psljud) { did -c np 6 } + else { did -c np 8 } + did -a np 10 $right($ncfg(privljud),-6) + did -a np 9 - + var %i = 0 + while (%i < 16) { + did -a np 9 %i + inc %i + } + did -c np 9 1 +} +on *:dialog:np:sclick:14:n.preview np 1,0 0 0,1 1 0,2 2 0,3 3 0,4 4 0,5 5 0,6 6 0,7 7 1,8 8 1,9 9 0,10 10 1,11 11 0,12 12 0,13 13 0,14 14 1,15 15 $+ $chr(160) +on *:dialog:np:sclick:15:{ + if ($n.input(Disable highlight for these addresses/nicks $+ $c44 separate with comma ( $+ $c44 $+ ) (type off to disable): $crlf $crlf $+ Example: *bot.com $+ $c44 *!*@address.net $+ $c44 nick!*,$ncfg(no_highlight))) w_ncfg no_highlight $ifmatch +} +on *:dialog:np:sclick:12:{ + if ($did(np,3).state == 1) w_ncfg nickpip 1 + else { w_ncfg nickpip o } + if ($did(np,2).state == 1) w_ncfg nickbar 1 + else { w_ncfg nickbar o } + if ($did(np,13).state == 1) w_ncfg query_sound_onopen 1 + else { w_ncfg query_sound_onopen o } + if ($did(np,5).state == 1) w_ncfg privpip 1 + else { w_ncfg privpip o } + if ($did(np,6).state == 1) w_ncfg privljud psljud + if ($did(np,7).state == 1) w_ncfg privljud beep + if ($did(np,9).text isnum 0-16) w_ncfg highlight_nick_color $did(np,9).text + +} +On *:DIALOG:np:sclick:11:{ + if ($sfile(*.wav,Select sound file)) { + w_ncfg privljud splay $ifmatch + did -c np 8 + did -u np 6,7 + did -ar np 10 $remove($ncfg(privljud),splay) + } +} +dialog way { + title "Away" + size -1 -1 115 53 + option dbu + icon $scriptdirdll\i.dll, 17 + text "Msg:", 1, 1 17 11 8 + text "Nick:", 5, 1 5 12 8 + combo 10, 15 3 70 100, edit drop + button "?", 3, 87 3 13 10 + button ">", 4, 102 3 12 10 + combo 11, 15 15 85 100, edit drop + button ">", 6, 102 15 12 10 + check "Set away on all servers", 12, 3 27 71 11, + check "Change nick", 2, 74 27 40 11, + button "Set away", 100, 39 41 37 11, ok + button "Close", 101, 77 41 37 11, cancel + +} +On *:DIALOG:way:init:0:{ + if ($ncfg(awaynbyte) == 1) { did -c way 2 } + if ($scon(0) < 2) { did -b way 12 } + if ($ncfg(awayallanets) == 1) { did -c way 12 } + loadbuf -o way 10 config\awaynick.txt + loadbuf -o way 11 config\awaymsg.txt + did -c way 10 1 + did -c way 11 1 +} +On *:DIALOG:way:sclick:3:.echo -qg $n.input(If you use [nick] it will be replaced with your nickname when going away. $crlf $crlf $+ eg: [nick]|away would result in $me $+ |away,info) +On *:DIALOG:way:sclick:4:{ txt config\awaynick.txt | set %txtload loadbuf -o way 10 config\awaynick.txt } +On *:DIALOG:way:sclick:6:{ txt config\awaymsg.txt | set %txtload loadbuf -o way 11 config\awaymsg.txt } +On *:DIALOG:way:sclick:100:{ + if ($did(way,2).state == 1) { + w_ncfg awaynbyte 1 + var %x = n + } + else { + var %x = x + w_ncfg awaynbyte o + } + if ($did(way,12).state == 1) { + w_ncfg awayallanets 1 + var %c = scon -at1 _away + } + else { + w_ncfg awayallanets o + var %c = _away + } + if ($did(way,10).text) { + n.history config\awaynick.txt $did(way,10).text + var %nick = $replace($did(way,10).text,[nick],$me) + } + if ($did(way,11).text) { + n.history config\awaymsg.txt $did(way,11).text + var %msg = $did(way,11).text + } + %c %x %nick %msg +} +alias _away { + if (!$2) return + if ($1 == n) { + set %oldnick. [ $+ [ $cid ] ] $me + tnick $2 + } + if ($3) away $3- +} +alias _back { + if (%oldnick. [ $+ [ $cid ] ] ) tnick %oldnick. [ $+ [ $cid ] ] + unset %oldnick. [ $+ [ $cid ] ] + away +} +dialog back { + title "Back" + size -1 -1 77 45 + option dbu + icon $scriptdirdll\i.dll, 17 + check "Don't change nick", 1, 2 1 90 10, + check "All networks", 5, 2 11 47 10, + button "Back", 3, 1 33 37 11, ok + button "Cancel", 4, 39 33 37 11, cancel +} +on *:DIALOG:back:init:0:{ + if ($ncfg(awaynbyte) == 1) { + if ($awaynet < 2) if (%oldnick. [ $+ [ $cid ] ] ) did -a back 1 Don't change nick to %oldnick. [ $+ [ $cid ] ] + else did -a back 1 Don't change nicks + } + else did -b back 1 + if ($ncfg(awayallanets) == 1) did -c back 5 +} +on *:DIALOG:back:sclick:3:{ + if ($did(back,1).state == 1) unset %oldnick.* + $iif($did(back,5).state == 1,scon -at1) _back +} +dialog 1st { + title "Minimize" + size -1 -1 125 67 + option dbu + icon $scriptdirdll\i.dll, 17 + radio "Taskbar:", 2, 7 15 31 10, + radio "Tray:", 3, 7 34 27 10, + icon 4, 40 12 78 16, $scriptdirimg\taskbar.png, 0, noborder + icon 5, 40 31 78 16, $scriptdirimg\tray.png, 0, noborder + button "OK", 6, 85 54 37 11, ok + box "Minimize mIRC/nbs-irc to:", 7, 3 2 119 49 +} +On *:dialog:1st:init:0:did -c 1st 2 +On *:dialog:1st:sclick:6:{ + if ($did(1st,2).state == 1) tray -t0 + else tray -t1 +} +dialog unet { + title "UnderNet setup (/undernet)" + size -1 -1 107 81 + option dbu + icon $scriptdirdll\i.dll, 17 + box "X Auth (/auth)", 1, 2 2 103 65 + edit "", 5, 36 10 64 11, autohs + edit "", 6, 36 22 64 11, pass autohs + check "Auth automatically on connect", 4, 6 36 88 9, + check "Hide host (mode +x)", 11, 6 45 67 10, + check "Auto join channel if invited by X", 15, 6 54 92 10, + text "Auth nick:", 7, 6 12 28 8 + text "Password:", 9, 6 23 27 8 + button "Auth now", 10, 29 69 37 11 + button "OK", 3, 68 69 37 11, ok +} +On *:dialog:unet:init:0:{ + var %q = $ncfg(undernet_authpass), %k = $calc($len(%q) +1), %x = 1, %r + while (%k > 1) { + var %k = $calc(%k -3), %r = %r $+ $chr($calc($mid(%q,%k,3) + %x)) + inc %x 1 + } + n.ds cr 15 undernet_bot_autojoin + if ($ncfg(undernet_authnick)) did -a unet 5 $ifmatch + if ($ncfg(undernet_authpass)) did -a unet 6 %r + n.ds cr 4 undernet_autoauth + n.ds cr 11 undernet_mode+x +} +On *:dialog:unet:sclick:10:if (($did(unet,5).text) && ($did(unet,6).text)) { .msg x@channels.undernet.org login $did(unet,5).text $did(unet,6).text | n.echo normal -atg sending auth $par($did(unet,5).text) } +On *:dialog:unet:sclick:3:{ + if ($did(unet,5).text) w_ncfg undernet_authnick $ifmatch + if ($did(unet,6).text) w_ncfg undernet_authpass $bfe($ifmatch) + n.ds cw 4 undernet_autoauth + n.ds cw 11 undernet_mode+x 1 + n.ds cw 15 undernet_bot_autojoin +} + +dialog qnet { + title "QuakeNet setup (/quakenet)" + size -1 -1 107 90 + option dbu + icon $scriptdirdll\i.dll, 17 + box "Q Auth (/auth)", 1, 2 2 103 74 + edit "", 5, 36 10 64 11, autohs + edit "", 6, 36 22 64 11, pass autohs + check "Auth automatically on connect", 4, 6 36 88 9, + check "Hide host (mode +x)", 11, 6 45 67 10, + check "Use challenge auth (more secure)", 14, 6 54 94 10, + check "Auto join channel if invited by Q/L", 15, 6 63 94 10, + text "Auth nick:", 7, 6 12 28 8 + text "Password:", 9, 6 23 27 8 + button "Auth now", 10, 29 78 37 11 + button "OK", 3, 68 78 37 11, ok +} +On *:dialog:qnet:init:0:{ + var %q = $ncfg(authpass), %k = $calc($len(%q) +1), %x = 1, %r + while (%k > 1) { + var %k = $calc(%k -3), %r = %r $+ $chr($calc($mid(%q,%k,3) + %x)) + inc %x 1 + } + n.ds cr 14 use_challengeauth + n.ds cr 15 quakenet_bot_autojoin + if ($ncfg(authnick)) did -a qnet 5 $ifmatch + if ($ncfg(authpass)) did -a qnet 6 %r + n.ds cr 4 autoauth + n.ds cr 11 mode+x +} +On *:dialog:qnet:sclick:10:if (($did(qnet,5).text) && ($did(qnet,6).text)) { .msg Q@CServe.quakenet.org auth $did(qnet,5).text $did(qnet,6).text | n.echo normal -atg sending auth $par($did(qnet,5).text) } +On *:dialog:qnet:sclick:3:{ + if ($did(qnet,5).text) { w_ncfg authnick $ifmatch } + if ($did(qnet,6).text) { w_ncfg authpass $bfe($ifmatch) } + if ($did(qnet,4).state == 1) { w_ncfg autoauth 1 } + else { w_ncfg autoauth o } + if ($did(qnet,11).state == 1) { w_ncfg mode+x 1 } + else { w_ncfg mode+x o } + n.ds cw 14 use_challengeauth + n.ds cw 15 quakenet_bot_autojoin +} +dialog misc { + title "Miscellaneous settings (/misc)" + size -1 -1 232 154 + option dbu + icon $scriptdirdll\i.dll, 22 + box "Titlebar", 22, 3 119 110 21 + box "Ban mask", 19, 116 42 114 35 + box "Minimize", 13, 116 110 114 30 + box "Functionality", 27, 3 42 110 75 + box "When kicked", 28, 116 1 114 39 + box "Edit messages", 6, 116 78 114 30 + box "General", 16, 3 1 110 39 + check "Always show mode prefix (@%+ etc)", 15, 7 9 100 10 + check "Reclaim nick after dis/reconnect", 12, 7 18 102 10 + check "Check for new versions", 25, 7 27 100 10 + check "Use own window for whois replys", 18, 7 50 99 10 + check "Open whois window inside mIRC", 17, 7 59 99 10 + check "Use own window for highlights", 21, 7 68 97 10 + check "Enable extended toolbar", 5, 7 77 79 10 + check "Enable extended channel central", 8, 7 86 99 10 + check "Enable automatic lag check", 29, 7 95 97 10 + check "Show 'day changed' at 0:00", 30, 7 104 82 10 + check "Show version", 23, 7 127 54 10 + check "Show lag", 24, 67 127 36 10 + check "Auto whois the 'kicker'", 26, 121 9 92 10 + check "Auto rejoin channel, wait", 1, 121 18 90 10 + edit "", 9, 129 28 15 10, autohs + text "seconds", 10, 145 29 23 8 + button "?", 11, 214 26 13 11 + combo 20, 122 61 102 83, drop + button "Quit msgs", 2, 120 89 34 11 + button "Kick msgs", 4, 156 89 34 11 + button "Slaps", 3, 192 89 34 11 + button "Change minimize settings", 14, 120 122 106 11 + button "OK", 7, 193 142 37 11, ok + text "Use this mask when banning:", 31, 121 52 76 8 +} +on *:dialog:misc:init:0:{ + if ($ncfg(ar_time) isnum) did -a misc 9 $ncfg(ar_time) + if ($ncfg(whois) == @whois) did -c misc 18 + did -a misc 20 *!ident@host.com $str( ,99) z + did -a misc 20 *!*ident@host.com (default) $str( ,99) 1 + did -a misc 20 *!*@host.com $str( ,99) 2 + did -a misc 20 *!*ident@*.com $str( ,99) 3 + did -a misc 20 *!*@*.com $str( ,99) 4 + did -a misc 20 nick!ident@host.com $str( ,99) 5 + did -a misc 20 nick!*ident@host.com $str( ,99) 6 + did -a misc 20 nick!*@host.com $str( ,99) 7 + did -a misc 20 nick!*ident@*.com $str( ,99) 8 + did -a misc 20 nick!*@*.com $str( ,99) 9 + if ($ncfg(ban_mask) isnum) did -c misc 20 $calc($ifmatch +1) + elseif ($ncfg(ban_mask) == z) did -c misc 20 1 + n.ds cr 26 whois_on_kick + n.ds cr 1 autorejoin + n.ds cr 21 nickwin + n.ds cr 8 newcc + n.ds cr 5 exttb + n.ds cr 15 modeprefix + n.ds cr 17 whois_inside + n.ds cr 23 titlebar_version + n.ds cr 24 titlebar_lag + n.ds cr 12 reclaim_nick + n.ds cr 25 version_check + n.ds cr 29 check_lag + n.ds cr 30 show_daychanged + if ($group(#url) == on) did -c misc 32 +} +On *:dialog:misc:sclick:14:dlg 1st +On *:dialog:misc:sclick:11:var %x = $n.input(mIRC's built in auto-rejoin must be disabled for this to work properly: $crlf $crlf $+ Options (Alt+o) -> IRC -> uncheck "Rejoin channel when kicked",info) +On *:dialog:misc:sclick:33:var %x = $n.input(Enable this if URLs don't load in your default browser. $crlf $crlf $+ Note: this may not work with URLs containing international characters $+ $c44 eg: Ã¥ ä ö.,info) +On *:dialog:misc:sclick:2:unset %txtload | txt config\quits.txt +On *:dialog:misc:sclick:3:unset %txtload | txt config\slaps.txt +On *:dialog:misc:sclick:4:unset %txtload | txt config\kicks.txt +On *:dialog:misc:sclick:7:{ + n.ds cw 1 autorejoin + n.ds cw 8 newcc + n.ds cw 15 modeprefix + n.ds cw 17 whois_inside + n.ds cw 21 nickwin + n.ds cw 23 titlebar_version + n.ds cw 24 titlebar_lag + n.ds cw 12 reclaim_nick + n.ds cw 25 version_check + n.ds cw 26 whois_on_kick + n.ds cw 29 check_lag + n.ds cw 30 show_daychanged + if ($did(misc,29).state == 0) unset %lag.* + if ($gettok($did(misc,20),-1,160)) w_ncfg ban_mask $ifmatch + if ($did(misc,9).text isnum) w_ncfg ar_time $did(misc,9).text + if ($did(misc,18).state == 1) w_ncfg whois @whois + else w_ncfg whois -a + titleupdate +} +on *:dialog:misc:sclick:5:{ + if ($did(misc,5).state == 1) { + w_ncfg exttb 1 + n.toolbar + } + else { + w_ncfg exttb o + toolbar -r + if ($dialog(tb)) dialog -x tb + } +} +dialog mp3s { + title "Song announce (/sa, /np)" + size -1 -1 203 165 + option dbu + icon $scriptdirdll\i.dll, 17 + tab "Winamp/MM", 20, 3 0 197 150 + box "Serving (max 3 sends)", 12, 8 97 188 32, tab 20 + box "Usage", 7, 8 51 188 45, tab 20 + text "", 6, 13 59 79 34, tab 20 + text "", 10, 94 59 100 34, tab 20 + check "Send file on request (5 min timeout)", 13, 13 105 98 10, tab 20 + edit "", 14, 151 105 42 11, tab 20 autohs + edit "", 17, 151 116 42 11, tab 20 autohs + text "Trigger:", 15, 130 106 21 9, tab 20 right + text "Limit upload speed (KB/s, 0 = unlimited): ~", 16, 37 117 114 8, tab 20 right + text "* Uses wa_link.dll wich may crash mIRC on some systems", 18, 10 132 145 8, tab 20 + text "** Does not work with MediaMonkey", 25, 10 140 141 8, tab 20 + tab "iTunes", 21 + box "Usage", 19, 8 51 188 39, tab 21 + text "", 23, 13 59 79 28, tab 21 + text "", 24, 94 59 100 28, tab 21 + check "Enable iTunes support instead of Winamp", 22, 9 93 150 10, tab 21 + button "OK", 3, 163 153 37 11, ok + radio "/say", 5, 14 37 24 10 + radio "/me", 4, 38 37 23 10 + edit "", 1, 12 24 181 11, autohs + button "Edit random", 11, 87 37 37 11 + button "Default", 9, 125 37 33 11 + button "Preview", 8, 159 37 33 11 + box "Display", 2, 8 16 188 35 +} +On *:dialog:mp3s:init:0:{ + if ($ncfg(mp3s)) { + if ($gettOK($ncfg(mp3s),1,32) == say) { + did -c mp3s 5 + did -a mp3s 1 $replace($right($ncfg(mp3s),-3),âbÃ¥ld,,âcÃ¥lÃ¥r,,âånderlajn,,âcläör,) + } + else { + did -c mp3s 4 + did -a mp3s 1 $replace($right($ncfg(mp3s),-2),âbÃ¥ld,,âcÃ¥lÃ¥r,,âånderlajn,,âcläör,) + } + } + if ($ncfg(mp3getcmd)) did -ar mp3s 14 $ifmatch + if ($ncfg(mp3maxcps)) did -ar mp3s 17 $replace($ifmatch,o,0) + n.ds cr 13 mp3serv + n.ds cr 22 itunes + did -a mp3s 6 [artist]*, [title]* and [album]* $crlf $+ [etime] (elapsed time) $crlf $+ [time] (total time) $crlf $+ [kbps] (bitrate, eg: 192 kbps) $crlf $+ [size] (eg: 4.7 MB) + did -a mp3s 10 [random] (random line, edit above) $crlf $+ [type] (filetype, eg: mp3) $crlf $+ [filename] (eg: asd.mp3) $crlf $+ [path]/[folder] (eg: c:\music\) $crlf $+ [mp3]** (as shown on winamp's titlebar) + did -a mp3s 23 [artist], [title] and [album] $crlf $+ [etime] (elapsed time) $crlf $+ [time] (total time) $crlf $+ [kbps] (bitrate, eg: 192 kbps) + did -a mp3s 24 [random] (random line, edit above) $crlf $+ [type] (filetype, eg: mp3) $crlf $+ [mp3] (artist - title) + if ($ncfg(itunes) == 1) .timer -m 1 10 did -f mp3s 21 +} +On *:dialog:mp3s:sclick:11:txt config\mp3.txt +On *:dialog:mp3s:sclick:9:{ + did -ar mp3s 1 $iif($ncfg(itunes) == 1,iTunes,winamp) » [mp3] :: [time] + did -c mp3s 5 + did -u mp3s 4 +} +On *:dialog:mp3s:sclick,edit:8,1:{ + if ($did(mp3s,1).text) { + var %temp = $did(mp3s,1).text + n.preview mp3s $replace(%temp,[mp3],Artist - Song title,[type],mp3,[artist],Artist,[title],Song title,[album],Album,[time],3:12,[etime],1:54,[kbps],192 kbps,[size],4.7MB,[filename],04-artist-the_song.mp3,[path],$mircdir,[folder],folder name,[random],random line) + } +} +On *:dialog:mp3s:sclick:22:{ + n.ds cw 22 itunes + if ($did(mp3s,22).state == 1) did -ar mp3s 1 $replace($did(mp3s,1),winamp,iTunes) + else did -ar mp3s 1 $replace($did(mp3s,1),iTunes,winamp) +} +On *:dialog:mp3s:sclick:3:{ + if ($did(mp3s,13).state == 1) w_ncfg mp3serv 1 + else w_ncfg mp3serv o + if ($did(mp3s,17).text) { w_ncfg mp3maxcps $ifmatch | .dcc maxcps $calc($iif($ncfg(mp3maxcps) == o,0,$ncfg(mp3maxcps)) * 1024) } + else w_ncfg mp3maxcps o + if ($did(mp3s,14).text) w_ncfg mp3getcmd $ifmatch + else w_ncfg mp3getcmd none + if ($did(mp3s,5).state == 1) var %temp = say + else var %temp = me + if ($did(mp3s,1).text) var %temp2 = $ifmatch + w_ncfg mp3s %temp $replace(%temp2,,âbÃ¥ld,,âcÃ¥lÃ¥r,,âånderlajn,,âcläör) + +} +dialog hevent { + title "Hide events" + size -1 -1 77 47 + option dbu + icon $scriptdirdll\i.dll, 17 + check "Joins", 1, 3 11 26 10, + check "Parts", 2, 3 20 26 10, + check "Quits", 3, 31 11 26 10, + check "Nick changes", 4, 31 20 45 10, + text "Hide these events:", 5, 2 2 54 8 + button "OK", 6, 38 35 37 11, ok +} +on *:dialog:hevent:init:0:{ + if ($ehide(joins,%he.chan)) did -c hevent 1 + if ($ehide(parts,%he.chan)) did -c hevent 2 + if ($ehide(quits,%he.chan)) did -c hevent 3 + if ($ehide(nicks,%he.chan)) did -c hevent 4 + dialog -t hevent %he.chan +} +on *:dialog:hevent:sclick:*:{ + if ($did isnum 1-4) { + var %x = $replace($did,1,joins,2,parts,3,quits,4,nicks) + hideshow.event %he.chan %x + if ($ehide(%x,%he.chan)) did -c hevent $did + else did -u hevent $did + } + elseif ($did == 6) unset %he.chan +} +dialog input { + title "nbs-irc" + size -1 -1 129 65 + option dbu + icon $scriptdirdll\i.dll, 17 + edit "", 1, 2 39 125 11, result autohs + box "", 2, 2 0 125 36 + box "", 6, 2 0 125 50 + button "OK", 3, 53 53 37 11, ok + button "Cancel", 5, 91 53 37 11, cancel + text "", 4, 5 6 119 27 + text "", 10, 5 6 119 41 +} +on *:dialog:input:init:0:{ + did -a input 1 %n.input2 + if (%n.input2 == y/n) { + did -ar input 3 Yes + did -ar input 5 No + did -h input 1,2 + did -a input 10 %n.input1 + } + elseif (%n.input2 == info) { + did -ar input 5 OK + did -h input 1,2,3 + did -a input 10 %n.input1 + } + else { + did -h input 6,10 + did -a input 4 %n.input1 + did -c input 1 1 1 999 + } + unset %n.input? +} +dialog tb { + title "tåålbar" + size 1 1 700 0 + option pixels + button "", 1, 235 0 500 14 + button "", 2, 235 13 500 14 + combo 3, 0 2 183 290, size edit drop + icon 4, 187 4 16 16, $scriptdirdll\i.dll, 13, noborder + icon 5, 207 4 16 16, $scriptdirdll\i.dll, 14, noborder + button "", 6, 226 18 5 5, hide ok +} +on *:dialog:tb:init:0:{ + n.mdx SetMircVersion $version + n.mdx MarkDialog $dname + n.mdx SetDialog $dname style + dll $cit(scripts\dll\mdock61.dll) DockToolbar $dialog(tb).hwnd + dialog -s tb $iif($ncfg(toolbar_disable_winamp) == 1,361,439) 0 700 0 + n.mdx SetControlMDX tb 1 Text noPrefix > scripts\dll\mdx\ctl_gen.mdx + n.mdx SetControlMDX tb 2 Text noPrefix > scripts\dll\mdx\ctl_gen.mdx + n.mdx SetFont tb 1 11 400 tahoma + n.mdx SetFont tb 2 11 400 tahoma + titleupdate + loadbuf -o tb 3 config\kor.txt +} +on *:dialog:tb:sclick:3,4,6:{ + n.tb.enter + haltdef +} +alias n.tb.enter { + if ($did(tb,3)) { + if ($exists($did(tb,3)) || $isfile($did(tb,3) $+ .exe) || (*.exe iswm $did(tb,3)) || ($read($scriptdirtxt\runex.txt,w, * $+ $did(tb,3) $+ *))) run -p $did(tb,3) + else n.url $did(tb,3) + n.history config\kor.txt $did(tb,3) + loadbuf -ro tb 3 config\kor.txt + } + did -c tb 3 0 +} +on *:dialog:tb:close:0:.timer -m 1 0 dlg tb +on *:dialog:tb:sclick:5:{ + set %txtload loadbuf -o tb 3 config\kor.txt + set -u10 %tmp.txtfile 1 + txt config\kor.txt +} +dialog skydd { + title "Protections (/prot)" + size -1 -1 203 117 + option dbu + icon $scriptdirdll\i.dll, 22 + tab "Channel", 5, 2 -1 198 103 + combo 1, 50 16 83 66, tab 5 size drop + text "Channel:", 2, 8 18 25 8, tab 5 + button "Add", 29, 135 16 30 10, tab 5 + button "Remove", 30, 166 16 30 10, tab 5 + check "Flood:", 8, 8 32 27 10, tab 5 + edit "", 9, 62 31 14 11, tab 5 + edit "", 11, 100 31 13 11, tab 5 + check "Ban", 22, 141 32 21 10, tab 5 + button "Kick msg", 40, 166 31 30 11, tab 5 + check "Repeat:", 14, 8 45 32 10, tab 5 + edit "", 16, 62 44 14 11, tab 5 + check "Ban", 23, 141 45 24 10, tab 5 + button "Kick msg", 41, 166 44 30 11, tab 5 + check "Caps:", 24, 8 59 34 9, tab 5 + edit "", 25, 62 58 14 11, tab 5 + button "Kick msg", 42, 166 57 30 11, tab 5 + check "Advertising:", 28, 8 72 40 10, tab 5 + radio "#text", 34, 50 72 26 11, tab 5 + radio "/j #text, join #text", 35, 77 72 58 11, tab 5 + check "Ban", 32, 141 72 24 10, tab 5 + button "Kick msg", 43, 166 70 30 11, tab 5 + check "Punish ops/half-ops", 20, 8 87 66 11, tab 5 + edit "", 37, 113 87 17 11, tab 5 + text "lines in", 10, 78 33 21 8, tab 5 + text "seconds", 12, 115 33 20 8, tab 5 + text "max", 13, 50 33 12 8, tab 5 + text "max", 15, 50 46 12 8, tab 5 + text "repeats in 10 seconds", 17, 78 46 62 8, tab 5 + text "% caps (minimum 10 chars)", 26, 77 60 79 8, tab 5 + text "max", 27, 50 60 12 8, tab 5 + text "Ban for", 36, 94 89 19 8, tab 5 + text "minutes (0 = permanent)", 33, 132 89 63 8, tab 5 + tab "Personal", 7 + check "Enable ban protection", 3, 7 17 66 10, tab 7 + edit "", 4, 56 27 100 11, tab 7 autohs + text "Kick message:", 21, 17 28 37 8, tab 7 + text "Note: CTCP and highlight/query sound flood protection is always enabled.", 31, 7 48 94 14, tab 7 + text "", 99, 200 200 1 1 + button "OK", 6, 163 105 37 11, ok +} +On *:dialog:skydd:init:0:{ + prot.chanlist + n.ds cr 3 banskydd + if ($ncfg(bsmed)) did -a skydd 4 $ifmatch +} +On *:dialog:skydd:sclick:40-43:{ + var %x = $replace($did,40,flood,41,repeat,42,caps,43,advertising) + hadd prot $did(skydd,99) $+ %x $+ .kickmsg $$n.input(Enter kick message for %x violation:,$hget(prot,$+($did(skydd,99),%x,.kickmsg))) +} +On *:dialog:skydd:sclick:29:{ + var %x = $n.input(Enter channel to add:,$iif($active ischan,$active,$chr(35))) + if ($chr(35) isin %x) || ($chr(38) isin %x) { + prot.save + did -ar skydd 99 %x + did -i skydd 1 1 %x + hadd -m prot chans $hget(prot,chans) $chr(1) $+ %x + did -c skydd 1 1 + did -e skydd 8,14,24,28,9,11,22,16,23,25,32,34,35,37,20,40-43 + did -ar skydd 9 10 + did -ar skydd 11 5 + did -ar skydd 16 3 + did -ar skydd 25 70 + did -ar skydd 37 15 + did -c skydd 34 + did -u skydd 8,14,24,28,22,23,32,34,35,20 + } + elseif (!%x) return + else .echo -qg $n.input(Error: enter a valid channel.,info) +} +On *:dialog:skydd:sclick:30:{ + if ($did(skydd,1)) && ($n.input(Do you want to remove all settings for $did(skydd,1).seltext $+ ?,y/n)) { + did -r skydd 99 + if ($numtok($hget(prot,chans),32) == 1) hdel prot chans + hadd -m prot chans $remove($hget(prot,chans),$chr(1) $+ $did(skydd,1)) + hdel -w prot $did(skydd,1) $+ * + prot.chanlist + } +} + +On *:dialog:skydd:sclick:1:{ + if ($did(skydd,1)) { + prot.save + var %x = $did(skydd,1) + did -ar skydd 99 $did(skydd,1) + did -e skydd 8,14,24,28,9,11,22,16,23,25,32,34,35,37,20,40-43 + did -r skydd 9,11,16,25,37 + did -u skydd 8,14,24,28,22,23,32,34,35,20 + if ($hget(prot,$+(%x,flood)) == 1) did -c skydd 8 + if ($hget(prot,$+(%x,flood.lines)) isnum) did -ar skydd 9 $ifmatch + if ($hget(prot,$+(%x,flood.seconds)) isnum) did -ar skydd 11 $ifmatch + if ($hget(prot,$+(%x,flood.ban)) == 1) did -c skydd 22 + if ($hget(prot,$+(%x,repeat)) == 1) did -c skydd 14 + if ($hget(prot,$+(%x,repeat.max)) isnum) did -ar skydd 16 $ifmatch + if ($hget(prot,$+(%x,repeat.ban)) == 1) did -c skydd 23 + if ($hget(prot,$+(%x,caps)) == 1) did -c skydd 24 + if ($hget(prot,$+(%x,caps.maxpercent)) isnum) did -ar skydd 25 $ifmatch + if ($hget(prot,$+(%x,advertising)) == 1) did -c skydd 28 + if ($hget(prot,$+(%x,advertising.type)) == 1) did -c skydd 34 + else did -c skydd 35 + if ($hget(prot,$+(%x,advertising.ban)) == 1) did -c skydd 32 + if ($hget(prot,$+(%x,punishops)) == 1) did -c skydd 20 + if ($hget(prot,$+(%x,bantime)) isnum) did -ar skydd 37 $ifmatch + } +} +alias -l prot.save { + if ($did(skydd,99)) { + var %x = $ifmatch + if ($did(skydd,8).state == 1) hadd prot $+(%x,flood) 1 + else hdel prot $+(%x,flood) + if ($did(skydd,9).text isnum) hadd prot $+(%x,flood.lines) $ifmatch + else hdel prot $+(%x,flood.lines) + if ($did(skydd,11).text isnum) hadd prot $+(%x,flood.seconds) $ifmatch + else hdel prot $+(%x,flood.seconds) + if ($did(skydd,22).state == 1) hadd prot $+(%x,flood.ban) 1 + else hdel prot $+(%x,flood.ban) + if ($did(skydd,14).state == 1) hadd prot $+(%x,repeat) 1 + else hdel prot $+(%x,repeat) + if ($did(skydd,16).text isnum) hadd prot $+(%x,repeat.max) $ifmatch + else hdel prot $+(%x,repeat.max) + if ($did(skydd,23).state == 1) hadd prot $+(%x,repeat.ban) 1 + else hdel prot $+(%x,repeat.ban) + if ($did(skydd,24).state == 1) hadd prot $+(%x,caps) 1 + else hdel prot $+(%x,caps) + if ($did(skydd,25).text isnum) hadd prot $+(%x,caps.maxpercent) $ifmatch + else hdel prot $+(%x,caps.maxpercent) + if ($did(skydd,28).state == 1) hadd prot $+(%x,advertising) 1 + else hdel prot $+(%x,advertising) + if ($did(skydd,34).state == 1) hadd prot $+(%x,advertising.type) 1 + else hadd prot $+(%x,advertising.type) 2 + if ($did(skydd,32).state == 1) hadd prot $+(%x,advertising.ban) 1 + else hdel prot $+(%x,advertising.ban) + if ($did(skydd,20).state == 1) hadd prot $+(%x,punishops) 1 + else hdel prot $+(%x,punishops) + if ($did(skydd,37).text isnum) hadd prot $+(%x,bantime) $ifmatch + else hdel prot $+(%x,bantime) + } +} +alias -l prot.chanlist { + did -b skydd 8,14,24,28,9,11,22,16,23,25,32,34,35,37,20,40-43 + did -r skydd 1 + if ($hget(prot,chans)) { + tokenize 1 $ifmatch + var %i = 1 + while (%i <= $0) { + did -a skydd 1 [ $chr(36) $+ [ %i ] ] + inc %i + } + } +} + +on *:dialog:skydd:sclick:6:{ + prot.save + hsave -i prot config\config.ini protections + if ($did(skydd,4)) w_ncfg bsmed $did(skydd,4).text + n.ds cw 3 banskydd 1 + +} + + + + + +dialog pcw { + title "Seek cw/pcw" + size -1 -1 207 36 + option dbu + combo 2, 30 11 30 50, size edit drop + combo 3, 2 11 25 50, size edit drop + combo 5, 64 11 43 50, size edit drop + button "Close", 7, 176 25 30 10, ok + combo 8, 110 11 70 50, size edit drop + button "Seek", 9, 145 25 30 10 + text "players:", 10, 35 2 22 8 + text "pcw/cb:", 11, 2 2 19 8 + text "server:", 13, 65 2 20 8 + text "other:", 14, 111 2 25 8 + text "seperator:", 15, 176 2 27 8 + combo 16, 186 11 20 50, size edit drop + radio "say", 20, 68 26 20 10, + radio "amsg", 21, 89 26 24 10, + ;radio "amsg2", 1, 115 26 28 10, +} + +On *:dialog:pcw:init:0:{ + did -a pcw 2 5on5 + did -a pcw 2 4on4 + did -a pcw 2 3on3 + did -a pcw 2 2on2 + did -c pcw 2 1 + did -a pcw 3 pcw + did -a pcw 3 cb + did -c pcw 3 1 + did -a pcw 5 our server + did -a pcw 5 your server + did -a pcw 5 vÃ¥r server + did -a pcw 5 er server + did -c pcw 5 1 + did -a pcw 8 1 map + did -a pcw 8 /msg $me + did -a pcw 8 time: + did -a pcw 8 points: + did -a pcw 16 . + did -a pcw 16 - + did -a pcw 16 _ + did -a pcw 16 $chr(124) + did -c pcw 16 1 + if ($ncfg(smsg) == amsg) { w_ncfg smsg amsg | did -c pcw 21 } + else { w_ncfg smsg say | did -c pcw 20 } +} +On *:dialog:pcw:sclick:9:{ + $ncfg(smsg) $did(pcw,3).text $did(pcw,16).text $did(pcw,2).text $did(pcw,16).text $did(pcw,5).text $iif($did(pcw,8).text,$did(pcw,16).text) $did(pcw,8).text +} +on *:dialog:pcw:sclick:21:{ + if ($did(pcw,21).state == 1) { w_ncfg smsg amsg } + else { w_ncfg smsg say } +} +on *:dialog:pcw:sclick:20:{ + if ($did(pcw,20).state == 1) { w_ncfg smsg say } + else { w_ncfg smsg amsg } +} + +dialog om { + title "About" + size -1 -1 149 116 + option dbu + icon nbs.ico, 0 + text "", 20, 10 15 89 16 + text "", 30, 10 47 98 16 + icon 4, 125 9 16 16, nbs.ico, 0, noborder + link "nbs-irc.net", 2, 6 81 35 8 + link "nbs-irc.net/forum", 3, 6 88 51 8 + link "#nbs-irc", 5, 6 70 21 8 + text "on QuakeNet", 6, 28 70 38 8 + button "Close", 1, 110 103 37 11, ok + text "", 10, 7 7 80 8 + text "Thanks to:", 7, 7 39 75 8 + text "", 100, 6 105 99 8 +} +on *:dialog:om:init:0:{ + set -u1 %tmp.aboutblock 1 + did -a om 10 nbs-irc $n.version for mIRC 7+ + did -a om 20 Created and maintained by Dibbe with some help from haxninja + did -a om 30 Annorax, Maverick, Specter2, Leech, slanne and uK + n.showversion 100 + did -f om 10 +} + +alias n.showversion { + did -a $dname $1 Version: $n.version $iif($n.version.date, ( $+ $remove($ifmatch,-) $+ )) +} + +on *:dialog:om:sclick:2:if (!%tmp.aboutblock) n.url http://nbs-irc.net +on *:dialog:om:sclick:3:if (!%tmp.aboutblock) n.url http://nbs-irc.net/forum +on *:dialog:om:sclick:4:{ + set %about.icon 16 + .timer -m 20 70 about.iconchanger +} +alias about.iconchanger { + if ($dialog(om)) did -g om 4 %about.icon scripts\dll\i.dll + inc %about.icon + if (%about.icon == 18) set %about.icon 16 +} +on *:dialog:om:sclick:5:{ + if (!%tmp.aboutblock) { + if ($n.qnet) { + if ($n.input(join #nbs-irc now?,y/n)) join #nbs-irc + } + elseif ($n.input(Connect to irc.quakenet.org and join #nbs-irc now? $crlf $crlf $+ Note: this will open a new server window.,y/n)) server -m irc.quakenet.org -j #nbs-irc + } +} + +dialog autocon { + title "Auto connect" + size -1 -1 146 138 + option dbu + icon $scriptdirdll\i.dll, 17 + combo 2, 6 10 99 100, drop + check "Enabled", 17, 109 10 33 10, disable + edit "", 7, 44 38 96 11, disable autohs + edit "", 8, 44 50 96 11, disable pass autohs + text "Nickname:", 1, 6 64 25 8 + edit "", 9, 44 62 96 11, disable autohs + text "Alt. nickname:", 32, 6 75 34 8 + edit "", 10, 44 74 96 11, disable autohs + text "Ident/mail:", 25, 6 87 31 8 + edit "", 11, 44 86 96 11, disable autohs + text "Name:", 23, 6 99 25 8 + edit "", 12, 44 98 96 11, disable autohs + text "Password:", 15, 6 52 33 8 + box "Server", 4, 2 1 142 25 + box "Connect using:", 14, 2 29 142 95 + text "", 99, 200 200 1 1 + text "Server(:port):", 6, 6 39 35 8 + button "Clear", 5, 110 110 30 11, disable + text "(leave blank for default values)", 3, 6 112 80 8 + button "Connect", 16, 2 126 37 11, disable + button "?", 18, 39 126 10 11 + button "Connect to all", 13, 60 126 46 11 + button "OK", 100, 107 126 37 11, ok +} +On *:dialog:autocon:init:0:{ + var %i = 1 + while (%i < 11) { + var %a = $ncfg(auto_connect_ [ $+ [ %i ] $+ ] _server) + if (%a) && (%a != ânoneâ) did -a autocon 2 %i $+ : %a + else did -a autocon 2 %i $+ : (none) + inc %i 1 + } +} +on *:dialog:autocon:sclick:18:.echo -qg $n.input(Connects to the currently selected server. $crlf $crlf $+ Note: This will automatically create a new server window if the current one is in use.,info) +on *:dialog:autocon:sclick:5:{ + if ($n.input(Do you want to remove all settings for $did(autocon,2).seltext $+ ?,y/n)) { + did -r autocon 7-12 + did -u autocon 17 + } +} +on *:dialog:autocon:sclick:2:{ + auto_connect_save + if ($did(autocon,2).seltext) did -e autocon 7-12,17,5,16 + did -r autocon 7-12 + did -u autocon 17 + var %a = auto_connect_ $+ $gettok($did(autocon,2),1,58) + did -ar autocon 99 $gettok($did(autocon,2),1,58) + if ($ncfg( %a $+ _pass)) && ($ifmatch != ânoneâ) { + var %q = $ifmatch, %k = $calc($len(%q) +1), %x = 1, %r + while (%k > 1) { + var %k = $calc(%k -3), %r = %r $+ $chr($calc($mid(%q,%k,3) + %x)) + inc %x 1 + } + did -a autocon 8 %r + } + if ($ncfg( %a $+ _server)) && ($ifmatch != ânoneâ) did -a autocon 7 $ifmatch + if ($ncfg( %a $+ _nick)) && ($ifmatch != ânoneâ) did -a autocon 9 $ifmatch + if ($ncfg( %a $+ _anick)) && ($ifmatch != ânoneâ) did -a autocon 10 $ifmatch + if ($ncfg( %a $+ _ident)) && ($ifmatch != ânoneâ) did -a autocon 11 $ifmatch + if ($ncfg( %a $+ _name)) && ($ifmatch != ânoneâ) did -a autocon 12 $ifmatch + n.ds cr 17 %a $+ _on + did -r autocon 2 + var %i = 1 + while (%i < 11) { + var %a = $ncfg(auto_connect_ [ $+ [ %i ] $+ ] _server) + if (%a) && (%a != ânoneâ) did -a autocon 2 %i $+ : %a + else did -a autocon 2 %i $+ : (none) + inc %i 1 + } + did -c autocon 2 $did(autocon,99) +} +on *:dialog:autocon:sclick:100:auto_connect_save +alias -l auto_connect_save { + if ($did(autocon,99)) { + var %a = auto_connect_ $+ $did(autocon,99) + if ($did(autocon,7)) w_ncfg %a $+ _server $ifmatch + else w_ncfg %a $+ _server ânoneâ + if ($did(autocon,8)) w_ncfg %a $+ _pass $bfe($ifmatch) + else w_ncfg %a $+ _pass ânoneâ + if ($did(autocon,9)) w_ncfg %a $+ _nick $ifmatch + else w_ncfg %a $+ _nick ânoneâ + if ($did(autocon,10)) w_ncfg %a $+ _anick $ifmatch + else w_ncfg %a $+ _anick ânoneâ + if ($did(autocon,11)) w_ncfg %a $+ _ident $ifmatch + else w_ncfg %a $+ _ident ânoneâ + if ($did(autocon,12)) w_ncfg %a $+ _name $ifmatch + else w_ncfg %a $+ _name ânoneâ + n.ds cw 17 %a $+ _on + } +} +on *:dialog:autocon:sclick:13:{ + auto_connect_save + autoconnect_connectnow +} +on *:dialog:autocon:sclick:16:{ + if ($did(autocon,7)) { + if ($did(autocon,9)) var %nick = $ifmatch + else var %nick = $readini(mirc.ini,mirc,nick) + if ($did(autocon,10)) var %anick = $ifmatch + else var %anick = $readini(mirc.ini,mirc,anick) + if ($did(autocon,11)) var %ident = $ifmatch + else var %ident = $readini(mirc.ini,mirc,email) + if ($did(autocon,12)) var %name = $ifmatch + else var %name = $readini(mirc.ini,mirc,user) + server $iif(connect* iswm $status,-m) $gettok($did(autocon,7),1,32) $did(autocon,8) -i %nick %anick %ident %name + } +} +alias autoconnect_connectnow { + var %i = 1 + while (%i < 11) { + if ($ncfg(auto_connect_ [ $+ [ %i ] $+ ] _on) == 1) { + var %r + if ($ncfg(auto_connect_ [ $+ [ %i ] $+ ] _pass)) && ($ifmatch != ânoneâ) { + var %q = $ifmatch, %k = $calc($len(%q) +1), %x = 1, %r + while (%k > 1) { + var %k = $calc(%k -3), %r = %r $+ $chr($calc($mid(%q,%k,3) + %x)) + inc %x 1 + } + } + if ($ncfg(auto_connect_ [ $+ [ %i ] $+ ] _nick)) && ($ifmatch != ânoneâ) var %nick = $ifmatch + else var %nick = $readini(mirc.ini,mirc,nick) + if ($ncfg(auto_connect_ [ $+ [ %i ] $+ ] _anick)) && ($ifmatch != ânoneâ) var %anick = $ifmatch + else var %anick = $readini(mirc.ini,mirc,anick) + if ($ncfg(auto_connect_ [ $+ [ %i ] $+ ] _ident)) && ($ifmatch != ânoneâ) var %ident = $ifmatch + else var %ident = $readini(mirc.ini,mirc,email) + if ($ncfg(auto_connect_ [ $+ [ %i ] $+ ] _name)) && ($ifmatch != ânoneâ) var %name = $ifmatch + else var %name = $readini(mirc.ini,mirc,user) + if ($ncfg(auto_connect_ [ $+ [ %i ] $+ ] _server)) && ($ifmatch != ânoneâ) server $iif(connect* iswm $status,-m) $gettok($ncfg(auto_connect_ [ $+ [ %i ] $+ ] _server),1,32) [ %r ] -i %nick %anick %ident %name + } + inc %i 1 + } +} +dialog as { + title "AuthServ (/cas)" + icon $scriptdirdll\i.dll, 22 + size -1 -1 145 121 + option dbu + box "Options", 15, 2 68 141 39 + combo 2, 6 10 70 100, drop + button "Add", 5, 78 10 30 11 + button "Remove", 6, 109 10 30 11 + edit "", 8, 44 37 95 11 + text "Nickname:", 1, 6 38 25 8 + edit "", 9, 44 49 95 11, pass + text "Password:", 11, 6 50 25 8 + check "Automatically identify on request", 7, 6 75 97 10 + check "Use ghost command if nick is in use", 3, 6 85 102 10 + check "On authorized, set nick to +x", 16, 6 95 102 8 + box "Network", 4, 2 1 141 24 + box "Identify", 14, 2 28 141 36 + button "OK", 10, 105 108 37 11, ok + text "", 99, 200 200 1 1 +} +On *:dialog:as:init:0:{ + var %a = $findfile(config\,authserv-*.txt,0,1,did -a as 2 $mid($nopath($1-),10,-4)) + n.ds cr 7 authserv_on + n.ds cr 3 authserv_ghost + n.ds cr 16 authserv_hidemask +} +on *:dialog:as:sclick:7:n.ds cw 7 authserv_on +on *:dialog:as:sclick:3:n.ds cw 3 authserv_ghost +on *:dialog:as:sclick:16:n.ds cw 16 authserv_hidemask +on *:dialog:as:sclick:2:{ + authserv_save + did -ar as 99 $did(as,2) + var %a = config\authserv- $+ $did(as,2) $+ .txt + if ($exists(%a)) { + var %a = $read(config\authserv- $+ $did(as,2) $+ .txt), %k = $calc($len($gettok(%a,2-,44)) +1), %i = 1 + while (%k > 1) { + var %k = $calc(%k -3), %r = %r $+ $chr($calc($mid($gettok(%a,2-,44),%k,3) + %i)) + inc %i 1 + } + did -ar as 8 $gettok(%a,1,44) + did -ar as 9 %r + } +} +on *:dialog:as:sclick:5:{ + var %t = $n.input(Enter network name:,$network) + if (%t) { + authserv_save + did -ar as 99 %t + write -c config\authserv- $+ %t $+ .txt + did -i as 2 1 %t + did -c as 2 1 + did -r as 8,9 + } +} +on *:dialog:as:sclick:6:{ + if ($?!="Remove settings for $did(as,2) $+ ?") { + var %n = config\authserv- $+ $did(as,2) $+ .txt + if ($exists(%n)) .remove %n + did -r as 8,9,2 + var %a = $findfile(config\,authserv-*.txt,0,1,did -a as 2 $mid($nopath($1-),10,-4)) + } +} +on *:dialog:as:sclick:10:{ + authserv_save +} +alias -l authserv_save { + if ($did(as,99)) { + var %n = config\authserv- $+ $did(as,99) $+ .txt + if ($did(as,8)) && ($did(as,9)) write -c %n $did(as,8) $+ , $+ $bfe($did(as,9)) + } +} +alias authserv_connect { + if ($lines(config\authserv- $+ $network $+ .txt) > 0) { + var %a = $read(config\authserv- $+ $network $+ .txt), %k = $calc($len($gettok(%a,2-,44)) +1), %i = 1 + while (%k > 1) { + var %k = $calc(%k -3), %r = %r $+ $chr($calc($mid($gettok(%a,2-,44),%k,3) + %i)) + inc %i 1 + } + as auth $gettok(%a,1,44) %r + if ($ncfg(authserv_hidemask) == 1) mode $me +x + } +} +alias authserv_ghost { + if ($lines(config\authserv- $+ $network $+ .txt) > 0) { + var %a = $read(config\authserv- $+ $network $+ .txt), %k = $calc($len($gettok(%a,2-,44)) +1), %i = 1 + while (%k > 1) { + var %k = $calc(%k -3), %r = %r $+ $chr($calc($mid($gettok(%a,2-,44),%k,3) + %i)) + inc %i 1 + } + set %tmp.ghost $gettok(%a,1,44) + authserv ghost $gettok(%a,1,44) %r + } +} +dialog ns { + title "NickServ (/cns)" + size -1 -1 145 126 + option dbu + icon nbs.ico, 0 + combo 2, 6 10 70 100, drop + button "Add", 5, 78 10 30 11 + button "Remove", 6, 109 10 30 11 + edit "", 8, 44 37 95 11, autohs + text "Nickname:", 1, 6 38 25 8 + edit "", 9, 44 49 95 11, pass autohs + text "Password:", 11, 6 50 25 8 + text "Identify with:", 12, 6 79 36 8 + edit "", 13, 44 77 95 11, autohs + check "Automatically identify on request", 7, 6 90 97 10, + check "Use ghost command if nick is in use", 3, 6 100 102 10, + box "Network", 4, 2 1 141 24 + box "Identify", 14, 2 28 141 36 + box "Options", 15, 2 68 141 44 + button "OK", 10, 106 114 37 11, ok + text "", 99, 200 200 1 1 +} +On *:dialog:ns:init:0:{ + var %a = $findfile(config\,nickserv-*.txt,0,1,did -a ns 2 $mid($nopath($1-),10,-4)) + n.ds cr 7 nickserv_on + n.ds cr 3 nickserv_ghost + if ($ncfg(nickserv_prefix)) did -ar ns 13 $ifmatch +} +on *:dialog:ns:sclick:7:n.ds cw 7 nickserv_on +on *:dialog:ns:sclick:3:n.ds cw 3 nickserv_ghost +on *:dialog:ns:sclick:2:{ + nickserv_save + did -ar ns 99 $did(ns,2) + var %a = config\nickserv- $+ $did(ns,2) $+ .txt + if ($exists(%a)) { + var %a = $read(config\nickserv- $+ $did(ns,2) $+ .txt), %k = $calc($len($gettok(%a,2-,44)) +1), %i = 1 + while (%k > 1) { + var %k = $calc(%k -3), %r = %r $+ $chr($calc($mid($gettok(%a,2-,44),%k,3) + %i)) + inc %i 1 + } + did -ar ns 8 $gettok(%a,1,44) + did -ar ns 9 %r + } +} +on *:dialog:ns:sclick:5:{ + var %t = $n.input(Enter network name:,$network) + if (%t) { + nickserv_save + did -ar ns 99 %t + write -c config\nickserv- $+ %t $+ .txt + did -i ns 2 1 %t + did -c ns 2 1 + did -r ns 8,9 + } +} +on *:dialog:ns:sclick:6:{ + if ($?!="Remove settings for $did(ns,2) $+ ?") { + var %n = config\nickserv- $+ $did(ns,2) $+ .txt + if ($exists(%n)) .remove %n + did -r ns 8,9,2 + var %a = $findfile(config\,nickserv-*.txt,0,1,did -a ns 2 $mid($nopath($1-),10,-4)) + } +} +on *:dialog:ns:sclick:10:{ + if ($did(ns,13)) w_ncfg nickserv_prefix $ifmatch + nickserv_save +} +alias -l nickserv_save { + if ($did(ns,99)) { + var %n = config\nickserv- $+ $did(ns,99) $+ .txt + if ($did(ns,8)) && ($did(ns,9)) write -c %n $did(ns,8) $+ , $+ $bfe($did(ns,9)) + } +} + +dialog aj { + title "Autojoin (/caj)" + size -1 -1 191 173 + option dbu + icon $scriptdirdll\i.dll, 17 + combo 2, 28 2 97 100, drop + button "Add", 5, 128 2 30 11 + button "Remove", 6, 159 2 30 11 + edit "", 1, 1 14 189 135, multi return hsbar vsbar + check "Enable autojoin", 8, 2 150 50 10, + check "", 9, 93 150 96 10, + check "Minimize channels on autojoin", 7, 2 160 85 10, + button "Join now", 3, 115 161 37 11 + button "OK", 10, 153 161 37 11, ok + text "Network:", 4, 3 4 25 8 + text "", 99, 200 200 1 1 +} +On *:dialog:aj:init:0:{ + var %a = $findfile(config\,autojoin-*.txt,0,1,did -a aj 2 $mid($nopath($1-),10,-4)) + n.ds cr 7 autojoin_minimize + n.ds cr 8 autojoin + if (%n.caj) { + did -ar aj 99 %n.caj + var %n = config\autojoin- $+ %n.caj $+ .txt + if ($exists(%n)) loadbuf -o aj 1 %n + did -c aj 2 $n.cbgn(aj,2,%n.caj) + } + unset %n.caj + did -a aj 9 Disable autojoin for $did(aj,2) + n.ds cr 9 autojoin_disable_ $+ $did(aj,2) +} +on *:dialog:aj:sclick:3:{ + autojoin_save + aj +} +on *:dialog:aj:sclick:7:n.ds cw 7 autojoin_minimize +on *:dialog:aj:sclick:8:n.ds cw 8 autojoin +on *:dialog:aj:sclick:9:n.ds cw 9 autojoin_disable_ $+ $did(aj,2) +on *:dialog:aj:sclick:2:{ + autojoin_save + did -r aj 1 + did -ar aj 99 $did(aj,2) + var %n = config\autojoin- $+ $did(aj,2) $+ .txt + if ($exists(%n)) loadbuf -o aj 1 %n + did -a aj 9 Disable autojoin for $did(aj,2) + n.ds cr 9 autojoin_disable_ $+ $did(aj,2) +} +on *:dialog:aj:sclick:5:{ + var %t = $n.input(Enter network name:,$network) + if (%t) { + autojoin_save + did -ar aj 99 %t + write -c config\autojoin- $+ %t $+ .txt + did -i aj 2 1 %t + did -c aj 2 1 + did -r aj 1 + } +} +on *:dialog:aj:sclick:6:{ + if ($n.input(Do you want to remove autojoin for $did(aj,2) $+ ?,y/n)) { + var %n = config\autojoin- $+ $did(aj,2) $+ .txt + if ($exists(%n)) .remove %n + did -ar aj 1 Autojoin for $did(aj,2) removed. + did -r aj 2,99 + var %a = $findfile(config\,autojoin-*.txt,0,1,did -a aj 2 $mid($nopath($1-),10,-4)) + } +} +on *:dialog:aj:sclick:10:autojoin_save +alias -l autojoin_save { + if (!$did(aj,99)) || (!$did(aj,1).lines) return + var %n = config\autojoin- $+ $did(aj,99) $+ .txt + write -c %n + var %i = 1, %e = $did(aj,1).lines + while (%i <= %e) { + write %n $did(aj,1,%i) + inc %i 1 + } +} +dialog txt { + title "nbs-irc" + size -1 -1 298 228 + option dbu + icon $scriptdirdll\i.dll, 17 + edit "", 1, 1 2 296 212, multi return hsbar vsbar + button "Save", 10, 221 216 37 11, ok + button "Cancel", 3, 259 216 37 11, cancel + button "Add shortcut", 20, 1 216 44 11 +} +On *:dialog:txt:init:0:{ + n.mdx SetMircVersion $version + n.mdx MarkDialog $dname + n.mdx SetFont txt 1 15 400 Courier New + if (!%tmp.txtfile) did -h txt 20 + unset %tmp.txtfile + if (!$exists(%txt)) return + loadbuf -o txt 1 %txt + dialog -t txt %txt +} +on *:dialog:txt:sclick:20:{ + var %x = $$sfile(*.*,Select target file) + if ($did(txt,1,$did(txt,1).lines)) did -a txt 1 $crlf + did -a txt 1 %x + did -f txt 1 +} +on *:dialog:txt:sclick:10:{ + write -c %txt + if ($did(txt,1)) savebuf -o txt 1 %txt + if (%txtload) { + if (loadbuf isin %txtload) did -r $right(%txtload,-10) + %txtload + } + unset %txtload +} + + +alias cl_hideall { + if ($chan(0) < 1) return + var %i = 1 + while (%i <= $chan(0)) { + if ($window($chan(%i)).state != hidden) window -h $chan(%i) + inc %i + } +} +alias cl_showall { + if ($chan(0) < 1) return + var %i = 1 + while (%i <= $chan(0)) { + if ($window($chan(%i)).state == hidden) window -w $chan(%i) + hadd -m temp ci. [ $+ [ $cid ] $+ ] . [ $+ [ $chan(%i) ] ] $ticks + inc %i + } +} +alias cl_lc { + if (!$dialog(cl)) return + did -r cl 1 + var %i = 1 + while (%i <= $chan(0)) { + if ($window($chan(%i)).state == hidden) did -a cl 1 $chan(%i) $chr(9) $+ $dur($calc($ci($chan(%i)) * 60),2) $chr(9) $+ • + else did -a cl 1 $chan(%i) $chr(9) $+ $dur($calc($ci($chan(%i)) * 60),2) + inc %i + } +} +dialog cl { + title "Channel list" + size -1 -1 251 341 + option pixels + icon $scriptdirdll\i.dll,4 + list 1, 2 18 246 238, size extsel + button "Close", 2, 189 319 60 20, ok + text "Double click to hide/show channel:", 3, 2 2 178 16 + button "Hide all", 4, 64 319 60 20 + check "Show hidden channels on activity (say)", 6, 2 280 217 19, + button "Show all", 7, 2 319 60 20 + check "Autohide channels after ", 5, 2 298 136 20, + edit "", 8, 138 298 28 20, autohs limit 2 center + text "m of inactivity", 9, 168 300 76 16 + edit "", 10, 2 259 219 21, autohs + button "?", 11, 223 260 24 18 +} +On *:dialog:cl:init:0:{ + n.mdx SetMircVersion $version + n.mdx MarkDialog $dname + n.mdx SetControlMDX cl 1 ListView report single rowselect > scripts\dll\mdx\views.mdx + did -i cl 1 1 headerdims 130:1 70:2 20:3 + did -i cl 1 1 headertext Channel $chr(9) $+ Idle $chr(9) $+ H + if ($network) dialog -t cl Chanlist $+([,$network,]) + if ($ncfg(win_ashow == 1)) did -c cl 6 + if ($ncfg(ci-check == 1)) did -c cl 5 + if ($ncfg(cic-time)) did -a cl 8 $ncfg(cic-time) + if ($ncfg(nohide)) did -a cl 10 $ncfg(nohide) + cl_lc +} +On *:dialog:cl:sclick:2:{ + if ($did(cl,6).state == 1) { w_ncfg win_ashow 1 } + else { w_ncfg win_ashow o } + if ($did(cl,5).state == 1) { w_ncfg ci-check 1 } + else { w_ncfg ci-check o } + if ($did(cl,8).text isnum 1-240) w_ncfg cic-time $did(cl,8).text + if ($did(cl,10).text) w_ncfg nohide $did(cl,10).text +} +On *:dialog:cl:sclick:4:{ + cl_hideall + cl_lc +} +On *:dialog:cl:sclick:7:{ + cl_showall + cl_lc +} +On *:dialog:cl:dclick:1:{ + tokenize 32 $did(cl,1).seltext + if ($window($6).state == hidden) { + window -w $6 + hadd -m temp ci. [ $+ [ $cid ] $+ ] . [ $+ [ $6 ] ] $ticks + } + else window -h $6 + cl_lc +} +On *:dialog:cl:sclick:11:var %. = $n.input(Always show these channels $+ $c44 $crlf $+ seperate with space.,info) +dialog cc { + title "cc" + size -1 -1 272 207 + option dbu + icon $scriptdirdll\i.dll, 7 + text "Topic", 3, 2 1 66 8 + text "Bans", 4, 2 22 65 8 + combo 1, 2 9 268 100, edit drop + check "Set with Q", 16, 232 20 37 10 + list 2, 1 30 269 98, size extsel + button "Bans", 18, 2 129 33 11 + button "Excepts", 19, 36 129 33 11 + button "Invites", 20, 70 129 33 11 + button "Select all", 15, 168 129 33 11 + button "Edit", 100, 202 129 33 11 + button "Remove", 101, 236 129 33 11 + check "Only ops set topic (+t)", 5, 3 143 67 10 + check "No external messages (+n)", 6, 3 153 78 10 + check "Invite only (+i)", 7, 3 163 51 10 + check "Moderated (+m)", 8, 3 173 51 10 + check "Private (+p)", 14, 3 183 43 10 + check "Secret (+s)", 10, 3 193 59 10 + check "Key (+k):", 30, 83 143 33 10 + edit "", 32, 117 143 50 10, autohs + check "Limit (+l):", 31, 83 153 34 10 + edit "", 33, 117 153 25 10, autohs + check "Only authed/registered users (+r)", 11, 83 163 96 10 + check "No channel notices (+N)", 12, 83 173 84 10 + check "No channel CTCPs (+C)", 13, 83 183 83 10 + check "No colors (+c)", 9, 83 193 50 10 + text "Custom:", 21, 182 144 22 8 + edit "", 23, 206 143 63 10, autohs + text "Available:", 24, 182 164 25 8 + text "", 25, 208 164 60 8, right + text "Current:", 26, 182 155 25 8 + text "", 27, 208 155 60 8, right + button "OK", 17, 196 195 37 11, default ok + button "Cancel", 22, 234 195 37 11, cancel +} +alias cc { + if ($status == connected) && ($1 ischan) && ($me ison $1) && (!$dialog(editban)) && (!$dialog(cc)) { + set %ccc $1 + dlg cc + dialog -t cc $1 - $strip($right($n.chanstats($1),-6)) + } +} +on *:dialog:cc:init:0:{ + n.mdx SetMircVersion $version + n.mdx MarkDialog $dname + n.mdx SetControlMDX cc 2 listview report showsel > scripts\dll\mdx\views.mdx + did -i cc 2 1 headerdims 306:1 110:2 100:3 + did -i cc 2 1 headertext Address $chr(9) $+ Set by $chr(9) $+ Set on + unset %unban %ccc.* + var %x = $+(",$scriptdirtemp\topic\,$md5(%ccc),â,$cid,") + if ($exists(%x)) loadbuf -o cc 1 $qt(%x) + else did -a cc 1 $chan(%ccc).topic + did -ar cc 3 Topic ( $+ $len($chan(%ccc).topic) $+ / $+ $n.topiclen $+ ) + did -b cc 16,32,33 $+ $iif(e !isincs $chanmodes,$chr(44) $+ 19) $+ $iif(I !isincs $chanmodes,$chr(44) $+ 20) + if (!$n.qnet) did -h cc 16 + if ($chan(%ccc).topic) { + var %x = $ifmatch + set %ccc.topic $iif($left(%x,1) == $chr(32),$right(%x,-1),%x) + did -c cc 1 1 + } + var %i = 5 + while (%i < 15) { + if ($cm(%i) isincs $gettok($chan(%ccc).mode,1,32)) did -c cc %i + inc %i + } + if (k isincs $gettok($chan(%ccc).mode,1,32)) && ($chankey(%ccc)) { did -c cc 30 | did -e cc 32 | did -a cc 32 $chankey(%ccc) | set %ccc.key $chankey(%ccc) } + if (l isincs $gettok($chan(%ccc).mode,1,32)) { did -c cc 31 | did -e cc 33 | did -a cc 33 $chan(%ccc).limit | set %ccc.limit $chan(%ccc).limit } + did -a cc 25 $iif($chanmodes,$ifmatch,unknown) + did -a cc 27 $iif($chan(%ccc).mode,$ifmatch,none) + mode %ccc +b + set -u20 %ccc.banget 1 + set %ccc.list b + did -ar cc 4 Bans (retrieving) + did -f cc 3 + if (q ison %ccc) && ($n.qnet) did -e cc 16 +} +on *:dialog:cc:sclick:30,31:{ + if ($did(cc,$did).state == 1) did -e cc $calc($did +2) + else did -b cc $calc($did +2) +} +on *:dialog:cc:sclick:18,19,20:{ + var %x = $replace($did,18,b,19,e,20,I) + if (%ccc.list != %x) { + did -ar cc 4 $replace($did,18,Bans,19,Excepts,20,Invites) + did -r cc 2 + set -u10 %ccc.banget 1 + set %ccc.list %x + mode %ccc + $+ %x + } +} +on *:dialog:cc:close:0:{ + if ($dialog(editban)) dialog -x editban + if ($window(@topic)) close -@ @topic* + unset %oldmode +} +on *:dialog:cc:sclick:100:{ + if ($did(cc,2).seltext) n.editmode $gettok($did(cc,2).seltext,6,32) +} +on *:dialog:cc:dclick:2:{ + if ($did(cc,2).seltext) n.editmode $gettok($did(cc,2).seltext,6,32) +} +on *:dialog:cc:edit:1:{ + did -ar cc 3 Topic ( $+ $len($did(cc,1,0)) $+ / $+ $n.topiclen $+ ) + if ($len($did(cc,1,0)) > $n.topiclen) n.mdx SetColor 3 textbg 255 + else n.mdx SetColor 3 textbg reset + n.preview cc $did(cc,1,0) +} +on *:dialog:cc:sclick:1:{ + did -ar cc 3 Topic ( $+ $len($did(cc,1,0)) $+ / $+ $n.topiclen $+ ) + n.mdx SetColor 3 textbg reset + n.preview cc $did(cc,1,0) +} +on *:dialog:cc:sclick:101:{ + if (!%ccc.list) return + .write -c $qt($scriptdirtemp\unban) + var %i = 2 + while (%i <= $did(cc,2).lines) { + if (s isin $gettok($did(cc,2,%i).text,2,32)) .write $qt($scriptdirtemp\unban) $gettok($did(cc,2,%i).text,6,32) + inc %i + } + if ($read($scriptdirtemp\unban)) { + did -r cc 2 + var %x, %i = 1, %e = $lines($scriptdirtemp\unban) + while (%i <= %e) { + if ($numtok(%x,32) == $modespl) { + mode %ccc - $+ $str(%ccc.list,$numtok(%x,32)) %x + dec %i + unset %x + } + else var %x = %x $read($scriptdirtemp\unban,%i) + inc %i + } + mode %ccc - $+ $str(%ccc.list,$numtok(%x,32)) %x + set -u20 %ccc.banget 1 + mode %ccc + $+ %ccc.list + } +} +on *:dialog:cc:sclick:15:{ + var %i = 2 + while (%i <= $did(cc,2).lines) { + did -o cc 2 %i 0 $replace($gettok($did(cc,2,%i).text,2,32),+,+s) $gettok($did(cc,2,%i).text,3-,32) + inc %i + } + did -f cc 2 +} +on *:dialog:cc:sclick:17:{ + if (!$did(cc,1,0)) && (%ccc.topic) !raw -q topic %ccc : + elseif ($did(cc,1,0) === %ccc.topic) .echo -qgs a + else { + if ($did(cc,16).state == 1) && ($n.qnet) && (q ison %ccc) !raw -q PRIVMSG Q :settopic %ccc $did(cc,1,0) + else topic %ccc $did(cc,1,0) + } + var %i = 5, %+modes, %-modes, %+key, %-key, %cmodes = $did(cc,23) + while (%i < 15) { + if (($did(cc,%i).state == 1) && ($cm(%i) !isincs $gettok($chan(%ccc).mode,1,32))) var %+modes = %+modes $+ $cm(%i) + elseif (($did(cc,%i).state == 0) && ($cm(%i) isincs $gettok($chan(%ccc).mode,1,32))) var %-modes = %-modes $+ $cm(%i) + inc %i + } + if (($did(cc,30).state == 1) && ($did(cc,32).text) && (k !isincs $gettok($chan(%ccc).mode,1,32))) var %+key = +k $did(cc,32).text + elseif (($did(cc,30).state == 1) && ($did(cc,32).text) && ($did(cc,32).text != %ccc.key) && (k isincs $gettok($chan(%ccc).mode,1,32))) { var %+key = +k $did(cc,32).text | var %-key = -k %ccc.key } + elseif (($did(cc,30).state == 0) && (k isincs $gettok($chan(%ccc).mode,1,32))) var %-key = -k $chan(%ccc).key + if (($did(cc,31).state == 1) && ($did(cc,33).text isnum) && ($did(cc,33).text != %ccc.limit)) var %+modes = %+modes l $did(cc,33).text + elseif (($did(cc,31).state == 0) && (l isincs $gettok($chan(%ccc).mode,1,32))) var %-modes = %-modes $+ l + if (%+modes) || (%-modes) mode %ccc $iif(%+modes,$+(+,$v1)) $iif(%-modes,$+(-,$v1)) + if (%cmodes) mode %ccc %cmodes + if (%-key) mode %ccc %-key + if (%+key) { + mode %ccc %+key + set %pw. [ $+ [ %ccc ] ] $gettok(%+key,2-,32) + } +} +alias n.editmode { + if (!$1) return + unset %oldmode + set %oldmode $1- + dlg editban +} +dialog editban { + title "Edit" + size -1 -1 153 35 + option dbu + icon $scriptdirdll\i.dll, 7 + edit "", 1, 2 10 150 11, autohs + text "Address:", 2, 2 2 74 8 + button "OK", 3, 77 23 37 11, ok + button "Cancel", 4, 115 23 37 11, cancel +} +On *:dialog:editban:init:0:did -a editban 1 %oldmode +On *:dialog:editban:sclick:3:{ + if (%oldmode != $did(editban,1).text) { + mode %ccc $+(-,%ccc.list,+,%ccc.list) %oldmode $did(editban,1).text + if ($dialog(cc)) { + did -r cc 2 + mode %ccc + $+ %ccc.list + } + } + unset %oldmode +} + + +dialog cmds { + title "Commands (/cmds)" + size -1 -1 295 221 + option dbu + icon nbs.ico, 0 + button "Close", 100, 256 208 37 11, cancel + + tab "Setup", 11, 2 0 290 202 + list 1, 5 16 283 183, tab 11 size extsel + tab "IRC", 12 + list 2, 5 16 283 183, tab 12 size extsel + tab "Extended", 13 + list 3, 5 16 283 183, tab 13 size extsel + tab "System info", 14 + list 4, 5 16 283 183, tab 14 size extsel + tab "Other", 15 + list 5, 5 16 283 183, tab 15 size extsel + + text "Double-click on any command to run it now", 200, 6 209 127 8 +} + +on *:dialog:cmds:init:0:{ + n.mdx SetMircVersion $version + n.mdx MarkDialog $dname + var %i = 1 + while (%i < 6) { + n.mdx SetControlMDX cmds %i listview report rowselect > scripts\dll\mdx\views.mdx + did -i cmds %i 1 headerdims 110:1 430:2 + did -i cmds %i 1 headertext Command $chr(9) $+ Action $chr(160) / [optional] + inc %i + } + var %tab = 11 + while (%tab < 16) { + var %src = $replace(%tab,11,setup,12,irc,13,extended,14,sysinfo,15,other) + var %src = scripts\txt\cmds_ $+ %src $+ .txt + var %targetid = $calc(%tab - 10) + var %i = 1, %e = $lines(%src) + while (%i <= %e) { + var %x = $read(%src,%i) + if (%x) did -a cmds %targetid / $+ $gettok(%x,1,44) $chr(9) $+ $gettok(%x,2-,44) + else did -a cmds %targetid $chr(160) + inc %i + } + inc %tab + } + did -f cmds 1 +} +on *:dialog:cmds:dclick:1-5:{ + var %x = $gettok($did($did,$did($did).sel),6,32) + if ($left(%x,1) == /) && ($n.input(Run command %x now?,y/n)) $right(%x,-1) +} + + +dialog fkeys { + title "F-key bindings (/fkeys)" + size -1 -1 171 90 + option dbu + icon $scriptdirdll\i.dll, 17 + edit "", 1, 11 3 70 11, autohs + edit "/setup", 2, 11 15 70 11, read + edit "", 3, 11 27 70 11, autohs + edit "", 4, 11 40 70 11, autohs + edit "", 5, 11 52 70 11, autohs + edit "(ban/unban latest ban)", 6, 11 64 70 11, read autohs + edit "", 7, 99 3 70 11, autohs + edit "", 8, 99 15 70 11, autohs + edit "", 9, 99 27 70 11, autohs + edit "", 10, 99 40 70 11, autohs + edit "", 11, 99 52 70 11, autohs + edit "", 12, 99 64 70 11, autohs + text "F1", 20, 1 5 9 7, right + text "F2", 39, 1 17 9 8, right + text "F3", 98, 1 29 9 8, right + text "F4", 58, 1 42 9 8, right + text "F5", 74, 1 54 9 8, right + text "F6", 78, 1 66 9 8, right + text "F7", 77, 89 5 9 8, right + text "F8", 67, 89 17 9 8, right + text "F9", 57, 89 29 9 8, right + text "F10", 83, 89 42 9 8, right + text "F11", 32, 89 54 9 8, right + text "F12", 54, 89 66 9 8, right + button "Reset", 101, 1 79 37 11 + button "OK", 100, 95 79 37 11, ok + button "Cancel", 13, 133 79 37 11, cancel +} + +on *:dialog:fkeys:init:0:{ + var %i = 1 + while (%i < 13) { + if (%i != 6) && (%i != 2) && ($ncfg(fkey_f [ $+ [ %i ] ]) != ânoneâ) did -a fkeys %i $ifmatch + inc %i 1 + } +} +on *:dialog:fkeys:sclick:101:{ + if ($?!="Are you sure?") { + did -ar fkeys 1 /help + did -ar fkeys 3 /awaysys + did -ar fkeys 4 /back + did -ar fkeys 5 /lastpop + did -ar fkeys 7 /topic $chr(35) + did -ar fkeys 8 /np + did -ar fkeys 9 /logviewer + did -ar fkeys 10 /g-join + did -ar fkeys 11 /blist + did -ar fkeys 12 /aboutnbs + } +} +on *:dialog:fkeys:sclick:100:{ + var %i = 1 + while (%i < 13) { + if (%i != 6) && (%i != 2) { + if ($did(fkeys,%i).text) w_ncfg fkey_f $+ %i $ifmatch + else w_ncfg fkey_f $+ %i ânoneâ + } + inc %i 1 + } +} +dialog servers { + title "Servers" + size -1 -1 200 124 + option dbu + icon $scriptdirdll\i.dll,12 + list 1, 1 1 198 111, size extsel + button "Close", 3, 169 113 30 10, cancel + button "Edit", 4, 138 113 30 10 + check "New connection", 5, 57 113 52 10, + check "Show on startup", 2, 2 113 50 10, +} +on *:dialog:servers:init:0:{ + n.mdx SetMircVersion $version + n.mdx MarkDialog $dname + n.mdx SetControlMDX $dname 1 ListView report single rowselect showsel > scripts\dll\mdx\views.mdx + did -i $dname 1 1 headerdims 90:1 180:2 40:3 + did -i $dname 1 1 headertext Name $chr(9) $+ Server:port $chr(9) $+ Pass. + if ($status == connected) did -c servers 5 + if ($ncfg(con-on-start) == 1) did -c servers 2 + con-update +} +on *:dialog:servers:sclick:4:{ + set %txtload con-update + txt config\irc-servers.txt +} +alias con-update { + if ($lines(config\irc-servers.txt) < 1) { did -ra servers 1 (empty) | return } + set %e $lines(config\irc-servers.txt) + var %i = 1 + did -r servers 1 + while (%i <= %e) { + if ($gettok($read(config\irc-servers.txt,%i),3,44)) did -a servers 1 $gettOK($read(config\irc-servers.txt,%i),1,44) $chr(9) $+ $gettOK($read(config\irc-servers.txt,%i),2,44) $chr(9) $+ yes + else did -a servers 1 $replace($read(config\irc-servers.txt,%i),$chr(44),$chr(9)) $chr(9) $+ no + inc %i + } +} +on *:dialog:servers:sclick:2:{ + if ($did(servers,2).state == 1) w_ncfg con-on-start 1 + else w_ncfg con-on-start o +} +on *:dialog:servers:dclick:1:{ + if ($did(servers,1).sel) { + var %con-temp = $gettok($read(config\irc-servers.txt, $+ $calc($did(servers,1).sel -1) $+ ),2,44) $gettok($read(config\irc-servers.txt, $+ $calc($did(servers,1).sel -1) $+ ),3,44) + if ($did(servers,5).state == 1) server -m %con-temp + else server %con-temp + if ($did(servers,5).state == 0) did -c servers 5 + } +} +dialog addedit { + title "Add" + size -1 -1 167 41 + option dbu + icon $scriptdirdll\i.dll, 17 + text "Address:", 1, 2 5 22 8 + text "Reason:", 2, 2 17 22 8 + edit "", 3, 25 3 140 11, autohs + edit "", 4, 25 15 140 11, autohs + button "OK", 5, 90 29 37 11, ok + button "Cancel", 6, 128 29 37 11, cancel +} +on *:dialog:addedit:init:0:{ + if ($gettok(%addedit,1,1)) { + did -a addedit 3 $ifmatch + dialog -t addedit Edit + if ($gettok(%addedit,2-,1)) did -a addedit 4 $ifmatch + } + else did -a addedit 4 Blacklisted +} +on *:dialog:addedit:sclick:5:{ + if (%addedit) && $did(addedit,3) && ($read(config\blacklist.txt,w,$gettok(%addedit,1,1) $+ *)) { + .write -dl $+ $readn config\blacklist.txt + var %x = $readn + } + if ($did(addedit,3)) .write $iif(%x,-il $+ %x) config\blacklist.txt $iif($chr(33) !isin $did(addedit,3),*!*) $+ $iif(@ !isin $did(addedit,3),@) $+ $did(addedit,3) $+ $iif($did(addedit,4),$chr(44) $+ $ifmatch) + n.bl-update +} +on *:dialog:addedit:close:0:unset %addedit +dialog blchans { + title "Blacklist channels" + size -1 -1 112 146 + option dbu + icon $scriptdirdll\i.dll, 15 + box "Enable blacklist for:", 5, 2 2 108 129 + radio "All channels", 7, 6 11 54 10, + radio "Specified channels:", 8, 6 20 68 10, + edit "", 2, 13 30 93 86, multi return autohs autovs vsbar + button "Add current", 4, 69 117 37 11 + button "OK", 3, 73 134 37 11, ok +} +on *:dialog:blchans:init:0:{ + if ($ncfg(blacklist_custom_channels) == 1) did -c blchans 8 + else { + did -c blchans 7 + did -b blchans 2,4 + } + var %i = 1, %x = $gettok($ncfg(blacklist_channels),0,32) + if (%x) { + while (%i <= %x) { + did -a blchans 2 $gettok($ncfg(blacklist_channels),%i,32) $+ $crlf + inc %i + } + } + else { + var %i = 1 + while (%i <= $chan(0)) { + did -a blchans 2 $chan(%i) $+ $crlf + inc %i + } + } +} +on *:dialog:blchans:sclick:7:did -b blchans 2,4 +on *:dialog:blchans:sclick:8:did -e blchans 2,4 +on *:dialog:blchans:sclick:3:{ + if ($did(blchans,8).state == 1) { + w_ncfg blacklist_custom_channels 1 + .remini config\config.ini nbs-irc blacklist_channels + var %i = 1, %x = $did(blchans,2).lines, %y + if (%x) { + while (%i <= %x) { + var %y = %y $did(blchans,2,%i) + inc %i + } + w_ncfg blacklist_channels %y + } + } + else w_ncfg blacklist_custom_channels o +} +on *:dialog:blchans:sclick:4:{ + if ($did(blchans,2,$did(blchans,2).lines)) did -a blchans 2 $crlf + if ($active ischan) did -a blchans 2 $active +} +dialog blist { + title "Blacklist" + size -1 -1 213 146 + option dbu + icon $scriptdirdll\i.dll, 15 + list 1, 1 2 210 130, size extsel + check "Enable blacklist", 2, 3 135 50 10, + button "Add", 5, 58 134 30 11 + button "Remove", 6, 89 134 30 11 + button "Edit", 4, 120 134 30 11 + button "Channels", 7, 151 134 30 11 + button "Close", 3, 182 134 30 11, cancel +} +on *:dialog:blist:init:0:{ + n.mdx SetMircVersion $version + n.mdx MarkDialog $dname + n.mdx SetControlMDX $dname 1 ListView report single rowselect showsel > scripts\dll\mdx\views.mdx + did -i $dname 1 1 headerdims 260:1 130:2 + did -i $dname 1 1 headertext Address $chr(9) $+ Reason + if ($ncfg(blacklist) == 1) did -c blist 2 + n.bl-update +} +on *:dialog:blist:sclick:7:dlg blchans +on *:dialog:blist:dclick:1:bl.edit +on *:dialog:blist:sclick:4:bl.edit +alias bl.edit { + if ($did(blist,1).seltext) { + var %x = $replace($did(blist,1).seltext,$chr(9),$chr(32)) + addedit $+($gettok(%x,6,32),$chr(1),$gettok(%x,11-,32)) + } +} +on *:dialog:blist:sclick:2:n.ds cw 2 blacklist +on *:dialog:blist:sclick:5:addedit +on *:dialog:blist:sclick:6:{ + var %x = $gettok($replace($did(blist,1).seltext,$chr(9),$chr(32)),6,32) + if (%x) && ($read(config\blacklist.txt,w,%x $+ *)) { + .write -dl $+ $readn config\blacklist.txt + n.bl-update + } +} +on *:dialog:blist:sclick:3:if ($did(blist,2).state == 1) scon -at1 n.blscanall +alias n.bl-update { + if ($lines(config\blacklist.txt) < 1) did -r blist 1 + else { + var %i = 1, %e = $lines(config\blacklist.txt) + did -r blist 1 + while (%i <= %e) { + did -a blist 1 $replace($read(config\blacklist.txt,%i),$chr(44),$chr(9)) + inc %i + } + } +} +dialog alarm { + title "Alarm timer (/alarm)" + size -1 -1 106 141 + option dbu + icon $scriptdirdll\i.dll, 17 + box "Time:", 9, 2 2 101 35 + box "Action:", 10, 2 40 101 86 + radio "Ring at:", 2, 6 10 31 10, group + edit "", 1, 38 10 24 11, autohs center + radio "Ring in:", 17, 6 22 30 10 + edit "", 18, 38 22 24 11, autohs center + radio "Beep", 3, 6 49 26 10, group + radio "Play sound:", 4, 6 60 40 10 + edit "", 5, 14 70 73 11, autohs + button "...", 13, 89 71 11 9 + check "Run program:", 11, 6 81 50 10, + edit "", 12, 14 91 73 11, autohs + button "...", 14, 89 92 11 9 + check "Display notification:", 15, 6 102 70 10, + edit "", 16, 14 112 86 11, autohs + button "Set", 6, 2 129 33 11, ok + button "Reset", 7, 36 129 33 11 + button "Close", 8, 70 129 33 11, cancel + text "hh:mm (24h)", 19, 65 12 35 8 + text "minutes", 20, 65 24 22 8 +} + + +On *:dialog:alarm:init:0:{ + did -b alarm 18 + if (%alarm_time) did -ar alarm 1 $ifmatch + if (%alarm_etime) did -ar alarm 18 $ifmatch + if ($timer(alarm)) { + if ($timer(alarm).time) did -c alarm 2 + else did -c alarm 17 + did -b alarm 1,2,3,4,5,6,11,12,13,14,15,16,17 + did -f alarm 8 + } + else did -c alarm 2 + if ($ncfg(alarm_type) == sound) && ($ncfg(alarm_sound)) { + did -c alarm 4 + did -a alarm 5 $ifmatch + } + else did -c alarm 3 + if ($ncfg(alarm_program)) did -a alarm 12 $ifmatch + if ($ncfg(alarm_message)) did -a alarm 16 $ifmatch + if (%alarm.program == 1) did -c alarm 11 + if (%alarm.message == 1) did -c alarm 15 +} +On *:dialog:alarm:sclick:2:{ + if ($did(alarm,2).state == 1) did -b alarm 18 + did -e alarm 1 +} +On *:dialog:alarm:sclick:17:{ + if ($did(alarm,17).state == 1) did -b alarm 1 + did -e alarm 18 +} +On *:dialog:alarm:sclick:13:{ + if ($sfile(*.wav;*.mp3,Choose sound file)) { + did -ar alarm 5 $ifmatch + w_ncfg alarm_sound $ifmatch + } +} +On *:dialog:alarm:sclick:14:{ + if ($sfile(*.exe;*.com;*.lnk,Choose program)) { + did -ar alarm 12 $ifmatch + w_ncfg alarm_program $ifmatch + } +} +On *:dialog:alarm:sclick:6:{ + if ($did(alarm,2).state == 1) && (?:? iswm $did(alarm,1).text) { + var %alarm = $remove($did(alarm,1).text,:) + if ($len(%alarm) == 3) var %alarm = 0 $+ %alarm + if ($mid(%alarm,1,2) !isnum 0-23) || ($mid(%alarm,3,2) !isnum 0-59) { + echo $color(info) -atg $kl:(Alarm) invalid time + return + } + } + if ($did(alarm,17).state == 1) { + if ($did(alarm,18).text !isnum) { + echo $color(info) -atg $kl:(Alarm) invalid time + return + } + } + unset %alarm.* + if ($did(alarm,3).state == 1) { + set %alarm.beep 1 + w_ncfg alarm_type beep + } + elseif ($did(alarm,4).state == 1) { + if ($isfile($did(alarm,5))) { + set %alarm.sound $did(alarm,5) + w_ncfg alarm_type sound + } + else { + .echo -qg $n.input($did(alarm,5) does not exist.,info) + halt + } + } + if ($did(alarm,11).state == 1) { + if ($isfile($did(alarm,12))) set %alarm.program $did(alarm,12) + else { + .echo -qg $n.input($did(alarm,12) does not exist.,info) + halt + } + set %alarm.program.on 1 + } + else unset %alarm.program.on + if ($did(alarm,15).state == 1) { + set %alarm.message 1 + w_ncfg alarm_message $did(alarm,16).text + } + + if ($did(alarm,2).state == 1) { + .timeralarm -oi $did(alarm,1).text 1 0 n.alarm_action + echo $color(info) -st $npre Alarm set at $did(alarm,1).text $iif(%alarm.message == 1,$par($ncfg(alarm_message))) + } + else { + .timeralarm -o 1 $calc($did(alarm,18).text *60) n.alarm_action + echo $color(info) -st $npre Alarm set at $did(alarm,18).text minute(s) $iif(%alarm.message == 1,$par($ncfg(alarm_message))) + } +} +On *:dialog:alarm:sclick:7:{ + did -e alarm 1,2,3,4,5,6,11,12,13,14,15,16,17 + did -c alarm 2 + did -u alarm 17 + .timeralarm off + splay stop +} +dialog gl { + title "Game launcher (F10) (/g-join)" + size -1 -1 218 44 + option dbu + icon nbs.ico + combo 1, 25 3 122 100, edit drop + check "Minimize mIRC", 33, 8 32 46 9, + check "Pause Winamp", 34, 57 32 49 9, + button "Connect", 13, 109 32 35 11, ok + button "Rcon (cs)", 39, 145 32 35 11 + button "Close", 14, 181 32 35 11, cancel + combo 2, 25 16 129 100, drop + button "Reload", 3, 156 16 30 11 + button "Edit", 17, 187 16 29 11 + text "Address:", 8, 2 5 22 8 + text "Pass:", 46, 151 5 13 8 + text "Game:", 15, 2 18 17 8 + edit "", 4, 165 3 50 11 +} +On *:dialog:gl:init:0:{ + n.gl.updategames + if (%hlip) did -a gl 1 $ifmatch + if ($lines(config\hl-servers.txt) > 0) loadbuf -o gl 1 config\hl-servers.txt + if (%n.gl.lastpw) did -a gl 4 $ifmatch + did -c gl 1 1 + n.ds cr 33 csminmirc + n.ds cr 34 gl_pausewinamp +} +On *:dialog:gl:sclick:17:run config\games.txt +On *:dialog:gl:sclick:39:{ + unset %rcon.* + var %gl.tmp = $gettok($gettok($did(gl,1).text,1,32),1,58) + if ($gettok(%gl.tmp,1,46) isnum 1-255) set %rcon.ip %gl.tmp + else { + .echo -qg $n.input(Error: enter ip:port (eg: 83.126.53.32:27015) Hostnames are not supported.,info) + return + } + var %gl.tmp2 = $gettok($gettok($did(gl,1).text,1,32),2,58) + if (%gl.tmp2 isnum) set %rcon.port %gl.tmp2 + else { + .echo -qg $n.input(Error: please enter port (eg :27015),info) + return + } + rcon_win +} +On *:dialog:gl:sclick:13:{ + if ($did(gl,2)) set %currgame $ifmatch + else { + .echo -qg $n.input(Error: no game specified.,info) + return + } + if ($did(gl,1)) n.history config\hl-servers.txt $ifmatch + if ($did(gl,4)) set %n.gl.lastpw $ifmatch + else unset %n.gl.lastpw + if ($did(gl,2)) run -p $replace($gettok($ifmatch,2,124),[adr],$gettok($did(gl,1),1,32),[pass],$did(gl,4)) + if ($did(gl,34).state == 1) { dll scripts\dll\winamp.dll playpause | w_ncfg gl_pausewinamp 1 } + else w_ncfg gl_pausewinamp o + if ($did(gl,33).state == 1) { w_ncfg csminmirc 1 | showmirc -m } + else w_ncfg csminmirc o + unset %hlip +} + +On *:dialog:gl:sclick:3:n.gl.updategames +On *:dialog:gl:sclick:14:{ + n.ds cw 34 gl_pausewinamp + n.ds cw 33 csminmirc + unset %hlip +} +alias -l n.gl.updategames { + did -r gl 2 + did -a gl 2 - Current: + did -a gl 2 %currgame + did -a gl 2 - Available: + if ($lines(config\games.txt) > 0) loadbuf -o gl 2 config\games.txt + did -c gl 2 2 +} + +on *:udpread:hl:{ + while ($sockerr == 0) { + var %hl + sockread -f %hl + if ($gettok(%hl,4,92)) var %hlk %hl + if ($sockbr == 0) { + wigl namn $gettok(%hlk,20,92) + wigl spelare $gettok(%hlk,6,92) $+ / $+ $gettok(%hlk,12,92) + wigl game $gettok(%hlk,16,92) + wigl map $gettok(%hlk,22,92) + wigl hlpass $gettok(%hlk,26,92) + wigl ip $gettok(%hlk,4,92) + wigl vac $gettok(%hlk,29,92) + wigl typ $replace($gettok(%hlk,24,92),d,dedi,l,listen) + wigl ping $calc($ticks - %hl.start) + sockclose hl + return + } + } +} + +; events etc + +on ^*:CHAT:*:{ + if ($1 == ACTION) { echo $color(action) -t =$nick * $nick $left($2-,-1) } + else echo $color(normal) -mtbf =$nick $replace($nick.style,,,,$nick) $+  $1- + if ($ncfg(privpip) == 1) && ($ncfg(query_sound_onopen) != 1) && (!%tmp.query.sound.block) var %x = 1 + if ($active != =$nick) { + if (%x == 1) $ncfg(privljud) + set -u3 %tmp.query.sound.block 1 + } + elseif (!$appactive) { + if (%x == 1) $ncfg(privljud) + set -u3 %tmp.query.sound.block 1 + } + haltdef +} +on ^*:TEXT:*:#:{ + if ($halted) return + haltdef + if ($hget(nbs,win_ashow) == 1) window -w $chan + hadd -m temp ci. [ $+ [ $cid ] $+ ] . [ $+ [ $chan ] ] $ticks + hadd -m temp text $color(normal) -mtlbfi4 # $replace($nick.style,,$cmode($nick,$chan,o),,$nick) $+  $1- + ;if ($me isin $1-) { + if ($wildtok($1-,$me $+ *,0,32) != 0) { + if ($hget(nbs,nickbar) == 1) echo $color(normal) -mtlbfi4 # $replace($nick.style,,$cmode($nick,$chan,o),, $+ $hget(nbs,highlight_nick_color) $+ $nick $+ ) $+  $1- + else echo $hget(temp,text) + n.highlight $1- + if ($away && !%n.away. [ $+ [ $nick ] ]) && ($ncfg(awaynotice) != 1) { + .notice $nick I'm away: $awaymsg + set -u99999 %n.away. $+ $nick 1 + } + } + else echo $hget(temp,text) + if ($hget(nbs,mp3serv) == 1) && ($hget(nbs,mp3getcmd) isin $1-) n.servemp3 $nick + if ($chr(1) $+ # isin $hget(prot,chans)) && ($me isop #) || ($me ishop #) { + if (($nick isop #) || ($nick ishop #)) && (!$hget(prot,$+(#,punishops))) return + if ($hget(prot,$+(#,caps)) == 1) n.capss # $nick $1- + if ($hget(prot,$+(#,repeat)) == 1) n.repeats # $nick $1- + if ($hget(prot,$+(#,flood)) == 1) n.floods # $nick $1- + if ($hget(prot,$+(#,advertising)) == 1) n.spams # $nick $1- + } +} +on ^*:action:*:#:{ + if ($me isin $1-) { + if ($ncfg(nickpip) == 1) && ((!%tmp.nbf) || (%tmp.nbf < 2)) { + splay $qt($mircdirscripts\beep.wav) + inc -u10 %tmp.nbf + } + if ($hget(nbs,popup_nick) == 1) n.ptext # $chr(1) Highlighted in # $chr(1) * $cmode($nick,$chan) $eval($strip($1-),1) + } + if ($chr(1) $+ # isin $hget(prot,chans)) && ($me isop #) || ($me ishop #) { + if (($nick isop #) || ($nick ishop #)) && (!$hget(prot,$+(#,punishops))) return + if ($hget(prot,$+(#,caps)) == 1) n.capss # $nick $1- + if ($hget(prot,$+(#,repeat)) == 1) n.repeats # $nick $1- + if ($hget(prot,$+(#,flood)) == 1) n.floods # $nick $1- + if ($hget(prot,$+(#,advertising)) == 1) n.spams # $nick $1- + } +} +on ^*:TEXT:*:?:{ + if ($halted) return + haltdef + if ($nick == -psyBNC) { + if ($window(-psyBNC).state != hidden) window -h -psyBNC + n.bnc psyBNC + echo -tmi4 $bncwin(psyBNC,$cid) ‹- $1- + } + elseif ($nick == -sBNC) { + if ($window(-sBNC).state != hidden) window -h -sBNC + n.bnc sBNC + echo -tmi4 $bncwin(sBNC,$cid) ‹- $1- + if ($ncfg(sbnc_autoread) == 1) { + if ($1-4 == You have new messages.) { + set %sbnc. [ $+ [ $cid ] $+ ] .msglog 1 + .!msg -sbnc read + } + elseif ($1-4 == End of LOG. Use) { + unset %sbnc. [ $+ [ $cid ] $+ ] .* + .!msg -sbnc erase + } + elseif (%sbnc. [ $+ [ $cid ] $+ ] .msglog == 1) && ($numtok($1-,58) > 2) { + var %nick = $gettok($gettok($1-,2,58),1,32) + if (@ !isin %nick) && (%nick !isnum) { + if (!$window(%nick)) query %nick + set %sbnc. [ $+ [ $cid ] $+ ] .host1. [ $+ [ %nick ] ] $mid($gettok($gettok($1-,2,58),2,32),2,-1) + if (%sbnc. [ $+ [ $cid ] $+ ] .host1. [ $+ [ %nick ] ] != %sbnc. [ $+ [ $cid ] $+ ] .host2. [ $+ [ %nick ] ]) echo $color(info) -ti4 %nick $pre Offline messages from $gettok($gettok($1-,2,58),1,32) $par($mid($gettok($gettok($1-,2,58),2,32),2,-1)) $+ : + set %sbnc. [ $+ [ $cid ] $+ ] .host2. [ $+ [ %nick ] ] %sbnc. [ $+ [ $cid ] $+ ] .host1. [ $+ [ %nick ] ] + if ($gettok($gettok($1-,3,58),1,32) == ++c) { + var %cryptmsg = $gettok($gettok($1-,3-,58),2-,32), %crypthost = *!* $+ $remove($mid($gettok($gettok($1-,2,58),2,32),2,-1),~) + var %msg = (c) $n.crypt(%cryptmsg,d,%nick,%crypthost) + } + else var %msg = $gettok($1-,3-,58) + echo $color(normal) -mi4 %nick $gettok($1-,1,58) $event.msg(%nick,%nick,%msg) + } + } + } + } + else { + echo $color(normal) -mtlbfi4 $nick $replace($nick.style,,,,$nick) $+  $1- + if ($hget(nbs,mp3serv) == 1) && ($hget(nbs,mp3getcmd) isin $1-) n.servemp3 $nick + if ($hget(nbs,privpip) == 1) && ($hget(nbs,query_sound_onopen) != 1) && (!%tmp.query.sound.block) var %x = 1 + if (!$appactive) fasttitle $nick $+ : $eval($1-,1) + if ($active != $nick) { + if (%x == 1) $hget(nbs,privljud) + set -u3 %tmp.query.sound.block 1 + } + elseif (!$appactive) { + if (%x == 1) $ncfg(privljud) + set -u3 %tmp.query.sound.block 1 + } + if ($hget(nbs,popup_query) == 1) && ($hget(nbs,popup_query_always) == 1) { + if ($appactive) && ($active != $nick) var %x = 1 + elseif (!$appactive) var %x = 1 + if (%x == 1) n.ptext $nick $chr(1) msg from $nick $chr(1) $replace($nick.style,,$null,,$nick)  $+ $eval($1-,1) + } + } +} +on *:OPEN:?:*:{ + if ($halted) return + if ($nick == -psyBNC) n.bnc psyBNC + elseif ($nick == -sBNC) n.bnc sBNC + else { + n.query.stats $nick $address + if ($ncfg(privpip) == 1) && ($ncfg(query_sound_onopen == 1)) $ncfg(privljud) + if ($n.bluser($fulladdress)) echo $color(info) -t $nick $npre User is blacklisted $par($gettok(%bltmp,2-,44))) + if ($hget(nbs,popup_query) == 1) && ($ncfg(popup_query_always) != 1) n.ptext $nick $chr(1) msg from $nick $chr(1) $replace($nick.style,,$null,,$nick)  $+ $eval($1-,1) + } +} +on ^*:RAWMODE:#:{ + if ($halted) return + haltdef + if ($1 == +b) || ($1 == -o+b) { + if ($me isop #) || ($me ishop #) { + var %o = 1 + set -u900 %banmode -b | set -u900 %banchan # | set -u900 %banmask $iif($1 == -o+b,$3,$2) + } + echo $color(mode) -ti4 # $npre $+  $nick $par($replace($1,+b,4+b)) $2- $iif(%o == 1,$par(F6: unban)) + } + elseif ($1 == -b) { + if ($me isop #) || ($me ishop #) { + var %o = 1 + set -u900 %banmode +b | set -u900 %banchan # | set -u900 %banmask $2 + } + echo $color(mode) -ti4 # $npre $+  $nick $par(4 $+ $1) $2- $iif(%o == 1,$par(F6: ban)) + } + else $iif($hget(netsplit, [ [ $cid ] $+ ] . [ $+ [ $2 ] ]),.timer -m 1 1900) echo $color(mode) -ti4 # $npre $+  $nick $par($1) $iif($2,$2-,#) + if ($me isin $2) && ($hget(nbs,popup_other) == 1) n.ptext # $chr(1) Channel mode: # $chr(1) $npre $+  $nick $par($1) $replace($2-,$me, $+ $me $+ ) $iif($cid != $activecid,$par($network)) +} +on ^*:DEOP:#:{ + if ($opnick == $me) { + if ($active != $chan) && (!%n.connecting. [ $+ [ $cid ] ]) echo $color(mode) -atg $npre $+  info: -o in $chan by $nick $iif($cid != $activecid,$par($network)) + } +} +on ^*:OP:#:{ + if ($opnick == $me) { + if ($active != $chan) && (!%n.connecting. [ $+ [ $cid ] ]) echo $color(mode) -atg $npre $+  info: +o in $chan by $nick $iif($cid != $activecid,$par($network)) + if ($hget(nbs,blacklist) == 1) .timer 1 1 n.blscan # + .timer 1 10 n.checkkey # + } +} +on ^*:SERVEROP:#:if ($opnick == $me) && ($hget(nbs,blacklist) == 1) .timer 1 2 n.blscan # +on ^*:VOICE:#:{ + if ($vnick == $me) && ($active != $chan) && (!%n.connecting. [ $+ [ $cid ] ]) echo $color(mode) -atg $npre $+  info: +v in $chan by $nick $iif($cid != $activecid,$par($network)) +} +on ^*:DEVOICE:#:{ + if ($vnick == $me) && ($active != $chan) && (!%n.connecting. [ $+ [ $cid ] ]) echo $color(mode) -atg $npre $+  info: -v in $chan by $nick $iif($cid != $activecid,$par($network)) +} +on ^*:HELP:#:{ + if ($hnick == $me) { + if ($active != $chan) && (!%n.connecting. [ $+ [ $cid ] ]) echo $color(mode) -atg $npre $+  info: +h in $chan by $nick $iif($cid != $activecid,$par($network)) + if ($hget(nbs,blacklist) == 1) n.blscan # + } +} +on ^*:DEHELP:#:{ + if ($hnick == $me) { + if ($active != $chan) && (!%n.connecting. [ $+ [ $cid ] ]) echo $color(mode) -atg $npre $+  info: -h in $chan by $nick $iif($cid != $activecid,$par($network)) + } +} +on *:CTCPREPLY:*:{ + n.echo ctcp -at $kl:(CTCP $1 reply from $nick) $iif($1 == ping,reply took $calc(($ticks - %ctcp.ping.ticks)/1000) $+ s,$2-) + unset %ctcp.ping.ticks + haltdef +} +on ^*:USERMODE:{ + echo $color(mode) -ste $npre $+  $nick sets mode: $1- + haltdef +} +alias amsg { + if ($chan(0) == 0) { echo $color(info) -at $npre /amsg: you're not on a channel | return } + if (!$1) { echo $color(info) -at $npre /amsg: insufficient parameters | return } + .!amsg $1- + var %i = 1, %t = $chan(0) + while (%i <= %t) { + echo $color(own) -qmnt $chan(%i) $replace($me.style,,$cmode($me,$chan(%i),o),,$me) $+  $1- + inc %i 1 + } +} +alias amsg2 { + if (!$1) { + echo $color(info) -atg $npre /amsg2: lets you exclude channels from 'amsg' + echo $color(info) -atg $npre Usage: /amsg2 setlist to view ignored channels, /amsg2 setlist to set ignored channels $par(seperated with space) $+ , /amsg2 message + } + elseif ($1 == setlist) && ($2) { + w_ncfg amsg_ignore $2- + n.echo info -atg Channels to not msg: $2- $par($numtok($2-,32)) + } + elseif ($1 == setlist) && (!$2) echo $color(info) -atg $npre Current channels to ignore: $iif($ncfg(amsg_ignore),$ifmatch $par($numtok($ifmatch,32)),none) + else { + var %i = 1, %t = $chan(0), %amsg.ignore = $ncfg(amsg_ignore), %amsg.chans + while (%i <= %t) { + if (!$istok(%amsg.ignore,$chan(%i),32)) { + var %amsg.chans = $addtok(%amsg.chans,$chan(%i),44) + echo $color(own) -qmnt $chan(%i) $replace($me.style,,$cmode($me,$chan(%i),o),,$me) $+  $1- + } + inc %i 1 + } + .raw PRIVMSG %amsg.chans : $+ $1- + } +} +on *:filercvd:*:{ + if ($hget(nbs,popup_dcc) == 1) && ($file(" $filename ").size > 1048576) n.ptext "get $nick $nopath($filename) " $chr(1) DCC Get finished $chr(1) $npre Get of $nopath($filename) from $nick finished. +} +on *:getfail:*:{ + if ($hget(nbs,popup_dcc) == 1) n.ptext "get $nick $nopath($filename) " $chr(1) DCC Get failed $chr(1) $npre Failed to get $nopath($filename) from $nick +} +alias notice { + if ($isid) return + if ($2) { + echo $color(notice) -atgq $pre $kl:(notice: $1) $2- + !.notice $1- + } + else n.echo info -atg usage: /notice nick message +} +alias ctcp { + if ($isid) return + if ($2 == ping) set %ctcp.ping.ticks $ticks + n.echo ctcp -atgq $kl:(CTCP to $1) $upper($2)) $3- + !.ctcp $1- +} +alias dcc { + if ($isid) return + .write $cit($logdir $+ -dcc.log) $date $time - Send to $2 $+ : $3- ( $+ $round($calc($file($3).size /1024/1024),2) MB) + !dcc $1- +} +alias msg { + if ($isid) || ($0 < 2) return + if (!$window($1)) echo -atqg $npre $kl:(msg: $1) $2- + else echo $color(own) -qnmti4 $1 $replace($me.style,,$cmode($me,$1,o),,$me) $+  $2- + !.msg $1- +} +alias pastemsg { + if ($isid) || ($0 < 2) return + else echo $color(own) -nmti4 $1 $replace($me.style,,$cmode($me,$1,o),,$me) $+  $2- + !.msg $1- +} +alias say { + if ($active === Status Window) { n.echo info -atg Error: can't use command here } + else msg $active $1- +} +on *:INPUT:*:{ + if ($active === Status Window) || ($left($1,1) == /) && (!$ctrlenter) return + if ($left($target,1) == @) && ($window($target)) return + if ($target ischan) { + hadd -m temp ci. [ $+ [ $cid ] $+ ] . [ $+ [ $chan ] ] $ticks + if ($window($chan).state == hidden) window -w $chan + } + if ($inpaste) && ($left($target,1) != =) { + if ($cb(0) > 1) { + set %paste.target $target + if (!%tmp.paste) dlg paste + set -u1 %tmp.paste 1 + } + else editbox -a $1- + } + elseif (!$halted) msg $target $1- + haltdef +} +on ^*:JOIN:#:{ + haltdef + if ($nick == $me) { + hadd -m temp ci. [ $+ [ $cid ] $+ ] . [ $+ [ $chan ] ] $ticks + .timer 1 9 topicchan # + set -u7 % [ $+ [ # ] $+ ] .disabled 1 + return + } + if ($query($nick)) && ($comchan($nick,0) == 1) { + if ($ncfg(query_show_online) == 1) echo $color(join) -t $nick $npre Online $par(joined $chan) + } + if ($hget(nbs,blacklist) == 1) { + if ($hget(nbs,blacklist_custom_channels) != 1) || ($istok($hget(nbs,blacklist_channels),$chan,32)) { + if ($me isop #) || ($me ishop #) { + if ($n.bluser($address($nick,5)) == 1) !raw -q mode # +b $gettok(%bltmp,1,44) $+ $crlf $+ KICK # $nick : $+ $gettok(%bltmp,2-,44) + } + } + } + if (!$ehide(joins,#)) { + if ($hget(netsplit, [ [ $cid ] $+ ] . [ $+ [ $nick ] ])) { + hinc -m temp netsplit.tj. [ $+ [ $cid ] $+ ] . [ $+ [ # ] ] + if ($hget(temp,netsplit.join.f. [ $+ [ $cid ] $+ ] . [ $+ [ # ] ]) != 1) { + if ($len($hget(temp,netsplit.join. [ $+ [ $cid ] $+ ] . [ $+ [ # ] ]) $nick) < 500) hadd -m temp netsplit.join. [ $+ [ $cid ] $+ ] . [ $+ [ # ] ] $hget(temp,netsplit.join. [ $+ [ $cid ] $+ ] . [ $+ [ # ] ]) $nick $+ $chr(44) + else hadd temp netsplit.join.f. [ $+ [ $cid ] $+ ] . [ $+ [ # ] ] 1 + } + .timer 1 4 hdel netsplit [ [ $cid ] $+ ] . [ $+ [ $nick ] ] + } + if ($hget(temp,netsplit.tj. [ $+ [ $cid ] $+ ] . [ $+ [ # ] ])) .timernetsplitjoin [ $+ [ # ] ] 1 1 n.netsplitjoin # + else { + if ($ialchan($wildsite,#,0) > 1) { + if ($ialchan($wildsite,#,0) < 9) { + var %i = 1, %x + while (%i <= $ialchan($wildsite,#,0)) { + if ($nick != $ialchan($wildsite,#,%i).nick) var %x = %x $cmode($ialchan($wildsite,#,%i).nick,#) $+ $chr(44) + inc %i + } + var %jklon = $par(clones with: $left(%x,-1) $iif(%i > 3,( $+ $calc(%i -2) $+ ))) + } + else var %jklon = $par($calc($ialchan($wildsite,#,0) -1) clones) + } + echo $color(join) -ti4 $chan $npre Join: $nick $par($address) %jklon + } + } +} +on ^*:PART:#:{ + haltdef + if ($nick == $me) { + hdel nbs ci. [ $+ [ $cid ] $+ ] . [ $+ [ $chan ] ] + n.echo join -t # parting channel $par($1-) + echo #  + return + } + if (!$ehide(parts,#)) echo $color(part) -ti4 $chan $npre Part: $cmode($nick,#) $par($address) $par($1-) +} +on *:DNS:{ + haltdef + if (!$raddress) { + echo $color(info) -atgq $npre Unable to resolve $n.quote($dns(0).ip) + set %tmp.dnsresult $dns(0).ip + } + elseif ($dns(0) > 1) { + var %i = 1 + set %tmp.dnsresult $dns(%i) + while (%i <= $dns(0)) { + echo $color(info) -tagq $npre Result %i $+ : $dns(%i).ip  $+ $par($dns(%i)) + inc %i + } + } + else { + set %tmp.dnsresult $raddress + echo $color(info) -tagq $npre Result: $raddress  $+ $par( $iif($naddress == $raddress,$dns(0).ip,$naddress)) $+ , Ctrl+F2: copy to clipboard + } + if (%tmp.i2n == 1) { + host2nick %tmp.dnsresult + unset %tmp.i2n + } +} +on ^*:KICK:#:{ + haltdef + echo $color(kick) -ti4 $chan $npre  $+ $cmode($knick,#) was 4kicked by $nick $par($1-) + if ($knick == $me) { + echo $color(info) -ste $npre kicked from $chan by $cmode($nick,#) $par($address) $par($1-) $iif($ncfg(autorejoin) == 1 && $nick != $me,rejoining in $ncfg(ar_time) $+ s $+ $chr(44) $par(Cancel with Ctrl+F5)) + if ($active != $chan) && ($active != Status Window) echo $color(mode) -atg $npre info: kicked from $chan by $nick $par($1-) $iif($cid != $activecid,$par($network)) + if ($ncfg(autorejoin) == 1) && ($ncfg(ar_time) isnum) && ($nick != $me) .timer [ $+ [ # ] ] 1 [ $ncfg(ar_time) ] n.rejoin # $chankey(#) + set -u [ $+ [ $ncfg(ar_time) ] ] %rejointimer # + if ($hget(nbs,popup_other) == 1) n.ptext - $chr(1) Kicked $chr(1) $npre kicked from $chan by $cmode($nick,#) $par($1-) + if ($hget(nbs,whois_on_kick) == 1) { + set -u10 %whois.window.passive 1 + whois $nick + } + } +} +on ^*:BAN:# { + haltdef + if ($me isop #) && ($hget(nbs,banskydd) == 1) && ($banmask iswm $address($me,5)) && ($nick != $me) { + !raw -q mode # -ob $nick $banmask $+ $crlf $+ KICK # $nick : $+ $hget(nbs,bsmed) + } +} + +on ^*:QUIT:{ + haltdef + if ($query($nick)) echo $color(quit) -t $nick $npre Quit $par($1-) + var %i = 1 + while (%i <= $comchan($nick,0)) { + if (!$ehide(quits,$comchan($nick,%i))) { + if (!$3) && (quit !isin $1) && (. isin $1) && (. isin $2) { + if (!$hget(netsplit)) hmake netsplit 30 + hadd -u1800 netsplit [ [ $cid ] $+ ] . [ $+ [ $nick ] ] 1 + hinc -m temp netsplit.tq. [ $+ [ $cid ] $+ ] . [ $+ [ $comchan($nick,%i) ] ] + if ($hget(temp,netsplit.quit.f. [ $+ [ $cid ] $+ ] . [ $+ [ $comchan($nick,%i) ] ]) != 1) { + if ($len($hget(temp,netsplit.quit. [ $+ [ $cid ] $+ ] . [ $+ [ $comchan($nick,%i) ] ]) $nick) < 500) hadd -m temp netsplit.quit. [ $+ [ $cid ] $+ ] . [ $+ [ $comchan($nick,%i) ] ] $hget(temp,netsplit.quit. [ $+ [ $cid ] $+ ] . [ $+ [ $comchan($nick,%i) ] ]) $nick $+ $chr(44) + else hadd temp netsplit.quit.f. [ $+ [ $cid ] $+ ] . [ $+ [ $comchan($nick,%i) ] ] 1 + } + .timersnetsplitquit 1 1 n.netsplitquit $1- + } + else n.echo quit -ti4 $comchan($nick,%i) Quit: $cmode($nick,$comchan($nick,%i)) $par($address) $par($1-) + } + inc %i + } + if ($hget(nbs,reclaim_nick) == 1) { + if ($address($me,1) == $gettok($hget(temp,disconnect. [ $+ [ $cid ] ]),2,32)) && ($nick == $gettok($hget(temp,disconnect. [ $+ [ $cid ] ]),1,32)) nick $nick + } +} + +on ^*:TOPIC:#:{ + if ($1) { + echo $color(topic) -ti4 $chan - $clr(info,$nick changes topic to:) $1- + if (!$isdir($scriptdirtemp\topic)) mkdir $scriptdirtemp\topic + .write -il1 $+(",$scriptdirtemp\topic\,$md5(#),â,$cid,") $1- + } + else echo $color(topic) -ti4 $chan $npre Topic removed by $nick + haltdef +} +on ^*:INVITE:*:{ + haltdef + if ($n.qnet) && ($ncfg(quakenet_bot_autojoin) == 1) && (($nick == q) || ($nick == l)) join $iif(autojoin_minimize == 1,-n) $chan + elseif ($n.unet) && ($ncfg(undernet_bot_autojoin) == 1) && ($nick == x) join $iif(autojoin_minimize == 1,-n) $chan + n.echo notice -atm $nick $par($address) invited you to $chan + if ($hget(nbs,popup_other) == 1) n.ptext - $chr(1) Invite $chr(1) $bpre $nick invited you to $chan +} +on ^*:NICK:{ + haltdef + if ($nick === $newnick) return + if ($nick == $me) echo $color(nick) -st $npre Nick changed to: $newnick + elseif ($query($newnick)) echo $color(nick) -t $newnick $npre $clr(highlight,$nick) is now known as $clr(highlight,$newnick) + var %i = 1 + while (%i <= $comchan($newnick,0)) { + if (!$ehide(nicks,$comchan($newnick,%i))) echo $color(nick) -t $comchan($newnick,%i) $npre $cmode($newnick,$comchan($newnick,%i),_) $+ $clr(highlight,$nick) is now known as $cmode($newnick,$comchan($newnick,%i),_) $+ $clr(highlight,$newnick) + inc %i + } +} +on *:EXIT:{ + scon -a clearall + close -@ + cuptime +} + +raw 366:*:{ + if (!$chan($2).ial) .timer 1 1 whochan $2 + set %jkanal $2 + set -u15 %ctcp.ignore $2 + if (%show.names == 1) { + n.echo notice -sgm $clr(norm,$+(,$2,:)) $3- + echo $color(info) -sg - + window -g2 "status window" + haltdef + } + else n.echo info -t $2 $n.chanstats($2) + unset %show.names +} +raw 352:*:{ + if (%dns2nick.host) { + inc %dns2nick.times + if (%dns2nick.times == 1) set %dns2nick.users $6 + else set %dns2nick.users %dns2nick.users $+ , $6 + haltdef + } + if (%n.whosvar != 1) { haltdef } +} +raw 315:*:{ + if (%dns2nick.host) { + if (!%dns2nick.times) echo $color(info) -atg $npre Couldn't find any user with that host + elseif (%dns2nick.times == 1) echo $color(info) -atg $npre User found: %dns2nick.users + else echo $color(info) -at $npre %dns2nick.times users found: %dns2nick.users + unset %dns2nick* + haltdef + } + if ($2 == %csial) clonescan $2 + if (%n.whosvar != 1) { haltdef } + unset %csial %n.whosvar +} +raw 332:*:{ + haltdef + if ($2 ischan) echo $color(topic) -ti5 $2 - Topic: $3- + else echo $color(topic) -atgi5 - Topic in $2 $+ : $3- +} +raw 333:*:{ + haltdef + if ($2 ischan) echo $color(info) -ti4 $2 - Set by $clr(topic,$3) on $date($4, dd/mm/yyyy - HH:nn:ss) $par($dur($calc($ctime - $4),2) ago) + else echo $color(info) -atgi4 - Set by $clr(topic,$3) on $date($4, dd/mm/yyyy - HH:nn:ss) $par($dur($calc($ctime - $4),2) ago) +} +raw 479:*:n.echo info -atg Unable to join $2 $par($3-) | haltdef +raw 406:*:n.echo info -atg $3- $par($2) | haltdef +raw 401:*:n.echo info -atg $3- $par($2) | haltdef +raw 403:*:n.echo info -atg $3- $par($2) | haltdef +raw 005:*:{ + if ($wildtok($1-,topiclen=*,1,32)) set %topiclen. [ $+ [ $cid ] ] $right($ifmatch,-9) + if ($wildtok($1-,maxbans=*,1,32)) set %maxbans. [ $+ [ $cid ] ] $right($ifmatch,-8) + cbinfo +} +raw 329:*:{ + if ($2 !isin %körv) { + if ($calc($ctime - $3) > 60) n.echo info -t $2 Channel created: $date($3,HH:nn:ss - dd/mm/yyyy) $par($dur($calc($ctime - $3),2) ago) + else n.echo info -t $2 Channel created + set -u30 %körv %körv $2 + } +} +raw 331:*:{ + if ($me ison $2) echo $color(topic) -t $2 $npre No topic set + else echo $color(topic) -atg $npre No topic set on $2 + haltdef +} +raw 001:*:cbinfo +raw 002:*:cbinfo +raw 003:*:cbinfo +raw 004:*:cbinfo +raw 251:*:cbinfo +raw 252:*:cbinfo +raw 253:*:cbinfo +raw 254:*:cbinfo +raw 255:*:cbinfo +raw 375:*:cbinfo +raw 376:*:cbinfo +raw 472:*:n.echo info -atg $n.quote($2) $3- +raw 477:*:n.echo info -atg Unable to join $2 $par($3-) | haltdef +raw 473:*:n.echo info -atg Unable to join $2 $par(invite only) | haltdef +raw 474:*:n.echo info -atg Unable to join $2 $par(you are banned) | haltdef +raw 404:*:n.echo info -atg $3- $par($2) | haltdef +raw 405:*:n.echo info -stge $2- | haltdef +raw 402:*:n.echo info -atg No such nick/server $par($2) | haltdef +raw 432:*:n.echo info -atg $3- $n.quote($2) | haltdef +raw 499:*:n.echo info -atg $3- $par($2) +raw 433:*:{ + haltdef + n.echo info -atg Nickname $n.quote($2) is already in use + if ($ncfg(nickserv_on) == 1) && ($ncfg(nickserv_ghost) == 1) .timer 1 3 nickserv_ghost +} +raw 467:*:echo $color(info) -tg $2 $npre $3- | haltdef +raw 438:*:echo $color(info) -atg $npre $3- | haltdef +raw 441:*:echo $color(info) -stge $npre $2- | haltdef +raw 396:*:echo $color(info) -stge $npre $clr(high,$2) $3- | haltdef +raw 442:*:n.echo info -atg You are not on that channel $par($2) | haltdef +raw 461:*:n.echo info -atg $3- $par($lower($2)) | haltdef +raw 471:*:n.echo info -atg Unable to join $2 $par(channel is full) | haltdef +raw 486:*:n.echo info -atg $3- $par($2) | haltdef +raw 475:*:n.echo info -atg Unable to join $2 $par(need correct key) | haltdef +raw 481:*:n.echo info -atg $2- | haltdef +raw 482:*:echo $color(info) -tg $2 $npre $2 $+ : $3- | haltdef +raw 478:*:n.echo info -atg $4- $par($3) | haltdef +raw 443:*:n.echo info -atg $2 is already on $3 | haltdef +raw 341:*:n.echo info -atg Invited $2 to $3 | haltdef +raw 305:*:{ + var %x = $2- $par($iif($awaytime,away for $dur($awaytime))) + n.echo notice -stge %x + if ($active != status window) n.echo notice -atg %x + titleupdate + haltdef +} +raw 306:*:{ + var %x = $2- $par($awaymsg) + n.echo notice -stge %x + if ($active != status window) n.echo notice -atg %x + titleupdate + haltdef +} +raw 311:*:{ + unset %w-* + if (%whois.idle != 1) { + if ($ncfg(whois) == @whois) { + set %w-dest @whois ( $+ $cid $+ ) + if (!$window(%w-dest)) { + if ($ncfg(whois_inside) == 1) { + window -k0n %w-dest + if ($appactive) && ($activecid == $cid) window -a %w-dest + } + else window -k0d $+ $iif(%whois.window.passive,n) %w-west 200 200 600 200 + } + else { + if ($ncfg(whois_inside) != 1) dline %w-dest 1 + if (%whois.idle != 1) window -g1 %w-dest + } + } + else set %w-dest $ncfg(whois) + } + set %whois 1 + set %w-nick $2 + set %w-address echo $color(whois) %w-dest $chr(160) $+ › address: $3 $+ $clr(highlight,@) $+ $4 + set %w-name echo $color(whois) %w-dest $chr(160) $+ › name: $6- + haltdef +} +raw 312:*:set %w-server echo $color(whois) %w-dest $chr(160) $+ › server: $3 $par($4-) | haltdef +raw 313:*:set %w-ircop echo $color(whois) %w-dest $chr(160) $+ › irc operator | haltdef +raw 301:*:{ + haltdef + if (%whois == 1) set %w-away echo $color(whois) %w-dest $chr(160) $+ › away: $3- + elseif (!%waway. [ $+ [ $2 ] ]) { + echo $color(info) -tg $2 $npre $2 is away $par($3-) + set -u3600 %waway. [ $+ [ $2 ] ] 1 + } +} +raw 317:*:{ + if ($calc($ctime - $4) > 1) var %s = $dur($ifmatch) ago + set %w-time echo $color(whois) %w-dest $chr(160) $+ › idle: $dur($3) $+ , signed on: $date($4,HH:nn:ss - dd/mm/yyyy) $par(%s) + if (%whois.idle) n.echo info -atg $2 has been idle for $dur($3) + haltdef +} +raw 353:*:{ + if (%show.names == 1) { + n.echo norm -gs $3 $+ : $replace($4-,@,$clr(notice,@),+,$clr(notice,+),%,$clr(notice,%),~,$clr(notice,~),&,$clr(notice,&)) + haltdef + } +} +raw 330:*:if (%whois == 1) { set %w-auth echo $color(whois) %w-dest $chr(160) $+ › auth: $3 | haltdef } | else { haltdef } +raw 307:*:if (%whois == 1) { set %w-registered 1 | haltdef } +raw 338:*:{ + haltdef + if (%whois == 1) { + if ($n.qnet) { set %w-realip echo $color(whois) %w-dest $chr(160) $+ › user@host: $3 $par($4) } + else set %w-realip echo $color(whois) %w-dest $chr(160) $+ › user@host: $3- + } +} +raw 318:*:{ + if (%whois.idle != 1) { + if (%w-name) echo $color(whois) %w-dest $chr(160) + if (%w-nick) echo $color(high) %w-dest $kl(whois: %w-nick) $par($iif(%w-registered == 1,registered nick)) + if (%w-name) $ifmatch + if (%w-address) $ifmatch + if (%w-chans) $ifmatch + if (%w-ircop) $ifmatch + if (%w-auth) $ifmatch + if (%w-realip) $ifmatch + if (%w-away) $ifmatch + var %i = 1 + while (%i <= %w-other-count) { + echo $color(whois) %w-dest %w-other [ $+ [ %i ] ] + inc %i + } + if (%w-server) $ifmatch + if (%w-time) $ifmatch + if (%whois == 1) { + echo $color(high) %w-dest $kl(/whois: $time(HH:nn)) + echo $color(whois) %w-dest $chr(160) + } + } + unset %whois* %w-* + haltdef +} +raw 319:*:{ + var %c = $3- + if ($2 != $me) { + var %i = 1 + while (%i <= $comchan($2,0)) { + var %x = $comchan($2,%i), %c = $reptok(%c,$cmode($2,%x,_) $+ %x,$cmode($2,%x,_) $+  $+ %x $+ ,1,32) + inc %i + } + } + set %w-chans echo $color(whois) %w-dest $chr(160) $+ › channels: %c $par($calc($0 - 2)) + haltdef +} +raw 314:*:{ + unset %w-* + if (%whois.idle != 1) { + if ($ncfg(whois) == @whois) { + set %w-dest @whois ( $+ $cid $+ ) + if (!$window(%w-dest)) { + if ($ncfg(whois_inside) == 1) { + window -k0n %w-dest + if ($appactive) && ($activecid == $cid) window -a %w-dest + } + else window -k0d $+ $iif(%whois.window.passive,n) %w-west 200 200 600 200 + } + else { + if ($ncfg(whois_inside) != 1) dline %w-dest 1 + if (%whois.idle != 1) window -g1 %w-dest + } + } + else set %w-dest $ncfg(whois) + } + set %whois 1 + set %w-nick $2 + set %w-address echo $color(whois) %w-dest $chr(160) $+ › address: $3 $+ $clr(highlight,@) $+ $4 + set %w-name echo $color(whois) %w-dest $chr(160) $+ › name: $6- + echo $color(whois) %w-dest $chr(160) + haltdef +} +raw 369:*:{ + if (%w-name) echo $color(whois) %w-dest $chr(160) + if (%w-nick) echo $color(high) %w-dest $kl(whowas: %w-nick) + if (%w-name) $ifmatch + if (%w-address) $ifmatch + if (%w-chans) $ifmatch + if (%w-ircop) $ifmatch + if (%w-auth) $ifmatch + if (%w-realip) $ifmatch + if (%w-away) $ifmatch + var %i = 1 + while (%i <= %w-other-count) { + echo $color(whois) %w-dest %w-other [ $+ [ %i ] ] + inc %i + } + if (%w-server) $ifmatch + if (%w-time) $ifmatch + if (%whois == 1) { + echo $color(high) %w-dest $kl(/whowas: $time(HH:nn)) + echo $color(whois) %w-dest $chr(160) + } + if ($window(%w-dest)) window -a %w-dest + unset %whois* %w-* + haltdef +} +raw 367:*:{ + haltdef + if (%unba == 1) { + inc %totbans1 + set %ban $+ %totbans1 $3 + } + elseif ($dialog(cc)) { + did -a cc 2 $3 $chr(9) $+ $iif($4 === $server,(server),$4) $chr(9) $+ $date($5,HH:nn - dd/mm/yy) + inc %totbans + } + elseif (%ccc.banget) haltdef + else echo $color(info) -smtg $npre $kl($clr(normal,$3)) Set by $4 on $date($5,HH:nn - dd/mm/yy) $par($dur($calc($ctime - $5)) ago) +} +raw 368:*:{ + haltdef + if ($dialog(cc)) { + if (%totbans > 0) did -ra cc 4 Bans ( $+ %totbans $+ / $+ $n.maxbans $+ ) + else did -ra cc 4 Bans (0/ $+ $n.maxbans $+ ) + unset %totbans + if (%adopgk == 1) { + did -r cc 2 + did -ra cc 4 Bans + } + } + elseif (%ccc.banget) { haltdef | unset %ccc.banget } + else echo $color(info) -stge $npre $kl($clr(normal,$2)) $3- +} +raw 346:*:{ + haltdef + if ($dialog(cc)) { + did -i cc 2 2 $3 $chr(9) $+ $4 $chr(9) $+ $date($5,HH:nn - dd/mm/yy) + inc %totbans + } + elseif (%ccc.banget) haltdef + else echo $color(info) -stge $npre $kl($clr(normal,$3)) +} +raw 347:*:{ + haltdef + if ($dialog(cc)) { + if (%totbans > 0) did -ra cc 4 Invites ( $+ %totbans $+ ) + else did -ra cc 4 Invites (none) + unset %totbans + } + elseif (%ccc.banget) { haltdef | unset %ccc.banget } + else echo $color(info) -stge $npre $kl($clr(normal,$2)) $3- +} +raw 348:*:{ + haltdef + if ($dialog(cc)) { + did -i cc 2 2 $3 $chr(9) $+ $4 $chr(9) $+ $date($5,HH:nn - dd/mm/yy) + inc %totbans + } + elseif (%ccc.banget) haltdef + else echo $color(info) -stge $npre $kl($clr(normal,$3)) +} +raw 349:*:{ + haltdef + if ($dialog(cc)) { + if (%totbans > 0) did -ra cc 4 Excepts ( $+ %totbans $+ ) + else did -ra cc 4 Excepts (none) + unset %totbans + } + elseif (%ccc.banget) { haltdef | unset %ccc.banget } + else echo $color(info) -stge $npre $kl($clr(normal,$2)) $3- +} +;raw 324:*:return +;raw 372:*:return +;raw 422:*:return +;raw 303:*:return +raw *:*:{ + if (%whois == 1) { + haltdef + inc %w-other-count + set %w-other $+ %w-other-count $chr(160) $+ › $2 $+  $3- + } + ;else n.echo info -atgm $2- +} + +; popup menu + +menu nicklist { + Whois:whois $$1 + Idle:idle $$1 + - + $iif($me isop #, $iif($1 isop #, - op,+ op),$style(2) +/- op):if ($1 isop #) emode - o | else emode + o + $iif($me isop # || $me ishop # && % isin $npre, $iif($1 ishop #, - halfop,+ halfop),):if ($1 ishop #) emode - h | else emode + h + $iif($me isop # || $me ishop #, $iif($1 isvoice #, - voice,+ voice),$style(2) +/- voice):if ($1 isvoice #) emode - v | else emode + v + $iif($len($prefix) > 3,+/- custom):{ + var %x = $n.input(Enter custom mode (eg: +a or -a):) + if (%x) emode $mid(%x,1,1) $mid(%x,2,1) + } + - + $iif($me isop # || $me ishop #, Kick,$style(2) Kick) + .Kick:{ + var %i = 1 + while (%i <= $snick(#,0)) { + kick $chan $snick(#,%i) $read(config\kicks.txt) + inc %i + } + } + .Kick $chr(9) (reason):{ + var %i = 1, %kmsg = $$n.input(Enter kick reason:) + while (%i <= $snick(#,0)) { + kick $chan $snick(#,%i) %kmsg + inc %i + } + } + $iif($me isop # || $me ishop #, Ban,$style(2) Ban) + .Ban, kick:{ + var %i = 1 + while (%i <= $snick(#,0)) { + bk # $snick(#,%i) $read(config\kicks.txt) + inc %i + } + } + .Ban, kick (reason):{ + var %kick = $$n.input(Enter kick reason:), %i = 1 + while (%i <= $snick(#,0)) { + bk # $snick(#,%i) %kick + inc %i + } + } + .- + .Kick, ban:{ + var %i = 1 + while (%i <= $snick(#,0)) { + kb # $snick(#,%i) $read(config\kicks.txt) + inc %i + } + } + .Kick, ban (reason):{ + var %kick = $$n.input(Enter kick reason:), %i = 1 + while (%i <= $snick(#,0)) { + kb # $snick(#,%i) %kick + inc %i + } + } + .- + .$iif($n.qnet && q ison #,Kick $+ $chr(44) Q ban auth):{ + var %i = 1 + while (%i <= $snick($chan,0)) { + msg Q chanlev # $snick(#,%i) +b + kick # $snick(#,%i) $read(config\kicks.txt) + inc %i + } + } + .$iif($n.qnet && q ison #,Kick $+ $chr(44) Q ban auth (reason)):{ + var %kick = $$n.input(Enter kick reason:), %i = 1 + while (%i <= $snick($chan,0)) { + msg Q chanlev # $snick($chan,%i) +b + kick # $snick(#,%i) %kick + inc %i + } + } + .- + .$iif($n.qnet && q ison #,Q ban host):{ + var %i = 1 + while (%i <= $snick(#,0)) { + msg Q ban # $address($snick($chan,%i),$ncfg(ban_mask)) + inc %i + } + } + - + Stuff + .Blacklist + ..$$1 (nick only):.write config\blacklist.txt $1 $+ $chr(44) $$n.input(Enter blacklist reason:,Blacklisted) | w_ncfg blacklist 1 | n.blscan # | n.blscanall + ..$address($snicks,2):.write config\blacklist.txt $address($snicks,2) $+ $chr(44) $+ $$n.input(Enter blacklist reason:,Blacklisted) | w_ncfg blacklist 1 | n.blscan # | n.blscanall + ..$address($snicks,1):.write config\blacklist.txt $address($snicks,1) $+ $chr(44) $+ $$n.input(Enter blacklist reason:,Blacklisted) | w_ncfg blacklist 1 | n.blscan # | n.blscanall + ..- + ..Edit blacklist:blist + .Ignore + ..$$1 (nick only):ignore $1 | .ignore on + ..$address($snicks,2):ignore $address($snicks,2) | .ignore on + ..$address($snicks,1):ignore $address($snicks,1) | .ignore on + .Auto op + ..$$1 (nick only):aop $1 # | .aop on + ..$address($snicks,2):aop $address($snicks,2) # | .aop on + ..$address($snicks,1):aop $address($snicks,1) # | .aop on + .Auto voice + ..$$1 (nick only):avoice $1 # | .avoice on + ..$address($snicks,2):avoice $address($snicks,2) # | .avoice on + ..$address($snicks,1):avoice $address($snicks,1) # | .avoice on + + .Edit:uwho + .- + .IP $chr(9) (/dns):dns $$1 + .View log $chr(9) (/logg):{ + !query -n $$1 + if ($exists($window($1).logfile)) run $window($1).logfile + !close -m $$1 + } + .$iif($notify($1),Remove from notify list,Add to notify list):notifyer $1 + .Host2nick $chr(9) (/host2nick host):dns2nick $remove($address($$1,2),*!*@) + .Request op $chr(9) (QuakeNet):msg R requestop # $$1 + .- + Slap:slap $$1 + - + $iif(q ison #,Q flags):botcontrol # $1 + - + DCC/CTCP + .[DCC]:return + .- + .Send:dcc send $$1 + .Chat:dcc chat $$1 + .Send current song:mp3send $$1 + .- + .[CTCP]:return + .- + .Ping:ctcp $$1 PING + .Version:ctcp $$1 VERSION + .Finger:ctcp $$1 FINGER + .Time:ctcp $$1 TIME +} + +menu status { + $iif($status == connected,Reconnect $chr(9) (/server)):server + - + Control Panel $chr(9) (/setup):setup + Auto connect settings $chr(9) (/autocon):autocon + Autojoin settings $chr(9) (/caj):caj + NickServ settings $chr(9) (/cns):cns + - + $iif($status == connected,,$style(2)) Force autojoin $chr(9) (/aj):aj + $iif($n.qnet && $status == connected,,$style(2)) Auth with Q $chr(9) (/auth):auth + $iif($status == connected,,$style(2)) Set mode +x $chr(9) (/mode nick +x):mode $me +x + $iif($status == connected,,$style(2)) Check lag $chr(9) (/clag):clag + $iif($status == connected,,$style(2)) MOTD $chr(9) (/motd):motd + - + $iif($n.qnet && $status == connected,Q bot) + .Auth now:auth + .Register:msg Q hello $$n.input(Enter your mail address:) $$n.input(Enter your mail address again:) + .- + .Whoami:msg Q whoami + .Whois:msg Q whois $$n.input(Enter nick name: $crlf $crlf $+ (Prefix nick with $chr(35) to use auth nick)) + .Change password:.msg Q@CServe.quakenet.org newpass $$n.input(Enter your new password:) $$n.input(Enter your new password again:) + .Change mail:.msg Q@CServe.quakenet.org email $$n.input(Enter your auth password:) $$n.input(Enter your new mail address:) $$n.input(Enter your new mail address again:) + .Request password:msg Q requestpassword $$n.input(Enter your mail address:) + .Show auth history:msg Q authhistory +} + +menu channel { + $left(#,12) $+ $iif($len(#) > 12,...) + .Chan central $chr(9) (/cc #chan):channel $1- + .Hide events $chr(9) (/hevents #chan):hevents # + .- + .Search log $chr(9) (/slog ):if ($input(Search for:,e,Search log)) slog $! + .View log $chr(9) (/logg):logg + .View log $chr(9) (external):{ + if ($exists($window($active).logfile)) run $window($active).logfile + else n.echo other -at no log file found for $active + } + .Show topic $chr(9) (default F7):topic # + .Clear $chr(9) (/clear):clear + .Clonescan $chr(9) (/clonescan #chan):clonescan # + .- + .$iif($n.qnet,Request op $chr(9) (QuakeNet)):.msg R requestop $chan $me + .$iif($n.qnet,Request op $chr(9) (choose nick)):.msg R requestop $chan $$n.input(Enter nick name:) + .- + .$iif(Q !ison # && $n.qnet,request Q):msg R requestbot # + .- + .$iif($me ison #,Leave $chr(9) (/part),Join $chr(9) (/join #chan)):$iif($me ison #,part #,join # $chan(#).key) + .Rejoin $chr(9) (/hop):hop + + Autojoin + .$iif($read(config\autojoin- [ $+ [ $network ] $+ ] .txt,w,[ $chan [ $+ ] * ]),Remove # from autojoin,Add # to autojoin):n.aj.edit # + .Edit autojoin on $network:{ + var %a = config\autojoin- $+ $network $+ .txt + if (!$read(%a)) write -c %a + caj $network + } + .- + .$iif($ncfg(autojoin) == 1,$style(1) Autojoin $+ $chr(58) on,Autojoin $+ $chr(58) off):{ + if ($ncfg(autojoin) == 1) w_ncfg autojoin o + else w_ncfg autojoin 1 + } + $iif(q ison # && $n.qnet,Q bot) + .Nick + ..Auth now:auth + ..Register:msg Q hello $$n.input(Enter your mail address:) $$n.input(Enter your mail address again:) + ..- + ..Whoami:msg Q whoami + ..Whois:msg Q whois $$n.input(Enter nick name: $crlf $crlf $+ (Prefix nick with $chr(35) to use auth nick)) + ..Change password:.msg Q@CServe.quakenet.org newpass $$n.input(Enter your new password:) $$n.input(Enter your new password again:) + ..Change mail:.msg Q@CServe.quakenet.org email $$n.input(Enter your auth password:) $$n.input(Enter your new mail address:) $$n.input(Enter your new mail address again:) + ..Request password:msg Q requestpassword $$n.input(Enter your mail address:) + ..Show auth history:msg Q authhistory + .Channel + ..Show welcome message:msg Q welcome # + ..Show and edit welcome message:msg Q welcome # | editbox -ap /msg Q welcome # + ..- + ..Show online users:msg Q users # + ..Show all added users:msg Q chanlev # + ..Show chanstats:msg Q chanstat # + ..Show op history:msg Q chanophistory # + ..Show banlist:msg Q banlist # + ..Show autolimit:msg Q autolimit # + ..Clear bans:msg Q banclear # + ..Clear chanmodes:msg Q clearchan # + ..Deop all users:msg Q deopall # + .Chanflags + ..Show channel flags:msg Q chanflags # + ..- + ..Known only $chr(9) (+k) + ...on:msg Q chanflags # +k + ...off:msg Q chanflags # -k + ..Enforce bans $chr(9) (+e) + ...on:msg Q chanflags # +e + ...off:msg Q chanflags # -e + ..Voice all $chr(9) (+v) + ...on:msg Q chanflags # +v + ...off:msg Q chanflags # -v + ..Bitch mode $chr(9) (+b) + ...on:msg Q chanflags # +b + ...off:msg Q chanflags # -b + ..Channel-limit $chr(9) (+c) + ...on:msg Q chanflags # +c + ...off:msg Q chanflags # -c + ..Force topic $chr(9) (+f) + ...on:msg Q chanflags # +f + ...off:msg Q chanflags # -f + ..Force key $chr(9) (+k) + ...on:msg Q chanflags # +k + ...off:msg Q chanflags # -k + ..Force limit $chr(9) (+l) + ...on:msg Q chanflags # +l + ...off:msg Q chanflags # -l + ..Protect ops $chr(9) (+p) + ...on:msg Q chanflags # +p + ...off:msg Q chanflags # -p + ..Topic save $chr(9) (+t) + ...on:msg Q chanflags # +t + ...off:msg Q chanflags # -t + ..Welcome message $chr(9) (+w) + ...on:msg Q chanflags # +w + ...off:msg Q chanflags # -w + .- + .Show commands:msg Q showcommands + .- + .Request op:msg Q op # + .Request voice:msg Q voice # + - + Stuff + .Say sys info + ..Complete $chr(9) (/sys):sys + ..- + ..OS $chr(9) (/os):os + ..CPU $chr(9) (/cpu):cpu + ..Memory usage $chr(9) (/mem):/mem + ..Graphics card $chr(9) (/gfx):gfx + ..Sound card $chr(9) (/snd):snd + ..Total hdd free space $chr(9) (/hd):hd + ..Individual free space $chr(9) (/hds):hds + ..Ind. free space w/ labels $chr(9) (/hds -l):hds -l + ..Ind. mapped free space $chr(9) (/hds -m):hds -m + ..Ind. mapped free space w/ labels $chr(9) (/hds -ml):hds -ml + ..Uptime $chr(9) (/uptime):uptime + ..Connection $chr(9) (/net):net + ..IP address $chr(9) (/ip):ip + ..Bandwidth usage $chr(9) (/bw):bw + ..Change network card used for /bw:.echo -qg $dedll(change_adapter) + .- + .Voting $chr(9) (y/n) + ..Begin $chr(9) (/vote):vote + ..End $chr(9) (/voteoff):voteoff + .Say power $chr(9) (/power):power + .Advertise script $chr(9) (/ad):ad + .Lag-check (echo) $chr(9) (/clag):clag + .- + .Google search $chr(9) (/g query):editbox -p /g + .Wikipedia search $chr(9) (/wiki query):editbox -p /wiki + .IMDb search $chr(9) (/imdb query):editbox -p /imdb + .- + .Export log $chr(9) (/exportlog) + ..This channel:exportlog $window($active).logfile + ..Select log file:exportlog + Configuration + .Control Panel $chr(9) (/setup, F2):setup + .- + .Misc settings $chr(9) (/misc):misc + .Theme/font settings $chr(9) (/theme):theme + .Sound/highlight settings $chr(9) (/nq):nq + .Song announce $chr(9) (/sa):sa + .Protections $chr(9) (/prot):prot + .Auto connect $chr(9) (/autocon):autocon + .Autojoin $chr(9) (/caj):caj + .QuakeNet setup $chr(9) (/quakenet):quakenet + .UnderNet setup $chr(9) (/undernet):undernet + .NickServ setup $chr(9) (/cns):cns + .Notifications $chr(9) (/popups):popups + .F-key bindings $chr(9) (/fkeys):fkeys + .Logviewer $chr(9) (/lv):lv + .Game launcher $chr(9) (/g-join):g-join + .Blacklist $chr(9) (/blist):blist + .Alarm timer $chr(9) (/alarm):alarm + - + Song announce + .Advertise current song:np + .Settings:mp3say + .- + .Winamp only $+ $chr(58):. + .(Shift+F1) $+ $chr(58) Previous:sf1 + .(Shift+F2) $+ $chr(58) Play:sf2 + .(Shift+F3) $+ $chr(58) Pause:sf3 + .(Shift+F4) $+ $chr(58) Stop:sf4 + .(Shift+F5) $+ $chr(58) Next:sf5 + .- + .Start Winamp:{ + if ($exists($cit($ncfg(wapath)))) { run $ncfg(wapath) } + else { + w_ncfg wapath $sfile(winamp.exe,Locate your winamp.exe) + if ($exists($cit($ncfg(wapath)))) { run $ncfg(wapath) } + } + } + .Close Winamp:dll scripts\dll\winamp.dll closewinamp + $iif(%psybnc. [ $+ [ $cid ] ],psyBNC) + .Play private log:!raw -q playprivatelog + .Erase private log:!raw -q eraseprivatelog + .- + .Play traffic log (last):!raw -q playtrafficlog last + .Erase traffic log:!raw -q erasetrafficlog + .- + .Open psyBNC window:n.bnc psyBNC | window -a $bncwin(psybnc,$cid) + $iif(%sbnc. [ $+ [ $cid ] ],sBNC) + .Read log:n.bnc sbnc read + .Erase log:n.bnc sbnc erase + .- + .Open sBNC window:n.bnc sBNC | window -a $bncwin(sbnc,$cid) + Change nick:editbox -a /nick $me + - + Away + .$iif(!$away,Set away (default F3),$style(2) Set away (default F3))):awaysys + .$iif($away,Return (default F4),$style(2) Return (default F4))):back + .- + .$iif($away,Change away msg,$style(2) Change away message):away $$n.input(Enter new away message:) +} +menu query { + Info + .Whois (extended):whois $$1 + .Whois (normal):whois2 $$1 + .- + .Whois (Q):msg Q whois $$1 + .Whois (L):msg L whois $$1 + .- + .DNS (ip):dns $$1 + .Host-2-nick:dns2nick $remove($address($$1,2),*!*@) + - + $iif($ncfg(privpip) == 1,$style(1) Query sound,Query sound):{ + if ($ncfg(privpip) == 1) { w_ncfg privpip o } + else { w_ncfg privpip 1 } + } + - + Ignore $1 + .$address($1,2):ignore $address($1,2) | n.echo normal -atg Note: If you have a query window open with someone, private messages from them won't be ignored even if their address matches an ignore address. + .$address($1,1):ignore $address($1,1) | n.echo normal -atg Note: If you have a query window open with someone, private messages from them won't be ignored even if their address matches an ignore address. + .$1 $+ *@*:ignore $1 | n.echo normal -atg Note: If you have a query window open with someone, private messages from them won't be ignored even if their address matches an ignore address. + Edit ignore list:uwho + - + $iif($notify($1),Remove from notify list,Add to notify list):notifyer $1 + Open get dir:{ + if ($isdir($getdir $+ $1 $+ )) run $getdir $+ $1 + else n.echo info -atg No download dir found for $1 $par($getdir $+ $1) + } + Logfile + .View log:logg + .View log (external):run $n.log($active) + .Search in log:slog $$n.input(Search for:)) + .Export/save log:exportlog $n.log($active) + - + DCC/CTCP + .[DCC]:return + .- + .Send:dcc send $$1 + .Chat:dcc chat $$1 + .Send current song:mp3send $$1 + .- + .[CTCP]:return + .- + .Ping:ctcp $$1 ping + .Time:ctcp $$1 time + .Finger:ctcp $$1 finger + .Version:ctcp $$1 version +} +menu menubar { + .Control Panel (F2):setup + Windows + .Close all windows:partall | close -icfgms@ + .Close all querys:scon -a close -m + .- + .Leave all channels (/partall):partall + .Leave all channels (reason):partall $$n.input(Enter part reason:) + .- + Away + .$iif(!$away,Set away (F3),$style(2) Set away (F3))):awaysys + .$iif($away,Return (F4),$style(2) Return (F4))):back + .- + .$iif($away,Change away msg,$style(2) Change away message):away $$n.input(Enter new away message:) + - + Alarm timer:alarm + Open DCC get folder:run $getdir +} +menu @preview { + rclick:close -@ @preview* +} +menu @previewx { + sclick:window -a @preview + rclick:close -@ @preview* +} +menu @whois (*),@highlights (*) { + dclick:{ + if ($window($active).mdi) window -n $active + else close -@ $active + } + Settings:misc +} +menu @psybnc (*) { + Play private log:!raw -q PLAYPRIVATELOG + Erase private log:!raw -q ERASEPRIVATELOG + - + Play traffic log (last):!raw -q playtrafficlog last + Erase traffic log:!raw -q erasetrafficlog + - + Bwho (list users):!raw -q bwho + - + Away + .set away-msg (setaway):echo -t $active $npre ex. setaway :offline | editbox $active /quote setaway $chr(58) + .set public away-msg (setleavemsg):echo -t $active $npre ex. setaway :offline | editbox $active /quote setleavemsg $chr(58) + .- + .set away-nick (setawaynick):editbox -p $active /quote setawaynick + Server + .bconnect:!raw -q bconnect + .bquit:!raw -q bquit + .jump:!raw -q bjump +} +menu @sbnc (*) { + Read log:n.bnc sbnc read + Erase log:n.bnc sbnc erase + - + jump:n.bnc sbnc jump + partall:n.bnc sbnc partall + status:n.bnc sbnc status + vhosts:n.bnc sbnc vhosts +} +menu @logviewer { + dclick:{ + var %f = $remove($logdir,$mircdir) $+ $line(@logviewer,$1,1), %h = $nofile(%f) $+ $mid($nopath(%f),3,-2) + if ($isdir(%h)) || ($mid($nopath(%f),3,-2) == ..) { + if ($mid($nopath(%f),3,-2) == ..) var %h = $left(%h,-3) + clear -l @logviewer + clear @logviewer + aline -l @logviewer $chr(91) .. $chr(93) + var %a = $finddir(%h,*,0,1,aline -l @logviewer $chr(91) $nopath($1-) $chr(93)) + echo @logviewer $npre $findfile(%h,*.log,0,1,aline -l @logviewer $nopath($1-)) log files and %a folders in %h + set %lv.dir %h $+ \ + } + else { + var %y = %lv.dir $+ $nopath(%f) + if ($file(%y).size > 10000000) { + if (!$n.input(This is a very large log file ( $+ $round($calc($file(%y).size /1024/1024),2) MB) $+ $c44 loading will take some time. Do you want to continue?,y/n)) return + } + clear @logviewer + loadbuf -p @logviewer $cit(%y) + echo @logviewer $npre $kl:($nopath(%f)) $lines(%y) lines, $round($calc($file(%y).size /1024),2) KB + } + titlebar @logviewer - %lv.dir + } + - + $iif($sline(@logviewer,0) && $left($sline(@logviewer,1),1) != [,Rename log) { + var %file = $+(",%lv.dir,$sline(@logviewer,1),") + if ($exists(%file)) { + var %newname = $n.input(Enter new name (name.log):,$nopath(%file))" + if (!%newname) { return } + var %newfile = $+(",%lv.dir,$iif($right(%newname,4) == .log,%newname,$+(%newname,.log)),") + } + else { + echo @logviewer $npre %file does not exist + dline -l @logviewer $sline(@logviewer,1).ln + return + } + if ($exists(%newfile)) { echo @logviewer $npre %newfile already exists | return } + .rename %file %newfile + if ($exists(%newfile)) { + echo -t @logviewer $npre $nopath(%file) renamed to $nopath(%newfile) + rline -l @logviewer $sline(@logviewer,1).ln $nopath(%newfile) + } + } + $iif($sline(@logviewer,0) && $left($sline(@logviewer,1),1) != [,Delete log) { + var %file = $+(",%lv.dir,$sline(@logviewer,1),") + if ($exists(%file)) { + if ($n.input(Delete $nopath(%file) $+ ?,y/n)) { + .remove %file + dline -l @logviewer $sline(@logviewer,1).ln + echo -t @logviewer $npre %file deleted + } + } + else { + echo @logviewer $npre %file does not exist + dline -l @logviewer $sline(@logviewer,1).ln + } + } + - + $iif($sline(@logviewer,0) && $left($sline(@logviewer,1),1) != [,Open selected file):run $+(",%lv.dir,$sline(@logviewer,1),") + $iif($sline(@logviewer,0) && $left($sline(@logviewer,1),1) == [,Open selected folder):run $+(",%lv.dir,$mid($sline(@logviewer,1),3,-2),") + Open current folder:run $+(",%lv.dir,") +} +menu @search*,@log*,@clones*,@whois (*),@psybnc (*),@sbnc (*),@highlights (*) { + - + Clear:clear + Close:close -@ $active +} +menu @n.popup { + sclick:{ + if ("*" iswm %popup.window) window -a %popup.window + else { + if ($appstate == minimized) || ($appstate == tray) { + showmirc -r + } + showmirc -s + if ($window(%popup.window)) window -a %popup.window + } + } + rclick:close -@ @n.popup +} + +menu @rcon { + send status:rcon_cmd status + send stats:rcon_cmd stats + send sv_password:rcon_cmd sv_password + - + Close:{ + close -@ @rcon + sockclose rcon* + unset %rcon.* + } +} + +; themes + +alias n.color.reset { + if ($color(0) != 16777215) { color -r 0 } + if ($color(1) != 0) { color -r 1 } + if ($color(2) != 8323072) { color -r 2 } + if ($color(3) != 37632) { color -r 3 } + if ($color(4) != 255) { color -r 4 } + if ($color(5) != 127) { color -r 5 } + if ($color(6) != 10223772) { color -r 6 } + if ($color(7) != 32764) { color -r 7 } + if ($color(8) != 65535) { color -r 8 } + if ($color(9) != 64512) { color -r 9 } + if ($color(10) != 9671424) { color -r 10 } + if ($color(11) != 16776960) { color -r 11 } + if ($color(12) != 16515072) { color -r 12 } + if ($color(13) != 16711935) { color -r 13 } + if ($color(14) != 8355711) { color -r 14 } + if ($color(15) != 13816530) { color -r 15 } +} +alias byt-tema { + if (!$1) || (($nopath($isalias(ttimestamp).fname) == $1 $+ .tem) && (!%poaksdfopka)) { return } + if (!$exists($cit($scriptdirtema\ $+ $1- $+ .tem))) { n.echo normal -atg $scriptdirtema\ $+ $1- $+ .tem does not exist | return } + if (!$dialog(bt)) { dialog -m bt bt | did -a bt 1 Loading theme } + if (!$exists($cit($isalias(ttimestamp).fname))) { + dialog -x bt + return + } + var %ticks $ticks + if ($isalias(tname).fname) .unload -rs $cit($isalias(tname).fname) + .load -rs $cit($scriptdirtema\ $+ $1- $+ .tem) + .timestamp -f $n.timestamp + cnicks + n.color.reset + tclr + color treebar $color(background) + if ($ncfg(use_theme_fonts) == 1) { + if ($tfont) fc $tfont + else fc 11 tahoma + } + dialog -x bt + if (!%poaksdfopka) n.echo normal -atgq Theme: $tname loaded $par(Ctrl+F12: clear all windows) $iif(%ticks,$par($calc(($ticks - %ticks) / 1000) $+ s)) + if (%generatepreview) { + .remove $scriptdirtema\$1 $+ . * + n.genpreview $1 + } + elseif (!$exists($+(",$scriptdirtema\,$1,.png,"))) && (!$exists($+(",$scriptdirtema\,$1,.bmp,"))) n.genpreview $1 + unset %generatepreview %poaksdfopka +} +alias theme.finished return +alias theme.reset return +dialog bt { + title "nbs-irc" + size -1 -1 50 10 + option dbu + text "", 1, 1 6 50 7, center + button "-", 2, 300 300 30 10, disable ok +} +On *:dialog:bt:init:0:{ + n.mdx SetMircVersion $version + n.mdx MarkDialog $dname + n.mdx SetDialog $dname style dlgframe +} +alias cnicks { + if ($ncfg(nicklist_use_themed_colors) != 1) return + .cnick -r * @ + .cnick -r * + + .cnick -nr * + .cnick -m2 $!me $me.clr + .cnick -m2 * $op.clr @ + .cnick -m2 * $voice.clr + + .cnick -nm2 * $normal.clr +} +alias n.quote { + if ($1) { + if ($quote.style) return $replace($quote.style,,$1- $+ ) $+  + else return ' $+ $1- $+ ' + } +} +alias par if ($1) return $replace($par.style,,$1- $+ ) $+  +alias kl if ($1) return $replace($bracket.style,,$1- $+ ) $+  +alias kl: if ($1) return $replace($bracket.style,,$1- $+ ) $+ : +alias n.timestamp return $ttimestamp $+ $iif($right($ttimestamp,1) != ,) +alias npre return $pre $+  +alias color_gen { + if (!$1) { + var %f = temp.txt + .write -c temp.txt + } + if ($color(0) != 16777215) .write %f color 0 $color(0) + if ($color(1) != 0) .write %f color 1 $color(1) + if ($color(2) != 8323072) .write %f color 2 $color(2) + if ($color(3) != 37632) .write %f color 3 $color(3) + if ($color(4) != 255) .write %f color 4 $color(4) + if ($color(5) != 127) .write %f color 5 $color(5) + if ($color(6) != 10223772) .write color 6 %f $color(6) + if ($color(7) != 32764) .write %f color 7 $color(7) + if ($color(8) != 65535) .write %f color 8 $color(8) + if ($color(9) != 64512) .write %f color 9 $color(9) + if ($color(10) != 9671424) .write %f color 10 $color(10) + if ($color(11) != 16776960) .write %f color 11 $color(11) + if ($color(12) != 16515072) .write %f color 12 $color(12) + if ($color(13) != 16711935) .write %f color 13 $color(13) + if ($color(14) != 8355711) .write %f color 14 $color(14) + if ($color(15) != 13816530) .write %f color 15 $color(15) + .write %f color action text $color(action) + .write %f color ctcp text $color(ctcp) + .write %f color info text $color(info) + .write %f color info2 text $color(info2) + .write %f color highlight text $color(highlight) + .write %f color invite text $color(invite) + .write %f color join text $color(join) + .write %f color kick text $color(kick) + .write %f color mode text $color(mode) + .write %f color nick text $color(nick) + .write %f color normal text $color(normal) + .write %f color notice text $color(notice) + .write %f color notify text $color(notify) + .write %f color other text $color(info) + .write %f color own text $color(own) + .write %f color part text $color(part) + .write %f color quit text $color(quit) + .write %f color topic text $color(topic) + .write %f color wallops text $color(wallops) + .write %f color whois text $color(whois) + .write %f color listbox $color(listbox) + .write %f color listbox text $color(listbox text) + .write %f color title text $color(title) + .write %f color editbox text $color(editbox text) + .write %f color inactive $color(inactive) + .write %f color background $color(background) + .write %f color editbox $color(editbox) + .write %f color treebar text $color(treebar text) + if (%f == temp.txt) { + if ($dialog(tedit)) loadbuf -o tedit 3 temp.txt + else run %f + .timer 1 1 .remove %f + } +} +alias pretimestamp { + return $replace($ttimestamp,HH,$1,nn,$2,ss,$3) +} +alias n.genpreview { + var %font = $window(status window).font, %size = $window(status window).fontsize + window -k0dnhp +dl @tp -1 -1 386 210 + drawtext -p @tp $color(join) %font %size 3 0 $pretimestamp($time(HH),$time(nn),10) $npre Join: elof $par(~mjo@h10v2ftb31p876.com) + drawtext -p @tp $color(mode) %font %size 3 14 $pretimestamp($time(HH),$time(nn),10) $npre Q $par(+v) elof + drawtext -p @tp $color(own) %font %size 3 28 $pretimestamp($time(HH),$time(nn),13) $replace($me.style,,@,,Yngve) $+  hello + drawtext -p @tp $color(normal) %font %size 3 42 $pretimestamp($time(HH),$time(nn),15) $replace($nick.style,,+,,elof) $+  hi + drawtext -p @tp $color(nick) %font %size 3 56 $pretimestamp($time(HH),$time(nn),17) $npre $clr(high,nick) is now known as $clr(high,nick-afk) + drawtext -p @tp $color(normal) %font %size 3 70 $pretimestamp($time(HH),$time(nn),20) $replace($nick.style,,+,,elof) $+  where's albin? + drawtext -p @tp $color(normal) %font %size 3 84 $pretimestamp($time(HH),$time(nn),23) $replace($nick.style,,,,albin) $+  here + drawtext -p @tp $color(normal) %font %size 3 98 $pretimestamp($time(HH),$time(nn),25) $replace($nick.style,,+,,elof) $+  ok, pm + drawtext -p @tp $color(normal) %font %size 3 112 $pretimestamp($time(HH),$time(nn),26) $replace($nick.style,,@,,karl-bertil) $+  bla bla + drawtext -p @tp $color(part) %font %size 3 126 $pretimestamp($time(HH),$time(nn),30) $npre Part: ingvar $par(id@h140z26ls35a876.net) + drawtext -p @tp $color(topic) %font %size 3 140 $pretimestamp($time(HH),$time(nn),33) $npre Yngve changes topic to: Preview + drawtext -p @tp $color(join) %font %size 3 154 $pretimestamp($time(HH),$time(nn),35) $npre Join: billythekid $par(~lame@455-b17ch.cbh.com) + drawtext -p @tp $color(normal) %font %size 3 168 $pretimestamp($time(HH),$time(nn),39) $replace($nick.style,,,,billythekid) $+  Hello, is this the preview channel? + drawtext -p @tp $color(own) %font %size 3 182 $pretimestamp($time(HH),$time(nn),42) $replace($me.style,,@,,Yngve) $+  Yes it is. + drawtext -p @tp $color(quit) %font %size 3 196 $pretimestamp($time(HH),$time(nn),44) $npre Quit: Random $par(id@c-d7bd70d5.com) $par(Signed off) + drawsave -b24 @tp $qt($scriptdirtema\ $+ $left($nopath($isalias(tname).fname),-4) $+ .bmp) + close -@ @tp + n.echo other -stge Preview for $tname generated +} diff --git a/scripts/other/version b/scripts/other/version new file mode 100644 index 0000000..130b37a --- /dev/null +++ b/scripts/other/version @@ -0,0 +1 @@ +12-01-28 diff --git a/scripts/qry.wav b/scripts/qry.wav new file mode 100644 index 0000000..29c0ec1 Binary files /dev/null and b/scripts/qry.wav differ diff --git a/scripts/qry_old.wav b/scripts/qry_old.wav new file mode 100644 index 0000000..b4c7532 Binary files /dev/null and b/scripts/qry_old.wav differ diff --git a/scripts/r-own.nbs b/scripts/r-own.nbs new file mode 100644 index 0000000..2e92dba --- /dev/null +++ b/scripts/r-own.nbs @@ -0,0 +1 @@ +; you can put your own scripts here, this file will not be overwritten when updating nbs-irc. diff --git a/scripts/tema/alien-blue.png b/scripts/tema/alien-blue.png new file mode 100644 index 0000000..9665e77 Binary files /dev/null and b/scripts/tema/alien-blue.png differ diff --git a/scripts/tema/alien-blue.tem b/scripts/tema/alien-blue.tem new file mode 100644 index 0000000..614354e --- /dev/null +++ b/scripts/tema/alien-blue.tem @@ -0,0 +1,47 @@ +;by: Dibbe +alias tclr { + color 2 15169792 + color 12 16297562 + color action text 0 + color ctcp text 14 + color highlight text 2 + color info text 14 + color info2 text 14 + color invite text 15 + color join text 14 + color kick text 14 + color mode text 14 + color nick text 14 + color normal text 0 + color notice text 14 + color notify text 14 + color other text 14 + color own text 0 + color part text 14 + color quit text 14 + color topic text 12 + color wallops text 14 + color whois text 14 + color listbox text 12 + color listbox 1 + color gray text 14 + color title text 15 + color editbox text 0 + color inactive 1 + color background 1 + color editbox 1 + color treebar text 15 +} +alias nick.style return 12‹12› +alias me.style return 12‹12› +alias bracket.style return 12[12] +alias par.style return 2‹2› +alias quote.style return 2'2' +alias pre return  » +alias tname return alien/blue +alias ttimestamp return HH2:nn2:ss +alias tfont return 10 verdana +alias me.clr return 0 +alias op.clr return 12 +alias voice.clr return 2 +alias normal.clr return 14 \ No newline at end of file diff --git a/scripts/tema/alien-bright.png b/scripts/tema/alien-bright.png new file mode 100644 index 0000000..9556ed1 Binary files /dev/null and b/scripts/tema/alien-bright.png differ diff --git a/scripts/tema/alien-bright.tem b/scripts/tema/alien-bright.tem new file mode 100644 index 0000000..9deb323 --- /dev/null +++ b/scripts/tema/alien-bright.tem @@ -0,0 +1,45 @@ +;by: Dibbe +alias tclr { + color 15 12040119 + color action text 1 + color ctcp text 3 + color info text 3 + color info2 text 3 + color highlight text 3 + color invite text 3 + color join text 3 + color kick text 3 + color mode text 3 + color nick text 14 + color normal text 1 + color notice text 14 + color notify text 3 + color other text 3 + color own text 1 + color part text 3 + color quit text 3 + color topic text 3 + color wallops text 3 + color whois text 1 + color listbox 0 + color listbox text 1 + color title text 6 + color editbox text 1 + color inactive 0 + color background 0 + color editbox 0 + color treebar text 1 +} +alias nick.style return 3‹3› +alias me.style return 3‹3› +alias bracket.style return 14[14] +alias par.style return 14‹14› +alias quote.style return 14'14' +alias pre return  » +alias tname return alien/bright +alias ttimestamp return HH3:nn3:ss +alias tfont return 10 verdana +alias me.clr return 3 +alias op.clr return 1 +alias voice.clr return 14 +alias normal.clr return 15 diff --git a/scripts/tema/alien-bright2.png b/scripts/tema/alien-bright2.png new file mode 100644 index 0000000..0461a99 Binary files /dev/null and b/scripts/tema/alien-bright2.png differ diff --git a/scripts/tema/alien-bright2.tem b/scripts/tema/alien-bright2.tem new file mode 100644 index 0000000..3201d8b --- /dev/null +++ b/scripts/tema/alien-bright2.tem @@ -0,0 +1,46 @@ +;by: Dibbe +alias tclr { + color 2 8936192 + color 15 12040119 + color action text 1 + color ctcp text 2 + color info text 2 + color info2 text 2 + color highlight text 2 + color invite text 2 + color join text 2 + color kick text 2 + color mode text 2 + color nick text 14 + color normal text 1 + color notice text 14 + color notify text 2 + color other text 2 + color own text 1 + color part text 2 + color quit text 2 + color topic text 2 + color wallops text 2 + color whois text 1 + color listbox 0 + color listbox text 1 + color title text 6 + color editbox text 1 + color inactive 0 + color background 0 + color editbox 0 + color treebar text 1 +} +alias nick.style return 2‹2› +alias me.style return 2‹2› +alias bracket.style return 14[14] +alias par.style return 14‹14› +alias quote.style return 14'14' +alias pre return  » +alias tname return alien/bright +alias ttimestamp return HH2:nn2:ss +alias tfont return 10 verdana +alias me.clr return 2 +alias op.clr return 1 +alias voice.clr return 14 +alias normal.clr return 15 diff --git a/scripts/tema/alien-orange.png b/scripts/tema/alien-orange.png new file mode 100644 index 0000000..cc42e91 Binary files /dev/null and b/scripts/tema/alien-orange.png differ diff --git a/scripts/tema/alien-orange.tem b/scripts/tema/alien-orange.tem new file mode 100644 index 0000000..0e3694e --- /dev/null +++ b/scripts/tema/alien-orange.tem @@ -0,0 +1,45 @@ +;by: Dibbe +alias tclr { + color 7 27607 + color action text 0 + color ctcp text 14 + color highlight text 7 + color info text 14 + color info2 text 14 + color invite text 15 + color join text 14 + color kick text 14 + color mode text 14 + color nick text 14 + color normal text 0 + color notice text 14 + color notify text 14 + color other text 14 + color own text 0 + color part text 14 + color quit text 14 + color topic text 7 + color wallops text 14 + color whois text 14 + color listbox text $voice.clr + color listbox 1 + color gray text 14 + color title text 15 + color editbox text 0 + color inactive 1 + color background 1 + color editbox 1 + color treebar text 15 +} +alias nick.style return 7‹7› +alias me.style return 7‹7› +alias bracket.style return 7[7] +alias par.style return 7‹7› +alias pre return  » +alias tname return alien/orange +alias ttimestamp return HH7:nn7:ss +alias tfont return 10 verdana +alias me.clr return 0 +alias op.clr return 7 +alias voice.clr return 15 +alias normal.clr return 14 diff --git a/scripts/tema/alien-red.png b/scripts/tema/alien-red.png new file mode 100644 index 0000000..67e14f1 Binary files /dev/null and b/scripts/tema/alien-red.png differ diff --git a/scripts/tema/alien-red.tem b/scripts/tema/alien-red.tem new file mode 100644 index 0000000..6121813 --- /dev/null +++ b/scripts/tema/alien-red.tem @@ -0,0 +1,47 @@ +;by: Dibbe +alias tclr { + color 4 222 + color 5 170 + color action text 0 + color ctcp text 14 + color highlight text 5 + color info text 14 + color info2 text 14 + color invite text 15 + color join text 14 + color kick text 14 + color mode text 14 + color nick text 14 + color normal text 0 + color notice text 14 + color notify text 14 + color other text 14 + color own text 0 + color part text 14 + color quit text 14 + color topic text 4 + color wallops text 14 + color whois text 14 + color listbox text $voice.clr + color listbox 1 + color gray text 14 + color title text 15 + color editbox text 0 + color inactive 1 + color background 1 + color editbox 1 + color treebar text 15 +} +alias nick.style return 4‹4› +alias me.style return 4‹4› +alias bracket.style return 4[4] +alias par.style return 5‹5› +alias quote.style return 5'5' +alias pre return  » +alias tname return alien/red +alias ttimestamp return HH4:nn4:ss +alias tfont return 10 verdana +alias me.clr return 0 +alias op.clr return 4 +alias voice.clr return 5 +alias normal.clr return 14 diff --git a/scripts/tema/alien.png b/scripts/tema/alien.png new file mode 100644 index 0000000..5453f9e Binary files /dev/null and b/scripts/tema/alien.png differ diff --git a/scripts/tema/alien.tem b/scripts/tema/alien.tem new file mode 100644 index 0000000..0261916 --- /dev/null +++ b/scripts/tema/alien.tem @@ -0,0 +1,44 @@ +;by: Dibbe +alias tclr { + color action text 0 + color ctcp text 14 + color highlight text 3 + color info text 14 + color info2 text 14 + color invite text 15 + color join text 14 + color kick text 14 + color mode text 14 + color nick text 14 + color normal text 0 + color notice text 14 + color notify text 14 + color other text 14 + color own text 0 + color part text 14 + color quit text 14 + color topic text 3 + color wallops text 14 + color whois text 14 + color listbox text 3 + color listbox 1 + color gray text 14 + color title text 15 + color editbox text 0 + color inactive 1 + color background 1 + color editbox 1 + color treebar text 15 +} +alias nick.style return 9‹9› +alias me.style return 9‹09› +alias bracket.style return 9[9] +alias par.style return 3‹3› +alias pre return  » +alias tname return alien +alias ttimestamp return HH9:nn9:ss +alias tfont return 10 verdana +alias me.clr return 0 +alias op.clr return 9 +alias voice.clr return 3 +alias normal.clr return 14 diff --git a/scripts/tema/apelsinjuice-inverted.png b/scripts/tema/apelsinjuice-inverted.png new file mode 100644 index 0000000..befd523 Binary files /dev/null and b/scripts/tema/apelsinjuice-inverted.png differ diff --git a/scripts/tema/apelsinjuice-inverted.tem b/scripts/tema/apelsinjuice-inverted.tem new file mode 100644 index 0000000..118aa69 --- /dev/null +++ b/scripts/tema/apelsinjuice-inverted.tem @@ -0,0 +1,46 @@ +;by: haxninja +alias tclr { + color 10 11433018 + color 11 16744451 + color 13 16748113 + color action text 10 + color ctcp text 10 + color info text 10 + color info2 text 10 + color highlight text 1 + color invite text 10 + color join text 10 + color kick text 10 + color mode text 10 + color nick text 10 + color normal text 1 + color notice text 10 + color notify text 10 + color other text 1 + color own text 1 + color part text 10 + color quit text 10 + color topic text 1 + color wallops text 10 + color whois text 1 + color listbox 0 + color listbox text 11 + color gray text 10 + color title text 11 + color editbox text 1 + color inactive 0 + color background 0 + color editbox 0 + color treebar text 14 +} +alias nick.style return 1310111 ‹ +alias me.style return 131011 › +alias bracket.style return 11[ 11] +alias par.style return 11(11) +alias pre return » +alias tname return Apelsinjuice i rymden - Inverted +alias ttimestamp return 11(HH11:nn11:ss11) +alias me.clr return 1 +alias op.clr return 13 +alias voice.clr return 11 +alias normal.clr return 10 diff --git a/scripts/tema/apelsinjuice1-1.png b/scripts/tema/apelsinjuice1-1.png new file mode 100644 index 0000000..63b92a7 Binary files /dev/null and b/scripts/tema/apelsinjuice1-1.png differ diff --git a/scripts/tema/apelsinjuice1-1.tem b/scripts/tema/apelsinjuice1-1.tem new file mode 100644 index 0000000..0aa2ccd --- /dev/null +++ b/scripts/tema/apelsinjuice1-1.tem @@ -0,0 +1,46 @@ +;by: haxninja +alias tclr { + color 10 1995182 + color 11 5409733 + color action text 11 + color ctcp text 10 + color info text 11 + color info2 text 11 + color highlight text 0 + color invite text 11 + color join text 11 + color kick text 11 + color mode text 11 + color nick text 11 + color normal text 0 + color notice text 11 + color notify text 11 + color other text 0 + color own text 0 + color part text 11 + color quit text 11 + color topic text 0 + color wallops text 11 + color whois text 0 + color listbox 1 + color listbox text 11 + color gray text 10 + color title text 11 + color editbox text 0 + color inactive 1 + color background 1 + color editbox 1 + color treebar text 15 +} +alias nick.style return 7(1007) +alias me.style return 7(107) +alias bracket.style return 7[ 7] +alias par.style return 7(7) +alias pre return » +alias tname return Apelsinjuice i rymden 1.1 +alias ttimestamp return 7(HH7:nn7:ss7) +alias me.clr return 0 +alias op.clr return 7 +alias me.clr return 0 +alias voice.clr return 11 +alias normal.clr return 10 diff --git a/scripts/tema/apelsinjuice1.png b/scripts/tema/apelsinjuice1.png new file mode 100644 index 0000000..d46717d Binary files /dev/null and b/scripts/tema/apelsinjuice1.png differ diff --git a/scripts/tema/apelsinjuice1.tem b/scripts/tema/apelsinjuice1.tem new file mode 100644 index 0000000..4e78ee2 --- /dev/null +++ b/scripts/tema/apelsinjuice1.tem @@ -0,0 +1,46 @@ +;by: haxninja +alias tclr { + color 10 1995182 + color 11 5409733 + color action text 11 + color ctcp text 10 + color info text 11 + color info2 text 11 + color highlight text 0 + color invite text 11 + color join text 11 + color kick text 11 + color mode text 11 + color nick text 11 + color normal text 0 + color notice text 11 + color notify text 11 + color other text 0 + color own text 0 + color part text 11 + color quit text 11 + color topic text 0 + color wallops text 11 + color whois text 0 + color listbox 1 + color listbox text 11 + color gray text 10 + color title text 11 + color editbox text 0 + color inactive 1 + color background 1 + color editbox 1 + color treebar text 15 +} +alias nick.style return 71007 ‹ +alias me.style return 7107 › +alias bracket.style return 7[ 7] +alias par.style return 7(7) +alias pre return » +alias tname return Apelsinjuice i rymden +alias ttimestamp return 7(HH7:nn7:ss7) +alias me.clr return 0 +alias op.clr return 7 +alias me.clr return 0 +alias voice.clr return 11 +alias normal.clr return 10 \ No newline at end of file diff --git a/scripts/tema/babyblue.png b/scripts/tema/babyblue.png new file mode 100644 index 0000000..5597a5e Binary files /dev/null and b/scripts/tema/babyblue.png differ diff --git a/scripts/tema/babyblue.tem b/scripts/tema/babyblue.tem new file mode 100644 index 0000000..2684ac8 --- /dev/null +++ b/scripts/tema/babyblue.tem @@ -0,0 +1,44 @@ +;by: valio +alias tclr { + color 11 16561043 + color action text 0 + color ctcp text 14 + color highlight text 14 + color info text 14 + color info2 text 14 + color invite text 14 + color join text 14 + color kick text 14 + color mode text 14 + color nick text 14 + color normal text 1 + color notice text 2 + color notify text 2 + color other text + color own text 1 + color part text 14 + color quit text 14 + color topic text 1 + color wallops text 14 + color whois text 14 + color listbox text 1 + color listbox 11 + color gray text 14 + color title text 14 + color editbox text 1 + color inactive 11 + color background 11 + color editbox 11 + color treebar text 14 +} +alias nick.style return 2[2] +alias me.style return 2[122] +alias bracket.style return 2[2] +alias par.style return () +alias pre return ::: +alias tname return babyblue +alias ttimestamp return 2[HH:nn:ss2] +alias me.clr return 0 +alias op.clr return 2 +alias voice.clr return 1 +alias normal.clr return 1 \ No newline at end of file diff --git a/scripts/tema/bee_sting.png b/scripts/tema/bee_sting.png new file mode 100644 index 0000000..b439c30 Binary files /dev/null and b/scripts/tema/bee_sting.png differ diff --git a/scripts/tema/bee_sting.tem b/scripts/tema/bee_sting.tem new file mode 100644 index 0000000..4fc40ad --- /dev/null +++ b/scripts/tema/bee_sting.tem @@ -0,0 +1,45 @@ +;by: haxninja +alias tclr { + color 10 3390960 + color 11 749206 + color action text 11 + color ctcp text 11 + color info text 11 + color info2 text 11 + color highlight text 11 + color invite text 11 + color join text 11 + color kick text 11 + color mode text 11 + color nick text 11 + color normal text 1 + color notice text 1 + color notify text 1 + color other text 1 + color own text 1 + color part text 11 + color quit text 11 + color topic text 1 + color wallops text 11 + color whois text 1 + color listbox 10 + color listbox text 1 + color gray text 1 + color title text 1 + color editbox text 1 + color inactive 10 + color background 10 + color editbox 10 + color treebar text 11 +} +alias nick.style return  +alias me.style return 0 +alias bracket.style return 1[ 1] +alias par.style return () +alias pre return - +alias tname return Bee sting +alias ttimestamp return HH:nn:ss - +alias me.clr return 0 +alias op.clr return 1 +alias voice.clr return 1 +alias normal.clr return 11 diff --git a/scripts/tema/beige.png b/scripts/tema/beige.png new file mode 100644 index 0000000..fe94e2c Binary files /dev/null and b/scripts/tema/beige.png differ diff --git a/scripts/tema/beige.tem b/scripts/tema/beige.tem new file mode 100644 index 0000000..fc52fde --- /dev/null +++ b/scripts/tema/beige.tem @@ -0,0 +1,47 @@ +;by: valio +alias tclr { + color 7 6067382 + color 8 9240575 + color 14 5196351 + color 15 7300428 + color action text 14 + color ctcp text 14 + color highlight text 15 + color info text 14 + color info2 text 14 + color invite text 14 + color join text 14 + color kick text 14 + color mode text 14 + color nick text 14 + color normal text 1 + color notice text 14 + color notify text 14 + color other text 14 + color own text 1 + color part text 14 + color quit text 14 + color topic text 14 + color wallops text 14 + color whois text 1 + color listbox text $voice.clr + color listbox 7 + color gray text 14 + color title text 14 + color editbox text 1 + color inactive 7 + color background 7 + color editbox 7 + color treebar text 15 +} +alias nick.style return 14(14) +alias me.style return 14(1514) +alias bracket.style return 15[15] +alias par.style return 15(15) +alias pre return :: +alias tname return beige +alias ttimestamp return 14(HH:nn:ss14) +alias me.clr return 8 +alias op.clr return 0 +alias voice.clr return 15 +alias normal.clr return 14 \ No newline at end of file diff --git a/scripts/tema/blank.png b/scripts/tema/blank.png new file mode 100644 index 0000000..9b07ccd Binary files /dev/null and b/scripts/tema/blank.png differ diff --git a/scripts/tema/blue.png b/scripts/tema/blue.png new file mode 100644 index 0000000..4b8db5e Binary files /dev/null and b/scripts/tema/blue.png differ diff --git a/scripts/tema/blue.tem b/scripts/tema/blue.tem new file mode 100644 index 0000000..61667a2 --- /dev/null +++ b/scripts/tema/blue.tem @@ -0,0 +1,47 @@ +; +alias tclr { + color 11 16767925 ;ljus + color 2 15169792 ;mörk + color 12 16297562 ;normal + color action text 0 + color ctcp text 2 + color info text 2 + color info2 text 2 + color highlight text 12 + color invite text 12 + color join text 2 + color kick text 2 + color mode text 2 + color nick text 2 + color normal text 12 + color notice text 11 + color notify text 12 + color other text 2 + color own text 12 + color part text 2 + color quit text 2 + color topic text 11 + color wallops text 2 + color whois text 2 + color listbox 1 + color listbox text 12 + color gray text 14 + color title text 11 + color editbox text 12 + color inactive 1 + color background 1 + color editbox 1 + color treebar text 11 +} +alias nick.style return 2[  2] +alias me.style return 2[ 11 2] +alias bracket.style return 2[ 2] +alias par.style return 12[ 12] +alias pre return · · +alias tname return blue +alias t.fil return blue.tem +alias ttimestamp return 2[ HH:nn:ss 2] +alias me.clr return 0 +alias op.clr return 11 +alias voice.clr return 12 +alias normal.clr return 2 \ No newline at end of file diff --git a/scripts/tema/cb4.png b/scripts/tema/cb4.png new file mode 100644 index 0000000..2b66dc0 Binary files /dev/null and b/scripts/tema/cb4.png differ diff --git a/scripts/tema/cb4.tem b/scripts/tema/cb4.tem new file mode 100644 index 0000000..8ea74d6 --- /dev/null +++ b/scripts/tema/cb4.tem @@ -0,0 +1,47 @@ +;by: Dibbe +alias tclr { + color 12 14973198 + color 11 16301959 + color 14 5131854 + color 10 13742143 + color action text 11 + color ctcp text 15 + color highlight text 12 + color info text 14 + color info2 text 14 + color invite text 15 + color join text 14 + color kick text 14 + color mode text 14 + color nick text 14 + color normal text 12 + color notice text 10 + color notify text 10 + color other text 14 + color own text 12 + color part text 14 + color quit text 14 + color topic text 11 + color wallops text 10 + color whois text 15 + color listbox text 12 + color listbox 1 + color gray text 15 + color title text 15 + color editbox text 11 + color inactive 1 + color background 1 + color editbox 1 + color treebar text 15 +} +alias nick.style return 11‹11› +alias me.style return 11‹› +alias bracket.style return 11[11] +alias par.style return () +alias pre return » +alias tname return cb4 +alias ttimestamp return HH12:nn12:ss +alias me.clr return 0 +alias op.clr return 11 +alias voice.clr return 12 +alias normal.clr return 14 diff --git a/scripts/tema/clean.png b/scripts/tema/clean.png new file mode 100644 index 0000000..2ef0e31 Binary files /dev/null and b/scripts/tema/clean.png differ diff --git a/scripts/tema/clean.tem b/scripts/tema/clean.tem new file mode 100644 index 0000000..d93b204 --- /dev/null +++ b/scripts/tema/clean.tem @@ -0,0 +1,45 @@ +;by: Dibbe +alias tclr { +color 11 16747530 +color 15 13158600 +color action text 0 +color ctcp text 14 +color info text 14 +color info2 text 14 +color highlight text 14 +color invite text 14 +color join text 14 +color kick text 14 +color mode text 14 +color nick text 14 +color normal text 0 +color notice text 15 +color notify text 14 +color other text 14 +color own text 0 +color part text 14 +color quit text 14 +color topic text 0 +color wallops text 14 +color whois text 0 +color listbox 1 +color listbox text 0 +color title text 6 +color editbox text 0 +color inactive 1 +color background 1 +color editbox 1 +color treebar text 15 +} +alias tname return cold-clean +alias nick.style return () +alias me.style return () +alias par.style return () +alias bracket.style return [] +alias quote.style return '' +alias pre return  - +alias ttimestamp return (HH:nn:ss) +alias me.clr return 11 +alias op.clr return 0 +alias voice.clr return 15 +alias normal.clr return 14 \ No newline at end of file diff --git a/scripts/tema/cold-bright.png b/scripts/tema/cold-bright.png new file mode 100644 index 0000000..0f7af20 Binary files /dev/null and b/scripts/tema/cold-bright.png differ diff --git a/scripts/tema/cold-bright.tem b/scripts/tema/cold-bright.tem new file mode 100644 index 0000000..01a6171 --- /dev/null +++ b/scripts/tema/cold-bright.tem @@ -0,0 +1,46 @@ +;by: Dibbe +alias tclr { + color 2 9659136 + color 14 6250335 + color 15 12040119 + color action text 2 + color ctcp text 2 + color info text 2 + color info2 text 2 + color highlight text 1 + color invite text 2 + color join text 2 + color kick text 2 + color mode text 2 + color nick text 14 + color normal text 1 + color notice text 14 + color notify text 2 + color other text 2 + color own text 1 + color part text 2 + color quit text 2 + color topic text 2 + color wallops text 2 + color whois text 1 + color listbox 0 + color listbox text 1 + color title text 6 + color editbox text 1 + color inactive 0 + color background 0 + color editbox 0 + color treebar text 1 +} +alias nick.style return 14(214) +alias me.style return 14(214) +alias bracket.style return 14[14] +alias par.style return 14(14) +alias quote.style return 14'14' +alias pre return  -› +alias tname return cold/bright +alias ttimestamp return 14(HH2:nn2:ss14) +alias me.clr return 2 +alias op.clr return 1 +alias voice.clr return 14 +alias normal.clr return 15 diff --git a/scripts/tema/cold-green.png b/scripts/tema/cold-green.png new file mode 100644 index 0000000..eef3133 Binary files /dev/null and b/scripts/tema/cold-green.png differ diff --git a/scripts/tema/cold-green.tem b/scripts/tema/cold-green.tem new file mode 100644 index 0000000..468e2a7 --- /dev/null +++ b/scripts/tema/cold-green.tem @@ -0,0 +1,44 @@ +;by: Dibbe +alias tclr { + color 3 45056 + color 15 13158600 + color action text 0 + color ctcp text 15 + color info text 14 + color info2 text 14 + color highlight text 15 + color invite text 15 + color join text 14 + color kick text 14 + color mode text 14 + color nick text 14 + color normal text 0 + color notice text 15 + color notify text 14 + color other text 14 + color own text 0 + color part text 14 + color quit text 14 + color topic text 0 + color wallops text 14 + color whois text 0 + color listbox 1 + color listbox text 0 + color editbox text 0 + color inactive 1 + color background 1 + color editbox 1 + color treebar text 15 +} +alias nick.style return 14(31514) +alias me.style return 14(314) +alias bracket.style return 14[14] +alias par.style return 3(3) +alias quote.style return 3'3' +alias pre return  3-› +alias tname return cold/green +alias ttimestamp return 14(HH3:nn3:ss14) +alias me.clr return 3 +alias op.clr return 0 +alias voice.clr return 15 +alias normal.clr return 14 diff --git a/scripts/tema/cold-orange.png b/scripts/tema/cold-orange.png new file mode 100644 index 0000000..233c426 Binary files /dev/null and b/scripts/tema/cold-orange.png differ diff --git a/scripts/tema/cold-orange.tem b/scripts/tema/cold-orange.tem new file mode 100644 index 0000000..7e9939a --- /dev/null +++ b/scripts/tema/cold-orange.tem @@ -0,0 +1,44 @@ +;by: Dibbe +alias tclr { + color 7 1871359 + color 15 13158600 + color action text 0 + color ctcp text 15 + color info text 14 + color info2 text 14 + color highlight text 15 + color invite text 15 + color join text 14 + color kick text 14 + color mode text 14 + color nick text 14 + color normal text 0 + color notice text 15 + color notify text 14 + color other text 14 + color own text 0 + color part text 14 + color quit text 14 + color topic text 0 + color wallops text 14 + color whois text 0 + color listbox 1 + color listbox text 0 + color editbox text 0 + color inactive 1 + color background 1 + color editbox 1 + color treebar text 15 +} +alias nick.style return 14(71514) +alias me.style return 14(714) +alias bracket.style return 14[14] +alias par.style return 7(7) +alias quote.style return 7'7' +alias pre return  7-› +alias tname return cold/orange +alias ttimestamp return 14(HH7:nn7:ss14) +alias me.clr return 7 +alias op.clr return 0 +alias voice.clr return 15 +alias normal.clr return 14 diff --git a/scripts/tema/cold-red.png b/scripts/tema/cold-red.png new file mode 100644 index 0000000..dd54d1e Binary files /dev/null and b/scripts/tema/cold-red.png differ diff --git a/scripts/tema/cold-red.tem b/scripts/tema/cold-red.tem new file mode 100644 index 0000000..0e000ac --- /dev/null +++ b/scripts/tema/cold-red.tem @@ -0,0 +1,44 @@ +;by: Dibbe +alias tclr { + color 4 210 + color 15 13158600 + color action text 0 + color ctcp text 15 + color info text 14 + color info2 text 14 + color highlight text 15 + color invite text 15 + color join text 14 + color kick text 14 + color mode text 14 + color nick text 14 + color normal text 0 + color notice text 15 + color notify text 14 + color other text 14 + color own text 0 + color part text 14 + color quit text 14 + color topic text 0 + color wallops text 14 + color whois text 0 + color listbox 1 + color title text 6 + color editbox text 0 + color inactive 1 + color background 1 + color editbox 1 + color treebar text 15 +} +alias nick.style return 14(41514) +alias me.style return 14(414) +alias bracket.style return 14[14] +alias par.style return 4(4) +alias quote.style return 4'4' +alias pre return  4-› +alias tname return cold/red +alias ttimestamp return 14(HH4:nn4:ss14) +alias me.clr return 4 +alias op.clr return 0 +alias voice.clr return 15 +alias normal.clr return 14 diff --git a/scripts/tema/cold.png b/scripts/tema/cold.png new file mode 100644 index 0000000..4c70ccc Binary files /dev/null and b/scripts/tema/cold.png differ diff --git a/scripts/tema/cold.tem b/scripts/tema/cold.tem new file mode 100644 index 0000000..3ff4eea --- /dev/null +++ b/scripts/tema/cold.tem @@ -0,0 +1,45 @@ +;by: Dibbe (default theme) +alias tclr { + color 11 16747530 + color 15 13158600 + color action text 0 + color ctcp text 15 + color info text 14 + color info2 text 14 + color highlight text 15 + color invite text 15 + color join text 14 + color kick text 14 + color mode text 14 + color nick text 14 + color normal text 0 + color notice text 15 + color notify text 14 + color other text 14 + color own text 0 + color part text 14 + color quit text 14 + color topic text 0 + color wallops text 14 + color whois text 0 + color listbox 1 + color listbox text 0 + color title text 6 + color editbox text 0 + color inactive 1 + color background 1 + color editbox 1 + color treebar text 15 +} +alias nick.style return 14(111514) +alias me.style return 14(1114) +alias bracket.style return 14[14] +alias par.style return 11(11) +alias quote.style return 11'11' +alias pre return  11-› +alias tname return cold +alias ttimestamp return 14(HH11:nn11:ss14) +alias me.clr return 11 +alias op.clr return 0 +alias voice.clr return 15 +alias normal.clr return 14 \ No newline at end of file diff --git a/scripts/tema/creme.png b/scripts/tema/creme.png new file mode 100644 index 0000000..e8ee27d Binary files /dev/null and b/scripts/tema/creme.png differ diff --git a/scripts/tema/creme.tem b/scripts/tema/creme.tem new file mode 100644 index 0000000..04af297 --- /dev/null +++ b/scripts/tema/creme.tem @@ -0,0 +1,45 @@ +;by: haxninja +alias tclr { + color 10 11850450 + color 11 5278860 + color action text 11 + color ctcp text 11 + color info text 11 + color info2 text 11 + color highlight text 11 + color invite text 11 + color join text 11 + color kick text 11 + color mode text 11 + color nick text 11 + color normal text 1 + color notice text 1 + color notify text 1 + color other text 1 + color own text 1 + color part text 11 + color quit text 11 + color topic text 1 + color wallops text 11 + color whois text 1 + color listbox 10 + color listbox text 1 + color gray text 1 + color title text 1 + color editbox text 1 + color inactive 10 + color background 10 + color editbox 10 + color treebar text 11 +} +alias nick.style return 11(11) +alias me.style return 11() +alias bracket.style return 1[ 1] +alias par.style return () +alias pre return ¤ +alias tname return Creme +alias ttimestamp return HH:nn:ss +alias me.clr return 0 +alias op.clr return 1 +alias voice.clr return 1 +alias normal.clr return 11 diff --git a/scripts/tema/dks.png b/scripts/tema/dks.png new file mode 100644 index 0000000..0b7092f Binary files /dev/null and b/scripts/tema/dks.png differ diff --git a/scripts/tema/dks.tem b/scripts/tema/dks.tem new file mode 100644 index 0000000..68620a9 --- /dev/null +++ b/scripts/tema/dks.tem @@ -0,0 +1,50 @@ +;by: Dibbe +alias tclr { + color 11 13083768 + color 14 5392189 + color 15 9269588 + color action text 15 + color ctcp text 14 + color highlight text 11 + color info text 14 + color info2 text 14 + color invite text 14 + color join text 14 + color kick text 14 + color mode text 14 + color nick text 14 + color normal text 11 + color notice text 14 + color notify text 14 + color other text 14 + color own text 11 + color part text 14 + color quit text 14 + color topic text 15 + color wallops text 14 + color whois text 15 + color listbox text $voice.clr + color listbox 1 + color gray text 14 + color title text 14 + color editbox text 11 + color inactive 1 + color background 1 + color editbox 1 + color treebar text 11 +} +alias nick.style return 14(1514): + +alias me.style return 14(1114): + +alias bracket.style return 15[15] + +alias par.style return 15‹15› + +alias pre return • +alias tname return dks +alias ttimestamp return 14(15HH:nn:ss14) +alias me.clr return 0 +alias op.clr return 11 +alias voice.clr return 15 +alias normal.clr return 14 diff --git a/scripts/tema/dovium.png b/scripts/tema/dovium.png new file mode 100644 index 0000000..29b8111 Binary files /dev/null and b/scripts/tema/dovium.png differ diff --git a/scripts/tema/dovium.tem b/scripts/tema/dovium.tem new file mode 100644 index 0000000..b6808c8 --- /dev/null +++ b/scripts/tema/dovium.tem @@ -0,0 +1,50 @@ +;by: dova +alias tclr { + color 15 11974326 + color 5 789575 + color 7 4227327 + color action text 10 + color ctcp text 14 + color highlight text 15 + color info text 14 + color info2 text 14 + color invite text 14 + color join text 14 + color kick text 4 + color mode text 14 + color nick text 14 + color normal text 15 + color notice text 14 + color notify text 14 + color other text 14 + color own text 0 + color part text 14 + color quit text 14 + color topic text 15 + color wallops text 14 + color whois text 14 + color listbox text 15 + color listbox 5 + color gray text 14 + color title text 15 + color editbox text 0 + color inactive 5 + color background 5 + color editbox 5 + color treebar text 15 +} +alias nick.style return 7‹7› + +alias me.style return 7‹07› + +alias bracket.style return 7[7] + +alias par.style return 15(15) + +alias pre return » +alias tname return dovium +alias ttimestamp return 7|HH7:nn7:ss7| +alias me.clr return 9 +alias op.clr return 0 +alias voice.clr return 15 +alias normal.clr return 14 diff --git a/scripts/tema/dusk-blue.png b/scripts/tema/dusk-blue.png new file mode 100644 index 0000000..3e84502 Binary files /dev/null and b/scripts/tema/dusk-blue.png differ diff --git a/scripts/tema/dusk-blue.tem b/scripts/tema/dusk-blue.tem new file mode 100644 index 0000000..f99018f --- /dev/null +++ b/scripts/tema/dusk-blue.tem @@ -0,0 +1,60 @@ +;By: slanne (dusk mod) +alias tclr { + color 0 $rgb(225,255,255) + color 1 $rgb(25,25,25) + color 2 $rgb(0,75,176) + color 3 $rgb(36,134,63) + color 4 $rgb(228,62,52) + color 5 $rgb(172,22,22) + color 6 $rgb(129,93,129) + color 7 $rgb(255,157,0) + color 8 $rgb(255,193,10) + color 9 $rgb(129,193,129) + color 11 $rgb(0,207,255) + color 12 $rgb(0,108,255) + color 14 $rgb(133,133,133) + color 15 $rgb(200,200,200) + color action text 15 + color ctcp text 14 + color info text 14 + color info2 text 14 + color highlight text 15 + color invite text 14 + color join text 14 + color kick text 14 + color mode text 14 + color nick text 14 + color normal text 0 + color notice text 15 + color notify text 15 + color other text 0 + color own text 15 + color part text 14 + color quit text 14 + color topic text 14 + color wallops text 14 + color whois text 14 + color listbox 1 + color listbox text 11 + color gray text 14 + color title text 14 + color editbox text 15 + color inactive 1 + color background 1 + color editbox 1 + color treebar text 15 +} +alias nick.style return    140 11› + +alias me.style return    1415 11› + +alias bracket.style return 12‹1412› + +alias par.style return 12‹1412› + +alias pre return » +alias tname return Dusk-blue +alias ttimestamp return HH12:nn12:ss +alias me.clr return 0 +alias op.clr return 12 +alias normal.clr return 15 diff --git a/scripts/tema/dusk-green.png b/scripts/tema/dusk-green.png new file mode 100644 index 0000000..422a9dd Binary files /dev/null and b/scripts/tema/dusk-green.png differ diff --git a/scripts/tema/dusk-green.tem b/scripts/tema/dusk-green.tem new file mode 100644 index 0000000..7983c84 --- /dev/null +++ b/scripts/tema/dusk-green.tem @@ -0,0 +1,60 @@ +;By: slanne (dusk mod) +alias tclr { + color 0 $rgb(225,255,255) + color 1 $rgb(25,25,25) + color 2 $rgb(0,75,176) + color 3 $rgb(36,134,63) + color 4 $rgb(228,62,52) + color 5 $rgb(172,22,22) + color 6 $rgb(129,93,129) + color 7 $rgb(255,157,0) + color 8 $rgb(255,193,10) + color 9 $rgb(129,193,129) + color 11 $rgb(0,207,255) + color 12 $rgb(0,108,255) + color 14 $rgb(133,133,133) + color 15 $rgb(200,200,200) + color action text 15 + color ctcp text 14 + color info text 14 + color info2 text 14 + color highlight text 15 + color invite text 14 + color join text 14 + color kick text 14 + color mode text 14 + color nick text 14 + color normal text 0 + color notice text 15 + color notify text 15 + color other text 0 + color own text 15 + color part text 14 + color quit text 14 + color topic text 14 + color wallops text 14 + color whois text 14 + color listbox 1 + color listbox text 9 + color gray text 14 + color title text 14 + color editbox text 15 + color inactive 1 + color background 1 + color editbox 1 + color treebar text 15 +} +alias nick.style return    140 9› + +alias me.style return    1415 9› + +alias bracket.style return 3‹143› + +alias par.style return 3‹143› + +alias pre return » +alias tname return dusk-green +alias ttimestamp return HH3:nn3:ss +alias me.clr return 0 +alias op.clr return 3 +alias normal.clr return 15 diff --git a/scripts/tema/dusk-pink.png b/scripts/tema/dusk-pink.png new file mode 100644 index 0000000..386ce36 Binary files /dev/null and b/scripts/tema/dusk-pink.png differ diff --git a/scripts/tema/dusk-pink.tem b/scripts/tema/dusk-pink.tem new file mode 100644 index 0000000..c26eba6 --- /dev/null +++ b/scripts/tema/dusk-pink.tem @@ -0,0 +1,60 @@ +;By: slanne (dusk mod) +alias tclr { + color 0 $rgb(225,255,255) + color 1 $rgb(25,25,25) + color 2 $rgb(0,75,176) + color 3 $rgb(36,134,63) + color 4 $rgb(228,62,52) + color 5 $rgb(172,22,22) + color 6 $rgb(129,93,129) + color 7 $rgb(255,157,0) + color 8 $rgb(255,193,10) + color 9 $rgb(129,193,129) + color 11 $rgb(0,207,255) + color 12 $rgb(0,108,255) + color 14 $rgb(133,133,133) + color 15 $rgb(200,200,200) + color action text 15 + color ctcp text 14 + color info text 14 + color info2 text 14 + color highlight text 15 + color invite text 14 + color join text 14 + color kick text 14 + color mode text 14 + color nick text 14 + color normal text 0 + color notice text 15 + color notify text 15 + color other text 0 + color own text 15 + color part text 14 + color quit text 14 + color topic text 14 + color wallops text 14 + color whois text 14 + color listbox 1 + color listbox text 13 + color gray text 14 + color title text 14 + color editbox text 15 + color inactive 1 + color background 1 + color editbox 1 + color treebar text 15 +} +alias nick.style return    140 13› + +alias me.style return    1415 13› + +alias bracket.style return 6‹146› + +alias par.style return 6‹146› + +alias pre return » +alias tname return dusk-pink +alias ttimestamp return HH6:nn6:ss +alias me.clr return 0 +alias op.clr return 6 +alias normal.clr return 15 diff --git a/scripts/tema/dusk-red.png b/scripts/tema/dusk-red.png new file mode 100644 index 0000000..138980c Binary files /dev/null and b/scripts/tema/dusk-red.png differ diff --git a/scripts/tema/dusk-red.tem b/scripts/tema/dusk-red.tem new file mode 100644 index 0000000..24ab3f7 --- /dev/null +++ b/scripts/tema/dusk-red.tem @@ -0,0 +1,60 @@ +;By: slanne (dusk mod) +alias tclr { + color 0 $rgb(225,255,255) + color 1 $rgb(25,25,25) + color 2 $rgb(0,75,176) + color 3 $rgb(36,134,63) + color 4 $rgb(228,62,52) + color 5 $rgb(172,22,22) + color 6 $rgb(129,93,129) + color 7 $rgb(255,157,0) + color 8 $rgb(255,193,10) + color 9 $rgb(129,193,129) + color 11 $rgb(0,207,255) + color 12 $rgb(0,108,255) + color 14 $rgb(133,133,133) + color 15 $rgb(200,200,200) + color action text 15 + color ctcp text 14 + color info text 14 + color info2 text 14 + color highlight text 15 + color invite text 14 + color join text 14 + color kick text 14 + color mode text 14 + color nick text 14 + color normal text 0 + color notice text 15 + color notify text 15 + color other text 0 + color own text 15 + color part text 14 + color quit text 14 + color topic text 14 + color wallops text 14 + color whois text 14 + color listbox 1 + color listbox text 4 + color gray text 14 + color title text 14 + color editbox text 15 + color inactive 1 + color background 1 + color editbox 1 + color treebar text 15 +} +alias nick.style return    140 4› + +alias me.style return    1415 4› + +alias bracket.style return 5‹145› + +alias par.style return 5‹145› + +alias pre return » +alias tname return dusk-red +alias ttimestamp return HH5:nn5:ss +alias me.clr return 0 +alias op.clr return 5 +alias normal.clr return 15 diff --git a/scripts/tema/dusk.png b/scripts/tema/dusk.png new file mode 100644 index 0000000..4ccdf99 Binary files /dev/null and b/scripts/tema/dusk.png differ diff --git a/scripts/tema/dusk.tem b/scripts/tema/dusk.tem new file mode 100644 index 0000000..e9043fd --- /dev/null +++ b/scripts/tema/dusk.tem @@ -0,0 +1,60 @@ +;By: slanne +alias tclr { + color 0 $rgb(225,255,255) + color 1 $rgb(25,25,25) + color 2 $rgb(0,75,176) + color 3 $rgb(36,134,63) + color 4 $rgb(228,62,52) + color 5 $rgb(172,22,22) + color 6 $rgb(129,93,129) + color 7 $rgb(255,157,0) + color 8 $rgb(255,193,10) + color 9 $rgb(129,193,129) + color 11 $rgb(0,207,255) + color 12 $rgb(0,108,255) + color 14 $rgb(133,133,133) + color 15 $rgb(200,200,200) + color action text 15 + color ctcp text 14 + color info text 14 + color info2 text 14 + color highlight text 15 + color invite text 14 + color join text 14 + color kick text 14 + color mode text 14 + color nick text 14 + color normal text 0 + color notice text 15 + color notify text 15 + color other text 0 + color own text 15 + color part text 14 + color quit text 14 + color topic text 14 + color wallops text 14 + color whois text 14 + color listbox 1 + color listbox text 8 + color gray text 14 + color title text 14 + color editbox text 15 + color inactive 1 + color background 1 + color editbox 1 + color treebar text 15 +} +alias nick.style return    140 8› + +alias me.style return    1415 8› + +alias bracket.style return 7‹147› + +alias par.style return 7‹147› + +alias pre return » +alias tname return dusk +alias ttimestamp return HH7:nn7:ss +alias me.clr return 0 +alias op.clr return 7 +alias normal.clr return 15 diff --git a/scripts/tema/envision.png b/scripts/tema/envision.png new file mode 100644 index 0000000..43388f8 Binary files /dev/null and b/scripts/tema/envision.png differ diff --git a/scripts/tema/envision.tem b/scripts/tema/envision.tem new file mode 100644 index 0000000..d125b78 --- /dev/null +++ b/scripts/tema/envision.tem @@ -0,0 +1,51 @@ +;by: Futte - Gustav@soetast.com +alias tclr { + color 10 11433018 + color 11 16744451 + color 13 16748113 + color 15 12500670 + color action text 15 + color ctcp text 15 + color info text 15 + color info2 text 15 + color highlight text 14 + color invite text 15 + color join text 15 + color kick text 5 + color mode text 15 + color nick text 15 + color normal text 1 + color notice text 15 + color notify text 15 + color other text 14 + color own text 1 + color part text 15 + color quit text 15 + color topic text 5 + color wallops text 15 + color whois text 15 + color listbox 0 + color listbox text $voice.clr + color title text 5 + color editbox text 1 + color inactive 0 + color background 0 + color editbox 0 + color treebar text 14 +} +alias nick.style return 10-1410- + +alias me.style return 10-1410- + +alias bracket.style return 10-10- + +alias par.style return 10-10- + +alias pre return » +alias tname return envision +alias ttimestamp return HH2:nn2:ss +alias me.clr return 1 +alias op.clr return 10 +alias voice.clr return 14 +alias normal.clr return 15 +alias normal.clr return 14 diff --git a/scripts/tema/fragbite.png b/scripts/tema/fragbite.png new file mode 100644 index 0000000..82cfc1b Binary files /dev/null and b/scripts/tema/fragbite.png differ diff --git a/scripts/tema/fragbite.tem b/scripts/tema/fragbite.tem new file mode 100644 index 0000000..e91da17 --- /dev/null +++ b/scripts/tema/fragbite.tem @@ -0,0 +1,53 @@ +;by: haxninja +alias tclr { + color 0 15658734 + color 4 4210922 + color 7 26367 + color 9 52224 + color 10 9530697 + color 11 4730651 + color action text 7 + color ctcp text 10 + color info text 10 + color info2 text 10 + color highlight text 0 + color invite text 10 + color join text 10 + color kick text 10 + color mode text 10 + color nick text 10 + color normal text 0 + color notice text 10 + color notify text 10 + color other text 0 + color own text 0 + color part text 10 + color quit text 10 + color topic text 0 + color wallops text 10 + color whois text 0 + color listbox 11 + color listbox text 15 + color gray text 10 + color title text 10 + color editbox text 0 + color inactive 11 + color background 11 + color editbox 11 + color treebar text 15 +} +alias nick.style return 707: + +alias me.style return 7: + +alias bracket.style return 7[ 7] + +alias par.style return 10(10) + +alias pre return » +alias tname return Fragbite +alias ttimestamp return 11(HH11:nn11:ss11) +alias me.clr return 7 +alias op.clr return 0 +alias voice.clr return 15 +alias normal.clr return 14 diff --git a/scripts/tema/fusion.png b/scripts/tema/fusion.png new file mode 100644 index 0000000..fb32f57 Binary files /dev/null and b/scripts/tema/fusion.png differ diff --git a/scripts/tema/fusion.tem b/scripts/tema/fusion.tem new file mode 100644 index 0000000..63069b5 --- /dev/null +++ b/scripts/tema/fusion.tem @@ -0,0 +1,48 @@ +;by: haxninja +alias tclr { +color 2 5326395 +color 7 25599 +color 10 10916992 +color 11 12680013 +color 15 12761259 +color action text 0 +color ctcp text 15 +color info text 10 +color info2 text 10 +color highlight text 15 +color invite text 10 +color join text 11 +color kick text 10 +color mode text 11 +color nick text 10 +color normal text 0 +color notice text 15 +color notify text 10 +color other text 10 +color own text 0 +color part text 11 +color quit text 11 +color topic text 0 +color wallops text 10 +color whois text 0 +color listbox 2 +color listbox text 0 +color title text 11 +color editbox text 0 +color inactive 2 +color background 2 +color editbox 2 +color treebar text 15 +} +alias tname return fusion +alias nick.style return 2(11102) +alias me.style return 2(112) +alias par.style return 11(11) +alias bracket.style return 15[15] +alias quote.style return 11'11' +alias pre return  -› +alias ttimestamp return 2(HH11:nn11:ss2) +alias me.clr return 7 +alias op.clr return 0 +alias voice.clr return 11 +alias normal.clr return 15 diff --git a/scripts/tema/grass.png b/scripts/tema/grass.png new file mode 100644 index 0000000..90efc6a Binary files /dev/null and b/scripts/tema/grass.png differ diff --git a/scripts/tema/grass.tem b/scripts/tema/grass.tem new file mode 100644 index 0000000..a0cf222 --- /dev/null +++ b/scripts/tema/grass.tem @@ -0,0 +1,47 @@ +;by Dibbe +alias tclr { + color 3 28416 + color 9 45056 + color 15 11447982 + color action text 15 + color ctcp text 14 + color info text 14 + color info2 text 14 + color highlight text 15 + color invite text 14 + color join text 14 + color kick text 14 + color mode text 14 + color nick text 14 + color normal text 0 + color notice text 14 + color notify text 14 + color other text 14 + color own text 0 + color part text 14 + color quit text 14 + color topic text 0 + color wallops text 14 + color whois text 14 + color listbox 1 + color listbox text 15 + color gray text 0 + color title text 6 + color editbox text 0 + color inactive 1 + color background 1 + color editbox 1 + color treebar text 15 +} +alias nick.style return 3› 9153: +alias me.style return 3› 903: +alias bracket.style return 9[9] +alias par.style return 3(3) +alias quote.style return 9'9' +alias pre return $chr(160) $chr(160) $+ · +alias tname return grass +alias ttimestamp return 14HH:nn:ss +alias me.clr return 9 +alias op.clr return 0 +alias voice.clr return 15 +alias normal.clr return 14 diff --git a/scripts/tema/green.png b/scripts/tema/green.png new file mode 100644 index 0000000..a8cc2a6 Binary files /dev/null and b/scripts/tema/green.png differ diff --git a/scripts/tema/green.tem b/scripts/tema/green.tem new file mode 100644 index 0000000..f2a71bb --- /dev/null +++ b/scripts/tema/green.tem @@ -0,0 +1,44 @@ +;by: Dibbe +alias tclr { +color 10 7143168 +color action text 10 +color ctcp text 3 +color highlight text 9 +color info text 3 +color info2 text 3 +color invite text 9 +color join text 3 +color kick text 3 +color mode text 3 +color nick text 3 +color normal text 9 +color notice text 14 +color notify text 3 +color other text 3 +color own text 9 +color part text 3 +color quit text 3 +color topic text 9 +color wallops text 3 +color whois text 3 +color listbox text 10 +color listbox 1 +color gray text 3 +color title text 15 +color editbox text 9 +color inactive 1 +color background 1 +color editbox 1 +color treebar text 9 +} +alias tname return green +alias nick.style return 3(3) +alias me.style return 3(103) +alias par.style return 9(9) +alias bracket.style return 3[3] +alias pre return  • +alias ttimestamp return 3(HH3:nn3:ss3) +alias me.clr return 0 +alias op.clr return 9 +alias voice.clr return 10 +alias normal.clr return 3 diff --git a/scripts/tema/grey.png b/scripts/tema/grey.png new file mode 100644 index 0000000..f5cc862 Binary files /dev/null and b/scripts/tema/grey.png differ diff --git a/scripts/tema/grey.tem b/scripts/tema/grey.tem new file mode 100644 index 0000000..8b6e44c --- /dev/null +++ b/scripts/tema/grey.tem @@ -0,0 +1,45 @@ +;by: Dibbe +alias tclr { + color 15 11974326 + color 0 15724527 + color action text 0 + color ctcp text 14 + color highlight text 15 + color info text 14 + color info2 text 14 + color invite text 15 + color join text 14 + color kick text 14 + color mode text 14 + color nick text 14 + color normal text 15 + color notice text 14 + color notify text 14 + color other text 14 + color own text 15 + color part text 14 + color quit text 14 + color topic text 15 + color wallops text 14 + color whois text 14 + color listbox text 15 + color listbox 1 + color gray text 14 + color title text 15 + color editbox text 0 + color inactive 1 + color background 1 + color editbox 1 + color treebar text 15 +} +alias nick.style return 14[14] +alias me.style return 14[014] +alias bracket.style return 14[14] +alias par.style return 15(15) +alias pre return » +alias tname return grey +alias ttimestamp return 14[HH14:nn14:ss14] +alias me.clr return 10 +alias op.clr return 0 +alias voice.clr return 15 +alias normal.clr return 14 diff --git a/scripts/tema/haxxor.png b/scripts/tema/haxxor.png new file mode 100644 index 0000000..d3d77dd Binary files /dev/null and b/scripts/tema/haxxor.png differ diff --git a/scripts/tema/haxxor.tem b/scripts/tema/haxxor.tem new file mode 100644 index 0000000..bd3ead5 --- /dev/null +++ b/scripts/tema/haxxor.tem @@ -0,0 +1,45 @@ +;by: haxninja +alias tclr { + theme.reset + .timestamp -f $ttimestamp + color action text 3 + color ctcp text 3 + color info text 3 + color info2 text 3 + color highlight text 3 + color invite text 3 + color join text 3 + color kick text 3 + color mode text 3 + color nick text 3 + color normal text 9 + color notice text 9 + color notify text 9 + color other text 9 + color own text 9 + color part text 9 + color quit text 9 + color topic text 9 + color wallops text 9 + color whois text 9 + color listbox 1 + color listbox text 9 + color gray text 1 + color title text 9 + color editbox text 9 + color inactive 1 + color background 1 + color editbox 1 + color treebar text 9 +} +alias nick.style return [] +alias me.style return [0] +alias bracket.style return 9[ 9] +alias par.style return [] +alias pre return ´ +alias tname return Haxxor +alias ttimestamp return HH:nn:ss +alias me.clr return 0 +alias op.clr return 9 +alias voice.clr return 9 +alias normal.clr return 9 diff --git a/scripts/tema/ice.png b/scripts/tema/ice.png new file mode 100644 index 0000000..efbce76 Binary files /dev/null and b/scripts/tema/ice.png differ diff --git a/scripts/tema/ice.tem b/scripts/tema/ice.tem new file mode 100644 index 0000000..7c9bbcc --- /dev/null +++ b/scripts/tema/ice.tem @@ -0,0 +1,47 @@ +;by: Dibbe +alias tclr { + color 2 3286288 + color 11 16301959 + color 12 14973198 + color 15 14798285 + color action text 15 + color ctcp text 15 + color info text 12 + color info2 text 12 + color highlight text 11 + color invite text 11 + color join text 12 + color kick text 12 + color mode text 12 + color nick text 12 + color normal text 0 + color notice text 15 + color notify text 15 + color other text 12 + color own text 0 + color part text 12 + color quit text 12 + color topic text 11 + color wallops text 12 + color whois text 11 + color listbox 2 + color listbox text $voice.clr + color gray text 11 + color title text 15 + color editbox text 11 + color inactive 2 + color background 2 + color editbox 2 + color treebar text 11 +} +alias nick.style return 12(1112) +alias me.style return 12(12) +alias bracket.style return 12[12] +alias par.style return 11(11) +alias pre return   11›12› +alias tname return ice +alias ttimestamp return 12(HH12:nn12:ss12) +alias me.clr return 4 +alias op.clr return 0 +alias voice.clr return 11 +alias normal.clr return 12 diff --git a/scripts/tema/irssi.png b/scripts/tema/irssi.png new file mode 100644 index 0000000..7d71178 Binary files /dev/null and b/scripts/tema/irssi.png differ diff --git a/scripts/tema/irssi.tem b/scripts/tema/irssi.tem new file mode 100644 index 0000000..c64006d --- /dev/null +++ b/scripts/tema/irssi.tem @@ -0,0 +1,46 @@ +; +alias tclr { +color 4 4609535 +color 10 11776768 +color 14 6447714 +color 15 12303291 +color action text 0 +color ctcp text 14 +color info text 14 +color info2 text 14 +color highlight text 15 +color invite text 15 +color join text 10 +color kick text 14 +color mode text 14 +color nick text 14 +color normal text 15 +color notice text 14 +color notify text 14 +color other text 14 +color own text 15 +color part text 10 +color quit text 10 +color topic text 15 +color wallops text 14 +color whois text 14 +color listbox 1 +color listbox text 15 +color title text 15 +color editbox text 15 +color inactive 1 +color background 1 +color editbox 1 +color treebar text 15 +} +alias tname return irssi +alias nick.style return 14<14> +alias me.style return 14<15014> +alias par.style return 14[14] +alias bracket.style return 14[14] +alias pre return 12-0!12- +alias ttimestamp return 15HH:nn:ss +alias me.clr return 10 +alias op.clr return 0 +alias voice.clr return 15 +alias normal.clr return 14 diff --git a/scripts/tema/leaf.png b/scripts/tema/leaf.png new file mode 100644 index 0000000..5ba5819 Binary files /dev/null and b/scripts/tema/leaf.png differ diff --git a/scripts/tema/leaf.tem b/scripts/tema/leaf.tem new file mode 100644 index 0000000..ab0421a --- /dev/null +++ b/scripts/tema/leaf.tem @@ -0,0 +1,46 @@ +;by: haxninja +alias tclr { + color 0 15658734 + color 9 1623329 + color 10 1061912 + color 11 25613 + color action text 15 + color ctcp text 3 + color info text 3 + color info2 text 3 + color highlight text 0 + color invite text 3 + color join text 3 + color kick text 3 + color mode text 3 + color nick text 3 + color normal text 0 + color notice text 3 + color notify text 3 + color other text 0 + color own text 0 + color part text 3 + color quit text 3 + color topic text 0 + color wallops text 3 + color whois text 0 + color listbox 10 + color listbox text $voice.clr + color title text 3 + color editbox text 0 + color inactive 10 + color background 10 + color editbox 10 + color treebar text 9 +} +alias nick.style return 3(03) +alias me.style return 3(3) +alias bracket.style return 9 $+ $chr(123) 3 $+ 9 $+ $chr(125) +alias par.style return 11(11) +alias pre return 3‘ +alias tname return Leaf +alias ttimestamp return 3(11HH3:11nn3:11ss3) +alias me.clr return 9 +alias op.clr return 0 +alias voice.clr return 14 +alias normal.clr return 11 diff --git a/scripts/tema/lightblue.png b/scripts/tema/lightblue.png new file mode 100644 index 0000000..753b5c2 Binary files /dev/null and b/scripts/tema/lightblue.png differ diff --git a/scripts/tema/lightblue.tem b/scripts/tema/lightblue.tem new file mode 100644 index 0000000..50313ec --- /dev/null +++ b/scripts/tema/lightblue.tem @@ -0,0 +1,45 @@ +;by: valio +alias tclr { + color 15 13484479 + color 2 8142906 + color action text 2 + color ctcp text 2 + color highlight text 2 + color info text 2 + color info2 text 2 + color invite text 2 + color join text 2 + color kick text 2 + color mode text 2 + color nick text 1 + color normal text 1 + color notice text 2 + color notify text 2 + color other text 2 + color own text 1 + color part text 2 + color quit text 2 + color topic text 2 + color wallops text 2 + color whois text 2 + color listbox text 1 + color listbox 15 + color gray text 15 + color title text 15 + color editbox text 1 + color inactive 15 + color background 15 + color editbox 15 + color treebar text 2 +} +alias nick.style return 2[2] +alias me.style return 2[] +alias bracket.style return 2[2] +alias par.style return 1(1) +alias pre return ::: +alias tname return Lightblue +alias ttimestamp return 2[HH:nn:ss2] +alias me.clr return 0 +alias op.clr return 2 +alias voice.clr return 1 +alias normal.clr return 1 diff --git a/scripts/tema/lite.png b/scripts/tema/lite.png new file mode 100644 index 0000000..44e9b61 Binary files /dev/null and b/scripts/tema/lite.png differ diff --git a/scripts/tema/lite.tem b/scripts/tema/lite.tem new file mode 100644 index 0000000..0f6219a --- /dev/null +++ b/scripts/tema/lite.tem @@ -0,0 +1,47 @@ +;by peanut +alias tclr { + color 2 $rgb(77,107,123) + color 3 $rgb(222,243,255) + color 6 $rgb(137,166,183) + color 11 $rgb(96,128,147) + color 13 $rgb(160,194,214) + color action text 3 + color ctcp text 11 + color info text 11 + color info2 text 11 + color highlight text 6 + color invite text 11 + color join text 11 + color kick text 4 + color mode text 6 + color nick text 6 + color normal text 3 + color notice text 6 + color notify text 11 + color other text 11 + color own text 0 + color part text 11 + color quit text 11 + color topic text 3 + color wallops text 6 + color whois text 3 + color listbox 2 + color listbox text 6 + color gray text 15 + color title text 15 + color editbox text 3 + color inactive 2 + color background 2 + color editbox 2 + color treebar text 3 +} +alias nick.style return 3(3) +alias me.style return 0(00) +alias bracket.style return 6[6] +alias par.style return 6(6) +alias pre return » +alias tname return lite +alias ttimestamp return HH:nn:ss +alias me.clr return 3 +alias op.clr return 3 +alias normal.clr return 11 diff --git a/scripts/tema/mIRC-black.png b/scripts/tema/mIRC-black.png new file mode 100644 index 0000000..004a14c Binary files /dev/null and b/scripts/tema/mIRC-black.png differ diff --git a/scripts/tema/mIRC-black.tem b/scripts/tema/mIRC-black.tem new file mode 100644 index 0000000..0b127f0 --- /dev/null +++ b/scripts/tema/mIRC-black.tem @@ -0,0 +1,45 @@ +; +alias tclr { +color 12 12615680 +color action text 6 +color ctcp text 4 +color info text 12 +color info2 text 3 +color highlight text 3 +color invite text 3 +color join text 3 +color kick text 3 +color mode text 3 +color nick text 3 +color normal text 0 +color notice text 5 +color notify text 7 +color other text 6 +color own text 0 +color part text 3 +color quit text 12 +color topic text 3 +color wallops text 5 +color whois text 0 +color listbox 1 +color listbox text 0 +color title text 6 +color editbox text 0 +color inactive 1 +color background 1 +color editbox 1 +color treebar text 15 +} +alias tname return mIRC/black +alias nick.style return <> +alias me.style return <> +alias par.style return () +alias bracket.style return [] +alias quote.style return '' +alias pre return * +alias ttimestamp return [HH:nn:ss] +alias tfont return -9 fixedsys +alias me.clr return 12 +alias op.clr return 0 +alias voice.clr return 0 +alias normal.clr return 0 diff --git a/scripts/tema/mIRC.png b/scripts/tema/mIRC.png new file mode 100644 index 0000000..eda072d Binary files /dev/null and b/scripts/tema/mIRC.png differ diff --git a/scripts/tema/mIRC.tem b/scripts/tema/mIRC.tem new file mode 100644 index 0000000..5f7a4a5 --- /dev/null +++ b/scripts/tema/mIRC.tem @@ -0,0 +1,45 @@ +; +alias tclr { +color background 0 +color editbox 0 +color listbox 0 +color listbox text 1 +color gray text 15 +color editbox text 1 +color normal text 1 +color action text 6 +color ctcp text 4 +color highlight text 3 +color info text 2 +color info2 text 3 +color invite text 3 +color join text 3 +color kick text 3 +color mode text 3 +color nick text 3 +color notice text 5 +color notify text 7 +color other text 6 +color own text 1 +color part text 3 +color quit text 2 +color topic text 3 +color wallops text 5 +color title text 6 +color whois text 1 +color inactive 0 +color treebar text 14 +} +alias tname return mIRC +alias nick.style return <> +alias me.style return <> +alias par.style return () +alias bracket.style return [] +alias quote.style return '' +alias pre return * +alias ttimestamp return [HH:nn:ss] +alias tfont return -9 fixedsys +alias me.clr return 2 +alias op.clr return 1 +alias voice.clr return 1 +alias normal.clr return 1 diff --git a/scripts/tema/mIRC2.png b/scripts/tema/mIRC2.png new file mode 100644 index 0000000..18f5bda Binary files /dev/null and b/scripts/tema/mIRC2.png differ diff --git a/scripts/tema/mIRC2.tem b/scripts/tema/mIRC2.tem new file mode 100644 index 0000000..200cc01 --- /dev/null +++ b/scripts/tema/mIRC2.tem @@ -0,0 +1,42 @@ +;by: haxninja +alias tclr { + color action text 4 + color ctcp text 4 + color info text 2 + color info2 text 3 + color highlight text 4 + color invite text 3 + color join text 2 + color kick text 5 + color mode text 5 + color nick text 5 + color normal text 1 + color notice text 5 + color notify text 4 + color other text 5 + color own text 1 + color part text 5 + color quit text 5 + color topic text 4 + color wallops text 5 + color whois text 1 + color listbox 0 + color listbox text $voice.clr + color title text 5 + color editbox text 1 + color inactive 0 + color background 0 + color editbox 0 + color treebar text 14 +} +alias nick.style return 4‹4› +alias me.style return 2‹2› +alias bracket.style return 14[14] +alias par.style return 1(1) +alias pre return ›› +alias tname return mIRC 2 +alias ttimestamp return 4-HH:nn:ss4- +alias me.clr return 4 +alias op.clr return 12 +alias voice.clr return 1 +alias normal.clr return 14 diff --git a/scripts/tema/mauve+.png b/scripts/tema/mauve+.png new file mode 100644 index 0000000..d3758c3 Binary files /dev/null and b/scripts/tema/mauve+.png differ diff --git a/scripts/tema/mauve+.tem b/scripts/tema/mauve+.tem new file mode 100644 index 0000000..4b61503 --- /dev/null +++ b/scripts/tema/mauve+.tem @@ -0,0 +1,58 @@ +;by: slanne +alias tclr { + color 0 $rgb(245,245,250) + color 1 $rgb(25,25,25) + color 2 $rgb(0,75,176) + color 3 $rgb(36,134,63) + color 4 $rgb(228,62,52) + color 5 $rgb(172,22,22) + color 6 $rgb(30,30,37) + color 7 $rgb(255,157,0) + color 8 $rgb(255,193,10) + color 9 $rgb(129,193,129) + color 10 $rgb(160,160,220) + color 11 $rgb(0,207,255) + color 12 $rgb(0,108,255) + color 13 $rgb(100,100,170) + color 14 $rgb(160,160,160) + color 15 $rgb(200,200,200) + color action text 15 + color ctcp text 14 + color info text 15 + color info2 text 15 + color highlight text 0 + color invite text 14 + color join text 15 + color kick text 15 + color mode text 15 + color nick text 15 + color normal text 0 + color notice text 15 + color notify text 15 + color other text 0 + color own text 15 + color part text 15 + color quit text 15 + color topic text 10 + color wallops text 14 + color whois text 15 + color listbox 6 + color listbox text $voice.clr + color title text 14 + color editbox text 0 + color inactive 6 + color background 6 + color editbox 6 + color treebar text 15 +} +alias nick.style return 13(13) +alias me.style return 13(13) +alias bracket.style return 10[1510] +alias par.style return 10(1510) +alias pre return    — +alias tname return mauve+ +alias ttimestamp return HH10:nn10:ss +alias me.clr return 0 +alias op.clr return 10 +alias voice.clr return 13 +alias normal.clr return 14 diff --git a/scripts/tema/mauve.png b/scripts/tema/mauve.png new file mode 100644 index 0000000..55d5b0b Binary files /dev/null and b/scripts/tema/mauve.png differ diff --git a/scripts/tema/mauve.tem b/scripts/tema/mauve.tem new file mode 100644 index 0000000..b41bece --- /dev/null +++ b/scripts/tema/mauve.tem @@ -0,0 +1,58 @@ +;by: slanne +alias tclr { + color 0 $rgb(245,245,250) + color 1 $rgb(25,25,25) + color 2 $rgb(0,75,176) + color 3 $rgb(36,134,63) + color 4 $rgb(228,62,52) + color 5 $rgb(172,22,22) + color 6 $rgb(30,30,37) + color 7 $rgb(255,157,0) + color 8 $rgb(255,193,10) + color 9 $rgb(129,193,129) + color 10 $rgb(160,160,220) + color 11 $rgb(0,207,255) + color 12 $rgb(0,108,255) + color 13 $rgb(100,100,170) + color 14 $rgb(160,160,160) + color 15 $rgb(200,200,200) + color action text 15 + color ctcp text 14 + color info text 15 + color info2 text 15 + color highlight text 0 + color invite text 14 + color join text 15 + color kick text 15 + color mode text 15 + color nick text 15 + color normal text 0 + color notice text 15 + color notify text 15 + color other text 0 + color own text 15 + color part text 15 + color quit text 15 + color topic text 10 + color wallops text 14 + color whois text 15 + color listbox 6 + color listbox text $voice.clr + color title text 14 + color editbox text 0 + color inactive 6 + color background 6 + color editbox 6 + color treebar text 15 +} +alias nick.style return 13‹13› +alias me.style return 13‹13› +alias bracket.style return 10[1510] +alias par.style return 10‹1510› +alias pre return    — +alias tname return mauve +alias ttimestamp return HH10:nn10:ss +alias me.clr return 0 +alias op.clr return 10 +alias voice.clr return 13 +alias normal.clr return 14 diff --git a/scripts/tema/narrow-black.png b/scripts/tema/narrow-black.png new file mode 100644 index 0000000..5307b60 Binary files /dev/null and b/scripts/tema/narrow-black.png differ diff --git a/scripts/tema/narrow-black.tem b/scripts/tema/narrow-black.tem new file mode 100644 index 0000000..725199b --- /dev/null +++ b/scripts/tema/narrow-black.tem @@ -0,0 +1,45 @@ +;by: haxninja +alias tclr { + theme.reset + .timestamp -f $ttimestamp + color 4 987120 + color action text 0 + color ctcp text 4 + color info text 4 + color info2 text 4 + color highlight text 0 + color invite text 4 + color join text 4 + color kick text 4 + color mode text 4 + color nick text 4 + color normal text 0 + color notice text 0 + color notify text 4 + color other text 0 + color own text 0 + color part text 4 + color quit text 4 + color topic text 0 + color wallops text 14 + color whois text 0 + color listbox 1 + color listbox text $voice.clr + color title text 4 + color editbox text 0 + color inactive 1 + color background 1 + color editbox 1 + theme.finished +} +alias nick.style return 404: +alias me.style return 04: +alias bracket.style return 4[ 4] +alias par.style return 4(4) +alias pre return » +alias tname return Narrow Red +alias ttimestamp return HH4:nn4:ss +alias me.clr return 0 +alias op.clr return 4 +alias voice.clr return 5 +alias normal.clr return 14 diff --git a/scripts/tema/narrow-blue.png b/scripts/tema/narrow-blue.png new file mode 100644 index 0000000..46edacf Binary files /dev/null and b/scripts/tema/narrow-blue.png differ diff --git a/scripts/tema/narrow-blue.tem b/scripts/tema/narrow-blue.tem new file mode 100644 index 0000000..95c1128 --- /dev/null +++ b/scripts/tema/narrow-blue.tem @@ -0,0 +1,43 @@ +;by: haxninja +alias tclr { + color 2 14565663 + color action text 1 + color ctcp text 2 + color info text 2 + color info2 text 2 + color highlight text 1 + color invite text 2 + color join text 2 + color kick text 2 + color mode text 2 + color nick text 2 + color normal text 1 + color notice text 1 + color notify text 2 + color other text 1 + color own text 1 + color part text 2 + color quit text 2 + color topic text 1 + color wallops text 14 + color whois text 1 + color listbox 15 + color listbox text $voice.clr + color title text 2 + color editbox text 1 + color inactive 15 + color background 15 + color editbox 15 + color treebar text 1 +} +alias nick.style return 212: +alias me.style return 12: +alias bracket.style return 2[ 2] +alias par.style return 2(2) +alias pre return » +alias tname return Narrow Blue +alias ttimestamp return HH2:nn2:ss +alias me.clr return 1 +alias op.clr return 12 +alias voice.clr return 2 +alias normal.clr return 14 diff --git a/scripts/tema/narrow-green.png b/scripts/tema/narrow-green.png new file mode 100644 index 0000000..35d7816 Binary files /dev/null and b/scripts/tema/narrow-green.png differ diff --git a/scripts/tema/narrow-green.tem b/scripts/tema/narrow-green.tem new file mode 100644 index 0000000..80b12c5 --- /dev/null +++ b/scripts/tema/narrow-green.tem @@ -0,0 +1,43 @@ +;by: haxninja +alias tclr { + color 10 4619085 + color action text 1 + color ctcp text 3 + color info text 3 + color info2 text 3 + color highlight text 1 + color invite text 3 + color join text 3 + color kick text 3 + color mode text 3 + color nick text 3 + color normal text 1 + color notice text 1 + color notify text 3 + color other text 1 + color own text 1 + color part text 3 + color quit text 3 + color topic text 1 + color wallops text 14 + color whois text 1 + color listbox 15 + color listbox text $voice.clr + color title text 3 + color editbox text 1 + color inactive 15 + color background 15 + color editbox 15 + color treebar text 1 +} +alias nick.style return 313: +alias me.style return 13: +alias bracket.style return 3[ 3] +alias par.style return 3(3) +alias pre return » +alias tname return Narrow Green +alias ttimestamp return HH3:nn3:ss +alias me.clr return 3 +alias op.clr return 1 +alias voice.clr return 10 +alias normal.clr return 14 diff --git a/scripts/tema/narrow-red.png b/scripts/tema/narrow-red.png new file mode 100644 index 0000000..a4a4ed0 Binary files /dev/null and b/scripts/tema/narrow-red.png differ diff --git a/scripts/tema/narrow-red.tem b/scripts/tema/narrow-red.tem new file mode 100644 index 0000000..83652f2 --- /dev/null +++ b/scripts/tema/narrow-red.tem @@ -0,0 +1,43 @@ +;by: haxninja +alias tclr { + color 4 987120 + color action text 1 + color ctcp text 4 + color info text 4 + color info2 text 4 + color highlight text 1 + color invite text 4 + color join text 4 + color kick text 4 + color mode text 4 + color nick text 4 + color normal text 1 + color notice text 1 + color notify text 4 + color other text 1 + color own text 1 + color part text 4 + color quit text 4 + color topic text 1 + color wallops text 14 + color whois text 1 + color listbox 15 + color listbox text $voice.clr + color title text 4 + color editbox text 1 + color inactive 15 + color background 15 + color editbox 15 + color treebar text 1 +} +alias nick.style return 414: +alias me.style return 14: +alias bracket.style return 4[ 4] +alias par.style return 4(4) +alias pre return » +alias tname return Narrow Red +alias ttimestamp return HH4:nn4:ss +alias me.clr return 1 +alias op.clr return 4 +alias voice.clr return 5 +alias normal.clr return 14 diff --git a/scripts/tema/narrow.png b/scripts/tema/narrow.png new file mode 100644 index 0000000..9a896eb Binary files /dev/null and b/scripts/tema/narrow.png differ diff --git a/scripts/tema/narrow.tem b/scripts/tema/narrow.tem new file mode 100644 index 0000000..a852024 --- /dev/null +++ b/scripts/tema/narrow.tem @@ -0,0 +1,44 @@ +;by: haxninja +alias tclr { + color 7 28637 + color 10 4802889 + color action text 1 + color ctcp text 7 + color info text 7 + color info2 text 7 + color highlight text 1 + color invite text 7 + color join text 7 + color kick text 7 + color mode text 7 + color nick text 7 + color normal text 1 + color notice text 1 + color notify text 7 + color other text 1 + color own text 1 + color part text 7 + color quit text 7 + color topic text 1 + color wallops text 14 + color whois text 1 + color listbox 15 + color listbox text $voice.clr + color title text 7 + color editbox text 1 + color inactive 15 + color background 15 + color editbox 15 + color treebar text 1 +} +alias nick.style return 717: +alias me.style return 17: +alias bracket.style return 7[ 7] +alias par.style return 7(7) +alias pre return » +alias tname return Narrow +alias ttimestamp return HH7:nn7:ss +alias me.clr return 7 +alias op.clr return 1 +alias voice.clr return 10 +alias normal.clr return 14 diff --git a/scripts/tema/nature.png b/scripts/tema/nature.png new file mode 100644 index 0000000..68897ce Binary files /dev/null and b/scripts/tema/nature.png differ diff --git a/scripts/tema/nature.tem b/scripts/tema/nature.tem new file mode 100644 index 0000000..5c0abd1 --- /dev/null +++ b/scripts/tema/nature.tem @@ -0,0 +1,47 @@ +;by: Dibbe +alias tclr { + color 3 402178 + color 9 4365090 + color 10 7905405 + color 15 12369084 + color action text 9 + color ctcp text 14 + color info text 10 + color info2 text 10 + color highlight text 0 + color invite text 10 + color join text 10 + color kick text 10 + color mode text 10 + color nick text 10 + color normal text 0 + color notice text 10 + color notify text 9 + color other text 10 + color own text 0 + color part text 10 + color quit text 10 + color topic text 0 + color wallops text 14 + color whois text 10 + color listbox 3 + color listbox text 9 + color gray text 15 + color title text 6 + color editbox text 0 + color inactive 3 + color background 3 + color editbox 3 + color treebar text 15 +} +alias nick.style return 10(91510) +alias me.style return 10(9010) +alias bracket.style return 10[10] +alias par.style return 9(9) +alias quote.style return 9'9' +alias pre return -» +alias tname return nature +alias ttimestamp return 10(HH9:nn9:ss10) +alias me.clr return 0 +alias op.clr return 10 +alias normal.clr return 14 diff --git a/scripts/tema/net.png b/scripts/tema/net.png new file mode 100644 index 0000000..1e4be0e Binary files /dev/null and b/scripts/tema/net.png differ diff --git a/scripts/tema/net.tem b/scripts/tema/net.tem new file mode 100644 index 0000000..cf8b0d5 --- /dev/null +++ b/scripts/tema/net.tem @@ -0,0 +1,46 @@ +;by: Dibbe +alias tclr { + color 10 7233359 + color 11 15786708 + color 12 13418417 + color action text 11 + color ctcp text 11 + color info text 12 + color info2 text 12 + color highlight text 11 + color invite text 12 + color join text 12 + color kick text 12 + color mode text 12 + color nick text 12 + color normal text 0 + color notice text 11 + color notify text 12 + color other text 12 + color own text 0 + color part text 12 + color quit text 12 + color topic text 0 + color wallops text 12 + color whois text 11 + color listbox 10 + color listbox text $voice.clr + color title text 6 + color editbox text 0 + color inactive 10 + color background 10 + color editbox 10 + color treebar text 11 +} +alias nick.style return 12(1112) +alias me.style return 12(12) +alias bracket.style return 11[11] +alias par.style return 11(11) +alias quote.style return 11'11' +alias pre return  - +alias tname return net +alias ttimestamp return 12(HH11:nn11:ss12) +alias me.clr return 15 +alias op.clr return 0 +alias voice.clr return 11 +alias normal.clr return 12 diff --git a/scripts/tema/ocean.png b/scripts/tema/ocean.png new file mode 100644 index 0000000..bb72b6b Binary files /dev/null and b/scripts/tema/ocean.png differ diff --git a/scripts/tema/ocean.tem b/scripts/tema/ocean.tem new file mode 100644 index 0000000..32d4d1f --- /dev/null +++ b/scripts/tema/ocean.tem @@ -0,0 +1,46 @@ +;by: Dibbe +alias tclr { +color 1 4071697 +color 10 16639694 +color 11 16301959 +color 12 10514728 +color action text 11 +color ctcp text 12 +color info text 12 +color info2 text 12 +color highlight text 11 +color invite text 11 +color join text 12 +color kick text 12 +color mode text 12 +color nick text 12 +color normal text 0 +color notice text 12 +color notify text 12 +color other text 12 +color own text 0 +color part text 12 +color quit text 12 +color topic text 11 +color wallops text 12 +color whois text 11 +color listbox 1 +color listbox text 0 +color title text 15 +color editbox text 0 +color inactive 1 +color background 1 +color editbox 1 +color treebar text 10 +} +alias tname return ocean +alias nick.style return 12[111012] +alias me.style return 12[11012] +alias par.style return 11(11) +alias bracket.style return 12[12] +alias pre return   12› +alias ttimestamp return 12[HH11:nn11:ss12] +alias me.clr return 12 +alias op.clr return 11 +alias voice.clr return 15 +alias normal.clr return 14 diff --git a/scripts/tema/onefin-mod.png b/scripts/tema/onefin-mod.png new file mode 100644 index 0000000..aef10b5 Binary files /dev/null and b/scripts/tema/onefin-mod.png differ diff --git a/scripts/tema/onefin-mod.tem b/scripts/tema/onefin-mod.tem new file mode 100644 index 0000000..5e2ddc2 --- /dev/null +++ b/scripts/tema/onefin-mod.tem @@ -0,0 +1,48 @@ +;by: peanut, modified by Dibbe +alias tclr { + color 0 15395562 + color 2 6568990 + color 11 14661013 + color 12 13602399 + color 15 12829635 + color action text 11 + color ctcp text 14 + color highlight text 11 + color info text 15 + color info2 text 15 + color invite text 12 + color join text 12 + color kick text 12 + color mode text 12 + color nick text 12 + color normal text 0 + color notice text 12 + color notify text 12 + color other text 12 + color own text 0 + color part text 12 + color quit text 12 + color topic text 11 + color wallops text 12 + color whois text 12 + color listbox text 0 + color listbox 2 + color gray text 15 + color title text 15 + color editbox text 0 + color inactive 2 + color background 2 + color editbox 2 + color treebar text 11 +} +alias nick.style return 11[11] +alias me.style return 11[] +alias bracket.style return 11[11] +alias par.style return 11(11) +alias pre return 12.:: +alias tname return onefin mod +alias ttimestamp return 11[HH11:nn11:ss11] +alias me.clr return 12 +alias op.clr return 11 +alias voice.clr return 0 +alias normal.clr return 15 diff --git a/scripts/tema/onefin.png b/scripts/tema/onefin.png new file mode 100644 index 0000000..5bfc7ec Binary files /dev/null and b/scripts/tema/onefin.png differ diff --git a/scripts/tema/onefin.tem b/scripts/tema/onefin.tem new file mode 100644 index 0000000..a003d0b --- /dev/null +++ b/scripts/tema/onefin.tem @@ -0,0 +1,49 @@ +;by: peanut +alias tclr { + color 0 15395562 + color 2 6568990 + color 11 14661013 + color 12 13602399 + color 15 12829635 + color action text 11 + color ctcp text 15 + color highlight text 11 + color info text 15 + color info2 text 15 + color invite text 14 + color join text 14 + color kick text 14 + color mode text 14 + color nick text 14 + color normal text 0 + color notice text 12 + color notify text 14 + color other text 14 + color own text 12 + color part text 14 + color quit text 14 + color topic text 11 + color wallops text 14 + color whois text 15 + color listbox text 0 + color listbox 2 + color gray text 15 + color title text 15 + color editbox text 0 + color inactive 2 + color background 2 + color editbox 2 + color treebar text 11 +} +alias nick.style return 11[11] +alias me.style return 11[] +alias bracket.style return 11[11] +alias par.style return () +alias pre return 14.:: +alias tname return onefin +alias t.fil return onefin.tem +alias ttimestamp return 11[HH:nn:ss11] +alias me.clr return 12 +alias op.clr return 11 +alias voice.clr return 15 +alias normal.clr return 15 diff --git a/scripts/tema/pink.png b/scripts/tema/pink.png new file mode 100644 index 0000000..41e9338 Binary files /dev/null and b/scripts/tema/pink.png differ diff --git a/scripts/tema/pink.tem b/scripts/tema/pink.tem new file mode 100644 index 0000000..41dc478 --- /dev/null +++ b/scripts/tema/pink.tem @@ -0,0 +1,45 @@ +;by: valio +alias tclr { + color 6 7229044 + color 13 10979246 + color 5 6832539 + color action text 5 + color ctcp text 6 + color highlight text 6 + color info text 6 + color info2 text 6 + color invite text 6 + color join text 6 + color kick text 6 + color mode text 6 + color nick text 6 + color normal text 13 + color notice text 6 + color notify text 6 + color other text 6 + color own text 6 + color part text 6 + color quit text 6 + color topic text 15 + color wallops text 14 + color whois text 5 + color listbox text 5 + color listbox 1 + color gray text 5 + color title text 14 + color editbox text 13 + color inactive 1 + color background 1 + color editbox 1 + color treebar text 15 +} +alias nick.style return 6(156): +alias me.style return 6(136): +alias bracket.style return 13[13] +alias par.style return 13‹13› +alias pre return • +alias tname return pink fantasy +alias ttimestamp return 14(15HH:nn:ss14) +alias me.clr return 0 +alias op.clr return 13 +alias normal.clr return 6 diff --git a/scripts/tema/pink_panther.png b/scripts/tema/pink_panther.png new file mode 100644 index 0000000..3260843 Binary files /dev/null and b/scripts/tema/pink_panther.png differ diff --git a/scripts/tema/pink_panther.tem b/scripts/tema/pink_panther.tem new file mode 100644 index 0000000..3943b68 --- /dev/null +++ b/scripts/tema/pink_panther.tem @@ -0,0 +1,45 @@ +;by: haxninja +alias tclr { + color 10 16755455 + color 11 16729855 + color action text 11 + color ctcp text 11 + color info text 11 + color info2 text 11 + color highlight text 11 + color invite text 11 + color join text 11 + color kick text 11 + color mode text 11 + color nick text 11 + color normal text 1 + color notice text 1 + color notify text 1 + color other text 1 + color own text 1 + color part text 11 + color quit text 11 + color topic text 1 + color wallops text 11 + color whois text 1 + color listbox 10 + color listbox text 1 + color gray text 1 + color title text 1 + color editbox text 1 + color inactive 10 + color background 10 + color editbox 10 + color treebar text 1 +} +alias nick.style return • : +alias me.style return 0• : +alias bracket.style return 1[ 1] +alias par.style return () +alias pre return ~ +alias tname return Pink Panther +alias ttimestamp return HH:nn:ss +alias me.clr return 0 +alias op.clr return 1 +alias voice.clr return 1 +alias normal.clr return 11 diff --git a/scripts/tema/purple.png b/scripts/tema/purple.png new file mode 100644 index 0000000..4f403b2 Binary files /dev/null and b/scripts/tema/purple.png differ diff --git a/scripts/tema/purple.tem b/scripts/tema/purple.tem new file mode 100644 index 0000000..eb16dc3 --- /dev/null +++ b/scripts/tema/purple.tem @@ -0,0 +1,45 @@ +;by: Dibbe +alias tclr { + color 2 2296844 + color 11 16103860 + color 12 11826803 + color action text 11 + color ctcp text 12 + color info text 12 + color info2 text 12 + color highlight text 11 + color invite text 12 + color join text 12 + color kick text 12 + color mode text 12 + color nick text 12 + color normal text 0 + color notice text 12 + color notify text 12 + color other text 12 + color own text 0 + color part text 12 + color quit text 12 + color topic text 0 + color wallops text 12 + color whois text 12 + color listbox 2 + color listbox text $voice.clr + color title text 6 + color editbox text 0 + color inactive 2 + color background 2 + color editbox 2 + color treebar text 11 +} +alias nick.style return 12(1112) +alias me.style return 12(1112) +alias bracket.style return 11[11] +alias par.style return 11(11) +alias pre return   12· 11· +alias tname return purple +alias ttimestamp return 12(HH11:nn11:ss12) +alias me.clr return 15 +alias op.clr return 0 +alias voice.clr return 11 +alias normal.clr return 12 diff --git a/scripts/tema/purple_fire.png b/scripts/tema/purple_fire.png new file mode 100644 index 0000000..06d7d0b Binary files /dev/null and b/scripts/tema/purple_fire.png differ diff --git a/scripts/tema/purple_fire.tem b/scripts/tema/purple_fire.tem new file mode 100644 index 0000000..5b6f12d --- /dev/null +++ b/scripts/tema/purple_fire.tem @@ -0,0 +1,47 @@ +;by: haxninja +alias tclr { + color 0 15658734 + color 7 26367 + color 10 1855935 + color 11 5639733 + color action text 7 + color ctcp text 10 + color info text 10 + color info2 text 10 + color highlight text 0 + color invite text 10 + color join text 10 + color kick text 10 + color mode text 10 + color nick text 10 + color normal text 0 + color notice text 10 + color notify text 10 + color other text 0 + color own text 0 + color part text 10 + color quit text 10 + color topic text 0 + color wallops text 10 + color whois text 0 + color listbox 11 + color listbox text 15 + color gray text 10 + color title text 10 + color editbox text 0 + color inactive 11 + color background 11 + color editbox 11 + color treebar text 7 +} +alias nick.style return 707 ‹ +alias me.style return 707 › +alias bracket.style return 7[ 7] +alias par.style return 10(10) +alias pre return • +alias tname return Purple Fire +alias ttimestamp return 7-HH7:nn7:ss7- +alias me.clr return 7 +alias op.clr return 0 +alias voice.clr return 15 +alias normal.clr return 14 diff --git a/scripts/tema/red.png b/scripts/tema/red.png new file mode 100644 index 0000000..edf0080 Binary files /dev/null and b/scripts/tema/red.png differ diff --git a/scripts/tema/red.tem b/scripts/tema/red.tem new file mode 100644 index 0000000..9dbb238 --- /dev/null +++ b/scripts/tema/red.tem @@ -0,0 +1,44 @@ +;by: Dibbe +alias tclr { +color 5 191 +color action text 0 +color ctcp text 15 +color info text 14 +color info2 text 14 +color highlight text 15 +color invite text 15 +color join text 14 +color kick text 14 +color mode text 14 +color nick text 14 +color normal text 0 +color notice text 15 +color notify text 14 +color other text 14 +color own text 0 +color part text 14 +color quit text 14 +color topic text 0 +color wallops text 15 +color whois text 0 +color listbox 1 +color listbox text 15 +color title text 15 +color editbox text 0 +color inactive 1 +color background 1 +color editbox 1 +color treebar text 15 +} +alias tname return red +alias nick.style return 4(4154) +alias me.style return 4(44) +alias par.style return 4(4) +alias bracket.style return 4[4] +alias quote.style return 5'5' +alias pre return  5- +alias ttimestamp return 5(HH4:nn4:ss5) +alias me.clr return 4 +alias op.clr return 0 +alias voice.clr return 15 +alias normal.clr return 14 diff --git a/scripts/tema/sand.png b/scripts/tema/sand.png new file mode 100644 index 0000000..1f4f0ce Binary files /dev/null and b/scripts/tema/sand.png differ diff --git a/scripts/tema/sand.tem b/scripts/tema/sand.tem new file mode 100644 index 0000000..f3a6d3a --- /dev/null +++ b/scripts/tema/sand.tem @@ -0,0 +1,45 @@ +;by: haxninja +alias tclr { + color 0 15658734 + color 10 2965373 + color 11 5084114 + color action text 7 + color ctcp text 11 + color info text 11 + color info2 text 11 + color highlight text 0 + color invite text 11 + color join text 11 + color kick text 11 + color mode text 11 + color nick text 11 + color normal text 0 + color notice text 11 + color notify text 11 + color other text 0 + color own text 0 + color part text 11 + color quit text 11 + color topic text 0 + color wallops text 11 + color whois text 0 + color listbox 10 + color listbox text $voice.clr + color title text 11 + color editbox text 0 + color inactive 10 + color background 10 + color editbox 10 + color treebar text 11 +} +alias nick.style return 117: +alias me.style return 117: +alias bracket.style return 7[ 7 ] +alias par.style return 0(0) +alias pre return  » +alias tname return sand +alias ttimestamp return 0(11HH0:11nn0:11ss0) +alias me.clr return 7 +alias op.clr return 0 +alias voice.clr return 15 +alias normal.clr return 11 diff --git a/scripts/tema/sne.png b/scripts/tema/sne.png new file mode 100644 index 0000000..00e990e Binary files /dev/null and b/scripts/tema/sne.png differ diff --git a/scripts/tema/sne.tem b/scripts/tema/sne.tem new file mode 100644 index 0000000..e079acc --- /dev/null +++ b/scripts/tema/sne.tem @@ -0,0 +1,44 @@ +;by: haxninja +alias tclr { +color 5 191 +color action text 15 +color ctcp text 15 +color info text 14 +color info2 text 14 +color highlight text 15 +color invite text 15 +color join text 14 +color kick text 14 +color mode text 14 +color nick text 14 +color normal text 0 +color notice text 15 +color notify text 14 +color other text 14 +color own text 0 +color part text 14 +color quit text 14 +color topic text 0 +color wallops text 14 +color whois text 0 +color listbox 1 +color listbox text 15 +color title text 15 +color editbox text 0 +color inactive 1 +color background 1 +color editbox 1 +color treebar text 15 +} +alias tname return sne +alias nick.style return 404: +alias me.style return 44: +alias par.style return 5 +alias bracket.style return 14+ 14+ +alias quote.style return 5'5' +alias pre return 5+ +alias ttimestamp return HH4:nn4:ss +alias me.clr return 4 +alias op.clr return 0 +alias voice.clr return 15 +alias normal.clr return 14 diff --git a/scripts/tema/snow.png b/scripts/tema/snow.png new file mode 100644 index 0000000..30ae67a Binary files /dev/null and b/scripts/tema/snow.png differ diff --git a/scripts/tema/snow.tem b/scripts/tema/snow.tem new file mode 100644 index 0000000..cac5183 --- /dev/null +++ b/scripts/tema/snow.tem @@ -0,0 +1,46 @@ +;by: Dibbe +alias tclr { + color 12 8931840 + color 2 3938048 + color 0 16774640 + color action text 12 + color ctcp text 2 + color info text 2 + color info2 text 2 + color highlight text 12 + color invite text 2 + color join text 2 + color kick text 2 + color mode text 2 + color nick text 2 + color normal text 1 + color notice text 2 + color notify text 2 + color other text 2 + color own text 1 + color part text 2 + color quit text 2 + color topic text 12 + color wallops text 2 + color whois text 2 + color listbox 0 + color listbox text 1 + color gray text 14 + color title text 14 + color editbox text 1 + color inactive 0 + color background 0 + color editbox 0 + color treebar text 12 +} +alias nick.style return 12(12) +alias me.style return 12(212) +alias bracket.style return 12[12] +alias par.style return 2(2) +alias pre return » +alias tname return snow +alias ttimestamp return 12(HH:nn:ss12) +alias me.clr return 2 +alias op.clr return 12 +alias voice.clr return 1 +alias normal.clr return 14 diff --git a/scripts/tema/soft_red.png b/scripts/tema/soft_red.png new file mode 100644 index 0000000..7bfdd5b Binary files /dev/null and b/scripts/tema/soft_red.png differ diff --git a/scripts/tema/soft_red.tem b/scripts/tema/soft_red.tem new file mode 100644 index 0000000..3a87eb6 --- /dev/null +++ b/scripts/tema/soft_red.tem @@ -0,0 +1,45 @@ +;by: haxninja +alias tclr { + color 10 3684512 + color 11 1973856 + color action text 1 + color ctcp text 1 + color info text 1 + color info2 text 1 + color highlight text 0 + color invite text 1 + color join text 1 + color kick text 1 + color mode text 1 + color nick text 1 + color normal text 0 + color notice text 1 + color notify text 1 + color other text 0 + color own text 0 + color part text 1 + color quit text 1 + color topic text 0 + color wallops text 1 + color whois text 0 + color listbox 10 + color listbox text 1 + color gray text 1 + color title text 1 + color editbox text 0 + color inactive 10 + color background 10 + color editbox 10 + color treebar text 1 +} +alias nick.style return (1) +alias me.style return (1) +alias bracket.style return 1[ 1] +alias par.style return () +alias pre return -!- +alias tname return Soft Red +alias ttimestamp return (HH:nn:ss) +alias me.clr return 11 +alias op.clr return 0 +alias voice.clr return 1 +alias normal.clr return 11 diff --git a/scripts/tema/temp.png b/scripts/tema/temp.png new file mode 100644 index 0000000..31f4e38 Binary files /dev/null and b/scripts/tema/temp.png differ diff --git a/scripts/tema/temp.tem b/scripts/tema/temp.tem new file mode 100644 index 0000000..5f8cf5b --- /dev/null +++ b/scripts/tema/temp.tem @@ -0,0 +1,43 @@ +;by Dibbe +alias tclr { + color 14 7697781 + color 15 11842740 + color action text 15 + color ctcp text 14 + color info text 14 + color info2 text 14 + color highlight text 0 + color invite text 14 + color join text 14 + color kick text 14 + color mode text 14 + color nick text 14 + color normal text 0 + color notice text 14 + color notify text 14 + color other text 14 + color own text 0 + color part text 14 + color quit text 14 + color topic text 0 + color wallops text 14 + color whois text 15 + color listbox 1 + color listbox text 15 + color title text 6 + color editbox text 0 + color inactive 1 + color background 1 + color treebar text 15 +} +alias nick.style return 15› : +alias me.style return 15› : +alias bracket.style return 15[15] +alias par.style return 15(15) +alias pre return $chr(160) · +alias tname return temp +alias ttimestamp return 14HH:nn:ss +alias me.clr return 3 +alias op.clr return 0 +alias voice.clr return 15 +alias normal.clr return 14 diff --git a/scripts/tema/vinotinto.png b/scripts/tema/vinotinto.png new file mode 100644 index 0000000..32c4824 Binary files /dev/null and b/scripts/tema/vinotinto.png differ diff --git a/scripts/tema/vinotinto.tem b/scripts/tema/vinotinto.tem new file mode 100644 index 0000000..398a214 --- /dev/null +++ b/scripts/tema/vinotinto.tem @@ -0,0 +1,45 @@ +;by: razcal +alias tclr { + color 1 20 + color 5 170 + color action text 0 + color ctcp text 5 + color highlight text 4 + color info text 5 + color info2 text 5 + color invite text 4 + color join text 5 + color kick text 5 + color mode text 5 + color nick text 5 + color normal text 0 + color notice text 5 + color notify text 5 + color other text 5 + color own text 0 + color part text 5 + color quit text 5 + color topic text 4 + color wallops text 5 + color whois text 5 + color listbox text $voice.clr + color listbox 1 + color gray text 5 + color title text 4 + color editbox text 0 + color inactive 1 + color background 1 + color editbox 1 + color treebar text 15 +} +alias nick.style return 5‹5› +alias me.style return 4‹04› +alias bracket.style return 5[5] +alias par.style return 4‹4› +alias pre return » +alias tname return vino tinto +alias ttimestamp return HH4:nn4:ss +alias me.clr return 0 +alias op.clr return 4 +alias voice.clr return 5 +alias normal.clr return 14 diff --git a/scripts/tema/wintergrey.png b/scripts/tema/wintergrey.png new file mode 100644 index 0000000..9e4ebf0 Binary files /dev/null and b/scripts/tema/wintergrey.png differ diff --git a/scripts/tema/wintergrey.tem b/scripts/tema/wintergrey.tem new file mode 100644 index 0000000..467206c --- /dev/null +++ b/scripts/tema/wintergrey.tem @@ -0,0 +1,45 @@ +;by: henke +alias tclr { + color 14 4276545 + color 15 8880513 + color action text 14 + color ctcp text 14 + color info text 14 + color info2 text 14 + color highlight text 1 + color invite text 14 + color join text 14 + color kick text 14 + color mode text 14 + color nick text 14 + color normal text 1 + color notice text 14 + color notify text 14 + color other text 14 + color own text 1 + color part text 14 + color quit text 14 + color topic text 1 + color wallops text 14 + color whois text 14 + color listbox 15 + color listbox text 14 + color gray text 14 + color title text 14 + color editbox text 1 + color inactive 15 + color background 15 + color editbox 15 + color treebar text 14 +} +alias nick.style return [] +alias me.style return [] +alias bracket.style return 14[14] +alias par.style return () +alias pre return ~ +alias tname return wintergrey +alias ttimestamp return [HH:nn:ss] +alias me.clr return 0 +alias op.clr return 1 +alias voice.clr return 14 +alias normal.clr return 14 diff --git a/scripts/txt/cmds_extended.txt b/scripts/txt/cmds_extended.txt new file mode 100644 index 0000000..63405f8 --- /dev/null +++ b/scripts/txt/cmds_extended.txt @@ -0,0 +1,25 @@ +ad,Advertises the script to the active channel +aj,Force autojoin on current network +amsg2,Lets you exclude specific channels from '/amsg' (type /amsg2 for help) +auth,Use to auth on QuakeNet/UnderNet +awaysys,Opens the away dialog [Default: F3] +back,Return from away [Default: F4] +c ,Calculates and puts the result in the editbox (Example: /c 1+1) +cc <#chan>,Opens the channel central for <#chan> +clag,Checks your lag to the server +clonescan [#chan],Scans for clones in active channel or [#chan] +defbrowserfix,You can use this if URLs open in IE even if you have another default browser +host2nick ,Scans for nicks matching +ip2nick ,Scans for nicks matching +logexport,Strip color codes from chosen log file +logg,Open the log file for the active window +month ,Shows the name of month and number of days, eg: April (30 days) +np,Say song playing in Winamp/iTunes [Default: F8] +paste,Opens the paste dialog +power,Say in how many channels you are oped on +psybnc,Opens the psyBNC window for the active connection +sbnc,Opens the sBNC window for the active connection +sendcb ,Sends your clipboard contents to +sendsong ,Sends the current song playing in Winamp to +slog ,Search the log of the active window for +vote,Starts a yes/no vote \ No newline at end of file diff --git a/scripts/txt/cmds_irc.txt b/scripts/txt/cmds_irc.txt new file mode 100644 index 0000000..714aaa9 --- /dev/null +++ b/scripts/txt/cmds_irc.txt @@ -0,0 +1,15 @@ +j <#chan>,Shortcut to /join +p [#chan],Parts [#chan]/active channel +op ,Gives op on active channel +dop ,Takes 's op on active channel +dvoice ,Takes 's voice on active channel +voice ,Gives voice on active channel +k [#chan] ,Kicks from [#chan]/active channel (shortcut to /kick) +q ,Shortcut to /query +t [new topic],Show or set topic in active channel [Default: F7] +w ,Whois (extended) +ws ,Whois (normal) +o,requests op from Q/L on QuakeNet +qw ,Q whois (QuakeNet only) +ping ,ctcp pings +slap ,Random slaps (edit in /misc > slaps) \ No newline at end of file diff --git a/scripts/txt/cmds_other.txt b/scripts/txt/cmds_other.txt new file mode 100644 index 0000000..9051e84 --- /dev/null +++ b/scripts/txt/cmds_other.txt @@ -0,0 +1,8 @@ +faq,Loads the FAQ in your browser + +g ,Searches for on Google +imdb ,Searches for on IMDb +wiki ,Searches for on Wikipedia (english) +thott ,Searches for on thottbot +allak ,Searches for on wow.allakhazam.com +wh ,Searches for on wowhead \ No newline at end of file diff --git a/scripts/txt/cmds_setup.txt b/scripts/txt/cmds_setup.txt new file mode 100644 index 0000000..4bcf52b --- /dev/null +++ b/scripts/txt/cmds_setup.txt @@ -0,0 +1,18 @@ +setup,Opens the Control panel [Default: F2] +alarm,Opens the alarm timer +blist,Opens the blacklist [Default: F11] +caj,Opens Autojoin setup +cns,Opens NickServ setup +fc,Opens the font chooser +fkeys,Opens F-key bindings setup +gl,Opens the game launcher +lv,Opens the logviewer [Default: F9] +misc,Opens Misc settings +nq,Opens Sound/highlight settings +popups,Opens Notifications setup +prot,Opens Protections setup +quakenet,Opens QuakeNet setup +sa,Opens Song announce setup +servers,Opens servers setup +theme [-r] [theme],Opens theme setup or loads [theme], -r will reload current theme +undernet,Opens UnderNet setup \ No newline at end of file diff --git a/scripts/txt/cmds_sysinfo.txt b/scripts/txt/cmds_sysinfo.txt new file mode 100644 index 0000000..c8fa90d --- /dev/null +++ b/scripts/txt/cmds_sysinfo.txt @@ -0,0 +1,13 @@ +bw [-e],Say or echo current bandwith usage +bw.setup,Select card used for /bw +cpu [-e],Say or echo CPU information +gfx [-e],Say or echo graphics card information +hd [-e],Say or echo hard disks free space/total space +hds [-el],Say or echo each partitions free space/total space (use /hds -l to display partition labels) +mbm [-e],Say or echo MBM information +mem [-e],Say or echo Memory usage +modem [-e],Say or echo dialup information +net [-e],Say or echo NIC information +os [-e],Say or echo Operating System information +sys [-e],Say or echo system information (OS, CPU, memory usage, graphics, uptime) +uptime [-e],Say or echo uptime \ No newline at end of file diff --git a/scripts/txt/runex.txt b/scripts/txt/runex.txt new file mode 100644 index 0000000..e5d45e6 --- /dev/null +++ b/scripts/txt/runex.txt @@ -0,0 +1,14 @@ +cmd +calc +charmap +regedit +notepad +ping +dxdiag +mstsc +mspaint +sndvol32 +spider +taskmgr +telnet +winmine \ No newline at end of file diff --git a/scripts/txt/tedit.txt b/scripts/txt/tedit.txt new file mode 100644 index 0000000..a879cdd --- /dev/null +++ b/scripts/txt/tedit.txt @@ -0,0 +1,12 @@ +nick.style,The style of other users nicks in messages +me.style,The style of your nick in messages +bracket.style,The style of secondary brackets wich are used in various misc places such as whois/ctcp/notices etc +par.style,The style of various places where ( and ) fit. eg: -› Quit: nick (a@host.org) +pre,Script prefix that is used in various events, eg: -› join: nick (a@host.org) +ttimestamp,This sets the timestamps to anything you like. HH (hours) nn (minutes) ss (seconds), type /help $asctime to see all options. +tfont,Format: size fontname (size is in px, use negative value for pt, eg: -8) Leave blank to use default font +quote.style,The style of quotes, eg: -› Nickname 'nick' is already in use +me.clr,Your color in the nicklist (enter z to use color no 0) +op.clr,Oped users color in the nicklist (enter z to use color no 0) +voice.clr,Voiced users color in the nicklist (enter z to use color no 0) +normal.clr,Regular users color in the nicklist (enter z to use color no 0) \ No newline at end of file diff --git a/scripts/txt/tips.txt b/scripts/txt/tips.txt new file mode 100644 index 0000000..e1e5ea0 --- /dev/null +++ b/scripts/txt/tips.txt @@ -0,0 +1,22 @@ +If you have any questions, suggestions or anything else, visit #nbs-irc on Quakenet (irc.quakenet.org) and tell us about it. +There are lots of themes to choose from, use /theme to view and change themes. +Be sure to read the FAQ (F2 -> FAQ) before asking for help elsewhere. +You can doubleclick IP addresses of game servers to use the game laucher to join the server. +The script has an alarm clock, type /alarm to use it. +Want to exclude channels from /amsg? Type /amsg2 for more information. +You can add shortcuts to applications and URLs in the extended toolbar. +You can click on the popups from hightlights/querys to activate that window or right click to close them. +/o requests op from Q/L on QuakeNet. +World of Warcraft quick search: /thott (thottbot.com), /allak (wow.allakhazam.com), /wh (wowhead.com) +You can double click in the whois window to close/minimize it. +You can use /slog to search the log of the active window for +You can use /exportlog to remove control codes (Ctrl+K,B,U,R) and create a clean textfile from any logfile. +Use the built in theme editor to edit themes to your liking (theme setup -> edit theme or /tedit) +You can use /wsend to send someone the current song playing in Winamp. +You can use /imdb to search on imdb. +You can use /g to search on google. +You can use /wiki to search on wikipedia. +You can add your own random quit messages, kick messages and slaps in /misc +Use 'Connect at startup' (/autocon) if you want to connect to multiple servers at startup. +Winamp hotkeys: Shift+F# (1: prev, 2: play, 3: pause, 4: stop, 5: next) +You can see the last message from popups using the command /lastpop or by pressing F5. diff --git a/servers.ini b/servers.ini new file mode 100644 index 0000000..31e3277 --- /dev/null +++ b/servers.ini @@ -0,0 +1,415 @@ +; For providing suggestions, new servers or networks see http://www.mirc.com/help/serverlist.html + +[timestamp] +date=08/08/2008 + +[networks] +n0=Quakenet +n1=Undernet +n2=IRCnet +n3=EFnet +n4=DALnet +n5=WebChat +n6=GameSurge +n7=LinkNet +n8=UniBG + +[servers] +n0=Random serverSERVER:irc.abjects.net:6666-6669,7000,9000GROUP:Abjects +n1=Random serverSERVER:irc.ablenet.org:6667GROUP:AbleNET +n2=Random serverSERVER:irc.absurd-irc.net:6667,7000GROUP:Absurd-IRC +n3=Random serverSERVER:irc.accessirc.net:6667GROUP:Accessirc +n4=Random serverSERVER:irc.acknet.org:6667-6669GROUP:ACKnet +n5=Random serverSERVER:irc.afternet.org:6667GROUP:AfterNET +n6=Random serverSERVER:irc.afterx.net:6667GROUP:AfterX +n7=Random serverSERVER:irc.allnetwork.org:6667GROUP:AllNetwork +n8=EU, SwedenSERVER:irc.ambernet.se:6667-6669GROUP:AmberNet +n9=Random serverSERVER:irc.amcool.net:6660-6669GROUP:AmCool +n10=Random serverSERVER:irc.angeleyez.net:6661-6669,7000GROUP:AngelEyez +n11=Random serverSERVER:irc.animeirc.de:6667GROUP:AnimeIRCnet +n12=Random serverSERVER:irc.aniverse.com:6661-6670GROUP:Aniverse +n13=Random serverSERVER:irc.arabchat.net:6667GROUP:ArabChat +n14=Random serverSERVER:irc.ascends.net:6666-6669,7000GROUP:Ascends +n15=AS, MYSERVER:irc.aseanchat.net:7000GROUP:AseanChat +n16=Random serverSERVER:irc.ashnet.org:6660-6669,7000GROUP:AshNet +n17=Random serverSERVER:irc.astrolink.org:6660-6667GROUP:AstroLink +n18=Random serverSERVER:irc.asylo.com:6660-6669GROUP:Asylo +n19=Random serverSERVER:irc.asylum-net.org:6661-6669,7000,7777GROUP:Asylumnet +n20=Random serverSERVER:irc.atrum.org:6667GROUP:Atrum +n21=Random serverSERVER:irc.austchat.net:6667GROUP:AustChat +n22=Random serverSERVER:irc.austnet.org:6667GROUP:AustNet +n23=Random AU serverSERVER:au.austnet.org:6667GROUP:AustNet +n24=Random SG serverSERVER:sg.austnet.org:6667GROUP:AustNet +n25=Random serverSERVER:irc.awesomechat.net:6661-6670,7001GROUP:AwesomeChat +n26=Random serverSERVER:irc.axenet.org:6660-6667,7000GROUP:Axenet +n27=Random serverSERVER:irc.eu.azzurra.org:6666-6669GROUP:Azzurra +n28=Random serverSERVER:irc.backwerds.net:6667,7000GROUP:BackwerdsIRC +n29=Random serverSERVER:irc.bdsm-net.com:6667GROUP:BDSMnet +n30=Random serverSERVER:chat.beatmix.org:6660-6669GROUP:Beatmix +n31=Random serverSERVER:irc2.beyondirc.net:6660-6669GROUP:Beyondirc +n32=Random serverSERVER:irc.bigpond.com:6667-6669GROUP:BigPond +n33=Random serverSERVER:irc.bikers-irc.net:6660-6670GROUP:Bikers-IRC +n34=Random serverSERVER:irc.bittah.com:6667GROUP:BittahIRC +n35=Random serverSERVER:irc.blabber.net:6667GROUP:BlabberNet +n36=Random serverSERVER:irc.blitzed.org:6667,7000GROUP:Blitzed +n37=Random serverSERVER:irc.bolchat.org:6667GROUP:BolChat +n38=Random serverSERVER:irc.bongster.org:6665-6669,7000GROUP:bonGster +n39=Random serverSERVER:irc.broken-pipe.net:6667-6669,+7000GROUP:Broken-Pipe +n40=Random serverSERVER:irc.brokenirc.net:6667-6669,7000GROUP:Brokenirc +n41=Random serverSERVER:irc.bruneichat.org:6667GROUP:BruneiChat +n42=Random serverSERVER:irc.burmeseonline.org:6667GROUP:Burmese +n43=Random serverSERVER:irc.caelestia.net:6667GROUP:Caelestia +n44=Random serverSERVER:irc.cajnet.com:6664-6669,7000GROUP:CAJnet +n45=Random serverSERVER:irc.centralchat.net:6667GROUP:CentralChat +n46=Random serverSERVER:irc.chakranet.com:6667-6669GROUP:ChakraNET +n47=Random serverSERVER:irc.chat4all.org:6666-6669GROUP:Chat4all +n48=Random serverSERVER:irc.chataholic.net:6667GROUP:Chataholic +n49=Random serverSERVER:irc.chatcafe.net:6667GROUP:Chatcafe +n50=Random serverSERVER:irc.chatchannel.org:6666-6669,7000GROUP:Chatchannel +n51=Random serverSERVER:irc.chatcircuit.com:6668GROUP:ChatCircuit +n52=Random serverSERVER:irc.chatfactory.net:6667GROUP:ChatFactory +n53=Random serverSERVER:irc.chatnet.org:6660-6669GROUP:Chatnet +n54=Random serverSERVER:irc.chatnplay.net:6667GROUP:ChatNPlay +n55=Random serverSERVER:irc.chatpolis.com:6667GROUP:Chatpolis +n56=Random serverSERVER:irc.chatsociety.net:6667-6669GROUP:Chatsociety +n57=Random serverSERVER:irc.chatspike.net:6667GROUP:ChatSpike +n58=Random serverSERVER:irc.chatster.org:6667GROUP:Chatster +n59=Random serverSERVER:irc.chattingaway.com:6667GROUP:ChattingAway +n60=Random serverSERVER:irc.chatworks.org:6660-6669GROUP:Chatworks +n61=Random serverSERVER:irc.chatx.net:6660-6669,7000GROUP:ChatX +n62=Random serverSERVER:irc.chikahan.com:6666-6669,7000GROUP:Chikahan +n63=Random serverSERVER:conectados.ciudad.com.ar:6667GROUP:Ciudad +n64=Random serverSERVER:irc.codersnet.org:6667-6669GROUP:CodersNet +n65=Random serverSERVER:irc.communicate.za.net:6667GROUP:Communicate +n66=Random serverSERVER:irc.cyanide-x.net:6667GROUP:Cyanide-x +n67=Random serverSERVER:irc.cyberarmy.net:6667GROUP:Cyberarmy +n68=Random US serverSERVER:irc.d00mnet.com:6667GROUP:D00mnet +n69=Random serverSERVER:irc.dal.net:6660-6667GROUP:DALnet +n70=AS, MY, MesraSERVER:mesra.kl.my.dal.net:6665-6668,7000GROUP:DALnet +n71=AS, SG, HotspeedSERVER:hotspeed.sg.as.dal.net:6665-6668,7000GROUP:DALnet +n72=EU, NO, PowertechSERVER:powertech.no.eu.dal.net:6665-6668,7000GROUP:DALnet +n73=US, FL, RumbleSERVER:rumble.fl.us.dal.net:6665-6668,7000GROUP:DALnet +n74=US, NY, BroadwaySERVER:broadway.ny.us.dal.net:6665-6668,7000GROUP:DALnet +n75=Random serverSERVER:irc.dark-storm.net:6667-6669,7000GROUP:Dark-Storm +n76=Random serverSERVER:irc.d-t-net.de:6667GROUP:Dark-Tou-Net +n77=Random serverSERVER:irc.darkfire.net:6667,7000,8000GROUP:Darkfire +n78=Random serverSERVER:irc.darkmyst.org:6667GROUP:DarkMyst +n79=Random serverSERVER:irc.darktree.net:6667GROUP:Darktree +n80=Random serverSERVER:irc.datawhore.net:6667GROUP:Datawhore +n81=Random serverSERVER:irc.deepirc.net:6660,6669GROUP:DeepIRC +n82=Disability networkSERVER:irc.deepspace.org:6667GROUP:Deepspace +n83=Random serverSERVER:irc.delinked.us:6660-6669,7000GROUP:Delinked +n84=Random serverSERVER:irc.deviantart.com:6667GROUP:DeviantART +n85=Random serverSERVER:irc.dhcnetwork.com:6666-6667GROUP:DhCNetwork +n86=Random serverSERVER:irc.different.net:6667GROUP:Different +n87=Random serverSERVER:irc.digitalirc.net:6667GROUP:Digitalirc +n88=Random serverSERVER:irc.discussioni.org:6665-6669GROUP:Discussioni +n89=Random serverSERVER:dream-irc.de:6667GROUP:Dream-Irc +n90=Random serverSERVER:irc.drlnet.com:6660-6667,7000GROUP:DrLnet +n91=Random serverSERVER:irc.dungeonchat.net:6667GROUP:DungeonChat +n92=Random serverSERVER:irc.dwchatta.com:6667,7000GROUP:DwChatta.com +n93=Random serverSERVER:irc.dynastynet.net:6667GROUP:Dynastynet +n94=Random serverSERVER:irc.echo34.com:6667-6669,7000-7002GROUP:Echo34 +n95=Random serverSERVER:irc.ecnet.org:6667GROUP:ECNet +n96=Random serverSERVER:irc.efnet.info:6667GROUP:EFnet +n97=Random serverSERVER:irc.efnet.org:6667GROUP:EFnet +n98=AS, IsraelSERVER:irc.inter.net.il:6667GROUP:EFnet +n99=CA, ON, TorontoSERVER:irc.igs.ca:6665GROUP:EFnet +n100=EU, DK, AarhusSERVER:irc.inet.tele.dk:6661-6669GROUP:EFnet +n101=EU, FI, HelsinkiSERVER:efnet.cs.hut.fi:6667GROUP:EFnet +n102=EU, HU, PecsSERVER:irc.pte.hu:6665-6669,7000,9000GROUP:EFnet +n103=EU, NL, AmsterdamSERVER:efnet.xs4all.nl:6661-6669GROUP:EFnet +n104=EU, NL, EdeSERVER:irc.efnet.nl:6660-6669GROUP:EFnet +n105=EU, NO, HomelienSERVER:irc.homelien.no:6666,6667,7000GROUP:EFnet +n106=EU, NO, OsloSERVER:irc.daxnet.no:6666-6669,7000GROUP:EFnet +n107=EU, PL, WarszawaSERVER:irc.efnet.pl:6667GROUP:EFnet +n108=EU, SE, BorlangeSERVER:irc.du.se:6666-6669,7000GROUP:EFnet +n109=EU, UK, LondonSERVER:efnet.demon.co.uk:6665-6669GROUP:EFnet +n110=US, AZ, Phoenix (Blackened)SERVER:irc.blackened.com:6665-6669GROUP:EFnet +n111=US, AZ, Phoenix (Easynews)SERVER:irc.easynews.com:6660,6665-6667,7000GROUP:EFnet +n112=US, CA, San Jose (Blessed)SERVER:irc.blessed.net:6665-6669GROUP:EFnet +n113=US, CA, San Jose (He)SERVER:irc.he.net:6665-6669,7000GROUP:EFnet +n114=US, CA, San Luis ObispoSERVER:irc.prison.net:6666-6667GROUP:EFnet +n115=US, FL, Boca RatonSERVER:irc.wh.verio.net:6665-6669GROUP:EFnet +n116=US, FL, OrlandoSERVER:irc.colosolutions.net:6665-6669,7000GROUP:EFnet +n117=US, GA, AtlantaSERVER:irc.mindspring.com:6660-6669,7000GROUP:EFnet +n118=US, IL, ChicagoSERVER:irc.servercentral.net:6660-6669,7000GROUP:EFnet +n119=US, MI, Ann ArborSERVER:irc.umich.edu:6664-6667GROUP:EFnet +n120=US, MN, Twin CitiesSERVER:irc.umn.edu:6665-6669GROUP:EFnet +n121=US, NJ, New JerseySERVER:irc.choopa.net:6666-6669,7000GROUP:EFnet +n122=US, NY, New YorkSERVER:irc.nac.net:6665-6669,7000GROUP:EFnet +n123=Random serverSERVER:irc.elevanet.fr:6667GROUP:Elevanet +n124=Random serverSERVER:irc.enterthegame.com:6667GROUP:EntertheGame +n125=Random serverSERVER:irc.epicirc.net:6667GROUP:EpicIRC +n126=Random serverSERVER:irc.esper.net:5555,6667-6669GROUP:EsperNet +n127=Random serverSERVER:irc.euirc.net:6665-6669GROUP:euIRCnet +n128=Random serverSERVER:irc.europeirc.org:6667-6668GROUP:EuropeIRC +n129=Random serverSERVER:irc.europnet.org:6667GROUP:EuropNet +n130=Random serverSERVER:irc.everywherechat.com:6667,7000GROUP:EverywhereChat +n131=Random serverSERVER:irc.eyerc.net:6667-6669,7000GROUP:EYErc +n132=Random serverSERVER:irc.fbnet.org:6667GROUP:FBN +n133=Random serverSERVER:irc.fdfnet.net:6666-6668,9999GROUP:FDFnet +n134=Random serverSERVER:irc.fef.net:6667GROUP:FEFnet +n135=Random serverSERVER:irc.financialchat.com:6667-6669,7000GROUP:Financialchat +n136=Random serverSERVER:irc.flameirc.net:6666-6669GROUP:FlameIRC +n137=Random serverSERVER:irc.forestnet.org:6667,7000GROUP:Forestnet +n138=Random serverSERVER:irc.foreverchat.net:6660-6669,7000GROUP:ForeverChat +n139=Random serverSERVER:irc.forthegamers.org:6665-6669,7000GROUP:ForTheGamers +n140=Random serverSERVER:irc.fcirc.net:6667-6669GROUP:FreedomChatIRC +n141=Random serverSERVER:chat.freenode.net:6665-6667,7000GROUP:Freenode +n142=Random serverSERVER:irc.freequest.net:7000GROUP:Freequest +n143=Random serverSERVER:irc.frozyn.info:6667GROUP:FroZyn +n144=Random serverSERVER:irc.funnet.org:6667GROUP:FunNet +n145=Random serverSERVER:irc.fusionchat.org:6667-7000GROUP:FusionChat +n146=Random serverSERVER:irc.galaxynet.org:6662-6668,7000GROUP:GalaxyNet +n147=MA, US, BostonSERVER:boston.ma.us.galaxynet.org:6661-6669GROUP:GalaxyNet +n148=Random serverSERVER:irc.gamesnet.net:6667GROUP:GamesNET +n149=Random serverSERVER:irc.gamesurge.net:6667GROUP:GameSurge +n150=Random EU serverSERVER:irc.eu.gamesurge.net:6667GROUP:GameSurge +n151=Random serverSERVER:irc.gammaforce.org:6660-6669,7000GROUP:GammaForce +n152=Random serverSERVER:irc.german-elite.net:6667GROUP:German-Elite +n153=Random serverSERVER:irc.german-freakz.net:6667GROUP:German-freakz +n154=Random serverSERVER:irc.germany-irc.de:6666-6669GROUP:Germany-IRC +n155=Random serverSERVER:irc.gigacrew.net:6667-6669GROUP:GigaCrew +n156=Random serverSERVER:irc.gigairc.net:6667-6669GROUP:GigaIRC +n157=Random serverSERVER:irc.global-irc.com:6660-6669GROUP:Global-IRC +n158=Random serverSERVER:irc.globalchat.org:6667GROUP:Globalchat +n159=Random serverSERVER:irc.globalgamerscenter.net:6667,6668,7000GROUP:GlobalGamers +n160=Random serverSERVER:irc.goldchat.nl:6667-6669,7000GROUP:Goldchat +n161=Random serverSERVER:irc.goodchatting.com:6661-6669,7000GROUP:Goodchatting +n162=Random serverSERVER:irc.greekirc.net:6667GROUP:GreekIRC +n163=Random serverSERVER:srv.irc.gr:6667,7000GROUP:GRnet +n164=Random serverSERVER:irc.habber.net:6667GROUP:HabberNet +n165=Random serverSERVER:irc.heavenlyplace.net:6660-6669GROUP:HeavenlyPlace +n166=Random serverSERVER:irc.hellasirc.net:6667GROUP:HellasIRC +n167=Random serverSERVER:irc.mirc.gr:6667GROUP:HellenicNet +n168=Random serverSERVER:irc.hollimyer.com:6665-6669GROUP:Hollimyer +n169=Random serverSERVER:irc.ia-net.net:6667GROUP:IA-NET +n170=Random serverSERVER:irc.illumichat.net:6667-6669,7000GROUP:Illumichat +n171=Random serverSERVER:irc.immortal-anime.net:6660-6669,7000GROUP:Immortal-Anime +n172=Random serverSERVER:irc.imperium.ca:6660-6667GROUP:Imperium +n173=Random serverSERVER:irc.infomatrix.net:6667GROUP:Infomatrix +n174=Random serverSERVER:irc.insiderz.de:6660-6670GROUP:insiderZ.DE +n175=Random serverSERVER:irc.irc-chat.net:6664-6669,7000,7001GROUP:IRC-Chat +n176=Random serverSERVER:irc.cl:6667GROUP:IRC-Chile +n177=Random serverSERVER:irc.irc-evolution.org:6667GROUP:IRC-Evolution +n178=Random serverSERVER:irc.irc-hispano.org:6667GROUP:IRC-Hispano +n179=Main serverSERVER:irc.by:6666-6669GROUP:IRC.BY +n180=Random serverSERVER:irc.irc2.hu:6666-6668,5190GROUP:IRC2 +n181=Random serverSERVER:irc.irc4fun.net:6667GROUP:IRC4Fun +n182=Random serverSERVER:irc.irchighway.net:6660-6669GROUP:IRCHighway +n183=Random serverSERVER:irc.ircnet.com:6667GROUP:IRCnet +n184=Random serverSERVER:open.ircnet.net:6666-6668GROUP:IRCnet +n185=US Random serverSERVER:irc.us.ircnet.net:6665-6668GROUP:IRCnet +n186=AS, IL, HaifaSERVER:ircnet.netvision.net.il:6666-6668GROUP:IRCnet +n187=AS, JP, TokyoSERVER:irc.tokyo.wide.ad.jp:6666-6668GROUP:IRCnet +n188=AS, TW, TaipeiSERVER:irc.freebsd.org.tw:6666-6668GROUP:IRCnet +n189=EU, AT, LinzSERVER:linz.irc.at:6666-6668GROUP:IRCnet +n190=EU, AT, WienSERVER:vienna.irc.at:6666-6668GROUP:IRCnet +n191=EU, BE, BrusselsSERVER:ircnet.realroot.be:6666-6668GROUP:IRCnet +n192=EU, CH, BaselSERVER:irc.datacomm.ch:6664-6670GROUP:IRCnet +n193=EU, CZ, PragueSERVER:irc.felk.cvut.cz:6667GROUP:IRCnet +n194=EU, DE, RandomSERVER:random.ircd.de:6666-6668GROUP:IRCnet +n195=EU, DK, CopenhagenSERVER:irc.dotsrc.org:6666-6668GROUP:IRCnet +n196=EU, EE, RandomSERVER:irc.ircnet.ee:6666-6668GROUP:IRCnet +n197=EU, FI, HelsinkiSERVER:irc.cs.hut.fi:6667GROUP:IRCnet +n198=EU, FR, ParisSERVER:ircnet.club-internet.fr:6666-6668GROUP:IRCnet +n199=EU, HU, BudapestSERVER:atw.irc.hu:6667-6670GROUP:IRCnet +n200=EU, IS, ReykjavikSERVER:irc.simnet.is:6660-6669GROUP:IRCnet +n201=EU, IT, RomeSERVER:irc.eutelia.it:6664-6669,7000GROUP:IRCnet +n202=EU, IT, RomeSERVER:irc.tin.it:6665-6669GROUP:IRCnet +n203=EU, LV, RigaSERVER:irc.apollo.lv:6666-6669,7000GROUP:IRCnet +n204=EU, NL, Amsterdam (uunet)SERVER:irc.uunet.nl:6660-6669GROUP:IRCnet +n205=EU, NL, Amsterdam (xs4all)SERVER:irc.xs4all.nl:6660-6669GROUP:IRCnet +n206=EU, NL, EnschedeSERVER:irc.snt.utwente.nl:6660-6669GROUP:IRCnet +n207=EU, NO, OsloSERVER:irc.ifi.uio.no:6667GROUP:IRCnet +n208=EU, NO, TrondheimSERVER:irc.pvv.ntnu.no:6667GROUP:IRCnet +n209=EU, PL, LublinSERVER:lublin.irc.pl:6666-6668GROUP:IRCnet +n210=EU, PL, WarsawSERVER:warszawa.irc.pl:6666-6668GROUP:IRCnet +n211=EU, SE, LuleaSERVER:irc.ludd.luth.se:6661-6669GROUP:IRCnet +n212=EU, SE, StockholmSERVER:irc.swipnet.se:6660-6670,8000GROUP:IRCnet +n213=EU, SI, LjubljanaSERVER:irc.arnes.si:6666-6669GROUP:IRCnet +n214=EU, SI, LjubljanaSERVER:irc.link.si:6666-6669GROUP:IRCnet +n215=EU, SK, BratislavaSERVER:irc.nextra.sk:6666-6669GROUP:IRCnet +n216=EU, UK, LondonSERVER:ircnet.demon.co.uk:6665-6669GROUP:IRCnet +n217=US, FL, MiamiSERVER:ircnet.eversible.com:6665-6669GROUP:IRCnet +n218=US, NJ, JerseySERVER:ircnet.choopa.net:6665-6669GROUP:IRCnet +n219=Random serverSERVER:irc.ircnightfire.net:6666,6667GROUP:IRCNightfire +n220=Random serverSERVER:irc.icq.com:6665-6669,7000GROUP:IrCQNet +n221=Random serverSERVER:irc.ircsuper.net:6660-6670GROUP:IrcSuper +n222=Random serverSERVER:irc.irctoo.net:6667GROUP:IRCtoo +n223=Random serverSERVER:irc.ircube.org:6667GROUP:IRCube +n224=Random serverSERVER:irc.ircworld.nl:6667GROUP:IrcWorld +n225=Random serverSERVER:irc.irdsi.net:6667-6669,7032GROUP:IRDSI +n226=Random serverSERVER:irc.irsee.org:6667GROUP:IRSee +n227=Random serverSERVER:irc.is-1337.org:6667GROUP:is-1337 +n228=Random serverSERVER:irc.jasonirc.net:6660-6667GROUP:JasonIRC +n229=Random serverSERVER:irc.jaundies.com:6665-6669,8067GROUP:Jaundies +n230=Random serverSERVER:irc.jetirc.net:6667GROUP:JetIRC +n231=Random serverSERVER:irc.juggaloirc.net:6667GROUP:JuggaloIRCNet +n232=Random serverSERVER:irc.kampungchat.org:6667GROUP:KampungChat +n233=Random serverSERVER:irc.karacay.com:6660-6670,7000,8888GROUP:Karacay +n234=Random serverSERVER:irc.kdfs.net:6667-6669GROUP:KDFSnet +n235=Random serverSERVER:irc.kenthaber.com:6661-6669GROUP:Kenthaber +n236=Random serverSERVER:irc.kickchat.com:6660-6669,7000GROUP:Kickchat +n237=Random serverSERVER:irc.kissradiofm.org:6667GROUP:KissRadioFM +n238=EU, TR, Istanbul serverSERVER:irc.klavye.com.tr:6660-6670,7000GROUP:Klavye +n239=Random serverSERVER:irc.knightirc.net:6660-6669,6677GROUP:KnightIRC +n240=Random serverSERVER:irc.knightnet.net:6666-6668GROUP:Knightnet +n241=Random serverSERVER:irc.krey.net:6667GROUP:Kreynet +n242=Random serverSERVER:irc.krono.net:6660-6669,7000GROUP:Krono +n243=Random serverSERVER:irc.kukaionline.com:6667,7000,8067GROUP:KukaiOnline +n244=Random serverSERVER:irc.landoleet.org:6667GROUP:LandOLeet +n245=Random serverSERVER:irc.langochat.net:6667GROUP:Langochat +n246=Random serverSERVER:irc.ldsirc.net:6667GROUP:LDSircNet +n247=Random serverSERVER:irc.lepaknet.org:6667GROUP:Lepaknet +n248=Random serverSERVER:irc.librenet.net:6667GROUP:Librenet +n249=Random serverSERVER:irc.lichtsnel.nl:6660-6669,7000GROUP:LichtSnel +n250=Random serverSERVER:irc.link-net.org:6667-6669GROUP:LinkNet +n251=Random serverSERVER:irc.lobi.net:6660-6669,7000GROUP:LobiNET +n252=Random serverSERVER:irc.maddshark.net:6660-6669,7000GROUP:Maddshark +n253=Random serverSERVER:irc.magicstar.net:6667GROUP:MagicStar +n254=Random serverSERVER:irc.malaynet.org:6667-6669GROUP:Malaynet +n255=Random serverSERVER:irc.malaysiairc.org:6667GROUP:MalaysiaIRC +n256=Random serverSERVER:irc.maschat.com:6667GROUP:MASChat +n257=Random serverSERVER:irc.matrix-network.org:6667-6669GROUP:Matrix-Net +n258=Random serverSERVER:irc.memphisnet.org:6660-6669,7000,7001GROUP:MemphisNet +n259=Random serverSERVER:irc.mildnet.org:6667GROUP:MILDnet +n260=Random serverSERVER:irc.mistrider.net:6661-6669GROUP:Mistrider +n261=Random serverSERVER:irc.mmoirc.com:6667GROUP:MMOIRC +n262=Random serverSERVER:irc.mozilla.org:6667GROUP:Mozilla +n263=Random serverSERVER:irc.mugglenet.com:6666-6669GROUP:MuggleNet +n264=Random serverSERVER:irc.muhabbet.net:6661-6669GROUP:Muhabbet +n265=Random serverSERVER:irc.necron.org:6665-6669,7000GROUP:Necron +n266=Random serverSERVER:irc.neoturbine.net:6667GROUP:NeoturbineNET +n267=Random serverSERVER:irc.neoxys.org:6667GROUP:NeoXys +n268=Random serverSERVER:irc.netgamers.org:6667GROUP:Netgamers +n269=Random serverSERVER:irc.netmassif.org:6667GROUP:Netmassif +n270=Random serverSERVER:irc.nevernet.net:6667GROUP:Nevernet +n271=Random serverSERVER:irc.newnet.net:6665-6667GROUP:Newnet +n272=Random serverSERVER:irc.nexusirc.org:6667GROUP:Nexusirc +n273=Random serverSERVER:irc.nightstar.net:6665-6669GROUP:NightStar +n274=Random serverSERVER:irc.ninth-gate.org:6667GROUP:Ninth-Gate +n275=Random serverSERVER:irc.nix.co.il:+9999,6667,7000GROUP:NiX +n276=Random serverSERVER:irc.novernet.com:6665-6669,7000GROUP:Novernet +n277=Random serverSERVER:irc.npircs.pl:6667,5555GROUP:NPIRCS +n278=Random serverSERVER:irc.nullirc.net:6665-6667,7000GROUP:NullIRC +n279=Random serverSERVER:irc.oblivionirc.net:6667GROUP:OblivionIRC +n280=Random serverSERVER:irc.oceanius.com:6660-6669GROUP:Oceanius +n281=Random serverSERVER:irc.ofloo.net:6667GROUP:OflooIRC +n282=Random AU serverSERVER:fantasy.oldschool-irc.net:6667GROUP:Oldschool-IRC +n283=UK serverSERVER:uk.oldschool-irc.net:6667GROUP:Oldschool-IRC +n284=Random serverSERVER:irc.othernet.org:6667GROUP:Othernet +n285=Random serverSERVER:irc.otherworlders.org:6660-6669GROUP:OtherWorlders +n286=Random serverSERVER:irc.outsiderz.com:6667GROUP:Outsiderz +n287=Random serverSERVER:irc.oz.org:6666-6668,7000,7777GROUP:Oz.org +n288=Random serverSERVER:irc.p2p-fire.net:6667GROUP:P2P-Fire +n289=Random serverSERVER:irc.p2pchat.net:6667,7000GROUP:P2PChat +n290=Random serverSERVER:irc.phasenet.co.uk:6666-6669,7000GROUP:PhaseNet +n291=Random serverSERVER:irc.phat-net.de:6660-6667,7000GROUP:PhatNET +n292=Random serverSERVER:irc.phazenet.com:6667-6669,7000GROUP:PhaZeNet +n293=Random serverSERVER:irc.phoonet.org:6660-6669GROUP:PhooNet +n294=Random serverSERVER:irc.phrenzy.org:6667GROUP:PhrenzyIRC +n295=Random serverSERVER:irc.powerprecision.com:6667-6669GROUP:PowerPrecision +n296=Random serverSERVER:irc.ptnet.org:6667GROUP:PTnet +n297=Random serverSERVER:irc.quakenet.org:6667-6669GROUP:Quakenet +n298=Random DE serverSERVER:de.quakenet.org:6667-6669GROUP:QuakeNet +n299=Random SE serverSERVER:se.quakenet.org:6667-6669GROUP:QuakeNet +n300=Random UK serverSERVER:uk.quakenet.org:6667-6669GROUP:QuakeNet +n301=Random US serverSERVER:us.quakenet.org:6667-6669GROUP:QuakeNet +n302=Random serverSERVER:irc.razor-irc.net:6667GROUP:Razor-Irc +n303=Random serverSERVER:irc.realirc.org:6667GROUP:Realirc +n304=Random serverSERVER:irc.realitybytez.net:6667,6697GROUP:Realitybytez +n305=Random serverSERVER:irc.red-latina.org:6667GROUP:Red-Latina +n306=Random serverSERVER:irc.relaychat.net:6661-6669,7000GROUP:RelayChat +n307=Random serverSERVER:irc.rezosup.org:6667GROUP:Rezosup +n308=Random serverSERVER:irc.risanet.com:6667-6669GROUP:Risanet +n309=Random serverSERVER:irc.rizon.net:6660-6669,7000GROUP:Rizon +n310=Random serverSERVER:irc.romaniairc.org:6667,6668GROUP:RomaniaIRC +n311=Random serverSERVER:irc.roofstar.net:6660-6669GROUP:Roofstar +n312=Random serverSERVER:irc.rootspirit.com:6667GROUP:Rootspirit +n313=EU, RU, TomskSERVER:irc.tsk.ru:6667-6669,7770-7775GROUP:RusNet +n314=Random serverSERVER:irc.scarynet.org:6667GROUP:ScaryNet +n315=Random server SERVER:irc.scifi-fans.net:6660-6668,7000GROUP:Scifi-Net +n316=Random serverSERVER:irc.seersirc.net:6667-6669,7000GROUP:SeersIRC +n317=Random serverSERVER:irc2.serenia.net:6667GROUP:Serenia +n318=Random serverSERVER:irc.serenity-irc.net:6667-6669,7000GROUP:Serenity-IRC +n319=Random serverSERVER:irc.sexnet.org:6667GROUP:SexNet +n320=Random serverSERVER:irc.shadowfire.org:6667GROUP:ShadowFire +n321=Random serverSERVER:irc.shadowworld.net:6667GROUP:ShadowWorld +n322=Random serverSERVER:irc.simosnap.net:6666-6669GROUP:SimosNap +n323=Random serverSERVER:irc.sinoptic.net:6660-6669GROUP:Sinoptic +n324=Random serverSERVER:irc.slacked.org:6667GROUP:Slacked +n325=Random serverSERVER:irc.slashnet.org:6667GROUP:Slashnet +n326=Random serverSERVER:irc.snm.co.nz:6667GROUP:SNM +n327=Random serverSERVER:irc.sohbet.net:6661-6669GROUP:Sohbet +n328=Random serverSERVER:irc.sorcery.net:6667,7000,9000GROUP:SorceryNet +n329=Random serverSERVER:irc.spacetronix.net:6660-6669,7000GROUP:SpaceTronix +n330=Random serverSERVER:irc.spidernet.org:6667-6669GROUP:SpiderNet +n331=Random serverSERVER:irc.st-city.net:6660-6669GROUP:ST-City +n332=Random serverSERVER:irc.starchat.net:6667-6669,7000GROUP:StarChat +n333=Random serverSERVER:irc.starfusion.org:6663-6669GROUP:Starfusion +n334=Random serverSERVER:irc.starlink-irc.org:6667GROUP:Starlink-irc +n335=Random serverSERVER:irc.starlink.org:6667GROUP:StarLink.Org +n336=Random serverSERVER:irc.staynet.org:6667GROUP:StayNet +n337=Random serverSERVER:irc.stormdancing.net:6664-6669,7000,9000GROUP:Stormdancing +n338=US, AR, Little RockSERVER:irc.stormnine.net:6667,6668GROUP:StormNineNet +n339=Random serverSERVER:irc.striked.org:6660-6669,7000GROUP:Striked +n340=Random serverSERVER:irc.succuba.com:6665-6669GROUP:Succuba +n341=TR, AdanaSERVER:irc.suskun.net:6667GROUP:Suskun.Net +n342=Random serverSERVER:irc.swiftirc.net:6667GROUP:SwiftIRC +n343=Random serverSERVER:irc.synchro.net:6667GROUP:Synchronet +n344=Random serverSERVER:irc.synirc.net:6660-6669GROUP:synIRC +n345=Random ServerSERVER:irc.syrolnet.org:6666-6668GROUP:SyrolNet +n346=Random serverSERVER:irc.talkingirc.net:6667GROUP:TalkingIRC +n347=Random serverSERVER:irc.teranova.net:6667GROUP:Teranova.net +n348=Random serverSERVER:irc.the-zone.net:6667GROUP:ThE-ZonE.neT +n349=Random serverSERVER:irc.thundercity.net:6660-6669,7000GROUP:ThunderCity +n350=Random serverSERVER:topircnet.com:6667GROUP:TopIRCNet +n351=Random serverSERVER:irc.totalirc.net:6660-6669,7000GROUP:TotalIRC +n352=Random serverSERVER:irc.trineam.com:6667GROUP:Trineam +n353=Random serverSERVER:irc.tveps.net:+6660,6667GROUP:TVEps +n354=Random serverSERVER:irc.uicn.net:6667GROUP:UICN +n355=Random serverSERVER:irc.uirc.net:6660-6669GROUP:uIRC +n356=Random serverSERVER:irc.ukchatterbox.com:7000GROUP:UKchatterbox +n357=Random serverSERVER:irc.umbranet.org:6667GROUP:Umbranet +n358=Random serverSERVER:irc.undermind.net:6667GROUP:UnderMind +n359=Random EU serverSERVER:eu.undernet.org:6667GROUP:Undernet +n360=Random US serverSERVER:us.undernet.org:6667GROUP:Undernet +n361=EU, BE, ElseneSERVER:elsene.be.eu.undernet.org:6667-6669,7000GROUP:Undernet +n362=EU, FI, HelsinkiSERVER:helsinki.fi.eu.Undernet.org:6666-6669GROUP:Undernet +n363=EU, HR, ZagrebSERVER:zagreb.hr.eu.undernet.org:6666-6669,9999GROUP:Undernet +n364=EU, NL, EdeSERVER:ede.nl.eu.undernet.org:6660-6668GROUP:Undernet +n365=EU, NO, OsloSERVER:oslo.no.eu.undernet.org:6666-6669GROUP:Undernet +n366=EU, UK, LondonSERVER:london.uk.eu.undernet.org:6660-6670,7000GROUP:Undernet +n367=US, AZ, MesaSERVER:mesa.az.us.undernet.org:6660,6665-6667,7000GROUP:Undernet +n368=US, NY, NewyorkSERVER:newyork.ny.us.undernet.org:6660-6667,7000GROUP:Undernet +n369=Random serverSERVER:irc.underz.org:6667-6668GROUP:UnderZ +n370=Random serverSERVER:irc.unionlatina.org:6667GROUP:UnionLatina +n371=Random serverSERVER:irc.unitedchat.net:6666-6667,6669,7000GROUP:UnitedChat +n372=Random serverSERVER:irc.urchat.net:6667GROUP:URChat +n373=Random serverSERVER:irc.veezy.net:6667GROUP:Veezy +n374=Random serverSERVER:irc.virtualife.com.br:6667GROUP:VirtuaLife +n375=Random serverSERVER:irc.virtuanet.org:6660-6669,7000GROUP:VirtuaNet +n376=Random serverSERVER:irc.voila.fr:6667GROUP:Voila +n377=Random serverSERVER:irc.wearab.net:6660-6665GROUP:WeArab +n378=Random serverSERVER:irc.webchat.org:7000GROUP:WebChat +n379=Random serverSERVER:irc.webchatting.com:6660-6669GROUP:WebChatting +n380=Random serverSERVER:irc.webcomm.co.za:6667GROUP:Webcomm +n381=Random serverSERVER:irc.webmas.org:6667GROUP:WebMas +n382=Random serverSERVER:irc.whatnet.org:6667GROUP:WhatNet +n383=Random serverSERVER:irc.wikkedwire.com:6660-6669GROUP:WikkedWire +n384=Random serverSERVER:irc.windfyre.net:6667GROUP:Windfyre +n385=Random serverSERVER:irc.wondernet.nu:6666,6667,6668,6669,7000GROUP:WonderNet +n386=Random serverSERVER:irc.worldirc.org:6660-6667GROUP:WorldIRC +n387=Random serverSERVER:irc.worldnet.net:6667,7000GROUP:Worldnet +n388=Random serverSERVER:irc.wyldryde.org:6666-6669GROUP:WyldRyde +n389=Random serverSERVER:irc.xangelz.org:6660-6669GROUP:XAngelz +n390=Random serverSERVER:irc.xentonix.net:6661-6669GROUP:XentoniX +n391=Random serverSERVER:irc.xevion.net:6667,7000GROUP:Xevion +n392=Random serverSERVER:irc.xtris.net:6667GROUP:Xtris +n393=Random serverSERVER:irc.zanet.net:6667GROUP:ZAnetNet +n394=UK, LondonSERVER:apophis.zanet.org.za:6667GROUP:ZAnetOrg +n395=Random serverSERVER:irc.zerofuzion.net:6661-6669GROUP:ZeroFuzion +n396=Random serverSERVER:irc.zuh.net:6667GROUP:ZUHnet +n397=Random serverSERVER:irc.zurna.net:6667GROUP:ZurnaNet