********************************
* HTML Logger v1.0 *
* Made by b00hp aka bewPy *
* Readme is in Docs Directory *
* *
* Email: corey5424@gmail.com *
* ******************************
on *:load:{
echo -s You have successfully loaded HTML Logger.
echo -s If you need help please read the readme located in the Docs folder.
hadd html version 1.0
hadd html join CC0000
hadd html input 66FF33
hadd html part CC00CC
hadd html mode FFFF00
hadd html chan FF6600
hadd html text FFFFFF
hadd html nick 33FFFF
hadd html kick 66CCFF
hadd html ban FF6600
hadd html op FF00CC
hadd html voice FFFFCC
hadd html background 000000
hadd html action FFCC33
hadd html topic 009999
if (!$hget(html,apache)) {
hadd html apache $shortfn($sdir(C:\,Locate the folder you with your logs to goto))
}
hsave -o html html.hsh
}
menu channel,menubar,query,status {
-
HTML Logger
.Advertise: msg $active I am using HTML Logger v $+ $hget(html,version) made by bewPy
.My Version:echo -a 4You current version of HTML Logger is $hget(html,version)
.Change Colors
..Join:hadd html join $$?"Color HEX for Join"
..Part:hadd html part $$?"Color HEX for Part"
..Input:hadd html input $$?"Color HEX for Input"
..Mode:hadd html mode $$?"Color HEX for Mode"
..Channel:hadd html chan $$?"Color HEX for Mode"
..Text:hadd html text $$?"Color HEX for Text"
..Nick:hadd html nick $$?"Color HEX for Nick"
..Kick:hadd html kick $$?"Color HEX for Kick"
..Ban:hadd html kick $$?"Color HEX for Ban"
..Op/Deop:hadd html op $$?"Color HEX for OP"
..Voice/DeVoice:hadd html voice $$?"Color HEX for Voice"
..Background:hadd html background $$?"Color HEX for Background"
..Action:hadd html action $$?"Color HEX for Action"
..Topic:hadd html topic $$?"Color HEX for Topic"
.Hex Converter:dialog -dm conv conv
-
}
on *:text:*:#:{
if (!$exists($hget(html,apache) $+ $+ $chan $+ .html)) {
write $hget(html,apache) $+ channels.html $+ $chan $+
write $hget(html,apache) $+ $chan $+ .html
write $hget(html,apache) $+ $chan $+ .html $+ Topic $+ $strip($chan($chan).topic)
write $hget(html,apache) $+ $chan $+ .html $+ $nick $+ : $strip($replace($1-,$chr(60),<))
}
else {
write $hget(html,apache) $+ $chan $+ .html $+ $nick $+ : $strip($replace($1-,$chr(60),<))
}
}
on *:join:#:{
if (!$exists($hget(html,apache) $+ $chan $+ .html)) {
write $hget(html,apache) $+ channels.html $+ $chan $+
write $hget(html,apache) $+ $chan $+ .html
write $hget(html,apache) $+ $chan $+ .html $+ Topic $+ $strip($chan($chan).topic)
write $hget(html,apache) $+ $chan $+ .html $+ $nick $+ has joined.
}
else {
write $hget(html,apache) $+ $chan $+ .html $+ $nick $+ has joined.
}
}
on *:input:#:{
if ($left($1,1) != /) {
if (!$exists($hget(html,apache) $+ $chan $+ .html)) {
write $hget(html,apache) $+ channels.html $+ $chan $+
write $hget(html,apache) $+ $chan $+ .html
write $hget(html,apache) $+ $chan $+ .html $+ Topic $+ $strip($chan($chan).topic)
write $hget(html,apache) $+ $chan $+ .html $+ $me $+ : $strip($replace($1-,$chr(60),<))
}
else {
write $hget(html,apache) $+ $chan $+ .html $+ $me $+ : $strip($replace($1-,$chr(60),<))
}
}
}
on *:mode:#:{
if (!$exists($hget(html,apache) $+ $chan $+ .html)) {
write $hget(html,apache) $+ channels.html $+ $chan $+
write $hget(html,apache) $+ $chan $+ .html
write $hget(html,apache) $+ $chan $+ .html $+ Topic $+ $strip($chan($chan).topic)
write $hget(html,apache) $+ $chan $+ .html $+ $nick $+ changed mode to $strip($1-)
}
else {
write $hget(html,apache) $+ $chan $+ .html $+ $nick $+ changed mode to $strip($1-)
}
}
on *:part:#:{
if (!$exists($hget(html,apache) $+ $chan $+ .html)) {
write $hget(html,apache) $+ channels.html $+ $chan $+
write $hget(html,apache) $+ $chan $+ .html
write $hget(html,apache) $+ $chan $+ .html $+ Topic $+ $strip($chan($chan).topic)
write $hget(html,apache) $+ $chan $+ .html $+ $nick $+ has parted.
}
else {
write $hget(html,apache) $+ $chan $+ .html $+ $nick $+ has parted.
}
}
on *:kick:#:{
if (!$exists($hget(html,apache) $+ $chan $+ .html)) {
write $hget(html,apache) $+ channels.html $+ $chan $+
write $hget(html,apache) $+ $chan $+ .html
write $hget(html,apache) $+ $chan $+ .html $+ Topic $+ $strip($chan($chan).topic)
write $hget(html,apache) $+ $chan $+ .html $+ $nick $+ was kicked by $+ $knick $+
}
else {
write $hget(html,apache) $+ $chan $+ .html $+ $knick $+ was kicked by $+ $nick $+
}
}
on *:ban:#:{
if (!$exists($hget(html,apache) $+ $chan $+ .html)) {
write $hget(html,apache) $+ channels.html $+ $chan $+
write $hget(html,apache) $+ $chan $+ .html
write $hget(html,apache) $+ $chan $+ .html $+ Topic $+ $strip($chan($chan).topic)
write $hget(html,apache) $+ $chan $+ .html $+ $banmask $+ was banned by $+ $nick $+
}
else {
write $hget(html,apache) $+ $chan $+ .html $+ $banmask $+ was banned by $+ $nick $+
}
}
on *:unban:#:{
if (!$exists($hget(html,apache) $+ $chan $+ .html)) {
write $hget(html,apache) $+ channels.html $+ $chan $+
write $hget(html,apache) $+ $chan $+ .html
write $hget(html,apache) $+ $chan $+ .html $+ Topic $+ $strip($chan($chan).topic)
write $hget(html,apache) $+ $chan $+ .html $+ $banmask $+ was unbanned by $+ $nick $+
}
else {
write $hget(html,apache) $+ $chan $+ .html $+ $banmask $+ was unbanned by $+ $nick $+
}
}
on *:OP:#:{
if (!$exists($hget(html,apache) $+ $chan $+ .html)) {
write $hget(html,apache) $+ channels.html $+ $chan $+
write $hget(html,apache) $+ $chan $+ .html
write $hget(html,apache) $+ $chan $+ .html $+ Topic $+ $strip($chan($chan).topic)
write $hget(html,apache) $+ $chan $+ .html $+ $opnick $+ was OPED by $+ $nick $+
}
else {
write $hget(html,apache) $+ $chan $+ .html $+ $opnick $+ was OPED by $+ $nick $+
}
}
on *:deop:#:{
if (!$exists($hget(html,apache) $+ $chan $+ .html)) {
write $hget(html,apache) $+ channels.html $+ $chan $+
write $hget(html,apache) $+ $chan $+ .html
write $hget(html,apache) $+ $chan $+ .html $+ Topic $+ $strip($chan($chan).topic)
write $hget(html,apache) $+ $chan $+ .html $+ $opnick $+ was DEOPED by $+ $nick $+
}
else {
write $hget(html,apache) $+ $chan $+ .html $+ $opnick $+ was DEOPED by $+ $nick $+
}
}
on *:devoice:#:{
if (!$exists($hget(html,apache) $+ $chan $+ .html)) {
write $hget(html,apache) $+ channels.html $+ $chan $+
write $hget(html,apache) $+ $chan $+ .html
write $hget(html,apache) $+ $chan $+ .html $+ Topic $+ $strip($chan($chan).topic)
write $hget(html,apache) $+ $chan $+ .html $+ $vnick $+ was DEVOICED by $+ $nick $+
}
else {
write $hget(html,apache) $+ $chan $+ .html $+ $vnick $+ was DEVOICED by $+ $nick $+
}
}
on *:VOICE:#:{
if (!$exists($hget(html,apache) $+ $chan $+ .html)) {
write $hget(html,apache) $+ channels.html $+ $chan $+
write $hget(html,apache) $+ $chan $+ .html
write $hget(html,apache) $+ $chan $+ .html $+ Topic $+ $strip($chan($chan).topic)
write $hget(html,apache) $+ $chan $+ .html $+ $vnick $+ was VOICED by $+ $nick $+
}
else {
write $hget(html,apache) $+ $chan $+ .html $+ $vnick $+ was VOICED by $+ $nick $+
}
}
on *:topic:#:{
if (!$exists($hget(html,apache) $+ $chan $+ .html)) {
write $hget(html,apache) $+ channels.html $+ $chan $+
write $hget(html,apache) $+ $chan $+ .html
write $hget(html,apache) $+ $chan $+ .html $+ Topic $+ $strip($chan($chan).topic)
write $hget(html,apache) $+ $chan $+ .html $+ Topic Changed To --> $strip($1-)
}
else {
write $hget(html,apache) $+ $chan $+ .html $+ Topic Changed To --> $strip($1-)
}
}
on *:action:*:#:{
if (!$exists($hget(html,apache) $+ $chan $+ .html)) {
write $hget(html,apache) $+ channels.html $+ $chan $+
write $hget(html,apache) $+ $chan $+ .html
write $hget(html,apache) $+ $chan $+ .html $+ Topic $+ $strip($chan($chan).topic)
write $hget(html,apache) $+ $chan $+ .html $+ * $nick $+ $strip($1-)
}
else {
write $hget(html,apache) $+ $chan $+ .html $+ * $nick $+ $strip($1-)
}
}
dialog conv {
title "Color Converter"
size -1 -1 87 30
option dbu
text "Red:", 1, 0 21 11 8
text "Green:", 2, 27 21 16 8
text "Blue:", 3, 59 21 12 8
edit "0", 4, 11 20 16 10, limit 3 center
edit "0", 5, 43 20 16 10, limit 3 center
edit "0", 6, 71 20 16 10, limit 3 center
edit "000000", 7, 29 0 31 10, read limit 6 center
text "HTML Color:", 8, 0 1 29 8
text "RGB Color:", 9, 0 11 29 8, right
edit "0", 10, 29 10 31 10, limit 8 center
button "Preview", 11, 60 0 27 10
}
alias htmllogsconv { if (!$dialog(conv)) { dialog -md conv conv } | else { dialog -x conv } }
on *:DIALOG:conv:*:*:{
if ($devent == EDIT) {
if ($did >= 4) && ($did <= 6) {
if ($did($dname,4).text) && ($did($dname,4).text isnum) && ($did($dname,5).text isnum) && ($did($dname,6).text isnum) {
if ($did($dname,4).text <= 255) && ($did($dname,4).text >= 0) && ($did($dname,5).text <= 255) && ($did($dname,5).text >= 0) && ($did($dname,6).text <= 255) && ($did($dname,6).text >= 0) {
did -ra $dname 7 $+($base($did($dname,4).text,10,16,2),$base($did($dname,5).text,10,16,2),$base($did($dname,6).text,10,16,2))
did -ra $dname 10 $rgb($did($dname,4).text,$did($dname,5).text,$did($dname,6).text)
}
else {
did -ra $dname 7,10 Invalid
}
}
else {
did -ra $dname 7,10 Invalid
}
}
if ($did == 10) {
if ($did($dname,10).text) && ($did($dname,10).text isnum) {
if ($did($dname,10).text <= 16777215) && ($did($dname,10).text >= 0) {
did -ra $dname 4 $gettok($rgb($did($dname,10).text),1,44)
did -ra $dname 5 $gettok($rgb($did($dname,10).text),2,44)
did -ra $dname 6 $gettok($rgb($did($dname,10).text),3,44)
did -ra $dname 7 $+($base($did($dname,4).text,10,16,2),$base($did($dname,5).text,10,16,2),$base($did($dname,6).text,10,16,2))
}
else {
did -ra $dname 7,4,5,6 Invalid
}
}
else {
did -ra $dname 7,4,5,6 Invalid
}
}
}
elseif ($devent == SCLICK) && ($did == 11) && ($did($dname,10).text != Invalid) {
if (!$window(@convprev)) { /window -aBpd +t @convprev $mouse.dx $mouse.dy 56 75 }
else { /window -a @convprev }
drawrect -rf @convprev $did($dname,10).text 1 0 0 50 50
}
}