| View previous topic :: View next topic |
| Author |
Message |
Ovdis Voice
Joined: 05 Dec 2004 Posts: 17 Location: .lt
|
Posted: Mon Dec 06, 2004 3:32 pm Post subject: Chanpage script by slennox |
|
|
where coul i find chanpage script by slennox, which is used here?
or maybe it is unavailable in public?
ps, i tried search but no matches were found _________________ keep it real |
|
| Back to top |
|
 |
metroid Owner
Joined: 16 Jun 2004 Posts: 771
|
Posted: Mon Dec 06, 2004 5:36 pm Post subject: |
|
|
| I guess not then huh. |
|
| Back to top |
|
 |
Ovdis Voice
Joined: 05 Dec 2004 Posts: 17 Location: .lt
|
Posted: Tue Dec 07, 2004 9:19 am Post subject: |
|
|
or maybe i could find some equivalents for that chanscript? _________________ keep it real |
|
| Back to top |
|
 |
metroid Owner
Joined: 16 Jun 2004 Posts: 771
|
Posted: Tue Dec 07, 2004 9:51 am Post subject: |
|
|
Have you tried google? Have you tried the TCL Archive?
No. You should try a little harder to get something done. |
|
| Back to top |
|
 |
slennox Owner

Joined: 22 Sep 2001 Posts: 593
|
Posted: Tue Dec 07, 2004 1:56 pm Post subject: |
|
|
I'm afraid the script incomplete and undocumented, never been ready for public release and probably never will be.
Incidentally Ovdis, would you mind changing your avatar? To paraphrase a line from the film Patton: this is a support forum, not a bordello  |
|
| Back to top |
|
 |
Deacon Voice
Joined: 29 Jan 2005 Posts: 2
|
Posted: Sat Jan 29, 2005 8:08 am Post subject: |
|
|
| Dont you ever considder it to release it ?? |
|
| Back to top |
|
 |
KevKev Halfop
Joined: 03 Oct 2003 Posts: 67
|
Posted: Sat Jan 29, 2005 8:29 am Post subject: |
|
|
It looks like an excelent script but it appears he has no interest in releasing it.
There are several other stats scripts available however so you're not totally out of luck.
Personally I quite like pisg YMMV |
|
| Back to top |
|
 |
caesar Mint Rubber

Joined: 14 Oct 2001 Posts: 3741 Location: Mint Factory
|
Posted: Sat Jan 29, 2005 4:12 pm Post subject: |
|
|
What's so hard to make a simple one? Just a few clicks here and there and voila! (the design part) as for tcl same way (clicks replaced by lines)  _________________ Once the game is over, the king and the pawn go back in the same box. |
|
| Back to top |
|
 |
Deacon Voice
Joined: 29 Jan 2005 Posts: 2
|
Posted: Sun Jan 30, 2005 4:53 pm Post subject: |
|
|
| Then make one, Because i can't, If you would make it. I would apriciate it very much |
|
| Back to top |
|
 |
caesar Mint Rubber

Joined: 14 Oct 2001 Posts: 3741 Location: Mint Factory
|
Posted: Mon Jan 31, 2005 11:12 am Post subject: |
|
|
| Code: |
bind dcc o chanpage chanpage:dcc
bind time - ?0* time:chan:page
proc chanpage:dcc {hand idx text} {
chanpage:generate #channel "Bla bla bla, this is my chan description."
putidx $idx "chanpage generated.."
}
proc time:chan:page {minute hour day month year} {
chanpage:generate #channel "Bla bla bla, this is my chan description."
}
proc chanpage:generate {chan desc} {
set f [open index.html w]
puts $f "
<html><head><title>$chan stats!</title><style>
<!--
.bodyCopy {
FONT-WEIGHT: normal; FONT-SIZE: 11px; LINE-HEIGHT: 16px; FONT-STYLE: normal; FONT-FAMILY: Verdana, Arial, Helvetica, sans-serif
}
A {
COLOR: #000000; FONT-FAMILY: Verdana, Arial, Helvetica, sans-serif; TEXT-DECORATION: none
}
A:active {
COLOR: #000000; FONT-FAMILY: Verdana, Arial, Helvetica, sans-serif; TEXT-DECORATION: none
}
A:link {
COLOR: #000000; FONT-FAMILY: Verdana, Arial, Helvetica, sans-serif; TEXT-DECORATION: none
}
A:visited {
COLOR: #000000; FONT-FAMILY: Verdana, Arial, Helvetica, sans-serif; TEXT-DECORATION: none
}
A:hover {
COLOR: blue; FONT-FAMILY: Verdana, Arial, Helvetica, sans-serif; TEXT-DECORATION: none
}
-->
</style></head><body>
<table border=\"0\" width=\"100%\" height=\"100%\" id=\"table57\">
<tr><td><div align=\"center\"><div align=\"center\"><table border=\"0\" width=\"75%\" id=\"table64\"><tr><td>
<p align=\"center\"><font face=\"Verdana\" size=\"4\"><b>#channel</b></font><br>
<font face=\"Verdana\" style=\"font-size: 9pt\">$desc</font><font face=\"Verdana\" size=\"2\"><br>
"
if {[set topic [topic $chan]] == ""} {
set topic "No topic is set for $chan channel."
}
puts $f "
<br><b>Channel topic:</b><br></font><font face=\"Verdana\" style=\"font-size: 9pt\">$topic</font><font face=\"Verdana\" size=\"2\"><br>
<br><b>Users in channel:</b></font></td></tr>
</table><TABLE cellSpacing=0 cellPadding=0 width=\"50%\" bgColor=#000000 border=0 id=\"table62\"><TBODY><TR><TD>
<TABLE cellSpacing=1 cellPadding=1 width=\"100%\" border=0 id=\"table63\"><TBODY><TR borderColor=##ffffff bgColor=#000031>
<TD width=\"15%\" bgcolor=\"#FAFAFA\"><DIV class=bodyCopy align=center><strong>Nickname</strong></DIV></TD><TD width=\"45%\" bgcolor=\"#FAFAFA\">
<DIV class=bodyCopy align=center><strong>Time in channel</strong></DIV></TD></TR>"
foreach user [chanlist $chan] {
lappend nicklist $user
}
foreach user [lsort -dictionary $nicklist] {
puts $f "<TR class=bodyCopy borderColor=#ffffff bgColor=#ffffcc>
<TD bgColor=#FFFFFF width=\"10%\"><DIV class=bodyCopy align=left><p align=\"center\">
<strong style=\"font-weight: 400\">$user</strong></DIV></TD><TD bgColor=#FFFFFF width=\"45%\">"
if {[set join [getchanjoin $user $chan]]} {
set duration [duration [expr [clock seconds] - $join]]
} else {
set duration "n/a"
}
puts $f "<DIV class=bodyCopy align=center>$duration</DIV></TD></TR>"
}
puts $f "
</TBODY></TABLE></TD></TR></TBODY></TABLE><p><font face=\"Verdana\" size=\"1\">This page was last updated on [date] at [time]<br>
</font><font face=\"Verdana\" size=\"2\"><br></font><font face=\"Verdana\" size=\"1\">Created with chanpage.tcl v0.1<br>
© 2004 <a href=\"mailto:cezarica%20\[at\]%20prietenii%20\[dot%20\]com\">caesar</a><font face=\"Verdana\">.</font> All rights reserved.</font></div>
</div></td></tr></table></body></html>"
close $f
}
|
There, happy now? Make yourself the second page.  _________________ Once the game is over, the king and the pawn go back in the same box. |
|
| Back to top |
|
 |
stalix Voice
Joined: 13 Sep 2005 Posts: 23
|
Posted: Wed Mar 22, 2006 10:47 am Post subject: |
|
|
This script works? i dont working me.
or other script similar??
t
hanks |
|
| Back to top |
|
 |
caesar Mint Rubber

Joined: 14 Oct 2001 Posts: 3741 Location: Mint Factory
|
Posted: Wed Mar 22, 2006 11:29 am Post subject: |
|
|
What exactly isn't working? What have you tried so far? Any errors? Please check the Things to do before posting page. _________________ Once the game is over, the king and the pawn go back in the same box. |
|
| Back to top |
|
 |
stalix Voice
Joined: 13 Sep 2005 Posts: 23
|
Posted: Wed Mar 22, 2006 11:59 am Post subject: |
|
|
| I want you know if somebody test that script and if work ... |
|
| Back to top |
|
 |
Alchera Revered One

Joined: 11 Aug 2003 Posts: 3344 Location: Ballarat Victoria, Australia
|
Posted: Wed Mar 22, 2006 12:16 pm Post subject: |
|
|
| stalix wrote: | | I want you know if somebody test that script and if work ... |
You're the one that should be testing the script. Re-read caesar's post. _________________ Add [SOLVED] to the thread title if your issue has been.
Search | FAQ | RTM |
|
| Back to top |
|
 |
stalix Voice
Joined: 13 Sep 2005 Posts: 23
|
Posted: Wed Mar 22, 2006 3:26 pm Post subject: |
|
|
yeah but dont work me  |
|
| Back to top |
|
 |
|