mIRC Stats — File Browser
mIRCStatsv4.61 / mIRCStatsv4.61 / stats / webpages / classic / classic.mrc
classic.mrc — 24.33 KB — Download this file
alias statswebclassic {
var %ticks = $ticks
sw <html>
sw <head>
sw <style type="text/css"><!--
sw body $chr(123) background: #4F526A; scrollbar-face-color: #30323F; scrollbar-shadow-color: #616161; scrollbar-highlight-color: #6A7478; scrollbar-3dlight-color: #98ACB1; scrollbar-darkshadow-color: #8A9194; scrollbar-track-color: #3C3E4F; scrollbar-arrow-color: #8A9194; font-family: verdana, arial, helvetica, sans-serif; font-size: 11px; color: #BDD5E0; $chr(125)
sw table $chr(123) font-size: 10px; color: #BDD5E0; $chr(125)
sw a $chr(123) color: #EBEBEB; text-decoration: none; font-weight: bold; $chr(125)
sw a:hover $chr(123) color: #99B4CD; text-decoration: none; font-weight: bold; $chr(125)
sw .bold $chr(123) font-size: 10px; color: #BDD5E0; font-weight: bold; $chr(125)
sw .contentborder $chr(123) border-top: 1px solid #8498A2; border-left: 1px solid #8498A2; border-right: 1px solid #8498A2; border-bottom: 1px solid #8498A2; $chr(125)
sw --></style>
sw <title> $sinfo(p,wintitle) - mIRC Stats $sinfo(p,version) </title>
sw </head>
sw <body leftmargin="10" topmargin="10">
sw <center>
sw <font size=3><b> $sinfo(p,pagetitle) </b></font></br><a href=".">Servers</a> $iif($sinfo(p,showcount),- <a href="./?=counters">Counters</a>) $iif($sinfo(p,showsys),- <a href=".?=system">System Stats</a>) <br><br>
if ($sinfo(p,piclink)) { sw <img src=" $+ $sinfo(p,piclink) $+ "> }
sw </center>
sw <table width="100%" height="60%" border="0" cellpadding="0" bgcolor="#4F526A">
sw <tr><td valign="top">
sw <table width="300" border="0" class="contentborder" cellpadding="0" bgcolor="#3C3E4F">
sw <tr><td colspan=2 bgcolor=#30323F><b>Personal Information:</b></td></tr>
sw <tr><td width="80">Main Nick:</td><td> $iif($sinfo(p,nick),$ifmatch,-) </td></tr>
sw <tr><td>Alt-Nick:</td><td> $iif($sinfo(p,anick),$ifmatch,-) </td></tr>
sw <tr><td>Full name:</td><td> $iif($sinfo(p,fullname),$ifmatch,-) </td></tr>
sw <tr><td>Location:</td><td> $iif($sinfo(p,location),$ifmatch,-) </td></tr>
sw <tr><td>Age:</td><td> $iif($sinfo(p,age),$ifmatch,-) </td></tr>
sw <tr><td>Gender:</td><td> $iif($sinfo(p,gender),$ifmatch,-) </td></tr>
sw <tr><td colspan=2></td></tr>
sw <tr><td colspan=2></td></tr>
sw <tr><td>Hobbies:</td><td> $iif($sinfo(p,hobbies),$ifmatch,-) </td></tr>
sw <tr><td>Occupation:</td><td> $iif($sinfo(p,occ),$ifmatch,-) </td></tr>
sw <tr><td>Bio:</td><td> $iif($sinfo(p,bio),$ifmatch,-) </td></tr>
sw <tr><td colspan=2></td></tr>
sw <tr><td colspan=2></td></tr>
sw <tr><td>E-mail:</td><td><a href="mailto: $+ $strip($sinfo(p,email)) $+ "> $iif($sinfo(p,email),$ifmatch,-) </a></td></tr>
sw <tr><td>Website:</td><td><a href=" $+ $strip($sinfo(p,website)) $+ "> $iif($sinfo(p,website),$ifmatch,-) </a></td></tr>
sw <tr><td>MSN Addy:</td><td> $iif($sinfo(p,msn),$ifmatch,-) </td></tr>
sw <tr><td>AIM Nick:</td><td> $iif($sinfo(p,aim),$ifmatch,-) </td></tr>
sw <tr><td>ICQ Number:</td><td> $iif($sinfo(p,icq),$ifmatch,-) </td></tr>
sw <tr><td>Yahoo Addy:</td><td> $iif($sinfo(p,yahoo),$ifmatch,-) </td></tr>
sw <tr><td colspan=2></td></tr>
sw <tr><td>IRC Networks:</td><td> $iif($sinfo(p,nets),$ifmatch,-) </td></tr>
sw <tr><td>IRC Chans:</td><td> $iif($sinfo(p,chans),$ifmatch,-) </td></tr>
sw <tr><td>IRC Nicks:</td><td> $iif($sinfo(p,nicks),$ifmatch,-) </td></tr>
sw </table><br>
if ($sinfo(p,showtime)) {
sw <table width="300" border="0" class="contentborder" cellpadding="0" bgcolor="#3C3E4F">
sw <tr><td colspan=2 bgcolor=#30323F><b>Time:</b></td></tr>
sw <tr><td width="100">Hour:</td><td> $sinfo(t,time) </td></tr>
sw <tr><td>Date:</td><td> $sinfo(t,date) </td></tr>
sw <tr><td colspan=2></td></tr>
sw <tr><td colspan=2></td></tr>
sw <tr><td>Total online:</td><td> $sinfo(t,totalonline) </td></tr>
sw <tr><td>mIRC uptime:</td><td> $sinfo(t,mirc) </td></tr>
sw <tr><td>System uptime:</td><td> $sinfo(t,system) </td></tr>
sw </table>
}
sw </td><td width="1" height="100%" bgcolor="#8498A2" align="left" valign="top"></td><td width=1></td><td width=1></td><td valign="top">
if (/?=counters isin $1) && ($sinfo(p,showcount)) {
sw <table width="100%" border="0" cellpadding="0" cellspacing="0" bgcolor="#4F526A">
sw <tr><td align="left" valign="top">
sw <table width="320" border="0" class="contentborder" cellpadding="0" bgcolor="#3C3E4F">
sw <tr><td colspan=4 bgcolor=#30323F><b>Text Stuff:</b></td></tr>
sw <tr><td colspan=4>Since $sinfo(e,date) I have said/typed:</td></tr>
sw <tr><td>Lines:</td><td> $sinfo(e,lines) </td><td> ( $+ $sinfo(e,lines).day per day) </td></tr>
sw <tr><td>Words:</td><td> $sinfo(e,words) </td><td> ( $+ $sinfo(e,words).day per day) </td></tr>
sw <tr><td>Characters:</td><td> $sinfo(e,chars) </td><td> ( $+ $sinfo(e,chars).day per day) </td></tr>
sw <tr><td>Punctuations:</td><td> $sinfo(e,puncs) </td><td> ( $+ $sinfo(e,puncs).day per day) </td></tr>
sw <tr><td>Smilies</td><td> $sinfo(e,smilies) </td><td> ( $+ $sinfo(e,smilies).day per day) </td></tr>
sw </table>
sw </td><td align="left" valign="top">
sw <table width="320" border="0" class="contentborder" cellpadding="0" bgcolor="#3C3E4F">
sw <tr><td colspan=4 bgcolor=30323F><b>Basic events:</b></td></tr>
sw <tr><td colspan=4>Since $sinfo(e,firstdate) I have:</td></tr>
sw <tr><td>Started mIRC:</td><td> $sinfo(e,started) </td><td> ( $+ $sinfo(e,started).day per day) </td></tr>
sw <tr><td>Viewed stats:</td><td> $sinfo(e,viewed) </td><td> ( $+ $sinfo(e,viewed).day per day) </td></tr>
sw <tr><td>Echos:</td><td> $sinfo(e,echo) </td><td> ( $+ $sinfo(e,echo).day per day) </td></tr>
sw <tr><td>CTCP replies:</td><td> $sinfo(e,ctcps) </td><td> ( $+ $sinfo(e,ctcps).day per day) </td></tr>
sw <tr><td>Send DCC files:</td><td> $sinfo(e,dccsend) </td><td>Size:</td><td> $bytes($sinfo(e,dccsendsize),3).suf </td></tr>
sw <tr><td>Recieved DCC files:</td><td> $sinfo(e,dccget) </td><td>Size:</td><td> $bytes($sinfo(e,dccgetsize),3).suf </td></tr>
sw <tr><td>Webpage hits:</td><td> $sinfo(e,pagehits) </td><td> ( $+ $sinfo(e,pagehits).day per day) </td></tr>
sw </table>
sw </td></tr><tr><td align=left valign=top colspan=2>
sw <table width="100%" border="0" cellpadding="0" cellspacing="0" bgcolor=" $+ $hg(colorback) $+ "><br>
sw <tr><td align=left valign=top>
sw <table width="210" border="0" class="contentborder" cellpadding="0" bgcolor="#3C3E4F">
sw <tr><td colspan=2 bgcolor=30323F><b>Been Stats:</b></td></tr>
sw <tr><td colspan=2>Since $sinfo(b,date) times I've been:</td></tr>
sw <tr><td>Oped:</td><td> $sinfo(b,oped) ( $+ $sinfo(b,oped).day per day) </td></tr>
sw <tr><td>Deoped:</td><td> $sinfo(b,deoped) ( $+ $sinfo(b,deoped).day per day) </td></tr>
sw <tr><td>Halfoped:</td><td> $sinfo(b,halfoped) ( $+ $sinfo(b,halfoped).day per day) </td></tr>
sw <tr><td>Dehalfoped:</td><td> $sinfo(b,dehalfoped) ( $+ $sinfo(b,dehalfoped).day per day) </td></tr>
sw <tr><td>Voiced:</td><td> $sinfo(b,voiced) ( $+ $sinfo(b,voiced).day per day) </td></tr>
sw <tr><td>Devoiced:</td><td> $sinfo(b,devoiced) ( $+ $sinfo(b,devoiced).day per day) </td></tr>
sw <tr><td>Kicked:</td><td> $sinfo(b,kicked) ( $+ $sinfo(b,kicked).day per day) </td></tr>
sw <tr><td>Banned:</td><td> $sinfo(b,banned) ( $+ $sinfo(b,banned).day per day) </td></tr>
sw </table>
sw </td><td align=left valign=top>
sw <table width="210" border="0" class="contentborder" cellpadding="0" bgcolor="#3C3E4F">
sw <tr><td colspan=2 bgcolor=30323F><b>Have Stats:</b></td></tr>
sw <tr><td colspan=2>Since $sinfo(h,date) times I have:</td></tr>
sw <tr><td>Oped:</td><td> $sinfo(h,oped) ( $+ $sinfo(h,oped).day per day) </td></tr>
sw <tr><td>Deoped:</td><td> $sinfo(h,deoped) ( $+ $sinfo(h,deoped).day per day) </td></tr>
sw <tr><td>Halfoped:</td><td> $sinfo(h,halfoped) ( $+ $sinfo(h,halfoped).day per day) </td></tr>
sw <tr><td>Dehalfoped:</td><td> $sinfo(h,dehalfoped) ( $+ $sinfo(h,dehalfoped).day per day) </td></tr>
sw <tr><td>Voiced:</td><td> $sinfo(h,voiced) ( $+ $sinfo(h,voiced).day per day) </td></tr>
sw <tr><td>Devoiced:</td><td> $sinfo(h,devoiced) ( $+ $sinfo(h,devoiced).day per day) </td></tr>
sw <tr><td>Kicked:</td><td> $sinfo(h,kicked) ( $+ $sinfo(h,kicked).day per day) </td></tr>
sw <tr><td>Banned:</td><td> $sinfo(h,banned) ( $+ $sinfo(h,banned).day per day) </td></tr>
sw <tr><td>Changed Nick:</td><td> $sinfo(h,nick) ( $+ $sinfo(h,nick).day per day) </td></tr>
sw <tr><td>Set Topic:</td><td> $sinfo(h,topic) ( $+ $sinfo(h,topic).day per day) </td></tr>
sw <tr><td>Joined Chan:</td><td> $sinfo(h,joined) ( $+ $sinfo(h,joined).day per day) </td></tr>
sw <tr><td>Parted Chan:</td><td> $sinfo(h,parted) ( $+ $sinfo(h,parted).day per day) </td></tr>
sw <tr><td>Query's:</td><td> $sinfo(h,query) ( $+ $sinfo(h,query).day per day) </td></tr>
sw <tr><td>Connected:</td><td> $sinfo(h,connected) ( $+ $sinfo(h,connected).day per day) </td></tr>
sw <tr><td>Quit Server:</d><td> $sinfo(h,quit) ( $+ $sinfo(h,quit).day per day) </td></tr>
sw </table>
sw </td><td align=left valign=top>
sw <table width="210" border="0" class="contentborder" cellpadding="0" bgcolor="#3C3E4F">
sw <tr><td colspan=2 bgcolor=#30323F><b>Seen Stats:</b></td></tr>
sw <tr><td colspan=2>Since $sinfo(s,date) times I've seen:</td></tr>
sw <tr><td>Oped:</td><td> $sinfo(s,oped) ( $+ $sinfo(s,oped).day per day) </td></tr>
sw <tr><td>Deoped:</td><td> $sinfo(s,deoped) ( $+ $sinfo(s,deoped).day per day) </td></tr>
sw <tr><td>Halfoped:</td><td> $sinfo(s,halfoped) ( $+ $sinfo(s,halfoped).day per day) </td></tr>
sw <tr><td>Dehalfoped:</td><td> $sinfo(s,dehalfoped) ( $+ $sinfo(s,dehalfoped).day per day) </td></tr>
sw <tr><td>Voiced:</td><td> $sinfo(s,voiced) ( $+ $sinfo(s,voiced).day per day) </td></tr>
sw <tr><td>Devoiced:</td><td> $sinfo(s,devoiced) ( $+ $sinfo(s,devoiced).day per day) </td></tr>
sw <tr><td>Kicked:</td><td> $sinfo(s,kicked) ( $+ $sinfo(s,kicked).day per day) </td></tr>
sw <tr><td>Banned:</td><td> $sinfo(s,banned) ( $+ $sinfo(s,banned).day per day) </td></tr>
sw <tr><td>Nick Change:</td><td> $sinfo(s,nick) ( $+ $sinfo(s,nick).day per day) </td></tr>
sw <tr><td>Topic Set:</td><td> $sinfo(s,topic) ( $+ $sinfo(s,topic).day per day) </td></tr>
sw <tr><td>Chan Join:</td><td> $sinfo(s,joined) ( $+ $sinfo(s,joined).day per day) </td></tr>
sw <tr><td>Chan Part:</td><td> $sinfo(s,parted) ( $+ $sinfo(s,parted).day per day) </td></tr>
sw <tr><td>Quit Server:</d><td> $sinfo(s,quit) ( $+ $sinfo(s,quit).day per day) </td></tr>
sw </table>
sw </table>
sw </td></tr>
sw </table>
}
elseif (/?=system isin $1) && ($sinfo(p,showsys)) {
sw <table width="100%" border="0" cellpadding="0" cellspacing="0" bgcolor="#4F526A">
sw <tr><td align="left" valign="top">
sw <table width="240" border="0" class="contentborder" cellpadding="0" bgcolor="#3C3E4F">
sw <tr><td colspan=2 bgcolor=#30323F><b>cpu / ram:</b></td></tr>
sw <tr><td>cpu:</td><td> $iif($sinfo(y,cpu),$ifmatch,-) </td></tr>
sw <tr><td>Megahertz:</td><td> $iif($sinfo(y,mhz),$ifmatch,-) </td></tr>
sw <tr><td>Cache:</td><td> $iif($sinfo(y,cache),$ifmatch,-) </td></tr>
sw <tr><td>Load:</td><td> $iif($sinfo(y,load),$ifmatch,-) </td></tr>
sw <tr><td><br></td></tr>
sw <tr><td><br></td></tr>
sw <tr><td>ram ammount:</td><td> $iif($sinfo(y,ram),$ifmatch,-) </td></tr>
sw <tr><td>In use:</td><td> $iif($sinfo(y,ramuse),$ifmatch,-) </td></tr>
sw </table>
sw </td><td align=left valign=top>
sw <table width="200" border="0" class="contentborder" cellpadding="0" bgcolor="#3C3E4F">
sw <tr><td colspan=2 bgcolor=#30323F><b>os:</b></td></tr>
sw <tr><td>os:</td><td> $iif($sinfo(y,os),$ifmatch,-) </td></tr>
sw <tr><td>version:</td><td> $iif($sinfo(y,osver),$ifmatch,-) </td></tr>
sw <tr><td>build:</td><td> $iif($sinfo(y,osbuild),$ifmatch,-) </td></tr>
sw <tr><td><br></td></tr>
sw <tr><td>Installed for:</td><td> $iif($sinfo(y,osinst),$ifmatch,-) </td></tr>
sw <tr><td>Uptime:</td><td> $iif($sinfo(y,osup),$ifmatch,-) </td></tr>
sw </table>
sw </td><td align=left valign=top>
sw <table width="200" border="0" class="contentborder" cellpadding="0" bgcolor="#3C3E4F">
sw <tr><td colspan=2 bgcolor=#30323F><b>gfx:</b></td></tr>
sw <tr><td>gfx card:</td><td> $iif($sinfo(y,gfx) == -1,-,$ifmatch) </td></tr>
sw <tr><td>resolution:</td><td> $iif($sinfo(y,gfxres),$ifmatch,-) </td></tr>
sw <tr><td>refresh rate:</td><td> $iif($sinfo(y,gfxref),$ifmatch,-) </td></tr>
sw <tr><td>depth:</td><td> $iif($sinfo(y,gfxdepth),$ifmatch,-) </td></tr>
sw </table>
sw </td></tr>
sw </table><br>
sw <table width="100%" border="0" cellpadding="0" cellspacing="0" bgcolor="#4F526A">
sw <tr><td align="left" valign="top">
sw <table width="250" border="0" class="contentborder" cellpadding="0" bgcolor="#3C3E4F">
sw <tr><td colspan=2 bgcolor=#30323F><b>dial-up connection:</b></td></tr>
sw <tr><td>connection:</td><td> $iif($sinfo(y,con),$ifmatch,-) </td></tr>
sw <tr><td>speed:</td><td> $iif($sinfo(y,conspeed),$ifmatch,-) </td></tr>
sw <tr><td>downloaded:</td><td> $iif($sinfo(y,condown),$ifmatch,-) </td></tr>
sw <tr><td>uploaded:</td><td> $iif($sinfo(y,conup),$ifmatch,-) </td></tr>
sw <tr><td>active for:</td><td> $iif($sinfo(y,conactive),$ifmatch,-) </td></tr>
sw <tr><td><br></td></tr>
sw <tr><td>ip:</td><td> $iif($sinfo(y,ip),$ifmatch,-) </td></tr>
sw </table>
sw </td><td align="left" valign="top">
sw <table width="250" border="0" class="contentborder" cellpadding="0" bgcolor="#3C3E4F">
sw <tr><td colspan=2 bgcolor=#30323F><b>ethernet:</b></td></tr>
sw <tr><td>Name:</td><td> $iif($sinfo(y,eth),$ifmatch,-) </td></tr>
sw <tr><td>Speed:</td><td> $iif($sinfo(y,ethspeed),$ifmatch,-) </td></tr>
sw <tr><td><br></td></tr>
sw <tr><td>Recieved:</td><td> $iif($sinfo(y,ethget),$ifmatch,-) </td></tr>
sw <tr><td>Sent:</td><td> $iif($sinfo(y,ethsent),$ifmatch,-) </td></tr>
sw </table>
sw </td></tr>
sw </table><br>
sw <table width="100%" border="0" cellpadding="0" cellspacing="0" bgcolor="#4F526A">
sw <tr><td align="left" valign="top">
sw <table width="500" border="0" class="contentborder" cellpadding="0" bgcolor="#3C3E4F">
sw <tr><td colspan=4 bgcolor=#30323F><b>hdd:</b></td></tr>
sw <tr><td><u>Drive</u></td><td><u>Size</u></td><td><u>Free</u></td><td><u>% Free</u></td></tr>
var %l = 67,%tfs = 0,%ts = 0,%i = 2,%rtfs = 0,%rts = 0
while (%l <= 90) {
if ($disk($chr(%l))) {
if ($disk($chr(%l)).type == fixed) || ($disk($chr(%l)).type == cdrom) || ($disk($chr(%l)).type == removable) {
var %f = $disk($chr(%l)).free,%s = $disk($chr(%l)).size
inc %tfs %f
inc %ts %s
if ($+($chr(%l),: ( $+ $iif($disk($chr(%l)).label,$disk($chr(%l)).label,No label) $+ ),</td><td> $bytes(%s,3).suf,</td><td> $bytes(%f,3).suf,</td><td> $round($calc((%f / %s)*100),1),%) != %i) {
sw <tr><td> $ifmatch </td></tr>
var %dn = 1
}
inc %i
}
elseif ($disk($chr(%l)).type == remote) {
var %rf = $disk($chr(%l)).free,%rs = $disk($chr(%l)).size
inc %rtfs %rf
inc %rts %rs
if ($+($chr(%l),: ( $+ $disk($chr(%l)).unc $+ ),</td><td> $bytes(%rs,3).suf,</td><td> $bytes(%rf,3).suf,</td><td> $round($calc((%rf / %rs)*100),1),%) != %i) {
sw <tr><td> $ifmatch </td></tr>
var %dn = 1,%rdn = 1
}
inc %i
}
}
inc %l
}
if (%dn) {
sw <tr><td><br></td></tr>
if (%rdn) {
sw <tr><td>Local total</td><td> $+($bytes(%ts,3).suf,</td><td> $bytes(%tfs,3).suf,</td><td> $round($calc((%tfs / %ts)*100),1),%) </td></tr>
sw <tr><td>Mapped total</td><td> $+($bytes(%rts,3).suf,</td><td> $bytes(%rtfs,3).suf,</td><td> $round($calc((%rtfs / %rts)*100),1),%) </td></tr>
sw <tr><td><br></td></tr>
}
sw <tr><td>Total</td><td> $+($bytes($calc(%ts + %rts),3).suf,</td><td> $bytes($calc(%rtfs + %tfs),3).suf,</td><td> $round($calc(((%rtfs + %tfs)/(%ts + %rts))*100),1),%) </td></tr>
}
sw </table>
sw </td></tr>
sw </table><br>
}
else {
sw <table width="650" border="0" class="contentborder" cellpadding="0" bgcolor="#3C3E4F">
sw <tr><td colspan=6 bgcolor=#30323F><b>Current Servers Information:</b></td></tr>
sw <tr><td width="150"><u>Server</u></td><td width="100"><u>Network</u></td><td width="100"><u>Nick</u></td><td width="30"><u>Chans</u></td><td width="30"><u>Query's</u></td><td width="60"><u>More Info</u></td></tr>
if ($scon(1).status == disconnected) { sw <tr><td colspan=6>Not connected</td></tr> }
var %s1 = $scon(0),%s2 = 1
while (%s2 <= %s1) {
if ($scon(%s2).status == connected) { scon %s2 | sw <tr><td><a href="irc:// $+ $server $+ /"> $server </a></td><td> $iif($network,$ifmatch,unknown) </td><td> $me </td><td> $chan(0) </td><td> $query(0) </td><td><a href="./?id= $+ %s2 $+ ">Click!</a></tr> }
inc %s2 1
}
sw </table>
if (/?id=* iswm $1) {
var %s3 $right($1,-5)
scon %s3
sw <br>
sw <table width="100%" border="0" cellpadding="0" cellspacing="0" bgcolor="#4F526A">
sw <tr><td align="left" valign="top">
sw <table width="300" border="0" class="contentborder" cellpadding="0" bgcolor="#3C3E4F">
sw <tr><td colspan=2 bgcolor=#30323F><b>Server Information:</b></td></tr>
sw <tr><td>Server:</td><td> $server </td></tr>
sw <tr><td>Network:</td><td> $iif($network,$network,-) </td></tr>
sw <tr><td>Port:</td><td> $iif($port,$port,-) </td></tr>
sw <tr><td>IP address:</td><td> $iif($serverip,$serverip,-) </td></tr>
sw <tr><td colspan=2></td></tr>
sw <tr><td colspan=2></td></tr>
sw <tr><td>Nickname:</td><td> $me </td></tr>
sw <tr><td>Usermodes:</td><td> $iif($usermode != $chr(43),$left($usermode,1) $right($usermode,-1),-) </td></tr>
sw <tr><td>Connected:</td><td> $uptime(server,1) </td></tr>
sw <tr><td>Idle time:</td><td> $duration($idle) </td></tr>
sw <tr><td>Away:</td><td> $iif($away == $true,yes,no) </td></tr>
sw <tr><td colspan=2></td></tr>
sw <tr><td colspan=2></td></tr>
sw <tr><td>Chan types:</td><td> $iif($chantypes,$ifmatch,-) </td></tr>
sw <tr><td>Chan modes:</td><td> $iif($chanmodes,$ifmatch,-) </td></tr>
sw <tr><td>Mode prefix:</td><td> $iif($prefix,$prefix,-) </td></tr>
sw <tr><td>Mode params:</td><td> $iif($modespl,$ifmatch,-) </td></tr>
sw </table><br>
sw <table width="300" border="0" class="contentborder" cellpadding="0" bgcolor="#3C3E4F">
sw <tr><td bgcolor=#30323F><b>Channels:</b></td></tr>
var %c1 $chan(0)
var %c2 1
var %c3
var %c5 $1
tokenize 45 $1
while (%c2 <= %c1) {
if (s isin $gettok($chan(%c2).mode,1,32)) && (&hg(webhidesec) == true) { goto noshow }
elseif (p isin $gettok($chan(%c2).mode,1,32)) && ($hg(webhidepriv) == true) { goto noshow }
else { set %c3 %c3 $+ $iif(%c2 != 1,$chr(44)) <a href=" $+ $1 $+ -c $+ %c2 $+ "> $+ $chan(%c2) $+ </a> }
:noshow
inc %c2 1
}
if (%c3 == $null) { sw <tr><td>none</td></tr> }
else { sw <tr><td> %c3 </td></tr> }
sw </table><br>
sw <table width="300" border="0" class="contentborder" cellpadding="0" bgcolor="#3C3E4F">
sw <tr><td bgcolor=#30323F><b>Query's:</b></td></tr>
var %q1 $query(0)
var %q2 1
var %q3
while (%q2 <= %q1) {
set %q3 %q3 $+ $iif(%q2 != 1,$chr(44)) <a href=" $+ $1 $+ -q $+ %q2 $+ "> $+ $query(%q2) $+ </a>
inc %q2 1
}
if (%q3 == $null) { sw <tr><td>none</td></tr> }
else { sw <tr><td> %q3 </td></tr> }
sw </table><br>
if (*c* iswm $2) {
sw </td><td valign="top" align="left">
var %c4 = $right($2,-1)
scon %s3
sw <table width="335" border="0" class="contentborder" cellpadding="0" bgcolor="#3C3E4F">
sw <tr><td colspan=2 bgcolor=#30323F><b>Channel Information:</b></td></tr>
sw <tr><td>Channel:</td><td> $chan(%c4) </td></tr>
sw <tr><td>Total users:</td><td> $nick($chan(%c4),0,a) <a href=" $+ %c5 $+ -u $+ ">view</a></td></tr>
sw <tr><td>Ops:</td><td> $nick($chan(%c4),0,o) ( $+ $iif($int($calc($nick($chan(%c4),0,o) / $nick($chan(%c4),0,a) * 100)) == $null,0,$int($calc($nick($chan(%c4),0,o) / $nick($chan(%c4),0,a) * 100)))) $+ % $+ ) </td></tr>
sw <tr><td>Halfops:</td><td> $nick($chan(%c4),0,h) ( $+ $iif($int($calc($nick($chan(%c4),0,h) / $nick($chan(%c4),0,a) * 100)) == $null,0,$int($calc($nick($chan(%c4),0,h) / $nick($chan(%c4),0,a) * 100)))) $+ % $+ ) </td></tr>
sw <tr><td>Voiced:</td><td> $nick($chan(%c4),0,v) ( $+ $iif($int($calc($nick($chan(%c4),0,r) / $nick($chan(%c4),0,a) * 100)) == $null,0,$int($calc($nick($chan(%c4),0,v) / $nick($chan(%c4),0,a) * 100)))) $+ % $+ ) </td></tr>
sw <tr><td>Regulars:</td><td> $nick($chan(%c4),0,r) ( $+ $iif($int($calc($nick($chan(%c4),0,r) / $nick($chan(%c4),0,a) * 100)) == $null,0,$int($calc($nick($chan(%c4),0,r) / $nick($chan(%c4),0,a) * 100)))) $+ % $+ ) </td></tr>
sw <tr><td colspan=2></td></tr>
sw <tr><td colspan=2></td></tr>
sw <tr><td>Topic:</td><td> $iif($chan(%c4).topic,$strip($ifmatch),-) </td></tr>
sw <tr><td>Modes:</td><td> $iif($chan($chan(%c4)).mode,$left($chan($chan(%c4)).mode,1) $right($chan($chan(%c4)).mode,-1),-) </td></tr>
sw <tr><td>Key:</td><td> $iif($chan(%c4).key,$ifmatch,-) </td></tr>
sw <tr><td>Limit:</td><td> $iif($chan(%c4).limit,$ifmatch,-) </td></tr>
sw <tr><td colspan=2></td></tr>
sw <tr><td colspan=2></td></tr>
sw <tr><td>Window ID:</td><td> $chan(%c4).wid </td></tr>
sw <tr><td>Connection ID:</td><td> $chan(%c4).cid </td></tr>
sw </table><br>
}
if (*u* iswm $3) {
sw <table width="335" border="0" class="contentborder" cellpadding="0" bgcolor="#3C3E4F">
sw <tr><td colspan=3 bgcolor=#30323F><b>Users for $chan(%c4) $+ :</b></td></tr>
sw <tr><td colspan=2>Total:</td><td> $nick($chan(%c4),0) </td></tr>
var %u1 $nick($chan(%c4),0)
var %u2 1
while (%u2 <= %u1) {
sw <tr><td> %u2 $+ .</td><td> $iif($nick($chan(%c4),%u2) !isreg $chan(%c4),$left($nick($chan(%c4),%u2).pnick,1)) $nick($chan(%c4),%u2) </td></tr>
if (%u2 >= 100) { <tr><td colspan=2><b>- Too much users to list!</b></td></tr> | break }
inc %u2 1
}
sw </table>
}
if (*q* iswm $2) {
sw </td><td valign="top" align="left">
var %q4 $right($2,-1)
scon %s3
sw <table width="335" border="0" class="contentborder" cellpadding="0" bgcolor="#3C3E4F">
sw <tr><td colspan=2 bgcolor=#30323F><b>Query Information:</b></td></tr>
sw <tr><td>Nickname:</td><td> $query(%q4) </td></tr>
sw <tr><td>Address:</td><td> $iif($query(%q4).addr,$ifmatch,-) </td></tr>
sw <tr><td colspan=2></td></tr>
sw <tr><td colspan=2></td></tr>
sw <tr><td>Comchans:</td><td> $comchan($query(%q4),0) </td></tr>
var %q5 $comchan($query(%q4),0)
var %q6 1
while (%q6 <= %q5) {
sw <tr><td> $iif($query(%q4) !isreg $comchan($query(%q4),%q6),$left($nick($comchan($query(%q4),%q6),$query(%q4)).pnick,1)) </td><td> $comchan($query(%q4),%q6) </td></tr>
inc %q6
}
sw <tr><td colspan=2></td></tr>
sw <tr><td colspan=2></td></tr>
sw <tr><td>Window ID:</td><td> $query(%q4).wid </td></tr>
sw <tr><td>Connection ID:</td><td> $query(%q4).cid </td></tr>
sw </table>
}
sw </table>
}
}
sw </td></tr></table>
sw <center>
if ($hg(webpiclink2)) { sw <img src=" $+ $sinfo(p,piclink2) $+ "><br> }
sw <font size=1><br><b>- Generated File in $calc(($ticks - %ticks) /1000) $+ secs -<br><br>- <a href="http://www.voiceofpower.us/scripts/mstats461.zip">get mIRC Stats</a> - © by: <a href="mailto:marckuiper@hotmail.com">Voice_of_Power</a> -<br>- made for use with a resolution of 1024x768 or higher -</b></font>
sw </center>
sw </body>
sw </html>
}